Deck LIBTASK Part 002

9 Modifications

Listing Sections

Deck LIBTASK Start
Deck LIBTASK Part 1 (Line 1927)
Deck LIBTASK Part 2 (Line 3637)

Source

Seq #  *Modification Id* Act 
----------------------------+
03637  M01S03507.libtask +++|          CON    EFL         EXPANDABLE FIELD LENGTH
03638  M01S03508.libtask +++|          CON    CRE         REDUCE FL
03639  M01S03509.libtask +++|
03640  M01S03510.libtask +++| INPG     DATA   C*0LIBTASK DIRECTIVES.     *
03641  M01S03511.libtask +++|          DATA   C*  *
03642  M01S03512.libtask +++| INPGL    EQU    *-INPG

Line S03513 Modification History
`M01` (Added by)	`libtask`
`M02` (Updated by)	`v23l617`

Seq #  *Modification Id* Act 
----------------------------+
03643  M02S03513.v23l617 ---| INPH     DATA   C/  *******  ILLEGAL DIRECTIVE./
03644  M01S00060.v23l617 +++| INPH     DATA   C/  *******  INCORRECT DIRECTIVE./
03645  M01S03514.libtask +++| INPHL    EQU    *-INPH
03646  M01S03515.libtask +++| INPI     CON    0
03647  M01S03516.libtask +++| INPJ     CON    10H  *ERROR*
03648  M01S03517.libtask +++| INPK     CON    10H
03649  M01S03518.libtask +++| INPL     CON    0           DIRECTIVE INPUT ERROR COUNT
03650  M01S03519.libtask +++| INPM     DATA   C/  ** INPUT DIRECTIVE ERRORS **/
03651  M01S03520.libtask +++| INPML    EQU    *-INPM
03652  M01S03521.libtask +++| INPN     CON    0           ADDRESS OF TASK CHANGING DIRECTIVES FOR
03653  M01S03522.libtask +++|
03654  M01S03523.libtask +++|*         TABLE OF VALID TRANSACTION DIRECTIVE PARAMETERS.
03655  M01S03524.libtask +++|
03656  M01S03525.libtask +++| INPO     BSS    0
03657  M01S03526.libtask +++| T1       ARG    INPP,TSK1
03658  M01S03527.libtask +++| T2       ARG    INPP,TSK2
03659  M01S03528.libtask +++| T3       ARG    INPP,TSK3
03660  M01S03529.libtask +++| T4       ARG    INPP,TSK4
03661  M01S03530.libtask +++| T5       ARG    INPP,TSK5
03662  M01S03531.libtask +++| RC       ARG    -INPP-1,RC
03663  M01S03532.libtask +++| DM       ARG    INPP,DM
03664  M01S03533.libtask +++| DL       ARG    -INPP-1,TDL
03665  M01S03534.libtask +++|          ARG
03666  M01S03535.libtask +++|
03667  M01S03536.libtask +++| INPP     CON    0
03668  M01S03537.libtask +++|          CON    1
03669  M01S03538.libtask +++|
03670  M01S03539.libtask +++| INPQ     CON    0           NONZERO INDICATES TRANSACTION DIRECTIVE
03671  M01S03540.libtask +++| INPR     CON    0           ARGUMENT COUNT
03672  M01S03541.libtask +++| INPS     DATA   C* WARNING - TRANSACTION NAME NONEXISTENT   XXXXXXX.*
03673  M01S03542.libtask +++| INPT     CON    0           TRANSACTION UNIT NAME
03674  M01S03543.libtask +++|
03675  M01S03544.libtask +++|*         TABLE OF VALID DATA MANAGER PARAMETERS.
03676  M01S03545.libtask +++|
03677  M01S03546.libtask +++| INPU     VFD    12/0LC,48/2       *CRM*
03678  M01S03547.libtask +++|          VFD    12/0LD,48/4       *CDCS*
03679  M01S03548.libtask +++|          VFD    12/0LCD,48/6      *CRM* + *CDCS*
03680  M01S03549.libtask +++|          VFD    12/0LDC,48/6      *CRM* + *CDCS*
03681  M01S03550.libtask +++|          CON    0           TABLE TERMINATOR
03682  M01S03551.libtask +++|
03683  M01S03552.libtask +++|          SPACE  4
03684  M01S03553.libtask +++| ENDP     EQU    *           END OF PRESET CODE
03685  M01S03554.libtask +++| BUFFERS  TITLE  FILE BUFFERS.
03686  M01S03555.libtask +++| TBL      EQU    1001B
03687  M01S03556.libtask +++| TB       EQU    PRS         WORKING BUFFER FOR TASK BINARY
03688  M01S03557.libtask +++|
03689  M01S03558.libtask +++|
03690  M01S03559.libtask +++| BBUFL    EQU    1001B
03691  M01S03560.libtask +++| BBUF     EQU    TB+TBL      BINARY FILE BUFFER
03692  M01S03561.libtask +++|
03693  M01S03562.libtask +++|
03694  M01S03563.libtask +++| HBL      EQU    102B
03695  M01S03564.libtask +++| HB       EQU    BBUF+BBUFL  BUFFER FOR FIRST 66 WORDS OF TASK
03696  M01S03565.libtask +++|
03697  M01S03566.libtask +++|
03698  M01S03567.libtask +++| SBUFL    EQU    1001B
03699  M01S03568.libtask +++| SBUF     EQU    HB+HBL      SCRATCH FILE BUFFER
03700  M01S03569.libtask +++|
03701  M01S03570.libtask +++|
03702  M01S03571.libtask +++| WBUFL    EQU    14
03703  M01S03572.libtask +++| WBUF     EQU    SBUF+SBUFL  OUTPUT FILE WORKING BUFFER
03704  M01S03573.libtask +++|
03705  M01S03574.libtask +++|
03706  M01S03575.libtask +++| .1       SET    ENDP        END OF PRESET CODE
03707  M01S03576.libtask +++|          IFGT   WBUF+WBUFL,.1
03708  M01S03577.libtask +++| .1       SET    WBUF+WBUFL
03709  M01S03578.libtask +++|          ENDIF
03710  M01S03579.libtask +++|
03711  M01S03580.libtask +++|
03712  M01S03581.libtask +++| PBUFL    EQU    6002B
03713  M01S03582.libtask +++| PBUF     EQU    .1          TASK LIBRARY FILE
03714  M01S03583.libtask +++|
03715  M01S03584.libtask +++|
03716  M01S03585.libtask +++| IBUFL    EQU    301B
03717  M01S03586.libtask +++| IBUF     EQU    PBUF+PBUFL  INPUT FILE BUFFER
03718  M01S03587.libtask +++|
03719  M01S03588.libtask +++|
03720  M01S03589.libtask +++| OBUFL    EQU    401B
03721  M01S03590.libtask +++| OBUF     EQU    IBUF+IBUFL  OUTPUT FILE BUFFER
03722  M01S03591.libtask +++|
03723  M01S03592.libtask +++|
03724  M01S03593.libtask +++| LASTB    EQU    OBUF+OBUFL
03725  M01S03594.libtask +++|
03726  M01S03595.libtask +++| RFL=     EQU    LASTB+10B
03727  M01S03596.libtask +++|          END    LIBTASK