Joe,
In the "else" section you have 2 comments and the second one has a
continuation "&" at the end of it so the store command on the following line
is interpreted as part of the comment.
Thanx,
Jon
-----Original Message-----
From: HP-3000 Systems Discussion [mailto:[log in to unmask]]On
Behalf Of Joe Amuquandoh
Sent: Monday, November 19, 2001 12:36 PM
To: [log in to unmask]
Subject: [HP3000-L] STORE command not executing...
Hello,
We have a job that, among other things does a backup.
There is an If statement that test " IF HPDAY="#" then do a STORE of
specified accounts
ELSE do a STORE of all acounts, excluding specified accounts."
For some reason, the STORE command in the ELSE statement does not get
executed when the IF
statement is 'FALSE' even though execution of the commands resumes after the
ELSE statement.
I have checked and tested the syntax out in another job and it works fine.
Below is a section of the STDLIST that I am having problem with.
Can someone please help!!!.
Thanks a lot.
:FILE DTAPE1;DEV=8
0004500
0
:FILE DTAPE2;DEV=9
0004600
0
:IF "!HPDAY"="2" OR "!HPDAY"="3" OR "!HPDAY"="4" OR "!HPDAY"="5" THEN
0004601
0
*** EXPRESSION FALSE: COMMANDS IGNORED UNTIL MATCHING ELSEIF/ELSE
/ENDIF
:STORE @[log in to unmask]@,@[log in to unmask],@[log in to unmask];; &
0004602
0
: STORESET=(*DTAPE1),(*DTAPE2); &
0004603
0
: DIRECTORY;ONVS=MPEXL_SYSTEM_VOLUME_SET,SDCDB_SET; &
0004604
0
: PROGRESS;COMPRESS=LOW;MAXTAPEBUF
0004605
0
:COMMENT ******************************************************
0004606
0
:COMMENT *
0004607
0
:COMMENT * DAILY DATA BACKUP COMPLETED SUCCESSFULLY! *
0004608
0
:COMMENT *
0004609
0
(185/3688) Continue?
:COMMENT ******************************************************
0004610
0
:ELSE
0004620
0
*** RESUME EXECUTION OF COMMANDS
:comment 09/28/01 Excluded all the test accounts *JA*
0004630
0
:comment STORE @[log in to unmask]@[log in to unmask]@.SG2TEST;;STORESET=(*DTAPE1),(*DTAPE2);&
0004700
0
:STORE @[log in to unmask]@[log in to unmask]@.@TEST@;;STORESET=(*DTAPE1),(*DTAPE2);&
0004710
0
: DIRECTORY;ONVS=MPEXL_SYSTEM_VOLUME_SET,SDCDB_SET;&
0004800
0
: PROGRESS;COMPRESS=LOW;MAXTAPEBUF
0004900
0
:TELLOP ******************************************************
0005000
0
:TELLOP *
00051000
:TELLOP * FULL SYSTEM BACKUP COMPLETED SUCCESSFULLY! *
0005200
0
:TELLOP *
00053000
:TELLOP ******************************************************
0005400
0
:ENDIF
0005410
0
:COMMENT ***** FUTURE ORDER AND CHECK RELEASE *****
0005500
0
:COMMENT
0005600
0
:SHOWTIME
0005700
0
SAT, NOV 17, 2001, 9:17 PM
:FILE FUTPARMS;ACC=APPEND;REC=-80,10,F,ASCII;DISC=50
0005800
0
:SETVAR MONTHDAYS 31
0005900
0
:IF !HPMONTH = 4 OR !HPMONTH = 6 OR !HPMONTH = 9 OR !HPMONTH = 11
0006000
0
*** EXPRESSION TRUE
: SETVAR MONTHDAYS 30
0006100
0
(208/3688) Continue?
:ENDIF
0006200
0
* To join/leave the list, search archives, change list settings, *
* etc., please visit http://raven.utc.edu/archives/hp3000-l.html *
* To join/leave the list, search archives, change list settings, *
* etc., please visit http://raven.utc.edu/archives/hp3000-l.html *
|
