[Download-List] DOWNLOAD Version 8 Compile and Run Issues

Wjhonson wjhonson at aol.com
Fri Jul 24 17:00:14 EDT 2015


Go into a Universe session
Go to the TCL prompt
type HELP DOS at that prompt

the /c makes it return to your session, instead of sitting at the DOS prompt when your command finishes


 

 

 

-----Original Message-----
From: Rotman, David <rotmand at cedarville.edu>
To: Cedarville DOWNLOAD Users <download-list at cedarville.edu>
Sent: Fri, Jul 24, 2015 1:57 pm
Subject: Re: [Download-List] DOWNLOAD Version 8 Compile and Run Issues


 
I have some syntax questions for those of you who are more familiar with Universe:  
   
  
  
1.  This set of lines seems to execute correctly in Universe on Windows, but I cannot find any documentation on the '/c'.  Is this the correct format?  Are there other options to the DOS command?  
  
            X.COMMAND =  'DOS /C perl c:\temp\myprogram.pl'  
  
            EXECUTE X.COMMAND  
  
   
  
  
2.  What changes would be needed to run the lines in Universe on Linux?  (I gather that an 'sh' is needed...upper case?  lower case?  any other arguments?)  
  
   
  
  
3.  What kinds of errors are generated by DLPARSE when encountering Q-pointers?  
  
   
  
  
   
  
  
   
  
  
   
  
 
 
  
  
   
David Rotman, Ph.D.    
Associate Vice President for Technology    
Chief Information Officer    
Cedarville University    
251 N. Main Street    
Cedarville, OH 45314    
    rotmand at cedarville.edu    
voice 937-766-7905    
fax 937-766-8819    
          
    
   
  
   
  
On Sun, Jul 12, 2015 at 3:05 PM, Charles Stevenson    <stevenson.chas at gmail.com> wrote:   
   
    
     
Jeff,     
Lst weekend I did the same with the uv windows version, with the same result.     
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.     
     
      
     
     
I haven't done much troubleshooting & debugging yet,  but I so far I've done this much:     
     
      
     
     
1. SWAP     
     
      
     
     
Replaced the UD SWAP syntax with UV's  CHANGE function.       
     
EREPLACE is a synonym to CHANGE.       
     
caution: CONVERT is different.  Don't use CONVERT in this instance.     
     
      
     
     
Lines with my "CDS" initials are what I changed:     
     
      
     
     
      
               
         
        
      
     
     
2. PCPERFORM      
     
needs to be be fixed using using EXECUTE 'SH . . .'  or EXECUTE 'DOS . . .'  on linux & windows, respectively.     
     
      
     
     
3. DLPARSE can't handle "Q"-pointers in at least one place.  I'm thinking maybe more.      
     
     
      
     
     
4. Missing  PCLOSE, POPEN, PWRITE.     
     
Calls to those compile,  but I think there are only called if you're running under PRIMOS operating system  or INFORMATION dbms.     
     
So I think it is safe to ignore.     
     
      
     
     
      
     
     
      
     
     
      
     
     
      
Lines with my "CDS" initials are what I changed:      
     
     
      
     
     
      
       
                 
DLSOURCE DL:         
         
          
         
         
          
0005: * TITLE ----- DOWNLOAD           
          
          
           
          
          
0025: * Stamped: p21 rotmand, /usr/local/download, user #1976, 22 Nov 13, 07:48AM.0026: * Version 8.00          
          
0027: *          
          
