<div dir="ltr">Thanks, Charles and Jeff, for opening this discussion.<div><br></div><div>I have taken some steps to make searching the archives possible.  The archives are now public, so they should get picked up by Google in the near future.  I have also subscribed the download-list to "The Mail Archive":</div><div>    <a href="https://www.mail-archive.com">https://www.mail-archive.com</a></div><div>I'm not sure how long it will take for the indexing to take place, but the search there should be good.</div><div><br></div><div>Regarding the installation problems on Universe...</div><div>Chuck is right about SWAP vs. CHANGE.  I'll check my routines that build the distribution files to find out where that syntax is being missed.</div><div><br></div><div>I'll send out an update when I've made some headway (depending on how work on my day-job goes).</div><div><br></div><div><br></div><div><br></div></div><div class="gmail_extra"><br clear="all"><div><div class="gmail_signature">David Rotman, Ph.D.<br>Associate Vice President for Technology<br>Chief Information Officer<br>Cedarville University<br>251 N. Main Street<br>Cedarville, OH 45314<br><a href="mailto:rotmand@cedarville.edu" target="_blank">rotmand@cedarville.edu</a><br>voice 937-766-7905<br>fax 937-766-8819<div><img src="http://www.cedarville.edu/~/media/Images/Information-Technology/IT-logo-for-signature.jpg"><br></div></div></div>
<br><div class="gmail_quote">On Sun, Jul 12, 2015 at 3:05 PM, Charles Stevenson <span dir="ltr"><<a href="mailto:stevenson.chas@gmail.com" target="_blank">stevenson.chas@gmail.com</a>></span> wrote:<br><blockquote class="gmail_quote" style="margin:0 0 0 .8ex;border-left:1px #ccc solid;padding-left:1ex"><div dir="ltr"><div>Jeff,</div>Lst weekend I did the same with the uv windows version, with the same result.<div>I was going to post a similar question, but intesad posted a question about how to search the archives for answers, thinking my problem wasn't unique & someone already solved it.  No response.  Maybe we're on our own & we can woirk it through together.</div><div><br></div><div>I haven't done much troubleshooting & debugging yet,  but I so far I've done this much:</div><div><br></div><div>1. SWAP</div><div><br></div><div>Replaced the UD SWAP syntax with UV's  CHANGE function.  </div><div>EREPLACE is a synonym to CHANGE.  </div><div>caution: CONVERT is different.  Don't use CONVERT in this instance.</div><div><br></div><div>Lines with my "CDS" initials are what I changed:</div><div><br></div><div><div><font size="1" face="monospace, monospace"><div><br></div></font></div></div><div>2. PCPERFORM </div><div>needs to be be fixed using using EXECUTE 'SH . . .'  or EXECUTE 'DOS . . .'  on linux & windows, respectively.</div><div><br></div><div>3. DLPARSE can't handle "Q"-pointers in at least one place.  I'm thinking maybe more.<br></div><div><br></div><div>4. Missing  PCLOSE, POPEN, PWRITE.</div><div>Calls to those compile,  but I think there are only called if you're running under PRIMOS operating system  or INFORMATION dbms.</div><div>So I think it is safe to ignore.</div><div><br></div><div><br></div><div><br></div><div><br></div><div><div>Lines with my "CDS" initials are what I changed:</div></div><div><br></div><div><div><div><font size="1" face="monospace, monospace"><div>DLSOURCE DL:</div><div><br></div><div><div>0005: * TITLE ----- DOWNLOAD<br></div><div><br></div><div>0025: * Stamped: p21 rotmand, /usr/local/download, user #1976, 22 Nov 13, 07:48AM.0026: * Version 8.00</div><div>0027: *</div><div>0028: * Stamped: CDS C Stevenson C:\uvdb\apps\dlsource.  6 Jul 15.</div></div><div><br></div></font></div><div><font size="1" face="monospace, monospace">1489: CONVERT.TO.XLSX:   <-- this appears to be new code</font></div><div><font size="1" face="monospace, monospace">1490:       DEBUG1OR2</font></div><div><font size="1" face="monospace, monospace">1491:       CRT 'INSIDE CONVERT.TO.XLSX'</font></div><div><font size="1" face="monospace, monospace">1492:       END</font></div><div><font size="1" face="monospace, monospace">1493:       X.COMMAND = DLMAIN.XLSX.COMMAND</font></div><div><font size="1" face="monospace, monospace">1494:       READ R.VOC FROM DLMAIN.F.VOC, DLMAIN.XLSX.WORKING.DIRECTORY ELSE</font></div><div><font size="1" face="monospace, monospace">1495:          DLMAIN.ERRMSG<-1> = 'Unable to read ':DLMAIN.XLSX.WORKING.DIRECTORY:' from VOC'</font></div><div><font size="1" face="monospace, monospace">1496:          DLMAIN.FATAL.ERROR = TRUE</font></div><div><font size="1" face="monospace, monospace">1497:          RETURN</font></div><div><font size="1" face="monospace, monospace">1498:       END</font></div><div><font size="1" face="monospace, monospace">1499:       X.INPUT.PATH = R.VOC<2></font></div><div><font size="1" face="monospace, monospace">1500:       X.INPUT.PATH := OP.SYS.PATH.DELIM:<a href="http://DLMAIN.XLSX.WORKING.RECORD.NAME" target="_blank">DLMAIN.XLSX.WORKING.RECORD.NAME</a></font></div><div><font size="1" face="monospace, monospace">1501:       IF INDEX(X.COMMAND,'%input',1) > 0 THEN</font></div><div><font size="1" face="monospace, monospace">1502:          * SWAP '%input' WITH X.INPUT.PATH IN X.COMMAND           ; * CDS 7/15</font></div><div><font size="1" face="monospace, monospace">1503:          X.COMMAND = CHANGE( X.COMMAND,  '%input', X.INPUT.PATH ) ; * CDS 7/15</font></div><div><font size="1" face="monospace, monospace">1504:       END ELSE</font></div><div><font size="1" face="monospace, monospace">1505:          X.COMMAND:= ' ':X.INPUT.PATH</font></div><div><font size="1" face="monospace, monospace">1506:       END</font></div><div><font size="1" face="monospace, monospace">1507:       READ R.VOC FROM DLMAIN.F.VOC, DLMAIN.XLSX.FINAL.DIRECTORY ELSE</font></div><div><font size="1" face="monospace, monospace">1508:          DLMAIN.ERRMSG<-1> = 'Unable to read ':DLMAIN.XLSX.FINAL.DIRECTORY:' from VOC'</font></div><div><font size="1" face="monospace, monospace">1509:          DLMAIN.FATAL.ERROR = TRUE</font></div><div><font size="1" face="monospace, monospace">1510:          RETURN</font></div><div><font size="1" face="monospace, monospace">1511:       END</font></div><div><font size="1" face="monospace, monospace">1512:       X.OUTPUT.PATH = R.VOC<2></font></div><div><font size="1" face="monospace, monospace">1513:       X.OUTPUT.PATH := OP.SYS.PATH.DELIM:<a href="http://DLMAIN.XLSX.FINAL.RECORD.NAME" target="_blank">DLMAIN.XLSX.FINAL.RECORD.NAME</a></font></div><div><font size="1" face="monospace, monospace">1514:       IF INDEX(X.COMMAND,'%output',1) > 0 THEN</font></div><div><font size="1" face="monospace, monospace">1515:          * SWAP '%output' WITH X.OUTPUT.PATH IN X.COMMAND         ; * CDS 7/15</font></div><div><font size="1" face="monospace, monospace">1516:          X.COMMAND= CHANGE( X.COMMAND, '%output', X.OUTPUT.PATH ) ; * CDS 7/15</font></div><div><font size="1" face="monospace, monospace">1517:       END ELSE</font></div><div><font size="1" face="monospace, monospace">1518:          X.COMMAND:= ' ':X.OUTPUT.PATH</font></div><div><font size="1" face="monospace, monospace">1519:       END</font></div><div><font size="1" face="monospace, monospace">1520:       IF DLMAIN.SILENT THEN</font></div><div><font size="1" face="monospace, monospace">1521:          *PCPERFORM X.COMMAND CAPTURING X.OUTPUT                  ; * CDS 7/15</font></div><div><font size="1" face="monospace, monospace">1522:          EXECUTE 'DOS -C/': X.COMMAND CAPTURING X.OUTPUT          ; * CDS 7/15</font></div><div><span style="font-family:monospace,monospace;font-size:x-small">1523:       END ELSE</span><br></div><div><font size="1" face="monospace, monospace">1524:          CRT 'Executing ':X.COMMAND</font></div><div><font size="1" face="monospace, monospace">1525:          *PCPERFORM X.COMMAND                                     ; * CDS 7/15</font></div><div><font size="1" face="monospace, monospace">1526:          EXECUTE \DOS -C/\: X.COMMAND                             ; * CDS 7/15</font></div><div><font size="1" face="monospace, monospace">1527:       END</font></div><div><font size="1" face="monospace, monospace">1528:       IF DLMAIN.XLSX.DELETE.WORKING.RECORD THEN</font></div><div><font size="1" face="monospace, monospace">1529:          OPEN '',DLMAIN.XLSX.WORKING.DIRECTORY TO F.TEMP THEN</font></div><div><font size="1" face="monospace, monospace">1530:             DELETE F.TEMP, <a href="http://DLMAIN.XLSX.WORKING.RECORD.NAME" target="_blank">DLMAIN.XLSX.WORKING.RECORD.NAME</a></font></div><div><font size="1" face="monospace, monospace">1531:          END</font></div><div><font size="1" face="monospace, monospace">1532:       END</font></div><div><font size="1" face="monospace, monospace">1533:       RETURN</font></div></div></div><div><font size="1" face="monospace, monospace"><br></font></div><div><font size="1" face="monospace, monospace"><br></font></div><div><font size="1" face="monospace, monospace">DLSOURCE DLPARSE</font></div><div><font size="1" face="monospace, monospace"><br></font></div><div><font size="1" face="monospace, monospace"><div>5445:       VOC.KEYWORD = VOC.REC<2></div><div>5446:       BEGIN CASE</div><div>5447:          * CASE (VOC.ITEM.TYPE = 'F' OR VOC.ITEM.TYPE = 'DIR') AND <a href="http://PASSED.LOOKUP.FILE.NAME" target="_blank">PASSED.LOOKUP.FILE.NAME</a>  ; * CDS 7/15</div><div>5448:          CASE (VOC.ITEM.TYPE = 'F' OR VOC.ITEM.TYPE = 'Q') AND <a href="http://PASSED.LOOKUP.FILE.NAME" target="_blank">PASSED.LOOKUP.FILE.NAME</a>      ; * CDS 7/15</div><div>5449:             DEBUG4</div><div>5450:             CRT 'Opening ':ITEM</div><div>5451:          END</div><div>5452:          OPEN '', ITEM TO F.TEST THEN</div><div>5453:             DEBUG2</div><div>5454:             CRT 'Open was successful.'</div><div>5455:          END</div><div>5456:          GOSUB OP.SYS.FILE.TYPE</div></font></div><div class="gmail_extra"><br><div class="gmail_quote">On Fri, Jul 10, 2015 at 6:19 AM, Jeff Colvin <span dir="ltr"><<a href="mailto:jcolvin@mipe.com" target="_blank">jcolvin@mipe.com</a>></span> wrote:<br><blockquote class="gmail_quote" style="margin:0px 0px 0px 0.8ex;border-left-width:1px;border-left-color:rgb(204,204,204);border-left-style:solid;padding-left:1ex">










