28 Modifications

Seq #  *Modification Id* Act 
----------------------------+
00001  M01S00001.enquire +++|          IDENT  ENQUIRE,STR,ENQUIRE
00002  M01S00002.enquire +++|          ABS
00003  M01S00003.enquire +++|          SST
00004  M01S00004.enquire +++|          SYSCOM B1
00005  M01S00005.enquire +++|          ENTRY  ENQUIRE
00006  M01S00006.enquire +++|          ENTRY  LENGTH
00007  M01S00007.enquire +++|          ENTRY  STATUS

Seq #  *Modification Id* Act 
----------------------------+
00008  M02S00008.enqui12 ---|          ENTRY  SUMMARY
00009  M01S00009.enquire +++|          ENTRY  RFL=
00010  M01S00010.enquire +++|          ENTRY  SSJ=
00011  M01S00011.enquire +++|          ENTRY  SSM=
00012  M01S00012.enquire +++|          TITLE  ENQUIRE - ENQUIRE PROCESSOR.
00013  M01S00013.enquire +++|          SPACE  4,10
00014  M01S00014.enquire +++|*COMMENT  ENQUIRE - ENQUIRE ABOUT JOB STATUS.

Seq #  *Modification Id* Act 
----------------------------+
00015  M02S00015.ns22000 ---|*         COMMENT COPYRIGHT CONTROL DATA CORP. 1974.

Seq #  *Modification Id* Act 
----------------------------+
00016  M02S00001.281l803 ---|          COMMENT  COPYRIGHT CONTROL DATA CORP. 1982.
00017  M01S00001.281l803 +++|          COMMENT  COPYRIGHT CONTROL DATA SYSTEMS INC.  1992.
00018  M01S00016.enquire +++|          SPACE  4,10
00019  M01S00017.enquire +++|****      ENQUIRE - PROVIDE JOB STATUS.
00020  M01S00018.enquire +++|*         L. CLINTON         74/01/23.
00021  M01S00019.enquire +++|*         D. D. SADLER       75/02/18.
00022  M01S00020.enquire +++|          SPACE  4,10

Seq #  *Modification Id* Act 
----------------------------+
00023  M02S00021.v23l617 ---|***       CONTROL STATEMENT CALLS.
00024  M01S00001.v23l617 +++|***       COMMAND FORMATS.
00025  M01S00022.enquire +++|*
00026  M01S00023.enquire +++|*         ENQUIRE(O=LFN1,FN=LFN2,OP=X)
00027  M01S00024.enquire +++|*         ENQUIRE(JSN=AAAA,O=LFN1)
00028  M01S00025.enquire +++|*         ENQUIRE(JSN,O=LFN1)
00029  M01S00026.enquire +++|*         ENQUIRE(UJN=BBBBBBB,O=LFN1)
00030  M01S00027.enquire +++|*         ENQUIRE(UJN,O=LFN1)
00031  M01S00028.enquire +++|*         ENQUIRE.  -  SAME AS ENQUIRE(OP=A).
00032  M01S00029.enquire +++|*
00033  M01S00030.enquire +++|*         LENGTH(LFN2)  -  SAME AS ENQUIRE(FN=LFN2).
00034  M01S00031.enquire +++|*
00035  M01S00032.enquire +++|*         STATUS(...)  -  SAME AS ENQUIRE(...).
00036  M01S00033.enquire +++|*         STATUS.  -  SAME AS ENQUIRE.

Seq #  *Modification Id* Act 
----------------------------+
00037  M02S00034.enqui12 ---|*

Seq #  *Modification Id* Act 
----------------------------+
00038  M02S00035.enqui12 ---|*         SUMMARY(O=LFN1,FN=LFN2,OP=X).

Seq #  *Modification Id* Act 
----------------------------+
00039  M02S00036.enqui12 ---|*         SUMMARY.  -  SAME AS ENQUIRE(OP=R).
00040  M01S00037.enquire +++|*
00041  M01S00038.enquire +++|*         PARAMETERS ARE ORDER-INDEPENDENT, AND ABSENCE OF
00042  M01S00039.enquire +++|*         A KEYWORD IMPLIES *OP*.
00043  M01S00040.enquire +++|*
00044  M01S00041.enquire +++|*         LFN1 = OUTPUT FILE NAME. DEFAULT IS *OUTPUT*.
00045  M01S00042.enquire +++|*
00046  M01S00043.enquire +++|*         LFN2 = USER-S FILE NAME TO SEARCH FOR.
00047  M01S00044.enquire +++|*
00048  M01S00045.enquire +++|*         AAAA = JOB SEQUENCE NUMBER (JSN) TO SEARCH FOR.
00049  M01S00046.enquire +++|*
00050  M01S00047.enquire +++|*         BBBBBBB = USER JOB NAME (UJN) TO SEARCH FOR.
00051  M01S00048.enquire +++|*
00052  M01S00049.enquire +++|*         FOR THE *FN*, *JSN*, AND *UJN* PARAMETERS, WHEN THE
00053  M01S00050.enquire +++|*         SPECIFIED FILE OR JOB IS NOT FOUND, AN INFORMATIVE
00054  M01S00051.enquire +++|*         MESSAGE IS WRITTEN TO THE OUTPUT FILE IF IT IS
00055  M01S00052.enquire +++|*         ASSIGNED TO A TERMINAL.  OTHERWISE THE MESSAGE IS
00056  M01S00053.enquire +++|*         WRITTEN TO THE USER-S DAYFILE.
00057  M01S00054.enquire +++|*
00058  M01S00055.enquire +++|*         X = STRING OF CONCATENATED OPTION LETTERS SPECIFYING OPTIONS
00059  M01S00056.enquire +++|*             TO BE EXECUTED.  THE MAXIMUM NUMBER OF LETTERS IN THE
00060  M01S00057.enquire +++|*             STRING IS 7.  ENQUIRY INFORMATION IS RETURNED TO THE
00061  M01S00058.enquire +++|*             OUTPUT FILE.
00062  M01S00059.enquire +++|*
00063  M01S00060.enquire +++|*         THE POSSIBLE OPTION LETTERS ARE-
00064  M01S00061.enquire +++|*         A = SELECTION OF ALL OPTIONS.
00065  M01S00062.enquire +++|*         B = ENQUIRY INFORMATION GIVES USER IDENTIFICATION
00066  M01S00063.enquire +++|*             AND HIS PRIORITIES.
00067  M01S00064.enquire +++|*         D = ENQUIRY INFORMATION GIVES RESOURCE DEMAND AND
00068  M01S00065.enquire +++|*             ASSIGNED COUNTS.
00069  M01S00066.enquire +++|*         F = ENQUIRY INFORMATION IS IN SAME FORMAT AS THAT GIVEN
00070  M01S00067.enquire +++|*             BY *FN* PARAMETER, BUT FOR ALL USER-S WORKING FILES.
00071  M01S00068.enquire +++|*             NOTE - LENGTH VALUE DISPLAYED FOR EACH FILE
00072  M01S00069.enquire +++|*             IS RELEVANT ONLY FOR MASS STORAGE FILES.
00073  M01S00070.enquire +++|*         J = ENQUIRY INFORMATION GIVES CONTENTS OF USER-S
00074  M01S00071.enquire +++|*             CONTROL REGISTERS AND ERROR FLAG REGISTER.
00075  M01S00072.enquire +++|*         L = ENQUIRY INFORMATION GIVES LOADER INFORMATION,
00076  M01S00073.enquire +++|*             AND CONSISTS OF USER-S MAP OPTIONS AND GLOBAL
00077  M01S00074.enquire +++|*             LIBRARY SET.
00078  M01S00075.enquire +++|*         R = ENQUIRY INFORMATION GIVES AMOUNT OF RESOURCES
00079  M01S00076.enquire +++|*             USER HAS USED.
00080  M01S00077.enquire +++|*         S = ENQUIRY INFORMATION GIVES USER-S CURRENT SRU VALUE.
00081  M01S00078.enquire +++|*         T = ENQUIRY INFORMATION GIVES USER-S CURRENT CP TIME VALUE.
00082  M01S00079.enquire +++|*         U = ENQUIRY INFORMATION GIVES RESOURCE USAGE ALLOWED
00083  M01S00080.enquire +++|*             USER, AND CONSISTS OF NUMBER OF DAYFILE MESSAGES,
00084  M01S00081.enquire +++|*             JOB STEP TIME AND SRU LIMITS, ACCOUNT BLOCK SRU LIMIT,

Seq #  *Modification Id* Act 
----------------------------+
00085  M02S00082.v23l617 ---|*             CONTROL STATEMENTS, DISPOSED FILES, AND MASS STORAGE
00086  M01S00002.v23l617 +++|*             COMMANDS, DISPOSED FILES, AND MASS STORAGE
00087  M01S00083.enquire +++|*             SPACE ALLOWED.
00088  M01S00084.enquire +++|          SPACE  4,10
00089  M01S00085.enquire +++|***       DAYFILE MESSAGES.
00090  M01S00086.enquire +++|*
00091  M01S00087.enquire +++|*         * ARGUMENT ERRORS.* = *ENQUIRE* CALL WAS NOT VALID.
00092  M01S00088.enquire +++|*

Seq #  *Modification Id* Act 
----------------------------+
00093  M02S00089.enqui12 ---|*         * DROPPING SUPPORT OF SUMMARY, USE ENQUIRE.* = *SUMMARY*

Seq #  *Modification Id* Act 
----------------------------+
00094  M02S00090.enqui12 ---|*         WILL BE REMOVED IN A FUTURE RELEASE.  *ENQUIRE* SHOULD BE

Seq #  *Modification Id* Act 
----------------------------+
00095  M02S00091.enqui12 ---|*         USED INSTEAD.

Seq #  *Modification Id* Act 
----------------------------+
00096  M02S00092.enqui12 ---|*
00097  M01S00093.enquire +++|*         * ENQUIRE ABORTED.* = *ENQUIRE* HAS BEEN ABORTED AS A RESULT
00098  M01S00094.enquire +++|*         OF A SYSTEM ERROR.
00099  M01S00095.enquire +++|*
00100  M01S00096.enquire +++|*         * ENQUIRY COMPLETE.* = INFORMATIVE MESSAGE INDICATING THAT
00101  M01S00097.enquire +++|*         THE ENQUIRY HAS COMPLETED.
00102  M01S00098.enquire +++|*
00103  M01S00099.enquire +++|*         * FILE NOT FOUND.* = REQUESTED FILE COULD NOT BE FOUND.
00104  M01S00100.enquire +++|*

Seq #  *Modification Id* Act 
----------------------------+
00105  M02S00101.v23l617 ---|*         * INVALID OPTION  X.* = OPTION *X* IS NOT DEFINED IN
00106  M01S00003.v23l617 +++|*         * INCORRECT OPTION  X.* = OPTION *X* IS NOT DEFINED IN
00107  M01S00102.enquire +++|*         *ENQUIRE*.
00108  M01S00103.enquire +++|*

Seq #  *Modification Id* Act 
----------------------------+
00109  M02S00104.v23l617 ---|*         * INVALID QUEUE TYPE.* = *ENQUIRE* WAS ABORTED DUE TO AN

Seq #  *Modification Id* Act 
----------------------------+
00110  M02S00105.v23l617 ---|*         INVALID QUEUE TYPE ERROR CODE RETURNED BY *QAC* ON A
00111  M01S00004.v23l617 +++|*         * INCORRECT QUEUE TYPE.* = *ENQUIRE* WAS ABORTED DUE TO AN
00112  M01S00005.v23l617 +++|*         INCORRECT QUEUE TYPE ERROR CODE RETURNED BY *QAC* ON A
00113  M01S00106.enquire +++|*         PEEK REQUEST.
00114  M01S00107.enquire +++|*
00115  M01S00108.enquire +++|*         * NO JOBS FOUND.* = NO JOBS WERE FOUND FOR THE USER.
00116  M01S00109.enquire +++|*
00117  M01S00110.enquire +++|*         * NNNNNNN NOT FOUND.* = THE SPECIFIED JSN (JSN=NNNN)
00118  M01S00111.enquire +++|*         OR UJN (UJN=NNNNNNN) WAS NOT FOUND.
00119  M01S00112.enquire +++|*
00120  M01S00113.enquire +++|*         * QAC ERROR ENCOUNTERED.* = *ENQUIRE* WAS ABORTED DUE TO AN
00121  M01S00114.enquire +++|*         UNEXPECTED ERROR CODE RETURNED BY *QAC*.
00122  M01S00115.enquire +++|          SPACE  4,10
00123  M01S00116.enquire +++|**        COMMON DECKS.
00124  M01S00117.enquire +++|
00125  M01S00118.enquire +++|

Seq #  *Modification Id* Act 
----------------------------+
00126  M02S00119.enqui9  ---|*CALL COMCMAC
00127  M01S00002.ns22000 +++|*CALL     COMCCMD

Seq #  *Modification Id* Act 
----------------------------+
00128  M02S00120.enqui9  ---|*CALL COMSEJT

Seq #  *Modification Id* Act 
----------------------------+
00129  M02S00121.enqui9  ---|*CALL COMSJIO
00130  M01S00001.enqui9  +++|*CALL     COMCMAC
00131  M01S00002.enqui9  +++|*CALL     COMSEJT
00132  M01S00003.enqui9  +++|*CALL     COMSJIO
00133  M01S00122.enquire +++|*CALL     COMSLFD
00134  M01S00003.ns22000 +++|*CALL     COMSMLS

Seq #  *Modification Id* Act 
----------------------------+
00135  M02S00123.enqui9  ---|*CALL COMSQAC
00136  M01S00004.ns22000 +++|*CALL     COMSPFM

