VMS batch compile tricks 'n' tips. Have any?

[Olmos, Fernando (Sericon at Alcoa)]

Rick,

Sorry for the delay in reply. Yes it did help. In fact I wrote my own DCL
which does a very good parse of a text file. The text file can have any QKS,
QTS, QZS type programs and in any order and it will sort them out (QKS
first) and compile the lot! I'll share it with the group soon, but right now
I am drowning in a new project.

Cheers

> -----Original Message-----
> From: Rick Hill [mailto:rmhill@core.com]
> Sent: Thursday, August 07, 2003 1:58 AM
> To: Olmos, Fernando (Sericon at Alcoa)
> Subject: Re: VMS batch compile tricks 'n' tips. Have any?
> 
> 
> Fernando - did this help you?
> 
> -- Rick Hill
> 
> > Here's something that should be close to what you need.  
> It's set up 
> to 
> > only do quick screens, but you could expand it to also do QTP and 
> QUIZ 
> > source.  You'll need to define the location for "RC".
> > 
> > -- Rick Hill
> > 
> > 
> $!--------------------------------------------------------------------
> -
> > $!  COMPILE.COM
> > 
> $!--------------------------------------------------------------------
> -
> > $  OPEN/WRITE   COMPILE_JOB  RC:COMPILE_IT.COM
> > $!
> > $  WRITE/SYMBOL COMPILE_JOB "$  SET DEF [place to put executables]"
> > $  DEFINE SYS$OUTPUT RC:COMPILE_RESULTS.LOG
> > $  WRITE/SYMBOL COMPILE_JOB "$  QDESIGN CC=TRANS_ON"
> > $!
> > $  DEFINE/NOLOG DIRFILE_QKS "RC:qks.dirlist"
> > $  DIR/NOHEAD/NOTRAIL/OUT=dirfile_qks RC:*.QKS
> > $  OPEN/READ  DLIST_QKS dirfile_qks
> > $!
> > 
> $!--------------------------------------------------------------------
> -
> > $  WRITE SYS$OUTPUT "PROGRAMS TO BE RE-COMPILED: "
> > $!
> > $ THE_LOOP:
> > 
> $!--------------------------------------------------------------------
> -
> > $ READ/END=THE_END DLIST_QKS DREC
> > $!
> > $ FNAME = F$ELEMENT(1,"]",DREC)
> > $ PNAME = F$ELEMENT(0,".",FNAME)
> > $ WRITE SYS$OUTPUT "  ",PNAME
> > $ AAA   = F$ELEMENT(1,".",FNAME)
> > $ EXT   = F$ELEMENT(0,";",AAA)
> > $ TP := "''F$EXTRACT(4,1,PNAME)'"
> > $!
> > $ WRITE COMPILE_JOB "     USE ''DREC'  NOLIST"
> > $!
> > $ GOTO THE_LOOP
> > $!
> > 
> $!--------------------------------------------------------------------
> -
> > $  THE_END:
> > 
> $!--------------------------------------------------------------------
> -
> > $!
> > $  WRITE COMPILE_JOB "EXIT"
> > $  WRITE/SYMBOL COMPILE_JOB "$  SET DEF RC"
> > $  CLOSE COMPILE_JOB
> > $  CLOSE DLIST_QKS
> > $  DELETE RC:QKS.DIRLIST;*
> > 
> $!--------------------------------------------------------------------
> -
> > $!
> > $  @COMPILE_IT.COM
> > $!
> > 
> $!--------------------------------------------------------------------
> -
> > 
> > 
> > > I used to have a really neat VMS dcl script, which would parse a 
> text 
> > file
> > > full of QTP/QUIZ/QDESIGN files and compile them. It also had the 
> > ability to
> > > compile QUIZs and QTP that use subfiles, for which are not kept 
> (ie: 
> > without
> > > the KEEP verb). Manually I have to do this by starting another 
> > session via
> > > the '$' command.
> > > ie:
> > > 	$QTP
> > > 	use program.qts nol
> > > 	use program-b.qts nol
> > > 	$$quiz
> > > 	use program-with-qtp-subfile.qzs nol
> > > 	etc
> > > 	etc
> > > 
> > > Unfortunately in trying to put this into a DCL batch job, it 
> crashes 
> > at the
> > > $$QUIZ stage because it is trying to interpret the command from 
> > within the
> > > same session.
> > > 
> > > Does anyone have such a dcl around?
> > > 
> > > Thanks
> > > = = = = = = = = = = = = = = = = = = = = = = = = = = = =
> > > Mailing list: powerh-l@lists.swau.edu
> > > Subscribe: "subscribe" in message body to powerh-l-
> > request@lists.swau.edu
> > > Unsubscribe: "unsubscribe <password>" in message body to powerh-l-
> > request@lists.swau.edu
> > > http://lists.swau.edu/mailman/listinfo/powerh-l
> > > This list is closed, thus to post to the list you must be a 
> > subscriber.
> > > 
> > 
> > -- 
> > CoreComm Webmail. 
> > http://home.core.com
> > 
> > 
> > 
> 
> -- 
> CoreComm Webmail. 
> http://home.core.com
>