<div bgcolor="white" background="cid:image001.gif@01D0BADC.E97736E0" lang="EN-US" link="#993300" vlink="blue">
<img src="cid:image001.gif@01D0BADC.E97736E0" width="0" height="0" style="width:0px;min-height:0px">

<div>

<p class="MsoNormal">Howdy,<u></u><u></u></p>

<p class="MsoNormal"><u></u> <u></u></p>

<p class="MsoNormal">I downloaded and installed the <b>download_universe_unix</b>
software.  My UniVerse release (VOC RELLEVEL) states:<u></u><u></u></p>

<p class="MsoNormal" style="margin-left:0.5in">001: X<u></u><u></u></p>

<p class="MsoNormal" style="margin-left:0.5in">002: 11.1.4<u></u><u></u></p>

<p class="MsoNormal" style="margin-left:0.5in">003: PICK<u></u><u></u></p>

<p class="MsoNormal" style="margin-left:0.5in">004: PICK.FORMAT<u></u><u></u></p>

<p class="MsoNormal" style="margin-left:0.5in">005: 11.1.4<u></u><u></u></p>

<p class="MsoNormal"><u></u> <u></u></p>

<p class="MsoNormal">The version of Linux is as follows:<u></u><u></u></p>

<p class="MsoNormal" style="margin-left:0.5in">LSB_VERSION=base-4.0-amd64:base-4.0-noarch:core-4.0-amd64:core-4.0-noarch:graphics-4.0-amd64:graphics-4.0-noarch:printing-4.0-amd64:printing-4.0-noarch<u></u><u></u></p>