Seq #  *Modification Id* Act 
----------------------------+
00137  M02S00124.enqui9  ---|*CALL COMSREM
00138  M01S00004.enqui9  +++|*CALL     COMSQAC
00139  M01S00005.enqui9  +++|*CALL     COMSREM
00140  M01S00001.ns21000 +++|*CALL     COMSRSX
00141  M01S00005.ns22000 +++|*CALL     COMSSCD
00142  M01S00006.ns22000 +++|*CALL     COMSSFM

Seq #  *Modification Id* Act 
----------------------------+
00143  M02S00125.enqui9  ---|*CALL COMSSSJ
00144  M01S00006.enqui9  +++|*CALL     COMSSSJ
00145  M01S00126.enquire +++|          TITLE  MACRO DEFINITION.
00146  M01S00127.enquire +++|          SPACE  4,15
00147  M01S00128.enquire +++|**        INDEX - INDEX TABLE ENTRY GENERATION.
00148  M01S00129.enquire +++|*
00149  M01S00130.enquire +++|*         INDEX GENERATES TABLES WHICH ARE TO BE INDEXED BY VALUES
00150  M01S00131.enquire +++|*         WHICH MAY CHANGE DUE TO ASSEMBLY MODES OR OPTIONS.
00151  M01S00132.enquire +++|*
00152  M01S00133.enquire +++|*         INDEX  NAME,IND,ADD
00153  M01S00134.enquire +++|*
00154  M01S00135.enquire +++|*         ENTRY  *NAME* = NAME OF TABLE ENTRY.
00155  M01S00136.enquire +++|*                *IND* = INDEX AT WHICH ENTRY IS TO BE PLACED.
00156  M01S00137.enquire +++|*                *ADD* = ADDRESS FIELD OF ENTRY GENERATION INSTRUCTION.
00157  M01S00138.enquire +++|
00158  M01S00139.enquire +++|
00159  M01S00140.enquire +++|          PURGMAC  INDEX
00160  M01S00141.enquire +++|
00161  M01S00142.enquire +++|          MACRO  INDEX,NAME,IND,ADD
00162  M01S00143.enquire +++|          IFC    NE,*NAME**
00163  M01S00144.enquire +++| NAME     CON    0
00164  M01S00145.enquire +++| .1       SET    NAME
00165  M01S00146.enquire +++|          BSSZ   IND-1
00166  M01S00147.enquire +++|          ELSE
00167  M01S00148.enquire +++|          ORG    .1+IND
00168  M01S00149.enquire +++|          IFC    NE,*ADD**,2
00169  M01S00150.enquire +++|          LOC    IND
00170  M01S00151.enquire +++|          CON    ADD
00171  M01S00152.enquire +++|          BSS    0
00172  M01S00153.enquire +++|          ENDIF
00173  M01S00154.enquire +++| INDEX    ENDM
00174  M01S00155.enquire +++|          SPACE  4,10
00175  M01S00156.enquire +++|**        LDEF - LINE DEFINITION ENTRY GENERATION.
00176  M01S00157.enquire +++|*
00177  M01S00158.enquire +++|*         LDEF   WO,CL
00178  M01S00159.enquire +++|*
00179  M01S00160.enquire +++|*         ENTRY  WO = WORD OFFSET INTO STRING BUFFER.
00180  M01S00161.enquire +++|*                CL = NUMBER OF CHARACTERS TO ENTER INTO STRING BUFFER.
00181  M01S00162.enquire +++|*
00182  M01S00163.enquire +++|*T        24/0, 18/WO, 18/CL

Figure

00183  M01S00164.enquire +++|
00184  M01S00165.enquire +++|
00185  M01S00166.enquire +++|          PURGMAC  LDEF
00186  M01S00167.enquire +++|
00187  M01S00168.enquire +++| LDEF     MACRO  WO,CL
00188  M01S00169.enquire +++|          VFD    24/0,18/WO,18/CL
00189  M01S00170.enquire +++| LDEF     ENDM
00190  M01S00171.enquire +++|          SPACE  4,10
00191  M01S00172.enquire +++|**        TABLE - GENERATE TABLE ENTRY.
00192  M01S00173.enquire +++|*
00193  M01S00174.enquire +++|*         TABLE  A,B
00194  M01S00175.enquire +++|*
00195  M01S00176.enquire +++|*         ENTRY  A = NUMERIC VALUE.
00196  M01S00177.enquire +++|*                B = NUMERIC VALUE.
00197  M01S00178.enquire +++|*
00198  M01S00179.enquire +++|*T        18/A, 24/0, 18/B

Figure

00199  M01S00180.enquire +++|
00200  M01S00181.enquire +++|
00201  M01S00182.enquire +++|          PURGMAC  TABLE
00202  M01S00183.enquire +++|
00203  M01S00184.enquire +++| TABLE    MACRO  A,B
00204  M01S00185.enquire +++|          VFD    18/A,24/0,18/B
00205  M01S00186.enquire +++| TABLE    ENDM
00206  M01S00187.enquire +++|          TITLE  PROGRAM CONSTANTS.
00207  M01S00188.enquire +++|          SPACE  4,10
00208  M01S00189.enquire +++|**        PROGRAM CONSTANTS.
00209  M01S00190.enquire +++|
00210  M01S00191.enquire +++|
00211  M01S00192.enquire +++|          ORG    110B
00212  M01S00193.enquire +++| STR      BSS    0
00213  M01S00194.enquire +++|
00214  M01S00195.enquire +++|*         SSJ CONTROL.
00215  M01S00196.enquire +++|
00216  M01S00197.enquire +++| SSJ=     EQU    SSJD        SSJ= PRIVILEGES ONLY AND DROP FILES
00217  M01S00198.enquire +++|
00218  M01S00199.enquire +++|*         BUFFER PARAMETERS.
00219  M01S00200.enquire +++|

Seq #  *Modification Id* Act 
----------------------------+
00220  M02S00201.v23l617 ---| FBUFL    EQU    1+2*64+1    *GETFNT*/CONTROL STATEMENT BUFFER LENGTH

Seq #  *Modification Id* Act 
----------------------------+
00221  M02S00006.enqui15 ---| FBUFL    EQU    1+2*64+1    *GETFNT*/COMMAND BUFFER LENGTH
00222  M01S00001.enqui15 +++| FBUFL    EQU    1+2*MXLF+1  *GETFNT*/COMMAND BUFFER LENGTH
00223  M01S00202.enquire +++| OBUFL    EQU    201B        OUTPUT BUFFER LENGTH

Seq #  *Modification Id* Act 
----------------------------+
00224  M02S00203.ns22000 ---| EBUFL    EQU    101B

Seq #  *Modification Id* Act 
----------------------------+
00225  M02S00204.ns22000 ---| MBUFL    EQU    25          MST BUFFER AND LIBRARY BUFFER
00226  M01S00007.ns22000 +++| LBUFL    EQU    25          LIBRARY BUFFER LENGTH
00227  M01S00205.enquire +++| RBUFL    EQU    300B        REPLY BUFFER LENGTH

Seq #  *Modification Id* Act 
----------------------------+
00228  M02S00206.enqui6  ---| USBBL    EQU    80          UNPACK STRING BUFFER LENGTH
00229  M01S00001.enqui6  +++| USBBL    EQU    92          UNPACK STRING BUFFER LENGTH
00230  M01S00207.enquire +++| USBL$    EQU    1           VARIABLE LENGTH OPTION FOR UNPACK BUFFER
00231  M01S00208.enquire +++| WBUFL    EQU    10B         WORKING BUFFER LENGTH

Seq #  *Modification Id* Act 
----------------------------+
00232  M02S00209.v23l617 ---| NCST     EQU    10B         CONTROL STATEMENT COUNT
00233  M01S00007.v23l617 +++| NCST     EQU    10B         COMMAND COUNT
00234  M01S00210.enquire +++| NUMQ     EQU    6           NUMBER OF QUEUE TYPES
00235  M01S00211.enquire +++|

Seq #  *Modification Id* Act 
----------------------------+
00236  M02S00212.ns22000 ---| TBUFL    MAX    MBUFL,RBUFL,WBUFL
00237  M01S00008.ns22000 +++| TBUFL    MAX    LBUFL,RBUFL,WBUFL  SCRATCH BUFFER LENGTH
00238  M01S00213.enquire +++|
00239  M01S00214.enquire +++|*         PRINTER CONTROL CHARACTERS.
00240  M01S00215.enquire +++|
00241  M01S00216.enquire +++| PAGE     DATA   1L1         PAGE EJECT
00242  M01S00217.enquire +++| TRPL     DATA   1L-         TRIPLE SPACE
00243  M01S00218.enquire +++|          SPACE  4,10
00244  M01S00219.enquire +++|*         STATUS MESSAGES.
00245  M01S00220.enquire +++|

Seq #  *Modification Id* Act 
----------------------------+
00246  M02S00221.ns22000 ---| INQM     DATA   L*INPUT QUEUE        *

Seq #  *Modification Id* Act 
----------------------------+
00247  M02S00222.ns22000 ---| PRQM     DATA   L*PRINT QUEUE        *

Seq #  *Modification Id* Act 
----------------------------+
00248  M02S00223.ns22000 ---| PHQM     DATA   L*PUNCH QUEUE        *

Seq #  *Modification Id* Act 
----------------------------+
00249  M02S00224.ns22000 ---| PLQM     DATA   L*PLOT  QUEUE        *

Seq #  *Modification Id* Act 
----------------------------+
00250  M02S00225.ns22000 ---| WTQM     DATA   L*WAIT QUEUE         *

Seq #  *Modification Id* Act 
----------------------------+
00251  M02S00226.ns22000 ---| PRSM     DATA   L*ROLLED             *

Seq #  *Modification Id* Act 
----------------------------+
00252  M02S00227.ns22000 ---| EXSM     DATA   L*EXECUTING          *

Seq #  *Modification Id* Act 
----------------------------+
00253  M02S00228.ns22000 ---| ROSM     DATA   L*ROLLED             *

Seq #  *Modification Id* Act 
----------------------------+
00254  M02S00229.ns22000 ---| SISM     DATA   L*SCP ROLLIN         *

Seq #  *Modification Id* Act 
----------------------------+
00255  M02S00230.ns22000 ---| SOSM     DATA   L*SCP ROLLOUT        *

Seq #  *Modification Id* Act 
----------------------------+
00256  M02S00231.ns22000 ---| TOSM     DATA   L*TIMED/EVENT ROLLOUT*

Seq #  *Modification Id* Act 
----------------------------+
00257  M02S00232.ns22000 ---| IOSM     DATA   L*ROLLED             *

Seq #  *Modification Id* Act 
----------------------------+
00258  M02S00233.ns22000 ---| DOSM     DATA   L*IDLE               *

Seq #  *Modification Id* Act 
----------------------------+
00259  M02S00234.ns22000 ---| SUSM     DATA   L*SUSPENDED          *

Seq #  *Modification Id* Act 
----------------------------+
00260  M02S00235.ns22000 ---| ERSM     DATA   L*ROLLOUT I/O ERROR  *
00261  M01S00009.ns22000 +++| INQM     DATA   L*INPUT QUEUE  *
00262  M01S00010.ns22000 +++| PRQM     DATA   L*PRINT QUEUE  *
00263  M01S00011.ns22000 +++| PHQM     DATA   L*PUNCH QUEUE  *
00264  M01S00012.ns22000 +++| PLQM     DATA   L*PLOT QUEUE   *
00265  M01S00013.ns22000 +++| WTQM     DATA   L*WAIT QUEUE   *
00266  M01S00014.ns22000 +++| PRSM     DATA   L*ROLLED       *
00267  M01S00015.ns22000 +++| EXSM     DATA   L*EXECUTING    *
00268  M01S00016.ns22000 +++| ROSM     DATA   L*ROLLED       *
00269  M01S00017.ns22000 +++| SISM     DATA   L*SCP ROLLIN   *
00270  M01S00018.ns22000 +++| SOSM     DATA   L*SCP ROLLOUT  *
00271  M01S00019.ns22000 +++| TOSM     DATA   L*T/E ROLLOUT  *
00272  M01S00020.ns22000 +++| IOSM     DATA   L*ROLLED       *
00273  M01S00021.ns22000 +++| DOSM     DATA   L*IDLE         *

Seq #  *Modification Id* Act 
----------------------------+
00274  M02S00022.enqui14 ---| SUSM     DATA   L*SUSPENDED    *
00275  M01S00001.enqui14 +++| SUSM     DATA   L*SUSP  XXX MIN*
00276  M01S00001.271l716 +++| PCSM     DATA   L*PCP ROLLOUT  *
00277  M01S00023.ns22000 +++| ERSM     DATA   L*ROLLOUT ERROR*
00278  M01S00001.ns2395  +++| SWSM     DATA   L*SERVICE WAIT *
00279  M01S00236.enquire +++|          SPACE  4,10
00280  M01S00237.enquire +++|*         ERROR MESSAGES.
00281  M01S00238.enquire +++|
00282  M01S00239.enquire +++| EMSA     DATA   L* ENQUIRE ABORTED.*

Seq #  *Modification Id* Act 
----------------------------+
00283  M02S00240.v23l617 ---| EMSB     DATA   L* INVALID QUEUE TYPE. *
00284  M01S00008.v23l617 +++| EMSB     DATA   L* INCORRECT QUEUE TYPE. *
00285  M01S00241.enquire +++| EMSC     DATA   L* NO JOBS FOUND.*
00286  M01S00242.enquire +++| EMSD     DATA   L*         NOT FOUND.  *
00287  M01S00243.enquire +++| EMSE     DATA   L* QAC ERROR ENCOUNTERED.*
00288  M01S00244.enquire +++| EMSF     DATA   L* ENQUIRY COMPLETE.*

