HP3000-L Archives

September 1997, Week 4

HP3000-L@RAVEN.UTC.EDU
Options: Use Monospaced Font
Show Text Part by Default
Show All Mail Headers

Message: [<< First] [< Prev] [Next >] [Last >>]
Topic: [<< First] [< Prev] [Next >] [Last >>]
Author: [<< First] [< Prev] [Next >] [Last >>]

Print Reply
Subject:
Re: Help re UDC
From:
Costas Anastassiades <[log in to unmask]>
Reply To:
Costas Anastassiades <[log in to unmask]>
Date:
Tue, 23 Sep 1997 17:05:14 +-300
Content-Type:
text/plain
Parts/Attachments:
text/plain (32 lines) 
-The trick with CONTINUE is to have it before the command actually produces an error ;)
-There is really no need to have the RUN command twice. It is always the same and will execute regardless of the outcome of the LISTF

Costas Anastassiades
Athens-Greece

----------
From:   Adrian Hart[SMTP:[log in to unmask]]
Sent:   Τρίτη, 23 Σεπτεμβρίου 1997 5:39 μμ
To:     [log in to unmask]
Subject:        Help re UDC

< snip >
LISTF COLSPC3.MENU
CONTINUE
if cierror = 907 then
   FILE SPEC          = COLSPEC/XXXX.MENU
   FILE CATALOG  = COLCATC/XXXX.MENU
   FILE SPECSTD   = COLSSTD/XXXX.MENU
   FILE PROFILE    = COLPROFP/XXXX.MENU;SHR
   RUN SPW4GL.SPW70104.SPEEDWRE; &
           INFO="-TREFLECTION -SSTANDARD66 -DSTANDARD66 -Zp256"
 else
   FILE SPEC          = COLSPC3/XXXX.MENU
   FILE CATALOG  = COLCAT3/XXXX.MENU
   FILE SPECSTD   = COLSSTD/XXXX.MENU
   FILE PROFILE    = COLPROF3/XXXX.MENU;SHR
   RUN SPW4GL.SPW70104.SPEEDWRE; &
           INFO="-TREFLECTION -SSTANDARD66 -DSTANDARD66 -Zp256"
endif
< snip >

ATOM RSS1 RSS2