User Tools

Site Tools


Action unknown: copypageplugin__copy
cdc:nos2.source:opl.opl871:deck:pfu.004

Deck PFU Part 004

22 Modifications

Listing Sections

Source

Seq #  *Modification Id* Act 
----------------------------+
05948  M00S05142.pfu     +++|*         SET PERMIT LAST TRACK AND SECTOR.
05949  M00S05143.pfu     +++|
05950  M00S05144.pfu     +++|          LDD    PF          SET *PETS* FET ADDRESS
05951  M00S05145.pfu     +++|          STD    IR+3
05952  M00S05146.pfu     +++|          LDD    PF+1
05953  M00S05147.pfu     +++|          STD    IR+4
05954  M00S05148.pfu     +++|          ADD    IR+3
05955  M00S05149.pfu     +++|          NJN    POF2        IF PERMITS FET PRESENT
05956  M00S05150.pfu     +++|          LJM    POF3        SET *DATA* FET ADDRESS
05957  M00S05151.pfu     +++|
05958  M00S05152.pfu     +++| POF2     LDN    0
05959  M00S05153.pfu     +++|          RJM    FFE         FIND FNT ENTRY
Line S05154 Modification History
M01 (Removed by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
05960  M01S05154.ns22000 ---|          LDN    FS          ADDRESS OF EQUIPMENT NUMBER
Line S00191 Modification History
M01 (Added by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
05961  M01S00191.ns22000 +++|          LDN    FS          ADDRESS OF EST ORDINAL
05962  M00S05155.pfu     +++|          RJM    VME         VALIDATE MASS STORAGE
05963  M00S05156.pfu     +++|          LDD    FS+1        SET *PETS* FIRST TRACK
05964  M00S05157.pfu     +++|          STD    T6
05965  M00S05158.pfu     +++|          LDN    0           SELECT EOI SEARCH WITH TRT UPDATE
05966  M00S05159.pfu     +++|          RJM    SEI         SEARCH FOR EOI
05967  M00S05160.pfu     +++|          LDD    T6
05968  M00S05161.pfu     +++|          STD    FS+2
05969  M00S05162.pfu     +++|          LDD    T7
05970  M00S05163.pfu     +++|          STD    FS+3
05971  M00S05164.pfu     +++|          RJM    SFC         WRITE UPDATED FILE STATUS
05972  M00S05165.pfu     +++|
05973  M00S05166.pfu     +++|*         SEND PERMIT SECTOR COUNT TO CENTRAL.
05974  M00S05167.pfu     +++|
05975  M00S05168.pfu     +++|          FETA   FTSC        SEND *PETS* SECTOR COUNT TO CENTRAL
05976  M00S05169.pfu     +++|          CRD    CM
05977  M00S05170.pfu     +++|          LDD    T2
05978  M00S05171.pfu     +++|          STD    CM
05979  M00S05172.pfu     +++|          LDD    T3
05980  M00S05173.pfu     +++|          STD    CM+1
05981  M00S05174.pfu     +++|          FETA   FTSC
05982  M00S05175.pfu     +++|          CWD    CM
05983  M00S05176.pfu     +++|          RJM    CFS         SET *PETS* FET COMPLETE
05984  M00S05177.pfu     +++|
05985  M00S05178.pfu     +++|*         SET *DATA* FET ADDRESS IN IR+3 - IR+4.
05986  M00S05179.pfu     +++|
05987  M00S05180.pfu     +++| POF3     LDD    DF          RESET *DATA* FET ADDRESS
05988  M00S05181.pfu     +++|          STD    IR+3
05989  M00S05182.pfu     +++|          LDD    DF+1
05990  M00S05183.pfu     +++|          STD    IR+4
05991  M00S05184.pfu     +++|          LJM    POFX        RETURN
Line S00219 Modification History
M01 (Added by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
05992  M01S00219.242l642 +++| SAU      SPACE  4,15
05993  M01S00220.242l642 +++|**        SAU - SET *PFU* ACTIVE FLAG.
05994  M01S00221.242l642 +++|*
05995  M01S00222.242l642 +++|*         ENTRY  (P4 - P5) = *PFU* ACTIVE FLAG ADDRESS.
05996  M01S00223.242l642 +++|*
05997  M01S00224.242l642 +++|*         EXIT   (PFAF - PFAF+1) = *PFU* ACTIVE FLAG ADDRESS.
05998  M01S00225.242l642 +++|*                *PFU* ACTIVE FLAG ADDRESS VALIDATED.
05999  M01S00226.242l642 +++|*                *PFU* ACTIVE FLAG IN CENTRAL PROGRAM SET = 1.
06000  M01S00227.242l642 +++|*
06001  M01S00228.242l642 +++|*         USES   CM - CM+4.
06002  M01S00229.242l642 +++|*
06003  M01S00230.242l642 +++|*         MACROS VADDR.
06004  M01S00231.242l642 +++|
06005  M01S00232.242l642 +++|
06006  M01S00233.242l642 +++| SAU      SUBR               ENTRY/EXIT
06007  M01S00234.242l642 +++|          LDN    ZERL        SET FLAG WORD = 1
06008  M01S00235.242l642 +++|          CRD    CM
06009  M01S00236.242l642 +++|          AOD    CM+4
06010  M01S00237.242l642 +++|          VADDR  P4          VALIDATE FLAG ADDRESS
06011  M01S00238.242l642 +++|          STM    PFAF+1      SAVE FLAG ADDRESS
06012  M01S00239.242l642 +++|          SHN    -14
06013  M01S00240.242l642 +++|          STM    PFAF
06014  M01S00241.242l642 +++|          SHN    6           FORM ABSOLUTE ADDRESS
06015  M01S00242.242l642 +++|          ADD    RA
06016  M01S00243.242l642 +++|          SHN    6
06017  M01S00244.242l642 +++|          ADD    P5
06018  M01S00245.242l642 +++|          CWD    CM          SET *PFU* ACTIVE FLAG
06019  M01S00246.242l642 +++|          UJN    SAUX        RETURN
06020  M00S05185.pfu     +++|          SPACE  4,10
06021  M00S05186.pfu     +++|          OVERFLOW  OVLA     CHECK FOR OVERLAY OVERFLOW
06022  M00S05187.pfu     +++| ERP      OVERLAY  (ERROR PROCESSOR.),OVLA
06023  M00S05188.pfu     +++| ERP      SPACE  4,20
06024  M00S05189.pfu     +++|**        ERP - ERROR PROCESSOR.
06025  M00S05190.pfu     +++|*
Line S05191 Modification History
M01 (Removed by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
06026  M01S05191.ns22000 ---|*         ENTRY  (ERRA) = ERROR CODE.
Line S00192 Modification History
M01 (Added by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
06027  M01S00192.ns22000 +++|*         ENTRY  (P1) = ERROR CODE.
06028  M00S05192.pfu     +++|*                (FA) = FNT ADDRESS, (FILE SET BUSY).
06029  M00S05193.pfu     +++|*                     = 0 IF NO FILE SET BUSY.
06030  M00S05194.pfu     +++|*                (FS - FS+4) = FST ENTRY.
06031  M00S05195.pfu     +++|*                (FN - FN+3) = FILE NAME.
06032  M00S05196.pfu     +++|*                (IR+3 - IR+4) = FET ADDRESS.
06033  M00S05197.pfu     +++|*                (PFAF - PFAF+1) = *PFU* ACTIVE FLAG ADDRESS.
06034  M00S05198.pfu     +++|*
Line S05199 Modification History
M01 (Removed by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
06035  M01S05199.ns22000 ---|*         EXIT   ERROR MESSAGE ISSUED TO DAYFILE.
Line S00193 Modification History
M01 (Added by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
06036  M01S00193.ns22000 +++|*         EXIT   TO *PPR*, AFTER *DPPM*.
06037  M01S00194.ns22000 +++|*                ERROR MESSAGE ISSUED TO DAYFILE.
06038  M00S05200.pfu     +++|*                FILE SET COMPLETE.
06039  M00S05201.pfu     +++|*                FET SET COMPLETE.
06040  M00S05202.pfu     +++|*                *PFU* ACTIVE FLAG CLEARED IN CENTRAL PROGRAM IF SET.
06041  M00S05203.pfu     +++|*
06042  M00S05204.pfu     +++|*         USES   CM+1.
06043  M00S05205.pfu     +++|*
06044  M00S05206.pfu     +++|*         CALLS  CAU, CFS, IDM, SFC.
06045  M00S05207.pfu     +++|*
06046  M00S05208.pfu     +++|*         MACROS MONITOR.
06047  M00S05209.pfu     +++|
06048  M00S05210.pfu     +++|
06049  M00S05211.pfu     +++|*ERP      SUBR               ENTRY/EXIT
06050  M00S05212.pfu     +++|          RJM    IDM         ISSUE DAYFILE MESSAGE
Line S05213 Modification History
M01 (Removed by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
06051  M01S05213.ns22000 ---|          LDM    ERRA        CHECK IF ERROR FLAG DETECTED
Line S00195 Modification History
M01 (Added by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
06052  M01S00195.ns22000 +++|          LDD    P1          CHECK IF ERROR FLAG DETECTED
06053  M00S05214.pfu     +++|          LMN    ECEFD
06054  M00S05215.pfu     +++|          ZJN    ERP1        IF ERROR FLAG DETECTED
Line S00001 Modification History
M01 (Added by) pfu6
Seq #  *Modification Id* Act 
----------------------------+
06055  M01S00001.pfu6    +++|          LMN    ECRFD&ECEFD
06056  M01S00002.pfu6    +++|          ZJN    ERP1        IF ROLLOUT FLAG DETECTED
06057  M00S05216.pfu     +++|          LDN    PPET        SET PP ABORT ERROR FLAG
06058  M00S05217.pfu     +++|          STD    CM+1
06059  M00S05218.pfu     +++|          MONITOR  CEFM
06060  M00S05219.pfu     +++| ERP1     RJM    SFC         SET FILE COMPLETE
06061  M00S05220.pfu     +++|          RJM    CFS         COMPLETE FET STATUS
06062  M00S05221.pfu     +++|          RJM    CAU         CLEAR *PFU* ACTIVE FLAG
Line S05222 Modification History
M01 (Removed by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
06063  M01S05222.ns22000 ---|          UJN    ERPX        RETURN
Line S00196 Modification History
M01 (Added by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
06064  M01S00196.ns22000 +++|          MONITOR  DPPM      DROP PP
06065  M01S00197.ns22000 +++|          LJM    PPR         EXIT TO PP RESIDENT
06066  M00S05223.pfu     +++|          TITLE  TABLE OF ERROR MESSAGES.
06067  M00S05224.pfu     +++| TOEM     SPACE  4,10
06068  M00S05225.pfu     +++|**        TOEM - TABLE OF ERROR MESSAGES.
06069  M00S05226.pfu     +++|*
06070  M00S05227.pfu     +++|*         ONE WORD ENTRIES INDEXED BY ERROR CODE.  ENTRY IS THE ADDRESS
06071  M00S05228.pfu     +++|*         OF THE ERROR MESSAGE IN *Z* CODE.  MESSAGES NOT TERMINATED
06072  M00S05229.pfu     +++|*         WITH A PERIOD WILL HAVE THE FILE NAME AND FET ADDRESS
06073  M00S05230.pfu     +++|*         APPENDED TO THEM.
06074  M00S05231.pfu     +++|
06075  M00S05232.pfu     +++|
06076  M00S05233.pfu     +++| TOEM     EQU    *           TABLE OF ERROR MESSAGES
06077  M00S05234.pfu     +++|          QUAL
06078  M00S05235.pfu     +++|          LOC    0
06079  M00S05236.pfu     +++| ECBAE    CON    =Z*BUFFER ARGUMENT ERROR ON *
06080  M00S05237.pfu     +++| ECBCW    CON    =Z*BUFFER CTL WORD ERROR ON *
06081  M00S05238.pfu     +++| ECCNF    CON    =Z*CATALOG TRACK NOT FOUND.*
06082  M00S05239.pfu     +++| ECDFN    CON    =Z*DUPLICATE FILE, *
06083  M00S05240.pfu     +++| ECDNF    CON    =Z*ALTERNATE DEVICE NOT FOUND.*
06084  M00S05241.pfu     +++| ECEFD    CON    =Z*CONTROL POINT ERROR FLAG DETECTED *
06085  M00S05242.pfu     +++| ECFNF    CON    =Z*FILE NOT FOUND, *
06086  M00S05243.pfu     +++| ECIAC    CON    =Z*TRACK INTERLOCK CLEAR ON *
06087  M00S05244.pfu     +++| ECIAS    CON    =Z*TRACK INTERLOCK SET ON *
06088  M00S05245.pfu     +++| ECIOS    CON    =Z*I/O SEQUENCE ERROR ON *
06089  M00S05246.pfu     +++| ECNDS    CON    =Z*NO DEVICE SPECIFIED.*
06090  M00S05247.pfu     +++| ECNSJ    CON    =Z*NOT SPECIAL SYSTEM JOB.*
06091  M00S05248.pfu     +++| ECPAR    CON    =Z*PARAMETER ERROR.*
Line S00007 Modification History
M01 (Added by) pfu3
Seq #  *Modification Id* Act 
----------------------------+
06092  M01S00007.pfu3    +++| ECRFD    CON    =Z*ROLLOUT FLAG DETECTED.*
Line S00027 Modification History
M01 (Added by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
06093  M01S00027.274l797 +++| ECITD    CON    =Z*TDAM REQUEST ERROR.*
06094  M00S05249.pfu     +++|          LOC    *O
06095  M00S05250.pfu     +++|          QUAL   *
06096  M00S05251.pfu     +++|          TITLE  ERROR PROCESSOR SUBROUTINES.
06097  M00S05252.pfu     +++| IDM      SPACE  4,15
06098  M00S05253.pfu     +++|**        IDM - ISSUE DAYFILE MESSAGES.
06099  M00S05254.pfu     +++|*
Line S05255 Modification History
M01 (Removed by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
06100  M01S05255.ns22000 ---|*         ENTRY  (ERRA) = ERROR CODE.
Line S00198 Modification History
M01 (Added by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
06101  M01S00198.ns22000 +++|*         ENTRY  (P1) = ERROR CODE.
06102  M00S05256.pfu     +++|*                (FN - FN+3) = FILE NAME.
06103  M00S05257.pfu     +++|*                (IR+3 - IR+4) = FET ADDRESS.
Line S05258 Modification History
M01 (Removed by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
06104  M01S05258.ns22000 ---|*                (CM - CM+4) = CONTENTS OF CONTROL POINT AREA WORD
06105  M01S05259.ns22000 ---|*                                *STSW*, IF ERROR CODE = *ECEFD*.
06106  M00S05260.pfu     +++|*
06107  M00S05261.pfu     +++|*         EXIT   ERROR MESSAGE ISSUED TO DAYFILE.
06108  M00S05262.pfu     +++|*
Line S05263 Modification History
M01 (Removed by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
06109  M01S05263.ns22000 ---|*         USES   FN+3, T1, T2.
Line S00199 Modification History
M01 (Added by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
06110  M01S00199.ns22000 +++|*         USES   FN+3, T1, CM - CM+4.
06111  M00S05264.pfu     +++|*
06112  M00S05265.pfu     +++|*         CALLS  ACS, ANS, DFM.
06113  M00S05266.pfu     +++|
06114  M00S05267.pfu     +++|
06115  M00S05268.pfu     +++| IDM      SUBR               ENTRY/EXIT
06116  M00S05269.pfu     +++|          LDC    STRB        SET STRING BUFFER ADDRESS
06117  M00S05270.pfu     +++|          STD    T1
06118  M00S05271.pfu     +++|          LDN    0           SET END OF LINE BYTE
06119  M00S05272.pfu     +++|          STI    T1
06120  M00S05273.pfu     +++|          LDC    =Z* PFU - * SET MESSAGE PREFIX
06121  M00S05274.pfu     +++|          RJM    ACS
Line S05275 Modification History
M01 (Removed by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
06122  M01S05275.ns22000 ---|          LDM    ERRA        APPEND ERROR MESSAGE
06123  M01S05276.ns22000 ---|          STD    T2
06124  M01S05277.ns22000 ---|          LDM    TOEM,T2
Line S00200 Modification History
M01 (Added by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
06125  M01S00200.ns22000 +++|          LDM    TOEM,P1     APPEND ERROR MESSAGE
06126  M00S05278.pfu     +++|          RJM    ACS
06127  M00S05279.pfu     +++|          LDI    T1          CHECK LAST BYTE
06128  M00S05280.pfu     +++|          SHN    14
06129  M00S05281.pfu     +++|          NJN    IDM1        IF NOT END OF LINE BYTE
06130  M00S05282.pfu     +++|          LDM    -1,T1
06131  M00S05283.pfu     +++| IDM1     LPN    77          CHECK TERMINATOR
06132  M00S05284.pfu     +++|          LMN    1R.
06133  M00S05285.pfu     +++|          ZJN    IDM4        IF TERMINATED WITH PERIOD
Line S05286 Modification History
M01 (Removed by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
06134  M01S05286.ns22000 ---|          LDM    ERRA
06135  M01S05287.ns22000 ---|          LMC    ECEFD
Line S00201 Modification History
M01 (Added by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
06136  M01S00201.ns22000 +++|          LDD    P1
06137  M01S00202.ns22000 +++|          LMK    ECEFD
06138  M00S05288.pfu     +++|          NJN    IDM2        IF NOT CPA ERROR FLAG DETECTION MESSAGE
Line S00203 Modification History
M01 (Added by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
06139  M01S00203.ns22000 +++|          LDD    CP          GET ERROR FLAG
06140  M01S00204.ns22000 +++|          ADK    STSW
06141  M01S00205.ns22000 +++|          CRD    CM
06142  M00S05289.pfu     +++|          LDD    CM+1        GET CPA ERROR FLAGS FROM *STSW*
06143  M00S05290.pfu     +++|          UJN    IDM3        APPEND TO MESSAGE
06144  M00S05291.pfu     +++|
06145  M00S05292.pfu     +++| IDM2     LDD    FN+3        CLEAR EIGHTH CHARACTER OF FILE NAME
06146  M00S05293.pfu     +++|          SCN    77
06147  M00S05294.pfu     +++|          STD    FN+3
06148  M00S05295.pfu     +++|          LDN    FN          APPEND FILE NAME
06149  M00S05296.pfu     +++|          RJM    ACS
06150  M00S05297.pfu     +++|          LDC    =Z* AT *    APPEND * AT *
06151  M00S05298.pfu     +++|          RJM    ACS
06152  M00S05299.pfu     +++|          LDD    IR+3        APPEND FET ADDRESS
06153  M00S05300.pfu     +++|          SHN    14
06154  M00S05301.pfu     +++|          LMD    IR+4
06155  M00S05302.pfu     +++| IDM3     RJM    ANS
06156  M00S05303.pfu     +++|          LDC    =Z*.*       APPEND *.*
06157  M00S05304.pfu     +++|          RJM    ACS
06158  M00S05305.pfu     +++| IDM4     LDC    STRB        ISSUE ERROR MESSAGE
06159  M00S05306.pfu     +++|          RJM    DFM
06160  M00S05307.pfu     +++|          LJM    IDMX        RETURN
06161  M00S05308.pfu     +++|          SPACE  4,10
06162  M00S05309.pfu     +++|*         COMMON DECKS.
06163  M00S05310.pfu     +++|
06164  M00S05311.pfu     +++|
06165  M00S05312.pfu     +++|*CALL     COMPACS
06166  M00S05313.pfu     +++|*CALL     COMPANS
06167  M00S05314.pfu     +++|          SPACE  4,10
06168  M00S05315.pfu     +++|*         BUFFERS.
06169  M00S05316.pfu     +++|
06170  M00S05317.pfu     +++|
06171  M00S05318.pfu     +++|          USE    BUFFERS
06172  M00S05319.pfu     +++| STRB     EQU    *           STRING BUFFER
06173  M00S05320.pfu     +++| STRBL    EQU    STRB+80D/2+1  LWA+1 OF STRING BUFFER
06174  M00S05321.pfu     +++|          ERRNG  7777-STRBL  STRING BUFFER OVERFLOW
06175  M00S05322.pfu     +++|          SPACE  4,10
06176  M00S05323.pfu     +++|          OVERFLOW  OVLA     CHECK FOR OVERLAY OVERFLOW
06177  M00S05324.pfu     +++|          SPACE  4,10
Line S00206 Modification History
M01 (Added by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
06178  M01S00206.ns22000 +++|          TTL    PFU - PF UTILITY PROCESSOR.
06179  M00S05325.pfu     +++|          END
cdc/nos2.source/opl.opl871/deck/pfu.004.txt ยท Last modified: by 127.0.0.1