Seq #  *Modification Id* Act 
----------------------------+
00289  M02S00245.enqui12 ---| EMSG     DATA   L* DROPPING SUPPORT OF SUMMARY, USE ENQUIRE.*
00290  M01S00246.enquire +++| FETS     SPACE  4,10
00291  M01S00247.enquire +++|*         FETS.
00292  M01S00248.enquire +++|
00293  M01S00249.enquire +++| O        BSS    0
00294  M01S00250.enquire +++| OUTPUT   FILEB  OBUF,OBUFL,FET=9   OUTPUT
00295  M01S00024.ns22000 +++|
00296  M01S00251.enquire +++| F        BSS    0

Seq #  *Modification Id* Act 
----------------------------+
00297  M02S00252.v23l617 ---| FILEFET  RFILEB FBUF,FBUFL,FET=9  *GETFNT*/CONTROL STATEMENT FILE
00298  M01S00009.v23l617 +++| FILEFET  RFILEB FBUF,FBUFL,FET=9  *GETFNT*/COMMAND FILE
00299  M01S00253.enquire +++|          SPACE  4,10
00300  M01S00254.enquire +++|**        *QAC* PARAMETER BLOCK.
00301  M01S00255.enquire +++|
00302  M01S00256.enquire +++| BQAC     VFD    50/0,9/PKFC,1/0   REQUEST PREFIX PORTION
00303  M01S00257.enquire +++|          VFD    36/0,6/11,18/RBUF
00304  M01S00258.enquire +++|          VFD    42/0,18/RBUF
00305  M01S00259.enquire +++|          VFD    42/0,18/RBUF
00306  M01S00260.enquire +++|          VFD    42/0,18/RBUF+RBUFL
00307  M01S00261.enquire +++| BQSC     VFD    60/0              SELECTION CRITERIA PORTION
00308  M01S00262.enquire +++|          VFD    60/0

Seq #  *Modification Id* Act 
----------------------------+
00309  M02S00263.ns2564  ---|          VFD    24/0,36/ZPSF
00310  M01S00001.ns2564  +++|          VFD    24/0,24/DLSF,12/ZPSF
00311  M01S00264.enquire +++|          VFD    12/77B,48/0

Seq #  *Modification Id* Act 
----------------------------+
00312  M02S00265.ns2564  ---|          VFD    60/0
00313  M01S00002.ns2564  +++|          VFD    18/0,18/3R***,24/0
00314  M01S00266.enquire +++|          VFD    60/0
00315  M01S00267.enquire +++|          VFD    60/0
00316  M01S00268.enquire +++| BQPF     VFD    60/-0             PEEK FUNCTION PORTION
00317  M01S00269.enquire +++|          VFD    12/-0,48/0
00318  M01S00270.enquire +++|          VFD    60/0
00319  M01S00271.enquire +++|          VFD    60/0
00320  M01S00272.enquire +++|
00321  M01S00273.enquire +++|*         PEEK INFORMATION BITS.
00322  M01S00274.enquire +++|

Seq #  *Modification Id* Act 
----------------------------+
00323  M02S00275.ns21000 ---| PIUJ     CON    0161006B    UJN PARAMETER

Seq #  *Modification Id* Act 
----------------------------+
00324  M02S00276.ns21000 ---| PIJS     CON    0020006B    JSN PARAMETER

Seq #  *Modification Id* Act 
----------------------------+
00325  M02S00277.ns21000 ---| PIEJ     CON    3771056B    EQUIVALENCED JSN PARAMETER

Seq #  *Modification Id* Act 
----------------------------+
00326  M02S00002.ns22000 ---| PIUJ     CON    4161006B    UJN PARAMETERS

Seq #  *Modification Id* Act 
----------------------------+
00327  M02S00003.ns22000 ---| PIJS     CON    4020006B    JSN PARAMETERS

Seq #  *Modification Id* Act 
----------------------------+
00328  M02S00004.ns22000 ---| PIEJ     CON    7771056B    EQUIVALENCED JSN PARAMETERS
00329  M01S00025.ns22000 +++| PIUJ     BSS    0           UJN PARAMETERS
00330  M01S00026.ns22000 +++|          VFD    36/0
00331  M01S00027.ns22000 +++|          VFD    12/LDPB+M2PB+M1PB+ESPB
00332  M01S00028.ns22000 +++|          VFD    12/UJPB+FUPB+OTPB+JSPB
00333  M01S00029.ns22000 +++| PIJS     BSS    0           JSN PARAMETERS
00334  M01S00030.ns22000 +++|          VFD    36/0
00335  M01S00031.ns22000 +++|          VFD    12/LDPB+ESPB
00336  M01S00032.ns22000 +++|          VFD    12/FUPB+OTPB+JSPB
00337  M01S00033.ns22000 +++| PIEJ     BSS    0           EQUIVALENCED JSN PARAMETERS
00338  M01S00034.ns22000 +++|          VFD    24/0
00339  M01S00035.ns22000 +++|          VFD    12/ALPB
00340  M01S00036.ns22000 +++|          VFD    12/LDPB+CSPB+DYPB+ASPB+SLPB+M2PB+M1PB+ESPB+FLPB
00341  M01S00037.ns22000 +++|          VFD    12/UJPB+FUPB+UNPB+PRPB+OTPB+JSPB
00342  M01S00278.enquire +++|          SPACE  4,10
00343  M01S00279.enquire +++|**        RSB CONTROL WORDS.
00344  M01S00280.enquire +++|
00345  M01S00281.enquire +++|
00346  M01S00282.enquire +++|*         CALL BLOCK TO READ CONTROL POINT AREA.
00347  M01S00283.enquire +++|
00348  M01S00284.enquire +++| STAT1    VFD    12/0,12/100B,18/0,18/BUFF
00349  M01S00285.enquire +++|          VFD    24/0,18/1,18/0
00350  M01S00286.enquire +++|
00351  M01S00287.enquire +++| STAT2    VFD    12/0,12/100B,18/0,18/BUFF+100B
00352  M01S00288.enquire +++|          VFD    24/0,18/1,18/100B

Seq #  *Modification Id* Act 
----------------------------+
00353  M02S00289.ns22000 ---|

Seq #  *Modification Id* Act 
----------------------------+
00354  M02S00290.ns22000 ---|*         CALL TO READ EST ENTRIES.

Seq #  *Modification Id* Act 
----------------------------+
00355  M02S00291.ns22000 ---|

Seq #  *Modification Id* Act 
----------------------------+
00356  M02S00292.ns22000 ---| ESTPR    VFD    12/0,12/0,18/0,18/EBUF

Seq #  *Modification Id* Act 
----------------------------+
00357  M02S00293.ns22000 ---|          CON    -0

Seq #  *Modification Id* Act 
----------------------------+
00358  M02S00294.ns22000 ---|

Seq #  *Modification Id* Act 
----------------------------+
00359  M02S00295.ns22000 ---|*         CALL TO READ MST.

Seq #  *Modification Id* Act 
----------------------------+
00360  M02S00296.ns22000 ---|

Seq #  *Modification Id* Act 
----------------------------+
00361  M02S00297.ns22000 ---| MSTA     VFD    12/0,12/20B,18/0,18/MBUF

Seq #  *Modification Id* Act 
----------------------------+
00362  M02S00298.ns22000 ---|          CON    -0
00363  M01S00299.enquire +++|          SPACE  4,10
00364  M01S00300.enquire +++|**        MISCELLANEOUS CONTROL WORDS.
00365  M01S00301.enquire +++|
00366  M01S00302.enquire +++|
00367  M01S00303.enquire +++|*         GETFNT CONTROL WORD.
00368  M01S00304.enquire +++|

Seq #  *Modification Id* Act 
----------------------------+
00369  M02S00305.enqui15 ---| GFNT     VFD    12/100B,6/0,18/0,2/0,1/1,1/1,1/1,1/0,18/FBUF
00370  M01S00002.enqui15 +++| GFNT     VFD    12/MXLF,6/0,18/0,2/0,1/1,1/1,1/1,1/0,18/FBUF
00371  M01S00306.enquire +++|
00372  M01S00307.enquire +++|*         GETGLS CONTROL WORD.
00373  M01S00308.enquire +++|
00374  M01S00309.enquire +++| GGLS     VFD    6/0,18/LBUF+3,36/0

Seq #  *Modification Id* Act 
----------------------------+
00375  M02S00310.ns22000 ---|

Seq #  *Modification Id* Act 
----------------------------+
00376  M02S00311.ns22000 ---|*         GETGLC CONTROL WORD.

Seq #  *Modification Id* Act 
----------------------------+
00377  M02S00312.ns22000 ---|

Seq #  *Modification Id* Act 
----------------------------+
00378  M02S00313.ns22000 ---| GLCW     VFD    6/,18/LBUF,36/0
00379  M01S00314.enquire +++|
00380  M01S00315.enquire +++|*         GET PRIMARY FILE CONTROL.
00381  M01S00316.enquire +++|
00382  M01S00317.enquire +++| PRIM     DECMIC PTFT
00383  M01S00318.enquire +++| GPRM     VFD    12/1,24/1S"PRIM",2/0,1/1,3/5,18/FBUF
00384  M01S00319.enquire +++|          SPACE  4,10
00385  M01S00320.enquire +++|**        CONSTANTS.
00386  M01S00321.enquire +++|
00387  M01S00322.enquire +++|
00388  M01S00038.ns22000 +++| ACAT     CON    0           ACCESS CATEGORIES
00389  M01S00039.ns22000 +++| ALVL     CON    0           ACCESS LEVEL
00390  M01S00323.enquire +++| FT       CON    1           FILE TYPE (PRESET AS NON-TERMINAL TYPE)
00391  M01S00324.enquire +++| FCT      CON    0           FILE COUNT
00392  M01S00325.enquire +++| JSNM     CON    0           JOB SEQUENCE NUMBER
00393  M01S00326.enquire +++| LCT      CON    0           LINE COUNT
00394  M01S00040.ns22000 +++| LLM      CON    0           LINE LIMIT
00395  M01S00041.ns22000 +++| JPPW     BSS    2           JOB PAGE PARAMETER WORD
00396  M01S00327.enquire +++| MXLC     EQU    10          MAXIMUM LINE COUNT

Seq #  *Modification Id* Act 
----------------------------+
00397  M02S00328.enqui6  ---| MXLL     EQU    72          MAXIMUM LINE LENGTH (CHARACTERS)
00398  M01S00002.enqui6  +++| MXLL     EQU    92          MAXIMUM LINE LENGTH (CHARACTERS)
00399  M01S00329.enquire +++| OPAL     CON    0           EXECUTION FLAG WORD
00400  M01S00330.enquire +++| MLPY     CON    0.0001P48+1 SRU CONSTANT (=.0001)

Seq #  *Modification Id* Act 
----------------------------+
00401  M02S00331.v23l617 ---| NASV     VFD    6/77B,54/0  NEGATIVE (ILLEGAL) ASSUMED VALUE
00402  M01S00010.v23l617 +++| NASV     VFD    6/77B,54/0  NEGATIVE (INCORRECT) ASSUMED VALUE
00403  M01S00042.ns22000 +++| SSFL     CON    0           SECURE SYSTEM FLAG

Seq #  *Modification Id* Act 
----------------------------+
00404  M02S00332.v23l617 ---| CSFP     BSSZ   1           CONTROL STATEMENT FILE POSITION
00405  M01S00011.v23l617 +++| CSFP     BSSZ   1           COMMAND FILE POSITION

