Deck DDF

10 Modifications

Listing Sections

Source

Seq #  *Modification Id* Act 
----------------------------+
00001  M01S00001.ddf     +++|          IDENT  DDF,DDF
00002  M01S00002.ddf     +++|          PERIPH
00003  M01S00003.ddf     +++|          BASE   M
00004  M01S00004.ddf     +++|          SST    BFMS,FNSS,EQSS,FTSS,NSSS,GQSS,FASS,DTSS
00005  M01S00005.ddf     +++|          TITLE DDF - DISPLAY DISK FILE.
00006  M01S00006.ddf     +++|*COMMENT  DDF - DISPLAY DISK FILE.
Line S00007 Modification History
M01 (Added by) ddf
M02 (Updated by) 281l803
Seq #  *Modification Id* Act 
----------------------------+
00007  M02S00007.281l803 ---|          COMMENT  COPYRIGHT CONTROL DATA CORPORATION, 1987.
00008  M01S00001.281l803 +++|          COMMENT  COPYRIGHT CONTROL DATA SYSTEMS INC.  1992.
00009  M01S00008.ddf     +++| DDF      SPACE  4,10
00010  M01S00009.ddf     +++|***       DDF - DISPLAY DISK FILE.
00011  M01S00010.ddf     +++|*
00012  M01S00011.ddf     +++|*         J. J. EIKUM.       73/03/13.
00013  M01S00012.ddf     +++|*         J. J. EIKUM.       78/11/24.
00014  M01S00013.ddf     +++|*         P. C. HIGGINS.     81/06/08.
00015  M01S00014.ddf     +++|*         P. C. HIGGINS.     84/05/01.
00016  M01S00015.ddf     +++|*         L. K. JACOBS.      84/10/01.
00017  M01S00016.ddf     +++| DDF      SPACE  4,50
00018  M01S00017.ddf     +++|***              DDF PROVIDES THE CAPABILITY TO READ AND DISPLAY THE
00019  M01S00018.ddf     +++|*         CONTENTS OF PHYSICAL DISK SECTORS.  THE CONTENTS OF THE
00020  M01S00019.ddf     +++|*         SECTOR CAN BE CHANGED AND THE SECTOR REWRITTEN.
00021  M01S00020.ddf     +++|*
00022  M01S00021.ddf     +++|*                SEVERAL METHODS ARE PROVIDED TO SPECIFY THE DISK
00023  M01S00022.ddf     +++|*         ADDRESS TO READ.  THE ADDRESS CAN BE SPECIFIED EXPLICITLY
00024  M01S00023.ddf     +++|*         BY ENTERING THE EST ORDINAL, TRACK, AND SECTOR, OR AN FNT,
00025  M01S00024.ddf     +++|*         EJT, OR QFT ORDINAL CAN BE SPECIFIED AND THE BEGINNING OR
00026  M01S00025.ddf     +++|*         CURRENT POSITION WILL BE DISPLAYED.  SEVERAL SCRATCH AREAS
00027  M01S00026.ddf     +++|*         ARE AVAILABLE TO STORE EST ORDINAL, TRACK, AND SECTOR
00028  M01S00027.ddf     +++|*         WHILE READING OTHER LOCATIONS ON MASS STORAGE.  RANDOM
00029  M01S00028.ddf     +++|*         ADRESSING AND PERMANENT FILE REFERENCING COMMANDS ARE ALSO
00030  M01S00029.ddf     +++|*         PROVIDED.  DDF PROVIDES THE CAPABILITY OF PRINTING THE
00031  M01S00030.ddf     +++|*         INFORMATION DISPLAYED.
00032  M01S00031.ddf     +++|*
00033  M01S00032.ddf     +++|*                WARNING.  SINCE THE MASS STORAGE I/O IS DONE BY DDF
00034  M01S00033.ddf     +++|*         ITSELF, THE DISPLAY MAY BLINK DURING THE ACTUAL TRANSFER,
00035  M01S00034.ddf     +++|*         ESPECIALLY IN A BUSY SYSTEM.  IF THE DISK CHANNEL HANGS FOR
00036  M01S00035.ddf     +++|*         ANY REASON, THE CONSOLE WILL BLANK AND THE KEYBOARD WILL BE
00037  M01S00036.ddf     +++|*         INOPERABLE.
00038  M01S00037.ddf     +++|*
00039  M01S00038.ddf     +++|*                WARNING.  SOME OF THE DDF COMMANDS, THE ONES THAT
00040  M01S00039.ddf     +++|*         REQUIRE THE KEYBOARD TO BE UNLOCKED, CAN MAKE CHANGES THAT
00041  M01S00040.ddf     +++|*         MAY CAUSE THE SYSTEM TO HANG OR PERMANENT FILES TO BE LOST.
00042  M01S00041.ddf     +++|*         THESE BAD EFFECTS MAY NOT OCCUR UNTIL SOME TIME AFTER THE
00043  M01S00042.ddf     +++|*         CHANGES HAVE BEEN MADE AND AT THAT TIME IT MAY BE IMPOSSIBLE
00044  M01S00043.ddf     +++|*         TO UNDERSTAND WHAT HAPPENED.  ALSO, IT IS REMOTELY POSSIBLE
00045  M01S00044.ddf     +++|*         TO BLANK THE CONSOLE WHILE USING THESE COMMANDS.  IT IS
00046  M01S00045.ddf     +++|*         IMPORTANT THAT THE DDF USER UNDERSTAND WHAT IS BEING DONE
00047  M01S00046.ddf     +++|*         BEFORE USING THESE COMMANDS.
00048  M01S00047.ddf     +++| DDF      SPACE  4,10
00049  M01S00048.ddf     +++|***       DAYFILE MESSAGES.
00050  M01S00049.ddf     +++|*
00051  M01S00050.ddf     +++|*
00052  M01S00051.ddf     +++|*         * INCORRECT USER ACCESS.* = *SECURITY-UNLOCK* WAS NOT SET
00053  M01S00052.ddf     +++|*         ON A SECURED SYSTEM.
00054  M01S00053.ddf     +++| DDF      SPACE  4,10
00055  M01S00054.ddf     +++|***       OPERATOR MESSAGES.
00056  M01S00055.ddf     +++|*
00057  M01S00056.ddf     +++|*
00058  M01S00057.ddf     +++|*         THE FOLLOWING MESSAGES MAY APPEAR AT THE CONTROL POINT.
00059  M01S00058.ddf     +++|*
00060  M01S00059.ddf     +++|*         * WAITING FOR MEMORY.* = DDF IS WAITING FOR CM TO STORE
00061  M01S00060.ddf     +++|*                THE DISPLAY AND COMMAND PROCESSORS.
00062  M01S00061.ddf     +++|*         *READING EQXXX TP=XXXX CT=XXXX* = SHOWS STATUS OF CHECKOUT
00063  M01S00062.ddf     +++|*                DURING A PACK RECOVERY.
00064  M01S00063.ddf     +++|*
00065  M01S00064.ddf     +++|*
00066  M01S00065.ddf     +++|*         ABOVE THE COMMAND LINE, THE FOLLOWING MESSAGES MAY APPEAR.
00067  M01S00066.ddf     +++|*
00068  M01S00067.ddf     +++|*         *FORMAT ERROR.* = A FORMAT ERROR WAS DETECTED DURING
00069  M01S00068.ddf     +++|*                TRANSLATION OF THE ENTRY.
00070  M01S00069.ddf     +++|*         *INCORRECT ENTRY.* = THE COMMAND WAS NOT LEGAL.
00071  M01S00001.ddf4    +++|*         *INCORRECT EQUIPMENT.* = THE EST ORDINAL SPECIFIED EITHER WAS
00072  M01S00002.ddf4    +++|*                NOT MASS STORAGE OR WAS A NULL EQUIPMENT.
00073  M01S00070.ddf     +++|*         *INCORRECT PARAMETER.* = THE PARAMETER IN THE ENTRY WAS
00074  M01S00071.ddf     +++|*                INCORRECT OR TOO LARGE.
00075  M01S00072.ddf     +++|*         *REPEAT ENTRY.* = THE ENTRY WILL NOT BE CLEARED AFTER
00076  M01S00073.ddf     +++|*                EXECUTION.
00077  M01S00074.ddf     +++|*         *SYSTEM BUSY.* = DDF IS WAITING FOR THE SYSTEM TO PROCESS
00078  M01S00075.ddf     +++|*                A REQUEST.
00079  M01S00076.ddf     +++|*         * BYTE NNNN.* = THE DATA SPECIFIED IS IN BYTE NNNN.
00080  M01S00077.ddf     +++|*         * LENGTH = NNNNNNNNB.* = THE *SKIPEI* COMMAND HAS SKIPPED
00081  M01S00078.ddf     +++|*                NNNNNNNN (OCTAL) SECTORS.
00082  M01S00079.ddf     +++|*
00083  M01S00080.ddf     +++|*         THE FOLLOWING MESSAGES TELL WHY THE *SCAN* COMMAND STOPPED.
00084  M01S00081.ddf     +++|*         *LINKAGE BYTE BAD.*
00085  M01S00082.ddf     +++|*         *SYSTEM SECTOR LINKAGE BYTE BAD.*
00086  M01S00083.ddf     +++|*         *TRACK LINK IN WRONG SECTOR.*
00087  M01S00084.ddf     +++|*         *WORD COUNT TOO BIG.*
00088  M01S00085.ddf     +++|*         *TRACK NOT RESERVED.*
00089  M01S00086.ddf     +++|*
00090  M01S00087.ddf     +++|*         THE FOLLOWING MESSAGES MAY APPEAR DURING A PACK RECOVERY.
00091  M01S00088.ddf     +++|*         *ERROR IN TRACK STATUS.*
00092  M01S00089.ddf     +++|*         *END OF EQUIPMENT.*
00093  M01S00090.ddf     +++|*         *SYSTEM SECTOR IN TRACK.*
00094  M01S00091.ddf     +++|*         *NEXT TRACK IN USE.*
00095  M01S00092.ddf     +++|*
00096  M01S00093.ddf     +++|*         SOME COMMANDS READ SEVERAL SECTORS. IF A DISK ERROR IS
00097  M01S00094.ddf     +++|*         ENCOUNTERED WHILE PROCESSING THE COMMAND, PROCESSING STOPS
00098  M01S00095.ddf     +++|*         AND THE ERROR CODE IS DISPLAYED ON THE LEFT SCREEN.
00099  M01S00096.ddf     +++| DDF      SPACE  4,10
00100  M01S00097.ddf     +++|*         COMMON DECKS.
00101  M01S00098.ddf     +++|
00102  M01S00099.ddf     +++|
00103  M01S00100.ddf     +++|*CALL     COMDMAC
00104  M01S00101.ddf     +++|*CALL     COMPMAC
00105  M01S00102.ddf     +++|*CALL     COMSCPS
00106  M01S00103.ddf     +++|*CALL     COMSEJT
00107  M01S00104.ddf     +++|*CALL     COMSLFD
00108  M01S00105.ddf     +++|*CALL     COMSPIM
00109  M01S00106.ddf     +++|*CALL     COMSMSP
00110  M01S00107.ddf     +++|*CALL     COMSMST
00111  M01S00108.ddf     +++|*CALL     COMSPRD
00112  M01S00109.ddf     +++|*CALL     COMSSSD
00113  M01S00110.ddf     +++|*CALL     COMSZOL
00114  M01S00111.ddf     +++| DDF      SPACE  4,10
00115  M01S00112.ddf     +++|**        PROGRAMS CALLED.
00116  M01S00113.ddf     +++|*
00117  M01S00114.ddf     +++|*         DDFILE - DDF UTILITY FUNCTION PROCESSOR.
00118  M01S00115.ddf     +++|*         NOTE - (RA+2) = POINTER TO OUTPUT FILE.
00119  M01S00116.ddf     +++|*                (RA+3) = POINTER TO *DBUF*.
00120  M01S00117.ddf     +++|*                (RA+4) = LWA+1 OF *DDFILE*.
00121  M01S00118.ddf     +++|*                (RA+5) = CPU STATUS WORD - USED TO RECEIVE FUNCTION
00122  M01S00119.ddf     +++|*                         CODE FROM *DDF*.
00123  M01S00120.ddf     +++|*                THE ASSEMBLY CONSTANT *D* (=5) IS USED TO REFERENCE
00124  M01S00121.ddf     +++|*                THESE LOCATIONS.
00125  M01S00122.ddf     +++| DDF      SPACE  4,50
00126  M01S00123.ddf     +++|**        DDF LOADING SEQUENCE.
00127  M01S00124.ddf     +++|*
00128  M01S00125.ddf     +++|*         THE FOLLOWING SEQUENCE IS USED TO INITIALIZE *DDF*.
00129  M01S00126.ddf     +++|*
00130  M01S00127.ddf     +++|*         A) UPON ENTRY *DDF* BRANCHES TO *PRS*.
00131  M01S00128.ddf     +++|*                - CHECK FOR LEGAL USER.
00132  M01S00129.ddf     +++|*                - LOAD *DDFILE*.
00133  M01S00130.ddf     +++|*                - REQUEST FL FOR CM RESIDENT TABLES AND PROCESSOR
00134  M01S00131.ddf     +++|*                  OVERLAYS.
00135  M01S00132.ddf     +++|*                - LOAD RIGHT SCREEN PROCESSOR OVERLAYS TO CM.
00136  M01S00133.ddf     +++|*         B) *PRS* BRANCHES TO *LCP*.
00137  M01S00134.ddf     +++|*                - LOAD AND PRESET EACH COMMAND PROCESSOR OVERLAY, AND
00138  M01S00135.ddf     +++|*                  LOAD COMMAND PROCESSORS TO CM.
00139  M01S00136.ddf     +++|*                - WRITE TABLES TO CM.
00140  M01S00137.ddf     +++|*         C) LOAD RESIDENT OVERLAY.
00141  M01S00138.ddf     +++|*                - PRESET DIRECT CELLS AND CONSTANTS.
00142  M01S00139.ddf     +++|*                - SET CHANNELS AND REQUEST DISPLAY.
00143  M01S00140.ddf     +++|*                - SET EQUIPMENT PARAMETERS FOR DEFAULT FAMILY-S
00144  M01S00141.ddf     +++|*                  LABEL TRACK.
00145  M01S00142.ddf     +++|*                - CLEAR END OF SECTOR BUFFER FOR NEATER DISPLAY.
00146  M01S00143.ddf     +++|*         D) ENTER MAIN LOOP VIA THE READ SECTOR COMMAND PROCESSOR.
00147  M01S00144.ddf     +++|*
00148  M01S00145.ddf     +++|*         DDF LOADING SEQUENCE DIAGRAM -
00149  M01S00146.ddf     +++|*
00150  M01S00147.ddf     +++|*         ORIGINAL PROGRAM
00151  M01S00148.ddf     +++|*
00152  M01S00149.ddf     +++|*         LOC PPFW(1100)----------------------------------------------
00153  M01S00150.ddf     +++|*             DDF(MAIN LOOP)
00154  M01S00151.ddf     +++|*             DLS(LEFT SCREEN DRIVER)
00155  M01S00152.ddf     +++|*             DRS(RIGHT SCREEN DRIVER)
00156  M01S00153.ddf     +++|*         LOC RSPLA---------------------------------------------------
00157  M01S00154.ddf     +++|*             TABLES(TCEF,TCRO)
00158  M01S00155.ddf     +++|*             LCP(LOAD COMMAND PROCESSORS)>>>>>>>>>V>>>>>V>>>>>V>>>>>V
00159  M01S00156.ddf     +++|*         LOC OVL----------------------------------V-----V-----V     V
00160  M01S00157.ddf     +++|*             PRS                                 8XB   8XC   8XD    V
00161  M01S00158.ddf     +++|*             RIGHT SCREEN PROCESSORS              .     .     .     V
00162  M01S00159.ddf     +++|*         LOC RESLA(AFTER  LONGEST-----------------.-----.-----.-----V
00163  M01S00160.ddf     +++|*               SINGLE RIGHT SCREEN                .     .     .    8XA
00164  M01S00161.ddf     +++|*               PROCESSOR)                         .     .     .     .
00165  M01S00162.ddf     +++|*                                                  .     .     .     .
00166  M01S00163.ddf     +++|*                                                  .     .     .     .
00167  M01S00164.ddf     +++|*         LOC CPLA---------------------------------.-----.-----.-----.
00168  M01S00165.ddf     +++|*                                                  .     .     .    PRR
00169  M01S00166.ddf     +++|*                                                  .     .     .     .
00170  M01S00167.ddf     +++|*                                                  .     .     .     .
00171  M01S00168.ddf     +++|*
00172  M01S00169.ddf     +++|*
00173  M01S00170.ddf     +++|*         PP STRUCTURE AFTER LOAD COMPLETE, DURING EXECUTION -
00174  M01S00171.ddf     +++|*
00175  M01S00172.ddf     +++|*         LOC PPFW(1100)--------------------
00176  M01S00173.ddf     +++|*             DDF(MAIN LOOP)
00177  M01S00174.ddf     +++|*             DLS(LEFT SCREEN DRIVER)
00178  M01S00175.ddf     +++|*             DRS(RIGHT SCREEN DRIVER)
00179  M01S00176.ddf     +++|*         LOC RSPLA-------------------------
00180  M01S00177.ddf     +++|*             / CURRENT   /
00181  M01S00178.ddf     +++|*             / RIGHT     /
00182  M01S00179.ddf     +++|*             / SCREEN    /
00183  M01S00180.ddf     +++|*             / PROCESSOR /
00184  M01S00181.ddf     +++|*         LOC RESLA-------------------------
00185  M01S00182.ddf     +++|*               8XA -
00186  M01S00183.ddf     +++|*             RESIDENT
00187  M01S00184.ddf     +++|*             ROUTINES
00188  M01S00185.ddf     +++|*             PKI, ETC.
00189  M01S00186.ddf     +++|*         LOC BFMS--------------------------
00190  M01S00187.ddf     +++|*             SECTOR BUFFER
00191  M01S00188.ddf     +++|*         LOC CPLA--------------------------
00192  M01S00189.ddf     +++|*             / CURRENT   /
00193  M01S00190.ddf     +++|*             / COMMAND   /
00194  M01S00191.ddf     +++|*             / PROCESSOR /
00195  M01S00192.ddf     +++|*
00196  M01S00193.ddf     +++|*
00197  M01S00194.ddf     +++|*         CM STRUCTURE AFTER LOAD COMPLETE, DURING EXECUTION -
00198  M01S00195.ddf     +++|*
00199  M01S00196.ddf     +++|*         ORG-------------------------------------------------
00200  M01S00197.ddf     +++|*             DDFILE(CP PROGRAM)
00201  M01S00198.ddf     +++|*         DDFILE FL-------------------------------------------
00202  M01S00199.ddf     +++|*             TCEF(TABLE OF COMMAND FORMATS)
00203  M01S00200.ddf     +++|*             TCRO(TABLE OF RIGHT SCREEN PROCESSOR OVERLAYS)
00204  M01S00201.ddf     +++|*         DDFILE FL + CMTL------------------------------------
00205  M01S00202.ddf     +++|*             RIGHT SCREEN PROCESSORS
00206  M01S00203.ddf     +++|*             COMMAND PROCESSORS(LOADED FROM OVERLAYS)
00207  M01S00204.ddf     +++| DDF      SPACE  4,10
00208  M01S00205.ddf     +++|****      DIRECT LOCATION ASSIGNMENTS.
00209  M01S00206.ddf     +++|
00210  M01S00207.ddf     +++|
00211  M01S00208.ddf     +++| MC       EQU    T4          MASS STORAGE CHANNEL (NOT A SCRATCH CELL)
00212  M01S00209.ddf     +++| EQ       EQU    T5          EST ORDINAL (NOT A SCRATCH CELL)
00213  M01S00210.ddf     +++| TK       EQU    T6          TRACK (NOT A SCRATCH CELL)
00214  M01S00211.ddf     +++| SC       EQU    T7          SECTOR (NOT A SCRATCH CELL)
00215  M01S00212.ddf     +++| DK       EQU    15          DISPLAY KEYBOARD CONTROL
00216  M01S00213.ddf     +++|*                16          SPARE
00217  M01S00214.ddf     +++|*                17          SPARE
00218  M01S00215.ddf     +++| AB       EQU    20 - 24     ASSEMBLY BUFFER
00219  M01S00216.ddf     +++| UI       EQU    AB+3        USER INDEX
00220  M01S00217.ddf     +++| RI       EQU    AB+3        RANDOM INDEX
00221  M01S00218.ddf     +++| BA       EQU    25 - 26     BUFFER ADDRESS
00222  M01S00219.ddf     +++| RC       EQU    27          REPEAT COUNT
00223  M01S00220.ddf     +++| SB       EQU    30          SYSTEM BUSY FLAG
00224  M01S00221.ddf     +++| CR       EQU    31          CHANNEL RESERVED FLAG
00225  M01S00222.ddf     +++| RS       EQU    32          RIGHT SCREEN DISPLAY
00226  M01S00223.ddf     +++| TA       EQU    33          CM SYNTAX TABLE ADDRESS/100B
00227  M01S00224.ddf     +++| EF       EQU    34          EXECUTE FLAG
00228  M01S00225.ddf     +++| LT       EQU    35          LAST TRACK NUMBER ON EQUIPMENT
00229  M01S00226.ddf     +++| LS       EQU    36          LAST SECTOR NUMBER ON TRACK
00230  M01S00227.ddf     +++| RT       EQU    37          CM TRT RECOVERY TABLE ADDRESS/100B
00231  M01S00228.ddf     +++| KE       EQU    40          KEYBOARD ENTRY
00232  M01S00229.ddf     +++| KI       EQU    41          KEYBOARD BUFFER INDEX
00233  M01S00230.ddf     +++| KM       EQU    42          KEYBOARD MESSAGE POINTER
00234  M01S00231.ddf     +++| CA       EQU    43          CHARACTER ADDRESS
00235  M01S00232.ddf     +++| FN       EQU    44 - 50     FILE NAME
00236  M01S00233.ddf     +++|*         EQU    51 - 57     SPARES
00237  M01S00234.ddf     +++| PF       EQU    60 - 64     PF CONTROL WORD
00238  M01S00235.ddf     +++|*                65          SPARE
00239  M01S00236.ddf     +++| XC       EQU    66          X-COORDINATE (6000B, CH01 ASSUMED)
00240  M01S00237.ddf     +++| YC       EQU    67          Y-COORDINATE
00241  M01S00238.ddf     +++|
00242  M01S00239.ddf     +++|****
00243  M01S00240.ddf     +++| DDF      SPACE  4,20
00244  M01S00241.ddf     +++|**        DIRECT CELL USAGE.
00245  M01S00242.ddf     +++|*
00246  M01S00243.ddf     +++|*         THE FOLLOWING DIRECT CELLS CAN BE USED AS SCRATCH LOCATIONS
00247  M01S00244.ddf     +++|*         BY THE DISPLAY ROUTINES AND COMMAND PROCESSORS.
00248  M01S00245.ddf     +++|*
00249  M01S00246.ddf     +++|*         T0 - T3.
00250  M01S00247.ddf     +++|*         CM - CM+4.
00251  M01S00248.ddf     +++|*         AB - AB+4.
00252  M01S00249.ddf     +++|*         RC.
00253  M01S00250.ddf     +++|*         YC.
00254  M01S00251.ddf     +++|*
00255  M01S00252.ddf     +++|*         THE FOLLOWING DIRECT CELLS CAN BE USED AS SCRATCH LOCATIONS
00256  M01S00253.ddf     +++|*         BY THE COMMAND PROCESSORS ONLY.
00257  M01S00254.ddf     +++|*
00258  M01S00255.ddf     +++|*         FN - FN+4.
00259  M01S00256.ddf     +++| DDF      TITLE  MACRO DEFINITIONS.
00260  M01S00257.ddf     +++|*         MACRO DEFINITIONS.
00261  M01S00258.ddf     +++| ACRDEF   SPACE  4,10
00262  M01S00259.ddf     +++|**        ACRDEF - AUX COMMAND ROUTINE DEFINITION.
00263  M01S00260.ddf     +++|*
00264  M01S00261.ddf     +++|*NAME     ACRDEF
00265  M01S00262.ddf     +++|*
00266  M01S00263.ddf     +++|*         ENTRY  *NAME* = OVERLAY NAME (CM FL RESIDENT).
00267  M01S00264.ddf     +++|*
00268  M01S00265.ddf     +++|*         DEFINES TAG *NAME_M* AS INDEX OF OVERLAY CONTROL WORD IN
00269  M01S00266.ddf     +++|*         TABLE *TCRO*.
00270  M01S00267.ddf     +++|
00271  M01S00268.ddf     +++|
00272  M01S00269.ddf     +++|          PURGMAC  ACRDEF
00273  M01S00270.ddf     +++|
00274  M01S00271.ddf     +++|          MACRO  ACRDEF,NAM
00275  M01S00272.ddf     +++|          CON    /NAM/NAM,NAM_L,0,NAM,0
00276  M01S00273.ddf     +++| .1       SET    *O-TCRO-5
00277  M01S00274.ddf     +++|          QUAL
00278  M01S00275.ddf     +++| NAM_N    EQU    /PRESET/.1/5
00279  M01S00276.ddf     +++|          QUAL   *
00280  M01S00277.ddf     +++|          LOC    .1/5+1
00281  M01S00278.ddf     +++|          ENDM   ACRDEF
00282  M01S00279.ddf     +++| ACROVL   SPACE  4,10
00283  M01S00280.ddf     +++|**        ACROVL - DEFINE AUX COMMAND ROUTINE OVERLAY.
00284  M01S00281.ddf     +++|*
00285  M01S00282.ddf     +++|*NAME     ACROVL LA
00286  M01S00283.ddf     +++|*
00287  M01S00284.ddf     +++|*         ENTRY  *NAME* = NAME OF OVERLAY.  (CM FL RESIDENT)
00288  M01S00285.ddf     +++|*                *LA* = LOAD ADDRESS.
00289  M01S00286.ddf     +++|*
00290  M01S00287.ddf     +++|*         NOTE   IF THE OVERLAY IS TO USE THE RIGHT SCREEN DISPLAY
00291  M01S00288.ddf     +++|*                OVERLAY AREA, SEE COMMENTS ON USE OF THIS AREA
00292  M01S00289.ddf     +++|*                WITH DEFINITION OF SYMBOL *ACRLA*.
00293  M01S00290.ddf     +++|*         NOTE   TO BEGIN A SEQUENCE OF OVERLAYS, THE SYMBOL *ACRA*
00294  M01S00291.ddf     +++|*                MUST BE UNDEFINED OR EQUAL TO ZERO.
00295  M01S00292.ddf     +++|
00296  M01S00293.ddf     +++|
00297  M01S00294.ddf     +++|          PURGMAC  ACROVL
00298  M01S00295.ddf     +++|
00299  M01S00296.ddf     +++|          MACRO  ACROVL,NAM,LA
00300  M01S00297.ddf     +++|          LOC    *O
00301  M01S00298.ddf     +++|          BSS    0
00302  M01S00299.ddf     +++| .A       IF     DEF,//ACRA
00303  M01S00300.ddf     +++| .B       IFNE   //ACRA,0
00304  M01S00301.ddf     +++|          QUAL   *
00305  M01S00302.ddf     +++|          QUAL   PRESET
00306  M01S00303.ddf     +++| .1       SET    *-ACRA+4
00307  M01S00304.ddf     +++| "ACRA"L  EQU    .1/5
00308  M01S00305.ddf     +++| .CMTL    SET    .CMTL+"ACRA"L
00309  M01S00306.ddf     +++|          QUAL   *
00310  M01S00307.ddf     +++| .A       ENDIF
00311  M01S00308.ddf     +++| .B       ENDIF
00312  M01S00309.ddf     +++|          USE    NAM
00313  M01S00310.ddf     +++| .C       IFC    NE,$NAM$$
00314  M01S00311.ddf     +++|          QUAL   PRESET
00315  M01S00312.ddf     +++| NAM      EQU    *
00316  M01S00313.ddf     +++| ACRA     MICRO  1,, NAM
00317  M01S00314.ddf     +++|          QUAL   *
00318  M01S00315.ddf     +++|          QUAL
00319  M01S00316.ddf     +++| ACRA     SET    *
00320  M01S00317.ddf     +++|          QUAL   *
00321  M01S00318.ddf     +++|          QUAL   NAM
00322  M01S00319.ddf     +++|          LOC    LA
00323  M01S00320.ddf     +++| NAM      EQU    *
00324  M01S00321.ddf     +++| .C       ELSE
00325  M01S00322.ddf     +++|          QUAL
00326  M01S00323.ddf     +++| ACRA     SET    0
00327  M01S00324.ddf     +++|          QUAL   *
00328  M01S00325.ddf     +++| .C       ENDIF
00329  M01S00326.ddf     +++|          ENDM   ACROVL
00330  M01S00327.ddf     +++| COMMAND  SPACE  4,10
00331  M01S00328.ddf     +++|**        COMMAND - ENTER COMMAND PROCESSOR.
00332  M01S00329.ddf     +++|*
00333  M01S00330.ddf     +++|*CMD      COMMAND
00334  M01S00331.ddf     +++|*
00335  M01S00332.ddf     +++|*         ENTRY  *CMD* = NAME OF COMMAND PROCESSOR.
00336  M01S00333.ddf     +++|*
00337  M01S00334.ddf     +++|*         NOTE - COMMAND PROCESSORS CANNOT USE LITERALS.
00338  M01S00335.ddf     +++|
00339  M01S00336.ddf     +++|
00340  M01S00337.ddf     +++|          PURGMAC  COMMAND
00341  M01S00338.ddf     +++|
00342  M01S00339.ddf     +++|          MACRO  COMMAND,CMD
00343  M01S00340.ddf     +++|          LOC    *O
00344  M01S00341.ddf     +++|          BSS    0
00345  M01S00342.ddf     +++| .A       IF     DEF,CMDA
00346  M01S00343.ddf     +++|          QUAL   PRESET
00347  M01S00344.ddf     +++| .1       SET    *-/DDF".N"/CMDA+4
00348  M01S00345.ddf     +++| "CMDA"L  EQU    .1/5
00349  M01S00346.ddf     +++| .MCMDL   MAX    .MCMDL,"CMDA"L
00350  M01S00347.ddf     +++| .CMTL    SET    .CMTL+"CMDA"L
00351  M01S00348.ddf     +++|          QUAL   *
00352  M01S00349.ddf     +++| .A       ENDIF
00353  M01S00350.ddf     +++| .B       IFC    NE,$CMD$$
00354  M01S00351.ddf     +++|          QUAL   PRESET
00355  M01S00352.ddf     +++| CMD      EQU    .N*10000+*
00356  M01S00353.ddf     +++| CMDA     MICRO  1,, CMD
00357  M01S00354.ddf     +++|          QUAL   *
00358  M01S00355.ddf     +++| CMDA     SET    *
00359  M01S00356.ddf     +++|          LOC    CPLA
00360  M01S00357.ddf     +++| .B       ENDIF
00361  M01S00358.ddf     +++|          ENDM   COMMAND
00362  M01S00359.ddf     +++| ENTER    SPACE  4,10
00363  M01S00360.ddf     +++|**        ENTER - ENTER SPECIAL SYNTAX.
00364  M01S00361.ddf     +++|*
00365  M01S00362.ddf     +++|*CMD      ENTER  (SYNTAX),D
00366  M01S00363.ddf     +++|*
00367  M01S00364.ddf     +++|*         ENTRY  *CMD* = NAME OF COMMAND PROCESSOR.
00368  M01S00365.ddf     +++|*                *SYNTAX* = SYNTAX OF COMMAND.
00369  M01S00366.ddf     +++|*                IF *D* IS PRESENT, A DUMMY ENTRY IS DEFINED.
00370  M01S00367.ddf     +++|
00371  M01S00368.ddf     +++|
00372  M01S00369.ddf     +++|          PURGMAC  ENTER
00373  M01S00370.ddf     +++|
00374  M01S00371.ddf     +++|          MACRO  ENTER,CMD,SYNTAX,D
00375  M01S00372.ddf     +++| .A       IFC    EQ,$D$$
00376  M01S00373.ddf     +++|          CON    CMD_L*100+CMD/10000,CMD-CMD/10000*10000
00377  M01S00374.ddf     +++| .A       ELSE
00378  M01S00375.ddf     +++| CMD      EQU    *O
00379  M01S00376.ddf     +++|          CON    0,0
00380  M01S00377.ddf     +++| .A       ENDIF
00381  M01S00378.ddf     +++|          ORG    *O-2
00382  M01S00379.ddf     +++| .1       SET    *
00383  M01S00380.ddf     +++|          DATA   Z$SYNTAX$
00384  M01S00381.ddf     +++|      BSSZ   10-*O+.1    FILL REMAINDER OF SYNTAX AREA (15D CHAR MAX)
00385  M01S00382.ddf     +++| .B       IFC    EQ,$D$$
00386  M01S00383.ddf     +++|          CON    CMD_L*100+CMD/10000,CMD-CMD/10000*10000
00387  M01S00384.ddf     +++| .B       ELSE
00388  M01S00385.ddf     +++|          CON    0,0
00389  M01S00386.ddf     +++| .B       ENDIF
00390  M01S00387.ddf     +++| .1       SET    *O-TCEF
00391  M01S00388.ddf     +++|          LOC    .1/5
00392  M01S00389.ddf     +++|          ENDM   ENTER
00393  M01S00390.ddf     +++| INDEX    SPACE  4,40
00394  M01S00391.ddf     +++|**        INDEX - GENERATE INDEXED TABLE.
00395  M01S00392.ddf     +++|*         (MODIFIED VERSION OF MACRO FROM *COMPMAC*.)
00396  M01S00393.ddf     +++|*
00397  M01S00394.ddf     +++|*
00398  M01S00395.ddf     +++|*NAME     INDEX  TYPE,ADDRESS
00399  M01S00396.ddf     +++|*
00400  M01S00397.ddf     +++|*         ENTRY  *NAME* = TABLE NAME.
00401  M01S00398.ddf     +++|*                *TYPE* = OFFSET INTO TABLE FOR THIS ENTRY.
00402  M01S00399.ddf     +++|*                *ADDRESS* = CONTENTS OF THIS ENTRY.
00403  M01S00400.ddf     +++|*
00404  M01S00401.ddf     +++|*         THIS MACRO IS INTENDED TO GENERATE TABLES WHICH ARE INDEXED
00405  M01S00402.ddf     +++|*         BY SYMBOLIC CONSTANTS SUCH AS FILE AND JOB ORIGIN CODES.
00406  M01S00403.ddf     +++|*         IT HAS 3 CALLING SEQUENCES.
00407  M01S00404.ddf     +++|*
00408  M01S00405.ddf     +++|*         IF *NAME* IS PRESENT, THE FWA OF THE TABLE IS SET TO *NAME*.
00409  M01S00406.ddf     +++|*
00410  M01S00407.ddf     +++|*         IF *ADDRESS* IS MISSING, THE TABLE IS TERMINATED WITH AN
00411  M01S00408.ddf     +++|*         *ORG* TO THE END OF THE TABLE.  THIS RESULTS IN ZERO ENTRIES
00412  M01S00409.ddf     +++|*         FOR UNDEFINED ENTRIES IN THE TABLE.
00413  M01S00410.ddf     +++|*
00414  M01S00411.ddf     +++|*         OTHERWISE, A TABLE ENTRY IS MADE AT *INDEX* + *TYPE* OF
00415  M01S00412.ddf     +++|*         *ADDRESS*.
00416  M01S00413.ddf     +++|*
00417  M01S00414.ddf     +++|*         EXAMPLE - TO GENERATE A TABLE FOR PROCESSING FILE TYPES.
00418  M01S00415.ddf     +++|*
00419  M01S00416.ddf     +++|*TFTP     INDEX              BEGIN TABLE
00420  M01S00417.ddf     +++|*
00421  M01S00418.ddf     +++|*         INDEX  PRFT,PRP    PROCESS PRINT FILE AT *PRP*
00422  M01S00419.ddf     +++|*         INDEX  LOFT,LOP    PROCESS LOCAL FILE AT *LOP*
00423  M01S00420.ddf     +++|*
00424  M01S00421.ddf     +++|*         INDEX  MXFT        TERMINATE TABLE AT *TFTP*+*MXFT*
00425  M01S00422.ddf     +++|*
00426  M01S00423.ddf     +++|*         THE CODE PROCESSING THIS TABLE NOTES THAT -
00427  M01S00424.ddf     +++|*         A FILE OF TYPE *MXFT* CANNOT BE PROCESSED,
00428  M01S00425.ddf     +++|*         A TABLE ENTRY = 0, CANNOT BE PROCESSED.
00429  M01S00426.ddf     +++|*
00430  M01S00427.ddf     +++|*         USES   SYMBOL NAME *INDEX*.
00431  M01S00428.ddf     +++|
00432  M01S00429.ddf     +++|
00433  M01S00430.ddf     +++|          PURGMAC  INDEX
00434  M01S00431.ddf     +++|
00435  M01S00432.ddf     +++|          MACRO  INDEX,A,B,C
00436  M01S00433.ddf     +++|.A IFC NE,$A$$
00437  M01S00434.ddf     +++|A BSS 0
00438  M01S00435.ddf     +++|.1 SET A
00439  M01S00436.ddf     +++|.2 SET *O
00440  M01S00437.ddf     +++|.A ELSE
00441  M01S00438.ddf     +++|  ORG .2+B
00442  M01S00439.ddf     +++|  IFC NE,$C$$,2
00443  M01S00440.ddf     +++|  LOC B
00444  M01S00441.ddf     +++|  CON C
00445  M01S00442.ddf     +++|  LOC .1+B
00446  M01S00443.ddf     +++|  BSS 0
00447  M01S00444.ddf     +++|.A ENDIF
00448  M01S00445.ddf     +++|  ENDM  INDEX
00449  M01S00446.ddf     +++| OVERLAY  SPACE  4,10
00450  M01S00447.ddf     +++|**        OVERLAY - DEFINE NEW OVERLAY.
00451  M01S00448.ddf     +++|*
00452  M01S00449.ddf     +++|*         OVERLAY ORG,(TITLE)
00453  M01S00450.ddf     +++|*
00454  M01S00451.ddf     +++|*         ENTRY  *ORG* = ORIGIN ADDRESS OF OVERLAY.
00455  M01S00452.ddf     +++|*                *TITLE* = TITLE FOR OVERLAY.
00456  M01S00453.ddf     +++|
00457  M01S00454.ddf     +++|
00458  M01S00455.ddf     +++|          PURGMAC OVERLAY
00459  M01S00456.ddf     +++|
00460  M01S00457.ddf     +++| OVERLAY  MACRO  O,TEXT
00461  M01S00458.ddf     +++| .N       SET    .N+1
00462  M01S00459.ddf     +++|          ERRNG  1R4-.N      TOO MANY OVERLAYS
00463  M01S00460.ddf     +++| .N       MICRO  .N,1, ABCDEFGHIJKLMNOPQRSTUVWXYZ01234
00464  M01S00461.ddf     +++|          TTL    DDF/8"OVLN"".N" - TEXT
00465  M01S00462.ddf     +++|          TITLE
00466  M01S00463.ddf     +++|          QUAL   DDF".N"
00467  M01S00464.ddf     +++|          IDENT  8"OVLN"".N",O    TEXT
00468  M01S00465.ddf     +++|*COMMENT  DDF - TEXT
Line S00466 Modification History
M01 (Added by) ddf
M02 (Updated by) 281l803
Seq #  *Modification Id* Act 
----------------------------+
00469  M02S00466.281l803 ---|          COMMENT  COPYRIGHT CONTROL DATA CORPORATION, 1987.
00470  M01S00002.281l803 +++|          COMMENT  COPYRIGHT CONTROL DATA SYSTEMS INC.  1992.
00471  M01S00467.ddf     +++|          ORG    O
00472  M01S00468.ddf     +++|          ENDM   OVERLAY
00473  M01S00469.ddf     +++| RSDEF    SPACE  4,10
00474  M01S00470.ddf     +++|**        RSDEF - RIGHT SCREEN PROCESSOR DEFINITION.
00475  M01S00471.ddf     +++|*
00476  M01S00472.ddf     +++|*NAME     RSDEF  R
00477  M01S00473.ddf     +++|*
00478  M01S00474.ddf     +++|*         ENTRY  *NAME* = PROCESSOR OVERLAY NAME.
00479  M01S00475.ddf     +++|*                *R* = FLAG TO INDICATE PROCESSOR IS RESIDENT, NOT
00480  M01S00476.ddf     +++|*                      AN OVERLAY.
00481  M01S00477.ddf     +++|*
00482  M01S00478.ddf     +++|*         DEFINES TAG *NAME_N* AS INDEX OF OVERLAY CONTROL WORD IN
00483  M01S00479.ddf     +++|*         TABLE *TDPO*.
00484  M01S00480.ddf     +++|
00485  M01S00481.ddf     +++|
00486  M01S00482.ddf     +++|          PURGMAC  RSDEF
00487  M01S00483.ddf     +++|
00488  M01S00484.ddf     +++|          MACRO  RSDEF,NAM,R
00489  M01S00485.ddf     +++| .A       IFC    EQ,$R$$
00490  M01S00486.ddf     +++|          CON    /NAM/NAM,NAM_L,0,NAM,0
00491  M01S00487.ddf     +++| .A       ELSE
00492  M01S00488.ddf     +++|          CON    NAM,0,0,0,0
00493  M01S00489.ddf     +++| .A       ENDIF
00494  M01S00490.ddf     +++| .1       SET    *O-TCRO-5
00495  M01S00491.ddf     +++|          QUAL
00496  M01S00492.ddf     +++| NAM_N    EQU    /PRESET/.1/5
00497  M01S00493.ddf     +++|          QUAL   *
00498  M01S00494.ddf     +++|          LOC    .1/5+1
00499  M01S00495.ddf     +++|          ENDM   RSDEF
00500  M01S00496.ddf     +++| RSOVL    SPACE  4,10
00501  M01S00497.ddf     +++|**        RSOVL - DEFINE RIGHT SCREEN DISPLAY PROCESSOR OVERLAY.
00502  M01S00498.ddf     +++|*
00503  M01S00499.ddf     +++|*NAME     RSOVL  LA
00504  M01S00500.ddf     +++|*
00505  M01S00501.ddf     +++|*         ENTRY  *NAME* = NAME OF PROCESSOR.
00506  M01S00502.ddf     +++|*                *LA* = LOAD ADDRESS.
00507  M01S00503.ddf     +++|*
00508  M01S00504.ddf     +++|*         NOTE - THE DISPLAY PROCESSORS CANNOT USE LITERALS.
00509  M01S00505.ddf     +++|*              - THE ENTRY TO THE ROUTINE IS AT *LA*+1.
00510  M01S00506.ddf     +++|
00511  M01S00507.ddf     +++|
00512  M01S00508.ddf     +++|          PURGMAC  RSOVL
00513  M01S00509.ddf     +++|
00514  M01S00510.ddf     +++|          MACRO  RSOVL,NAM,LA
00515  M01S00511.ddf     +++|          LOC    *O
00516  M01S00512.ddf     +++|          BSS    0
00517  M01S00513.ddf     +++| .A       IF     DEF,//RSPA
00518  M01S00514.ddf     +++|          QUAL   *
00519  M01S00515.ddf     +++|          QUAL   PRESET
00520  M01S00516.ddf     +++| .1       SET    *-RSPA+4
00521  M01S00517.ddf     +++| "RSPA"L  EQU    .1/5
00522  M01S00518.ddf     +++| .MRSPL   MAX    .MRSPL,"RSPA"L
00523  M01S00519.ddf     +++| .CMTL    SET    .CMTL+"RSPA"L
00524  M01S00520.ddf     +++|          QUAL   *
00525  M01S00521.ddf     +++| .A       ENDIF
00526  M01S00522.ddf     +++|          USE    NAM
00527  M01S00523.ddf     +++| .B       IFC    NE,$NAM$$
00528  M01S00524.ddf     +++|          QUAL   PRESET
00529  M01S00525.ddf     +++| NAM      EQU    *
00530  M01S00526.ddf     +++| RSPA     MICRO  1,, NAM
00531  M01S00527.ddf     +++|          QUAL   *
00532  M01S00528.ddf     +++|          QUAL
00533  M01S00529.ddf     +++| RSPA     SET    *
00534  M01S00530.ddf     +++|          QUAL   *
00535  M01S00531.ddf     +++|          QUAL   NAM
00536  M01S00532.ddf     +++|          LOC    LA
00537  M01S00533.ddf     +++| NAM      EQU    *
00538  M01S00534.ddf     +++| .B       ENDIF
00539  M01S00535.ddf     +++|          ENDM   RSOVL
00540  M01S00536.ddf     +++| DDF      SPACE  4,20
00541  M01S00537.ddf     +++|****      ASSEMBLY CONSTANTS.
00542  M01S00538.ddf     +++|
00543  M01S00539.ddf     +++|
00544  M01S00540.ddf     +++| CH       EQU    CHDS        DISPLAY CHANNEL
00545  M01S00541.ddf     +++| D        EQU    5           CPU STATUS WORD
00546  M01S00542.ddf     +++| KBUFL    EQU    32D+2       KEYBOARD BUFFER LENGTH
00547  M01S00543.ddf     +++| NSRA     EQU    6           NUMBER OF SCRATCH REGISTER AREAS
00548  M01S00544.ddf     +++| RCPC     EQU    12D         RIGHT SCREEN - COMMANDS PER COLUMN
00549  M01S00545.ddf     +++| MLPS     EQU    40          MAIN LOOPS PER SECOND ON CC545
00550  M01S00546.ddf     +++|
00551  M01S00547.ddf     +++|
00552  M01S00548.ddf     +++| NAME     MICRO  1,, DDF
00553  M01S00549.ddf     +++| OVLN     MICRO  1,, X
00554  M01S00550.ddf     +++| PNFL     EQU    0           TABLE INDEX FOR LOCAL FNT ACCESS
00555  M01S00551.ddf     +++| .N       SET    0           OVERLAY NUMBER
00556  M01S00552.ddf     +++|          QUAL   PRESET
00557  M01S00553.ddf     +++| .1       SET    0
00558  M01S00554.ddf     +++| .2       SET    0
00559  M01S00555.ddf     +++|          NOREF  .1,.2
00560  M01S00556.ddf     +++| .MRSPL   SET    0           MAXIMUM RIGHT SCREEN PROCESSOR LENGTH
00561  M01S00557.ddf     +++|          NOREF  .MRSPL
00562  M01S00558.ddf     +++| .MCMDL   SET    0           MAXIMUM COMMAND PROCESSOR LENGTH
00563  M01S00559.ddf     +++|          NOREF  .MCMDL
00564  M01S00560.ddf     +++|          QUAL   *
00565  M01S00561.ddf     +++|
00566  M01S00562.ddf     +++|****
00567  M01S00563.ddf     +++|          TITLE  MAIN PROGRAM.
00568  M01S00564.ddf     +++| DDF      SPACE  4,10
00569  M01S00565.ddf     +++|**        DDF - MAIN PROGRAM.
00570  M01S00566.ddf     +++|
00571  M01S00567.ddf     +++|
00572  M01S00568.ddf     +++|          ORG    PPFW
00573  M01S00569.ddf     +++|
00574  M01S00570.ddf     +++| DDF      BSS    0           ENTRY
00575  M01S00571.ddf     +++|          LJM    /PRESET/PRS PRESET PROGRAM
00576  M01S00572.ddf     +++|*         CON    0,**        (IF *DDFILE* NOT LOADED BY PRESET)
00577  M01S00573.ddf     +++|
00578  M01S00574.ddf     +++|*         MAIN LOOP.
00579  M01S00575.ddf     +++|
00580  M01S00576.ddf     +++| DDF1     RJM    DLS         DISPLAY LEFT SCREEN
00581  M01S00577.ddf     +++|          DFIM   (CON RJMI)  PROCESS KEYBOARD FOR 721
00582  M01S00578.ddf     +++|          UJN    *+2
00583  M01S00579.ddf     +++|          CON    PKI
00584  M01S00580.ddf     +++|          RJM    SYS         DISPLAY SYSTEM HEADERS
00585  M01S00581.ddf     +++|          RJM    DRS         DISPLAY RIGHT SCREEN
00586  M01S00582.ddf     +++|          RJM    PSS         PAUSE FOR SYSTEM
00587  M01S00583.ddf     +++|          CFNC   THCF        TRANSFER HIDDEN TO VISIBLE, CLEAR HIDDEN
00588  M01S00584.ddf     +++|          DCN    CH+40
00589  M01S00585.ddf     +++|          RJM    PKI         PROCESS KEYBOARD INPUT
00590  M01S00586.ddf     +++|          RJM    RCP         RECALL COMMAND PROCESSOR IF NECESSARY
00591  M01S00587.ddf     +++|          UJN    DDF1        LOOP
00592  M01S00588.ddf     +++| DPP      SPACE  4,10
00593  M01S00589.ddf     +++|**        DPP - DROP PP.
00594  M01S00590.ddf     +++|
00595  M01S00591.ddf     +++|
00596  M01S00592.ddf     +++| DPP      BSS    0           ENTRY
00597  M01S00001.ns2618  +++|          LDN    10          CLEAR *DIS* FLAG
00598  M01S00002.ns2618  +++|          STD    CM+4
00599  M01S00003.ns2618  +++|          LDN    CCTS
00600  M01S00004.ns2618  +++|          STD    CM+1
00601  M01S00005.ns2618  +++|          MONITOR  SJCM
00602  M01S00593.ddf     +++|          MONITOR  DPPM      DROP PP
00603  M01S00594.ddf     +++|          LJM    PPR         EXIT TO PP RESIDENT
00604  M01S00595.ddf     +++| GLOBAL   SPACE  4,10
00605  M01S00596.ddf     +++|*         GLOBAL DATA.
00606  M01S00597.ddf     +++|
00607  M01S00598.ddf     +++|
00608  M01S00599.ddf     +++|          DFIM   (CON C721)
00609  M01S00600.ddf     +++| DCTY     CON    C545        DISPLAY CONSOLE TYPE
00610  M01S00601.ddf     +++|          DFIM   (CON T721)
00611  M01S00602.ddf     +++| CTOS     CON    T545        TOP OF SCREEN
00612  M01S00603.ddf     +++|          DFIM   (CON Y721-YINC)
00613  M01S00604.ddf     +++| CBOS     CON    Y545-YINC   BOTTOM OF SCREEN
00614  M01S00605.ddf     +++|          DFIM   (CON -YINC) SINGLE SPACE FOR 721
00615  M01S00606.ddf     +++| DBLS     CON    -YINC*2     DOUBLE SPACE Y-COORDINATE INCREMENT
00616  M01S00607.ddf     +++|          DFIM   (CON LN08)
00617  M01S00608.ddf     +++| CPFC     CON    LN13        LINE ABOVE FIRST LINE OF PFC
00618  M01S00609.ddf     +++|          TITLE  LEFT SCREEN DISPLAY.
00619  M01S00610.ddf     +++|***       LEFT SCREEN.
00620  M01S00611.ddf     +++|*
00621  M01S00612.ddf     +++|*         THE LEFT SCREEN DISPLAYS INFORMATION ABOUT THE DISK
00622  M01S00613.ddf     +++|*         AND THE CONTROL POINT.  THE LOGICAL ADDRESS ON THE DISK
00623  M01S00614.ddf     +++|*         APPEARS FIRST.  THE LINK BYTE FROM THE TRT FOR
00624  M01S00615.ddf     +++|*         THE CURRENT TRACK IS DISPLAYED AND IS INTENSIFIED IF IT IS
00625  M01S00616.ddf     +++|*         NOT THE SAME AS THE CONTENTS OF THE LINKAGE BYTES.  THE CEN-
00626  M01S00617.ddf     +++|*         TRAL MEMORY ADDRESS, BYTE NUMBER OF THE TRT ENTRY AND
00627  M01S00618.ddf     +++|*         RESERVATION, INTERLOCK, AND PRESERVED FILE STATUSES ARE ALSO
00628  M01S00619.ddf     +++|*         DISPLAYED.
00629  M01S00620.ddf     +++|*
00630  M01S00621.ddf     +++|*         THE FAMILY AND PACK NAMES, AND THE CONTROL POINT
00631  M01S00622.ddf     +++|*         NUMBER AND JSN OF THE ASSOCIATED JOB ARE DISPLAYED.
00632  M01S00623.ddf     +++|*         THE DISK-S PERMITS AND INDIRECT TRACK NUMBERS ARE SHOWN.
00633  M01S00624.ddf     +++|*         IF PRESENT, BOTH CONTROL POINT MESSAGES ARE DISPLAYED.
00634  M01S00625.ddf     +++|*         IF A DISK ERROR OCCURS, THE ERROR CODE RETURNED IN LOCATION
00635  M01S00626.ddf     +++|*         *RDCT* BY THE DRIVER IS DISPLAYED.
00636  M01S00627.ddf     +++|*
00637  M01S00628.ddf     +++|*         THE CONTENTS OF THE SCRATCH REGISTERS, THE PHYSICAL
00638  M01S00629.ddf     +++|*         LOCATION, AND THE HARDWARE STATUS CODE (THE MEANING WILL VARY
00639  M01S00630.ddf     +++|*         DEPENDING ON THE TYPE OF MASS STORAGE) ARE ALSO DISPLAYED.
00640  M01S00631.ddf     +++|*
00641  M01S00632.ddf     +++|*         IF A PACK RECOVERY IS IN PROGRESS, THE TRACK POINTER AND
00642  M01S00633.ddf     +++|*         TRACK RECOVERY WORD ARE DISPLAYED.
00643  M01S00634.ddf     +++| DLS      SPACE  4,15
00644  M01S00635.ddf     +++|**        DLS - DISPLAY LEFT SCREEN.
00645  M01S00636.ddf     +++|*
00646  M01S00637.ddf     +++|*         ENTRY  (RT) = CM RECOVERY DATA TABLE ADDRESS.
00647  M01S00638.ddf     +++|*                       (ZERO IF RECOVERY ROUTINES NOT USED.)
00648  M01S00639.ddf     +++|*
00649  M01S00640.ddf     +++|*         USES   T1, T2, T3, AB - AB+4, CM - CM+4, RC, YC.
00650  M01S00641.ddf     +++|*
00651  M01S00642.ddf     +++|*         CALLS  CTR, DOL, D2S, D4D, D6S, SNT.
00652  M01S00643.ddf     +++|*
00653  M01S00644.ddf     +++|*         MACROS CFNC, DFIM, DISPLA, DISPHD, SFA.
00654  M01S00645.ddf     +++|
00655  M01S00646.ddf     +++|
00656  M01S00647.ddf     +++| DLS      SUBR               ENTRY/EXIT
00657  M01S00648.ddf     +++|          CFNC   SLSF        SELECT LEFT SCREEN, SMALL CHARACTERS
00658  M01S00649.ddf     +++|          DISPHD (DDF.  DISPLAY DISK FILE.)
00659  M01S00650.ddf     +++|          DFIM   (CON LN06),*+1
00660  M01S00651.ddf     +++|          LDC    LN08        OUTPUT COORDINATES
00661  M01S00652.ddf     +++|          STD    YC
00662  M01S00653.ddf     +++|          OAN    CH+40
00663  M01S00654.ddf     +++|          LDD    XC
00664  M01S00655.ddf     +++|          OAN    CH+40
00665  M01S00656.ddf     +++|
00666  M01S00657.ddf     +++|*         DISPLAY DISK ADDRESS DATA.
00667  M01S00658.ddf     +++|
00668  M01S00659.ddf     +++|          DISPLA CH01,,( EST =)
00669  M01S00660.ddf     +++|          LDD    EQ          DISPLAY TOP DIGIT
00670  M01S00661.ddf     +++|          SHN    -6
00671  M01S00662.ddf     +++|          ZJN    DLS1        IF NO UPPER DIGIT
00672  M01S00663.ddf     +++|          ADN    1R0
00673  M01S00664.ddf     +++| DLS1     OAN    CH+40
00674  M01S00665.ddf     +++|          LDD    EQ
00675  M01S00666.ddf     +++|          RJM    D2S         DISPLAY LAST TWO DIGITS
00676  M01S00667.ddf     +++|          DISPLA CH15,,( TK = )
00677  M01S00668.ddf     +++|          LDD    TK
00678  M01S00669.ddf     +++|          RJM    D4D         DISPLAY TRACK NUMBER
00679  M01S00670.ddf     +++|          DISPLA CH30,,(ADDRESS OF TRT =)
00680  M01S00671.ddf     +++|          LDD    TK
00681  M01S00672.ddf     +++|          SHN    -2
00682  M01S00673.ddf     +++| DLSA     ADC    TRTS
00683  M01S00674.ddf     +++|          RJM    D6S         DISPLAY TRT ADDRESS
00684  M01S00675.ddf     +++|          DISPLA ,,(BYTE)
00685  M01S00676.ddf     +++|          LDD    TK
00686  M01S00677.ddf     +++|          LPN    3
00687  M01S00678.ddf     +++|          ADN    1R0
00688  M01S00679.ddf     +++|          OAN    CH+40
00689  M01S00680.ddf     +++|          LCN    YINC        MOVE TO NEXT LINE
00690  M01S00681.ddf     +++|          RAD    YC
00691  M01S00682.ddf     +++|          OAN    CH+40
00692  M01S00683.ddf     +++|          DISPLA CH01,,( TYPE = )
00693  M01S00684.ddf     +++|          SFA    EST,EQ      DISPLAY EQUIPMENT TYPE
00694  M01S00685.ddf     +++|          ADK    EQDE
00695  M01S00686.ddf     +++|          CRD    AB
00696  M01S00687.ddf     +++|          LDD    AB+3
00697  M01S00688.ddf     +++|          OAN    CH+40
00698  M01S00689.ddf     +++|          DISPLA CH15,,( SC = )
00699  M01S00690.ddf     +++|          LDD    SC
00700  M01S00691.ddf     +++|          RJM    D4D         DISPLAY SECTOR NUMBER
00701  M01S00692.ddf     +++|          DISPLA CH30,,(CONTENTS OF TRT = )
00702  M01S00693.ddf     +++|          LDN    0
00703  M01S00694.ddf     +++|          STD    RC
00704  M01S00695.ddf     +++|          RJM    SNT         GET NEXT TRACK LINK
00705  M01S00696.ddf     +++|          STD    T2
00706  M01S00697.ddf     +++|          LDM    BFMS
00707  M01S00698.ddf     +++|          NJN    DLS2        IF NOT EOF/EOI
00708  M01S00699.ddf     +++|          LDM    BFMS+1
00709  M01S00700.ddf     +++| DLS2     SHN    6
00710  M01S00701.ddf     +++|          PJN    DLS3        IF NOT A CHAIN BYTE
00711  M01S00702.ddf     +++|          SHN    -6
00712  M01S00703.ddf     +++|          LMD    T2
00713  M01S00704.ddf     +++|          ZJN    DLS3        IF TRT AND CHAIN BYTE MATCH
00714  M01S00705.ddf     +++|          DFIM   (CFNC BIVF)
00715  M01S00706.ddf     +++|          PSN
00716  M01S00707.ddf     +++|          PSN
00717  M01S00708.ddf     +++|          LDN    3
00718  M01S00709.ddf     +++|          STD    RC
00719  M01S00710.ddf     +++| DLS3     LDC    CH48        OUTPUT X-COORDINATE
00720  M01S00711.ddf     +++|          OAN    CH+40
00721  M01S00712.ddf     +++|          LDD    T2
00722  M01S00713.ddf     +++|          RJM    D4D         OUTPUT VALUE
00723  M01S00714.ddf     +++|          DFIM   (CFNC EIVF)
00724  M01S00715.ddf     +++|          SOD    RC
00725  M01S00716.ddf     +++|          PJN    DLS3        IF REPEAT COUNT NOT COMPLETE
00726  M01S00717.ddf     +++|          PSN
00727  M01S00718.ddf     +++|          PSN
00728  M01S00719.ddf     +++|
00729  M01S00720.ddf     +++|*         DISPLAY TRACK STATUS.
00730  M01S00721.ddf     +++|
00731  M01S00722.ddf     +++|          RJM    CTR         CHECK TRACK RESERVATION BIT
00732  M01S00723.ddf     +++|          STD    T2
00733  M01S00724.ddf     +++|          MJN    DLS4        IF TRACK RESERVED
00734  M01S00725.ddf     +++|          DISPLA CH53,,(NOT),H
00735  M01S00726.ddf     +++| DLS4     DISPLA CH57,,(RESERVED)
00736  M01S00727.ddf     +++|          LCN    YINC
00737  M01S00728.ddf     +++|          RAD    YC
00738  M01S00729.ddf     +++|          OAN    CH+40
00739  M01S00730.ddf     +++|          DISPLA CH01,,( STATE = )
00740  M01S00731.ddf     +++|          LDD    AB
00741  M01S00732.ddf     +++|          LPN    3
00742  M01S00733.ddf     +++|          SHN    1
00743  M01S00734.ddf     +++|          STD    T1
00744  M01S00735.ddf     +++|          LDM    DLSE,T1
00745  M01S00736.ddf     +++|          OAN    CH+40
00746  M01S00737.ddf     +++|          LDM    DLSE+1,T1
00747  M01S00738.ddf     +++|          OAN    CH+40
00748  M01S00739.ddf     +++|          LDD    T2
00749  M01S00740.ddf     +++|          SHN    21-7
00750  M01S00741.ddf     +++|          PJN    DLS6        IF NOT FIRST TRACK PRESERVED FILE
00751  M01S00742.ddf     +++|          DISPLA CH56,,(PRESERVED)
00752  M01S00743.ddf     +++| DLS6     LDD    T2
00753  M01S00744.ddf     +++|          SHN    21-3
00754  M01S00745.ddf     +++|          PJN    DLS7        IF NOT INTERLOCKED
00755  M01S00746.ddf     +++|          LCN    YINC
00756  M01S00747.ddf     +++|          RAD    YC
00757  M01S00748.ddf     +++|          OAN    CH+40
00758  M01S00749.ddf     +++|          DISPLA CH54,,(INTERLOCKED)
00759  M01S00750.ddf     +++|          DFIM   (CON LN11),*+1
00760  M01S00751.ddf     +++| DLS7     LDC    LN15
00761  M01S00752.ddf     +++|          OAN    CH+40
00762  M01S00753.ddf     +++|          SBN    YINC
00763  M01S00754.ddf     +++|          STD    YC
00764  M01S00755.ddf     +++|
00765  M01S00756.ddf     +++|*         DISPLAY FAMILY AND PACK NAMES.
00766  M01S00757.ddf     +++|
00767  M01S00758.ddf     +++|          DISPLA CH01,,(FAMILY = )
00768  M01S00759.ddf     +++|          SFA    EST,PF+4    DISPLAY FAMILY NAME
00769  M01S00760.ddf     +++|          ADK    EQDE
00770  M01S00761.ddf     +++|          CRD    CM
00771  M01S00762.ddf     +++|          LDD    CM+4
00772  M01S00763.ddf     +++|          SHN    3
00773  M01S00764.ddf     +++|          ADK    PFGL
00774  M01S00765.ddf     +++|          CRD    CM
00775  M01S00766.ddf     +++|          LDN    3
00776  M01S00767.ddf     +++|          OAM    CM,CH
00777  M01S00768.ddf     +++|          LDD    CM+3
00778  M01S00769.ddf     +++|          SCN    77
00779  M01S00770.ddf     +++|          OAN    CH+40
00780  M01S00771.ddf     +++|          DISPLA CH22,,( PACK = )
00781  M01S00772.ddf     +++|          LDN    3           DISPLAY PACK NAME
00782  M01S00773.ddf     +++|          OAM    PF,CH
00783  M01S00774.ddf     +++|          LDD    PF+3
00784  M01S00775.ddf     +++|          SCN    77
00785  M01S00776.ddf     +++|          OAN    CH+40
00786  M01S00777.ddf     +++|
00787  M01S00778.ddf     +++|*         DISPLAY CONTROL POINT INFORMATION.
00788  M01S00779.ddf     +++|
00789  M01S00780.ddf     +++|          DISPLA CH42,,( CP = )
00790  M01S00781.ddf     +++|          LDD    CP          DISPLAY CONTROL POINT NUMBER
00791  M01S00782.ddf     +++|          SHN    -7
00792  M01S00783.ddf     +++|          RJM    D2S         DISPLAY TWO DIGITS
00793  M01S00784.ddf     +++|          DISPLA CH55,,(JSN = )
00794  M01S00785.ddf     +++|          LDC    0
00795  M01S00786.ddf     +++| DLSB     EQU    *-1         (ADDRESS OF EJT ENTRY, SET BY *PRS*)
00796  M01S00787.ddf     +++|          CRD    CM
00797  M01S00788.ddf     +++|          LDN    2           DISPLAY JOB SEQUENCE NAME
00798  M01S00789.ddf     +++|          OAM    CM,CH
00799  M01S00790.ddf     +++|
00800  M01S00791.ddf     +++|*         DISPLAY FIRST PERMIT AND DATA TRACK NUMBERS.
00801  M01S00792.ddf     +++|
00802  M01S00793.ddf     +++|          LDD    YC
00803  M01S00794.ddf     +++|          OAN    CH+40
00804  M01S00795.ddf     +++|          DISPLA CH01,,(PERMITS TRACK = )
00805  M01S00796.ddf     +++|          LDD    AB+4
00806  M01S00797.ddf     +++|          SHN    3
00807  M01S00798.ddf     +++|          ADN    ALGL
00808  M01S00799.ddf     +++|          CRD    CM
00809  M01S00800.ddf     +++|          LDD    CM+2
00810  M01S00801.ddf     +++|          RJM    D4D         DISPLAY TRACK NUMBER
00811  M01S00802.ddf     +++|          DISPLA CH26,,( FIRST TRACK INDIRECT CHAIN = )
00812  M01S00803.ddf     +++|          LDD    CM
00813  M01S00804.ddf     +++|          RJM    D4D         DISPLAY TRACK NUMBER
00814  M01S00805.ddf     +++|
00815  M01S00806.ddf     +++|*         DISPLAY CONTROL POINT MESSAGES.
00816  M01S00807.ddf     +++|
00817  M01S00808.ddf     +++|          LCN    YINC*2      OUTPUT COORDINATES
00818  M01S00809.ddf     +++|          RAD    YC
00819  M01S00810.ddf     +++|          OAN    CH+40
00820  M01S00811.ddf     +++|          LDD    XC
00821  M01S00812.ddf     +++|          OAN    CH+40
00822  M01S00813.ddf     +++|          LDD    CP          DISPLAY FIRST MESSAGE LINE
00823  M01S00814.ddf     +++|          ADN    MS1W
00824  M01S00815.ddf     +++|          RJM    DOL         DISPLAY ONE LINE
00825  M01S00816.ddf     +++|          LCN    YINC
00826  M01S00817.ddf     +++|          RAD    YC
00827  M01S00818.ddf     +++|          LDN    2           OUTPUT COORDINATES
00828  M01S00819.ddf     +++|          OAM    XC,CH
00829  M01S00820.ddf     +++|          LDD    CP
00830  M01S00821.ddf     +++|          ADN    MS2W        OUTPUT SECOND MESSAGE LINE
00831  M01S00822.ddf     +++|          RJM    DOL         DISPLAY ONE LINE
00832  M01S00823.ddf     +++|
00833  M01S00824.ddf     +++|*         DISPLAY SCRATCH AREAS.
00834  M01S00825.ddf     +++|
00835  M01S00826.ddf     +++|          LCN    YINC*2      OUTPUT COORDINATES
00836  M01S00827.ddf     +++|          RAD    YC
00837  M01S00828.ddf     +++|          OAN    CH+40
00838  M01S00829.ddf     +++|          DISPLA CH01,,(------------SCRATCH AREAS-------------)
00839  M01S00830.ddf     +++|          LDM    RDCT
Line S00831 Modification History
M01 (Added by) ddf
M02 (Updated by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
00840  M02S00831.253l688 ---|          LPN    17
00841  M01S00001.253l688 +++|          LPN    77
00842  M01S00832.ddf     +++|          ZJN    DLS8.1      IF NO ERROR
00843  M01S00833.ddf     +++|          STD    T3
00844  M01S00834.ddf     +++|          DFIM   (CFNC BIVF)
00845  M01S00835.ddf     +++|          PSN
00846  M01S00836.ddf     +++|          PSN
00847  M01S00837.ddf     +++|          LDN    3
00848  M01S00838.ddf     +++|          STD    RC
00849  M01S00839.ddf     +++| DLS8     DISPLA CH44,,(ERROR = )
00850  M01S00840.ddf     +++|          LDM    DLSD,T3
00851  M01S00841.ddf     +++|          OAN    CH+40
00852  M01S00842.ddf     +++|          DFIM   (CFNC EIVF)
00853  M01S00843.ddf     +++|          SOD    RC
00854  M01S00844.ddf     +++|          NJN    DLS8        IF REPEAT COUNT NOT COMPLETE
00855  M01S00845.ddf     +++|          PSN
00856  M01S00846.ddf     +++|          PSN
00857  M01S00847.ddf     +++|          DFIM   (LCN YINC)
00858  M01S00848.ddf     +++| DLS8.1   LCN    YINC*2
00859  M01S00849.ddf     +++|          RAD    YC
00860  M01S00850.ddf     +++|          OAN    CH+40
00861  M01S00851.ddf     +++|          DISPLA CH06,,(EST     TK      SC      COMMENT)
00862  M01S00852.ddf     +++|          LDC    SRA
00863  M01S00853.ddf     +++|          STD    T2
00864  M01S00854.ddf     +++|          LDN    0
00865  M01S00855.ddf     +++|          STD    T3
00866  M01S00856.ddf     +++| DLS9     LCN    YINC
00867  M01S00857.ddf     +++|          RAD    YC
00868  M01S00858.ddf     +++|          OAN    CH+40
00869  M01S00859.ddf     +++|          LDD    XC
00870  M01S00860.ddf     +++|          OAN    CH+40
00871  M01S00861.ddf     +++|          AOD    T3
00872  M01S00862.ddf     +++|          SHN    6
00873  M01S00863.ddf     +++|          OAN    CH+40       DISPLAY SCRATCH AREA LETTER
00874  M01S00864.ddf     +++|          LDI    T2          DISPLAY EST ORDINAL
00875  M01S00865.ddf     +++|          RJM    D6S
00876  M01S00866.ddf     +++|          AOD    T2
00877  M01S00867.ddf     +++|          LDI    T2          DISPLAY TRACK
00878  M01S00868.ddf     +++|          RJM    D6S
00879  M01S00869.ddf     +++|          AOD    T2
00880  M01S00870.ddf     +++|          LDI    T2          DISPLAY SECTOR
00881  M01S00871.ddf     +++|          RJM    D6S
00882  M01S00872.ddf     +++|          LDN    0
00883  M01S00873.ddf     +++|          OAN    CH+40
00884  M01S00874.ddf     +++|          LDN    2           DISPLAY COMMENT
00885  M01S00875.ddf     +++|          RAD    T2
00886  M01S00876.ddf     +++|          LDN    4
00887  M01S00877.ddf     +++|          STD    CM
00888  M01S00878.ddf     +++| DLS10    LDI    T2
00889  M01S00879.ddf     +++|          OAN    CH+40
00890  M01S00880.ddf     +++|          AOD    T2
00891  M01S00881.ddf     +++|          SOD    CM
00892  M01S00882.ddf     +++|          PJN    DLS10       IF MORE COMMENT
00893  M01S00883.ddf     +++|          LDD    T3
00894  M01S00884.ddf     +++|          LMN    NSRA
00895  M01S00885.ddf     +++|          ZJN    DLS11       IF END OF SCRATCH AREAS
00896  M01S00886.ddf     +++|          LJM    DLS9        LOOP FOR REST OF SCRATCH REGISTERS
00897  M01S00887.ddf     +++|
00898  M01S00888.ddf     +++|*         DISPLAY RECOVERY DATA.
00899  M01S00889.ddf     +++|
00900  M01S00890.ddf     +++| DLS11    LDD    RT
00901  M01S00891.ddf     +++|          NJN    DLS12       IF RECOVERY TABLE PRESENT
00902  M01S00892.ddf     +++|          LJM    DLS14       RETURN
00903  M01S00893.ddf     +++|
00904  M01S00894.ddf     +++| DLS12    LCN    YINC*2      OUTPUT COORDINATES
00905  M01S00895.ddf     +++|          RAD    YC
00906  M01S00896.ddf     +++|          OAN    CH+40
00907  M01S00897.ddf     +++|          DISPLA CH01,,(TRACK POINTER = )
00908  M01S00898.ddf     +++|          LDD    RA
00909  M01S00899.ddf     +++|          ADD    RT
00910  M01S00900.ddf     +++|          SHN    6
00911  M01S00901.ddf     +++| DLSC     ADN    RCPW        READ POINTER WORD
00912  M01S00902.ddf     +++|*         ADN    ICPW        IF BUILDING INDIRECT CHAIN
00913  M01S00903.ddf     +++|*         ADN    BSPW        IF IN *BLDSTRT.*
00914  M01S00904.ddf     +++|          CRD    CM
00915  M01S00905.ddf     +++|          LDD    CM
00916  M01S00906.ddf     +++|          RJM    D4D         DISPLAY TRACK POINTER
00917  M01S00907.ddf     +++|          LCN    YINC        OUTPUT COORDINATES
00918  M01S00908.ddf     +++|          RAD    YC
00919  M01S00909.ddf     +++|          OAN    CH+40
00920  M01S00910.ddf     +++|          DISPLA CH01,,(TRACK RECOVERY WORD = )
00921  M01S00911.ddf     +++|          LDD    RA
00922  M01S00912.ddf     +++|          ADD    RT
00923  M01S00913.ddf     +++|          SHN    6
00924  M01S00914.ddf     +++|          ADD    TK
00925  M01S00915.ddf     +++|          ADC    TRCT-4000
00926  M01S00916.ddf     +++|          CRD    CM
00927  M01S00917.ddf     +++|          LDN    CM
00928  M01S00918.ddf     +++|          STD    T3
00929  M01S00919.ddf     +++| DLS13    LDN    0
00930  M01S00920.ddf     +++|          OAN    CH+40
00931  M01S00921.ddf     +++|          LDI    T3
00932  M01S00922.ddf     +++|          RJM    D4D         DISPLAY FOUR DIGITS
00933  M01S00923.ddf     +++|          AOD    T3
00934  M01S00924.ddf     +++|          SBN    CM+5
00935  M01S00925.ddf     +++|          MJN    DLS13       IF MORE OF WORD TO DISPLAY
00936  M01S00926.ddf     +++| DLS14    FJM    *,CH        IF CHANNEL FULL, WAIT
00937  M01S00927.ddf     +++|          DCN    CH+40
00938  M01S00928.ddf     +++|          LJM    DLSX        RETURN
00939  M01S00929.ddf     +++|
00940  M01S00930.ddf     +++|
00941  M01S00931.ddf     +++|          LIST   G
00942  M01S00932.ddf     +++| DLSD     EQU    *-1
00943  M01S00933.ddf     +++|          ECHO   1,ERRCODE=("DREC")
00944  M01S00934.ddf     +++|          CON    EMN._ERRCODE  "TXT._ERRCODE" ERROR
00945  M01S00935.ddf     +++|          LIST   *
00946  M01S00936.ddf     +++|
00947  M01S00937.ddf     +++| DLSE     BSS    0
00948  M01S00938.ddf     +++|          DATA   4HON
00949  M01S00939.ddf     +++|          DATA   4HIDLE
00950  M01S00940.ddf     +++|          DATA   4HOFF
00951  M01S00941.ddf     +++|          DATA   4HDOWN
00952  M01S00942.ddf     +++|          TITLE  RIGHT SCREEN DISPLAY.
00953  M01S00943.ddf     +++|***       RIGHT SCREEN.
00954  M01S00944.ddf     +++|*                THE RIGHT SCREEN DISPLAYS THE CONTENTS OF THE DISK
00955  M01S00945.ddf     +++|*         SECTOR.  THE BYTE NUMBERS ARE THE ACTUAL BYTE NUMBERS FOR
00956  M01S00946.ddf     +++|*         THE PHYSICAL DISK SECTOR (I.E. BYTES 0 AND 1 ARE THE CONTROL
00957  M01S00947.ddf     +++|*         BYTES).  THESE BYTE NUMBERS ARE USED IN THE MEMORY CHANGING
00958  M01S00948.ddf     +++|*         COMMANDS.
00959  M01S00949.ddf     +++|*
00960  M01S00950.ddf     +++|*                THE RIGHT SCREEN IS CHANGED WITH THE RIGHT BLANK OR
00961  M01S00951.ddf     +++|*         TAB KEY.  FOR SOME DISPLAYS THE */* INCREMENTS THE ADDRESSES
00962  M01S00952.ddf     +++|*         DISPLAYED.
00963  M01S00953.ddf     +++| DRS      SPACE  4,15
00964  M01S00954.ddf     +++|**        DRS - DISPLAY RIGHT SCREEN.
00965  M01S00955.ddf     +++|*
00966  M01S00956.ddf     +++|*         ENTRY  (RS) = INDEX INTO TABLE OF RIGHT SCREEN DISPLAYS.
00967  M01S00957.ddf     +++|*                RIGHT SCREEN SELECTED - SMALL CHARACTERS.
00968  M01S00958.ddf     +++|*                CHANNEL ACTIVE.
00969  M01S00959.ddf     +++|*
00970  M01S00960.ddf     +++|*         EXIT   TO DISPLAY ROUTINE.
00971  M01S00961.ddf     +++|*                (T3) = BFMS, BUFFER ADDRESS.
00972  M01S00962.ddf     +++|*
00973  M01S00963.ddf     +++|*         USES   T3.
00974  M01S00964.ddf     +++|*
00975  M01S00965.ddf     +++|*         CALLS  LDO, RIGHT SCREEN PROCESSORS.
00976  M01S00966.ddf     +++|
00977  M01S00967.ddf     +++|
00978  M01S00968.ddf     +++| DRS2     FJM    *,CH        IF CHANNEL FULL, WAIT UNTIL EMPTY
00979  M01S00969.ddf     +++|          DCN    CH+40
00980  M01S00970.ddf     +++|
00981  M01S00971.ddf     +++| DRS      SUBR               ENTRY/EXIT
00982  M01S00972.ddf     +++|          LDM    DRSB        CHECK FOR OVERLAY LOADED
00983  M01S00973.ddf     +++|          LMD    RS
00984  M01S00974.ddf     +++|          ZJN    DRS1        IF DISPLAY UNCHANGED
00985  M01S00975.ddf     +++|          LDD    RS
00986  M01S00976.ddf     +++|          RJM    LDO         LOAD DISPLAY OVERLAY
00987  M01S00977.ddf     +++| DRS1     LDC    BFMS        SET BUFFER ADDRESS
00988  M01S00978.ddf     +++|          STD    T3
00989  M01S00979.ddf     +++|          LJM    **          JUMP TO DISPLAY PROCESSOR
00990  M01S00980.ddf     +++|*         LJM    RSPLA       (NOT FORMATTED DISPLAY)
00991  M01S00981.ddf     +++|*         LJM    DFD         (IF FORMATTED DISPLAY)
00992  M01S00982.ddf     +++| DRSA     EQU    *-1         OVERLAY CONTROL WORD FROM CM TABLE
00993  M01S00983.ddf     +++|
00994  M01S00984.ddf     +++|
00995  M01S00985.ddf     +++|*         CONTROL WORD FROM CM TABLE = (DRSA).
00996  M01S00986.ddf     +++|
00997  M01S00987.ddf     +++|*DRSA     DATA   0           ADDRESS OF LOADED DISPLAY PROCESSOR
00998  M01S00988.ddf     +++|          DATA   0           PROCESSOR LENGTH
00999  M01S00989.ddf     +++|          CON    0,0
01000  M01S00990.ddf     +++|          DATA   0           DISPLAY INDEX
01001  M01S00991.ddf     +++|          ERRNZ  *-DRSA-5    CONTROL WORD MUST BE FIVE BYTES
01002  M01S00992.ddf     +++|
01003  M01S00993.ddf     +++| DRSB     CON    MXDI        CURRENTLY LOADED RIGHT SCREEN DISPLAY ID
01004  M01S00994.ddf     +++|*                            (PRESET TO ILLEGAL ID FOR INITIALIZATION)
01005  M01S00995.ddf     +++|
01006  M01S00996.ddf     +++|
01007  M01S00997.ddf     +++| DIS      HERE               DISPLAY DATA
01008  M01S00998.ddf     +++|
01009  M01S00999.ddf     +++| RSPLA    BSS    0           RIGHT SCREEN PROCESSOR LOAD ADDRESS
01010  M01S01000.ddf     +++|          TITLE  CENTRAL MEMORY RESIDENT TABLES.
01011  M01S01001.ddf     +++|          USE    PRESET
01012  M01S01002.ddf     +++|          QUAL   PRESET
01013  M01S01003.ddf     +++|**        CM TABLES.
01014  M01S01004.ddf     +++|*
01015  M01S01005.ddf     +++| TCEF     SPACE  4,15
01016  M01S01006.ddf     +++|**        TCEF - TABLE OF COMMAND ENTRY FORMATS.
01017  M01S01007.ddf     +++|*
01018  M01S01008.ddf     +++|*         VFD    96/Z*SYNTAX*
01019  M01S01009.ddf     +++|*         VFD    6/L,1/0,5/OVL,12/PP ADDR
01020  M01S01010.ddf     +++|*
01021  M01S01011.ddf     +++|*         AFTER LOAD TO CM
01022  M01S01012.ddf     +++|*         VFD    96/Z*SYNTAX*
01023  M01S01013.ddf     +++|*         VFD    6/L,1/1,17/CM ADDR
01024  M01S01014.ddf     +++|*
01025  M01S01015.ddf     +++|*                L   = COMMAND PROCESSOR LENGTH (CM WORDS).
01026  M01S01016.ddf     +++|*                OVL = LAST CHARACTER OF OVERLAY NAME.
01027  M01S01017.ddf     +++|*                PP/CM ADDR = ADDRESS OF PROCESSOR.
01028  M01S01018.ddf     +++|
01029  M01S01019.ddf     +++|
01030  M01S01020.ddf     +++| TCEF     BSS    0
01031  M01S01021.ddf     +++|          LOC    0
01032  M01S01022.ddf     +++| ARD      ENTER  (AUTOREAD.)
01033  M01S01023.ddf     +++| BTR      ENTER  (BEGINR.)
01034  M01S01024.ddf     +++| BEI      ENTER  (BLDEOI.)
01035  M01S01025.ddf     +++| BLS      ENTER  (BLDSL.)
01036  M01S01026.ddf     +++| BRS      ENTER  (BLDSTRT.)
01037  M01S01027.ddf     +++| BOT      ENTER  (BOT.)
01038  M01S01028.ddf     +++| CTB      ENTER  (CTB.)
01039  M01S01029.ddf     +++| DEP      ENTER  (DEP.)
01040  M01S01030.ddf     +++| DIS      ENTER  (DIS.)
01041  M01S01031.ddf     +++| DRP      ENTER  (DROP.)
01042  M01S01032.ddf     +++| DTK      ENTER  (DTK.)
01043  M01S01033.ddf     +++| EEP      ENTER  (EEP.)
01044  M01S01034.ddf     +++| EET      ENTER  (EJT.)
01045  M01S01035.ddf     +++| EST      ENTER  (EST.)
01046  M01S01036.ddf     +++| EFO      ENTER  (FAMILY.)
01047  M01S01037.ddf     +++| FPE      ENTER  (FIND.)
01048  M01S01038.ddf     +++| FIS      ENTER  (FINDISS.)
01049  M01S01039.ddf     +++| FOV      ENTER  (FINDO.)
01050  M01S01040.ddf     +++| FST      ENTER  (FINDS.)
01051  M01S01041.ddf     +++| FSS      ENTER  (FINDSS.)
01052  M01S01042.ddf     +++| EFB      ENTER  (FNT.)
01053  M01S01043.ddf     +++| EFL      ENTER  (FNTL.)
01054  M01S01044.ddf     +++| EFC      ENTER  (FNTLC.)
01055  M01S01045.ddf     +++| GTT      ENTER  (GETTRT.)
01056  M01S01046.ddf     +++| HOL      ENTER  (HOLD.)
01057  M01S01047.ddf     +++| LSA      ENTER  (LOAD.)
01058  M01S01048.ddf     +++| NAT      ENTER  (NEXTAT.)
01059  M01S01049.ddf     +++| NSS      ENTER  (NEXTSS.)
01060  M01S01050.ddf     +++| EPN      ENTER  (PACKNAM.)
01061  M01S01051.ddf     +++| PRD      ENTER  (PREAD.)
01062  M01S01052.ddf     +++| PTK      ENTER  (PTK.)
01063  M01S01053.ddf     +++| PWT      ENTER  (PWRITE.)
01064  M01S01054.ddf     +++| EIT      ENTER  (QFT.)
01065  M01S01055.ddf     +++| ERA      ENTER  (RANDOM.)
01066  M01S01056.ddf     +++| REC      ENTER  (RECOVER.)
01067  M01S01057.ddf     +++| SCN      ENTER  (SCAN.)
01068  M01S01058.ddf     +++| ELS      ENTER  (SC.*.)
01069  M01S01059.ddf     +++| ESC      ENTER  (SC.)
01070  M01S01060.ddf     +++| SRW      ENTER  (SETRW.)
01071  M01S01061.ddf     +++| STP      ENTER  (SETTP.)
01072  M01S01062.ddf     +++| SPF      ENTER  (SHOWPF.)
01073  M01S01063.ddf     +++| SKE      ENTER  (SKIPEI.)
01074  M01S01064.ddf     +++| SKF      ENTER  (SKIPF.)
01075  M01S01065.ddf     +++| SKR      ENTER  (SKIPR.)
01076  M01S01066.ddf     +++| STB      ENTER  (STB.)
01077  M01S01067.ddf     +++| SSA      ENTER  (STORE.)
01078  M01S01068.ddf     +++| ETK      ENTER  (TK.)
01079  M01S01069.ddf     +++| SCT      ENTER  (UI.)
01080  M01S01070.ddf     +++| WRT      ENTER  (WRITE.)
01081  M01S01071.ddf     +++|
01082  M01S01072.ddf     +++| TCEFA    ENTER  ( ),DUMMY  LISTING FILE COMMANDS
01083  M01S01073.ddf     +++| CLF      ENTER  (LISTING.)
01084  M01S01074.ddf     +++| OUT      ENTER  (OUT.)
01085  M01S01075.ddf     +++| PRT      ENTER  (PRINT.)
01086  M01S01076.ddf     +++| RET      ENTER  (RETURN.)
01087  M01S01077.ddf     +++| REW      ENTER  (REWIND.)
01088  M01S01078.ddf     +++| SID      ENTER  (SETID.)
01089  M01S01079.ddf     +++| SKL      ENTER  (SKIPL.)
01090  M01S01080.ddf     +++|
01091  M01S01081.ddf     +++| .END     ENTER  ,DUMMY      END OF TABLE
01092  M01S01082.ddf     +++|          QUAL
01093  M01S01083.ddf     +++|          LOC    *O
01094  M01S01084.ddf     +++| .1       SET    *-/PRESET/TCEF
01095  M01S01085.ddf     +++| TCEFL    EQU    .1/5        LENGTH OF TABLE
01096  M01S01086.ddf     +++|          QUAL   *
01097  M01S01087.ddf     +++| TDPO     SPACE  4,10
01098  M01S01088.ddf     +++|**        TCRO - TABLE OF CENTRAL RESIDENT OVERLAYS.
01099  M01S01089.ddf     +++|*
01100  M01S01090.ddf     +++|*         VFD    12/ENTRY,12/L,24/ADDR,12/DI
01101  M01S01091.ddf     +++|*
01102  M01S01092.ddf     +++|*                ENTRY = PROCESSOR ENTRY ADDRESS.
01103  M01S01093.ddf     +++|*                L = PROCESSOR LENGTH IN CM WORDS.
01104  M01S01094.ddf     +++|*                    (L=0 IF NOT AN OVERLAY)
01105  M01S01095.ddf     +++|*                ADDR = PP ADDRESS OF CODE BEFORE LOADED TO CM.
01106  M01S01096.ddf     +++|*                     = CM ADDRESS AFTER PRESET.
01107  M01S01097.ddf     +++|*                DI = OPTION (USUALLY A BUFFER INDEX).
01108  M01S01098.ddf     +++|
01109  M01S01099.ddf     +++|
01110  M01S01100.ddf     +++| TCRO     BSS    0
01111  M01S01101.ddf     +++|          LOC    0
01112  M01S01102.ddf     +++| DFB      RSDEF              DISPLAY SECTOR - FIVE BYTES/LINE
01113  M01S01103.ddf     +++| DTB      RSDEF              DISPLAY SECTOR - TEN BYTES/LINE
01114  M01S01104.ddf     +++| DTX      RSDEF              DISPLAY SECTOR - TEXT
01115  M01S01105.ddf     +++| DLC      RSDEF              DISPLAY LEGAL COMMANDS
01116  M01S01106.ddf     +++| DFD      RSDEF              DISPLAY SECTOR - FORMATTED
01117  M01S01107.ddf     +++| DSS      RSDEF              DISPLAY SYSTEM SECTOR FOR *DFD*
01118  M01S01108.ddf     +++| DPE      RSDEF              DISPLAY PFC SECTOR FOR *DFD*
01119  M01S01109.ddf     +++| DEI      RSDEF              DISPLAY EOI SECTOR FOR *DFD*
01120  M01S01110.ddf     +++| MXDO     EQU    *           MAXIMUM DISPLAY OVERLAY INDEX+1
01121  M01S01111.ddf     +++| TAR      ACRDEF             TABLE ACCESS ROUTINES (EJT, FNT, QFT)
01122  M01S01112.ddf     +++| LRR      ACRDEF             LABEL/TRT RECONSTRUCTION SUBROUTINES
01123  M01S01113.ddf     +++|          QUAL
01124  M01S01114.ddf     +++|          LOC    *O
01125  M01S01115.ddf     +++| TCRO     EQU    0+TCEFL     CM ADDRESS OF TABLE
01126  M01S01116.ddf     +++| MXDI     EQU    DFDN+1      MAXIMUM DISPLAY INDEX FOR DISPLAY TOGGLE
01127  M01S01117.ddf     +++| .1       SET    *-/PRESET/TCRO
01128  M01S01118.ddf     +++| TCROL    EQU    .1/5        TABLE LENGTH IN CM WORDS
01129  M01S01119.ddf     +++|          SPACE  4,10
01130  M01S01120.ddf     +++| .1       SET    *-/PRESET/TCEF
01131  M01S01121.ddf     +++| CMTL     EQU    .1/5        CM TABLE AREA LENGTH
01132  M01S01122.ddf     +++|          QUAL   *
01133  M01S01123.ddf     +++| .CMTL    SET    CMTL        ACCUMULATE TOTAL CM REQUIRED
01134  M01S01124.ddf     +++|          TITLE  LOAD COMMAND PROCESSORS.
01135  M01S01125.ddf     +++| LCP      SPACE  4,15
01136  M01S01126.ddf     +++|**        LCP - LOAD COMMAND PROCESSORS.
01137  M01S01127.ddf     +++|*
01138  M01S01128.ddf     +++|*         ENTRY  FROM PRS.
01139  M01S01129.ddf     +++|*                (AB+3 - AB+4) = CM LOAD ADDRESS COMMAND PROCESSORS.
01140  M01S01130.ddf     +++|*                (RC) = 1.
01141  M01S01131.ddf     +++|*                (TA) = CM FWA FOR TABLES.
01142  M01S01132.ddf     +++|*
01143  M01S01133.ddf     +++|*         EXIT   TO RESIDENT OVERLAY PRESET.
01144  M01S01134.ddf     +++|*
01145  M01S01135.ddf     +++|*         USES   AB, AB+3, AB+4, RC, T1.
01146  M01S01136.ddf     +++|*
01147  M01S01137.ddf     +++|*         CALLS  EXR, PSS.
01148  M01S01138.ddf     +++|
01149  M01S01139.ddf     +++|
01150  M01S01140.ddf     +++| LCP3     LDC    CMTL        WRITE TABLES TO CM
01151  M01S01141.ddf     +++|          STD    T1
01152  M01S01142.ddf     +++|          LDD    RA
01153  M01S01143.ddf     +++|          ADD    TA
01154  M01S01144.ddf     +++|          SHN    6
01155  M01S01145.ddf     +++|          CWM    TCEF,T1
01156  M01S01146.ddf     +++|          LDC    3R8"OVLN"A  LOAD RESIDENT ROUTINES OVERLAY
01157  M01S01147.ddf     +++|          RJM    EXR         EXECUTE OVERLAY
01158  M01S01148.ddf     +++|
01159  M01S01149.ddf     +++| LCP      BSS    0
01160  M01S01150.ddf     +++| LCP1     RJM    PSS         PAUSE FOR SYSTEM
01161  M01S01151.ddf     +++|          AOD    RC          ADVANCE OVERLAY NAME
01162  M01S01152.ddf     +++|          SBN    .L+1
01163  M01S01153.ddf     +++|          PJN    LCP3        IF ALL COMMAND OVERLAYS LOADED
01164  M01S01154.ddf     +++|          LDD    RC          LOAD NEXT OVERLAY
01165  M01S01155.ddf     +++|          ADC    2L8"OVLN"
01166  M01S01156.ddf     +++|          RJM    EXR         EXECUTE OVERLAY
01167  M01S01157.ddf     +++|          LDC    TCEF-2      SET COMMAND TABLE ADDRESS
01168  M01S01158.ddf     +++|          STD    AB
01169  M01S01159.ddf     +++| LCP2     LDN    2           CHECK NEXT COMMAND
01170  M01S01160.ddf     +++|          RAD    AB
01171  M01S01161.ddf     +++|          LDI    AB
01172  M01S01162.ddf     +++|          ZJN    LCP1        IF END OF COMMAND TABLE
01173  M01S01163.ddf     +++|          LDN    10          ADVANCE TO OVERLAY ID
01174  M01S01164.ddf     +++|          RAD    AB
01175  M01S01165.ddf     +++|          LDI    AB
01176  M01S01166.ddf     +++|          SHN    21-5
01177  M01S01167.ddf     +++|          MJN    LCP2        IF PROCESSOR ALREADY LOADED
01178  M01S01168.ddf     +++|          STD    T1
01179  M01S01169.ddf     +++|          SHN    5-21
01180  M01S01170.ddf     +++|          LPN    37
01181  M01S01171.ddf     +++|          LMD    RC
01182  M01S01172.ddf     +++|          NJN    LCP2        IF COMMAND PROCESSOR NOT IN THIS OVERLAY
01183  M01S01173.ddf     +++|          LDM    1,AB        SET PP MEMORY ADDRESS
01184  M01S01174.ddf     +++|          STM    LCPA
01185  M01S01175.ddf     +++|          LDI    AB          SET CM ADDRESS INTO TABLE
01186  M01S01176.ddf     +++|          SCN    77
01187  M01S01177.ddf     +++|          LMD    AB+3
01188  M01S01178.ddf     +++|          LMN    40
01189  M01S01179.ddf     +++|          STI    AB
01190  M01S01180.ddf     +++|          LDD    AB+4
01191  M01S01181.ddf     +++|          STM    1,AB
01192  M01S01182.ddf     +++|          LDD    AB+3        WRITE PROCESSOR TO CM
01193  M01S01183.ddf     +++|          SHN    6
01194  M01S01184.ddf     +++|          ADD    RA
01195  M01S01185.ddf     +++|          SHN    6
01196  M01S01186.ddf     +++|          ADD    AB+4
01197  M01S01187.ddf     +++|          CWM    **,T1
01198  M01S01188.ddf     +++| LCPA     EQU    *-1         (PP ADDRESS OF PROCESSOR)
01199  M01S01189.ddf     +++|          LDD    T1          UPDATE CM ADDRESS
01200  M01S01190.ddf     +++|          RAD    AB+4
01201  M01S01191.ddf     +++|          SHN    -14
01202  M01S01192.ddf     +++|          RAD    AB+3
01203  M01S01193.ddf     +++|          LJM    LCP2        LOOP
01204  M01S01194.ddf     +++| PSS      SPACE  4,10
01205  M01S01195.ddf     +++|**        PSS - PAUSE FOR SYSTEM.
01206  M01S01196.ddf     +++|*
01207  M01S01197.ddf     +++|*         EXIT   TO *PPR*, IF ERROR FLAG SET.
01208  M01S01198.ddf     +++|*                (CM+1) = 0 IF ERROR FLAG NOT SET.
01209  M01S01199.ddf     +++|*
01210  M01S01200.ddf     +++|*         MACROS MONITOR, PAUSE.
01211  M01S01201.ddf     +++|
01212  M01S01202.ddf     +++|
01213  M01S01203.ddf     +++| PSS      SUBR               ENTRY/EXIT
01214  M01S01204.ddf     +++|          PAUSE
01215  M01S01205.ddf     +++|          LDD    CM+1
01216  M01S01206.ddf     +++|          ZJN    PSSX        IF ERROR FLAG NOT SET
01217  M01S01207.ddf     +++|          MONITOR  DPPM      DROP PP
01218  M01S01208.ddf     +++|          LJM    PPR         EXIT
01219  M01S01209.ddf     +++| OVL      SPACE  4,10
01220  M01S01210.ddf     +++|**        OVL - COMMAND PROCESSOR OVERLAY LOAD ADDRESS.
01221  M01S01211.ddf     +++|
01222  M01S01212.ddf     +++|
01223  M01S01213.ddf     +++| OVL      EQU    *+5
01224  M01S01214.ddf     +++|          TITLE  PRESET PROGRAM.
01225  M01S01215.ddf     +++| PRS      SPACE  4,10
01226  M01S01216.ddf     +++|**        PRS - PRESET PROGRAM.
01227  M01S01217.ddf     +++|*
01228  M01S01218.ddf     +++|*         EXIT   TO PPR IF ANY ERRORS.
01229  M01S01219.ddf     +++|*                TO LCP TO CONTINUE PRESET.
01230  M01S01220.ddf     +++|*                (AB+3 - AB+4) = CM LOAD ADDRESS COMMAND PROCESSORS.
01231  M01S01221.ddf     +++|*                (RC) = 1.
01232  M01S01222.ddf     +++|*                (TA) = CM FWA FOR TABLES.
01233  M01S01223.ddf     +++|*                (DDF) = 0, IF *DDFILE* NOT LOADED.
01234  M01S01224.ddf     +++|*
01235  M01S01225.ddf     +++|*         USES   CM - CM+4.
01236  M01S01226.ddf     +++|*
01237  M01S01227.ddf     +++|*         CALLS  DFM, CUA, PSS.
01238  M01S01228.ddf     +++|*
01239  M01S01229.ddf     +++|*         MACROS EXECUTE, MONITOR, PAUSE.
01240  M01S01230.ddf     +++|
01241  M01S01231.ddf     +++|
01242  M01S01232.ddf     +++| PRS      BSS    0
01243  M01S00006.ns2618  +++|          RJM    CUA         CHECK USER ACCESS
01244  M01S00007.ns2618  +++|          NJN    PRS0        IF JOB HAS NO SYSTEM ORIGIN PRIVILEGES
01245  M01S01233.ddf     +++|          LDK    SSML
01246  M01S01234.ddf     +++|          CRD    CM
01247  M01S01235.ddf     +++|          LDD    CM
01248  M01S01236.ddf     +++|          LPN    7
01249  M01S01237.ddf     +++|          ZJN    PRS1        IF UNSECURED SYSTEM
01250  M01S01238.ddf     +++|          LDK    SSTL
01251  M01S01239.ddf     +++|          CRD    CM
01252  M01S01240.ddf     +++|          LDD    CM
01253  M01S01241.ddf     +++|          SHN    21-11
01254  M01S01242.ddf     +++|          MJN    PRS1        IF *SECURITY-UNLOCK* SET
Line S01243 Modification History
M01 (Added by) ddf
M02 (Updated by) ns2618
Seq #  *Modification Id* Act 
----------------------------+
01255  M02S01243.ns2618  ---|          LDC    PRSE        * INCORRECT USER ACCESS.*
01256  M01S00008.ns2618  +++| PRS0     LDC    PRSE        * INCORRECT USER ACCESS.*
01257  M01S01244.ddf     +++|          RJM    DFM         SEND DAYFILE MESSAGE
01258  M01S00001.ddf3    +++|          MONITOR ABTM
01259  M01S01245.ddf     +++|          LJM    PPR         EXIT
01260  M01S01246.ddf     +++|
01261  M01S01247.ddf     +++| PRS1     LDN    1           PRESET OVERLAY COUNTER
01262  M01S01248.ddf     +++|          STD    RC
Line S01249 Modification History
M01 (Added by) ddf
M02 (Updated by) ns2618
Seq #  *Modification Id* Act 
----------------------------+
01263  M02S01249.ns2618  ---|          LDN    IRSI
Line S01250 Modification History
M01 (Added by) ddf
M02 (Updated by) ns2618
Seq #  *Modification Id* Act 
----------------------------+
01264  M02S01250.ns2618  ---|          STD    CM+4
Line S01251 Modification History
M01 (Added by) ddf
M02 (Updated by) ns2618
Seq #  *Modification Id* Act 
----------------------------+
01265  M02S01251.ns2618  ---|          LDN    SSIS        SET ID TO INHIBIT ROLLOUT
Line S01252 Modification History
M01 (Added by) ddf
M02 (Updated by) ns2618
Seq #  *Modification Id* Act 
----------------------------+
01266  M02S01252.ns2618  ---|          STD    CM+1
Line S01253 Modification History
M01 (Added by) ddf
M02 (Updated by) ns2618
Seq #  *Modification Id* Act 
----------------------------+
01267  M02S01253.ns2618  ---|          MONITOR  SJCM
01268  M01S01254.ddf     +++|          LDN    10
01269  M01S01255.ddf     +++|          STD    CM+4
01270  M01S01256.ddf     +++|          LDN    SCTS        SET *DIS* FLAG
01271  M01S01257.ddf     +++|          STD    CM+1
01272  M01S01258.ddf     +++|          MONITOR  SJCM
01273  M01S01259.ddf     +++| PRS2     RJM    PSS         PAUSE FOR SYSTEM
01274  M01S01260.ddf     +++|          LDD    FL
01275  M01S01261.ddf     +++|          NJN    PRS3        IF NONZERO FIELD LENGTH
01276  M01S01262.ddf     +++|          LDN    ZERL
01277  M01S01263.ddf     +++|          CRD    CM
01278  M01S01264.ddf     +++|          AOD    CM+1        REQUEST MEMORY
01279  M01S01265.ddf     +++|          MONITOR  RSTM
01280  M01S01266.ddf     +++|          UJN    PRS2        LOOP
01281  M01S01267.ddf     +++|
Line S01268 Modification History
M01 (Added by) ddf
M02 (Updated by) ddf5
Seq #  *Modification Id* Act 
----------------------------+
01282  M02S01268.ddf5    ---| PRS3     LDN    ZERL        CLEAR CPU READY FLAG
01283  M01S00001.ddf5    +++| PRS3     RJM    PSS         PAUSE FOR SYSTEM
01284  M01S00002.ddf5    +++|          LDN    ZERL        CLEAR CPU READY FLAG
01285  M01S01269.ddf     +++|          CRD    CM
01286  M01S01270.ddf     +++|          LDD    RA
01287  M01S01271.ddf     +++|          SHN    6
01288  M01S01272.ddf     +++|          ADN    D
01289  M01S01273.ddf     +++|          CWD    CM
01290  M01S01274.ddf     +++|          LDD    CP          WRITE CONTROL CARD TO MESSAGE AREA
01291  M01S01275.ddf     +++|          ADN    MS1W
01292  M01S01276.ddf     +++|          CWM    PRSB,ON
01293  M01S01277.ddf     +++|          CWD    CM
01294  M01S01278.ddf     +++|          ADN    TFSW-MS1W-1 FETCH EJT ORDINAL
01295  M01S01279.ddf     +++|          CRD    CM
01296  M01S01280.ddf     +++|          SFA    EJT,CM
01297  M01S01281.ddf     +++|          STD    CM+4        SET ADDRESS OF EJT ENTRY
01298  M01S01282.ddf     +++|          STM    DLSB
01299  M01S01283.ddf     +++|          SHN    -14
01300  M01S01284.ddf     +++|          STD    CM+3
01301  M01S01285.ddf     +++|          RAM    DLSB-1
01302  M01S01286.ddf     +++|          LDN    0
01303  M01S01287.ddf     +++|          STD    CM+2
01304  M01S01288.ddf     +++|          LDN    1S5+1       SET JOB ADVANCE
01305  M01S01289.ddf     +++|          STD    CM+1
01306  M01S01290.ddf     +++|          LDD    MA
01307  M01S01291.ddf     +++|          CWM    PRSF,ON
01308  M01S01292.ddf     +++|          MONITOR  UTEM
01309  M01S00003.ddf5    +++|          LDD    CM+1        CHECK *UTEM* RESPONSE
01310  M01S00004.ddf5    +++|          NJP    PRS3        IF REJECT
01311  M01S01293.ddf     +++|          RJM    PSS         PAUSE
01312  M01S01294.ddf     +++|          LDN    ZERL
01313  M01S01295.ddf     +++|          CRD    CM
01314  M01S01296.ddf     +++|          LDD    MA          CALL *1AJ* WITH CONTROL CARD IN MS1W
01315  M01S01297.ddf     +++|          CWM    PRSC,ON
01316  M01S01298.ddf     +++|          CWD    CM
01317  M01S01299.ddf     +++|          EXECUTE  1AJ,=
01318  M01S01300.ddf     +++|          MONITOR  RPPM
01319  M01S01301.ddf     +++|          LDD    CM+1
01320  M01S01302.ddf     +++|          ZJN    PRS5        IF PP NOT ASSIGNED
Line S01303 Modification History
M01 (Added by) ddf
M02 (Updated by) ns2618
M03 (Updated by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
01321  M03S01303.271l716 ---|          LDN    60
Line S01304 Modification History
M01 (Added by) ddf
M02 (Updated by) ns2618
Seq #  *Modification Id* Act 
----------------------------+
01322  M02S01304.ns2618  ---|          STD    CM+4
Line S01305 Modification History
M01 (Added by) ddf
M02 (Updated by) ns2618
Seq #  *Modification Id* Act 
----------------------------+
01323  M02S01305.ns2618  ---|          LDN    CPRS        SET CPU PRIORITY
Line S01306 Modification History
M01 (Added by) ddf
M02 (Updated by) ns2618
Seq #  *Modification Id* Act 
----------------------------+
01324  M02S01306.ns2618  ---|          STD    CM+1
Line S01307 Modification History
M01 (Added by) ddf
M02 (Updated by) ns2618
Seq #  *Modification Id* Act 
----------------------------+
01325  M02S01307.ns2618  ---|          MONITOR  SJCM
01326  M01S01308.ddf     +++| PRS4     PAUSE              WAIT UNTIL CPU READY
01327  M01S01309.ddf     +++|          LDD    CM+1
01328  M01S01310.ddf     +++|          ZJN    PRS6        IF ERROR FLAG NOT SET
01329  M01S01311.ddf     +++| PRS5     LDN    0           DISABLE LISTING FILE COMMANDS
01330  M01S01312.ddf     +++|          STM    TCEFA
01331  M01S01313.ddf     +++|          STM    DDF         INDICATE *DDFILE* NOT LOADED
01332  M01S01314.ddf     +++|          STD    CM+1        CLEAR ERROR FLAG
01333  M01S01315.ddf     +++|          MONITOR  CEFM
01334  M01S01316.ddf     +++|          LDN    ZERL
01335  M01S01317.ddf     +++|          UJN    PRS7        REQUEST STORAGE FOR COMMAND PROCESSORS
01336  M01S01318.ddf     +++|
01337  M01S01319.ddf     +++| PRS6     LDD    RA          READ CPU READY FLAG
01338  M01S01320.ddf     +++|          SHN    6
01339  M01S01321.ddf     +++|          ADN    D
01340  M01S01322.ddf     +++|          CRD    CM
01341  M01S01323.ddf     +++|          LDD    CM
01342  M01S01324.ddf     +++|          ZJN    PRS4        IF NOT READY
01343  M01S01325.ddf     +++|
01344  M01S01326.ddf     +++|*         REQUEST FL FOR COMMAND PROCESORS.
01345  M01S01327.ddf     +++|
01346  M01S01328.ddf     +++|          LDD    RA          GET LWA+1 OF DDFILE
01347  M01S01329.ddf     +++|          SHN    6
01348  M01S01330.ddf     +++|          ADN    D-1
01349  M01S01331.ddf     +++| PRS7     CRD    AB
01350  M01S01332.ddf     +++|          LDD    AB+3
01351  M01S01333.ddf     +++|          SHN    14
01352  M01S01334.ddf     +++|          ADD    AB+4
01353  M01S01335.ddf     +++|          ADN    77
01354  M01S01336.ddf     +++|          SHN    -6
01355  M01S01337.ddf     +++|          STD    TA          SET CM TABLE ADDRESS
01356  M01S01338.ddf     +++|          SHN    6
01357  M01S01339.ddf     +++|          ADC    TCMTL+77    CM FL INCREASE REQUIRED
01358  M01S01340.ddf     +++|          SHN    -6
01359  M01S01341.ddf     +++|          STD    AB          (AB) = REQUIRED FL
01360  M01S01342.ddf     +++|          LDD    CP
01361  M01S01343.ddf     +++|          ADN    MS1W
01362  M01S01344.ddf     +++|          CWM    PRSD,TR     * WAITING FOR MEMORY.*
01363  M01S01345.ddf     +++| PRS8     LDN    ZERL
01364  M01S01346.ddf     +++|          CRD    CM
01365  M01S01347.ddf     +++|          LDD    AB          REQUEST STORAGE
01366  M01S01348.ddf     +++|          STD    CM+1
01367  M01S01349.ddf     +++|          MONITOR  RSTM
01368  M01S01350.ddf     +++|          RJM    PSS         PAUSE
01369  M01S01351.ddf     +++|          LDD    AB
01370  M01S01352.ddf     +++|          LMD    FL
01371  M01S01353.ddf     +++|          NJN    PRS8        IF MEMORY NOT OBTAINED
01372  M01S01354.ddf     +++|
01373  M01S01355.ddf     +++|*         LOAD DISPLAY PROCESSOR OVERLAYS TO CM.
01374  M01S01356.ddf     +++|
01375  M01S01357.ddf     +++|          LDD    TA          INITIALIZE OVERLAY ADDRESS POINTER
01376  M01S01358.ddf     +++|          SHN    6
01377  M01S01359.ddf     +++|          ADC    CMTL
01378  M01S01360.ddf     +++|          STD    AB+4
01379  M01S01361.ddf     +++|          SHN    -14
01380  M01S01362.ddf     +++|          STD    AB+3
01381  M01S01363.ddf     +++|          LDN    0
01382  M01S01364.ddf     +++|          STD    AB
01383  M01S01365.ddf     +++| PRS9     LDM    TCRO+1,AB   SET WORD COUNT
01384  M01S01366.ddf     +++|          ZJN    PRS10       IF NOT AN OVERLAY
01385  M01S01367.ddf     +++|          STD    T1
01386  M01S01368.ddf     +++|          LDM    TCRO+3,AB   SET PP MEMORY ADDRESS
01387  M01S01369.ddf     +++|          STM    PRSA
01388  M01S01370.ddf     +++|          LDD    AB+3        SET CM ADDRESS INTO TABLE
01389  M01S01371.ddf     +++|          STM    TCRO+2,AB
01390  M01S01372.ddf     +++|          LDD    AB+4
01391  M01S01373.ddf     +++|          STM    TCRO+3,AB
01392  M01S01374.ddf     +++|          LDD    AB+3        WRITE PROCESSOR TO CM
01393  M01S01375.ddf     +++|          SHN    6
01394  M01S01376.ddf     +++|          ADD    RA
01395  M01S01377.ddf     +++|          SHN    6
01396  M01S01378.ddf     +++|          ADD    AB+4
01397  M01S01379.ddf     +++|          CWM    **,T1
01398  M01S01380.ddf     +++| PRSA     EQU    *-1         (PP ADDRESS OF PROCESSOR)
01399  M01S01381.ddf     +++|          LDD    T1          UPDATE CM ADDRESS
01400  M01S01382.ddf     +++|          RAD    AB+4
01401  M01S01383.ddf     +++|          SHN    -14
01402  M01S01384.ddf     +++|          RAD    AB+3
01403  M01S01385.ddf     +++| PRS10    LDN    5           ADVANCE INDEX
01404  M01S01386.ddf     +++|          RAD    AB
01405  M01S01387.ddf     +++|          SBN    MXDO*5
01406  M01S01388.ddf     +++|          PJN    PRS11       IF END OF TABLE
01407  M01S01389.ddf     +++|          LJM    PRS9        LOOP
01408  M01S01390.ddf     +++| PRS11    LJM    LCP         LOAD COMMAND PROCESSORS FROM OVERLAYS
01409  M01S01391.ddf     +++|
01410  M01S01392.ddf     +++|
01411  M01S01393.ddf     +++| PRSB     VFD    48/8L$DDFILE.,12/0
01412  M01S01394.ddf     +++| PRSC     VFD    18/3R1AJ,6/0,12/2,12/0,12/4
01413  M01S01395.ddf     +++| PRSD     DATA   C* WAITING FOR MEMORY.*
01414  M01S01396.ddf     +++| PRSE     DATA   C* INCORRECT USER ACCESS.*
01415  M01S01397.ddf     +++| PRSF     VFD    12/1,6/6,42/1   SET JOB ADVANCE
01416  M01S01398.ddf     +++|          SPACE  4,10
01417  M01S01399.ddf     +++|**        PRESET COMMON DECKS.
01418  M01S01400.ddf     +++|
01419  M01S01401.ddf     +++|
01420  M01S01402.ddf     +++| QUAL$    EQU    0           DONT REQUALIFY COMMON DECKS
01421  M01S01403.ddf     +++|*CALL     COMPCUA
01422  M01S01404.ddf     +++| EJT$     EQU    0           DEFINE *COMPGFP* ACCESS TO EJT
01423  M01S01405.ddf     +++|*CALL     COMPGFP
01424  M01S01406.ddf     +++|
01425  M01S01407.ddf     +++|
01426  M01S01408.ddf     +++|          QUAL   *           RESUME UNQUALIFIED DEFINITIONS
01427  M01S01409.ddf     +++|          TITLE  RIGHT SCREEN DISPLAY PROCESSOR CM RESIDENT OVERLAYS.
01428  M01S01410.ddf     +++| DFB      SPACE  4,10
01429  M01S01411.ddf     +++|***              FIVE BYTES PER LINE.
01430  M01S01412.ddf     +++|*                THE CONTENTS OF THE SECTOR ARE DISPLAYED BY CENTRAL
01431  M01S01413.ddf     +++|*                MEMORY WORD.  THE BYTE NUMBERS ARE DISPLAYED IN
01432  M01S01414.ddf     +++|*                PARENTHESIS AFTER THE CENTRAL MEMORY WORD NUMBER.
01433  M01S01415.ddf     +++|*                THE */* IS USED TO TOGGLE BETWEEN THE FIRST AND
01434  M01S01416.ddf     +++|*                SECOND HALF OF THE SECTOR.  THE NUMBER OF WORDS
01435  M01S01417.ddf     +++|*                DISPLAYED IS DETERMINED BY THE WORD COUNT IN THE
01436  M01S01418.ddf     +++|*                CONTROL BYTES.
01437  M01S01419.ddf     +++| DFB      SPACE  4,15
01438  M01S01420.ddf     +++|**        DFB - DISPLAY FIVE BYTES/LINE.
01439  M01S01421.ddf     +++|*
01440  M01S01422.ddf     +++|*         ENTRY  CONSOLE FUNCTIONED FOR RIGHT SCREEN.
01441  M01S01423.ddf     +++|*                (DRSA - DRSA+4) = PROCESSOR CONTROL WORD.
01442  M01S01424.ddf     +++|*                (T3) = BUFFER ADDRESS.
01443  M01S01425.ddf     +++|*
01444  M01S01426.ddf     +++|*         EXIT   TO DRS2.
01445  M01S01427.ddf     +++|*
01446  M01S01428.ddf     +++|*         USES   T3, YC, AB - AB+4.
01447  M01S01429.ddf     +++|*
01448  M01S01430.ddf     +++|*         CALLS  DMW, D4D, SPP.
01449  M01S01431.ddf     +++|*
01450  M01S01432.ddf     +++|*         MACROS DISPLA.
01451  M01S01433.ddf     +++|
01452  M01S01434.ddf     +++|
01453  M01S01435.ddf     +++| DFB      RSOVL  RSPLA
01454  M01S01436.ddf     +++|          DISPHD (DDF.  5 BYTES/LINE.)
01455  M01S01437.ddf     +++|          LDM    CTOS        SET TOP OF SCREEN
01456  M01S01438.ddf     +++|          OAN    CH+40
01457  M01S01439.ddf     +++|          SBN    YINC
01458  M01S01440.ddf     +++|          STD    YC
01459  M01S01441.ddf     +++|          DISPLA CH01,,(LINKAGE BYTES = )
01460  M01S01442.ddf     +++|          LDI    T3          DISPLAY CONTROL BYTES
01461  M01S01443.ddf     +++|          RJM    D4D         DISPLAY FOUR DIGITS
01462  M01S01444.ddf     +++|          LDN    0
01463  M01S01445.ddf     +++|          OAN    CH+40
01464  M01S01446.ddf     +++|          LDM    BFMS+1
01465  M01S01447.ddf     +++|          RJM    D4D         DISPLAY FOUR DIGITS
01466  M01S01448.ddf     +++|          RJM    SPP         SET PAGE PARAMETERS
01467  M01S01449.ddf     +++|          ZJN    DFB1        IF NO WORDS TO DISPLAY
01468  M01S01450.ddf     +++|          STD    AB+4
01469  M01S01451.ddf     +++|          LDM    BFMS+1      NUMBER OF WORDS IN SECTOR
01470  M01S01452.ddf     +++|          SBD    AB          - FIRST WORD NUMBER
01471  M01S01453.ddf     +++|          MJN    DFB4        IF NO DATA TO BE DISPLAYED
01472  M01S01454.ddf     +++|          SBD    AB+4        - PAGE SIZE
01473  M01S01455.ddf     +++|          PJN    DFB2        IF FULL PAGE TO BE DISPLAYED
01474  M01S01456.ddf     +++|          RAD    AB+4        ADJUST WORD COUNT TO DISPLAY
01475  M01S01457.ddf     +++| DFB1     ZJN    DFB4        IF NO DATA TO DISPLAY
01476  M01S01458.ddf     +++| DFB2     LCN    YINC        ADVANCE Y-COORDINATE
01477  M01S01459.ddf     +++|          RAD    YC
01478  M01S01460.ddf     +++|          LDD    AB          SET LAST WORD NUMBER + 1
01479  M01S01461.ddf     +++|          ADN    10
01480  M01S01462.ddf     +++|          STD    AB+1
01481  M01S01463.ddf     +++|          LCN    10          DECREMENT WORDS TO DISPLAY
01482  M01S01464.ddf     +++|          RAD    AB+4
01483  M01S01465.ddf     +++|          PJN    DFB3        IF FULL GROUP TO BE DISPLAYED
01484  M01S01466.ddf     +++|          RAD    AB+1        ADJUST LAST WORD NUMBER
01485  M01S01467.ddf     +++|          LDN    0
01486  M01S01468.ddf     +++|          STD    AB+4
01487  M01S01469.ddf     +++| DFB3     LDD    AB          SET FIRST BYTE NUMBER
01488  M01S01470.ddf     +++|          SHN    2           FIRST WORD NUMBER * 5
01489  M01S01471.ddf     +++|          STD    AB+2
01490  M01S01472.ddf     +++|          LDD    AB
01491  M01S01473.ddf     +++|          ADN    2           + 2
01492  M01S01474.ddf     +++|          RAD    AB+2        = FIRST BYTE NUMBER
01493  M01S01475.ddf     +++|          LDN    0           SET DISPLAY MODE
01494  M01S01476.ddf     +++|          STD    AB+3
01495  M01S01477.ddf     +++|          RJM    DMW         DISPLAY MEMORY WORDS
01496  M01S01478.ddf     +++|          LDD    AB+4
01497  M01S01479.ddf     +++|          NJN    DFB2        IF MORE WORDS TO DISPLAY
01498  M01S01480.ddf     +++| DFB4     LJM    DRS2        EXIT
01499  M01S01481.ddf     +++|
01500  M01S01482.ddf     +++|
01501  M01S01483.ddf     +++| DIS      HERE
01502  M01S01484.ddf     +++| DTB      SPACE  4,10
01503  M01S01485.ddf     +++|***              TEN BYTES PER LINE.
01504  M01S01486.ddf     +++|*                THE CONTENTS OF THE SECTOR ARE DISPLAYED 10B BYTES PER
01505  M01S01487.ddf     +++|*                LINE.  THE ENTIRE SECTOR IS DISPLAYED ON THE SCREEN
01506  M01S01488.ddf     +++|*                WITH BYTE NUMBERS.
01507  M01S01489.ddf     +++| DTB      SPACE  4,15
01508  M01S01490.ddf     +++|**        DTB - DISPLAY TEN BYTES/LINE
01509  M01S01491.ddf     +++|*
01510  M01S01492.ddf     +++|*         ENTRY  CONSOLE FUNCTIONED FOR RIGHT SCREEN.
01511  M01S01493.ddf     +++|*                (DRSA - DRSA+4) = PROCESSOR CONTROL WORD.
01512  M01S01494.ddf     +++|*                (T3) = BUFFER ADDRESS.
01513  M01S01495.ddf     +++|*
01514  M01S01496.ddf     +++|*         EXIT   TO DRS2.
01515  M01S01497.ddf     +++|*
01516  M01S01498.ddf     +++|*         USES   T2, T3, XC, YC.
01517  M01S01499.ddf     +++|*
01518  M01S01500.ddf     +++|*         CALLS  D4D, ODC.
01519  M01S01501.ddf     +++|
01520  M01S01502.ddf     +++|
01521  M01S01503.ddf     +++| DTB      RSOVL  RSPLA
01522  M01S01504.ddf     +++|          DISPHD (DDF.  10B BYTES/LINE.)
01523  M01S01505.ddf     +++|          LDC    LN05
01524  M01S01506.ddf     +++|          STD    YC
01525  M01S01507.ddf     +++|          LDM    DCTY        SET FIRST BYTE NUMBER
01526  M01S01508.ddf     +++|          SBK    C545
01527  M01S01509.ddf     +++|          ZJN    DTB1        IF CC545 CONSOLE
01528  M01S01510.ddf     +++|          LDN    0           CLEAR BOTTOM OF SCREEN ADJUSTMENT
01529  M01S01511.ddf     +++|          STM    DTBA
01530  M01S01512.ddf     +++|          LDM    DRSA+4      CHECK PAGE NUMBER FOR 721
01531  M01S01513.ddf     +++|          LPN    1
01532  M01S01514.ddf     +++|          ZJN    DTB1        IF FIRST PAGE
01533  M01S01515.ddf     +++|          LDC    250         SET FIRST BYTE SECOND PAGE
01534  M01S01516.ddf     +++| DTB1     STD    T2
01535  M01S01517.ddf     +++|
01536  M01S01518.ddf     +++|*         OUTPUT ONE LINE.
01537  M01S01519.ddf     +++|
01538  M01S01520.ddf     +++| DTB2     LDN    2           OUTPUT COORDINATES
01539  M01S01521.ddf     +++|          OAM    XC,CH
01540  M01S01522.ddf     +++|          LDD    T2
01541  M01S01523.ddf     +++|          RJM    D4D         DISPLAY BYTE NUMBER
01542  M01S01524.ddf     +++|          LDN    7*XINC
01543  M01S01525.ddf     +++| DTB3     RAD    XC          OUTPUT X-COORDINATE
01544  M01S01526.ddf     +++|          OAN    CH+40
01545  M01S01527.ddf     +++|          LDM    BFMS,T2
01546  M01S01528.ddf     +++|          RJM    D4D         DISPLAY CONTENTS OF BYTE
01547  M01S01529.ddf     +++|          AOD    T2
01548  M01S01530.ddf     +++|          LPN    7
01549  M01S01531.ddf     +++|          ZJN    DTB4        IF END OF LINE
01550  M01S01532.ddf     +++|          LDN    5*XINC
01551  M01S01533.ddf     +++|          UJN    DTB3        LOOP TO DISPLAY REST OF LINE
01552  M01S01534.ddf     +++|
01553  M01S01535.ddf     +++|*         OUTPUT DISPLAY CODE FOR LINE.
01554  M01S01536.ddf     +++|
01555  M01S01537.ddf     +++| DTB4     OAN    CH+40
01556  M01S01538.ddf     +++|          LDC    CH01        RESET X-COORDINATE
01557  M01S01539.ddf     +++|          STD    XC
01558  M01S01540.ddf     +++|          LDC    BFMS-10     SET ADDRESS OF FIRST BYTE
01559  M01S01541.ddf     +++|          ADD    T2
01560  M01S01542.ddf     +++|          STD    T3
01561  M01S01543.ddf     +++|          LDN    10          BYTES TO DISPLAY
01562  M01S01544.ddf     +++|          RJM    ODC         OUTPUT DISPLAY CODE
01563  M01S01545.ddf     +++|          LDD    T2
01564  M01S01546.ddf     +++|          LPN    77
01565  M01S01547.ddf     +++|          NJN    DTB5        IF NOT NEW BLOCK
01566  M01S01548.ddf     +++|
01567  M01S01549.ddf     +++|*         ADVANCE Y-COORDINATE.
01568  M01S01550.ddf     +++|
01569  M01S01551.ddf     +++|          LCN    YINC
01570  M01S01552.ddf     +++|          RAD    YC
01571  M01S01553.ddf     +++| DTB5     LCN    YINC
01572  M01S01554.ddf     +++|          RAD    YC
01573  M01S01555.ddf     +++|          SBM    CBOS
01574  M01S01556.ddf     +++| DTBA     ADN    YINC*4
01575  M01S01557.ddf     +++|          MJN    DTB8        IF AT BOTTOM OF SCREEN
01576  M01S01558.ddf     +++|          LDC    500-1       CHECK FOR END OF DISPLAY
01577  M01S01559.ddf     +++|          SBD    T2
01578  M01S01560.ddf     +++|          MJN    DTB6        IF AT BOTTOM OF SCREEN
01579  M01S01561.ddf     +++|          LJM    DTB2        LOOP
01580  M01S01562.ddf     +++|
01581  M01S01563.ddf     +++|*         DISPLAY LAST TWO BYTES.
01582  M01S01564.ddf     +++|
01583  M01S01565.ddf     +++| DTB6     LDN    2           OUTPUT COORDINATES
01584  M01S01566.ddf     +++|          OAM    XC,CH
01585  M01S01567.ddf     +++|          LDD    T2          DISPLAY BYTE NUMBER
01586  M01S01568.ddf     +++|          RJM    D4D
01587  M01S01569.ddf     +++|          LDN    7*XINC
01588  M01S01570.ddf     +++| DTB7     RAD    XC          OUTPUT X-COORDINATE
01589  M01S01571.ddf     +++|          OAN    CH+40
01590  M01S01572.ddf     +++|          LDM    BFMS,T2     DISPLAY CONTENTS OF BYTE
01591  M01S01573.ddf     +++|          RJM    D4D
01592  M01S01574.ddf     +++|          AOD    T2
01593  M01S01575.ddf     +++|          LPN    1
01594  M01S01576.ddf     +++|          ZJN    DTB9        IF BOTH BYTES DISPLAYED
01595  M01S01577.ddf     +++|          LDN    5*XINC
01596  M01S01578.ddf     +++|          UJN    DTB7        LOOP TO DISPLAY REST OF LINE
01597  M01S01579.ddf     +++|
01598  M01S01580.ddf     +++| DTB8     UJN    DTB10       RETURN
01599  M01S01581.ddf     +++|
01600  M01S01582.ddf     +++| DTB9     LDC    CH49        OUTPUT DISPLAY CODE FOR LAST 2 BYTES
01601  M01S01583.ddf     +++|          OAN    CH+40
01602  M01S01584.ddf     +++|          LDC    BFMS+500
01603  M01S01585.ddf     +++|          STD    T3
01604  M01S01586.ddf     +++|          LDN    2
01605  M01S01587.ddf     +++|          RJM    ODC
01606  M01S01588.ddf     +++|          LDC    CH01        RESET X-COORDINATE
01607  M01S01589.ddf     +++|          STD    XC
01608  M01S01590.ddf     +++| DTB10    LJM    DRS2        RETURN
01609  M01S01591.ddf     +++|
01610  M01S01592.ddf     +++|
01611  M01S01593.ddf     +++| DIS      HERE
01612  M01S01594.ddf     +++| DTX      SPACE  4,10
01613  M01S01595.ddf     +++|***              TEXT.
01614  M01S01596.ddf     +++|*                DISPLAYS THE CONTENTS OF THE SECTOR IN TEXT MODE.
01615  M01S01597.ddf     +++|*                THE AMOUNT OF TEXT TO DISPLAY IS DETERMINED BY THE
01616  M01S01598.ddf     +++|*                WORD COUNT IN THE CONTROL BYTES.
01617  M01S01599.ddf     +++| DTX      SPACE  4,15
01618  M01S01600.ddf     +++|**        DTX - DISPLAY TEXT.
01619  M01S01601.ddf     +++|*
01620  M01S01602.ddf     +++|*         ENTRY  CONSOLE FUNCTIONED FOR RIGHT SCREEN.
01621  M01S01603.ddf     +++|*                (DRSA - DRSA+4) = PROCESSOR CONTROL WORD.
01622  M01S01604.ddf     +++|*                (T3) = BUFFER ADDRESS.
01623  M01S01605.ddf     +++|*
01624  M01S01606.ddf     +++|*         EXIT   TO DRS2.
01625  M01S01607.ddf     +++|*
01626  M01S01608.ddf     +++|*         USES   T1, T2, T3, AB, YC.
01627  M01S01609.ddf     +++|*
01628  M01S01610.ddf     +++|*         CALLS  ODC.
01629  M01S01611.ddf     +++|
01630  M01S01612.ddf     +++|
01631  M01S01613.ddf     +++| DTX      RSOVL  RSPLA
01632  M01S01614.ddf     +++|          DISPHD (DDF.  TEXT MODE DISPLAY.)
01633  M01S01615.ddf     +++|          LDM    CTOS
01634  M01S01616.ddf     +++|          ADN    YINC
01635  M01S01617.ddf     +++|          STD    YC
01636  M01S01618.ddf     +++|          LDM    BFMS        SET WORD COUNT
01637  M01S01619.ddf     +++|          NJN    DTX2        IF DATA TO DISPLAY
01638  M01S01620.ddf     +++| DTX1     LJM    DTX7        RETURN
01639  M01S01621.ddf     +++|
01640  M01S01622.ddf     +++| DTX2     LDM    BFMS+1
01641  M01S01623.ddf     +++|          STD    AB
01642  M01S01624.ddf     +++|          LDM    DCTY        SET FIRST BYTE NUMBER
01643  M01S01625.ddf     +++|          SBK    C545
01644  M01S01626.ddf     +++|          ZJN    DTX3        IF CC545 CONSOLE
01645  M01S01627.ddf     +++|          LDM    DRSA+4      CHECK PAGE NUMBER FOR 721
01646  M01S01628.ddf     +++|          LPN    1
01647  M01S01629.ddf     +++|          ZJN    DTX3        IF FIRST PAGE
01648  M01S01630.ddf     +++|          LDC    -40         DECREMENT NUMBER OF WORDS TO DISPLAY
01649  M01S01631.ddf     +++|          RAD    AB
01650  M01S01632.ddf     +++|          MJN    DTX1        IF NO WORDS TO DISPLAY
01651  M01S01633.ddf     +++|          LDC    240         SET FIRST BYTE SECOND PAGE
01652  M01S01634.ddf     +++| DTX3     ADN    2
01653  M01S01635.ddf     +++|          RAD    T3          FIRST BYTE TO DISPLAY
01654  M01S01636.ddf     +++|          LDN    0
01655  M01S01637.ddf     +++|          STD    T1
01656  M01S01638.ddf     +++| DTX4     LDD    XC
01657  M01S01639.ddf     +++| DTX5     OAN    CH+40
01658  M01S01640.ddf     +++|          LCN    YINC
01659  M01S01641.ddf     +++|          RAD    YC
01660  M01S01642.ddf     +++|          SBM    CBOS
01661  M01S01643.ddf     +++|          MJN    DTX7        IF BOTTOM OF SCREEN REACHED
01662  M01S01644.ddf     +++|          LDD    YC
01663  M01S01645.ddf     +++|          OAN    CH+40
01664  M01S01646.ddf     +++|          LDN    0           INITIALIZE LINE WORD COUNT
01665  M01S01647.ddf     +++|          STD    T2
01666  M01S01648.ddf     +++| DTX6     LDD    T1
01667  M01S01649.ddf     +++|          SBD    AB
01668  M01S01650.ddf     +++|          ZJN    DTX7        IF ALL WORDS DISPLAYED
01669  M01S01651.ddf     +++|          LDN    5
01670  M01S01652.ddf     +++|          RJM    ODC         OUTPUT DISPLAY CODE WORD
01671  M01S01653.ddf     +++|          AOD    T1
01672  M01S01654.ddf     +++|          LDM    -1,T3
01673  M01S01655.ddf     +++|          ZJN    DTX4        IF END OF TEXT LINE
01674  M01S01656.ddf     +++|          AOD    T2
01675  M01S01657.ddf     +++|          SBN    5
01676  M01S01658.ddf     +++|          NJN    DTX6        IF NOT END OF SCREEN LINE
01677  M01S01659.ddf     +++|          LDC    CH05        CONTINUE ON NEXT LINE OF SCREEN
01678  M01S01660.ddf     +++|          UJN    DTX5        LOOP FOR REST OF LINE
01679  M01S01661.ddf     +++|
01680  M01S01662.ddf     +++| DTX7     LJM    DRS2        RETURN
01681  M01S01663.ddf     +++|
01682  M01S01664.ddf     +++|
01683  M01S01665.ddf     +++| DIS      HERE
01684  M01S01666.ddf     +++| DLC      SPACE  4,10
01685  M01S01667.ddf     +++|***              LEGAL COMMANDS.
01686  M01S01668.ddf     +++|*                DISPLAYS A LIST OF THE DDF COMMANDS.
01687  M01S01669.ddf     +++| DLC      SPACE  4,15
01688  M01S01670.ddf     +++|**        DLC - DISPLAY LEGAL COMMANDS.
01689  M01S01671.ddf     +++|*
01690  M01S01672.ddf     +++|*         ENTRY  CONSOLE FUNCTIONED FOR RIGHT SCREEN.
01691  M01S01673.ddf     +++|*                (DRSA - DRSA+4) = PROCESSOR CONTROL WORD.
01692  M01S01674.ddf     +++|*                (TA) = ADDRESS OF COMMAND TABLE IN CM.
01693  M01S01675.ddf     +++|*
01694  M01S01676.ddf     +++|*         EXIT   TO DRS2.
01695  M01S01677.ddf     +++|*
01696  M01S01678.ddf     +++|*         USES   T2, DK, RC, XC, YC, AB - AB+4.
01697  M01S01679.ddf     +++|*
01698  M01S01680.ddf     +++|*         CALLS  DOL.
01699  M01S01681.ddf     +++|
01700  M01S01682.ddf     +++|
01701  M01S01683.ddf     +++| DLC      RSOVL  RSPLA
01702  M01S01684.ddf     +++|          DISPHD (DDF.  LEGAL COMMANDS.)
01703  M01S01685.ddf     +++|          LDN    0           INITIALIZE COMMAND INDEX
01704  M01S01686.ddf     +++|          STD    DK
01705  M01S01687.ddf     +++| DLC1     LDM    CTOS
01706  M01S01688.ddf     +++|          STD    YC
01707  M01S01689.ddf     +++|          LDN    RCPC        COMMANDS PER COLUMN
01708  M01S01690.ddf     +++|          STD    RC
01709  M01S01691.ddf     +++| DLC2     LDN    2           OUTPUT COORDINATES
01710  M01S01692.ddf     +++|          OAM    XC,CH
01711  M01S01693.ddf     +++|          LDD    RA          GET ADDRESS OF COMMAND
01712  M01S01694.ddf     +++|          ADD    TA
01713  M01S01695.ddf     +++|          SHN    6
01714  M01S01696.ddf     +++|          ADD    DK
01715  M01S01697.ddf     +++|          ADN    2           CHECK NEXT COMMAND
01716  M01S01698.ddf     +++|          CRD    AB
01717  M01S01699.ddf     +++|          SBN    2
01718  M01S01700.ddf     +++|          RJM    DOL         DISPLAY COMMAND
01719  M01S01701.ddf     +++|          LDD    AB          CHECK NEXT COMMAND
01720  M01S01702.ddf     +++|          ZJN    DLC3        IF END OF COMMANDS
01721  M01S01703.ddf     +++|          LCN    YINC        ADVANCE Y-COORDINATE
01722  M01S01704.ddf     +++|          RAD    YC
01723  M01S01705.ddf     +++|          LDN    2           ADVANCE COMMAND INDEX
01724  M01S01706.ddf     +++|          RAD    DK
01725  M01S01707.ddf     +++|          SOD    RC
01726  M01S01708.ddf     +++|          NJN    DLC2        IF NOT END OF COLUMN
01727  M01S01709.ddf     +++|          LDC    13D*XINC    ADVANCE X-COORDINATE
01728  M01S01710.ddf     +++|          RAD    XC
01729  M01S01711.ddf     +++|          UJN    DLC1        START NEXT COLUMN
01730  M01S01712.ddf     +++|
01731  M01S01713.ddf     +++| DLC3     LDM    DCTY        RESET COORDINATES
01732  M01S01714.ddf     +++|          SBK    C545
01733  M01S01715.ddf     +++|          ZJN    DLC4        IF CC545 CONSOLE
01734  M01S01716.ddf     +++|          LDN    3*YINC
01735  M01S01717.ddf     +++| DLC4     SBK    3*YINC+RCPC*YINC
01736  M01S01718.ddf     +++|          ADM    CTOS
01737  M01S01719.ddf     +++|          STD    YC
01738  M01S01720.ddf     +++|          LDC    CH01
01739  M01S01721.ddf     +++|          STD    XC
01740  M01S01722.ddf     +++|
01741  M01S01723.ddf     +++|*         OUTPUT SPECIAL CHARACTER COMMANDS.
01742  M01S01724.ddf     +++|
01743  M01S01725.ddf     +++|          LDC    DLCA-1
01744  M01S01726.ddf     +++|          STD    T2
01745  M01S01727.ddf     +++| DLC5     LCN    YINC
01746  M01S01728.ddf     +++|          RAD    YC
01747  M01S01729.ddf     +++|          LDN    2
01748  M01S01730.ddf     +++|          OAM    XC,CH
01749  M01S01731.ddf     +++| DLC6     AOD    T2          DISPLAY LINE
01750  M01S01732.ddf     +++|          LDI    T2
01751  M01S01733.ddf     +++|          OAN    CH+40
01752  M01S01734.ddf     +++|          LPN    77
01753  M01S01735.ddf     +++|          NJN    DLC6        IF NOT END OF LINE
01754  M01S01736.ddf     +++|          LDM    1,T2
01755  M01S01737.ddf     +++|          NJN    DLC5        IF MORE LINES TO DISPLAY
01756  M01S01738.ddf     +++|          LJM    DRS2        RETURN
01757  M01S01739.ddf     +++|
01758  M01S01740.ddf     +++|
01759  M01S01741.ddf     +++| DLCA     BSS    0
01760  M01S01742.ddf     +++|          DATA   Z*+   INCREMENT SECTOR.*
01761  M01S01743.ddf     +++|          DATA   Z*-   DECREMENT SECTOR.*
01762  M01S01744.ddf     +++|          DATA   Z*.   ADVANCE PAST END OF TRACK, ZERO SECTOR.*
01763  M01S01745.ddf     +++|          DATA   Z*,   ADVANCE TO NEXT TRACK IN CHAIN.*
01764  M01S01746.ddf     +++|          DATA   Z*=   ADVANCE PAST EOI.*
01765  M01S01747.ddf     +++|          DATA   Z*8   INCREMENT TRACK.*
01766  M01S01748.ddf     +++|          DATA   Z*9   DECREMENT TRACK.*
01767  M01S01749.ddf     +++|          DATA   Z*/   ADVANCE RIGHT SCREEN.*
01768  M01S01750.ddf     +++|          DATA   Z*SPACE - READ CURRENT SECTOR.*
01769  M01S01751.ddf     +++|          DATA   Z*RIGHT BLANK OR TAB - CHANGE RIGHT DISPLAY.*
01770  M01S01752.ddf     +++|          CON    0
01771  M01S01753.ddf     +++|
01772  M01S01754.ddf     +++|
01773  M01S01755.ddf     +++| DIS      HERE
01774  M01S01756.ddf     +++| DFD      SPACE  4,20
01775  M01S01757.ddf     +++|**        DFD - DISPLAY FORMATTED DATA.
01776  M01S01758.ddf     +++|*
01777  M01S01759.ddf     +++|*         DETERMINES SECTOR TYPE AND CALLS APPROPRIATE FORMATTING
01778  M01S01760.ddf     +++|*         DISPLAY PROCESSOR.
01779  M01S01761.ddf     +++|*
01780  M01S01762.ddf     +++|*         ENTRY  CONSOLE FUNCTIONED FOR RIGHT SCREEN.
01781  M01S01763.ddf     +++|*                (DRSA - DRSA+4) = PROCESSOR CONTROL WORD.
01782  M01S01764.ddf     +++|*                (T3) = BUFFER ADDRESS.
01783  M01S01765.ddf     +++|*
01784  M01S01766.ddf     +++|*         EXIT   TO DRS2.
01785  M01S01767.ddf     +++|*
01786  M01S01768.ddf     +++|*         USES   AB.
01787  M01S01769.ddf     +++|*
01788  M01S01770.ddf     +++|*         CALLS  DEI, DPE, DSS, D4D, LDO.
01789  M01S01771.ddf     +++|*
01790  M01S01772.ddf     +++|*         MACROS DISPLA.
01791  M01S01773.ddf     +++|
01792  M01S01774.ddf     +++|
01793  M01S01775.ddf     +++| DFD      RSOVL  RSPLA
01794  M01S01776.ddf     +++|          DISPHD (DDF.  FORMATTED DISPLAY.)
01795  M01S01777.ddf     +++|          LDM    CTOS
01796  M01S01778.ddf     +++|          OAN    CH+40
01797  M01S01779.ddf     +++|          ADM    DBLS        DOUBLE SPACE
01798  M01S01780.ddf     +++|          ADN    YINC        BACK UP ONE
01799  M01S01781.ddf     +++|          STD    YC
01800  M01S01782.ddf     +++|          DISPLA CH01,,(LINKAGE BYTES = )
01801  M01S01783.ddf     +++|          LDI    T3
01802  M01S01784.ddf     +++|          RJM    D4D         DISPLAY FIRST BYTE
01803  M01S01785.ddf     +++|          LDN    0
01804  M01S01786.ddf     +++|          OAN    CH+40
01805  M01S01787.ddf     +++|          STD    AB
01806  M01S01788.ddf     +++|          LDM    BFMS+1
01807  M01S01789.ddf     +++|          RJM    D4D         DISPLAY SECOND BYTE
01808  M01S01790.ddf     +++|          LDI    T3
01809  M01S01791.ddf     +++|          ZJN    DFD2        IF EOF/EOI SECTOR
01810  M01S01792.ddf     +++|          LDM    BFMS+1
01811  M01S01793.ddf     +++|          ZJN    DFD5        IF EMPTY SECTOR
01812  M01S01794.ddf     +++|          LDI    T3
01813  M01S01795.ddf     +++|          SHN    6
01814  M01S01796.ddf     +++|          ADM    BFMS+1
01815  M01S01797.ddf     +++|          LMC    377777
01816  M01S01798.ddf     +++|          NJN    DFD1        IF NOT SYSTEM SECTOR
01817  M01S01799.ddf     +++|          LDN    DSSN        SELECT SYSTEM SECTOR DISPLAY
01818  M01S01800.ddf     +++|          UJN    DFD3        LOAD PROCESSOR
01819  M01S01801.ddf     +++|
01820  M01S01802.ddf     +++| DFD1     LDN    DPEN        SELECT PFC DISPLAY
01821  M01S01803.ddf     +++|          UJN    DFD3        LOAD PROCESSOR
01822  M01S01804.ddf     +++|
01823  M01S01805.ddf     +++| DFD2     LDM    BFMS+1
01824  M01S01806.ddf     +++|          NJN    DFD5        IF NOT EOI SECTOR
01825  M01S01807.ddf     +++|          LDN    DEIN        SELECT EOI SECTOR DISPLAY
01826  M01S01808.ddf     +++| DFD3     LMM    DFDB
01827  M01S01809.ddf     +++|          ZJN    DFD4        IF PROCESSOR LOADED
01828  M01S01810.ddf     +++|          LMM    DFDB
01829  M01S01811.ddf     +++|          STM    DFDB
01830  M01S01812.ddf     +++|          RJM    LDO         LOAD DISPLAY OVERLAY
01831  M01S01813.ddf     +++|          LDD    CM          SET PROCESSOR ADDRESS
01832  M01S01814.ddf     +++|          STM    DFDA
01833  M01S01815.ddf     +++| DFD4     LJM    **          JUMP TO DISPLAY PROCESSOR
01834  M01S01816.ddf     +++| DFDA     EQU    *-1
01835  M01S01817.ddf     +++|
01836  M01S01818.ddf     +++| DFD5     LJM    DRS2        RETURN
01837  M01S01819.ddf     +++|
01838  M01S01820.ddf     +++|
01839  M01S01821.ddf     +++| DFDB     DATA   0           CURRENT PROCESSOR ID
Line S01822 Modification History
M01 (Added by) ddf
M02 (Updated by) ns2786
Seq #  *Modification Id* Act 
----------------------------+
01840  M02S01822.ns2786  ---| CDD      SPACE  4,10
Line S01823 Modification History
M01 (Added by) ddf
M02 (Updated by) ns2786
Seq #  *Modification Id* Act 
----------------------------+
01841  M02S01823.ns2786  ---|**        CDD - CONVERT TO DECIMAL DISPLAY.
Line S01824 Modification History
M01 (Added by) ddf
M02 (Updated by) ns2786
Seq #  *Modification Id* Act 
----------------------------+
01842  M02S01824.ns2786  ---|*
Line S01825 Modification History
M01 (Added by) ddf
M02 (Updated by) ns2786
Seq #  *Modification Id* Act 
----------------------------+
01843  M02S01825.ns2786  ---|*         ENTRY  (A) = 12 BIT BINARY NUMBER.
Line S01826 Modification History
M01 (Added by) ddf
M02 (Updated by) ns2786
Seq #  *Modification Id* Act 
----------------------------+
01844  M02S01826.ns2786  ---|*
Line S01827 Modification History
M01 (Added by) ddf
M02 (Updated by) ns2786
Seq #  *Modification Id* Act 
----------------------------+
01845  M02S01827.ns2786  ---|*         EXIT   (A) = DECIMAL DISPLAY REPRESENTATION OF NUMBER.
Line S01828 Modification History
M01 (Added by) ddf
M02 (Updated by) ns2786
Seq #  *Modification Id* Act 
----------------------------+
01846  M02S01828.ns2786  ---|*
Line S01829 Modification History
M01 (Added by) ddf
M02 (Updated by) ns2786
Seq #  *Modification Id* Act 
----------------------------+
01847  M02S01829.ns2786  ---|*         USES   T2, T3.
Line S01830 Modification History
M01 (Added by) ddf
M02 (Updated by) ns2786
Seq #  *Modification Id* Act 
----------------------------+
01848  M02S01830.ns2786  ---|*
Line S01831 Modification History
M01 (Added by) ddf
M02 (Updated by) ns2786
Seq #  *Modification Id* Act 
----------------------------+
01849  M02S01831.ns2786  ---|*         CALLS  DV5.
Line S01832 Modification History
M01 (Added by) ddf
M02 (Updated by) ns2786
Seq #  *Modification Id* Act 
----------------------------+
01850  M02S01832.ns2786  ---|
Line S01833 Modification History
M01 (Added by) ddf
M02 (Updated by) ns2786
Seq #  *Modification Id* Act 
----------------------------+
01851  M02S01833.ns2786  ---|
Line S01834 Modification History
M01 (Added by) ddf
M02 (Updated by) ns2786
Seq #  *Modification Id* Act 
----------------------------+
01852  M02S01834.ns2786  ---| CDD      SUBR               ENTRY/EXIT
Line S01835 Modification History
M01 (Added by) ddf
M02 (Updated by) ns2786
Seq #  *Modification Id* Act 
----------------------------+
01853  M02S01835.ns2786  ---|          STD    T3
Line S01836 Modification History
M01 (Added by) ddf
M02 (Updated by) ns2786
Seq #  *Modification Id* Act 
----------------------------+
01854  M02S01836.ns2786  ---|          SHN    -1          DIVIDE BY TWO
Line S01837 Modification History
M01 (Added by) ddf
M02 (Updated by) ns2786
Seq #  *Modification Id* Act 
----------------------------+
01855  M02S01837.ns2786  ---|          RJM    DV5         DIVIDE BY FIVE
Line S01838 Modification History
M01 (Added by) ddf
M02 (Updated by) ns2786
Seq #  *Modification Id* Act 
----------------------------+
01856  M02S01838.ns2786  ---|          STD    T2
Line S01839 Modification History
M01 (Added by) ddf
M02 (Updated by) ns2786
Seq #  *Modification Id* Act 
----------------------------+
01857  M02S01839.ns2786  ---|          SHN    2           MULTIPLY BY TEN
Line S01840 Modification History
M01 (Added by) ddf
M02 (Updated by) ns2786
Seq #  *Modification Id* Act 
----------------------------+
01858  M02S01840.ns2786  ---|          ADD    T2
Line S01841 Modification History
M01 (Added by) ddf
M02 (Updated by) ns2786
Seq #  *Modification Id* Act 
----------------------------+
01859  M02S01841.ns2786  ---|          SHN    1
Line S01842 Modification History
M01 (Added by) ddf
M02 (Updated by) ns2786
Seq #  *Modification Id* Act 
----------------------------+
01860  M02S01842.ns2786  ---|          STD    T0
Line S01843 Modification History
M01 (Added by) ddf
M02 (Updated by) ns2786
Seq #  *Modification Id* Act 
----------------------------+
01861  M02S01843.ns2786  ---|          LDD    T3          CONVERT LOWER DIGIT
Line S01844 Modification History
M01 (Added by) ddf
M02 (Updated by) ns2786
Seq #  *Modification Id* Act 
----------------------------+
01862  M02S01844.ns2786  ---|          SBD    T0
Line S01845 Modification History
M01 (Added by) ddf
M02 (Updated by) ns2786
Seq #  *Modification Id* Act 
----------------------------+
01863  M02S01845.ns2786  ---|          ADN    1R0
Line S01846 Modification History
M01 (Added by) ddf
M02 (Updated by) ns2786
Seq #  *Modification Id* Act 
----------------------------+
01864  M02S01846.ns2786  ---|          STD    T3
Line S01847 Modification History
M01 (Added by) ddf
M02 (Updated by) ns2786
Seq #  *Modification Id* Act 
----------------------------+
01865  M02S01847.ns2786  ---|          LDD    T2          CONVERT UPPER DIGIT
Line S01848 Modification History
M01 (Added by) ddf
M02 (Updated by) ns2786
Seq #  *Modification Id* Act 
----------------------------+
01866  M02S01848.ns2786  ---|          ADN    1R0
Line S01849 Modification History
M01 (Added by) ddf
M02 (Updated by) ns2786
Seq #  *Modification Id* Act 
----------------------------+
01867  M02S01849.ns2786  ---|          SHN    6
Line S01850 Modification History
M01 (Added by) ddf
M02 (Updated by) ns2786
Seq #  *Modification Id* Act 
----------------------------+
01868  M02S01850.ns2786  ---|          LMD    T3
Line S01851 Modification History
M01 (Added by) ddf
M02 (Updated by) ns2786
Seq #  *Modification Id* Act 
----------------------------+
01869  M02S01851.ns2786  ---|          UJN    CDDX        RETURN
01870  M01S01852.ddf     +++| DCE      SPACE  4,15
01871  M01S01853.ddf     +++|**        DCE - DISPLAY PF CATALOG ENTRY.
01872  M01S01854.ddf     +++|*
01873  M01S01855.ddf     +++|*         ENTRY  (AB+2) = SET FOR CALL TO DMW.
01874  M01S01856.ddf     +++|*                (T3) = BUFFER ADDRESS.
01875  M01S01857.ddf     +++|*
01876  M01S01858.ddf     +++|*         EXIT   DATA DISPLAYED.
01877  M01S01859.ddf     +++|*
01878  M01S01860.ddf     +++|*         USES   T1, AB, AB+1, CM, YC.
01879  M01S01861.ddf     +++|*
01880  M01S01862.ddf     +++|*         CALLS  DPT, DMW.
01881  M01S01863.ddf     +++|*
01882  M01S01864.ddf     +++|*         MACROS DISPLA.
01883  M01S01865.ddf     +++|
01884  M01S01866.ddf     +++|
01885  M01S01867.ddf     +++| DCE      SUBR               ENTRY/EXIT
01886  M01S01868.ddf     +++|          LDM    CPFC        SET *DMW* PARAMETERS
01887  M01S01869.ddf     +++|          STD    YC
01888  M01S01870.ddf     +++|          LDN    0
01889  M01S01871.ddf     +++|          STD    AB
01890  M01S01872.ddf     +++|          LDN    NWCE
01891  M01S01873.ddf     +++|          STD    AB+1
01892  M01S01874.ddf     +++|          LDC    TPFC
01893  M01S01875.ddf     +++|          STD    AB+3
01894  M01S01876.ddf     +++|          RJM    DMW         DISPLAY MEMORY WORDS
01895  M01S01877.ddf     +++|
01896  M01S01878.ddf     +++|*         DISPLAY DATES AND MODES.
01897  M01S01879.ddf     +++|
01898  M01S01880.ddf     +++|          LDM    DBLS
01899  M01S01881.ddf     +++|          RAD    YC
01900  M01S01882.ddf     +++|          LPC    7777
01901  M01S01883.ddf     +++|          OAN    CH+40
01902  M01S01884.ddf     +++|          LDC    -NWCE*5
01903  M01S01885.ddf     +++|          ADD    T3
01904  M01S01886.ddf     +++|          STD    CM
01905  M01S01887.ddf     +++|          DISPLA CH01,,(CREATED   )
01906  M01S01888.ddf     +++|          LDD    CM          DISPLAY CREATION DATE
01907  M01S01889.ddf     +++|          ADN    FCCD
01908  M01S01890.ddf     +++|          RJM    DPT         DISPLAY PACKED DATE AND TIME
01909  M01S01891.ddf     +++|          DISPLA CH34,,( CT = )
01910  M01S01892.ddf     +++|          LDM    FCCT,CM     DISPLAY FILE CATAGORY
01911  M01S01893.ddf     +++|          SHN    -6
01912  M01S01894.ddf     +++|          STD    T1
01913  M01S01895.ddf     +++|          LDM    DCEA,T1
01914  M01S01896.ddf     +++|          OAN    CH+40
01915  M01S01897.ddf     +++|          DISPLA ,,(    M = )
01916  M01S01898.ddf     +++|          LDM    FCAM,CM     DISPLAY ACCESS MODE
01917  M01S01899.ddf     +++|          LPN    77
01918  M01S01900.ddf     +++|          STD    T1
01919  M01S01901.ddf     +++|          LDM    DCEB,T1
01920  M01S01902.ddf     +++|          OAN    CH+40
01921  M01S01903.ddf     +++|          LCN    YINC
01922  M01S01904.ddf     +++|          RAD    YC
01923  M01S01905.ddf     +++|          OAN    CH+40
01924  M01S01906.ddf     +++|          DISPLA CH01,,(MODIFIED  )
01925  M01S01907.ddf     +++|          LDD    CM          DISPLAY MODIFICATION DATE
01926  M01S01908.ddf     +++|          ADN    FCMD
01927  M01S01909.ddf     +++|          RJM    DPT
01928  M01S01910.ddf     +++|          DISPLA CH35,,(CONTROL   )
01929  M01S01911.ddf     +++|          LDD    CM          DISPLAY CONTROL CHANGE DATE
01930  M01S01912.ddf     +++|          ADN    FCKD
01931  M01S01913.ddf     +++|          RJM    DPT
01932  M01S01914.ddf     +++|          LCN    YINC
01933  M01S01915.ddf     +++|          RAD    YC
01934  M01S01916.ddf     +++|          OAN    CH+40
01935  M01S01917.ddf     +++|          DISPLA CH01,,(ACCESSED  )
01936  M01S01918.ddf     +++|          LDD    CM          DISPLAY LAST ACCESS DATE
01937  M01S01919.ddf     +++|          ADN    FCAD
01938  M01S01920.ddf     +++|          RJM    DPT
01939  M01S01921.ddf     +++|          DISPLA CH35,,(UTILITY   )
01940  M01S01922.ddf     +++|          LDD    CM          DISPLAY UTILITY ACCESS DATE
01941  M01S01923.ddf     +++|          ADN    FCUD
01942  M01S01924.ddf     +++|          RJM    DPT
01943  M01S01925.ddf     +++|          LJM    DCEX        RETURN
01944  M01S01926.ddf     +++|
01945  M01S01927.ddf     +++|
01946  M01S01928.ddf     +++| DCEA     DATA   2HPR        FILE CATAGORIES
01947  M01S01929.ddf     +++|          DATA   2HSP
01948  M01S01930.ddf     +++|          DATA   2HPU
01949  M01S01931.ddf     +++|
01950  M01S01932.ddf     +++| DCEB     DATA   2HWR        ACCESS MODES
01951  M01S01933.ddf     +++|          DATA   2HRD
01952  M01S01934.ddf     +++|          DATA   2HAP
01953  M01S01935.ddf     +++|          DATA   2HEX
01954  M01S01936.ddf     +++|          DATA   2H
01955  M01S01937.ddf     +++|          DATA   2HMD
01956  M01S01938.ddf     +++|          DATA   2HRM
01957  M01S01939.ddf     +++|          DATA   2HRA
01958  M01S01940.ddf     +++| DPT      SPACE  4,10
01959  M01S01941.ddf     +++|**        DPT - DISPLAY PACKED DATE AND TIME.
01960  M01S01942.ddf     +++|*
01961  M01S01943.ddf     +++|*         ENTRY  (A) = ADDRESS OF PACKED DATE AND TIME.
01962  M01S01944.ddf     +++|*
Line S01945 Modification History
M01 (Added by) ddf
M02 (Updated by) ns2786
Seq #  *Modification Id* Act 
----------------------------+
01963  M02S01945.ns2786  ---|*         USES   T0 - T2, AB - AB+4.
Proceed to Part 1