I would appreciate anyone who can tell me why this jobstream is
failing (on ENDWHILE).

I do not understand why the job is not encountering the ENDWHILE.  I
even placed a CONTINUE before it but it did not help.

Any hints would be appreciated.

Thanks,
 Jim..


 : SETVAR OKFLAG 1
 : WHILE NOT FINFO("STOPBF",0) OR OKFLAG <> 1 DO
 *** EXPRESSION TRUE
 :   CHGROUP BFIN
 :   PURGE FTPCMDS,TEMP
          ^
 File "FTPCMDS.BFIN.MANMAN" not found.  No purge done. (CIWARN 383)
 :   ECHO EXITONERROR                         >> FTPCMDS
 :   ECHO OPEN 194.6.6.168                    >> FTPCMDS
 :   ECHO USER FTPBF PRAXX                    >> FTPCMDS
 :   ECHO CD \BFIN                            >> FTPCMDS
 :   ECHO ASCII                               >> FTPCMDS
 :   ECHO MGET *                              >> FTPCMDS
 :   ECHO MDELETE *                           >> FTPCMDS
 :   ECHO QUIT                                >> FTPCMDS
 :   RUN FTP.ARPA.SYS;STDIN=FTPCMDS


 File Transfer Protocol [A0008S33] (C) Hewlett-Packard Co. 1990
 ftp> EXITONERROR
 ExitOnError mode on.  (FTPINFO 33)
 ftp> OPEN 194.6.6.168
 220 hound_dog Microsoft FTP Service (Version 4.0).
 Connected to 194.6.6.168.  (FTPINFO 40)
 ftp> USER FTPBF PRAXX
 331 Password required for FTPBF.
 230 User FTPBF logged in.
 Remote system type is Windows_NT.
 ftp> CD \BFIN
 250 CWD command successful.
 ftp> ASCII
 200 Type set to A.
 ftp> MGET *
 200 PORT command successful.
 150 Opening ASCII mode data connection for file list.
 226 Transfer complete.
 30 bytes received in 0.01 seconds (4.88 Kbytes/sec)
 200 PORT command successful.
 150 Opening ASCII mode data connection for A0000005(82 bytes).
 226 Transfer complete.
 82 bytes received in 0.00 seconds (26.69 Kbytes/sec)
 200 PORT command successful.
 150 Opening ASCII mode data connection for A0000006(82 bytes).
 226 Transfer complete.
 82 bytes received in 0.00 seconds (20.02 Kbytes/sec)
 200 PORT command successful.
 150 Opening ASCII mode data connection for A0000007(82 bytes).
 226 Transfer complete.
 82 bytes received in 0.00 seconds (20.02 Kbytes/sec)
 ftp> MDELETE *
 200 PORT command successful.
 150 Opening ASCII mode data connection for file list.
 226 Transfer complete.
 30 bytes received in 0.00 seconds (5.86 Kbytes/sec)
 250 DELE command successful.
 250 DELE command successful.
 250 DELE command successful.
 ftp> QUIT
 221


 END OF PROGRAM
 :   IF !FTPLASTERR <> 0 THEN
 *** EXPRESSION FALSE: COMMANDS IGNORED UNTIL MATCHING ELSEIF/ELSE
 /ENDIF
 :     SHOWVAR FTP@
 :     IF !FTPLASTERR = 9 OR !FTPLASTERR = 59 THEN
 :       TELL #S638 ** FTP IS DOWN **
 :       EXIT
 :     ENDIF
 :     IF FINFO("STOPBF",0) THEN
 :       TELL #S638 ** JOB STREAM IS FINISHED **
 :       TELL #S638 ** FOUND A STOP FILE **
 :       EXIT
 :     ENDIF
 :   ENDIF
 *** RESUME EXECUTION OF COMMANDS
 :   IF !FTPLASTERR = 0 THEN
 *** EXPRESSION TRUE
 :       TELL #S638 ** WOULD HAVE RUN T900! **
 :COMMENT       PURGE @.BFIN
 :       CONTINUE
 :       PAUSE 3
 :   ENDIF
 :COMMENT
 :COMMENT
 :   IF OKFLAG = 1 THEN
 *** EXPRESSION TRUE
 :    CHGROUP BFOUT
 :    PURGE FTPCMDS,TEMP
           ^
 File "FTPCMDS.BFOUT.MANMAN" not found.  No purge done. (CIWARN 383)
 :    ECHO EXITONERROR                         >> FTPCMDS
 :    ECHO OPEN 194.6.6.168                    >> FTPCMDS
 :    ECHO USER FTPBF PRAXX                    >> FTPCMDS
 :    ECHO CD \BFOUT                           >> FTPCMDS
 :    ECHO ASCII                               >> FTPCMDS
 :    ECHO MDELETE *                           >> FTPCMDS
 :    ECHO MPUT *                              >> FTPCMDS
 :    ECHO QUIT                                >> FTPCMDS
 :    RUN FTP.ARPA.SYS;STDIN=FTPCMDS


 File Transfer Protocol [A0008S33] (C) Hewlett-Packard Co. 1990
 ftp> EXITONERROR
 ExitOnError mode on.  (FTPINFO 33)
 ftp> OPEN 194.6.6.168
 220 hound_dog Microsoft FTP Service (Version 4.0).
 Connected to 192.6.1.160.  (FTPINFO 40)
 ftp> USER FTPBF PRAXX
 331 Password required for FTPBF.
 230 User FTPBF logged in.
 Remote system type is Windows_NT.
 ftp> CD \BFOUT
 250 CWD command successful.
 ftp> ASCII
 200 Type set to A.
 ftp> MDELETE *
 200 PORT command successful.
 150 Opening ASCII mode data connection for file list.
 226 Transfer complete.
 0 bytes received in 0.00 seconds (NaN Kbytes/sec)
 ftp> MPUT *
 200 PORT command successful.
 150 Opening ASCII mode data connection for A0000005.
 226 Transfer complete.
 82 bytes sent in 0.00 seconds (80.08 Kbytes/sec)
 ftp> QUIT
 221


 END OF PROGRAM
 :    IF !FTPLASTERR <> 0 THEN
 *** EXPRESSION FALSE: COMMANDS IGNORED UNTIL MATCHING ELSEIF/ELSE
 /ENDIF
 :      SHOWVAR FTP@
 :      IF !FTPLASTERR = 9 OR !FTPLASTERR = 59 THEN
 :        TELL #S638 ** FTP IS DOWN **
 :        EXIT
 :      ENDIF
 :      IF FINFO("STOPBF",0) THEN
 :        TELL #S638 ** JOB STREAM IS FINISHED **
 :        TELL #S638 ** FOUND A STOP FILE **
 :        EXIT
 :      ENDIF
 :    ENDIF
 *** RESUME EXECUTION OF COMMANDS
 :   IF !FTPLASTERR = 0 THEN
 *** EXPRESSION TRUE
 :       TELL #S638 ** DELETEING FILES! **
 :       CONTINUE
 :       PURGE @.BFOUT
 1 files matched
 1 selected. 1 succeeded. 0 failed.
 :       CONTINUE
 :   ENDIF
 :  PAUSE 10
 :  CONTINUE
 : ENDWHILE
 This ENDWHILE command does not have a corresponding WHILE.
 The ENDWHILE is ignored. (CIWARN 10303)
 :COMMENT
 :COMMENT
 : IF OKFLAG <> 1 THEN
 *** EXPRESSION FALSE: COMMANDS IGNORED UNTIL MATCHING ELSEIF/ELSE
 /ENDIF
 :  TELL #S638 ** OKFLAG WAS SET TO FALSE BY TR900
 : ENDIF
 *** RESUME EXECUTION OF COMMANDS
 : IF FINFO ("STOPBF",0) THEN
 *** EXPRESSION FALSE: COMMANDS IGNORED UNTIL MATCHING ELSEIF/ELSE
 /ENDIF
 :  TELL #S638 ** FOUND A STOP FILE, EXITING JOB STREAM
 : ENDIF
 *** RESUME EXECUTION OF COMMANDS
 :EOJ
 CPU sec. = 4.  elapsed min. = 1.  THU, APR 27, 2000,  2:59 PM.