Seq #  *Modification Id* Act 
----------------------------+
00406  M02S00333.enqui12 ---| SUMF     CON    0           *SUMMARY* ENTRY POINT EXECUTED FLAG
00407  M01S00001.252l678 +++| UESC     VFD    1/1,59/0    USER EM SHIFT COUNT
00408  M01S00334.enquire +++|
00409  M01S00335.enquire +++|*         MULTIPLIER TO CONVERT QUARTER-NANOSECONDS TO MILLISECONDS.
00410  M01S00336.enquire +++|
00411  M01S00337.enquire +++| OPA      DATA   0.25E-6
00412  M01S00338.enquire +++|
00413  M01S00339.enquire +++|*         PARAMETER ENTRY TABLE.
00414  M01S00340.enquire +++|
00415  M01S00341.enquire +++| TAGS     CON    0           OPTION
00416  M01S00342.enquire +++|          CON    0           OUTPUT FILE NAME
00417  M01S00343.enquire +++|          CON    0           FILE NAME TO SEARCH FOR
00418  M01S00344.enquire +++|          CON    0           JSN PARAMETER VALUE
00419  M01S00345.enquire +++|          CON    0           UJN PARAMETER VALUE
00420  M01S00346.enquire +++|
00421  M01S00347.enquire +++|*         OPTION TABLE.
00422  M01S00348.enquire +++|
00423  M01S00349.enquire +++| OPNS     VFD    6/0LA,36/0,18/0
00424  M01S00350.enquire +++|          VFD    6/0LB,36/0,18/OPB
00425  M01S00351.enquire +++|          VFD    6/0LD,36/0,18/OPD
00426  M01S00352.enquire +++|          VFD    6/0LR,36/0,18/OPR
00427  M01S00353.enquire +++|          VFD    6/0LU,36/0,18/OPU
00428  M01S00354.enquire +++|          VFD    6/0LJ,36/0,18/OPJ
00429  M01S00355.enquire +++|          VFD    6/0LL,36/0,18/OPL
00430  M01S00356.enquire +++|          VFD    6/0LF,36/0,18/OPF
00431  M01S00357.enquire +++|          VFD    6/0LT,36/0,18/OPT
00432  M01S00358.enquire +++|          VFD    6/0LS,36/0,18/OPS
00433  M01S00359.enquire +++|          VFD    60/0
00434  M01S00360.enquire +++|
00435  M01S00361.enquire +++|*         EXECUTION BIT MASK FOR OPTION TABLE.
00436  M01S00362.enquire +++|
00437  M01S00363.enquire +++| EBIT     DATA   00000000000077000000B
00438  M01S00364.enquire +++|          SPACE  4,10
00439  M01S00365.enquire +++|**        SUB-SYSTEM TABLE.
00440  M01S00366.enquire +++|
00441  M01S00367.enquire +++|
00442  M01S00368.enquire +++| SSTB     INDEX  MSYS
00443  M01S00369.enquire +++|          INDEX  NULS,(0L"NULS".)
00444  M01S00370.enquire +++|          INDEX  BASS,(0L"BASS".)
00445  M01S00371.enquire +++|          INDEX  FORS,(0L"FORS".)
00446  M01S00372.enquire +++|          INDEX  FTNS,(0L"FTNS".)
00447  M01S00373.enquire +++|          INDEX  EXES,(0L"EXES".)
00448  M01S00374.enquire +++|          INDEX  BATS,(0L"BATS".)
00449  M01S00375.enquire +++|          INDEX  ACCS,(0L"ACCS".)
00450  M01S00376.enquire +++|          INDEX  MSYS
00451  M01S00377.enquire +++|          SPACE  4,10
00452  M01S00378.enquire +++|**        EXTERNAL CHARACTERISTICS TABLES.
00453  M01S00379.enquire +++|
00454  M01S00380.enquire +++|
00455  M01S00381.enquire +++|*         EXTERNAL CHARACTERISTICS QUEUE TYPE TABLE.
00456  M01S00382.enquire +++|
00457  M01S00383.enquire +++| QTEC     BSS    0
00458  M01S00384.enquire +++|          TABLE  PRQQ,PREC
00459  M01S00385.enquire +++|          TABLE  PHQQ,PHEC
00460  M01S00386.enquire +++|          TABLE  PLQQ,PLEC
00461  M01S00387.enquire +++|          CON    0
00462  M01S00388.enquire +++|
00463  M01S00389.enquire +++|*         PRINT QUEUE EXTERNAL CHARACTERISTICS EQUIVALENCES TABLE.
00464  M01S00390.enquire +++|
00465  M01S00391.enquire +++| PREC     INDEX  7
00466  M01S00392.enquire +++|          INDEX  DFEX,(5L     )
00467  M01S00393.enquire +++|          INDEX  A4EX,(5LA4   )
00468  M01S00394.enquire +++|          INDEX  B4EX,(5LB4   )
00469  M01S00395.enquire +++|          INDEX  B6EX,(5LB6   )
00470  M01S00396.enquire +++|          INDEX  A6EX,(5LA6   )
00471  M01S00397.enquire +++|          INDEX  A9EX,(5LA9   )
00472  M01S00398.enquire +++|          INDEX  7
00473  M01S00399.enquire +++|
00474  M01S00400.enquire +++|*         PUNCH QUEUE EXTERNAL CHARACTERISTICS EQUIVALENCES TABLE.
00475  M01S00401.enquire +++|
00476  M01S00402.enquire +++| PHEC     INDEX  7
00477  M01S00403.enquire +++|          INDEX  DFFR,(5L     )
00478  M01S00404.enquire +++|          INDEX  PBFR,(5LSB   )
00479  M01S00405.enquire +++|          INDEX  P8FR,(5L80COL)
00480  M01S00406.enquire +++|          INDEX  PHFR,(5LO26  )
00481  M01S00407.enquire +++|          INDEX  P9FR,(5LO29  )
00482  M01S00408.enquire +++|          INDEX  ASFR,(5LASCII)
00483  M01S00409.enquire +++|          INDEX  7
00484  M01S00410.enquire +++|
00485  M01S00411.enquire +++|*         PLOT QUEUE EXTERNAL CHARACTERISTICS EQUIVALENCES TABLE.
00486  M01S00412.enquire +++|
00487  M01S00413.enquire +++| PLEC     INDEX  3
00488  M01S00414.enquire +++|          INDEX  T6EX,(5LT6   )
00489  M01S00415.enquire +++|          INDEX  T8EX,(5LT8   )
00490  M01S00416.enquire +++|          INDEX  3
00491  M01S00417.enquire +++| FLST     SPACE  4,10
00492  M01S00418.enquire +++|**        STATUS TABLE (LAST OPERATION IS PRESET AS *READ*).
00493  M01S00419.enquire +++|
00494  M01S00420.enquire +++|
00495  M01S00421.enquire +++| FLST     BSS    0
00496  M01S00422.enquire +++|          DATA   H* I/C      *
00497  M01S00423.enquire +++|          DATA   H* EOR      *
00498  M01S00424.enquire +++|          DATA   H* EOF      *
00499  M01S00425.enquire +++|          DATA   H* EOI      *
00500  M01S00426.enquire +++|          DATA   H* BOI      *
00501  M01S00427.enquire +++| FLTY     SPACE  4,10
00502  M01S00428.enquire +++|**        FILE TYPE TABLE.
00503  M01S00429.enquire +++|*
00504  M01S00430.enquire +++|*T,FLTY   VFD    12/DCFT,42/ADDR

Figure FLTY

Bitfield Rendering Failure
======== ========= =======
The field description 
[
{ "name": "ADDR", "bits": 42, "type": 2 },
{ "name": "DCFT", "bits": VFD    12, "type": 1 }
]


 is invalid.

Please check your syntax and try again.

00505  M01S00431.enquire +++|*         DCFT = DISPLAY CODED FILE TYPE.
00506  M01S00432.enquire +++|*         ADDR = MESSAGE ADDRESS.
00507  M01S00433.enquire +++|
00508  M01S00434.enquire +++|
00509  M01S00435.enquire +++| FLTY     INDEX  MXFT
00510  M01S00436.enquire +++|          INDEX  INFT,(3LIN.)      INPUT
00511  M01S00437.enquire +++|          INDEX  ROFT,(3LRO.)      ROLLOUT
00512  M01S00438.enquire +++|          INDEX  QFFT,(3LQF.)      QUEUED
00513  M01S00439.enquire +++|          INDEX  SYFT,(3LSY.)      SYSTEM
00514  M01S00440.enquire +++|          INDEX  LOFT,(3LLO.)      LOCAL
00515  M01S00441.enquire +++|          INDEX  LIFT,(3LLI.)      LIBRARY
00516  M01S00442.enquire +++|          INDEX  PTFT,(3LPT.)      PRIMARY TERMINAL
00517  M01S00443.enquire +++|          INDEX  PMFT,(3LPM.)      DIRECT ACCES PERMANENT
00518  M01S00444.enquire +++|          INDEX  FAFT,(3LFA.)      FAST ATTACH
00519  M01S00445.enquire +++|          INDEX  MXFT
00520  M01S00446.enquire +++| FSTT     SPACE  4,10
00521  M01S00447.enquire +++|**        FILE STATUS TABLE.
00522  M01S00448.enquire +++|*
00523  M01S00449.enquire +++|*T,FSTT   24/DCFS,36/0

Figure FSTT

00524  M01S00450.enquire +++|*         DCFS = DISPLAY CODED FILE STATUS.
00525  M01S00451.enquire +++|
00526  M01S00452.enquire +++|
00527  M01S00453.enquire +++| FSTT     INDEX  MXST
00528  M01S00454.enquire +++|          INDEX  0,(4L    )
00529  M01S00455.enquire +++|          INDEX  UPST,(4L UP )
00530  M01S00456.enquire +++|          INDEX  SSST,(4L SS )
00531  M01S00457.enquire +++|          INDEX  CBST,(4L CB )
00532  M01S00458.enquire +++|          INDEX  CKST,(4L CK )
00533  M01S00459.enquire +++|          INDEX  SOST,(4L SO )
00534  M01S00460.enquire +++|          INDEX  AAST,(4L AA )
00535  M01S00461.enquire +++|          INDEX  NDST,(4L NAD)
00536  M01S00462.enquire +++|          INDEX  MXST
00537  M01S00463.enquire +++| QTST     SPACE  4,10
00538  M01S00464.enquire +++|**        QUEUE TYPE STATUS TABLE.
00539  M01S00465.enquire +++|
00540  M01S00466.enquire +++|QTST      BSS    0
00541  M01S00467.enquire +++|          TABLE  INQQ,INQM
00542  M01S00468.enquire +++|          TABLE  EXQQ,0
00543  M01S00469.enquire +++|          TABLE  PRQQ,PRQM
00544  M01S00470.enquire +++|          TABLE  PHQQ,PHQM
00545  M01S00471.enquire +++|          TABLE  PLQQ,PLQM
00546  M01S00472.enquire +++|          TABLE  WTQQ,WTQM
00547  M01S00473.enquire +++|          CON    0
00548  M01S00043.ns22000 +++| CNST     SPACE  4,10
00549  M01S00044.ns22000 +++|**        EXECUTING JOB CONNECTION STATUS.
00550  M01S00045.ns22000 +++|
00551  M01S00046.ns22000 +++| CNST     INDEX  MXCS
00552  M01S00047.ns22000 +++|          INDEX  NICS,(2LNI) NOT INTERACTIVE
00553  M01S00048.ns22000 +++|          INDEX  DTCS,(2LDT) DETACHED
00554  M01S00049.ns22000 +++|          INDEX  OLCS,(2LON) ON-LINE
00555  M01S00050.ns22000 +++|          INDEX  MXCS
00556  M01S00474.enquire +++| EJST     SPACE  4,10
00557  M01S00475.enquire +++|**        EJT STATUS TABLE.
00558  M01S00476.enquire +++|
00559  M01S00477.enquire +++| EJST     INDEX  MXJS
00560  M01S00478.enquire +++|          INDEX  PRJS,PRSM
00561  M01S00479.enquire +++|          INDEX  EXJS,EXSM
00562  M01S00480.enquire +++|          INDEX  ROJS,ROSM
00563  M01S00481.enquire +++|          INDEX  SIJS,SISM
00564  M01S00482.enquire +++|          INDEX  SOJS,SOSM
00565  M01S00483.enquire +++|          INDEX  TOJS,TOSM
00566  M01S00484.enquire +++|          INDEX  IOJS,IOSM
00567  M01S00485.enquire +++|          INDEX  DOJS,DOSM
00568  M01S00486.enquire +++|          INDEX  SUJS,SUSM
00569  M01S00002.271l716 +++|          INDEX  PCJS,PCSM
00570  M01S00487.enquire +++|          INDEX  ERJS,ERSM
00571  M01S00002.ns2395  +++|          INDEX  SWJS,SWSM
00572  M01S00488.enquire +++|          INDEX  MXJS
00573  M01S00489.enquire +++|          SPACE  4,10
00574  M01S00490.enquire +++|**        LINE DEFINITION TABLES.
00575  M01S00491.enquire +++|*
00576  M01S00492.enquire +++|*         THE LINE DEFINITION TABLES DEFINE THE WORD OFFSET INTO
00577  M01S00493.enquire +++|*         A STRING BUFFER AND THE NUMBER OF CHARACTERS TO ENTER
00578  M01S00494.enquire +++|*         INTO THE BUFFER FOR DATA TO BE WRITTEN TO THE OUTPUT
00579  M01S00495.enquire +++|*         FILE.  THIS DEFINES THE FORMAT OF THE OUTPUT LINES.
00580  M01S00496.enquire +++|
00581  M01S00497.enquire +++|
00582  M01S00498.enquire +++|*         UJN OUTPUT LINE.
00583  M01S00499.enquire +++|

Seq #  *Modification Id* Act 
----------------------------+
00584  M02S00500.ns22000 ---| L1UL     LDEF   00,68       LINE 1 SKELETON
00585  M01S00051.ns22000 +++| L1UL     LDEF   00,70       LINE 1 SKELETON
00586  M01S00501.enquire +++| JSUL     LDEF   01,04       JSN
00587  M01S00502.enquire +++| SCUL     LDEF   06,01       SERVICE CLASS

Seq #  *Modification Id* Act 
----------------------------+
00588  M02S00503.ns21000 ---| UJUL     LDEF   08,07       UJN

Seq #  *Modification Id* Act 
----------------------------+
00589  M02S00504.ns21000 ---| STUL     LDEF   17,19       STATUS

Seq #  *Modification Id* Act 
----------------------------+
00590  M02S00505.ns21000 ---| EMUL     LDEF   38,30       EXECUTING MESSAGE

Seq #  *Modification Id* Act 
----------------------------+
00591  M02S00005.ns22000 ---| LIUL     LDEF   08,03       LID

Seq #  *Modification Id* Act 
----------------------------+
00592  M02S00006.ns22000 ---| UJUL     LDEF   12,07       UJN

Seq #  *Modification Id* Act 
----------------------------+
00593  M02S00007.ns22000 ---| STUL     LDEF   21,19       STATUS

Seq #  *Modification Id* Act 
----------------------------+
00594  M02S00008.ns22000 ---| EMUL     LDEF   44,30       EXECUTING MESSAGE
00595  M01S00052.ns22000 +++| CNUL     LDEF   08,02       CONNECTION STATUS
00596  M01S00053.ns22000 +++| DSUL     LDEF   11,02       DESTINATION ROUTING
00597  M01S00054.ns22000 +++| LIUL     LDEF   14,03       LID
00598  M01S00055.ns22000 +++| UJUL     LDEF   18,07       UJN
00599  M01S00056.ns22000 +++| STUL     LDEF   27,13       STATUS
00600  M01S00057.ns22000 +++| EMUL     LDEF   42,30       EXECUTING MESSAGE
00601  M01S00506.enquire +++|
00602  M01S00507.enquire +++|*         JSN OUTPUT LINES.
00603  M01S00508.enquire +++|*
00604  M01S00509.enquire +++|*         *JSJL*, *SCJL* AND *STJL* ARE USED TO DEFINE THE FORMAT
00605  M01S00510.enquire +++|*         OF OUTPUT LINES WHEN INFORMATION ABOUT A SPECIFIC JOB
00606  M01S00511.enquire +++|*         IS REQUESTED (JSN PARAMETER EQUIVALENCED), AND ALSO WHEN
00607  M01S00512.enquire +++|*         INFORMATION ABOUT ALL JOBS OWNED BY A USER IS REQUESTED
00608  M01S00513.enquire +++|*         (JSN PARAMETER UNEQUIVALENCED).
00609  M01S00514.enquire +++|

