Seq # *Modification Id* Act
----------------------------+
00010 M02S00009.281l803 ---| COMMENT COPYRIGHT CONTROL DATA CORPORATION. 1980.
00011 M01S00001.281l803 +++| COMMENT COPYRIGHT CONTROL DATA SYSTEMS INC. 1992.
00012 M01S00010.tafrec +++| TAFREC SPACE 4,10
00013 M01S00011.tafrec +++| LIST X
00014 M01S00012.tafrec +++|*CALL COMKTAF
00015 M01S00013.tafrec +++| LIST -X
00016 M01S00014.tafrec +++| SPACE 4,10
00017 M01S00015.tafrec +++|***** TAFREC - *TAF* INITIALIZATION AND RECOVERY PROGRAM.
00018 M01S00016.tafrec +++|*
00019 M01S00017.tafrec +++|* R. G. PARKHOUSE 80/05/15.
00020 M01S00018.tafrec +++| SPACE 4,10
00021 M01S00019.tafrec +++|*** *TAFREC* PERFORMS INITIALIZATION AND RECOVERY PROCESSING FOR
00022 M01S00020.tafrec +++|* THE TRANSACTION FACILITY *TAF*.
00023 M01S00021.tafrec +++|*
00024 M01S00022.tafrec +++|* *TAFREC* READS THE *TAF* CONFIGURATION FILE VERIFYING THE
00025 M01S00023.tafrec +++|* SYNTAX OF ALL DIRECTIVES. THE DIRECTIVES ACTUALLY PROCESSED
00026 M01S00024.tafrec +++|* ARE *DISPLAY*, *NETWORK* AND *RECOVER*. IF THE *DISPLAY*
00027 M01S00025.tafrec +++|* DIRECTIVE HAS STATUS EQUAL *ON*, THE INITIAL *K-DISPLAY* IS
00028 M01S00026.tafrec +++|* SET UP TO RECEIVE OPERATOR ENTERED VALUES. FOR EACH ID
00029 M01S00027.tafrec +++|* SPECIFIED ON THE *NETWORK* DIRECTIVE THE CORRESPONDING
00030 M01S00028.tafrec +++|* NETWORK FILE IS ATTACHED AND THE TERMINAL STATUS TABLE
00031 M01S00029.tafrec +++|* BUILT. FOR EACH ID SPECIFIED ON THE *RECOVER* DIRECTIVES,
Line S00030 Modification History
M01(Added by)
tafrec
M02(Updated by)
ns2023
Seq # *Modification Id* Act
----------------------------+
00032 M02S00030.ns2023 ---|* THE CORRESPONDING *TAF* RECOVERY FILE IS ATTACHED, OR
Line S00031 Modification History
M01(Added by)
tafrec
M02(Updated by)
ns2023
Seq # *Modification Id* Act
----------------------------+
00033 M02S00031.ns2023 ---|* DEFINED IF NOT FOUND AND THE INITIALIZE FUNCTION WAS
Line S00032 Modification History
M01(Added by)
tafrec
M02(Updated by)
ns2023
Seq # *Modification Id* Act
----------------------------+
00034 M02S00032.ns2023 ---|* REQUESTED FROM THE *K-DISPLAY*.
Seq # *Modification Id* Act
----------------------------+
00045 M02S00043.ns2023 ---|* *TAFREC* REFORMATS THE *TAF* RECOVERY FILE IF PARAMETERS IN
Line S00044 Modification History
M01(Added by)
tafrec
M02(Updated by)
ns2023
Seq # *Modification Id* Act
----------------------------+
00046 M02S00044.ns2023 ---|* THE *TAF* CONFIGURATION FILE CHANGE. CHANGES TO THE
Line S00045 Modification History
M01(Added by)
tafrec
M02(Updated by)
ns2023
Seq # *Modification Id* Act
----------------------------+
00047 M02S00045.ns2023 ---|* FOLLOWING MAY CAUSE A REFORMAT,
00048 M01S00001.ns2023 +++|* THE CORRESPONDING COMMUNICATIONS RECOVERY FILE IS ATTACHED,
00049 M01S00002.ns2023 +++|* OR DEFINED IF NOT FOUND AND THE INITIALIZE FUNCTION WAS
00050 M01S00003.ns2023 +++|* REQUESTED FROM THE *K-DISPLAY*.
00051 M01S00004.ns2023 +++|*
00052 M01S00005.ns2023 +++|* *TAFREC* CREATES THE COMMUNICATIONS RECOVERY FILE, *CRF*, IF
00053 M01S00006.ns2023 +++|* IT DID NOT EXIST, USING PARAMETERS FROM THE *RECOVER*
00054 M01S00007.ns2023 +++|* DIRECTIVE. FOR EACH TERMINAL ON THE CORRESPONDING NETWORK
00055 M01S00008.ns2023 +++|* FILE, A RECOVERY UNIT IS INITIALIZED ON THE *CRF*.
00056 M01S00009.ns2023 +++|*
00057 M01S00010.ns2023 +++|* IF THE COMMUNICATIONS RECOVERY FILE EXISTED, *TAFREC*
00058 M01S00011.ns2023 +++|* DETERMINES TERMINALS ACTIVE AT FAILURE AND SETS RECOVERY
00059 M01S00012.ns2023 +++|* STATUS FOR THOSE TERMINALS.
00060 M01S00013.ns2023 +++|*
00061 M01S00014.ns2023 +++|* *TAFREC* REFORMATS THE COMMUNICATIONS RECOVERY FILE IF
00062 M01S00015.ns2023 +++|* PARAMETERS IN THE *TAF* CONFIGURATION FILE CHANGE. CHANGES
00063 M01S00016.ns2023 +++|* TO THE FOLLOWING MAY CAUSE A REFORMAT,
00064 M01S00046.tafrec +++|* SIZE OF USER RECOVERY MESSAGES.
00065 M01S00047.tafrec +++|* NUMBER OF RECOVERY MESSAGES.
00066 M01S00048.tafrec +++|* TERMINALS ALLOWED TO USE TAF.
00067 M01S00049.tafrec +++|*
00068 M01S00050.tafrec +++|* *TAFREC* PREPARES A RECOVERY REPORT WHICH THE USER MAY PRINT
00069 M01S00051.tafrec +++|* IF DESIRED. THIS REPORT CONSISTS OF,
00070 M01S00052.tafrec +++|* CONTENTS OF *TAF* CONFIGURATION FILE.
00071 M01S00053.tafrec +++|* INITIAL *K-DISPLAY*.
00072 M01S00054.tafrec +++|* INFORMATION ABOUT TERMINALS AFFECTED BY RECOVERY.
00073 M01S00055.tafrec +++|* ERRORS PREVENTING A CORRECT RECOVERY.
00074 M01S00056.tafrec +++|*
00075 M01S00057.tafrec +++|* *TAFREC* PREPARES THE TAF INITIALIZATION FILE WHICH CONTAINS
00076 M01S00058.tafrec +++|* THE INFORMATION FOR *TAF* TO COMPLETE INITIALIZATION.
00077 M01S00059.tafrec +++|*
00078 M01S00060.tafrec +++| SPACE 4,10
00079 M01S00061.tafrec +++|*** DAYFILE MESSAGES.
00080 M01S00062.tafrec +++|*
Line S00063 Modification History
M01(Added by)
tafrec
M02(Updated by)
ns2023
Seq # *Modification Id* Act
----------------------------+
00081 M02S00063.ns2023 ---|* IN THE FOLLOWING MESSAGES, *TRFNAME* IMPLIES THE APPROPRIATE
Line S00064 Modification History
M01(Added by)
tafrec
M02(Updated by)
ns2023
Seq # *Modification Id* Act
----------------------------+
00082 M02S00064.ns2023 ---|* TRF FILE NAME, AND *NETNAME* IMPLIES THE APPROPRIATE NETWORK
00083 M01S00017.ns2023 +++|* IN THE FOLLOWING MESSAGES, *CRFNAME* IMPLIES THE APPROPRIATE
00084 M01S00018.ns2023 +++|* CRF FILE NAME, AND *NETNAME* IMPLIES THE APPROPRIATE NETWORK
00085 M01S00065.tafrec +++|* FILE NAME.
00086 M01S00066.tafrec +++|*
00087 M01S00067.tafrec +++|*
Seq # *Modification Id* Act
----------------------------+
00180 M02S00139.ns2023 ---| ID CON 0 ID OF NETWORK FILE AND *TRF*
00181 M01S00034.ns2023 +++| ID CON 0 ID OF NETWORK FILE AND *CRF*
00182 M01S00140.tafrec +++| NM CON 0 NUMBER OF USER MESSAGES
00183 M01S00141.tafrec +++| MS CON 0 SIZE OF USER MESSAGES
00184 M01S00001.ns22000 +++|
00185 M01S00002.ns22000 +++|* 3 WORD BUFFER FOR *SETPFP*.
00186 M01S00003.ns22000 +++|* 42/ FAMILY NAME, 14/ 0, 4/ FG.
00187 M01S00004.ns22000 +++|* 42/ PACK NAME, 18/ PACK TYPE
00188 M01S00005.ns22000 +++|* 42/ USER NAME, 18/ USER INDEX
00189 M01S00006.ns22000 +++|* FG - FLAG BITS DENOTING WHICH FIELDS TO SET
00190 M01S00007.ns22000 +++|* BIT 3 - FAMILY NAME
00191 M01S00008.ns22000 +++|* 2 - PACK NAME
00192 M01S00009.ns22000 +++|* 1 - USER NAME
00193 M01S00010.ns22000 +++|* 0 - USER INDEX
00194 M01S00011.ns22000 +++|
00195 M01S00012.ns22000 +++| PFPA VFD 42/0,14/0,4/0
00196 M01S00013.ns22000 +++| VFD 42/0,18/0
00197 M01S00014.ns22000 +++| VFD 42/0,18/0
Line S00142 Modification History
M01(Added by)
tafrec
M02(Updated by)
ns21000
Seq # *Modification Id* Act
----------------------------+
00198 M02S00142.ns21000 ---| UN CON 0 USER NAME
Seq # *Modification Id* Act
----------------------------+
00200 M02S00144.ns21000 ---| FM CON 0 FAMILY NAME
Line S00145 Modification History
M01(Added by)
tafrec
M02(Updated by)
ns21000
Seq # *Modification Id* Act
----------------------------+
00201 M02S00145.ns21000 ---| BSSZ 4 USED BY *CPM* VAL FUNCTION
00202 M01S00001.ns21000 +++|
00203 M01S00002.ns21000 +++|* *CPM* VALIDATION PARAMETER BLOCK.
00204 M01S00003.ns21000 +++|
00205 M01S00004.ns21000 +++| FM CON 0 42/FAMILY NAME,18/0
00206 M01S00005.ns21000 +++| PW CON 1 DO NOT VALIDATE PASSWORD
00207 M01S00006.ns21000 +++| UN CON 0 42/USER NAME,18/USER INDEX
00208 M01S00007.ns21000 +++| BSSZ 6 REST OF PARAMETERS
00209 M01S00008.ns21000 +++|
00210 M01S00146.tafrec +++| KCOF CON 0 *K.COMMAND* ORIGIN FLAG
00211 M01S00147.tafrec +++| KCNV DATA C* K.COMMAND NOT VALID.*
00212 M01S00148.tafrec +++| MZDB DATA C* DB-NAME MUST NOT START WITH THE LETTER Z.*
00213 M01S00149.tafrec +++|
00214 M01S00150.tafrec +++| DFFM BSS 1 DEFAULT FAMILY
Line S00151 Modification History
M01(Added by)
tafrec
M02(Updated by)
ns2094
Seq # *Modification Id* Act
----------------------------+
00215 M02S00151.ns2094 ---| DFUN VFD 42/0L"USNM",18/ DEFAULT USER NUMBER
00216 M01S00152.tafrec +++| DFNM VFD 60/0L"TRDND" DEFAULT NUMBER USER MESSAGES
00217 M01S00153.tafrec +++| DFMS VFD 60/0L"TRDMD" DEFAULT MESSAGE SIZE
00218 M01S00154.tafrec +++| DATE BSS 1
00219 M01S00155.tafrec +++| TIME BSS 1
00220 M01S00156.tafrec +++| RFN VFD 60/0LZZCRF CRF FILE NAME
00221 M01S00157.tafrec +++| RFNA VFD 60/0LZZCRFA REFORMATED CRF FILE NAME
00222 M01S00158.tafrec +++|
00223 M01S00159.tafrec +++|** TABLE OF FAMILY NAMES AND USER INDICES.
00224 M01S00160.tafrec +++|*
00225 M01S00161.tafrec +++|* THIS TABLE HAS TWO WORD ENTRIES IN THE FOLLOWING FORMAT.
00226 M01S00162.tafrec +++|*
00227 M01S00163.tafrec +++|*T W1 42/ FAMILY,18/
00229 M01S00015.ns22000 +++|*T, W2 42/ USER NAME, 18/ USER INDEX
Figure W2
00230 M01S00165.tafrec +++|
00231 M01S00166.tafrec +++| TFAM BSSZ 2*MAXNF TABLE OF FAMILY NAMES AND USER INDICES
00232 M01S00167.tafrec +++|
00233 M01S00168.tafrec +++|** TABLE OF VALUES FROM *RECOVER* DIRECTIVE PLUS ADDITIONAL
00234 M01S00169.tafrec +++|* VALUES AND STATUS. THE TABLE IS INDEXED BY *RECOVER* ID.
00235 M01S00170.tafrec +++|*
00236 M01S00171.tafrec +++|*T W1 12/ ,12/ PPM,12/ NM,12/ MS,9/ ,3/ ST
Figure W1
00237 M01S00172.tafrec +++|*
00238 M01S00173.tafrec +++|* WHERE
00239 M01S00174.tafrec +++|* PPM = PRU-S PER USER MESSAGE. (NOT ON DIRECTIVE)
Line S00175 Modification History
M01(Added by)
tafrec
M02(Updated by)
ns2023
Seq # *Modification Id* Act
----------------------------+
00240 M02S00175.ns2023 ---|* NM = NUMBER OF USER MESSAGES ON *TRF*.
00241 M01S00035.ns2023 +++|* NM = NUMBER OF USER MESSAGES ON *CRF*.
00242 M01S00176.tafrec +++|* MS = USER MESSAGE SIZE IN WORDS.
00243 M01S00177.tafrec +++|* ST = STATUS. 0=RECOVER
00244 M01S00178.tafrec +++|* 1=INITIALIZE
00245 M01S00179.tafrec +++|* 7=COMPLETE
00246 M01S00180.tafrec +++|
00247 M01S00181.tafrec +++| TREC BSSZ MAXRC TABLE OF *RECOVER* DIRECTIVE VALUES
00248 M01S00182.tafrec +++|
00249 M01S00183.tafrec +++|* TABLE OF TRANSACTION TYPES.
00250 M01S00184.tafrec +++|
00251 M01S00185.tafrec +++| TTYP BSS 0
00252 M01S00186.tafrec +++| ORG TTYP+TYIT
00253 M01S00187.tafrec +++| DATA 10H TERMINAL
00254 M01S00188.tafrec +++| ORG TTYP+TYBT
00255 M01S00189.tafrec +++| DATA 10H BTRAN
00256 M01S00190.tafrec +++| ORG TTYP+TYRM
00257 M01S00191.tafrec +++| DATA 10HBATCH/CRM
00258 M01S00192.tafrec +++| TTYPL EQU *-TTYP
00259 M01S00193.tafrec +++| ORG TTYP+TTYPL
00260 M01S00194.tafrec +++|
00261 M01S00195.tafrec +++|* TABLE OF TRANSACTION STEPS.
00262 M01S00196.tafrec +++|
00263 M01S00197.tafrec +++| TSTP BSS 0
00264 M01S00198.tafrec +++| ORG TSTP+CSNR
00265 M01S00199.tafrec +++| DATA 10HNON-RECOV
00266 M01S00200.tafrec +++| ORG TSTP+CSCD
00267 M01S00201.tafrec +++| DATA 10HCDCS DOWN
00268 M01S00202.tafrec +++| ORG TSTP+CSCE
00269 M01S00203.tafrec +++| DATA 10HCEASE/END
00270 M01S00204.tafrec +++| ORG TSTP+CSTA
00271 M01S00205.tafrec +++| DATA 10H ABORT
00272 M01S00206.tafrec +++| ORG TSTP+CSTN
00273 M01S00207.tafrec +++| DATA 10HRU ERROR
00274 M01S00208.tafrec +++| ORG TSTP+CSTI
00275 M01S00209.tafrec +++| DATA 10HRECOV INP
00276 M01S00210.tafrec +++| ORG TSTP+CSBC
00277 M01S00211.tafrec +++| DATA 10HID LOGGED
00278 M01S00212.tafrec +++| ORG TSTP+CSND
00279 M01S00213.tafrec +++| DATA 10HNAM DOWN
00280 M01S00214.tafrec +++| ORG TSTP+CSST
00281 M01S00215.tafrec +++| DATA 10HSTART JOB
00282 M01S00216.tafrec +++| ORG TSTP+CSTT
00283 M01S00217.tafrec +++| DATA 10H END TAF
00284 M01S00218.tafrec +++| TSTPL EQU *-TSTP
00285 M01S00219.tafrec +++| ORG TSTP+TSTPL
00286 M01S00220.tafrec +++|
00287 M01S00221.tafrec +++| OVRD CON 0 ERROR OVERRIDE FLAG
00288 M01S00222.tafrec +++| CUID CON -1 CURRENT ID BEING PROCESSED
00289 M01S00223.tafrec +++| SDST CON 0 SHUTDOWN STATUS. -VE = ABNORMAL.
Line S00224 Modification History
M01(Added by)
tafrec
M02(Updated by)
ns2023
Seq # *Modification Id* Act
----------------------------+
00290 M02S00224.ns2023 ---| CUFN CON 0 CURRENT TRF FILE NAME
Line S00225 Modification History
M01(Added by)
tafrec
M02(Updated by)
ns2023
Seq # *Modification Id* Act
----------------------------+
00291 M02S00225.ns2023 ---| WPMO CON 0 WORDS PER USER MESSAGE ON OLD TRF (N*64)
Line S00226 Modification History
M01(Added by)
tafrec
M02(Updated by)
ns2023
Seq # *Modification Id* Act
----------------------------+
00292 M02S00226.ns2023 ---| PPMO CON 0 PRU-S PER USER MESSAGE ON OLD TRF
Line S00227 Modification History
M01(Added by)
tafrec
M02(Updated by)
ns2023
Seq # *Modification Id* Act
----------------------------+
00293 M02S00227.ns2023 ---| WPMN CON 0 WORDS PER USER MESSGE ON NEW TRF (N*64)
Line S00228 Modification History
M01(Added by)
tafrec
M02(Updated by)
ns2023
Seq # *Modification Id* Act
----------------------------+
00294 M02S00228.ns2023 ---| NUMO CON 0 NUMBER MESSAGES/RECOVERY UNIT ON OLD TRF
Line S00229 Modification History
M01(Added by)
tafrec
M02(Updated by)
ns2023
Seq # *Modification Id* Act
----------------------------+
00295 M02S00229.ns2023 ---| ADMN CON 0 ADDITIONAL MESSAGES ON NEW TRF
Line S00230 Modification History
M01(Added by)
tafrec
M02(Updated by)
ns2023
Seq # *Modification Id* Act
----------------------------+
00296 M02S00230.ns2023 ---| NMRU CON 0 NUMBER OF RECOVERY UNITS ON OLD TRF
Line S00231 Modification History
M01(Added by)
tafrec
M02(Updated by)
ns2023
Seq # *Modification Id* Act
----------------------------+
00297 M02S00231.ns2023 ---| HTST CON 0 HIGHEST TST ADDRESS FOR CURRENT TRF
Line S00232 Modification History
M01(Added by)
tafrec
M02(Updated by)
ns2023
Seq # *Modification Id* Act
----------------------------+
00298 M02S00232.ns2023 ---| LTST CON 0 LOWEST TST ADDRESS FOR TRF
00299 M01S00036.ns2023 +++| CUFN CON 0 CURRENT *CRF* FILE NAME
00300 M01S00037.ns2023 +++| WPMO CON 0 WORDS PER USER MESSAGE ON OLD *CRF* (N*64)
00301 M01S00038.ns2023 +++| PPMO CON 0 PRU-S PER USER MESSAGE ON OLD *CRF*
00302 M01S00039.ns2023 +++| WPMN CON 0 WORDS PER USER MESSAGE ON NEW *CRF* (N*64)
00303 M01S00040.ns2023 +++| NUMO CON 0 NUMBER MESSAGES/RECOVERY UNIT ON OLD *CRF*
00304 M01S00041.ns2023 +++| ADMN CON 0 ADDITIONAL MESSAGES ON NEW *CRF*
00305 M01S00042.ns2023 +++| NMRU CON 0 NUMBER OF RECOVERY UNITS ON OLD *CRF*
00306 M01S00043.ns2023 +++| HTST CON 0 HIGHEST TST ADDRESS FOR CURRENT *CRF*
00307 M01S00044.ns2023 +++| LTST CON 0 LOWEST TST ADDRESS FOR *CRF*
00308 M01S00233.tafrec +++|
00309 M01S00234.tafrec +++|* TABLE OF RECOVERED TRANSACTION TYPES.
00310 M01S00235.tafrec +++|
00311 M01S00236.tafrec +++| TNRC BSS 0
00312 M01S00237.tafrec +++| LOC 0
00313 M01S00238.tafrec +++| CON 0 DUMMY ENTRY FOR UNUSED RECOVERY UNITS
00314 M01S00239.tafrec +++| CON 0 NUMBER TERMINALS RECOVERED
00315 M01S00240.tafrec +++| CON 0 NUMBER OF *BTRAN-S* RECOVERED
00316 M01S00241.tafrec +++| CON 0 NUMBER CONCURRENT BATCH/*CRM* RECOVERED
00317 M01S00242.tafrec +++| LOC *O
00318 M01S00243.tafrec +++|
00319 M01S00244.tafrec +++| TINT CON 0 NUMBER NEW TERMINALS INTRODUCED
00320 M01S00245.tafrec +++| TDEL CON 0 NUMBER EXISTING TERMINALS DELETED
00321 M01S00246.tafrec +++| TERR CON 0 NUMBER OF RECOVERY UNIT ERRORS
00322 M01S00247.tafrec +++| BLNK DATA 20H
00323 M01S00248.tafrec +++| PMSG BSS 3 SCRATCH AREA FOR *PFM* ERROR MESSAGES
00324 M01S00249.tafrec +++| DAYB BSSZ 5 BUFFER FOR DAYFILE MESSAGES
00325 M01S00250.tafrec +++|
00326 M01S00251.tafrec +++|* HEADING FOR REPORT FILE.
00327 M01S00252.tafrec +++|
00328 M01S00253.tafrec +++| HEAD DATA 1L1
00329 M01S00254.tafrec +++| DATA 60H TAF INITIALIZATION AND RECOVERY REPORT
00330 M01S00255.tafrec +++|, PAGE -
00331 M01S00256.tafrec +++| HEAD1 BSS 1 PAGE NUMBER
00332 M01S00257.tafrec +++| CON 0 END OF LINE
00333 M01S00258.tafrec +++| DATA 1L BLANK LINE
00334 M01S00259.tafrec +++| DATA 10H
00335 M01S00260.tafrec +++| DATA 20HMODE = "PROD"
00336 M01S00261.tafrec +++| .A IFEQ IPTAR,1
00337 M01S00262.tafrec +++| DATA 20HRECOVERY ENABLED
00338 M01S00263.tafrec +++| .A ELSE
00339 M01S00264.tafrec +++| DATA 20HRECOVERY DISABLED
00340 M01S00265.tafrec +++| .A ENDIF
00341 M01S00266.tafrec +++| HEAD2 DATA 10H RESTART INDICATOR
00342 M01S00267.tafrec +++| CON 0 END OF LINE
00343 M01S00268.tafrec +++| DATA 1L TWO BLANK LINES
00344 M01S00269.tafrec +++| DATA 1L
00345 M01S00270.tafrec +++| HEADL EQU *-HEAD
00346 M01S00271.tafrec +++|
Line S00272 Modification History
M01(Added by)
tafrec
M02(Updated by)
ns2023
Seq # *Modification Id* Act
----------------------------+
00347 M02S00272.ns2023 ---|* SUBHEADING FOR TRF REPORT.
00348 M01S00045.ns2023 +++|* SUBHEADING FOR CRF REPORT.
00349 M01S00273.tafrec +++|
00350 M01S00274.tafrec +++| RFSH DATA 10H
00351 M01S00275.tafrec +++| DATA 20H INITIALIZING - ZZCR
00352 M01S00276.tafrec +++| DATA 10HFI
00353 M01S00277.tafrec +++| DATA 10HSHUTDOWN -
00354 M01S00278.tafrec +++| DATA 10H NORMAL
00355 M01S00279.tafrec +++| CON 0 END OF LINE
00356 M01S00280.tafrec +++| DATA 1L BLANK LINE
00357 M01S00281.tafrec +++| DATA C* TERMINAL TSEQ TYPE STEP DATE
00358 M01S00282.tafrec +++|,TIME COMMENT*
00359 M01S00283.tafrec +++| DATA 1L
00360 M01S00284.tafrec +++| RFSHL EQU *-RFSH
00361 M01S00285.tafrec +++|
00362 M01S00286.tafrec +++|* SUBHEADING FOR SUMMARY.
00363 M01S00287.tafrec +++|
00364 M01S00288.tafrec +++| SMSH DATA 30H
00365 M01S00289.tafrec +++| DATA C*SUMMARY*
00366 M01S00290.tafrec +++| DATA 1L BLANK LINE
00367 M01S00291.tafrec +++| SMSHL EQU *-SMSH
00368 M01S00292.tafrec +++|
00369 M01S00293.tafrec +++|* SUMMARY BUFFER.
00370 M01S00294.tafrec +++|
00371 M01S00295.tafrec +++| SMBF DATA 10H
00372 M01S00296.tafrec +++| SMB1 CON 0 NUMBER OF TERMINALS RECOVERED
00373 M01S00297.tafrec +++| DATA C* TERMINALS RECOVERED.*
00374 M01S00298.tafrec +++| DATA 10H
00375 M01S00299.tafrec +++| SMB2 CON 0 NUMBER OF *BTRAN-S* RECOVERED
00376 M01S00300.tafrec +++| DATA C* BATCH TRANSACTIONS RECOVERED.*
00377 M01S00301.tafrec +++| DATA 10H
00378 M01S00302.tafrec +++| SMB3 CON 0 NUMBER CONCURRENT BATCH *CRM* REQUESTS
00379 M01S00303.tafrec +++| DATA C* CONCURRENT BATCH/CRM REQUESTS RECOVERED.*
00380 M01S00304.tafrec +++| DATA 10H
00381 M01S00305.tafrec +++| SMB4 CON 0 NUMBER OF RECOVERY UNITS INTRODUCED
00382 M01S00306.tafrec +++| DATA C* USER NAMES ADDED.*
00383 M01S00307.tafrec +++| DATA 10H
00384 M01S00308.tafrec +++| SMB5 CON 0 NUMBER OF RECOVERY UNITS DELETED
00385 M01S00309.tafrec +++| DATA C* RECOVERABLE RUN UNITS DELETED.*
00386 M01S00310.tafrec +++| SMBFL EQU *-SMBF
00387 M01S00311.tafrec +++|
00388 M01S00312.tafrec +++| SBHD BSS 3 SUBHEADING ADDRESS,WORD COUNT,LINE COUNT
00389 M01S00313.tafrec +++| LCNT CON 60 REPORT FILE LINE COUNT
00390 M01S00314.tafrec +++| PCNT CON 0 REPORT FILE PAGE COUNT
00391 M01S00315.tafrec +++|
00392 M01S00316.tafrec +++| TAFREC EJECT
00393 M01S00317.tafrec +++|* TAFREC MAINLINE.
00394 M01S00318.tafrec +++|
00395 M01S00319.tafrec +++|
00396 M01S00320.tafrec +++| TAFREC RJ PRS PRESET TAFREC
00397 M01S00321.tafrec +++| SX1 IPTAR
00398 M01S00322.tafrec +++| ZR X1,TAF5 IF *TAF* AUTOMATIC RECOVERY ENABLED
00399 M01S00323.tafrec +++| SX7 -1
00400 M01S00324.tafrec +++| SA7 CUID INITIALIZE ID
00401 M01S00325.tafrec +++| SX6 RFSH SET SUBHEADING ADDRESS AND LENGTH
00402 M01S00326.tafrec +++| SX7 RFSHL
00403 M01S00327.tafrec +++| SA6 SBHD
Seq # *Modification Id* Act
----------------------------+
00501 M02S00410.ns2023 ---|* PREALLOCATE AND INITIALIZE THE TRF. THE FILE IS WRITTEN
Line S00411 Modification History
M01(Added by)
tafrec
M02(Updated by)
ns2023
Seq # *Modification Id* Act
----------------------------+
00502 M02S00411.ns2023 ---|* SEQUENTIALLY, THE TRF HEADER FIRST, FOLLOWED BY A RECOVERY
00503 M01S00052.ns2023 +++|* PREALLOCATE AND INITIALIZE THE *CRF*. THE FILE IS WRITTEN
00504 M01S00053.ns2023 +++|* SEQUENTIALLY, THE *CRF* HEADER FIRST, FOLLOWED BY A RECOVERY
00505 M01S00412.tafrec +++|* UNIT FOR EACH TERMINAL IN THE CORRESPONDING NETWORK FILE.
00506 M01S00413.tafrec +++|*
Seq # *Modification Id* Act
----------------------------+
00624 M02S00519.ns2023 ---|* RECOVER A TRF AND DETERMINE THE TERMINALS TO BE RECOVERED.
Line S00520 Modification History
M01(Added by)
tafrec
M02(Updated by)
ns2023
Seq # *Modification Id* Act
----------------------------+
00625 M02S00520.ns2023 ---|* THE TRF MAY BE REFORMATTED BECAUSE OF -
00626 M01S00066.ns2023 +++|* RECOVER A *CRF* AND DETERMINE THE TERMINALS TO BE RECOVERED.
00627 M01S00067.ns2023 +++|* THE *CRF* MAY BE REFORMATTED BECAUSE OF -
00628 M01S00521.tafrec +++|* AN INCREASE IN THE SIZE OF MESSAGE RECORDS.
00629 M01S00522.tafrec +++|* AN INCREASE IN THE NUMBER OF MESSAGE RECORDS.
00630 M01S00523.tafrec +++|* CHANGES IN TERMINALS ON NETWORK FILE.
00631 M01S00524.tafrec +++|* RECOVERY UNIT ERROR AND ERROR OVERRIDE SET.
00632 M01S00525.tafrec +++|* TERMINALS ACTIVE AT *TAF* SHUTDOWN WILL HAVE THE RECOVERY
00633 M01S00526.tafrec +++|* FLAG SET IN THE TST.
00634 M01S00527.tafrec +++|* INFORMATION ON RECOVERED TERMINALS WILL BE WRITTEN TO THE
00635 M01S00528.tafrec +++|* REPORT FILE.
00636 M01S00529.tafrec +++|*
00637 M01S00530.tafrec +++|* ENTRY (CUID) = CURRENT ID.
00638 M01S00531.tafrec +++|*
Line S00532 Modification History
M01(Added by)
tafrec
M02(Updated by)
ns2023
Seq # *Modification Id* Act
----------------------------+
00639 M02S00532.ns2023 ---|* EXIT TRF RECOVERED/REFORMATTED.
00640 M01S00068.ns2023 +++|* EXIT *CRF* RECOVERED/REFORMATTED.
00641 M01S00533.tafrec +++|* RECOVERY FLAG SET IN THE TST FOR ACTIVE TERMINALS.
00642 M01S00534.tafrec +++|* TO *ERR* IF REFORMATTED FILE CANNOT BE DEFINED.
00643 M01S00535.tafrec +++|*
00644 M01S00536.tafrec +++|* USES X - ALL.
00645 M01S00537.tafrec +++|* A - ALL.
00646 M01S00538.tafrec +++|* B - 2, 3, 4, 5, 6.
00647 M01S00539.tafrec +++|*
00648 M01S00540.tafrec +++|* CALLS ALC, BDR, CDD, FIO, FRL, GHL, PRU, RFH, RRU, SNM, STN,
00649 M01S00541.tafrec +++|* ZFB.
00650 M01S00542.tafrec +++|*
Seq # *Modification Id* Act
----------------------------+
00831 M02S00697.ns2023 ---|* THE RECOVERY FILE *TRFI* HAS BEEN REFORMATTED ONTO FILE
Line S00698 Modification History
M01(Added by)
tafrec
M02(Updated by)
ns2023
Seq # *Modification Id* Act
----------------------------+
00832 M02S00698.ns2023 ---|* *TRFAI*. CHANGE BOTH PERMANENT AND LOCAL FILE NAMES
Line S00699 Modification History
M01(Added by)
tafrec
M02(Updated by)
ns2023
Seq # *Modification Id* Act
----------------------------+
00833 M02S00699.ns2023 ---|* FROM *TRFAI* TO *TRFI*.
00834 M01S00086.ns2023 +++|* THE RECOVERY FILE *CRFI* HAS BEEN REFORMATTED ONTO FILE
00835 M01S00087.ns2023 +++|* *CRFAI*. CHANGE BOTH PERMANENT AND LOCAL FILE NAMES
00836 M01S00088.ns2023 +++|* FROM *CRFAI* TO *CRFI*.
00837 M01S00700.tafrec +++|
00838 M01S00701.tafrec +++|
Seq # *Modification Id* Act
----------------------------+
00906 M02S00758.ns2023 ---| REWIND TRF,R
00907 M01S00100.ns2023 +++| RECALL CRF WAIT *CRF* I/O TO COMPLETE
00908 M01S00101.ns2023 +++| REWIND CRF,R
00909 M01S00759.tafrec +++| EQ PTRX RETURN
00910 M01S00760.tafrec +++|
00911 M01S00761.tafrec +++| PTRB CON 0 REFORMAT FLAG
00912 M01S00762.tafrec +++| PTRC DATA C* CANNOT DEFINE REFORMATTED FILE - XXXXXXX.*
00913 M01S00763.tafrec +++| PTRE DATA C* RECOVERING - *
00914 M01S00764.tafrec +++| PTRF DATA C* REFORMATTING - *
00915 M01S00765.tafrec +++| PTRG DATA 10H NORMAL
00916 M01S00766.tafrec +++| DATA 10H ABNORMAL
00917 M01S00767.tafrec +++| PTRH DATA 10HSHUTDOWN -
00918 M01S00768.tafrec +++| PTRI DATA 1L BLANK LINE
00919 M01S00769.tafrec +++| DATA C* 0 RECOVERY UNIT ERRORS ENCOUNTERED.*
00920 M01S00770.tafrec +++| PTRIL EQU *-PTRI
00921 M01S00771.tafrec +++| PTRJ VFD 12/0,48/8H
00922 M01S00772.tafrec +++| RRU SPACE 4,25
00923 M01S00773.tafrec +++|** RRU - REFORMAT RECOVERY UNIT.
00924 M01S00774.tafrec +++|*
Line S00775 Modification History
M01(Added by)
tafrec
M02(Updated by)
ns2023
Seq # *Modification Id* Act
----------------------------+
00925 M02S00775.ns2023 ---|* COPY A RECOVERY UNIT FROM *TRFI* TO *TRFAI*. IN THE
00926 M01S00102.ns2023 +++|* COPY A RECOVERY UNIT FROM *CRFI* TO *CRFAI*. IN THE
00927 M01S00776.tafrec +++|* PROCESS IT MAY INCREASE THE SIZE OF THE MESSAGE RECORDS OR
00928 M01S00777.tafrec +++|* THE NUMBER OF MESSAGES. INFORMATION ON THE RECOVERY UNIT IS
00929 M01S00778.tafrec +++|* WRITTEN TO THE REPORT FILE.
00930 M01S00779.tafrec +++|*
00931 M01S00780.tafrec +++|* ENTRY (X1) = TERMINAL NAME.
00932 M01S00781.tafrec +++|* (X5) = DIRECTORY ENTRY ADDRESS.
Line S00782 Modification History
M01(Added by)
tafrec
M02(Updated by)
ns2023
Seq # *Modification Id* Act
----------------------------+
00933 M02S00782.ns2023 ---|* (NUMO) = NUMBER OF MESSAGES ON OLD TRF.
Line S00783 Modification History
M01(Added by)
tafrec
M02(Updated by)
ns2023
Seq # *Modification Id* Act
----------------------------+
00934 M02S00783.ns2023 ---|* (ADMN) = ADDITIONAL MESSAGES ON NEW TRF.
00935 M01S00103.ns2023 +++|* (NUMO) = NUMBER OF MESSAGES ON OLD *CRF*.
00936 M01S00104.ns2023 +++|* (ADMN) = ADDITIONAL MESSAGES ON NEW *CRF*.
00937 M01S00784.tafrec +++|*
00938 M01S00785.tafrec +++|* EXIT RECOVERY UNIT COPIED/REFORMATTED.
00939 M01S00786.tafrec +++|*
00940 M01S00787.tafrec +++|* USES X - 0, 1, 2, 3, 5, 6, 7.
00941 M01S00788.tafrec +++|* A - 0, 1, 2, 3, 5, 6, 7.
00942 M01S00789.tafrec +++|* B - 5, 6
00943 M01S00790.tafrec +++|*
00944 M01S00791.tafrec +++|* CALLS FIO, FRL, ZFB.
00945 M01S00792.tafrec +++|*
00946 M01S00793.tafrec +++|* MACROS MESSAGE, RECALL, READW, WRITEW.
00947 M01S00794.tafrec +++|
00948 M01S00795.tafrec +++|
00949 M01S00796.tafrec +++| RRU SUBR ENTRY/EXIT
Line S00797 Modification History
M01(Added by)
tafrec
M02(Updated by)
ns2023
Seq # *Modification Id* Act
----------------------------+
00950 M02S00797.ns2023 ---| SA2 NUMO NUMBER MESSAGES ON OLD TRF.
Line S00798 Modification History
M01(Added by)
tafrec
M02(Updated by)
ns2023
Seq # *Modification Id* Act
----------------------------+
00951 M02S00798.ns2023 ---| SA3 ADMN ADDITIONAL MESSAGES ON NEW TRF.
00952 M01S00105.ns2023 +++| SA2 NUMO NUMBER MESSAGES ON OLD *CRF*.
00953 M01S00106.ns2023 +++| SA3 ADMN ADDITIONAL MESSAGES ON NEW *CRF*.
00954 M01S00799.tafrec +++| SX6 X2+B1 INCLUDE *SECURE* MESSAGE
00955 M01S00800.tafrec +++| BX7 X3
00956 M01S00801.tafrec +++| SA6 RRUA
00957 M01S00802.tafrec +++| SA7 A6+B1
00958 M01S00803.tafrec +++| BX6 X1
00959 M01S00804.tafrec +++| SA6 RRUC+2
00960 M01S00805.tafrec +++| MESSAGE RRUC,B1 *B-DISPLAY* MESSAGE
00961 M01S00806.tafrec +++| SA0 B0 COMMENT=RECOVERED
00962 M01S00807.tafrec +++| RJ FRL FORMAT REPORT LINE
00963 M01S00808.tafrec +++|
00964 M01S00809.tafrec +++|* COPY RECOVERY UNIT HEADER AND TRANSACTION INPUT.
00965 M01S00810.tafrec +++|
00966 M01S00811.tafrec +++| MX0 -30
00967 M01S00812.tafrec +++| SA1 X5+1
00968 M01S00813.tafrec +++| BX6 -X0*X1 PRU ADDRESS OF RECOVERY UNIT
Seq # *Modification Id* Act
----------------------------+
01020 M02S00854.ns2023 ---| RRUA CON 0 NUMBER MESSAGES ON OLD TRF
Line S00855 Modification History
M01(Added by)
tafrec
M02(Updated by)
ns2023
Seq # *Modification Id* Act
----------------------------+
01021 M02S00855.ns2023 ---| RRUB CON 0 ADDITIONAL MESSAGES ON NEW TRF
01022 M01S00118.ns2023 +++| RRUA CON 0 NUMBER MESSAGES ON OLD *CRF*
01023 M01S00119.ns2023 +++| RRUB CON 0 ADDITIONAL MESSAGES ON NEW *CRF*
01024 M01S00856.tafrec +++| RRUC DATA 30H REFORMATTING - XXXXXXX.
01025 M01S00857.tafrec +++| PRU SPACE 4,20
01026 M01S00858.tafrec +++|** PRU - PREALLOCATE RECOVERY UNIT.
01027 M01S00859.tafrec +++|*
Line S00860 Modification History
M01(Added by)
tafrec
M02(Updated by)
ns2023
Seq # *Modification Id* Act
----------------------------+
01028 M02S00860.ns2023 ---|* INITIALIZE A RECOVERY UNIT ON THE TRF. THE RECOVERY
01029 M01S00120.ns2023 +++|* INITIALIZE A RECOVERY UNIT ON THE *CRF*. THE RECOVERY
01030 M01S00861.tafrec +++|* UNIT NUMBER IS WRITTEN, FOLLOWED BY ZERO-FILLED, MESSAGE
01031 M01S00862.tafrec +++|* RECORDS.
01032 M01S00863.tafrec +++|*
01033 M01S00864.tafrec +++|* ENTRY (X1) = TERMINAL NAME.
01034 M01S00865.tafrec +++|* (X5) = FET ADDRESS.
01035 M01S00866.tafrec +++|* (B4) = TRANSACTION STEP.
01036 M01S00867.tafrec +++|* (CUID) = CURRENT ID.
01037 M01S00868.tafrec +++|*
01038 M01S00869.tafrec +++|* EXIT RECOVERY UNIT WRITTEN.
01039 M01S00870.tafrec +++|*
01040 M01S00871.tafrec +++|* USES X - 0, 1, 2, 3, 5, 6, 7.
01041 M01S00872.tafrec +++|* A - 0, 1, 6, 7.
01042 M01S00873.tafrec +++|* B - 5, 6.
01043 M01S00874.tafrec +++|*
01044 M01S00875.tafrec +++|* CALLS FRL, ZFB.
01045 M01S00876.tafrec +++|*
01046 M01S00877.tafrec +++|* MACROS MESSAGE, WRITEW.
01047 M01S00878.tafrec +++|
01048 M01S00879.tafrec +++|
01049 M01S00880.tafrec +++| PRU SUBR ENTRY/EXIT
01050 M01S00881.tafrec +++| SB5 PBUF
01051 M01S00882.tafrec +++| SB6 PBUFL
01052 M01S00883.tafrec +++| RJ ZFB ZERO FILL BUFFER
01053 M01S00884.tafrec +++| BX6 X1
01054 M01S00885.tafrec +++| SA6 PBUF+TRUNW STORE TERMINAL NAME
01055 M01S00886.tafrec +++| SX7 B4
01056 M01S00887.tafrec +++| SA7 PBUF+TRCSW STORE STEP
01057 M01S00888.tafrec +++| SA6 PRUA+2
01058 M01S00889.tafrec +++| SA6 PRUB STORE IN DUMMY DIRECTORY ENTRY
01059 M01S00890.tafrec +++| MESSAGE PRUA,B1 *B-DISPLAY* MESSAGE
01060 M01S00891.tafrec +++| WRITEW X5,PBUF,TRUWL WRITE RECOVERY UNIT HEADER
01061 M01S00892.tafrec +++| BX6 X6-X6
01062 M01S00893.tafrec +++| SA6 PBUF
01063 M01S00894.tafrec +++| SA6 A6+B1
01064 M01S00895.tafrec +++| SA1 CUID
01065 M01S00896.tafrec +++| SA1 TREC+X1
01066 M01S00897.tafrec +++| MX0 -12
01067 M01S00898.tafrec +++| LX1 24
01068 M01S00899.tafrec +++| BX2 -X0*X1 PRU-S IN USER MESSAGE RECORD
01069 M01S00900.tafrec +++| LX1 12
01070 M01S00901.tafrec +++| BX3 -X0*X1 NUMBER OF USER MESSAGE RECORDS
01071 M01S00902.tafrec +++| SX3 X3+B1 INCLUDE SECURE MESSAGE
01072 M01S00903.tafrec +++| IX0 X3*X2 PRU-S OF MESSAGE RECORDS
01073 M01S00904.tafrec +++| SX0 X0+MRIPL INCLUDE INITIAL INPUT MESSAGE
01074 M01S00905.tafrec +++| PRU1 WRITEW X5,PBUF,64
01075 M01S00906.tafrec +++| SX0 X0-1
01076 M01S00907.tafrec +++| NZ X0,PRU1 IF MORE TO WRITE
01077 M01S00908.tafrec +++| SA0 2 COMMENT=INITIALIZED
01078 M01S00909.tafrec +++| SX5 PRUB DIRECTORY ENTRY ADDRESS
01079 M01S00910.tafrec +++| RJ FRL FORMAT REPORT LINE
01080 M01S00911.tafrec +++| EQ PRUX RETURN
01081 M01S00912.tafrec +++|
01082 M01S00913.tafrec +++| PRUA DATA 30H INITIALIZING - XXXXXXX.
01083 M01S00914.tafrec +++| PRUB BSSZ RUDL DUMMY DIRECTORY ENTRY
01084 M01S00915.tafrec +++| RFH SPACE 4,20
01085 M01S00916.tafrec +++|** RFH - READ FILE HEADER.
01086 M01S00917.tafrec +++|*
Line S00918 Modification History
M01(Added by)
tafrec
M02(Updated by)
ns2023
Seq # *Modification Id* Act
----------------------------+
01087 M02S00918.ns2023 ---|* READ THE TRF HEADER RECORD AND CHECK FOR ANY ERRORS
01088 M01S00121.ns2023 +++|* READ THE *CRF* HEADER RECORD AND CHECK FOR ANY ERRORS
01089 M01S00919.tafrec +++|* WHICH WOULD PREVENT CORRECT AND CONSISTENT RECOVERY.
01090 M01S00920.tafrec +++|*
Line S00921 Modification History
M01(Added by)
tafrec
M02(Updated by)
ns2023
Seq # *Modification Id* Act
----------------------------+
01091 M02S00921.ns2023 ---|* ENTRY TRF FET SET UP.
01092 M01S00122.ns2023 +++|* ENTRY *CRF* FET SET UP.
01093 M01S00922.tafrec +++|*
01094 M01S00923.tafrec +++|* EXIT HEADER VALIDATED. TAF CHARACTERISTICS STORED.
01095 M01S00924.tafrec +++|*
01096 M01S00925.tafrec +++|* ERROR TO *ERR* IF I/O OR LOGICAL ERROR IN HEADER OR IF
01097 M01S00926.tafrec +++|* NUMBER OF MESSAGES OR MESSAGE SIZE DECREASED.
01098 M01S00927.tafrec +++|* (B5) = FWA OF ERROR MESSAGE.
01099 M01S00928.tafrec +++|*
01100 M01S00929.tafrec +++|* USES X - ALL.
01101 M01S00930.tafrec +++|* A - 1, 2, 3, 4, 6, 7.
01102 M01S00931.tafrec +++|* B - 2, 5.
01103 M01S00932.tafrec +++|*
01104 M01S00933.tafrec +++|* CALLS CES, FIO, SNM.
01105 M01S00934.tafrec +++|*
01106 M01S00935.tafrec +++|* MACROS RECALL.
01107 M01S00936.tafrec +++|
01108 M01S00937.tafrec +++|
01109 M01S00938.tafrec +++| RFH SUBR ENTRY/EXIT
01110 M01S00939.tafrec +++|
Seq # *Modification Id* Act
----------------------------+
01198 M02S01015.v23l617 ---| RFHA DATA C* MS REDUCTION INVALID - XXXXXXX.*
Line S01016 Modification History
M01(Added by)
tafrec
M02(Updated by)
v23l617
Seq # *Modification Id* Act
----------------------------+
01199 M02S01016.v23l617 ---| RFHB DATA C* NM REDUCTION INVALID - XXXXXXX.*
01200 M01S00008.v23l617 +++| RFHA DATA C* MS REDUCTION INCORRECT - XXXXXXX.*
01201 M01S00009.v23l617 +++| RFHB DATA C* NM REDUCTION INCORRECT - XXXXXXX.*
01202 M01S01017.tafrec +++| RFHC DATA C* CRF HEADER ERROR - XXXXXXX.*
01203 M01S01018.tafrec +++| BDR SPACE 4,50
01204 M01S01019.tafrec +++|** BDR - BUILD DIRECTORY OF RECOVERY UNITS.
01205 M01S01020.tafrec +++|*
Line S01021 Modification History
M01(Added by)
tafrec
M02(Updated by)
ns2023
Seq # *Modification Id* Act
----------------------------+
01206 M02S01021.ns2023 ---|* READ THE TRF AND CREATE A SORTED DIRECTORY OF
01207 M01S00133.ns2023 +++|* READ THE *CRF* AND CREATE A SORTED DIRECTORY OF
01208 M01S01022.tafrec +++|* RECOVERY UNITS. THE AUTOMATIC RECOVERY BIT IS SET IN THE
01209 M01S01023.tafrec +++|* TST FOR EACH ACTIVE RECOVERY UNIT, IF TAF WAS
01210 M01S01024.tafrec +++|* SHUT DOWN ABNORMALLY.
01211 M01S01025.tafrec +++|*
01212 M01S01026.tafrec +++|* DIRECTORY ENTRY FORMAT.
01213 M01S01027.tafrec +++|*
01214 M01S01028.tafrec +++|*T W1 42/TERMINAL,6/ TY,12/ STEP
01218 M01S01032.tafrec +++|*
01219 M01S01033.tafrec +++|* WORD 1.
01220 M01S01034.tafrec +++|* TERMINAL = TERMINAL NAME.
01221 M01S01035.tafrec +++|* TY = TRANSACTION TYPE.
01222 M01S01036.tafrec +++|* STEP = TRANSACTION STEP.
01223 M01S01037.tafrec +++|*
01224 M01S01038.tafrec +++|* WORD 2.
01225 M01S01039.tafrec +++|* I = TERMINAL INACTIVE FLAG.
01226 M01S01040.tafrec +++|* E = ERROR IN RECOVERY UNIT.
01227 M01S01041.tafrec +++|* D = *CDCS* MAY BE USED BY THE TRANSACTION.
01228 M01S01042.tafrec +++|* C = *CRM* MAY BE USED BY THE TRANSACTION.
01229 M01S01043.tafrec +++|* TSEQ = TRANSACTION SEQUENCE NUMBER.
01230 M01S01044.tafrec +++|* DA = RANDOM PRU ADDRESS OF RECOVERY UNIT.
01231 M01S01045.tafrec +++|*
01232 M01S01046.tafrec +++|* WORD 3.
01233 M01S01047.tafrec +++|* DATE = DATE OF LAST RECORDED TRANSACTION.
01234 M01S01048.tafrec +++|*
01235 M01S01049.tafrec +++|* WORD 4.
01236 M01S01050.tafrec +++|* TIME = TIME OF LAST RECORDED TRANSACTION.
01237 M01S01051.tafrec +++|*
01238 M01S01052.tafrec +++|*
Line S01053 Modification History
M01(Added by)
tafrec
M02(Updated by)
ns2023
Seq # *Modification Id* Act
----------------------------+
01239 M02S01053.ns2023 ---|* ENTRY (NMRU) = NUMBER OF RECOVERY UNITS ON OLD TRF.
Line S01054 Modification History
M01(Added by)
tafrec
M02(Updated by)
ns2023
Seq # *Modification Id* Act
----------------------------+
01240 M02S01054.ns2023 ---|* (NUMO) = NUMBER OF USER MESSAGES ON OLD TRF.
Line S01055 Modification History
M01(Added by)
tafrec
M02(Updated by)
ns2023
Seq # *Modification Id* Act
----------------------------+
01241 M02S01055.ns2023 ---|* (WPMO) = WORDS PER USER MESSAGE ON OLD TRF.
01242 M01S00134.ns2023 +++|* ENTRY (NMRU) = NUMBER OF RECOVERY UNITS ON OLD *CRF*.
01243 M01S00135.ns2023 +++|* (NUMO) = NUMBER OF USER MESSAGES ON OLD *CRF*.
01244 M01S00136.ns2023 +++|* (WPMO) = WORDS PER USER MESSAGE ON OLD *CRF*.
01245 M01S01056.tafrec +++|*
01246 M01S01057.tafrec +++|* EXIT (X6) = 0 IF REFORMAT NOT NECESSARY.
01247 M01S01058.tafrec +++|* (B5) = FWA OF ERROR MESSAGE IF ERROR.
01248 M01S01059.tafrec +++|* DIRECTORY BUILT.
01249 M01S01060.tafrec +++|* TO *ERR* IF I/O OR LOGICAL ERROR OR
01250 M01S01061.tafrec +++|* IF ACTIVE RECOVERY UNIT DELETED FROM NETWORK FILE.
01251 M01S01062.tafrec +++|*
01252 M01S01063.tafrec +++|* USES X - ALL.
01253 M01S01064.tafrec +++|* A - ALL.
01254 M01S01065.tafrec +++|* B - 2, 3, 4, 5.
01255 M01S01066.tafrec +++|*
01256 M01S01067.tafrec +++|* CALLS CES, FIO, RMR, SDR, SNM.
01257 M01S01068.tafrec +++|*
01258 M01S01069.tafrec +++|* MACROS MESSAGE, RECALL.
01259 M01S01070.tafrec +++|
01260 M01S01071.tafrec +++|
01261 M01S01072.tafrec +++| BDR SUBR ENTRY/EXIT
01262 M01S01073.tafrec +++| SA1 NMRU
01263 M01S01074.tafrec +++| SA0 X1 NUMBER OF RECOVERY UNITS
01264 M01S01075.tafrec +++| BX6 X6-X6 CLEAR ERROR FLAG
01265 M01S01076.tafrec +++| SA6 BDRE
01266 M01S01077.tafrec +++|
01267 M01S01078.tafrec +++|* COMPUTE PRU-S IN RECOVERY UNIT TO READ.
01268 M01S01079.tafrec +++|
Line S01080 Modification History
M01(Added by)
tafrec
M02(Updated by)
ns2023
Seq # *Modification Id* Act
----------------------------+
01269 M02S01080.ns2023 ---| SA3 NUMO NUMBER MESSGAES ON OLD TRF
Line S01081 Modification History
M01(Added by)
tafrec
M02(Updated by)
ns2023
Seq # *Modification Id* Act
----------------------------+
01270 M02S01081.ns2023 ---| SA5 WPMO WORDS PER MESSAGE ON OLD TRF
01271 M01S00137.ns2023 +++| SA3 NUMO NUMBER MESSAGES ON OLD *CRF*
01272 M01S00138.ns2023 +++| SA5 WPMO WORDS PER MESSAGE ON OLD *CRF*
01273 M01S01082.tafrec +++| BX6 X5
01274 M01S01083.tafrec +++| AX6 6 PRU-S PER MESSAGE
01275 M01S01084.tafrec +++| SX3 X3+B1 INCLUDE *SECURE* MESSAGE
01276 M01S01085.tafrec +++| IX6 X6*X3
01277 M01S01086.tafrec +++| SX6 X6+B1 INCLUDE RECOVERY UNIT HEADER
01278 M01S01087.tafrec +++| SX6 X6+MRIPL INCLUDE INITIAL INPUT
01279 M01S01088.tafrec +++| SA6 BDRA PRU-S PER RECOVERY UNIT
01280 M01S01089.tafrec +++| IX7 X3*X5 WORDS IN ALL MESSAGES
01281 M01S01090.tafrec +++| SX7 X7+MRIWL INCLUDE INITIAL INPUT
01282 M01S01091.tafrec +++| SA7 A6+B1
01283 M01S01092.tafrec +++| SX7 DIR START OF DIRECTORY
01284 M01S01093.tafrec +++| SA7 BDRD
Line S01094 Modification History
M01(Added by)
tafrec
M02(Updated by)
ns2023
Seq # *Modification Id* Act
----------------------------+
01285 M02S01094.ns2023 ---| SX5 TRF
01286 M01S00139.ns2023 +++| SX5 CRF
01287 M01S01095.tafrec +++| SX6 2
01288 M01S01096.tafrec +++| SA6 BDRC INITIALIZE DISK ADDRESS
01289 M01S01097.tafrec +++|
01290 M01S01098.tafrec +++|* READ RECOVERY UNITS. RECOVERY UNITS BEGIN AT PRU 2.
01291 M01S01099.tafrec +++|
01292 M01S01100.tafrec +++| BDR1 SX2 B1+ ONE PRU TO READ
01293 M01S01101.tafrec +++| SX1 CIORD
01294 M01S01102.tafrec +++| RJ FIO READ RECOVERY UNIT HEADER
01295 M01S01103.tafrec +++| RECALL X5 WAIT I/O
01296 M01S01104.tafrec +++| RJ CES
01297 M01S01105.tafrec +++| ZR X1,BDR4 IF NO I/O ERROR
01298 M01S01106.tafrec +++|
Line S01107 Modification History
M01(Added by)
tafrec
M02(Updated by)
ns2023
Seq # *Modification Id* Act
----------------------------+
01299 M02S01107.ns2023 ---|* AN I/O ERROR OR BAD DATA HAS BEEN DETECTED ON THE TRF.
01300 M01S00140.ns2023 +++|* AN I/O ERROR OR BAD DATA HAS BEEN DETECTED ON THE *CRF*.
01301 M01S01108.tafrec +++|* IF ERROR OVERRIDE HAS NOT BEEN SET, REPORT ERROR AND
01302 M01S01109.tafrec +++|* ABORT *TAFREC*.
01303 M01S01110.tafrec +++|
01304 M01S01111.tafrec +++| BDR2 SA1 OVRD
01305 M01S01112.tafrec +++| SA2 TERR
01306 M01S01113.tafrec +++| SX6 X2+B1 INCREMENT ERROR COUNT
01307 M01S01114.tafrec +++| SA6 A2
01308 M01S01115.tafrec +++| SA6 BDRE INDICATE REFORMAT NECESSARY
01309 M01S01116.tafrec +++| NZ X1,BDR11 IF ERROR OVERIDE SET