Table of Contents

EDCB History

References

Update History

CMS File Input : EDCB MACRO
Date : 12/9/1978 4:27:00 AM
VM Context : MAINT(393)
File Name : EDCB.MACRO.Z1.txt
Modified : 1/16/2021 7:31:33 AM
Created : 1/16/2021 7:31:33 AM

Update Order

  1. HRC341DS V00* MULTIPLE FILE

HRC341DS

Date Sunday Jul 20, 2008 07:05:00 PM
Loaded from MAINT(093)
       HRC341DS: ./ * *************                                              GG928C0 00001000
       HRC341DS: ./ * *                                                          GG928C0 00002000
       HRC341DS: ./ * *   HRC341DS  20/07/2008                                   HRC340F 00003000
       HRC341DS: ./ * *                                                          HRC340F 00004000
       HRC341DS: ./ * *       IMPLEMENT RECURSIVE EDITING UP TO NINE LEVELS DEEP HRC340F 00005000
       HRC341DS: ./ * *                                                          HRC340F 00006000
       HRC341DS: ./ * *************                                              HRC340F 00007000
       HRC341DS: ./ R  00014000           $  014000 10                                   00300000
       HRC341DS: FLAG     DS    CL1            FLAGS FOR LINE MONITORING         HRC340F 00009000
       HRC341DS: FLAG2    DS    CL1            MISC. FLAGS                       HRC340F 00010000
       HRC341DS: ./ R  00022000           $  022100 0100                                 00380000
       HRC341DS: LRECL    DS    H              LOGICAL RECORD LENGTH             HRC340F 00012000
       HRC341DS: TABS     DS    26AL1          A MAXIMUM OF 25 TABS IS ALLOWED   HRC340F 00013000
       HRC341DS: ENDTABS  EQU   *              END OF TABS                       HRC340F 00014000
       HRC341DS: SEQNAME  DS    CL3            NAME, IF NAY, FOR SERIALIZATION   HRC340F 00015000
       HRC341DS: ./ R  00026000  00030000 $  026100 0100                                 00460000
       HRC341DS: SCRBUFAD DS    F              ADDR OF GETMAIN BUFFER            HRC340F 00017000
       HRC341DS: ./ I  00077000           $  077010 0010                                 00920000
       HRC341DS: REG14    DS    F              USED TO SAVE R14                  HRC340F 00019000
       HRC341DS: LOC14    DS    A                                                HRC340F 00020000
       HRC341DS: TUBEFLAG DS    X              VIRTUAL CONSOLE IS TUBE           HRC340F 00021000
       HRC341DS: ERRFLAG   DS    X              USED FOR ERROR                   HRC340F 00022000
       HRC341DS: HLDPTR2  DS    F                                                HRC340F 00023000
       HRC341DS: HLDLINNO DS    H                                                HRC340F 00024000
       HRC341DS: ./ I  00102000           $  0102010 0010                                01190000
       HRC341DS: *CMPFLG   EQU  PLSTFLGS                                         HRC340F 00026000
       HRC341DS: ./ I  00144000           $  0144010 005                                 01640000
       HRC341DS:          SPACE ,                                                HRC340F 00028000
       HRC341DS: *                                                               HRC340F 00029000
       HRC341DS:          SPACE 3                                                HRC340F 00030000
       HRC341DS: RUNLVL   DC    F'0',F'1'      LEVEL OF RUN DEPTH, CONSTANT      HRC340F 00031000
       HRC341DS: RUNSAVE  DS    1F             SAVE RETURN CODE WHILE QUITTING   HRC340F 00032000
       HRC341DS: QUITFLG  DS    1X             NORMAL EXEC QUIT FLAG             HRC340F 00033000
       HRC341DS: AAFREEST  DS   F    ADDR OF CURR. RUN FREE STORAGE              HRC340F 00034000
       HRC341DS: ANEXT     DS   F    ADDR. OF 'NEXT' IN EDIT                     HRC340F 00035000
       HRC341DS: AEDLIN1  DS    F              ADDR. OF EDLIN (4 BYTE FORM)      HRC340F 00036000
       HRC341DS: ATRNSTBL DS    F              ADDR. OF SETCHAR TRANS. TBL.      HRC340F 00037000
       HRC341DS: LASTPUT  DS    CL18           'EDIT    CMSUT2  A1'              HRC340F 00038000
       HRC341DS: PUTCNT   DS    H                                                HRC340F 00039000
       HRC341DS: GETPUT   DS    X              'FF' -0 LAST USE A GET FF LAST USE G928C0 00040000
       HRC341DS: GETORPUT DS    X              '0' INTERNAL COMMUNICATION FLAG   HRC340F 00041000
       HRC341DS: LASTGET  DS    CL18           FID OF LAST NON-STANDARD GET      HRC340F 00042000
       HRC341DS: LASTCNT  DS    2H             LINE COUNT AND NUMBER             HRC340F 00043000
       HRC341DS: PFSETCMD DS    CL6            'SET PF'                          HRC340F 00044000
       HRC341DS: PFTABNO  DS    CL2                                              HRC340F 00045000
       HRC341DS:          DS    CL5            'TAB'                             HRC340F 00046000
       HRC341DS: PFTABSET DS    (ENDTABS-TABS)CL4     '    '                     HRC340F 00047000
       HRC341DS: COLLINUM DS    1X             LINE NUMBER FOR GRAPHIC COLUMN DISPG928C0 00048000
       HRC341DS: GLOBAL   DS    CL5            RECURSION LEVEL FOR &GLOBAL       HRC340F 00049000
       HRC341DS: GLOBAL0  DS    10PL5          GLOBAL VARIABLES FOR RUN FILES    HRC340F 00050000
       HRC341DS:          DS    2D             RESERVED                          HRC340F 00051000
       HRC341DS: FWDPNT   DS    1F             EDCB FORWARD POINTER              HRC340F 00052000
       HRC341DS: BACKPNT  DS    1F             BACK POINTER FOR MULTI-LVL        HRC340F 00053000
       HRC341DS: NUMSTRSV DS    2F             SAVE AREA FOR NUMSTAR             HRC340F 00054000
       HRC341DS:          DS    3X             RESERVED                          HRC340F 00055000
       HRC341DS: EDITLVL  DS    X              CURRENT EDIT LEVEL (EBCDIC)       HRC340F 00056000
       HRC341DS: LINSTART DS    F              ADDR. OF START OF LINE STORAGE    HRC340F 00057000
       HRC341DS: COLBUF   DS    F              BUFR ADDR OF COLUMN DISPLAY LINE  HRC340F 00058000
       HRC341DS: ./ I  00185000           $  0185010 0010                                02100000
       HRC341DS: SIGNAL2  DS    X              ADDITIONAL FLAG FOR GET           HRC340F 00060000
       HRC341DS: ./ I  00214000           $  0214010 0010                                02460000
       HRC341DS: LINENUM  DS    H              FOR LINENUMB AND CLOSE,ETC.       HRC340F 00062000
       HRC341DS: ./ * CONVERTED 11/04/80 BY P-E / BMARSH
 BEGIN APPLY >>> ./ * *************                                              GG928C0 00001000
     Comment >>> ./ * *************                                              GG928C0 00001000
   END APPLY >>> ./ * *************                                              GG928C0 00001000
 BEGIN APPLY >>> ./ * *                                                          GG928C0 00002000
     Comment >>> ./ * *                                                          GG928C0 00002000
   END APPLY >>> ./ * *                                                          GG928C0 00002000
 BEGIN APPLY >>> ./ * *   HRC341DS  20/07/2008                                   HRC340F 00003000
     Comment >>> ./ * *   HRC341DS  20/07/2008                                   HRC340F 00003000
   END APPLY >>> ./ * *   HRC341DS  20/07/2008                                   HRC340F 00003000
 BEGIN APPLY >>> ./ * *                                                          HRC340F 00004000
     Comment >>> ./ * *                                                          HRC340F 00004000
   END APPLY >>> ./ * *                                                          HRC340F 00004000
 BEGIN APPLY >>> ./ * *       IMPLEMENT RECURSIVE EDITING UP TO NINE LEVELS DEEP HRC340F 00005000
     Comment >>> ./ * *       IMPLEMENT RECURSIVE EDITING UP TO NINE LEVELS DEEP HRC340F 00005000
   END APPLY >>> ./ * *       IMPLEMENT RECURSIVE EDITING UP TO NINE LEVELS DEEP HRC340F 00005000
 BEGIN APPLY >>> ./ * *                                                          HRC340F 00006000
     Comment >>> ./ * *                                                          HRC340F 00006000
   END APPLY >>> ./ * *                                                          HRC340F 00006000
 BEGIN APPLY >>> ./ * *************                                              HRC340F 00007000
     Comment >>> ./ * *************                                              HRC340F 00007000
   END APPLY >>> ./ * *************                                              HRC340F 00007000
 BEGIN APPLY >>> ./ R  00014000           $  014000 10                                   00300000
   END APPLY >>> ./ R  00014000           $  014000 10                                   00300000
 BEGIN APPLY >>> ./ R  00022000           $  022100 0100                                 00380000
   END APPLY >>> ./ R  00022000           $  022100 0100                                 00380000
 BEGIN APPLY >>> ./ R  00026000  00030000 $  026100 0100                                 00460000
   END APPLY >>> ./ R  00026000  00030000 $  026100 0100                                 00460000
 BEGIN APPLY >>> ./ I  00077000           $  077010 0010                                 00920000
   END APPLY >>> ./ I  00077000           $  077010 0010                                 00920000
 BEGIN APPLY >>> ./ I  00102000           $  0102010 0010                                01190000
   END APPLY >>> ./ I  00102000           $  0102010 0010                                01190000
 BEGIN APPLY >>> ./ I  00144000           $  0144010 005                                 01640000
   END APPLY >>> ./ I  00144000           $  0144010 005                                 01640000
 BEGIN APPLY >>> ./ I  00185000           $  0185010 0010                                02100000
   END APPLY >>> ./ I  00185000           $  0185010 0010                                02100000
 BEGIN APPLY >>> ./ I  00214000           $  0214010 0010                                02460000
   END APPLY >>> ./ I  00214000           $  0214010 0010                                02460000
 BEGIN APPLY >>> ./ * CONVERTED 11/04/80 BY P-E / BMARSH
     Comment >>> ./ * CONVERTED 11/04/80 BY P-E / BMARSH
   END APPLY >>> ./ * CONVERTED 11/04/80 BY P-E / BMARSH
Update Succeeded
Update Execution Time 23 milliseconds.