Seq #  *Modification Id* Act 
----------------------------+
00610  M02S00515.ns21000 ---| L1JL     LDEF   00,42       LINE 1 SKELETON

Seq #  *Modification Id* Act 
----------------------------+
00611  M02S00516.ns21000 ---| JSJL     LDEF   01,04       JSN, COLUMN 1

Seq #  *Modification Id* Act 
----------------------------+
00612  M02S00517.ns21000 ---|          LDEF   31,04       JSN, COLUMN 2

Seq #  *Modification Id* Act 
----------------------------+
00613  M02S00518.ns21000 ---| SCJL     LDEF   06,01       SERVICE CLASS, COLUMN 1

Seq #  *Modification Id* Act 
----------------------------+
00614  M02S00519.ns21000 ---|          LDEF   36,01       SERVICE CLASS, COLUMN 2

Seq #  *Modification Id* Act 
----------------------------+
00615  M02S00520.ns21000 ---| STJL     LDEF   08,19       STATUS, COLUMN 1

Seq #  *Modification Id* Act 
----------------------------+
00616  M02S00521.ns21000 ---|          LDEF   38,19       STATUS, COLUMN 2

Seq #  *Modification Id* Act 
----------------------------+
00617  M02S00522.ns21000 ---| UJJL     LDEF   34,07       UJN

Seq #  *Modification Id* Act 
----------------------------+
00618  M02S00009.ns22000 ---| L1JL     LDEF   00,45       LINE 1 SKELETON
00619  M01S00058.ns22000 +++| L1JL     LDEF   00,69       LINE 1 SKELETON
00620  M01S00010.ns21000 +++| JSJL     LDEF   01,04       JSN, COLUMN 1

Seq #  *Modification Id* Act 
----------------------------+
00621  M02S00011.ns22000 ---|          LDEF   34,04       JSN, COLUMN 2

Seq #  *Modification Id* Act 
----------------------------+
00622  M02S00012.ns22000 ---| SCJL     LDEF   06,01       SERVICE CLASS, COLUMN 1

Seq #  *Modification Id* Act 
----------------------------+
00623  M02S00013.ns22000 ---|          LDEF   39,01       SERVICE CLASS, COLUMN 2

Seq #  *Modification Id* Act 
----------------------------+
00624  M02S00014.ns22000 ---| LIJL     LDEF   08,03       LID, COLUMN 1

Seq #  *Modification Id* Act 
----------------------------+
00625  M02S00015.ns22000 ---|          LDEF   41,03       LID, COLUMN 2

Seq #  *Modification Id* Act 
----------------------------+
00626  M02S00016.ns22000 ---| STJL     LDEF   12,19       STATUS, COLUMN 1

Seq #  *Modification Id* Act 
----------------------------+
00627  M02S00017.ns22000 ---|          LDEF   45,19       STATUS, COLUMN 2

Seq #  *Modification Id* Act 
----------------------------+
00628  M02S00018.ns22000 ---| UJJL     LDEF   38,07       UJN
00629  M01S00059.ns22000 +++|          LDEF   40,04       JSN, COLUMN 2
00630  M01S00060.ns22000 +++| SCJL     LDEF   06,01       SERVICE CLASS, COLUMN 1
00631  M01S00061.ns22000 +++|          LDEF   45,01       SERVICE CLASS, COLUMN 2
00632  M01S00062.ns22000 +++| CNJL     LDEF   08,02       CONNECTION STATUS, COLUMN 1
00633  M01S00063.ns22000 +++|          LDEF   47,02       CONNECTION STATUS, COLUMN 2
00634  M01S00064.ns22000 +++| DSJL     LDEF   11,02       DESTINATION ROUTING, COLUMN 1
00635  M01S00065.ns22000 +++|          LDEF   50,02       DESTINATION ROUTING, COLUMN 2
00636  M01S00066.ns22000 +++| LIJL     LDEF   14,03       LID, COLUMN 1
00637  M01S00067.ns22000 +++|          LDEF   53,03       LID, COLUMN 2
00638  M01S00068.ns22000 +++| STJL     LDEF   18,13       STATUS, COLUMN 1
00639  M01S00069.ns22000 +++|          LDEF   57,13       STATUS, COLUMN 2
00640  M01S00070.ns22000 +++| UJJL     LDEF   46,07       UJN
00641  M01S00071.ns22000 +++| ALJL     LDEF   62,07       ACCESS LEVEL
00642  M01S00523.enquire +++|
00643  M01S00524.enquire +++| L2JL     LDEF   00,70       LINE 2 SKELETON
00644  M01S00525.enquire +++| SUJL     LDEF   06,10       SRU ACCUMULATOR
00645  M01S00526.enquire +++| SLJL     LDEF   29,08       SRU LIMIT
00646  M01S00527.enquire +++| CFJL     LDEF   46,06       CM FL

Seq #  *Modification Id* Act 
----------------------------+
00647  M02S00528.v23l617 ---| EFJL     LDEF   62,07       ECS FL
00648  M01S00012.v23l617 +++| EFJL     LDEF   62,07       EXTENDED MEMORY FL
00649  M01S00529.enquire +++|
00650  M01S00530.enquire +++| L3JL     LDEF   00,56       LINE 3 SKELETON
00651  M01S00531.enquire +++| PLJL     LDEF   12,08       PRU LENGTH
00652  M01S00532.enquire +++| DCJL     LDEF   26,02       DISPOSITION CODE
00653  M01S00533.enquire +++| FCJL     LDEF   34,02       FORMS CODE
00654  M01S00534.enquire +++| IDJL     LDEF   42,02       DESTINATION BATCH DEVICE ID
00655  M01S00535.enquire +++| ECJL     LDEF   50,05       EXTERNAL CHARACTERISTICS
00656  M01S00536.enquire +++|          TITLE  MAIN LOOP.
00657  M01S00537.enquire +++|**        MAIN PROGRAM.
00658  M01S00538.enquire +++|
00659  M01S00539.enquire +++|
00660  M01S00540.enquire +++| MAIN     BSS    0
00661  M01S00541.enquire +++|          SYSTEM RSB,R,STAT1 READ FIRST  100B WORDS OF CPA
00662  M01S00542.enquire +++|          SYSTEM RSB,R,STAT2 READ SECOND 100B WORDS OF CPA
00663  M01S00543.enquire +++|
00664  M01S00544.enquire +++| MAIN1    SA5    OPNS+1      OPTION TABLE
00665  M01S00545.enquire +++|          SA4    EBIT        EXECUTION BIT MASK
00666  M01S00546.enquire +++| MAIN2    ZR     X5,MAIN5    IF END OF OPTION TABLE
00667  M01S00547.enquire +++|          BX6    X4*X5       CHECK FOR EXECUTION BIT
00668  M01S00548.enquire +++|          NZ     X6,MAIN3    IF OPTION TO BE EXECUTED
00669  M01S00549.enquire +++|          SA5    A5+1        CHECK NEXT OPTION
00670  M01S00550.enquire +++|          EQ     MAIN2
00671  M01S00551.enquire +++|
00672  M01S00552.enquire +++| MAIN3    SA2    FT          FILE TYPE
00673  M01S00553.enquire +++|          ZR     X2,MAIN4    IF TERMINAL FILE
00674  M01S00554.enquire +++|          SB3    X5
00675  M01S00555.enquire +++|          SA1    OPF
00676  M01S00556.enquire +++|          SB2    A1
00677  M01S00557.enquire +++|          SB3    B3-B2
00678  M01S00558.enquire +++|          ZR     B3,MAIN4    IF OP=F OPTION TO BE EXECUTED
00679  M01S00559.enquire +++|          WRITEW OUTPUT,PAGE,B1  PAGE EJECT
00680  M01S00560.enquire +++|          SA2    TRPL        TRIPLE SPACE
00681  M01S00561.enquire +++|          BX6    X2
00682  M01S00562.enquire +++|          SA6    PAGE        SET TRIPLE SPACE
00683  M01S00563.enquire +++|          SA4    EBIT        RESET MASK FOR NEXT OPTION
00684  M01S00564.enquire +++| MAIN4    SB2    X5          PICK UP PROCESSOR ADDRESS
00685  M01S00565.enquire +++|          BX6    -X4*X5      CLEAR EXECUTION BIT
00686  M01S00566.enquire +++|          SA6    A5
00687  M01S00567.enquire +++|          JP     B2
00688  M01S00568.enquire +++|
00689  M01S00569.enquire +++|*         PROCESS JSN.
00690  M01S00570.enquire +++|
00691  M01S00571.enquire +++| MAIN5    SA5    TAGS+3
00692  M01S00572.enquire +++|          ZR     X5,MAIN5.2  IF JSN NOT SPECIFIED
00693  M01S00573.enquire +++|          MX0    24
00694  M01S00574.enquire +++|          BX5    X0*X5
00695  M01S00575.enquire +++|          ZR     X5,MAIN5.1  IF UNEQUIVALENCED JSN PARAMETER SPECIFIED

Seq #  *Modification Id* Act 
----------------------------+
00696  M02S00576.enqui7  ---|          RJ     PEJ         LIST STATUS OF SPECIFIED JSN
00697  M01S00001.enqui7  +++|          MX0    -42
00698  M01S00002.enqui7  +++|          BX1    -X0*X5
00699  M01S00003.enqui7  +++|          NZ     X1,MAIN5.0  IF FOUR-CHARACTER JSN
00700  M01S00004.enqui7  +++|          SX0    1R          APPEND SPACE
00701  M01S00005.enqui7  +++|          LX0    36-0
00702  M01S00006.enqui7  +++|          BX5    X5+X0
00703  M01S00007.enqui7  +++| MAIN5.0  RJ     PEJ         LIST STATUS OF SPECIFIED JSN
00704  M01S00577.enquire +++|          EQ     MAIN7       COMPLETE ENQUIRY
00705  M01S00578.enquire +++|
00706  M01S00579.enquire +++| MAIN5.1  RJ     PJS         LIST STATUS OF ALL JSN-S
00707  M01S00580.enquire +++|          EQ     MAIN7       COMPLETE ENQUIRY
00708  M01S00581.enquire +++|
00709  M01S00582.enquire +++|*         PROCESS UJN.
00710  M01S00583.enquire +++|
00711  M01S00584.enquire +++| MAIN5.2  SA5    TAGS+4
00712  M01S00585.enquire +++|          ZR     X5,MAIN6    IF UJN NOT SPECIFIED
00713  M01S00586.enquire +++|          RJ     PUJ         LIST STATUS OF JOBS BY UJN
00714  M01S00587.enquire +++|          EQ     MAIN7       COMPLETE ENQUIRY
00715  M01S00588.enquire +++|
00716  M01S00589.enquire +++|*         PROCESS FILENAME.
00717  M01S00590.enquire +++|
00718  M01S00591.enquire +++| MAIN6    SA1    TAGS+2      CHECK FILENAME
00719  M01S00592.enquire +++|          ZR     X1,MAIN7    IF NO FILENAME
00720  M01S00593.enquire +++|          JP     FNA
00721  M01S00594.enquire +++|
00722  M01S00595.enquire +++| MAIN7    SA1    O+2         CHECK FOR NO OUTPUT
00723  M01S00596.enquire +++|          SA2    A1+B1
00724  M01S00597.enquire +++|          BX6    X1-X2
00725  M01S00598.enquire +++|          ZR     X6,MAIN8    IF NO OUTPUT
00726  M01S00599.enquire +++|          WRITER OUTPUT
00727  M01S00600.enquire +++| MAIN8    SA1    FT
00728  M01S00601.enquire +++|          ZR     X1,MAIN9    IF TERMINAL FILE
00729  M01S00602.enquire +++|          MESSAGE  EMSF,3    * ENQUIRY COMPLETE.*

Seq #  *Modification Id* Act 
----------------------------+
00730  M02S00603.enqui12 ---| MAIN9    SA1    SUMF

Seq #  *Modification Id* Act 
----------------------------+
00731  M02S00604.enqui12 ---|          ZR     X1,MAIN10   IF *SUMMARY* ENTRY POINT NOT EXECUTED

Seq #  *Modification Id* Act 
----------------------------+
00732  M02S00605.enqui12 ---|          SA2    EMSG        DROPPING SUPPORT OF *SUMMARY*

Seq #  *Modification Id* Act 
----------------------------+
00733  M02S00606.enqui12 ---|          SX1    B0+

Seq #  *Modification Id* Act 
----------------------------+
00734  M02S00607.enqui12 ---|          RJ     ISM

Seq #  *Modification Id* Act 
----------------------------+
00735  M02S00608.enqui12 ---| MAIN10   ENDRUN
00736  M01S00001.enqui12 +++| MAIN9    ENDRUN
00737  M01S00609.enquire +++| FNA      TITLE  FN OPTION.
00738  M01S00610.enquire +++|**        THE *FN=FILENAME* FUNCTION RETURNS THE STATUS OF THE
00739  M01S00611.enquire +++|*         FILE SPECIFIED BY THE USER. THE *FN=FILENAME* FUNCTION IS
00740  M01S00612.enquire +++|*         EXECUTED ONLY IF THE *OP=F* OPTION IS NOT SPECIFIED.
00741  M01S00613.enquire +++|*         THE FOLLOWING INFORMATION IS GIVEN FOR THE SPECIFIED FILE

