Deck BATCHIO

4 Modifications

Source

Seq #  *Modification Id* Act 
----------------------------+
00001  M01S00001.batchio +++|          IDENT  BIO1,RIO
00002  M01S00002.batchio +++|          ABS
00003  M01S00003.batchio +++|          ENTRY  BIO1
00004  M01S00004.batchio +++|          ENTRY  MFL=
00005  M01S00005.batchio +++|          SST
00006  M01S00006.batchio +++|          SYSCOM B1
00007  M01S00007.batchio +++|*COMMENT  BATCHIO - BATCHIO RECOVERY PROCESSOR.

Line S00008 Modification History
`M01` (Added by)	`batchio`
`M02` (Updated by)	`281l803`

Seq #  *Modification Id* Act 
----------------------------+
00008  M02S00008.281l803 ---|          COMMENT COPYRIGHT CONTROL DATA CORP. 1980.
00009  M01S00001.281l803 +++|          COMMENT  COPYRIGHT CONTROL DATA SYSTEMS INC.  1992.
00010  M01S00009.batchio +++|          SPACE  4,10
00011  M01S00010.batchio +++|***       BIO1 - BATCHIO RECOVERY PROCESSOR.
00012  M01S00011.batchio +++|*         P. D. HAAS.        80/01/07.
00013  M01S00012.batchio +++|          SPACE  4,10
00014  M01S00013.batchio +++|***              BIO1 INITIATES RECOVERY OPERATIONS FOR BATCHIO
00015  M01S00014.batchio +++|*         FOLLOWING A LEVEL 3 DEADSTART.
00016  M01S00015.batchio +++|          SPACE  4,10
00017  M01S00016.batchio +++|***       DAYFILE MESSAGES.
00018  M01S00017.batchio +++|*

Line S00018 Modification History
`M01` (Added by)	`batchio`
`M02` (Updated by)	`v23l617`

Seq #  *Modification Id* Act 
----------------------------+
00019  M02S00018.v23l617 ---|*         * ILLEGAL CONTROL CARD.* - *BIO1* WAS CALLED FROM
00020  M01S00001.v23l617 +++|*         * INCORRECT COMMAND.* - *BIO1* WAS CALLED FROM
00021  M01S00019.batchio +++|*         NON SYSTEM ORIGIN JOB.
00022  M01S00020.batchio +++|          SPACE  4,10
00023  M01S00021.batchio +++|*CALL     COMCMAC
00024  M01S00022.batchio +++|*CALL     COMSBIO
00025  M01S00023.batchio +++|          TTL    BATCHIO RECOVERY PROCESSOR.
00026  M01S00024.batchio +++|          TITLE
00027  M01S00025.batchio +++| RIO      SPACE  4,10
00028  M01S00026.batchio +++|          ORG    BUFR+QFFL
00029  M01S00027.batchio +++|
00030  M01S00028.batchio +++| RIO      SB1    1
00031  M01S00029.batchio +++| BIO1     EQU    RIO
00032  M01S00030.batchio +++|          SA3    JOPR        GET JOB ORIGIN
00033  M01S00031.batchio +++|          MX6    -12
00034  M01S00032.batchio +++|          LX3    -24
00035  M01S00033.batchio +++|          BX3    -X6*X3
00036  M01S00034.batchio +++|          IFNE   SYOT,0,1
00037  M01S00035.batchio +++|          SX3    X3-SYOT
00038  M01S00036.batchio +++|          NZ     X3,RIO2     IF NOT SYSTEM ORIGIN
00039  M01S00037.batchio +++|          GETJCR RIOA        READ JOB CONTROL REGISTER
00040  M01S00038.batchio +++|          SX1    RIOB
00041  M01S00039.batchio +++|          SA4    RIOA        CHECK ERROR FLAG
00042  M01S00040.batchio +++|          AX4    36
00043  M01S00041.batchio +++|          NZ     X4,RIO1     IF NOT DEADSTART RECOVERY
00044  M01S00042.batchio +++|          SYSTEM SPC,,X1     CALL *1IO*
00045  M01S00043.batchio +++| RIO1     ENDRUN
00046  M01S00044.batchio +++|

Line S00045 Modification History
`M01` (Added by)	`batchio`
`M02` (Updated by)	`v23l617`

Seq #  *Modification Id* Act 
----------------------------+
00047  M02S00045.v23l617 ---| RIO2     MESSAGE RIOC,0,R   * ILLEGAL CONTROL CARD.*
00048  M01S00002.v23l617 +++| RIO2     MESSAGE RIOC,0,R   * INCORRECT COMMAND.*
00049  M01S00046.batchio +++|          ABORT
00050  M01S00047.batchio +++|
00051  M01S00048.batchio +++| RIOA     CON    0
00052  M01S00049.batchio +++| RIOB     VFD    18/0L1IO,42/DRET

Line S00050 Modification History
`M01` (Added by)	`batchio`
`M02` (Updated by)	`v23l617`

Seq #  *Modification Id* Act 
----------------------------+
00053  M02S00050.v23l617 ---| RIOC     DATA   C* ILLEGAL CONTROL CARD.*
00054  M01S00003.v23l617 +++| RIOC     DATA   C* INCORRECT COMMAND.*
00055  M01S00051.batchio +++|          SPACE  4,10
00056  M01S00052.batchio +++|**        COMMON DECKS.
00057  M01S00053.batchio +++|
00058  M01S00054.batchio +++|
00059  M01S00055.batchio +++|*CALL     COMCCPM
00060  M01S00056.batchio +++|*CALL     COMCSYS
00061  M01S00057.batchio +++|          SPACE  4,10
00062  M01S00001.batch1  +++|          USE    BUFFERS
00063  M01S00058.batchio +++| MFL=     BSS    0

Line S00059 Modification History
`M01` (Added by)	`batchio`
`M02` (Updated by)	`241l630`

Seq #  *Modification Id* Act 
----------------------------+
00064  M02S00059.241l630 ---|          ERRPL  MFL=-RIO-BBFL  CODE OVERFLOWS MINIMUM BUFFER SIZE
00065  M01S00001.241l630 +++|          ERRPL  MFL=-RIO-BBFL*100  CODE OVERFLOWS MINIMUM BUFFER SIZE
00066  M01S00060.batchio +++|          SPACE  4,10
00067  M01S00061.batchio +++|          END