0028: * Stamped: CDS C Stevenson C:\uvdb\apps\dlsource.  6 Jul 15.          
         
         
          
         
       
       
        1489: CONVERT.TO.XLSX:   <-- this appears to be new code       
       
        1490:       DEBUG1OR2       
       
        1491:       CRT 'INSIDE CONVERT.TO.XLSX'       
       
        1492:       END       
       
        1493:       X.COMMAND = DLMAIN.XLSX.COMMAND       
       
        1494:       READ R.VOC FROM DLMAIN.F.VOC, DLMAIN.XLSX.WORKING.DIRECTORY ELSE       
       
        1495:          DLMAIN.ERRMSG<-1> = 'Unable to read ':DLMAIN.XLSX.WORKING.DIRECTORY:' from VOC'       
       
        1496:          DLMAIN.FATAL.ERROR = TRUE       
       
        1497:          RETURN       
       
        1498:       END       
       
        1499:       X.INPUT.PATH = R.VOC<2>       
       
        1500:       X.INPUT.PATH := OP.SYS.PATH.DELIM:DLMAIN.XLSX.WORKING.RECORD.NAME       
       
        1501:       IF INDEX(X.COMMAND,'%input',1) > 0 THEN       
       
        1502:          * SWAP '%input' WITH X.INPUT.PATH IN X.COMMAND           ; * CDS 7/15       
       
        1503:          X.COMMAND = CHANGE( X.COMMAND,  '%input', X.INPUT.PATH ) ; * CDS 7/15       
       
        1504:       END ELSE       
       
        1505:          X.COMMAND:= ' ':X.INPUT.PATH       
       
        1506:       END       
       
        1507:       READ R.VOC FROM DLMAIN.F.VOC, DLMAIN.XLSX.FINAL.DIRECTORY ELSE       
       
        1508:          DLMAIN.ERRMSG<-1> = 'Unable to read ':DLMAIN.XLSX.FINAL.DIRECTORY:' from VOC'       
       
        1509:          DLMAIN.FATAL.ERROR = TRUE       
       
        1510:          RETURN       
       
        1511:       END       
       
        1512:       X.OUTPUT.PATH = R.VOC<2>       
       
        1513:       X.OUTPUT.PATH := OP.SYS.PATH.DELIM:DLMAIN.XLSX.FINAL.RECORD.NAME       
       
        1514:       IF INDEX(X.COMMAND,'%output',1) > 0 THEN       
       
        1515:          * SWAP '%output' WITH X.OUTPUT.PATH IN X.COMMAND         ; * CDS 7/15       
       
        1516:          X.COMMAND= CHANGE( X.COMMAND, '%output', X.OUTPUT.PATH ) ; * CDS 7/15       
       
        1517:       END ELSE       
       
        1518:          X.COMMAND:= ' ':X.OUTPUT.PATH       
       
        1519:       END       
       
        1520:       IF DLMAIN.SILENT THEN       
       
        1521:          *PCPERFORM X.COMMAND CAPTURING X.OUTPUT                  ; * CDS 7/15       
       
        1522:          EXECUTE 'DOS -C/': X.COMMAND CAPTURING X.OUTPUT          ; * CDS 7/15       
       
        1523:       END ELSE        
       
       
        1524:          CRT 'Executing ':X.COMMAND       
       
        1525:          *PCPERFORM X.COMMAND                                     ; * CDS 7/15       
       
        1526:          EXECUTE \DOS -C/\: X.COMMAND                             ; * CDS 7/15       
       
        1527:       END       
       
        1528:       IF DLMAIN.XLSX.DELETE.WORKING.RECORD THEN       
       
        1529:          OPEN '',DLMAIN.XLSX.WORKING.DIRECTORY TO F.TEMP THEN       
       
        1530:             DELETE F.TEMP, DLMAIN.XLSX.WORKING.RECORD.NAME       
       
        1531:          END       
       
        1532:       END       
       
        1533:       RETURN       
      
     
     
      
     
     
      
     
     
      DLSOURCE DLPARSE     
     
      
     
     
             
5445:       VOC.KEYWORD = VOC.REC<2>       
       
5446:       BEGIN CASE       
       
5447:          * CASE (VOC.ITEM.TYPE = 'F' OR VOC.ITEM.TYPE = 'DIR') AND         PASSED.LOOKUP.FILE.NAME  ; * CDS 7/15       
       
5448:          CASE (VOC.ITEM.TYPE = 'F' OR VOC.ITEM.TYPE = 'Q') AND         PASSED.LOOKUP.FILE.NAME      ; * CDS 7/15       
       
5449:             DEBUG4       
       
5450:             CRT 'Opening ':ITEM       
       
5451:          END       
       
5452:          OPEN '', ITEM TO F.TEST THEN       
       
5453:             DEBUG2       
       
5454:             CRT 'Open was successful.'       
       
5455:          END       
       
5456:          GOSUB OP.SYS.FILE.TYPE       
     
     
      
      
On Fri, Jul 10, 2015 at 6:19 AM, Jeff Colvin        <jcolvin at mipe.com> wrote:       
       
         
                    
           
Howdy,
           
 
           
I downloaded and installed the download_universe_unix software.  My UniVerse release (VOC RELLEVEL) states:
           
001: X
           
002: 11.1.4
           
003: PICK
           
004: PICK.FORMAT
           
005: 11.1.4
           
 
           
The version of Linux is as follows:
           
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
           
Red Hat Enterprise Linux Server release 6.6 (Santiago)
           
 
           
When I ran the BUILDDLVOC installation paragraph it gave me the following errors when trying to compile the DLSOURCE DL program:
           
 
           
Code within the internal CONVERT.TO.XLSX subroutine:
           
1501 SWAP '%input' WITH X.INPUT.PATH IN X.COMMAND
           
          String Constant unexpected, Was expecting: Array Name, Variable name, Press any key to continue
           
1513 SWAP '%output' WITH X.OUTPUT.PATH IN X.COMMAND
           
          String Constant unexpected, Was expecting: Array Name, Variable name, Press any key to continue
           
1518 PCPERFORM X.COMMAND CAPTURING X.OUTPUT
           
          Variable Name (LOCAL) unexpected, Was expecting: Assignment Operator
           
1521 PCPERFORM X.COMMAND
           
          Variable Name (LOCAL) unexpected, Was expecting: Assignment Operator
           
 
           
I also found out that when copying the DLSOURCE VOCLIST 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.
           


         
        
       
      
      
     
    
     
_______________________________________________    
 download-list mailing list    
     download-list at cedarville.edu    
     http://mail.cedarville.edu/mailman/listinfo/download-list    
     
   
  
  
 
 

_______________________________________________
download-list mailing
list
download-list at cedarville.edu
http://mail.cedarville.edu/mailman/listinfo/download-list

 
-------------- next part --------------
An HTML attachment was scrubbed...
URL: <http://mail.cedarville.edu/pipermail/download-list/attachments/20150724/c0b4766e/attachment.html>
-------------- next part --------------
A non-text attachment was scrubbed...
Name: image001.gif
Type: image/gif
Size: 530 bytes
Desc: not available
URL: <http://mail.cedarville.edu/pipermail/download-list/attachments/20150724/c0b4766e/attachment.gif>


More information about the download-list mailing list