Seq #  *Modification Id* Act 
----------------------------+
00742  M02S00614.ns22000 ---|*         *FILENAME* *LENGTH* *TYPE* *STATUS* .
00743  M01S00072.ns22000 +++|*         *FILENAME* *LENGTH/PRUS* *TYPE* *STATUS* *FS* *LEVEL*.
00744  M01S00615.enquire +++|
00745  M01S00616.enquire +++|
00746  M01S00617.enquire +++| FNA      MX0    42
00747  M01S00618.enquire +++|          MX7    0           CLEAR FIRST WORD OF BUFFER
00748  M01S00619.enquire +++|          SA7    FBUF
00749  M01S00620.enquire +++| FNA0     SA2    GFNT        STATUS WORD TO RETURN FILES
00750  M01S00621.enquire +++|          BX6    X2
00751  M01S00622.enquire +++|          SA6    FILEFET+8
00752  M01S00623.enquire +++|          GETFNT FILEFET
00753  M01S00624.enquire +++|          SA5    FBUF-1      INITIALIZE FILE NAME SEARCH
00754  M01S00625.enquire +++|          SA1    TAGS+2      FILE NAME
00755  M01S00626.enquire +++| FNA1     SA5    A5+2
00756  M01S00627.enquire +++|          ZR     X5,FNA3     IF END OF FNTS
00757  M01S00628.enquire +++|          BX3    X0*X5
00758  M01S00629.enquire +++|          BX3    X3-X1
00759  M01S00630.enquire +++|          NZ     X3,FNA1     IF NO MATCH
00760  M01S00631.enquire +++|          SA1    FT          TERMINAL FILE CONSTANT
00761  M01S00632.enquire +++|          ZR     X1,FNA2     IF TERMINAL FILE
00762  M01S00633.enquire +++|          WRITEW OUTPUT,PAGE,B1  CARRIAGE CONTROL
00763  M01S00634.enquire +++| FNA2     WRITEW OUTPUT,FOP,FOPA
00764  M01S00635.enquire +++|          RJ     LST         LIST FILE
00765  M01S00636.enquire +++|          EQ     MAIN7       RETURN
00766  M01S00637.enquire +++|
00767  M01S00638.enquire +++| FNA3     SA4    FBUF        BUFFER CONTROL WORD
00768  M01S00639.enquire +++|          NZ     X4,FNA0     IF MORE FILES TO GET
00769  M01S00640.enquire +++|          SA2    =L* FILE NOT FOUND.*
00770  M01S00641.enquire +++|          SX1    B0+
00771  M01S00642.enquire +++|          RJ     ISM         ISSUE MESSAGE
00772  M01S00643.enquire +++|          EQ     MAIN7       RETURN
00773  M01S00644.enquire +++| OPB      TITLE  B OPTION.
00774  M01S00645.enquire +++|**        THE *OP=B* OPTION RETURNS TO THE USER INFORMATION THAT IS
00775  M01S00646.enquire +++|*         READ FROM HIS CONTROL POINT AREA. INFORMATION SUCH AS

Seq #  *Modification Id* Act 
----------------------------+
00776  M02S00647.v23l617 ---|*         USER NUMBER,USER INDEX,USER PRIORITIES IS RETURNED TO
00777  M01S00013.v23l617 +++|*         USER NAME, USER INDEX, USER PRIORITIES IS RETURNED TO
00778  M01S00648.enquire +++|*         THE CALLER. THE USER PRIMARY FILENAME IS RETURNED IF
00779  M01S00649.enquire +++|*         HE HAS ONE AND THE SUBSYSTEM HE IS USING.INFORMATION
00780  M01S00650.enquire +++|*         ABOUT THE USER FIELD LENGTH, FAMILY AND PACK NAME IS

Seq #  *Modification Id* Act 
----------------------------+
00781  M02S00651.ns22000 ---|*         ALSO GIVEN.
00782  M01S00073.ns22000 +++|*         GIVEN.  IF SECURE SYSTEM, INFORMATION ABOUT SECURITY
00783  M01S00074.ns22000 +++|*         ACCESS LEVELS AND ACCESS CATEGORIES IS ALSO GIVEN.
00784  M01S00652.enquire +++|
00785  M01S00653.enquire +++|
00786  M01S00654.enquire +++|
00787  M01S00655.enquire +++|*         PROCESS PRIORITIES.
00788  M01S00656.enquire +++|

Seq #  *Modification Id* Act 
----------------------------+
00789  M02S00657.271l750 ---| OPB      SA5    BUFF+JCIW   JOB PRIORITIES

Seq #  *Modification Id* Act 
----------------------------+
00790  M03S00658.271l750 ---|          AX5    49

Seq #  *Modification Id* Act 
----------------------------+
00791  M03S00659.271l750 ---|          MX3    -11

Seq #  *Modification Id* Act 
----------------------------+
00792  M02S00003.271l750 ---|          AX5    48
00793  M01S00001.271l750 +++| OPB      BSS    0           ENTRY
00794  M01S00002.271l750 +++|          SA5    BUFF+CWQW   GET CPU PRIORITY
00795  M01S00003.271l750 +++|          AX5    51
00796  M01S00004.271l716 +++|          MX3    -7

Seq #  *Modification Id* Act 
----------------------------+
00797  M02S00660.271l750 ---|          BX1    -X3*X5      CP PRIORITY
00798  M01S00004.271l750 +++|          BX1    -X3*X5      CPU PRIORITY
00799  M01S00661.enquire +++|          RJ     COD         CONVERT TO OCTAL DISPLAY CODE
00800  M01S00662.enquire +++|          MX0    12
00801  M01S00663.enquire +++|          BX6    X0*X4

Seq #  *Modification Id* Act 
----------------------------+
00802  M02S00664.v23l617 ---|          SA6    BOPJ+2
00803  M01S00014.v23l617 +++|          SA6    BOCP+2
00804  M01S00665.enquire +++|

Seq #  *Modification Id* Act 
----------------------------+
00805  M02S00666.ns22000 ---|*         PROCESSING PACK NAME AND FAMILY NAME.

Seq #  *Modification Id* Act 
----------------------------+
00806  M02S00667.ns22000 ---|

Seq #  *Modification Id* Act 
----------------------------+
00807  M02S00668.ns22000 ---|          SA2    BUFF+PKNW

Seq #  *Modification Id* Act 
----------------------------+
00808  M02S00669.ns22000 ---|          MX4    42

Seq #  *Modification Id* Act 
----------------------------+
00809  M02S00670.ns22000 ---|          BX6    X4*X2

Seq #  *Modification Id* Act 
----------------------------+
00810  M02S00671.ns22000 ---|          ZR     X6,OPB1     IF NO AUXILIARY LIBRARY PACK NAME

Seq #  *Modification Id* Act 
----------------------------+
00811  M02S00672.ns22000 ---|          SA6    BOPF+2

Seq #  *Modification Id* Act 
----------------------------+
00812  M02S00673.ns22000 ---| OPB1     GETJN  BOPD+2      DISPLAY JSN

Seq #  *Modification Id* Act 
----------------------------+
00813  M02S00674.ns22000 ---|          SA2    BUFF+PFCW

Seq #  *Modification Id* Act 
----------------------------+
00814  M02S00675.ns22000 ---|          MX0    -6

Seq #  *Modification Id* Act 
----------------------------+
00815  M02S00676.ns22000 ---|          LX2    -12

Seq #  *Modification Id* Act 
----------------------------+
00816  M02S00677.ns22000 ---|          BX5    -X0*X2      EST ORDINAL OF FAMILY DEVICE

Seq #  *Modification Id* Act 
----------------------------+
00817  M02S00678.ns22000 ---|

Seq #  *Modification Id* Act 
----------------------------+
00818  M02S00679.ns22000 ---|*         READ EST.

Seq #  *Modification Id* Act 
----------------------------+
00819  M02S00680.ns22000 ---|

Seq #  *Modification Id* Act 
----------------------------+
00820  M02S00681.ns22000 ---|          MX7    -0

Seq #  *Modification Id* Act 
----------------------------+
00821  M02S00682.ns22000 ---|          SA7    EBUF

Seq #  *Modification Id* Act 
----------------------------+
00822  M02S00683.ns22000 ---|          SA7    MBUF

Seq #  *Modification Id* Act 
----------------------------+
00823  M02S00684.ns22000 ---|          SYSTEM RSB,R,ESTPR

Seq #  *Modification Id* Act 
----------------------------+
00824  M02S00685.ns22000 ---|          SA1    EBUF+X5     EST FOR FAMILY DEVICE

Seq #  *Modification Id* Act 
----------------------------+
00825  M02S00686.ns22000 ---|          MX4    -12

Seq #  *Modification Id* Act 
----------------------------+
00826  M02S00687.ns22000 ---|          BX1    -X4*X1      MST ADDRESS/10

Seq #  *Modification Id* Act 
----------------------------+
00827  M02S00688.ns22000 ---|          SA2    MSTA

Seq #  *Modification Id* Act 
----------------------------+
00828  M02S00689.ns22000 ---|          LX1    21

Seq #  *Modification Id* Act 
----------------------------+
00829  M02S00690.ns22000 ---|          BX6    X1+X2

Seq #  *Modification Id* Act 
----------------------------+
00830  M02S00691.ns22000 ---|          SA6    A2         MST STATUS WORD

Seq #  *Modification Id* Act 
----------------------------+
00831  M02S00692.ns22000 ---|

Seq #  *Modification Id* Act 
----------------------------+
00832  M02S00693.ns22000 ---|*         READ MST.

Seq #  *Modification Id* Act 
----------------------------+
00833  M02S00694.ns22000 ---|

Seq #  *Modification Id* Act 
----------------------------+
00834  M02S00695.ns22000 ---|          SYSTEM RSB,R,MSTA

Seq #  *Modification Id* Act 
----------------------------+
00835  M02S00696.ns22000 ---|          SA1    MBUF+PFGL

Seq #  *Modification Id* Act 
----------------------------+
00836  M02S00697.ns22000 ---|          MX4    42

Seq #  *Modification Id* Act 
----------------------------+
00837  M02S00698.ns22000 ---|          BX6    X4*X1       FAMILY OR PACK NAME

Seq #  *Modification Id* Act 
----------------------------+
00838  M02S00699.ns22000 ---|          ZR     X6,OPB2     IF NO NAME

Seq #  *Modification Id* Act 
----------------------------+
00839  M02S00700.ns22000 ---|          SA6    BOPE+2

Seq #  *Modification Id* Act 
----------------------------+
00840  M02S00075.v23l617 ---|*         PROCESS FAMILY NAME AND PACKNAME, IF ANY.
00841  M01S00015.v23l617 +++|*         PROCESS FAMILY NAME AND PACK NAME, IF ANY.
00842  M01S00076.ns22000 +++|
00843  M01S00077.ns22000 +++|          GETPFP WBUF        GET PERMANENT FILE INFORMATION
00844  M01S00078.ns22000 +++|          SA1    WBUF
00845  M01S00079.ns22000 +++|          MX0    42
00846  M01S00080.ns22000 +++|          BX6    X0*X1
00847  M01S00081.ns22000 +++|          ZR     X6,OPB1     IF NO FAMILY NAME

Seq #  *Modification Id* Act 
----------------------------+
00848  M02S00082.v23l617 ---|          SA6    BOPE+2
00849  M01S00016.v23l617 +++|          SA6    BOFM+2
00850  M01S00083.ns22000 +++| OPB1     SA1    A1+B1
00851  M01S00084.ns22000 +++|          BX6    X0*X1

Seq #  *Modification Id* Act 
----------------------------+
00852  M02S00085.v23l617 ---|          ZR     X6,OPB2     IF NO PACKNAME

Seq #  *Modification Id* Act 
----------------------------+
00853  M02S00017.ns2350  ---|          ZR     X6,OPB2     IF NO PACK NAME
00854  M01S00001.ns2350  +++|          ZR     X6,OPB1.1   IF NO PACK NAME IN CPA

Seq #  *Modification Id* Act 
----------------------------+
00855  M02S00086.v23l617 ---|          SA6    BOPF+2

Seq #  *Modification Id* Act 
----------------------------+
00856  M02S00018.ns2350  ---|          SA6    BOPN+2
00857  M01S00002.ns2350  +++|          SA6    BOPN+2      SET PACK NAME
00858  M01S00087.ns22000 +++|          BX6    -X0*X1
00859  M01S00088.ns22000 +++|          LX6    42

Seq #  *Modification Id* Act 
----------------------------+
00860  M02S00089.ns2350  ---|          ZR     X6,OPB2     IF DEFAULT DEVICE TYPE

Seq #  *Modification Id* Act 
----------------------------+
00861  M03S00090.ns2350  ---|          SA6    BOPF+5

Seq #  *Modification Id* Act 
----------------------------+
00862  M02S00019.ns2350  ---|          SA6    BOPN+5
00863  M01S00003.ns2350  +++|          SA6    BOPN+5      SET PACK TYPE
00864  M01S00004.ns2350  +++|          NZ     X6,OPB2     IF PACK TYPE SPECIFIED IN CPA
00865  M01S00005.ns2350  +++| OPB1.1   SYSTEM RSB,R,OPBC  READ PFNL WORD
00866  M01S00006.ns2350  +++|          SA1    OPBD        GET SYSTEM DEFAULT PACK TYPE
00867  M01S00007.ns2350  +++|          MX6    18
00868  M01S00008.ns2350  +++|          BX6    X6*X1
00869  M01S00009.ns2350  +++|          SA6    BOPN+5      SET PACK TYPE
00870  M01S00701.enquire +++|

Seq #  *Modification Id* Act 
----------------------------+
00871  M02S00702.v23l617 ---|*         PROCESS USER NUMBER AND USER INDEX.
00872  M01S00020.v23l617 +++|*         PROCESS USER NAME AND USER INDEX.
00873  M01S00703.enquire +++|

Seq #  *Modification Id* Act 
----------------------------+
00874  M02S00704.v23l617 ---| OPB2     SA5    BUFF+UIDW   USER NUMBER
00875  M01S00021.v23l617 +++| OPB2     SA5    BUFF+UIDW   USER NAME
00876  M01S00705.enquire +++|          MX4    -18
00877  M01S00706.enquire +++|          BX6    X4*X5