<p class="MsoNormal" style="margin-left:0.5in">Red Hat Enterprise Linux Server
release 6.6 (Santiago)<u></u><u></u></p>

<p class="MsoNormal"><u></u> <u></u></p>

<p class="MsoNormal">When I ran the BUILDDLVOC installation paragraph it gave me
the following errors when trying to compile the DLSOURCE DL program:<u></u><u></u></p>

<p class="MsoNormal"><u></u> <u></u></p>

<p class="MsoNormal">Code within the internal CONVERT.TO.XLSX subroutine:<u></u><u></u></p>

<p class="MsoNormal">1501 SWAP '%input' WITH X.INPUT.PATH IN X.COMMAND<u></u><u></u></p>

<p class="MsoNormal">          String
Constant unexpected, Was expecting: Array Name, Variable name, Press any key to
continue<u></u><u></u></p>

<p class="MsoNormal">1513 SWAP '%output' WITH X.OUTPUT.PATH IN X.COMMAND<u></u><u></u></p>

<p class="MsoNormal">          String
Constant unexpected, Was expecting: Array Name, Variable name, Press any key to
continue<u></u><u></u></p>

<p class="MsoNormal">1518 PCPERFORM X.COMMAND CAPTURING X.OUTPUT<u></u><u></u></p>

<p class="MsoNormal">          Variable
Name (LOCAL) unexpected, Was expecting: Assignment Operator<u></u><u></u></p>

<p class="MsoNormal">1521 PCPERFORM X.COMMAND<u></u><u></u></p>

<p class="MsoNormal">          Variable
Name (LOCAL) unexpected, Was expecting: Assignment Operator<u></u><u></u></p>

<p class="MsoNormal"><u></u> <u></u></p>

<p class="MsoNormal">I also found out that when copying the <b>DLSOURCE VOCLIST</b>
to a remote account, the PCLOSE, POPEN, and PWRITE VOC items are missing. 
I found out that these there DLSOURCE programs did not compile, because the
IDLKEYS_INS and ERRD.INS.IBAS include files are missing.<u></u><u></u></p>

<p class="MsoNormal"><br><u></u></p></div></div></blockquote></div><br></div></div>
<br>_______________________________________________<br>
download-list mailing list<br>
<a href="mailto:download-list@cedarville.edu">download-list@cedarville.edu</a><br>
<a href="http://mail.cedarville.edu/mailman/listinfo/download-list" rel="noreferrer" target="_blank">http://mail.cedarville.edu/mailman/listinfo/download-list</a><br>
<br></blockquote></div><br></div>