)S SUBCOMMANDS -                                                        00000010
                                                                        00000020
         LOCATE (ALIAS LOC,LO)           DD                             00000030
          FETCH  (ALIAS FET,FE)           PURGE  (ALIAS PUR,CJ)         00000040
           PRINT  (ALIAS PJ)               ROUTE  (ALIAS RJ)            00000050
            FIND                            FALL  (FIND ALL)            00000060
             FT  (FIND TOP)                  TOP                        00000070
              U(-)                            BOTTOM                    00000080
               D(+)                            LIST  (ALIAS L)          00000090
                SAVE                            END                     00000100
           AND OTHERS, NOT DOCUMENTED HERE.                             00000110
                                                                        00000120
           FOR HELP WITH INDIVIDUAL SUB-COMMANDS, ENTER THE             00000130
           QUEUE ENVIRONMENT AND ISSUE :                                00000140
                                                                        00000150
                   HELP 'SUB-COMMAND NAME'                              00000160
                       OR                                               00000170
                   HELP ALL                                             00000180
                                                                        00000190
)F FUNCTION -                                                           00000200
  THE QUEUE COMMAND IS A SUB-COMMAND PROCESSOR WHOSE FUNCTION           00000210
  IS TO PROVIDE AN EASY TO USE, FAST INTERFACE TO JOBS ON THE           00000220
  JOB QUEUE.                                                            00000230
  WITH IT, YOU CAN :                                                    00000240
                                                                        00000250
           CHECK STATUS OF JOBS                                         00000260
                                                                        00000270
           LIST -BOTH- THE INPUT AND THE OUTPUT OF JOBS                 00000280
                                                                        00000290
           RELEASE JOBS FOR PRINTING                                    00000300
                                                                        00000310
           RE-ROUTE AND/OR CANCEL JOBS                                  00000320
                                                                        00000330
)X SYNTAX -                                                             00000340
       QUEUE 'FIRST-COMMAND'                                            00000350
                                                                        00000360
    REQUIRED - NONE.  'FIRST-COMMAND' IS OPTIONAL, AND IF               00000370
               SUPPLIED, IS THE FIRST SUB-COMMAND PERFORMED.            00000380
                                                                        00000390
)O OPERANDS - NONE                                                      00000400
                                                                        00000410
))SUB-COMMANDS                                                          00000420
 -  -  -  -  -  -  -  -  -  -  -  -  -  -  -  -  -  -  -  -  -  -  -  - 00000430
      END                                                               00000440
                                                                        00000450
             TERMINATES QUEUE.                                          00000460
             RETURNS YOUR SESSION TO TSO "READY" MODE.                  00000470
 -  -  -  -  -  -  -  -  -  -  -  -  -  -  -  -  -  -  -  -  -  -  -  - 00000480
      LOCATE 'JOB-NAME-PREFIX'                                          00000490
                                                                        00000500
             JOB NAME PREFIX IS OPTIONAL. IF OMITTED, ALL JOBS          00000510
             UNDER YOUR USERID ARE DISPLAYED.                           00000520
                                                                        00000530
              NOTE - THIS COMMAND WILL NOT CURRENTLY WORK WITH          00000540
                     A JOB NUMBER.  IT WILL SOMEDAY.                    00000550
                                                                        00000560
                     THE JOB NAME PREFIX SPECIFIED MUST CONTAIN         00000570
                     YOUR SIX-CHARACTER USERID IN POSITIONS 1-6,        00000580
                     OR IT WILL BE IGNORED.                             00000590
                                                                        00000600
              EXAMPLES-                                                 00000610
                     LOCATE                                             00000620
                     LOC EPALJMQ                                        00000630
 -  -  -  -  -  -  -  -  -  -  -  -  -  -  -  -  -  -  -  -  -  -  -  - 00000640
      DD 'JES-JOB-NUMBER'                                               00000650
                                                                        00000660
             DISPLAYS THE NAMES AND FILE NUMBERS OF ALL SYSIN AND       00000670
             SYSOUT DATASETS ASSOCIATED WITH THE JOB.  EACH SUCH FILE   00000680
             MAY BE INDIVIDUALLY FETCHED AND LISTED FOR DESIRED         00000690
             LINES.                                                     00000700
                                                                        00000710
              EXAMPLES-                                                 00000720
                     DD 123                                             00000730
 -  -  -  -  -  -  -  -  -  -  -  -  -  -  -  -  -  -  -  -  -  -  -  - 00000740
      PURGE 'JES-JOB-NUMBER'                                            00000750
                                                                        00000760
             PURGES THE GIVEN JOB FROM THE SYSTEM.  JOB WILL DISAPPEAR  00000770
             WITHOUT A TRACE.  THIS IS FINAL.                           00000780
                                                                        00000790
              EXAMPLES-                                                 00000800
                     PURGE 123                                          00000810
                     CJ 2568                                            00000820
 -  -  -  -  -  -  -  -  -  -  -  -  -  -  -  -  -  -  -  -  -  -  -  - 00000830
      PRINT 'JES-JOB-NUMBER'                                            00000840
                                                                        00000850
             RELEASES THE GIVEN JOB FROM PRINT HOLD STATUS.  JOB WILL   00000860
             THEN PRINT AT ITS CURRENT LOCAL/REMOTE DESTINATION.        00000870
                                                                        00000880
              EXAMPLES-                                                 00000890
                     PRINT 123                                          00000900
                     PJ 2568                                            00000910
 -  -  -  -  -  -  -  -  -  -  -  -  -  -  -  -  -  -  -  -  -  -  -  - 00000920
      ROUTE 'JES-JOB-NUMBER' 'REMOTE-DESTINATION' HOLD                  00000930
                                                                        00000940
             RE-ROUTES THE GIVEN JOB TO A NEW DESTINATION.  IF "HOLD"   00000950
             IS NOT SPECIFIED, RELEASES JOB FOR PRINTING AT THE NEW     00000960
             REMOTE DESTINATION. IF NO REMOTE DESTINATION IS            00000970
             SPECIFIED, THE JOB IS ROUTED CENTRAL.                      00000980
                                                                        00000990
              NOTE - THE OPERANDS ARE POSITIONAL. THAT IS, "HOLD" MAY   00001000
                     NOT PRECEDE "RM20" IF BOTH ARE SPECIFIED.          00001010
                                                                        00001020
              EXAMPLES-                                                 00001030
                     ROUTE 123 RM20                                     00001040
                     ROUTE 2568        (JOB 2568 IS ROUTED CENTRAL)     00001050
                     RJ 1173 HOLD     (JOB IS ROUTED CENTRAL AND HELD)  00001060
                     RJ 24 RM13 HOLD                                    00001070
 -  -  -  -  -  -  -  -  -  -  -  -  -  -  -  -  -  -  -  -  -  -  -  - 00001080
      FETCH 'JES-JOB-NUMBER' 'DATA-SET-ID'                              00001090
                                                                        00001100
             ATTACHES YOUR SESSION TO THE INPUT/OUTPUT QUEUE FOR THE    00001110
             GIVEN JOB, SO AS TO PERMIT LISTING THE JOB'S INPUT AND/OR  00001120
             OUTPUT.                                                    00001130
                                                                        00001140
              NOTE - JOBS MAY BE FETCHED FOR LISTING AT ANY TIME        00001150
                     AFTER BEING SUBMITTED.  JOBS FETCHED BEFORE OR     00001160
                     DURING EXECUTION LOOK 'FUNNY', AND MAY BE          00001170
                     CONFUSING TO INTERPRET.                            00001180
                                                                        00001190
                     JOBS FETCHED BEFORE EXECUTION WILL CONTAIN THE     00001200
                     MESSAGE 'JOB DELETED BY HASP BEFORE EXECUTION',    00001210
                     WHICH YOU MUST IGNORE.                             00001220
                                                                        00001230
                     'DATA-SET-ID' IS OPTIONAL.  IF NOT SPECIFIED, THE  00001240
                     DEFAULT IS 'JCL PLUS ANY OUTPUT DATASETS'.  IF     00001250
                     SPECIFIED, YOU MAY ONLY LIST OUTPUT ASSOCIATED     00001260
                     WITH ONE DATA-SET AT A TIME.                       00001270
                                                                        00001280
                     THE 'DD' SUBCOMMAND SHOULD BE USED TO IDENTIFY THE 00001290
                     'DATA-SET-ID' OF EACH POSSIBLE OUTPUT DATA-SET.    00001300
                                                                        00001310
              EXAMPLES-                                                 00001320
                     FETCH 123                                          00001330
                     FET 2568 104                                       00001340
 -  -  -  -  -  -  -  -  -  -  -  -  -  -  -  -  -  -  -  -  -  -  -  - 00001350
      LINE POSITIONING COMMANDS                                         00001360
                                                                        00001370
              NOTE - LINE POSITIONING COMMANDS FUNCTION ONLY AFTER      00001380
                     A PRECEDING FETCH.                                 00001390
                     AFTER EACH POSITIONING COMMAND, THE CURRENT        00001400
                     LINE IS DISPLAYED, WITH ITS LINE NUMBER AT         00001410
                     THE LEFT.                                          00001420
                                                                        00001430
      TOP          - POSITIONS THE LINE POINTER AT THE FIRST LINE OF    00001440
                     AVAILABLE OUTPUT FROM THE CURRENT FETCH.           00001450
                                                                        00001460
      BOTTOM       - POSITIONS THE LINE POINTER AT THE LAST LINE OF     00001470
                     AVAILABLE OUTPUT FROM THE CURRENT FETCH.           00001480
                                                                        00001490
      UP 'NN'      - MOVES THE LINE POINTER UP 'NN' LINES.              00001500
      - 'NN'       - ALIAS FOR 'UP'.                                    00001510
                                                                        00001520
      D 'NN'       - MOVES THE LINE POINTER DOWN 'NN' LINES.            00001530
      + 'NN'       - ALIAS FOR 'D'. (NOTE - 'DO' DOES NOT MEAN DOWN)    00001540
                EXAMPLES -                                              00001550
                     UP 12                                              00001560
                     D 100                                              00001570
                     + 3                                                00001580
                     - 200                                              00001590
                                                                        00001600
      FIND 'STRING' -                                                   00001610
                     SEARCH DOWN FROM THE CURRENT LINE UNTIL THE        00001620
                     TEXT STRING IS LOCATED.                            00001630
                                                                        00001640
      FALL 'STRING' -                                                   00001650
                     SEARCH DOWN FROM THE CURRENT LINE UNTIL ALL        00001660
                     OCCURRENCES OF THE TEXT STRING HAVE BEEN LOCATED.  00001670
                                                                        00001680
      FT 'STRING' -  SEARCH DOWN FROM THE TOP UNTIL THE TEXT STRING HAS 00001690
                     BEEN LOCATED.                                      00001700
                                                                        00001710
      FT 'STRING' ALL -                                                 00001720
                     SEARCH DOWN FROM THE TOP UNTIL ALL OCCURRENCES OF  00001730
                     THE TEXT STRING HAVE BEEN LOCATED.                 00001740
                EXAMPLES -                                              00001750
                     FT 'CODE' ALL                                      00001760
                     FT 'RET RET' ALL                                   00001770
                     FT 'ERRORS' ALL                                    00001780
                                                                        00001790
 -  -  -  -  -  -  -  -  -  -  -  -  -  -  -  -  -  -  -  -  -  -  -  - 00001800
      LIST 'START-LINE' 'LINE-COUNT' UNN                                00001810
                     LIST FROM THE START LINE FOR A COUNT OF            00001820
                     LINE-COUNT.                                        00001830
                     IF 'UNN' IS SPECIFIED, LINE NUMBERS WILL NOT       00001840
                     APPEAR.                                            00001850
                     IF 'LINE-COUNT' IS OMITTED, ONE LINE IS LISTED.    00001860
                     IF 'START-LINE' IS OMITTED, ALL LINES ARE LISTED.  00001870
                     EACH ARGUMENT IS REQUIRED, IN TURN, IF THE ONE     00001880
                     AFTER IT IS TO BE SPECIFIED.  THUS YOU MAY NOT     00001890
                     SAY 'UNN' UNLESS YOU SPECIFY 'LINE-COUNT', AND     00001900
                     YOU MAY NOT SAY 'LINE-COUNT' UNLESS YOU HAVE       00001910
                     SPECIFIED 'START-LINE'.                            00001920
               EXAMPLES -                                               00001930
                     LIST                                               00001940
                     LIST 14                                            00001950
                     L 1257 5   (5 LINES STARTING WITH LINE 1257)       00001960
                     L 1257 1 UNN  (ONLY WAY TO GET LINE 1257 UNN)      00001970
                     L 630 99999 UNN (EVERYTHING FROM LINE 630 ON)      00001980
                                                                        00001990
 -  -  -  -  -  -  -  -  -  -  -  -  -  -  -  -  -  -  -  -  -  -  -  - 00002000
      SAVE 'DATA-SET-NAME'                                              00002010
                     SAVES THE MOST RECENTLY FETCHED JOB OR             00002020
                     PORTION OF JOB IN YOUR LIBRARY.                    00002030
                                                                        00002040
                     DATA-SET-NAME MUST BE 8 OR FEWER CHARACTERS,       00002050
                     MUST BEGIN WITH A LETTER (A-Z), AND MAY NOT        00002060
                     CONTAIN ANY DOTS.                                  00002070
                                                                        00002080
                     A FULL NAME WILL BE CONSTRUCTED FROM IT BY         00002090
                     PRECEDING IT WITH YOUR STANDARD LOGON PREFIX,      00002100
                     AND ADDING A TRAILING '.DATA', TO CREATE THE       00002110
                     FORM                                               00002120
                          CN.EPAIII.AAAA.ANYNAME.DATA                   00002130
                                                                        00002140
               EXAMPLES -                                               00002150
                     FET 123                                            00002160
                     SAVE OUTPUT                                        00002170
                           (CREATES 'OUTPUT.DATA' IN YOUR LIBRARY, AND  00002180
                            PLACES ALL THE PRINT FROM JOB 123 IN IT.)   00002190
                     FET 6381 103                                       00002200
                     SAVE PARTIAL                                       00002210
                           (CREATES 'PARTIAL.DATA' IN YOUR LIBRARY, AND 00002220
                            PLACES THE PRINT FROM JOB 6381, DSID 103,   00002230
                            IN IT.)                                     00002240
 -  -  -  -  -  -  -  -  -  -  -  -  -  -  -  -  -  -  -  -  -  -  -  - 00002250
=FETCH=FET                                                              00002260
)F FUNCTION -                                                           00002270
  FIND AND PROVIDE A LINK TO A USER JOB ON THE JOB QUEUE.               00002280
  ONCE THE LINK IS ESTABLISHED, JOB OUTPUT CAN BE SEARCHED              00002290
  OR LISTED.                                                            00002300
)X SYNTAX -                                                             00002310
            FET 'JOB-NUMBER' 'DSID'                                     00002320
                                                                        00002330
  REQUIRED - 'JOB-NUMBER' - THE 1-4 DIGIT JES JOB NUMBER                00002340
)O OPERANDS -                                                           00002350
))'JOB NUMBER' - THE 1 TO 4 DIGIT JES JOB NUMBER. REQUIRED.             00002360
))'DSID'       - DATA-SET IDENTIFIER.  WHEN SUB-COMMAND 'DD'            00002370
                 HAS BEEN ISSUED, NUMERICAL IDENTIFIERS ARE             00002380
                 ASSIGNED TO EACH SEPARATE INPUT OR OUTPUT              00002390
                 DATA-SET ASSOCIATED WITH THE JOB.  THEY MAY            00002400
                 BE INDIVIDUALLY FETCHED AND LISTED.                    00002410