Seq #  *Modification Id* Act 
----------------------------+
00878  M02S00707.v23l617 ---|          SA6    BOPA+2
00879  M01S00022.v23l617 +++|          SA6    BOUN+2
00880  M01S00708.enquire +++|

Seq #  *Modification Id* Act 
----------------------------+
00881  M02S00709.ns22000 ---|*         COMPUTING USER INDEX HASH.
00882  M01S00091.ns22000 +++|*         PROCESS HASH CODE AND JOB SEQUENCE NAME.
00883  M01S00710.enquire +++|
00884  M01S00711.enquire +++|          MX4    -17
00885  M01S00712.enquire +++|          BX7    -X4*X5
00886  M01S00713.enquire +++|          RJ     CIH         COMPUTE USER INDEX HASH

Seq #  *Modification Id* Act 
----------------------------+
00887  M02S00714.v23l617 ---|          SA7    BOPB+2

Seq #  *Modification Id* Act 
----------------------------+
00888  M02S00092.v23l617 ---|          GETJN  BOPD+2
00889  M01S00023.v23l617 +++|          SA7    BOUH+2
00890  M01S00024.v23l617 +++|          GETJN  BOJS+2      GET JSN
00891  M01S00025.v23l617 +++|
00892  M01S00026.v23l617 +++|*         PROCESS CHARGE AND PROJECT NUMBER.
00893  M01S00027.v23l617 +++|
00894  M01S00028.v23l617 +++|          GETCN  WBUF        GET CHARGE NUMBER INFORMATION
00895  M01S00029.v23l617 +++|          SA1    WBUF        SET CHARGE NUMBER
00896  M01S00030.v23l617 +++|          ZR     X1,OPB2.1   IF NO CHARGE NUMBER
00897  M01S00031.v23l617 +++|          RJ     SFN         SPACE FILL NAME
00898  M01S00032.v23l617 +++|          SA6    BOCN+2
00899  M01S00033.v23l617 +++|          SA1    WBUF+1      SET PROJECT NUMBER
00900  M01S00034.v23l617 +++|          ZR     X1,OPB2.1   IF NO PROJECT NUMBER
00901  M01S00035.v23l617 +++|          RJ     SFN         SPACE FILL NAME
00902  M01S00036.v23l617 +++|          SA6    BOPJ+2
00903  M01S00037.v23l617 +++|          SA1    WBUF+2
00904  M01S00038.v23l617 +++|          RJ     SFN         SPACE FILL NAME
00905  M01S00039.v23l617 +++|          SA6    BOPJ+3
00906  M01S00715.enquire +++|

Seq #  *Modification Id* Act 
----------------------------+
00907  M02S00716.ns22000 ---|*         PROCESSING PRIMARY FILE NAME.
00908  M01S00093.ns22000 +++|*         PROCESS PRIMARY FILE.
00909  M01S00717.enquire +++|

Seq #  *Modification Id* Act 
----------------------------+
00910  M02S00718.v23l617 ---|          SA1    GPRM        SET OPTIONS FOR GETFNT
00911  M01S00040.v23l617 +++| OPB2.1   SA1    GPRM        SET OPTIONS FOR GETFNT
00912  M01S00719.enquire +++|          BX6    X1
00913  M01S00720.enquire +++|          MX7    0           CLEAR BUFFER CONTROL WORD
00914  M01S00721.enquire +++|          SA7    FBUF
00915  M01S00722.enquire +++|          SA6    FILEFET+8   GETFNT STATUS WORD

Seq #  *Modification Id* Act 
----------------------------+
00916  M02S00723.ns22000 ---| OPB2.1   GETFNT FILEFET     GET PRIMARY FILE NAME
00917  M01S00094.ns22000 +++|          GETFNT FILEFET     GET PRIMARY FILE NAME
00918  M01S00724.enquire +++|          MX6    0           CLEAR STATUS WORD
00919  M01S00725.enquire +++|          SA6    FILEFET+8
00920  M01S00726.enquire +++|          SA2    FBUF+1
00921  M01S00727.enquire +++|          MX0    42

Seq #  *Modification Id* Act 
----------------------------+
00922  M02S00728.242l642 ---|          BX6    X0*X2       PRIMARY FILE NAME

Seq #  *Modification Id* Act 
----------------------------+
00923  M02S00729.242l642 ---|          ZR     X6,OPB3     IF NO PRIMARY FILE
00924  M01S00001.242l642 +++|          BX1    X0*X2
00925  M01S00002.242l642 +++|          ZR     X1,OPB3     IF NO PRIMARY FILE
00926  M01S00003.242l642 +++|          RJ     SFN         SPACE FILL NAME

Seq #  *Modification Id* Act 
----------------------------+
00927  M02S00730.v23l617 ---|          SA6    BOPG+2
00928  M01S00041.v23l617 +++|          SA6    BOPF+2
00929  M01S00004.242l642 +++|          SA2    A2+1
00930  M01S00005.242l642 +++|          LX2    59-8
00931  M01S00006.242l642 +++|          PL     X2,OPB3     IF FILE ACCESSIBLE
00932  M01S00007.242l642 +++|          SA2    OPBB
00933  M01S00008.242l642 +++|          BX6    X2
00934  M01S00009.242l642 +++|          SA6    BOPF+3
00935  M01S00731.enquire +++|

Seq #  *Modification Id* Act 
----------------------------+
00936  M02S00732.ns22000 ---|*         PROCESSING SUBSYSTEM NAME.
00937  M01S00095.ns22000 +++|*         PROCESS SUBSYSTEM.
00938  M01S00733.enquire +++|
00939  M01S00734.enquire +++| OPB3     SA2    BUFF+TXSW   TELEX SUBSYSTEM WORD
00940  M01S00735.enquire +++|          MX0    -6
00941  M01S00736.enquire +++|          LX2    6
00942  M01S00737.enquire +++|          BX1    -X0*X2      SUB-SYSTEM TABLE INDEX
00943  M01S00738.enquire +++|          SB3    X1-MSYS

Seq #  *Modification Id* Act 
----------------------------+
00944  M02S00739.v23l617 ---|          PL     B3,OPB4     IF INVALID SUB-SYSTEM
00945  M01S00042.v23l617 +++|          PL     B3,OPB4     IF INCORRECT SUB-SYSTEM
00946  M01S00740.enquire +++|          SA1    SSTB+X1     SUB-SYSTEM TABLE
00947  M01S00741.enquire +++|          BX6    X1

Seq #  *Modification Id* Act 
----------------------------+
00948  M02S00742.v23l617 ---|          SA6    BOPH+2
00949  M01S00043.v23l617 +++|          SA6    BOSU+2
00950  M01S00743.enquire +++|
00951  M01S00744.enquire +++|*         PROCESS FIELD LENGTH.
00952  M01S00745.enquire +++|

Seq #  *Modification Id* Act 
----------------------------+
00953  M02S00746.v23l617 ---| OPB4     SA5    BUFF+ELCW   ECS STATUS WORD

Seq #  *Modification Id* Act 
----------------------------+
00954  M02S00044.252l678 ---| OPB4     SA5    BUFF+ELCW   EXTENDED MEMORY STATUS WORD
00955  M01S00002.252l678 +++| OPB4     SA3    UESC        GET USER EM SHIFT COUNT
00956  M01S00003.252l678 +++|          SA5    BUFF+ELCW   EXTENDED MEMORY STATUS WORD
00957  M01S00747.enquire +++|          MX0    -12
00958  M01S00004.252l678 +++|          SB5    X3+9

Seq #  *Modification Id* Act 
----------------------------+
00959  M02S00748.v23l617 ---|          LX5    12          CONVERT ECS MFL
00960  M01S00045.v23l617 +++|          LX5    12          CONVERT EXTENDED MEMORY MFL
00961  M01S00749.enquire +++|          BX1    -X0*X5

Seq #  *Modification Id* Act 
----------------------------+
00962  M02S00750.ns2184  ---|          LX1    9           TRACKS * 1000

Seq #  *Modification Id* Act 
----------------------------+
00963  M02S00001.252l678 ---|          LX1    9+UESF      BLOCKS*(UEBS)
00964  M01S00005.252l678 +++|          LX1    B5
00965  M01S00751.enquire +++|          RJ     COD         CONVERT TO OCTAL DISPLAY CODE
00966  M01S00752.enquire +++|          BX6    X0*X4

Seq #  *Modification Id* Act 
----------------------------+
00967  M02S00753.v23l617 ---|          SA6    BOPL+2
00968  M01S00046.v23l617 +++|          SA6    BOME+2

Seq #  *Modification Id* Act 
----------------------------+
00969  M02S00754.v23l617 ---|          LX5    12          CONVERT LAST ECS FIELD LENGTH
00970  M01S00047.v23l617 +++|          LX5    12          CONVERT LAST EXTENDED MEMORY FIELD LENGTH
00971  M01S00755.enquire +++|          BX1    -X0*X5

Seq #  *Modification Id* Act 
----------------------------+
00972  M02S00756.ns2184  ---|          LX1    9           TRACKS * 1000

Seq #  *Modification Id* Act 
----------------------------+
00973  M02S00002.252l678 ---|          LX1    9+UESF      BLOCKS*(UEBS)
00974  M01S00006.252l678 +++|          LX1    B5
00975  M01S00757.enquire +++|          RJ     COD
00976  M01S00758.enquire +++|          BX6    X0*X4

Seq #  *Modification Id* Act 
----------------------------+
00977  M02S00759.v23l617 ---|          SA6    BOPN+2
00978  M01S00048.v23l617 +++|          SA6    BOLE+2
00979  M01S00760.enquire +++|          SA5    BUFF+FLCW   CM MEMORY CONTROL WORD
00980  M01S00761.enquire +++|          LX5    12          CONVERT CM MFL
00981  M01S00762.enquire +++|          BX1    -X0*X5
00982  M01S00763.enquire +++|          LX1    6           BLOCKS * 100
00983  M01S00764.enquire +++|          RJ     COD
00984  M01S00765.enquire +++|          BX6    X0*X4

Seq #  *Modification Id* Act 
----------------------------+
00985  M02S00766.v23l617 ---|          SA6    BOPK+2
00986  M01S00049.v23l617 +++|          SA6    BOMF+2
00987  M01S00767.enquire +++|          LX5    12          CONVERT CM LAST FIELD LENGTH
00988  M01S00768.enquire +++|          BX1    -X0*X5
00989  M01S00769.enquire +++|          LX1    6           BLOCKS * 100
00990  M01S00770.enquire +++|          RJ     COD
00991  M01S00771.enquire +++|          BX6    X0*X4

Seq #  *Modification Id* Act 
----------------------------+
00992  M02S00772.v23l617 ---|          SA6    BOPM+2
00993  M01S00050.v23l617 +++|          SA6    BOLF+2
00994  M01S00096.ns22000 +++|
00995  M01S00097.ns22000 +++|*         PROCESS JOB ACCESS LEVELS IF SECURE SYSTEM.
00996  M01S00098.ns22000 +++|
00997  M01S00099.ns22000 +++|          SA1    SSFL
00998  M01S00100.ns22000 +++|          ZR     X1,OPB8     IF NON-SECURE SYSTEM
00999  M01S00101.ns22000 +++|          GETJAL ALVL        GET JOB ACCESS LEVELS
01000  M01S00102.ns22000 +++|          SA1    ALVL        GET CURRENT JOB ACCESS LEVEL
01001  M01S00103.ns22000 +++|          MX0    -3
01002  M01S00104.ns22000 +++|          BX2    -X0*X1
01003  M01S00105.ns22000 +++|          SA2    TALV+X2
01004  M01S00106.ns22000 +++|          MX3    42
01005  M01S00107.ns22000 +++|          BX6    X2*X3

Seq #  *Modification Id* Act 
----------------------------+
01006  M02S00108.v23l617 ---|          SA6    BOPO+2
01007  M01S00051.v23l617 +++|          SA6    BOAL+2
01008  M01S00109.ns22000 +++|          AX1    6           GET JOB ACCESS LEVEL UPPER LIMIT
01009  M01S00110.ns22000 +++|          BX2    -X0*X1
01010  M01S00111.ns22000 +++|          SA2    TALV+X2
01011  M01S00112.ns22000 +++|          BX6    X2*X3

Seq #  *Modification Id* Act 
----------------------------+
01012  M02S00113.v23l617 ---|          SA6    BOPQ+2
01013  M01S00052.v23l617 +++|          SA6    BOUL+2
01014  M01S00114.ns22000 +++|          AX1    6           GET JOB ACCESS LEVEL LOWER LIMIT
01015  M01S00115.ns22000 +++|          BX2    -X0*X1
01016  M01S00116.ns22000 +++|          SA2    TALV+X2
01017  M01S00117.ns22000 +++|          BX6    X2*X3

Seq #  *Modification Id* Act 
----------------------------+
01018  M02S00118.v23l617 ---|          SA6    BOPP+2
01019  M01S00053.v23l617 +++|          SA6    BOLL+2
01020  M01S00119.ns22000 +++|
01021  M01S00120.ns22000 +++|*         PROCESS JOB ACCESS CATEGORIES IF SECURE SYSTEM.
01022  M01S00121.ns22000 +++|
01023  M01S00122.ns22000 +++|          GETUSV ACAT        GET JOB ACCESS CATEGORIES
01024  M01S00123.ns22000 +++|          SA4    ACAT
01025  M01S00124.ns22000 +++|          SB3    32          NUMBER OF CATEGORIES TO CHECK
01026  M01S00125.ns22000 +++|          SB4    B0          INDEX INTO TABLE OF CATEGORY NAMES
01027  M01S00126.ns22000 +++|          SB5    B1          POINTER FOR STORING CATEGORY NAME
01028  M01S00127.ns22000 +++|          SB6    6           COUNT OF WORDS TO BE SPACE FILLED
01029  M01S00128.ns22000 +++| OPB5     LX4    -1
01030  M01S00129.ns22000 +++|          PL     X4,OPB7     IF CATEGORY NOT SET
01031  M01S00130.ns22000 +++|          SA2    TACT+B4     GET CATEGORY NAME
01032  M01S00131.ns22000 +++|          MX0    42
01033  M01S00132.ns22000 +++|          BX1    X0*X2
01034  M01S00133.ns22000 +++|          RJ     SFN         SPACE FILL NAME
01035  M01S00134.ns22000 +++|          LX6    -18

