User Tools

Site Tools


cdc:nos2.source:opl.opl871:deck:pfam.002

Deck PFAM Part 002

12 Modifications

Listing Sections

Source

Seq #  *Modification Id* Act 
----------------------------+
02575  M02S01830.pfam7   ---|          NZ     X1,VCE1     IF NOT A MATCH
02576  M02S01831.pfam7   ---|          SA1    X6+5        VERIFY CREATION DATE AND TIME
Line S00127 Modification History
M01 (Added by) ns2673
M02 (Removed by) pfam7
Seq #  *Modification Id* Act 
----------------------------+
02577  M02S00127.pfam7   ---|          BX6    -X2*X1
02578  M02S00128.pfam7   ---|          NZ     X6,VCE1     IF ACCESS LEVEL DOES NOT MATCH
Line S00129 Modification History
M01 (Added by) ns2673
M02 (Removed by) 286l859
Seq #  *Modification Id* Act 
----------------------------+
02579  M02S00129.286l859 ---|          SA1    X5+5        VERIFY CREATION DATE AND TIME
Line S00530 Modification History
M01 (Added by) 286l859
Seq #  *Modification Id* Act 
----------------------------+
02580  M01S00530.286l859 +++|          SA1    STRA        GET STAGE REQUEST ADDRESS
02581  M01S00531.286l859 +++|          SA1    X1+5        VERIFY CREATION DATE AND TIME
02582  M00S01832.pfam    +++|          SA2    CATH+FCCD
02583  M00S01833.pfam    +++|          BX1    X1-X2
02584  M00S01834.pfam    +++|          MX2    -36
Line S01835 Modification History
M01 (Removed by) ns2673
Seq #  *Modification Id* Act 
----------------------------+
02585  M01S01835.ns2673  ---|          BX1    -X2*X1
02586  M01S01836.ns2673  ---|          NZ     X1,VCE1     IF NOT A MATCH
02587  M01S01837.ns2673  ---|          BX6    X6-X6       INDICATE NO ERROR
02588  M01S01838.ns2673  ---|          EQ     VCEX        RETURN
02589  M01S01839.ns2673  ---|
02590  M01S01840.ns2673  ---| VCE1     SX6    B1+         FORCE ERROR LOG MESSAGE
02591  M01S01841.ns2673  ---|          SA6    ELFG
02592  M01S01842.ns2673  ---|          EDITS  MSFN,ERFV   * PFRES - FILE VERIFICATION ERROR.*
Line S00130 Modification History
M01 (Added by) ns2673
Seq #  *Modification Id* Act 
----------------------------+
02593  M01S00130.ns2673  +++|          BX6    -X2*X1
02594  M01S00131.ns2673  +++|          ZR     X6,VCEX     IF CREATION DATE AND TIME MATCHES
Line S00132 Modification History
M01 (Added by) ns2673
M02 (Removed by) 286l859
Seq #  *Modification Id* Act 
----------------------------+
02595  M02S00132.286l859 ---| VCE1     SA6    ELFG        FORCE ERROR LOG MESSAGE
02596  M02S00133.286l859 ---|          EDITS  MSFF,ERFV   * PFRES - FILE VERIFICATION ERROR.*
Line S01843 Modification History
M01 (Removed by) 286l859
Seq #  *Modification Id* Act 
----------------------------+
02597  M01S01843.286l859 ---|          RJ     SEM         SEND ERROR MESSAGE
Line S00532 Modification History
M01 (Added by) 286l859
Seq #  *Modification Id* Act 
----------------------------+
02598  M01S00532.286l859 +++|          SA5    STRA        SET STAGE REQUEST ADDRESS
02599  M01S00533.286l859 +++|          SB2    ERFV        * FILE VERIFICATION ERROR ...*
02600  M01S00534.286l859 +++|          RJ     SRE         SEND STAGE REQUEST ERROR MESSAGE
02601  M00S01844.pfam    +++|          SX6    B1          INDICATE ERROR
02602  M00S01845.pfam    +++|          EQ     VCEX        RETURN
02603  M00S01846.pfam    +++|          SPACE  4,10
02604  M00S01847.pfam    +++|*         COMMON DECKS.
02605  M00S01848.pfam    +++|
02606  M00S01849.pfam    +++|
02607  M00S01850.pfam    +++| FCE$     EQU    0
02608  M00S01851.pfam    +++|*CALL     COMCCCE
02609  M00S01852.pfam    +++|*CALL     COMCCDD
02610  M00S01853.pfam    +++|*CALL     COMCCIO
02611  M00S01854.pfam    +++|*CALL     COMCCOD
02612  M00S01855.pfam    +++|*CALL     COMCCPM
02613  M00S01856.pfam    +++|*CALL     COMCDXB
02614  M00S01857.pfam    +++|*CALL     COMCEDT
02615  M00S01858.pfam    +++|*CALL     COMCFCE
Line S00535 Modification History
M01 (Added by) 286l859
Seq #  *Modification Id* Act 
----------------------------+
02616  M01S00535.286l859 +++| GMS$     EQU    1           USE SORT KEY MASK
02617  M01S00536.286l859 +++| MWK$     EQU    1           ALLOW MULTIPLE WORD SORT KEYS
02618  M01S00537.286l859 +++|*CALL     COMCGMS
02619  M01S00538.286l859 +++|*CALL     COMCJCR
02620  M00S01859.pfam    +++|*CALL     COMCLFM
Line S00539 Modification History
M01 (Added by) 286l859
Seq #  *Modification Id* Act 
----------------------------+
02621  M01S00539.286l859 +++|*CALL     COMCMSF
02622  M00S01860.pfam    +++|*CALL     COMCMVE
02623  M00S01861.pfam    +++|*CALL     COMCPFM
02624  M00S01862.pfam    +++| COM$     EQU    1           ASSEMBLE COMMON ROUTINES
02625  M00S01863.pfam    +++| PFA$     EQU    1           ASSEMBLE ARCHIVE FILE ROUTINES
02626  M00S01864.pfam    +++|          LIST   X
02627  M00S01865.pfam    +++|*CALL     COMCPFS
02628  M00S01866.pfam    +++|          LIST   *
02629  M00S01867.pfam    +++|*CALL     COMCPFU
02630  M00S01868.pfam    +++|*CALL     COMCRDW
02631  M00S01869.pfam    +++|*CALL     COMCSCB
02632  M00S01870.pfam    +++|*CALL     COMCSFN
Line S00015 Modification History
M01 (Added by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
02633  M01S00015.274l797 +++|*CALL     COMCSKW
02634  M00S01871.pfam    +++|*CALL     COMCSNM
02635  M00S01872.pfam    +++|*CALL     COMCSYS
02636  M00S01873.pfam    +++|          LIST   X
02637  M00S01874.pfam    +++|          QUAL   MTX
02638  M00S01875.pfam    +++| QUAL$    EQU    1
02639  M00S01876.pfam    +++|*CALL     COMCSRI
02640  M00S01877.pfam    +++|          QUAL   *
02641  M00S01878.pfam    +++|          LIST   *
02642  M00S01879.pfam    +++|*CALL     COMCVDT
02643  M00S01880.pfam    +++|*CALL     COMCWTC
02644  M00S01881.pfam    +++|*CALL     COMCWTH
02645  M00S01882.pfam    +++|*CALL     COMCWTO
02646  M00S01883.pfam    +++|*CALL     COMCWTW
02647  M00S01884.pfam    +++|*CALL     COMCZTB
02648  M00S01885.pfam    +++|          TITLE  BUFFERS.
02649  M00S01886.pfam    +++|          USE    LITERALS
02650  M00S01887.pfam    +++|          SPACE  4,10
02651  M00S01888.pfam    +++|*         BUFFERS.
02652  M00S01889.pfam    +++|
02653  M00S01890.pfam    +++|
Line S01891 Modification History
M01 (Removed by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
02654  M01S01891.274l797 ---| TBUF     EQU    *           ARCHIVE FILE BUFFER
02655  M01S01892.274l797 ---| MBUF     EQU    TBUF+TBUFL  MAIN BUFFER
Line S00016 Modification History
M01 (Added by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
02656  M01S00016.274l797 +++| MBUF     EQU    *           MAIN BUFFER
02657  M00S01893.pfam    +++| CATH     EQU    MBUF+MBUFL  CATALOG ENTRY HOLD BUFFER
02658  M00S01894.pfam    +++| DBUF     EQU    CATH+CATHL  ARCHIVE DATA BLOCK WORKING BUFFER
Line S01895 Modification History
M01 (Removed by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
02659  M01S01895.274l797 ---| OBUF     EQU    DBUF+DBUFL  OUTPUT BUFFER
Line S00017 Modification History
M01 (Added by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
02660  M01S00017.274l797 +++| TBUF     EQU    DBUF+DBUFL  ARCHIVE FILE BUFFER
Line S00018 Modification History
M01 (Added by) 274l797
M02 (Removed by) 286l859
Seq #  *Modification Id* Act 
----------------------------+
02661  M02S00018.286l859 ---| OBUF     EQU    TBUF+TBUFL  OUTPUT BUFFER
Line S01896 Modification History
M01 (Removed by) 286l859
Seq #  *Modification Id* Act 
----------------------------+
02662  M01S01896.286l859 ---| SUMB     EQU    OBUF+OBUFL  SUMMARY FILE BUFFER
02663  M01S01897.286l859 ---| EBUF     EQU    SUMB+SUMBL  END OF BUFFERS
Line S00540 Modification History
M01 (Added by) 286l859
Seq #  *Modification Id* Act 
----------------------------+
02664  M01S00540.286l859 +++| OUTB     EQU    TBUF+TBUFL  OUTPUT FILE BUFFER
02665  M01S00541.286l859 +++| SUMB     EQU    OUTB+OUTBL  SUMMARY FILE BUFFER
02666  M01S00542.286l859 +++| PFLB     EQU    SUMB+SUMBL  PROCESSED FILES FILE BUFFER
02667  M01S00543.286l859 +++| MS1B     EQU    PFLB+PFLBL  SORT FILE 1
02668  M01S00544.286l859 +++| MS2B     EQU    MS1B+MSFBL  SORT FILE 2
02669  M01S00545.286l859 +++| MS3B     EQU    MS2B+MSFBL  SORT FILE 3
02670  M01S00546.286l859 +++| MS4B     EQU    MS3B+MSFBL  SORT FILE 4
02671  M01S00547.286l859 +++| SRTB     EQU    MS3B        SORT BUFFER (OVERLAYS *MS3B* AND *MS4B*)
02672  M01S00548.286l859 +++|          ERRNG  MSFBL*2-SRTBL  SORT BUFFER OVERFLOW
02673  M01S00549.286l859 +++| EBUF     EQU    MS4B+MSFBL+5  END OF BUFFERS
02674  M00S01898.pfam    +++|
Line S01899 Modification History
M01 (Removed by) 286l859
Seq #  *Modification Id* Act 
----------------------------+
02675  M01S01899.286l859 ---|*         *PFRES* BUFFERS OVERLAY *OBUF* AND *SUMB*.
Line S00550 Modification History
M01 (Added by) 286l859
Seq #  *Modification Id* Act 
----------------------------+
02676  M01S00550.286l859 +++|*         *PFRES* BUFFERS OVERLAY BUFFERS FROM *SUMB* TO *SRTB*.
02677  M00S01900.pfam    +++|
Line S01901 Modification History
M01 (Removed by) 286l859
Seq #  *Modification Id* Act 
----------------------------+
02678  M01S01901.286l859 ---| RBUF     EQU    OBUF        STAGE REQUEST FILE BUFFER (*PFRES* PRESET)
Line S00551 Modification History
M01 (Added by) 286l859
Seq #  *Modification Id* Act 
----------------------------+
02679  M01S00551.286l859 +++| RBUF     EQU    SUMB        STAGE REQUEST FILE BUFFER (*PFRES* PRESET)
02680  M00S01902.pfam    +++| SBUF     EQU    RBUF+RBUFL  SCRATCH FILE BUFFER (*PFRES* PRESET)
02681  M00S01903.pfam    +++| QBUF     EQU    SBUF+SBUFL  STAGE REQUEST QUEUE (*PFRES* PRESET)
02682  M00S01904.pfam    +++| EBUFP    EQU    QBUF+QBUFL  END OF BUFFERS (*PFRES* PRESET)
02683  M00S01905.pfam    +++|          TITLE  PRESET.
Line S01906 Modification History
M01 (Removed by) ns2625
Seq #  *Modification Id* Act 
----------------------------+
02684  M01S01906.ns2625  ---| PRS      SPACE  4,15
Line S00001 Modification History
M01 (Added by) ns2625
Seq #  *Modification Id* Act 
----------------------------+
02685  M01S00001.ns2625  +++| PRS      SPACE  4,20
02686  M00S01907.pfam    +++|**        PRS - PRESET PROGRAM.
Line S00002 Modification History
M01 (Added by) ns2625
Seq #  *Modification Id* Act 
----------------------------+
02687  M01S00002.ns2625  +++|*
02688  M01S00003.ns2625  +++|*         ENTRY  FILES *ZZZZZG0* THROUGH *ZZZZZG8* RETURNED BY *PFS*.
02689  M01S00004.ns2625  +++|*                FILE *ZZZZZG9* RETURNED BY *PFS* IF NO FILE
02690  M01S00005.ns2625  +++|*                  SELECTIONS.
02691  M01S00006.ns2625  +++|*                FILE *ZZZZZG9* CONTAINS FILE SELECTIONS IF PRESENT.
02692  M00S01908.pfam    +++|*
02693  M00S01909.pfam    +++|*         EXIT   FILE NAMES SET IN FETS.
02694  M00S01910.pfam    +++|*                SECURITY PROCESSING BIT SET IN FET, IF NEEDED.
02695  M00S01911.pfam    +++|*                (SYSS) = SYSTEM SECURITY MODE.
02696  M00S01912.pfam    +++|*
02697  M00S01913.pfam    +++|*         USES   X - 0, 1, 2, 5, 6.
02698  M00S01914.pfam    +++|*                A - 0, 1, 2, 5, 6.
02699  M00S01915.pfam    +++|*
Line S01916 Modification History
M01 (Removed by) 286l859
Seq #  *Modification Id* Act 
----------------------------+
02700  M01S01916.286l859 ---|*         CALLS  FSR, IOF, ITA, PFO, RPS, RST, SSS, SUN.
Line S00552 Modification History
M01 (Added by) 286l859
Seq #  *Modification Id* Act 
----------------------------+
02701  M01S00552.286l859 +++|*         CALLS  FSR, IOF, ITA, PFO, RPS, RST, SSS.
02702  M00S01917.pfam    +++|*
02703  M00S01918.pfam    +++|*         MACROS MACHID, MEMORY, REPRIEVE, SETFET.
02704  M00S01919.pfam    +++|
02705  M00S01920.pfam    +++|
02706  M00S01921.pfam    +++| PRS      SUBR               ENTRY/EXIT
02707  M00S01922.pfam    +++|          SB1    1
02708  M00S01923.pfam    +++|          MEMORY CM,,R,EBUF  REQUEST REQUIRED MEMORY
Line S01924 Modification History
M01 (Removed by) 286l859
Seq #  *Modification Id* Act 
----------------------------+
02709  M01S01924.286l859 ---|          REPRIEVE  ABTBLK,SETUP,237B
Line S00553 Modification History
M01 (Added by) 286l859
Seq #  *Modification Id* Act 
----------------------------+
02710  M01S00553.286l859 +++|          REPRIEVE  RPVB,SET,277B
02711  M00S01925.pfam    +++|          RJ     SSS         SET SECURED SYSTEM STATUS
02712  M00S01926.pfam    +++|          SA1    SYSS
02713  M00S01927.pfam    +++|          ZR     X1,PRS1     IF NOT SECURED SYSTEM
02714  M00S01928.pfam    +++|          SA1    F+1         SET SECURITY PROCESSING BIT IN FET
02715  M00S01929.pfam    +++|          SX6    B1
02716  M00S01930.pfam    +++|          LX6    39-0
02717  M00S01931.pfam    +++|          BX6    X1+X6
02718  M00S01932.pfam    +++|          SA6    A1
02719  M00S01933.pfam    +++|
02720  M00S01934.pfam    +++|*         SET UTILITY NAME IN MESSAGES.
02721  M00S01935.pfam    +++|
Line S01936 Modification History
M01 (Removed by) 286l859
Seq #  *Modification Id* Act 
----------------------------+
02722  M01S01936.286l859 ---| PRS1     SA0    TPMP        SET *COMCPFP* MESSAGES
02723  M01S01937.286l859 ---|          RJ     SUN
02724  M01S01938.286l859 ---|          SA0    TUNM        SET *PFAM* MESSAGES
02725  M01S01939.286l859 ---|          RJ     SUN
02726  M01S01940.286l859 ---|          SA1    /COMSPFS/UTLC  CHECK UTILITY CODE
Line S00554 Modification History
M01 (Added by) 286l859
Seq #  *Modification Id* Act 
----------------------------+
02727  M01S00554.286l859 +++| PRS1     SA1    /COMSPFS/UTLC  CHECK UTILITY CODE
02728  M00S01941.pfam    +++|          SX1    X1-/COMSPFS/RSUT
02729  M00S01942.pfam    +++|          NZ     X1,PRS2     IF NOT *PFRES*
02730  M00S01943.pfam    +++|
02731  M00S01944.pfam    +++|*         PROCESS *PFRES*.
02732  M00S01945.pfam    +++|
02733  M00S01946.pfam    +++|          MEMORY CM,MSTAT,R,EBUFP  REQUEST ADDITIONAL MEMORY
02734  M00S01947.pfam    +++|          MACHID PRSA        GET MACHINE ID
02735  M00S01948.pfam    +++|          SA1    PRSA
02736  M00S01949.pfam    +++|          SA2    R           SET MACHINE ID INTO *STRQID* FET
02737  M00S01950.pfam    +++|          LX1    24
02738  M00S01951.pfam    +++|          BX6    X1+X2
02739  M00S01952.pfam    +++|          SA6    A2
02740  M00S01953.pfam    +++|          RJ     RST         REQUEST STAGING TAPE
02741  M00S01954.pfam    +++|          RJ     FSR         FIND STAGE REQUESTS
02742  M00S01955.pfam    +++|          RJ     ITA         ISSUE TAPE ASSIGNED MESSAGE
02743  M00S01956.pfam    +++|          EQ     PRSX        RETURN
02744  M00S01957.pfam    +++|
02745  M00S01958.pfam    +++|*         INITIALIZE OUTPUT FILE AND SUMMARY FILE.
02746  M00S01959.pfam    +++|
02747  M00S01960.pfam    +++| PRS2     RJ     IOF         INITIALIZE OUTPUT FILES
02748  M00S01961.pfam    +++|
02749  M00S01962.pfam    +++|*         INITIALIZE ARCHIVE FILE.
02750  M00S01963.pfam    +++|
02751  M00S01964.pfam    +++|          SA1    CPAR+/COMSPFS/CPTB  SET ARCHIVE FILE NAME
02752  M00S01965.pfam    +++|          SA2    TAPE
Line S01966 Modification History
M01 (Removed by) 286l859
Seq #  *Modification Id* Act 
----------------------------+
02753  M01S01966.286l859 ---|          BX6    -X0*X2
Line S00555 Modification History
M01 (Added by) 286l859
Seq #  *Modification Id* Act 
----------------------------+
02754  M01S00555.286l859 +++|          MX6    -18
02755  M01S00556.286l859 +++|          BX6    -X6*X2
02756  M00S01967.pfam    +++|          BX6    X6+X1
02757  M00S01968.pfam    +++|          SA6    A2
Line S00019 Modification History
M01 (Added by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
02758  M01S00019.274l797 +++|          SX2    TAPE        SET OPTICAL DISK EXTENSION BUFFER
02759  M01S00020.274l797 +++|          SA3    PRSB
02760  M01S00021.274l797 +++|          RJ     SOE         SET FET EXTENSION IF OPTICAL DISK FILE
02761  M01S00022.274l797 +++|          OPEN   TAPE,READNR,R
02762  M00S01969.pfam    +++|
02763  M00S01970.pfam    +++|*         INITIALIZE *PFCOPY* MASTER FILE.
02764  M00S01971.pfam    +++|
02765  M00S01972.pfam    +++|          SA1    CPAR+/COMSPFS/CPMF  CHECK IF MASTER FILE SPECIFIED
02766  M00S01973.pfam    +++|          ZR     X1,PRS3     IF MASTER FILE NOT SPECIFIED
02767  M00S01974.pfam    +++|          SA5    FILEA
02768  M00S01975.pfam    +++|          RJ     PFO         OPEN MASTER FILE
02769  M00S01976.pfam    +++|          SETFET SU,ERP=0    CLEAR USER ERROR PROCESSING
02770  M00S01977.pfam    +++|
02771  M00S01978.pfam    +++|*         READ FILE NAME AND USER INDEX SELECTIONS.
02772  M00S01979.pfam    +++|
02773  M00S01980.pfam    +++| PRS3     SX0    EBUF        SET SELECTION BUFFER ADDRESS
02774  M00S01981.pfam    +++|          RJ     RPS         READ PERMANENT FILE SELECTIONS
02775  M00S01982.pfam    +++|          EQ     PRSX        RETURN
02776  M00S01983.pfam    +++|
02777  M00S01984.pfam    +++|
02778  M00S01985.pfam    +++| PRSA     CON    0           MACHINE ID WORD
Line S00023 Modification History
M01 (Added by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
02779  M01S00023.274l797 +++| PRSB     VFD    36/,6/ODEBL,18/ODEB  POINTER TO *OD* EXT. BUFFER
02780  M00S01986.pfam    +++|          TITLE  PRESET SUBROUTINES.
02781  M00S01987.pfam    +++| FSR      SPACE  4,20
02782  M00S01988.pfam    +++|**        FSR - FIND STAGE REQUESTS.
02783  M00S01989.pfam    +++|*         READ STAGE REQUESTS FROM REQUEST FILE AND REPACK FILE.
02784  M00S01990.pfam    +++|*         READ ADDITIONAL STAGE REQUESTS FROM *MAGNET*-S FL.
02785  M00S01991.pfam    +++|*
02786  M00S01992.pfam    +++|*         ENTRY  STAGE REQUEST FILE ATTACHED (BY *RESEX*).
02787  M00S01993.pfam    +++|*
02788  M00S01994.pfam    +++|*         EXIT   STAGE REQUESTS QUEUED IN *QBUF*.
02789  M00S01995.pfam    +++|*                SELECTED REQUESTS DELETED FROM STAGE REQUEST FILE.
02790  M00S01996.pfam    +++|*                STAGE REQUEST FILE RETURNED.
02791  M00S01997.pfam    +++|*                TO *ABT* IF NO STAGE REQUESTS FOR ASSIGNED VSN.
02792  M00S01998.pfam    +++|*
Line S01999 Modification History
M01 (Removed by) 286l859
Seq #  *Modification Id* Act 
----------------------------+
02793  M01S01999.286l859 ---|*         USES   X - 0, 1, 2, 5, 6.
Line S00557 Modification History
M01 (Added by) 286l859
Seq #  *Modification Id* Act 
----------------------------+
02794  M01S00557.286l859 +++|*         USES   X - 0, 1, 2, 6.
02795  M00S02000.pfam    +++|*                A - 1, 2, 5, 6.
Line S02001 Modification History
M01 (Removed by) 286l859
Seq #  *Modification Id* Act 
----------------------------+
02796  M01S02001.286l859 ---|*                B - 6.
Line S00558 Modification History
M01 (Added by) 286l859
Seq #  *Modification Id* Act 
----------------------------+
02797  M01S00558.286l859 +++|*                B - 2, 6.
02798  M00S02002.pfam    +++|*
02799  M00S02003.pfam    +++|*         CALLS  ARQ, GSR.
02800  M00S02004.pfam    +++|*
02801  M00S02005.pfam    +++|*         MACROS MEMORY, MESSAGE, MOVE, READEI, READW, REWIND, RTIME,
02802  M00S02006.pfam    +++|*                UNLOAD, WRITE, WRITER, WRITEW.
02803  M00S02007.pfam    +++|
02804  M00S02008.pfam    +++|
02805  M00S02009.pfam    +++| FSR      SUBR               ENTRY/EXIT
02806  M00S02010.pfam    +++|          REWIND R
02807  M00S02011.pfam    +++|          READEI X2          INITIATE READ
Line S02012 Modification History
M01 (Removed by) ns2625
Seq #  *Modification Id* Act 
----------------------------+
02808  M01S02012.ns2625  ---|          UNLOAD S,R
02809  M01S02013.ns2625  ---|          WRITE  X2,*
Line S00007 Modification History
M01 (Added by) ns2625
Seq #  *Modification Id* Act 
----------------------------+
02810  M01S00007.ns2625  +++|          WRITE  S,*
02811  M00S02014.pfam    +++|          SA5    PVSN        GET VSN ASSIGNED TO THIS JOB
02812  M00S02015.pfam    +++|
02813  M00S02016.pfam    +++|*         READ NEXT ENTRY FROM REQUEST FILE.
02814  M00S02017.pfam    +++|
02815  M00S02018.pfam    +++| FSR1     READW  R,FSRA,/MTX/PFTBL
02816  M00S02019.pfam    +++|          NZ     X1,FSR3     IF END OF REQUEST FILE
Line S00024 Modification History
M01 (Added by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
02817  M01S00024.274l797 +++|          SA1    FSRA        CHECK FUNCTION CODE
02818  M01S00025.274l797 +++|          AX1    54
02819  M01S00026.274l797 +++|          SX1    X1-1
02820  M01S00027.274l797 +++|          NZ     X1,FSR1.1   IF NOT TAPE STAGE REQUEST
02821  M00S02020.pfam    +++|          SA1    FSRA+1      COMPARE VSN REQUIRED
02822  M00S02021.pfam    +++|          BX2    X1-X5
02823  M00S02022.pfam    +++|          MX0    -24
02824  M00S02023.pfam    +++|          BX2    -X0*X2
02825  M00S02024.pfam    +++|          ZR     X2,FSR2     IF VSN MATCHES VSN ASSIGNED TO THIS JOB
Line S02025 Modification History
M01 (Removed by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
02826  M01S02025.274l797 ---|          WRITEW S,FSRA,/MTX/PFTBL  WRITE UNSELECTED REQUEST TO SCRATCH
Line S00028 Modification History
M01 (Added by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
02827  M01S00028.274l797 +++| FSR1.1   WRITEW S,FSRA,/MTX/PFTBL  WRITE UNSELECTED REQ TO SCRATCH
02828  M00S02026.pfam    +++|          EQ     FSR1        READ NEXT REQUEST
02829  M00S02027.pfam    +++|
02830  M00S02028.pfam    +++| FSR2     SB6    FSRA
02831  M00S02029.pfam    +++|          RJ     ARQ         ADD REQUEST TO QUEUE
02832  M00S02030.pfam    +++|          EQ     FSR1        READ NEXT REQUEST
02833  M00S02031.pfam    +++|
02834  M00S02032.pfam    +++|*         COPY SCRATCH FILE (UNSELECTED REQUESTS) BACK TO REQUEST FILE.
02835  M00S02033.pfam    +++|
02836  M00S02034.pfam    +++| FSR3     WRITER S           FLUSH BUFFER
02837  M00S02035.pfam    +++|          REWIND X2
02838  M00S02036.pfam    +++|          READEI X2
02839  M00S02037.pfam    +++|          REWIND R,R
02840  M00S02038.pfam    +++|          WRITE  X2,*
02841  M00S02039.pfam    +++| FSR4     READW  S,FSRA,/MTX/PFTBL
02842  M00S02040.pfam    +++|          NZ     X1,FSR5     IF END OF FILE
02843  M00S02041.pfam    +++|          WRITEW R,FSRA,/MTX/PFTBL
02844  M00S02042.pfam    +++|          EQ     FSR4        COPY NEXT REQUEST
02845  M00S02043.pfam    +++|
02846  M00S02044.pfam    +++| FSR5     WRITER R           FLUSH BUFFER
02847  M00S02045.pfam    +++|          UNLOAD X2,R        RETURN BOTH FILES
02848  M00S02046.pfam    +++|          UNLOAD S,R
02849  M00S02047.pfam    +++|          BX6    X6-X6       INDICATE STAGE REQUEST FILE RETURNED
02850  M00S02048.pfam    +++|          SA6    SRFF
02851  M00S02049.pfam    +++|
02852  M00S02050.pfam    +++|*         MOVE REQUEST QUEUE DOWN (ON TOP OF *RBUF*/*SBUF*).
02853  M00S02051.pfam    +++|
02854  M00S02052.pfam    +++|          SA5    SRQL        GET NUMBER OF WORDS IN CURRENT QUEUE
02855  M00S02053.pfam    +++|          ZR     X5,FSR6     IF NO REQUESTS
02856  M00S02054.pfam    +++|          MOVE   X5,QBUF,RBUF
02857  M00S02055.pfam    +++| FSR6     SX6    RBUF        UPDATE QUEUE POINTER
02858  M00S02056.pfam    +++|          SA6    SRQF
02859  M00S02057.pfam    +++|
02860  M00S02058.pfam    +++|*         PROCESS REQUESTS PENDING IN *MAGNET*.
02861  M00S02059.pfam    +++|
02862  M00S02060.pfam    +++| FSR7     RJ     /MTX/GSR    GET STAGE REQUEST
02863  M00S02061.pfam    +++|          LE     B6,B0,FSR8  IF NO REQUEST
02864  M00S02062.pfam    +++|          RJ     ARQ         ADD REQUEST TO QUEUE
02865  M00S02063.pfam    +++|          EQ     FSR7        GET NEXT REQUEST
02866  M00S02064.pfam    +++|
02867  M00S02065.pfam    +++| FSR8     RTIME  CARA        INITIALIZE STARTING TIME
02868  M00S02066.pfam    +++|          SA1    SRQL        CHECK IF ANY REQUESTS FOUND
02869  M00S02067.pfam    +++|          ZR     X1,FSR9     IF NO REQUESTS FOUND
02870  M00S02068.pfam    +++|          MEMORY CM,MSTAT,R,RBUF+X1+MEMI  REDUCE FIELD LENGTH
02871  M00S02069.pfam    +++|          EQ     FSRX        RETURN
02872  M00S02070.pfam    +++|
Line S02071 Modification History
M01 (Removed by) 286l859
Seq #  *Modification Id* Act 
----------------------------+
02873  M01S02071.286l859 ---| FSR9     MESSAGE  ERNR      * PFRES - NO FILES TO RESTORE.*
Line S00559 Modification History
M01 (Added by) 286l859
Seq #  *Modification Id* Act 
----------------------------+
02874  M01S00559.286l859 +++| FSR9     SB2    ERNR        * NO FILES TO RESTORE.*
02875  M00S02072.pfam    +++|          EQ     ABT         ABORT
02876  M00S02073.pfam    +++|
02877  M00S02074.pfam    +++|
02878  M00S02075.pfam    +++| FSRA     BSS    /MTX/PFTBL  STAGE REQUEST BUFFER
02879  M00S02076.pfam    +++| ITA      SPACE  4,15
02880  M00S02077.pfam    +++|**        ITA - ISSUE TAPE ASSIGNED MESSAGE.
02881  M00S02078.pfam    +++|*
02882  M00S02079.pfam    +++|*         ENTRY  (SRQF) = POINTER TO FWA OF STAGE REQUEST QUEUE.
02883  M00S02080.pfam    +++|*                (SRQN) = NUMBER OF RESTORE REQUESTS.
02884  M00S02081.pfam    +++|*                (SVSN) = STAGING TAPE VSN.
02885  M00S02082.pfam    +++|*
02886  M00S02083.pfam    +++|*         USES   X - 0, 1, 2, 6.
02887  M00S02084.pfam    +++|*                A - 1, 2.
02888  M00S02085.pfam    +++|*                B - 2, 3, 5.
02889  M00S02086.pfam    +++|*
02890  M00S02087.pfam    +++|*         CALLS  CDD, SNM.
02891  M00S02088.pfam    +++|*
02892  M00S02089.pfam    +++|*         MACROS MESSAGE.
02893  M00S02090.pfam    +++|
02894  M00S02091.pfam    +++|
02895  M00S02092.pfam    +++| ITA      SUBR               ENTRY/EXIT
02896  M00S02093.pfam    +++|          MX0    42
02897  M00S02094.pfam    +++|          SB3    ITAB
02898  M00S02095.pfam    +++|          SB5    -ITAA
02899  M00S02096.pfam    +++|          SA1    SRQF
02900  M00S02097.pfam    +++|          SA2    X1+4        GET FAMILY/PACK NAME
02901  M00S02098.pfam    +++|          BX1    X0*X2
02902  M00S02099.pfam    +++|          SB2    1R$
02903  M00S02100.pfam    +++|          RJ     SNM         SET FAMILY/PACK NAME INTO MESSAGE
02904  M00S02101.pfam    +++|          SA1    SVSN        GET VSN
02905  M00S02102.pfam    +++|          SB5    ITAB
02906  M00S02103.pfam    +++|          SB2    1R-
02907  M00S02104.pfam    +++|          RJ     SNM         SET VSN INTO MESSAGE
02908  M00S02105.pfam    +++|          SA1    SRQN        GET NUMBER OF ENTRIES IN REQUEST QUEUE
02909  M00S02106.pfam    +++|          RJ     CDD         CONVERT TO DECIMAL DISPLAY
02910  M00S02107.pfam    +++|          MX0    -24         MASK TO FOUR DIGITS
02911  M00S02108.pfam    +++|          BX1    -X0*X6
02912  M00S02109.pfam    +++|          LX1    -24         LEFT JUSTIFY
02913  M00S02110.pfam    +++|          SB2    1R=
02914  M00S02111.pfam    +++|          RJ     SNM         SET NUMBER OF ENTRIES INTO MESSAGE
02915  M00S02112.pfam    +++|          MESSAGE  ITAB,5    ISSUE STAGING TAPE ASSIGNED MESSAGE
02916  M00S02113.pfam    +++|          EQ     ITAX        RETURN
02917  M00S02114.pfam    +++|
02918  M00S02115.pfam    +++|
02919  M00S02116.pfam    +++| ITAA     DATA   C*STTA, $$$$$$$, ------, ====.*
02920  M00S02117.pfam    +++|*         DATA   C*STTA, FAMPACK, VSNVSN, NNNN.*
02921  M00S02118.pfam    +++| ITAAL    EQU    *-ITAA      LENGTH OF MESSAGE
02922  M00S02119.pfam    +++| ITAB     BSS    ITAAL       MESSAGE ASSEMBLY BUFFER
02923  M00S02120.pfam    +++| RST      SPACE  4,20
02924  M00S02121.pfam    +++|**        RST - REQUEST STAGING TAPE.
02925  M00S02122.pfam    +++|*
02926  M00S02123.pfam    +++|*         EXIT   STAGING TAPE ASSIGNED.
02927  M00S02124.pfam    +++|*                (SVSN) = VSN OF STAGING TAPE.
02928  M00S02125.pfam    +++|*                (PVSN) = PACKED VSN OF STAGING TAPE.
02929  M00S02126.pfam    +++|*                STAGE REQUEST FILE ATTACHED (BY *RESEX*).
02930  M00S02127.pfam    +++|*                TO *ABT* IF IMPROPER TAPE ASSIGNED.
02931  M00S02128.pfam    +++|*
02932  M00S02129.pfam    +++|*         USES   X - 0, 1, 2, 5, 6, 7
02933  M00S02130.pfam    +++|*                A - 1, 2, 6.
02934  M00S02131.pfam    +++|*                B - 2, 5, 6, 7.
02935  M00S02132.pfam    +++|*
02936  M00S02133.pfam    +++|*         CALLS  DXB, SNM.
02937  M00S02134.pfam    +++|*
Line S02135 Modification History
M01 (Removed by) 286l859
Seq #  *Modification Id* Act 
----------------------------+
02938  M01S02135.286l859 ---|*         MACROS FILINFO, LABEL, MESSAGE, MOVE, UNLOAD.
Line S00560 Modification History
M01 (Added by) 286l859
Seq #  *Modification Id* Act 
----------------------------+
02939  M01S00560.286l859 +++|*         MACROS FILINFO, LABEL, MOVE, UNLOAD.
02940  M00S02136.pfam    +++|
02941  M00S02137.pfam    +++|
02942  M00S02138.pfam    +++| RST      SUBR               ENTRY/EXIT
02943  M00S02139.pfam    +++|          SA1    TAPE        SET FILE NAME IN *FILINFO* BLOCK
02944  M00S02140.pfam    +++|          SA2    RSTA
02945  M00S02141.pfam    +++|          MX7    42
02946  M00S02142.pfam    +++|          BX1    X7*X1
02947  M00S02143.pfam    +++|          BX2    -X7*X2
02948  M00S02144.pfam    +++|          BX6    X1+X2
02949  M00S02145.pfam    +++|          SA6    RSTA
02950  M00S02146.pfam    +++|          UNLOAD TAPE,R
02951  M00S02147.pfam    +++|          MOVE   5,TAPE,RSTB COPY FET FIELDS
02952  M00S02148.pfam    +++|          LABEL  RSTB        REQUEST STAGING TAPE
02953  M00S02149.pfam    +++|          FILINFO  RSTA
Line S02150 Modification History
M01 (Removed by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
02954  M01S02150.274l797 ---|          SA1    RSTA+1      GET DEVICE TYPE
02955  M01S02151.274l797 ---|          MX6    -11
02956  M01S02152.274l797 ---|          LX1    0-48
02957  M01S02153.274l797 ---|          BX1    -X6*X1
02958  M01S02154.274l797 ---|          SX2    X1-2RNT
02959  M01S02155.274l797 ---|          ZR     X2,RST1     IF NINE TRACK TAPE
02960  M01S02156.274l797 ---|          SX2    X1-2RMT
02961  M01S02157.274l797 ---|          ZR     X2,RST1     IF SEVEN TRACK TAPE
Line S00029 Modification History
M01 (Added by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
02962  M01S00029.274l797 +++|          SA1    RSTA+1      CHECK TAPE FILE FLAG
02963  M01S00030.274l797 +++|          LX1    59-24
02964  M01S00031.274l797 +++|          NG     X1,RST1     IF TAPE FILE
Line S02158 Modification History
M01 (Removed by) 286l859
Seq #  *Modification Id* Act 
----------------------------+
02965  M01S02158.286l859 ---|          MESSAGE  ERNT      * PFRES - STAGING TAPE NOT ASSIGNED.*
Line S00561 Modification History
M01 (Added by) 286l859
Seq #  *Modification Id* Act 
----------------------------+
02966  M01S00561.286l859 +++|          SB2    ERNT        * STAGING TAPE NOT ASSIGNED.*
02967  M00S02159.pfam    +++|          EQ     ABT         ABORT
02968  M00S02160.pfam    +++|
02969  M00S02161.pfam    +++| RST1     SA1    RSTA+5      GET VSN OF TAPE
02970  M00S02162.pfam    +++|          MX0    36
02971  M00S02163.pfam    +++|          BX6    X0*X1
02972  M00S02164.pfam    +++|          SA6    SVSN        SAVE VSN
02973  M00S02165.pfam    +++|          LX0    6
02974  M00S02166.pfam    +++|          BX0    -X0*X6      VERIFY SIX CHARACTER VSN
02975  M00S02167.pfam    +++|          NZ     X0,RST3     IF SIX CHARACTER VSN
02976  M00S02168.pfam    +++| RST2     SA1    SVSN        SET VSN IN DAYFILE MESSAGE
02977  M00S02169.pfam    +++|          SB2    1R$
02978  M00S02170.pfam    +++|          SB5    ERVE
02979  M00S02171.pfam    +++|          RJ     SNM
Line S02172 Modification History
M01 (Removed by) 286l859
Seq #  *Modification Id* Act 
----------------------------+
02980  M01S02172.286l859 ---|          MESSAGE  ERVE      * PFRES - STAGING TAPE VSN ERROR. VSN = $.*
Line S00562 Modification History
M01 (Added by) 286l859
Seq #  *Modification Id* Act 
----------------------------+
02981  M01S00562.286l859 +++|          SB2    ERVE        * STAGING TAPE VSN ERROR. VSN = $.*
02982  M00S02173.pfam    +++|          EQ     ABT         ABORT
02983  M00S02174.pfam    +++|
02984  M00S02175.pfam    +++| RST3     SA1    SVSN        BUILD PACKED VSN
02985  M00S02176.pfam    +++|          MX5    24
02986  M00S02177.pfam    +++|          LX1    12
02987  M00S02178.pfam    +++|          SB7    B1          SET DECIMAL CONVERSION
02988  M00S02179.pfam    +++|          BX5    X5*X1
02989  M00S02180.pfam    +++|          RJ     DXB         CONVERT VSN SUFFIX TO BINARY
02990  M00S02181.pfam    +++|          NZ     X4,RST2     IF ERROR IN CONVERSION (NOT PROPER VSN)
02991  M00S02182.pfam    +++|          SX7    X6-5000
02992  M00S02183.pfam    +++|          NG     X7,RST5     IF NOT BACKUP VSN
02993  M00S02184.pfam    +++|          SX6    X7          USE PRIMARY VSN FOR COMPARISON PURPOSES
02994  M00S02185.pfam    +++| RST5     SA1    SVSN        GET VSN PREFIX
02995  M00S02186.pfam    +++|          MX2    12
02996  M00S02187.pfam    +++|          BX1    X2*X1
02997  M00S02188.pfam    +++|          LX1    -36
02998  M00S02189.pfam    +++|          BX6    X1+X6
02999  M00S02190.pfam    +++|          SA6    PVSN        SAVE PACKED VSN
03000  M00S02191.pfam    +++|          EQ     RSTX        RETURN
03001  M00S02192.pfam    +++|
03002  M00S02193.pfam    +++|
03003  M00S02194.pfam    +++| RSTA     VFD    42/0,6/6,12/1  *FILINFO* BLOCK
03004  M00S02195.pfam    +++|          BSSZ   4
03005  M00S02196.pfam    +++|          VFD    54/,6/4
03006  M00S02197.pfam    +++|
03007  M00S02198.pfam    +++| RSTB     FILEB  TBUF,TBUFL,FET=16B  FET FOR *LABEL*
Line S02199 Modification History
M01 (Removed by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
03008  M01S02199.274l797 ---|          ORG    RSTB+10B    PO=R,LB=KL,NT,NO UNLOAD
03009  M01S02200.274l797 ---|          VFD    6/24B,3/0,3/0,12/50B,6/0,6/0,24/0
Line S00032 Modification History
M01 (Added by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
03010  M01S00032.274l797 +++|          ORG    RSTB+10B    PO=R,LB=KL,NO UNLOAD
03011  M01S00033.274l797 +++|          VFD    6/20B,3/0,3/0,12/50B,6/0,6/0,24/0
03012  M00S02201.pfam    +++|          BSSZ   RSTB+16B-*
03013  M00S02202.pfam    +++|          SPACE  4,10
03014  M00S02203.pfam    +++|*         PRESET DATA LOCATIONS.
03015  M00S02204.pfam    +++|
03016  M00S02205.pfam    +++|
03017  M00S02206.pfam    +++| R        BSS    0           STAGE REQUEST FILE
03018  M00S02207.pfam    +++| STRQ     FILEB  RBUF,RBUFL,FET=6
03019  M00S02208.pfam    +++|
03020  M00S02209.pfam    +++| S        BSS    0           SCRATCH STAGE REQUEST FILE
03021  M00S02210.pfam    +++| ZZZZZG4  FILEB  SBUF,SBUFL,FET=6
03022  M00S02211.pfam    +++|
03023  M00S02212.pfam    +++|          SPACE  4,10
03024  M00S02213.pfam    +++|*         PRESET COMMON DECKS.
03025  M00S02214.pfam    +++|
03026  M00S02215.pfam    +++|
03027  M00S02216.pfam    +++|          LIST   X
03028  M00S02217.pfam    +++|*CALL     COMCPFP
03029  M00S02218.pfam    +++|          LIST   *
Line S00034 Modification History
M01 (Added by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
03030  M01S00034.274l797 +++|*CALL     COMCSOE
03031  M00S02219.pfam    +++|          SPACE  4,10
Line S00035 Modification History
M01 (Added by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
03032  M01S00035.274l797 +++|          ERRPL  *-TBUF-1    PRESET OVERFLOWS INTO BUFFERS
Line S02220 Modification History
M01 (Removed by) 286l859
Seq #  *Modification Id* Act 
----------------------------+
03033  M01S02220.286l859 ---|          ERRPL  *-OBUF-1    PRESET OVERFLOWS INTO BUFFERS
03034  M01S02221.286l859 ---|          ERRPL  *-RBUF-1    PRESET OVERFLOWS INTO *PFRES* BUFFERS
03035  M00S02222.pfam    +++|          SPACE  4,10
03036  M00S02223.pfam    +++|          END
cdc/nos2.source/opl.opl871/deck/pfam.002.txt ยท Last modified: by 127.0.0.1