Seq #  *Modification Id* Act 
----------------------------+
01036  M02S00135.v23l617 ---|          SA6    BOPR+B5     SAVE CATEGORY NAME
01037  M01S00054.v23l617 +++|          SA6    BOAC+B5     SAVE CATEGORY NAME
01038  M01S00136.ns22000 +++|          SB6    B6-B1
01039  M01S00137.ns22000 +++|          SA1    OPBA        INCREMENT PRINTED LINE COUNT
01040  M01S00138.ns22000 +++|          SX6    X1+B1
01041  M01S00139.ns22000 +++|          SA6    A1
01042  M01S00140.ns22000 +++|          PL     B6,OPB6     IF COUNT NOT TO BE RESET
01043  M01S00141.ns22000 +++|          SB6    6
01044  M01S00142.ns22000 +++|          SB5    B5+B1       WRITE END-OF-LINE
01045  M01S00143.ns22000 +++|          BX6    X6-X6

Seq #  *Modification Id* Act 
----------------------------+
01046  M02S00144.v23l617 ---|          SA6    BOPR+B5
01047  M01S00055.v23l617 +++|          SA6    BOAC+B5
01048  M01S00145.ns22000 +++|          SA1    OPBA        INCREMENT PRINTED LINE COUNT
01049  M01S00146.ns22000 +++|          SX6    X1+B1
01050  M01S00147.ns22000 +++|          SA6    A1
01051  M01S00148.ns22000 +++| OPB6     SB5    B5+B1
01052  M01S00149.ns22000 +++| OPB7     SB4    B4+B1
01053  M01S00150.ns22000 +++|          SB3    B3-B1
01054  M01S00151.ns22000 +++|          NZ     B3,OPB5     IF MORE CATEGORIES TO CHECK
01055  M01S00152.ns22000 +++|          SA1    OPBA        GET LINE COUNT
01056  M01S00153.ns22000 +++|          WRITEW OUTPUT,BOP,X1
01057  M01S00154.ns22000 +++|          EQ     MAIN1       RETURN
01058  M01S00155.ns22000 +++|

Seq #  *Modification Id* Act 
----------------------------+
01059  M02S00773.ns22000 ---|          WRITEW OUTPUT,BOP,BOLL

Seq #  *Modification Id* Act 
----------------------------+
01060  M02S00156.v23l617 ---| OPB8     WRITEW OUTPUT,BOP,BOLL
01061  M01S00056.v23l617 +++| OPB8     WRITEW OUTPUT,BOP,BOPL
01062  M01S00774.enquire +++|          EQ     MAIN1       RETURN
01063  M01S00157.ns22000 +++|
01064  M01S00158.ns22000 +++| OPBA     CON    BLLL        PRINTED LINE COUNT
01065  M01S00010.242l642 +++| OPBB     DATA   10L*INACCESS*  FILE NOT ACCESSIBLE STATUS

Seq #  *Modification Id* Act 
----------------------------+
01066  M02S00775.ns2350  ---|
01067  M01S00010.ns2350  +++| OPBC     VFD    12/0,12/1,18/PFNL,18/OPBD  PFNL READ CONTROL
01068  M01S00011.ns2350  +++| OPBD     VFD    1/1,59/0    PFNL CODE
01069  M01S00012.ns2350  +++|
01070  M01S00776.enquire +++|
01071  M01S00777.enquire +++|
01072  M01S00778.enquire +++|*         *OUTPUT FORMAT FOR B-OPTION*
01073  M01S00779.enquire +++|
01074  M01S00780.enquire +++| BOP      DATA   0
01075  M01S00781.enquire +++|          DATA   L* SYSTEM ACTIVITY.*
01076  M01S00782.enquire +++|          DATA   0

Seq #  *Modification Id* Act 
----------------------------+
01077  M02S00783.enqui1  ---| BOPA     DATA   20H   USER NUMBER

Seq #  *Modification Id* Act 
----------------------------+
01078  M02S00001.v23l617 ---| BOPA     DATA   20H   USER NAME
01079  M01S00057.v23l617 +++| BOUN     DATA   20H   USER NAME
01080  M01S00784.enquire +++|          DATA   0

Seq #  *Modification Id* Act 
----------------------------+
01081  M02S00785.v23l617 ---| BOPB     DATA   20H   USER INDEX HASH
01082  M01S00058.v23l617 +++| BOUH     DATA   20H   USER INDEX HASH
01083  M01S00786.enquire +++|          DATA   0

Seq #  *Modification Id* Act 
----------------------------+
01084  M02S00787.enqui1  ---| BOPD     DATA   20H   JOB SEQ.NO.

Seq #  *Modification Id* Act 
----------------------------+
01085  M02S00002.v23l617 ---| BOPD     DATA   20H   JOB SEQ. NAME
01086  M01S00059.v23l617 +++| BOJS     DATA   20H   JOB SEQ. NAME
01087  M01S00788.enquire +++|          DATA   0

Seq #  *Modification Id* Act 
----------------------------+
01088  M02S00789.v23l617 ---| BOPE     DATA   20H   FAMILY
01089  M01S00060.v23l617 +++| BOFM     DATA   20H   FAMILY
01090  M01S00790.enquire +++|          DATA   8L*NONE*.

Seq #  *Modification Id* Act 
----------------------------+
01091  M02S00791.v23l617 ---| BOPF     DATA   20H   PACKNAME
01092  M01S00061.v23l617 +++| BOCN     DATA   20H   CHARGE NUMBER
01093  M01S00062.v23l617 +++|          DATA   10H*NONE*.
01094  M01S00063.v23l617 +++|          DATA   0
01095  M01S00064.v23l617 +++| BOPJ     DATA   20H   PROJECT NUMBER
01096  M01S00065.v23l617 +++|          DATA   20H*NONE*.
01097  M01S00066.v23l617 +++|          DATA   0
01098  M01S00067.v23l617 +++| BOPN     DATA   20H   PACK NAME
01099  M01S00792.enquire +++|          DATA   8L*NONE*.
01100  M01S00159.ns22000 +++|          DATA   20H   PACK TYPE
01101  M01S00160.ns22000 +++|          VFD    18/DFPT,42/0

Seq #  *Modification Id* Act 
----------------------------+
01102  M02S00793.v23l617 ---| BOPG     DATA   20H   PRIMARY FILE
01103  M01S00068.v23l617 +++| BOPF     DATA   20H   PRIMARY FILE

Seq #  *Modification Id* Act 
----------------------------+
01104  M02S00794.242l642 ---|          DATA   8L*NONE*.
01105  M01S00011.242l642 +++|          DATA   10L*NONE*.
01106  M01S00012.242l642 +++|          DATA   10L
01107  M01S00013.242l642 +++|          DATA   0

Seq #  *Modification Id* Act 
----------------------------+
01108  M02S00795.v23l617 ---| BOPH     DATA   20H   SUB SYSTEM
01109  M01S00069.v23l617 +++| BOSU     DATA   20H   SUBSYSTEM
01110  M01S00796.enquire +++|          DATA   0

Seq #  *Modification Id* Act 
----------------------------+
01111  M02S00797.v23l617 ---| BOPJ     DATA   20H   CPU PRIORITY
01112  M01S00070.v23l617 +++| BOCP     DATA   20H   CPU PRIORITY
01113  M01S00798.enquire +++|          DATA   0

Seq #  *Modification Id* Act 
----------------------------+
01114  M02S00799.v23l617 ---| BOPK     DATA   20H   MAX FL (CM)
01115  M01S00071.v23l617 +++| BOMF     DATA   20H   MAX FL (CM)
01116  M01S00800.enquire +++|          DATA   0

Seq #  *Modification Id* Act 
----------------------------+
01117  M02S00801.v23l617 ---| BOPL     DATA   20H   MAX FL (EC)
01118  M01S00072.v23l617 +++| BOME     DATA   20H   MAX FL (EM)
01119  M01S00802.enquire +++|          DATA   0

Seq #  *Modification Id* Act 
----------------------------+
01120  M02S00803.v23l617 ---| BOPM     DATA   20H   LAST FL (CM)
01121  M01S00073.v23l617 +++| BOLF     DATA   20H   LAST FL (CM)
01122  M01S00804.enquire +++|          DATA   0

Seq #  *Modification Id* Act 
----------------------------+
01123  M02S00805.v23l617 ---| BOPN     DATA   20H   LAST FL (EC)
01124  M01S00074.v23l617 +++| BOLE     DATA   20H   LAST FL (EM)
01125  M01S00806.enquire +++|          DATA   0

Seq #  *Modification Id* Act 
----------------------------+
01126  M02S00807.v23l617 ---| BOLL     EQU    *-BOP
01127  M01S00075.v23l617 +++| BOPL     EQU    *-BOP
01128  M01S00161.ns22000 +++|          DATA   0
01129  M01S00162.ns22000 +++|          DATA   C*   JOB SECURITY ACCESS LEVELS*
01130  M01S00163.ns22000 +++|          DATA   0

Seq #  *Modification Id* Act 
----------------------------+
01131  M02S00164.v23l617 ---| BOPO     DATA   20H   CURRENT
01132  M01S00076.v23l617 +++| BOAL     DATA   20H   CURRENT
01133  M01S00165.ns22000 +++|          DATA   0

Seq #  *Modification Id* Act 
----------------------------+
01134  M02S00166.v23l617 ---| BOPP     DATA   20H   LOWER LIMIT
01135  M01S00077.v23l617 +++| BOLL     DATA   20H   LOWER LIMIT
01136  M01S00167.ns22000 +++|          DATA   0

Seq #  *Modification Id* Act 
----------------------------+
01137  M02S00168.v23l617 ---| BOPQ     DATA   20H   UPPER LIMIT
01138  M01S00078.v23l617 +++| BOUL     DATA   20H   UPPER LIMIT
01139  M01S00169.ns22000 +++|          DATA   0
01140  M01S00170.ns22000 +++|          DATA   0
01141  M01S00171.ns22000 +++|          DATA   C*   JOB SECURITY ACCESS CATEGORIES*

Seq #  *Modification Id* Act 
----------------------------+
01142  M02S00172.v23l617 ---| BOPR     DATA   0
01143  M01S00079.v23l617 +++| BOAC     DATA   0
01144  M01S00173.ns22000 +++|          DATA   10H   *NONE*.
01145  M01S00174.ns22000 +++|          DATA   0
01146  M01S00175.ns22000 +++| BLLL     EQU    *-BOP       INITIAL OUTPUT LENGTH
01147  M01S00176.ns22000 +++|          DUP    39,1
01148  M01S00177.ns22000 +++|          DATA   0
01149  M01S00808.enquire +++| OPD      TITLE  D OPTION.
01150  M01S00809.enquire +++|**        THE OP = D OPTION RETURNS TO THE USER THE RESOURCE
01151  M01S00810.enquire +++|*         DEMAND AND ASSIGNED COUNTS FROM THE USER DEMAND FILE
01152  M01S00811.enquire +++|*         ENTRY.
01153  M01S00812.enquire +++|
01154  M01S00813.enquire +++|
01155  M01S00814.enquire +++| OPD      WRITEW OUTPUT,FOD,FODA  HEADER
01156  M01S00815.enquire +++|
01157  M01S00816.enquire +++|*         SET CORRECT DEMAND FILE NAME.
01158  M01S00817.enquire +++|
01159  M01S00818.enquire +++|          SA1    BUFF+RFCW
01160  M01S00819.enquire +++|          MX0    -18
01161  M01S00820.enquire +++|          BX6    -X0*X1
01162  M01S00821.enquire +++|          ZR     X6,OPD7     IF NO DEMAND FILE ENTRY
01163  M01S00822.enquire +++|          SYSTEM RSB,R,OPDA  READ MMFL WORD
01164  M01S00823.enquire +++|          SA1    OPDC        SET CORRECT DEMAND FILE NAME
01165  M01S00824.enquire +++|          MX0    12
01166  M01S00825.enquire +++|          BX3    X0*X1
01167  M01S00826.enquire +++|          SA2    OPDB
01168  M01S00827.enquire +++|          LX0    -24
01169  M01S00828.enquire +++|          BX2    -X0*X2
01170  M01S00829.enquire +++|          LX3    -24
01171  M01S00830.enquire +++|          BX6    X3+X2
01172  M01S00831.enquire +++|          SA6    A2+
01173  M01S00832.enquire +++|          ATTACH FILEFET,OPDB,,,RM,,,DF,FA
01174  M01S00833.enquire +++|          SA1    BUFF+RFCW  CHECK DEMAND FILE INDEX
01175  M01S00834.enquire +++|          MX0    -18
01176  M01S00835.enquire +++|          BX6    -X0*X1
01177  M01S00836.enquire +++|          SA6    FILEFET+6
01178  M01S00837.enquire +++|          READ   X2,R        READ DEMAND FILE ENTRY
01179  M01S00838.enquire +++|          SA5    FBUF+RVAL   CHECK FOR TOTAL DEMAND = TOTAL ASSIGN = 0
01180  M01S00839.enquire +++|          MX2    -24
01181  M01S00840.enquire +++|          BX2    -X2*X5

Proceed to Part 1