SY33 8553 4_DOS_VSE_Logical_Transients_and_Dump_Phases_PLM_Feb79 4 DOS VSE Logical Transients And Dump Phases PLM Feb79
SY33-8553-4_DOS_VSE_Logical_Transients_and_Dump_Phases_PLM_Feb79 SY33-8553-4_DOS_VSE_Logical_Transients_and_Dump_Phases_PLM_Feb79
User Manual: SY33-8553-4_DOS_VSE_Logical_Transients_and_Dump_Phases_PLM_Feb79
Open the PDF directly: View PDF .
Page Count: 298
Download | |
Open PDF In Browser | View PDF |
5Y33-8553-4 File No. 5370/S4300;36 OOSIV~E Logical Transients Systems and'OUrnp Phases Logic Progralll NUrffllers .~~tt --- § -=-= :::: -=== -: ===-=====-= ':" = 5745-SC-CKR 5745-SC-AIT 5745-SC-DOC Summary of Amendments Edition SY33-8553-4 documents: 'f New processor support I: New device support 3278 Model 2A Display Conso·le 8809 Magnetic Tape Unit PBT1 printers (3289 Model 4 r and 3203-5) 3284/3286/3287 console printer • Dumps in SVA and extended storage dumps • Deletion of obsolete supervisor options • DASD volume recognition by means of new VOLUME command • Mode setting for the 8809 Magnetic command T~pe unit by means of new SETMOD The logic of the Checkpoint/Restart routines is now include~. in this publication. In the library of DOS/VS, the log1c of these routines is documented in the LIOCS Volume 1 Logic manual. f~t~h ~~i~iQ~ (February, 1979) This is a major revision ot, and obsoletes, SY33-85S3-3 and Technical Newsletter SN33-9236. This eaition applies to the IBM Disk Operating System/Virtual Storage Extended, DOS/VSE, and to all subsequent releases until otherwise indicated. Cbanyes and ~dditions to the text or illustrations are indicated by a vertical line to the left of the cnange. Changes are continually made to the information herein; before using this publication in connection with the operation of IBM systems, consult the latest !~~ ~E2~~!LJIQ ~~g~iQg£!EhE' GC20-0001, for the editions that are applicable and current. Requests fo~ cop1es of IBM publications should be made to your IBM representative or to the IBM branch office serving your locality. A form for readers' comments is provided at the back of this publication. If the form has been removed, comments may be addressed to IBM Laboratory, Publications Department, Schoenaicher Strasse 220, 0-7030 Boeblingen, Germany. IBM may u~e or distribute any of the information you supply in any way it believes appropriate without iacurring any obligation whatever. You may, of course, continue to use the information you supply. e .Copyright International Business Machines Corporation 197J, 1975, 1977, 1919 This Program Logic Manual (PLM) is a detailed guide to the IBM DOS/VSE logical transient programs .. It supplements the program listings by providing descriptive text and flowcharts. The lists that follow give the titles of companion system control PLMs and prerequisite publications. • • prerequisite to the effective use of the PLMs are the following publications: • IB~ ~Y2tem/J70 PriQ£!E!~ 2! Q£~g~iQ~, GA22-7000,. For overall system control logic description, this PLM is to be used witk the following PLMs: • QOS/!~~ ~££Q£ ~g~g£y gnd ~g£2~ging !£ggsi~12 1Qgi£, SY33-8552_ • • • Introg~£tiQ~ 12 DOS/VSE, GC33-5370. QQS/VS~ ~steJ!! MaQggem~Q1 §.yide, GC33":'53'71 .. DOS/V~~ Q~1g l1~g~J!!~1. COQcepts GC24-51138. • • • Titles and abstracts of other related publications are listed in the J~~ ~Y21§!!LJ.!H~ Bi!!!iQ.~Y, GC20- 0 0 01 ,e r----------------------------------------------------------------------~ In this publication, system and component names as listed below should be read as indicated: System/component name To be read as DOS/VS ECPS:DOS/VS DOS/VS POWER/VS-E DOS/VS VSAM-E DOS/VSE (see Note below) ECPS:VSE VSE/POiiER VSE/VSAM Note: Unless that name explicitly refers to DOS/VS Release 34 or an earlier DOS/VS release~ L----------------------------------------------------------------------~ 3 INTRODUCTION • • • a _ Logical Transients _ • Non-CRT Transients • _ _ CRT Transients • • • • _ Grouping of B-Transients Dump Phases. • ~ • • _ • _ .. • • _ A • LOGICAL TRANSIENT SUPERVISOR CALLS ATTENTION ROUTINES • .• 111 • • 11 . . . .• 11 .11 ..11 ..111 ~ ... 16 ~ .31 TEBMINATOh ROUTINES .• VABIOUS SPECIAL SERVICE PhOGRAMS Loading Print Control Buffers. • • • • • • • • .• ,. • • .. .• • $$BS YS WR .• .. .. • . . . . $$BCCfiHR .. • • • • _ - _ _ _ $$BPCLOS - Automatic Close for 3800 printer Files. • .•.• 37 .37 .. 38 .• 38 ...38 DISPLAY OPERATOR CONSOLE SUPPORT _ • • .. _ _ ~ • _ _ ~ .. .. 40 ChT Transient Logical Interrelationship. _ • • • .. 40 Differences Between CRT Support and 1052 Support ... _ .. 40 $$BOCliTA - CRT Root Phase. .. .. _ • ~ ~ ~ .48 $$BOCRTB - Hard-CoPY Disk ERP. • _ • ... ... _ .• 48 .• 48 $$BOCRTC - Write Processor (Part 1 of 2) ",49 $$BOCRTD - write Processor (Part 2 of 2) .. 50 $$BOCRTE - CRT ERP (Part 1 of 2) $$BOCRTF - CRT ERP (Part 2 of 2) .. 50 $$BOCRTG - write Screen Message.. • ..... .. 511 $$BOCRTH - Write Hard-Copy Records • ~ .. '" .. .. • 5~ .55 $$BOCliTI - Write on 3284/3286/3281/3288 SYSLOG Printer $$BOCRTK - Command Entry Processing. _ _ ~ • _ .. 55 $$BOCRTL - Deletion by K-Command • ~ _ • .. • .. • .. _ _ .. 55 $$BOCRTM - Deletion by Cursor. • • • _ • _ . ~ • • • • .55 .56 $$BOCRTN - Screen Management Mode Specification. $$BOChTO - Line Number Display • • • ..56 $$BOCRTP - Exit Interface. • • _ • ... .. 56 .. 57 $$BOCBTQ - Deletion of Message Lines .5'J $$BOCRTR - Read Processor (Part 1 of 3). .. 57 $$BOCRTS - Read Processor (Part 2 of 3) . . . . . . . .58 $$BOCRTT - Read Processor (Part 3 of 3). . . . . 58 $$BOCRTU - Update Hard-Copy File wrap-Around Address • • .• .• .58 S$BOCRTV Command Error Message Writer. • • .. • ~ .. .. 59 $$BOCRTW - Warning During Non-Automatic Deletion Mode. $$BOCRTX - Verification ot Operator Commands during Message Dele~ion~ • .. • .. _ • • _ • ... ~ _ ~ ... .. .. • .. • ... _ • • .59 .59 $$BOCRTY - Handling'of M~ssag~s Longet than Eight Lin~s~ $$BOCRTZ Channel Program Analyzer. .. _ _ • .60 .. 60 $$BOCRT~ - Message Redisplay (Part 1 of 6) ~60 $$BOCRT2 - Message Red~splay (Part 2 of 6) .61 $$BOCRT3 - Message Redisplay (Part 3 of 6) • $$BOC#T4 - Message Redisplay (Part 4 of 6) -'... .61 .. 6·1 $$BOCRT5 - Message Redisplay (Part 5 of 6) .62 $$BOChT6 - Message Red~splay (Part 6 of 6) ... .. CHECKPOINT/RESTAltT ROUTINES... .• ,. • .• .. • Chec~point • • • .. • • • • • .. CHKPT Macro. _ ... ... • • - .Checkpoint Routines (see Chart 23) • Restart. .• .• .. • .• '. • • • • .. .. .. • • • .• Restart Routines (see Chart 23) • • 4 ... 63 .63 .• 63 .64 .65 ..65 $$BCHKPT $$BCHKP2 $$BCHKP3 $$BCHKPD $$BCHKPE $$BCHKPt $$BCHKPG $$BCHK3G $$BRMSG1 $$BRSTRT $$BRSTR2 $$BRMSG2 ,. 67 - Tape Checkpoint Phase ~ ~ - Tape Checkpoint Phase 2 • ~ ~ - Tape Checkpoint Phase 3 - Disk Checkpoint Phase l • _ • -Disk Checkpoint Phase 2 _ .. _ • • • • _ - Disk Checkpoint Phase 3 .. • _ ~ • • _ ~ - Disk Che~kpoint Phase 4 • • _ • • • • • - Tape and DisK Checkpoint, Last Phase. - Checkpoint Message writer _ • • ~ - Rest~re Checkpointed Partition. Tape and DASD Verification. .• 'at •• - Restart Message Writer. EXPLANATION OF FLOWCHART SYMBOLS :.69 .• 70 ,.71 .. 71 ."(12 ..72 .• il3 .• 73 ..73 .il4 .75 • .76 A .77 CHARTS ,. APPENDIX A: ERROR MESSAGE CROSS REFERENCE APPENDIX B: TOTAL MESSAGE CROSS-REPERENCE LIST. _ 280 APPENDIX C: LABEL LIST. 2811 INDEX •.• .. Ii> • • 211i1 291 5 Figure 1~ Layout of the Logical Transi~nt Area containing the Attention Routines • • • ~ • • • ~ .. __ ~ ~ .. _ •• ~ .. 16 Figure 2 .• Layout of Communication Areas in $$BATfN8 and $$BATTN9 • 29 Figure 3.• ~ayout of Parameter Address Tables in $$BATTN8 and $$BATTN9 • ~ ~ • .. ~ .. a • • ~ ~ ~ ~ 30 Figure 4. Layout of Parameter Value Tables in $$BATTN8 and $$BATTN9 .' ~ • __ .. ~ .. _ • • __ .' _ ... _ 30 Figure 5,. Error Code Byte in $$BATTN8 and $$BATTN9 ~ • • 30 Figure 6.• Cancel Codes and ftessages '-..... • 35 Figure Layout of the LFCS ftacro Information Area.. • 4 7,~ • • •• •• • Figure 8.• Layout of LFCB ftacro Communication Area. Figure 9.. CRT ftessageFormat Figure ~O_ Screen Control Table (SCT) Entry Figure ~1. Hard CoPY. Control Flags. Figure 12. Hard-Copy File .. 38 .• • 49 ~ Format~ ....... 37 ~ • 49 .. 52 • • .. ,. .• • 53 .. Figure 13. Information Field Generated· by CHKPT ftacro .• Figure 14. Checkpoint Bea.der and' Save Record Format Figure 15. Format of Extent Information Record .• . . ,. .. .. . .... .. 6 .' 68 • ,70 .• Figure 16. Format of PFIX Information Record .• Figure 17. Format of 3800-Printer Information Record .• 64 . 70 70 2.~ne£.5!! £hy:!:§ Chart Chart Chart Chart Chart Chart Chart Chart Chart Chart Chart Chart Chart Chart Chart Chart Chart Chart Chart Chart Chart Chart Chart 01,. 02. 03,. 04,. 05,. 06. Chart Chart Chart Chart Chart Chart AA,. AB .. AC,. AD,. AE .. AF. OJ. 08. 09 .• 10,. 11,. 12,. 13,. il4,. 15,. 16 .• 17. 18. 19,. 20. 21. 22,. 23,. Overview of Supervisor Entry into Attention Transients Logical Transient Attention Routines ('part 1 of 10) Logical Transient Attention Routines (Part 2 of 10) Logical Transient Attention Routines (Part 3 of 110) Logical Transient Attention Routines (Part 4 of 10) Logical Transient Attention Routines (Part 5 of riO) Logical Transient Attention Routines (Part 6 of 10) Logical Transient Attention Rout~nes (Part '11 of 10) Logical Transient Attention Routines (Part 8 of 10) Logical Transient Attention Routines (Part 9 of 10) Logical Transient Attent~on Routines (Part itO of 10) .. Terminator Routines (Part 1 of 3) Terminator Routines (Part 2 of 2) Terminator Routines (Part 3 of 3) LFCB Macro Processor , CRT Root Phases CRT write Processor Phases ,e CRT Read Processor Phases CRT Screen Management Phases (Part ~ of 2) CRT Screen Management Phases (Part 2 of 2) CRT Redisplay Phases CRT ERP Phases , Checkpoint/Restart Routines . · ". . · . ,. . . . ..· ' . ,. ,- .. . A .. ,. . · . . .. . . -, .. '. .. . ,. .... $$BATTNA - Attention Root Phase .. .. _ ~ .. $$BATTNA - Control Routine $$BATTNA - Error Message Routines $$BATTNA - General Scan Routines $$BATTNB - MSG Command ~roces~or $$BATTNB - Set Operator Communications and Exit Linkage .. .. .. .. $$BATTNC - CANCEL Command Proces~or (Part 1 of 2) $$BATTNC - CANCEL Command Processor (Part 2 of 2) and NE~VOL Command ProcessQr .. • .. .. $$BATTNC - PAUSE, LOG, NOLOG, and IGNORE Command Processor • .. ... .. • .. .. .• • • .• .. .. • .. .. ,. ,. .. • .. '. • $$BATTND - MAP Command Processor (/370-Mode) $$BATTNI - MAP Comma~d Processor (ECPS:VSE-Mode) $$BATTNE - ALLOC/ALLOCR'Command Processor (Part II of 2J $$BATTNE - ALLOC/ALLOCR Command Processor (Part 2 of 2) $$BATTNE - SIZE Command Processor (Part II of 2) $$BATTNF - SIZE Command Processor (Part 2 of 2) $$BATTNG - BATCH and START Command Processor (Part 1 of 2) ,. • .... ,. ,. ,. ,. • .. '. .. .. _ .... $$BATTNG - BATCH and START Command Processor (Part 2 of 2) .. .. .. .. ,. .• .. .• ,. • • ... ,. .• ,. ,.. $$BATTNH - Command Scanner . . . . . . . . . . . . . • .. $$BATTNO - VOLUME Command P,rocessor ,. .. '. • $$BATTNQ - MODE Command Parameter Processor $$BATTNR - MODE Command Status Report Processor $$BATTNS - MODE Command Validity Checker (Part 1 of 2). $$BATTNS - MODE Command Validity Checker (Part 2 of 2) .. $$BATTNT - ALTER Comm~nd Processor (part 1 of 2)~ $$BATTNT - ALTER Command Processor (Part 2 of 2) .. .. $$BATTNU - DSPLY Command Processor (Part 1 of 2) .. .. $$BATTNU - DSPLY Command Processor (Part 2 of 2) .. . $$BATTNV - DUMP Command Scan Boutine (Part 1 of 4) .. A Chart AG,. Chart AB. · "4O". .. • .. .. .. il7 78 79 80 811 82 83 84 A Chart AJ,. Chart Chart Chart Chart Chart Chart Chart AK. AL,. AM,. AN. AP,. AQ .• AR.. Chart AS,. Chart Chart Chart Chart Chart Chart Chart Chart Chart Chart Chart AT. AU. AV,. AW .• AX .. AY .. BA .• BB.• BC,. BD. BE .. 118 19 20 211 22 23 24 25 26 27 28 32 33 34 39 41 42 43 44 45 '46 47 66 .~ 85 86 87 88 89 90 9~ 92 93 94 95 96 97 98 99 .100 .101 .1102 .103 ,.104 7 Chart Chart Chart Chart Chart BF .• BG. BH,. BJ .. BK,. Chart Chart Chart Chart Chart Chart Chart Chart BL .• BM .• BN,. BP,. CA. CR. CC. CD .• CFa CG:. CH. CJ,. CK .• CL. CM .• CN .. CP .. CQ,. CR. CS. CT. CU .• cv. DA. Chart DB. Chart DC. .. . 8 DD. DE:. OF,. DG,,. DH .• DJ ..• DK .. DL,. OM,. DN,~ EA .. EB .• EC .• ED. EF .• EG. EH,. EJ. EK .. EL .• EM .. EN ... EP. EQ .. ER,. ES,. ETA EU,.. EV .. EW. . .. . .. . ,. . .. .. ,. ,. ,. .. . .. . .. ,. . . .. .. . ,. .. . .. . .. , - .• . •w .·. .. .. .. .• ,. .. . .. .. .. - r . . ,W ' - ,. ,. . .. .. . · .. , . .• . '. ,. . ,. ,. ,. .. . . ,.o Chart Chart Chart Chart Chart Chart Chart Chart Chart Chart Chart Chart Chart Chart Chart Chart Chart Char:t Chart Chart Chart Chart Chart Chart Chart Chart Chart Chart Chart Chart .. 105 .106 .. 107 .108 - Chart CE .• Chart Chart Chart Chart Chart Chart Chart Chart Chart Chart Chart Chart ch,a,rt Chart Chart Chart $$BATTNV - DUMP Command Scan Rout~ne (Part 2 of 4) .. $$BATTNV DUMP Command Scan Routine (Part 3 of 4) .. $$BATTNV - DUMP Command 'Scan Routine (Part 4 of 4) .. $$BATTNY - CE MODE Command Processor , $$BATTNZ - 115/125/135/138 or 4300 MODE Command Processor , $$BATTN2 - PRTY and TPBAL Command Processor (Part 1 of $$BATTN2 PRTY and TPBAL Command Processor (Part ~ of $$BATTN2 - PRTY and TPBAL Command processor (Part 3 of , $$BATTN3 - ENDSD Command Processor $$BATTN8 - LFCB Command Processor 1 (Part 1 of 2) $$BATTN8 - LFCB Command Processor 1 (Part 2 of 2) $$BATTF1 - LF'CB Command Processor 2 ,. .- .. -- . $$BATTF4 - FCB Load Execution for 3203 and 5203 (Part 1 of 2) , . .. -$$BATTF4 - FCB Load Execution for 3203 and 5203 (Part 2 of 2) .,w $$£ATTF5 - FCB Load Execution for PRTiI ... $$BATTN9 LUCB Command Processor 1 . (Part 1 of 2) $$BATTN9 - LUCB Command ProcessOr ,.. (Part 2 ' of 2) $$BATTU1 LUCB Command Processor 2 $$BATTU2 - UCB Load Function ... $$BATTN7 - SETDF Root Phase (Part :I of 6) $$BATTN7 - SETDF Root Phase (Part 2 of 6) $$BATTN7 - SETDF Root Phase (Pari 3 of 6) ,w $$BATTN7 - SE'l'DF Root Phase (Part 4 of 6) $$BATTN7 SETDF Root Phase (Part 5 of 6) $$BATTN7 - SETDF hoot Phase (Part 6 of 6) $$BATTS1 SETDF Up,late Pilase (Part 1 of 3) $$BATTSl - SETDF Update Phase (Part 2 of 3) $$BATTS1 SETDF Update Phase (Part 3 of 3) $$BATTS2 SETDF Error Phase $$BEOj - Terminate Task and Initialize Partition , (Part 11 of 3) . ... , $$BEOJ - Terminate Task and Initialize Partition , (Part 2 of 3) ,e ... " $$BEUJ - T~rm~nate r:lsk and Initia1ize Partition ,.; . . "" . (Part.3 of 3) ,w $$BEOJ3 - Decide Next Step in Tel: D1ina tion Handling' $$BEOJ3A.- Quiesce I/O for T/P Devices $$BEOJ4 - Clean up Non:"TP I/O Devices (Part 1 of' 3) $$BEOJ4 - Clean up Non-TP I/O Devices (Part 2 of 3) $$BEOJ4 - Clean up Non-T.P I/O Devices (Part 3 of 3) $$BACLOS VSAM Automatic Close (Part 1 of' 2) $$BACLOS - VSAM Automatic Close (Part 2 of 2) $$BEOJ7 - Tape and Disk PUB2 Processor (Part' 1 of 3) $$BEOJ7 - Tape and Disk PUB2 Processor (Part 2 of 3) $$BEOJ7 - Tape and Disk PUB2 Processor (Part 3 of 3) IJBSDUMP - Dump Monitor (Part 1 of ~3) ,. a IJBSDUMP - Dump Monitor (Part 2 of 13) IJBSDUMP - Dump Monitor (Part 3 of 13.) ,. IJBSDUMP - Dump Monitor (Part 4 of 13) IJBSDUMP Dump Monitor (Part 5 of 13) IJBSDUMP Dump Monitor (Part 6 of 13) IJBSDUMP - Dump Monitor (Part 7 of 113) ,e IJBSDUl1P Dump Monitor (Part 8 of 13) IJBSDUMP - Dump Monitor (Part 90f ~ 3) IJBSDUMP - Dump Monitor (Part 10 of 13) e IJBSDUMP - Dump Monitor (Part 111 of 13) IJBSDUMP - Dump Monitor (Part 112 of 113) IJBSDUMP - Dump Monitor (Part 13 of 13) IJBDMPPA Dump Supervisor Control Blocks (Part i1 of 2) IJBDMPPA - Du~p Supervisor Control Blocks (Part 1 of 2) , .- ... storage Dump Routine (Part 1 of 5) IJBDMPAR IJBOMPAR - Storage Dump Routine (Part 2 of 5) IJBDMPAR - Storage Dump Routine (Part 3 of 5) IJBDMPAR -, Storage Dump Routine (Part 4 of 5) IJBDMPAR - storage Dump Routine (Part 5 of 5) · .. .. .' ." · .. .. - · ,. . ,.- I. .. ,. · ... .. ·.. , - - . ,. .. . .. ..· .. .. ·. ,.117 .118 1 i19 .120' ,~ ""iI~l .. 122 .123 w124 .125 .126 .. 1~7 .128 . · .130 ,. ,. .. .. .. .. - ,. ,. .. .. .. ,. . .. ,. .. ,. . · .. . . ,. .. . · .. . . , 3) !t 11 3) 112 .. 113 .• 114 ;.115 .116 .. il29 , '. ' .109 3) 110 .. .. ·· ·· · · · . .. .. .13~ ",132 .133 ,,134 .. 135 ,.136 .. 137 .138 .. 139 .1140 .141 .142 :'143 ~144 .145 .146 .. 147 ",,148 ,.149 .150 .1151 .. 152 .• 1153 .154 ,.155 .156 .157 .. 1158 .159 .1160 ,:. i16~ .. 162 .1163 .164 ..165 ,. '166 Chart Chart Chart Chart Chart Chart Chart Chart Chart Chart Chart Chart FA .• FB .• FC .. E'F ... EG .• FH. FJ. FK .. l'P" E'Q. f'R. GG. Chart Chart Chart Chart Chart Chart Chart Chart Chart Chart Chart Chart Chart Chart Chart Chart Chart Chart Chart Chart Chart Chart Chart Chart Chart Chart Chart Chart Chart Chart Chart Chart Chart Chart Chart Chart Chart Chart Chart Chart Chart Chart Chart Ch'art Chart Chart Chart Chart Chart Chart Chart Chart Chart Chart Chart GJ. GK. GL'O GM.o GN.'O KA. KB. KC.o KD. KE. KF. KG .. KH .• KJ. KK.o LA. LB .• LC. LD. LE. LF~ LG. LH. LJ. LK. MA .• MB. MC. MD. ME. MF~ MG .• MH. MJ. MK. liL .. MM .• MN .• MP. NA~ NB. NC. ND. NE. NF,. NG .. NH .• NJ. NK. PA .• PB .• PC. PD .• PE ... PFoO - System Du,mp I/O Routine (Part 11 of 3) IJBDMPIO IJBDMPIO - System Dump 1/0 Routine (Part 2 of 3) IJBDMPIO - System Dump I/O Routine (Part 3 of 3) ,e '" IJBDMPIC - DUMP Command I/O i\outine (Part 1 of 5) IJBDMPIC - DUMP Command I/O Routine (Part 2 of 5) IJBDMPIC DUME Command I/O lioutine (Part 3 of 5) IJBDMPIC - DUMP Command 1/0 Routine (Part 4 of 5) IJBDMPIC DUMP Gommand riO houtine (Part 5 of' 5) IJBEOJ - Cancel Message Writer (Part 1 of 3) IJBEOJ - Cancel Message Writer (Part 2 of 3) IJBEOJ - Cancel Message .Writer (Part 3 of 3) $$BSYSWR - Set up a Write on SYSRES OpEration; Move Laoel Cylinder Address to COMREG . $$BCCHHlt .. Core Image Directory Scan " , $$BATTF'O FCB Load Initiation ..o $$BATTF2 LFCB Macro Execution for PRTl $$BATTF2 LFCB Macro Execution Subroutines $$BATTF3 LFCB Macro Execution for 3203 and 5203 $$BOCliTA - CRT Root Phase (Part 1 of 3) .• " $$BOCRTA - CRT Root Phase (Part 2 of 3) " " $$BOCRTA - CRT Root Phase (Part 3 of 3) .. $$BOCItTB Hard-Copy Disk EliE (Part 1 of 3) " $$BOCRTB - Hard-Copy Disk ERP (Part 2 of 3) $$BOCItTB - Hard-Copy Disk ERP (Part 3 of 3) $$BOCi\TC - Write Processor J:'art 1 (Part 1 of 4) $$BOCRTC - write Processor Part 1 (Part 2 6f 4) $$BOCRTC Write Processor Part 1 (Part 3 of 4) $$BOCRTC - write Processor Part 1 (Part 4 of 4) $$BOCRTD Write Processor Part 2 (Part 1 of 3) .$$BOCRTD write Processor J:'art 2 (Part 2 of 3) $$BOCRTD Write Processor Part 2 (Part 3 of 3) ~ $$BOCliTE CRT BItP Part 1 (Part 1 of 3) $$BOCRTE - CRT ERP Part J (Part ). of 3) ... . ,'O $$BOCRTE CRT ERP Part 1 (Part 3 of 3) $$BOCRTF - CRT ERP Part 2 (Part 1 of 4) ... $$BOCRTF - CRT ERP Part 2 (Part 2 of 4) $$BOCRTF - CRT ERP Part 2 (Part 3 of 4) $$BOCRTF CRT EiLP Part 2 (Part 4 of 4) $$BOCRTG - Mirite Screen Message (Part 1 of 3) $$BOCltTG Write Screen Message (Part 2 of 3) . $$BOCRTG - Write Screen Message (Part 3 of 3) $$BOCRTH Write Hard-Copy Records (Part 1 of 3) $$BOCRTH - Write Hard-Copy Records (Part 2 of 3) $$BOCRTH - Write Hard-Copy Records (Part 3 of 3) $$BOCRTI - Write on 3284~3286/3287/3288 Console Printer $$BOCRTK - Command Entry Processor (Part 1 of 4) $$BOCRTK - Command Entry Processor' (Part 2 of 4) $$BOCRTK Command Entry Processor (Part 30t 4) $$BOCRTK Command Entry Processor (Part 4 of 4) $$BOCRTL Deletion by K-Command (Part 1 of 3) $$BOCRTL - Deletion by K..!..Command (Part 2 of 3) ,. $$BOCRTL Deletion by K-Command (Part 3 of 3) $$BOCRTM - Deletion by Cursor ~ . ... $$BOC1i.TN Screen Management Mode (Part :t of 3) $$BOCRTN Screen Management Mode (Part 2 of 3) $$BOCRTN Screen Management MOCle (Part 3 of 3) $$BOCRTO Line Number, Display (Part 1 of 2) $$BOCRTO - Line Number Di$play (Part 2 of 2) $$BOCRTP Exit Interphase (Part 1 of 2) $$BOCRTP - Exit Interphase' (Part 2 of 2) $$BOCRTQ Deletion of Message Lines (Fart 1 of 2) $$BOCRTQ - Deletion of Message Lines (Part 2 of 2) Read Processor Part·, (Part 1 of 3) $$BOCRTR $$BOCRTR - Read Processor Part 1 (Part 2 of 3) . $$BOCRTR - Read Processor Part i'l (Part 3 of 3) $$BOCRTS Read Processor Part 2 (Part 1 of 3) ... $$BOCRTS - Read Processor Part 2 (Part 2 of 3) $$BOCRTS Read Processor Part 2 (Part 3 of 3) .• - · · .. - . . . .. · . .• · .oO .. · .. · · · .. · .. ,. .. - - .. .• .. · . · · .. · .. .. .. .• .. · - - - .• .• . .. . · · . · .. . • . .. · · '. - .• . · ,. · .. .. · .. .. ... 167 .• 168 .169 .• 170 :.17.1 _17~ .:'173 .174 .175 :'176 .• 1717 .. 178 .179 .180 .181 .. 182 .183 .. 184 ... 185 .. 186 .187 .188 .189 .190 ':'191 .192 .193 .194 .'195 .196 .197 .198 .199 .200 ... 201 .. 202 .203 .• 204 .. 205 ;.206 ;.207 .208 :'209 .210 .~11 _21~ .213 ~2tJ4 .215 .216 .. 217 .• 218 .. 219 .220 .. 221 .222 .. 223 .224 .~225 .. 226 .227 .. 228 .. 229 .. 230 .231 .232 ;.233 9 Chart Chart Chart Chait Chart Chart Cha:r;:t Chart Chart Chart Chart Chart Chart Chart Chart Chart Chart Chart Chart Chart Chart Chart Chart Chart Chart CHart Chart Chart Chart Chart Chart Chart Chart Chart Chart Chart PG. PH. PJ.. $$BOCRTT $$BOCBTT $$BOCRTU $$BOCRTV $$BOCRTW $$BOCRTX $$BOCRTX $$BOCRTY $$BOCRTY - Read Processor Part 3 (Part 1 of 2) .• 234 Bead Processor Part 3 (Part 2 of 2) .. 235 Update Wrap-Around Address ,.... .236 PK~ COnMAND Error Message Writer ~ .. 237 OA. Display Warning Me~sag~ • _ • • .. 238 :QB. Verify Operator Commands (Part 1 of 2) .• 239 QC. ~ Ve.rify Ope,J:'ator Commands (Part 2 of 2) ~240 QD... - Handle Long Messages (Part 1 of 3) _ • .241 QE. - Hapdle, Long Messages (Part 2 of 3) _ • ..242 QF~ $$BOCR~Y - Handle Long Messages (Part 3 of 3) • • ..243 QG,. $$BOCRTZ - Channel Program An~lyzer (Part 1 of 6) .• 244 QH., $$BOCBTZ - Channel Program Analyzer (Part 2 of 6) .245 QJ~ $$BOCRTZ - Channel Program Analyzer (Part 3 of 6) .246 QK. $$BOCBTZ - Channel 2rogram Analyzer (Part 4 of ~ .247 _248 QL.. $$BOCRTZ - Channel Program Analyzer (Part 5 of 6) QM. $$BOCRTZ - Channel Program Analyzer (Part 6 of 6) .249 ... 250 BA. $$BOCBT~ - Message Redisplay Part 1 (Part 1 of 2) RB. $$BOCRT1 - Message Redisplay Part 1 (Fart 2 of 2) .25i1 RC~ $$BOCRT2 - Message Redisplay Part 2 (Part 1 of ~ .252 RD. $$BOCRT2 - Message Redisplay Part 2 (Part 2 of ~ .253 RE. $$BOCRT3 - Mes~age Redisplay Part 3 (Part 1 of 3) .254 hF. $$BOCRT3 - Message Redisplay Part 3 (Part 2 of ~ .. 255 RG. $$BOCRT3 - Message Redisplay Part 3 (Part 3 of 3) .. 256 RH. $$BOCRT4 - Message Redisplay Part 4 • • • • _ .257 RJ. $$BOCRT5 - Message Redisplay Part 5 (Part 1 of 2) .258 RK. $$BOCBT5 -' Message Redisplay Part 5 (Part 2 of 2). ..259 ItL. $$BOCRT6 - Message Redisplay Part 6 (Part 1 of 2) .260 RM. $$BOCRT6 - Message Redisplay Part 6 (Part 2 of 2) .261'1 SA. $$BCHKPT - Test Checkpoint Conditions ... • _ • • • .262 SB. $$BCHKP2 - Build and write Checkpoint Records .. 263 SC. $$BCHKP3 - Build and Write 3800 Checkpbint Records~ .264 SD. $$BCHKPD- Test Checkpoint Conditions • ... _ ~ • • • .265 SE. $$BCHKPE - Complete Test and Write Checkpoint Header. .266 SF. $$BCHKPF - write Checkpoint Records • _ • • • • • ..267 SG. $$BCHKPG - Write 3800 Printer Information Records .• 268 SH. $$BCHKPG - 110 Subroutines for Writing Checkpoint .hecords on Disk • .• • ,. .. .• • • ,. • • ,. '.. . .269 .;.270 Chart SJ .• ' $$BRMSG1··- CheQkpoint Message'Routine .•.10 . • • • Chart SK. $$BCHK3G - Chec~point Erase-Gap Routine .. • • • • .27i1 .272 Chart St. $$BRSTRT - Restore Problem Program (Part 1 of 2). $$BRSTRT - Restore Problem Program (part 20f 2). ..2'J3 Chart SM. Cha-rt SN. $$BRSTR2 - Tape ReRositioning and DASD Verification Routine (Part l' of 2) .• • • .• .• .• • • • .• ••.• .. ... • • .274 Chatt SP~ $$BRSTR2 - Tape Repositioning and DASD Verification Routine (Part 2 of 2) . . . . . . __ • __ • • • • • _ • • 275 Chart SQ_ $$BRMSG2 - Restart Message Routine. _ • • • • • • • • • • 276 A ,a 10 .. .. •• ., a _ ,a I This manual describes (a) the lo4ical transient programs and (b) the dump phases that are executed in the SVA~ Logical transient programs, also referred to as B-transients, are not resident in real storage. These transients are loaded or fetched from the core image library into a transient area in the supervisor. The majority of the B-transients are loaded into the l!Qgi£S!! !il~ient Are~ (LTA), when requir~d~ The CRT transients, $$BOCRTn, are an exception. They are required for display operator console support and are loaded into the CRT Transient Area (CRTTRNS) when required by the CRT system task. in the core image library and are Letched into the CRT Transient Area by an SVC 48~ T~is happens each time the s~pervisor encounters a request for a display console,. Since these requests may be for different services, the support i~ provided by 30 different transient phases. Each CRT phase name begins with the characters $$BOCRT. Each phase fits in the CRT Transient Area which is 1156 bytes long~ GROUPING OF B-TRANSIENTS A number of B~transiefits are not des~ribed in this manual, out in the manuals for the system components to which they are related, such'as LIOCS and Job Control. The B-transient programs, which are covered in this manual, can be grouped by the various functions performed: • Attention routines NON-CRT TRANSIENTS Terminator routines (see also DumE PhS!§es, below) An SVC 2 instruction lo'ads a B-transient into the LTA (ll92 bytes) and executes it. A prefix of $$B to the name of a phase identifies it as a B-transient~ Tbe normal return of control to the resident supervisor is an SVC 11, but some of the transient programs exit by fetching another B-transient with an SVC 2. In the latter case, the calling B-transient is overlaid by the transient being fetcbed. ~hase Register 1 is loaded with the address of the transient phase name before the SVC 2 is issued. The fetch or load rout~ne, then, has access to the name for searching the' directories for the desired transient. Befer to section ILogical Transient Supervisor Calls l for a more detailed e x plana ti on .• CRT TRANSIENTS CRT transient routines provide support for the display operator consoles. They reside • Various special service programs • Display operator console support • ChecKFoint/Restart routines , The terminator routines consist of two groups: B-transients, which are executed in the LTA, and the dump phases ($IJBDUMP), which are executed in the SVA. The LTA is not used or locked during execution of a system dump or a PDUMP macro; it is locked, however, dur~ng execution of the DUMe command. Wben abnormal termination occurs in the taSK owning the LTA, the area is not freed until the system dump is complete. The system dump routines will then dump the LTA containing the error or that may have provoked the error in the failing task. Logical Transient Supervisor Calls 11 SVC is detected by microprogramming, whicn loads the SVC new PSi from real storage location 96. Certain SVCs are involved in processini B-transientoperations. This section describes those superv~sor calls which ~re directly used in logital transients. The SU£g£XisQ£ Logig PLM l~sted in the Preface contains a list of all SVCs used in-thesYstem .. Q: Execute the channel program (~XCP). The address of the user's command control block (CCB/LORB) must be supplied in general register 1 before this SVC is issued. If POWER/VS is active and t~e I/O operation for the device needs to be emulated, control is given to the SVC 0 appendage in the POWER/VS nucleus code. ~!£ ~!£ ~: Fetches a B-transient. Loads a B-transient program (phase name prefix equals $$B) from the system core image library or a private core image library to the; B-tran51ent area and control is passed to the B-transient at its load address plus 8 bytes. Tbe' directory entry for the phase may be found in storage, in the system dore image library directory, or in the private core image liorary directory (ii a PCIL is assigned). . The §.lQ£~g address of the B;-transient . phase na,JDe;: or;-the-;-'address of a param~t.er list must De supplied in general register 1 before tbis SVC is issued. An address in general register 0 is ignored. The B-transient is loaded at tne beginning address of the B-transient area. General tegister 15 is loaded with this address and may be used by B-transients as a base register. Return may De either to the ~nterrupted program or to the highest priority program ready to run. Only one program can use the B-transient area at a time. If the B-transient program is SVC 7 bound, another program is selected. This program becomes SVC 2 bound (waiting for the B-transient area) if it issues anSVC 2. Anothet program is then selected. Note: SVC 2 also traps fetches for the former dump routines $$BDUMP, $$BJDUMP, and $$BPDUMP. Whenever an SVC 2 is issued ior one of these routines, the termiriator in the supervisor is entered and the SVA-res~dent dump routine $lJBDUMP is initialized. 12 DOS/VS Logical Transients SVC 3: Provides an interface between the supervisor and $:i)BEOJ4 ... SVC 3 waits for terminat10n of I/O requests that belong to the partition or task which is being canceled or has reached end-of-job. Loads a phase from the system core image l~brary or a private core image library (~CIL) and returns to task selection. The directory entry for the phase may be found in storage, ~n the system core 1mage library directory, or in the private core image library directory (if a PCIL is supported and assigned). A d~rectory entry iound in the SDL is not loaded if i t is active and its phase itself is SVA-resident. ~!£ ~: The §lorggg ~g&£g22 of the pnase name or the address of a parameter list must be supplied in general reg1ster 1 before tnis SVC is issued. The tiser may override the link-edited load address by supplying a load address in general register O. Upon return to the user, general register 1 contains tne paase entry address adjusted Lor any changes in the phase's load address,' and general reg~ster 0 ·points to th€ active incore directory entry iI one was supplied, or fou~d by a Ioeal ~r system directory lis~ search • £: Cancels a program (task) or partition. This is usually achieved by the requesting program, task, or suhtask issuing a CANCEL or CANCEL ALL macro. ~Xf If a subtask issues CANCEL, only that subtask is terminated. If a maintask issues CANChL, or a subtasK issues CANCEL .ALL, then the entire partition is cancelea, tae maintask being always the last to be terminated. CANCEL· macro issued by maintasK w~tAout subtasks: the issuing task 1S terminated normally .. ~ Cancel code X'23' is posted to tne issuer's PIB, • Message PhOGRAM I (issuer) CANCELED DUE TO li~QUEST·. CANCEL macro issued by subtask: the subtask is terminated normally. issu~ng • Cancel code X'23' is postea to the iS5uer's PIB. • Message • (issuer) CANCELED DUE TO PROGRAM REQUEST'. CANCEL macro issued by maintasK with subtasks atta~ned: the maintask is terminated normally; attached subtasKs are' terminated abnormally. been posted, the'following action is taKen: ~ If a system task was interrupted, the system task is deactivated_ • Cancel code X'1D' is posted to each subtasK PIB. • The PIB flag of the interrupted program is set to I/O-bound (not ready to run) and its PSW is set up to reissue SVC 7. • Cancel code X'17' is posted to the main task PIB .• • Message '(subtask) CANCELED DUE TO MAINTASK TERMINATION'. • Message '(issuer) CANCELED DUE TO PhOGRAM REQUEST'~ • A dump is generated at the start of the termination of the maintasK if the DUMP option is active (DUMP=YES). ~x£ ~: CANCEL ALL macro issued by a subtask: the subtask is terminated normally; other subtasks and the maintask are terminated abnormally. ~ssuing • Cancel code X'23' is posted to the issuing subtask PIB~ • Cancel code X'1C' is post~d to each of the other subtasks PIBs and to the maintask PIB ... • Message' (issuer) CANCELED DUE TO PROGRAM REQUEST'. • Message' (main or subtask) CANCELED DUE TO CANCEL ALL MACRO'. • A dump is generated at termination of the subtask if the DUMP option is active. If linkages to the user's AB rout~nes have been established through the STXlT (AB) macro, these routines are entered for all tasks tnat are terminated abnormally by the CANCEL or CANCEL ALL macro, so the task that issues an SVC 6 never enters its AB routine_ (Exception: the issuer was a B-transient. ) An AB routine normally terminates through a DETACH, EOJ, or CANCEL macro, but an abnormal condition encountered in an AB routine also terminates tnat AB routine. SVC 1: Waits for the completion of an I/O operation or for a timer.interruption to occur. It supplies the supervisor support for the WAIT macro. If the traffic bit (CCB/IORB) or event bit (TECB) has been posted, SVC 7 branches directly to task selection and task is dispatched immediately after the SVC7 call. If the traffic bit or event bit has ~ot Supplies the supervisory support to temporarily return trom a logical transient to the problem program~ This SVC may be issued only from the logical transient area (LTA) and does ~Q1 free this area. The entry address to the problem program must be specified ~n general register 14. The task selection exit loads the problem program registers. General registers 0 and 1, ~re passed to the problem program. To return to the logical transient, the problem program issues an SVC 9. 2: Supplies the supervisory support to return to" the logical transient after an SVC 8 has been issued. An SVC 9 may be issued only ny the problem program. The task selection exit loads the logical transient registers,. General registers 0 .and 1 are passed to the logical transient programs. ~x£ SVC 11: Beturns from a B-transient releasing the B-transient area. SVC 11 is invalid ~f issued by other than a B-transient. The log~cal transient area is released for use by other programs or tasks. Return is to the h~ghest priority program ready to run. SVC 11 is also used to return from the SVA-rp.sident terminator routine ($IJBDUMP) to the supervisor. The terminator routine in the supervisor will release the ~VA-resident terminator routine. ~!~ !~: This ~s the normal end of job (EOJ). Cancel code X'10" is posted to the PIB for the progra~ issuing the SVC ~4. The next t~me the canceled program is selected on general exit, a branch is made to the terminator routines. ~x~ ~~: Seizes the system and provides a release from such a seizure in a multiprogramming system. This SVC may be issuea only by JOD control and logical transient programs. The PSW protection field must be zero, otherwise the issuing program is canceled4 The first SVC 22 issued seizes the system. until the next SVC 22 is issu~d, the task selection mechanism is disabled so that the issuing task is the only user task that can be selected. The next SVC re-enables the task selection mechanism. Logical Trans~ent Supervisor Calls 13 If the low-order byte of general register 0 is zero, the system mask is set to disable all interruptions; if non-z.ero, the system mask is set to enable all interruptions~ If general register 0 is negative, the user protection Key is set in tbe user's PSi. SVC 23: Retr~eves the load address for a specified phase from the directory entry for the phase~ The pr6gram issuing an SVC 23 is canceled if the PS~ protection key does not equal O. (Only job control and B-transient programs can issue an SVC 23a) The user must specify the storage address of the phase name in general register ~ and the address where the load address is to be stored in general register O. The ~ain fetch subroutine scans the System Directory L~st, ·the system core image library and the private core image library (if.supported and assigned) for a directory entry ~or the phase. The load address is retrieved and stored at the address specified by general register' O. The high-order byte ot the storage area is not changed. If the phase is telocatable the load address returned is the relocated load address. £2: Validate a'ddress limits,. The program issuing an SVC 26 is canceled if the PSi protection key does not equal O~ (Only job control and B-transient programs can. issue 'an SVC 26.) ~vc The upper addres~'musi;~e specified in general register 2, and the lower address must be specified iri general register 1. If an SVC 26 was issued by a CRT~transient routine, control is always returned to the CRT. routine. In case of an error, a flag' byte is set before control is returned. For any othe~ routine, if either address is outside the requestor's partition, the task is cancel~d (ERR 2~. SVC 36: Frees a traCK or blOCK that is held task issuing the FREE.. An attempt to free a track not owned by the requestor results in cancelation of that task. bythe Exits on a successful FREE are to task selection, or to the DETACH routine if the FREE was issued by th~t routine. SVC 39: Performs normal 'termination of a sUbtask. DETACH may be issued by either the subtask being terminated or by the main task. If DETACH is issued by a problem program, the cancel code X'10' (normal end-of-job) is set in the 'subtask FIB and the terminator is entered.. At the end of the termination process, DETACH is issued by an EOJ transient routine, setting the 14 DOS/VS Logical Transients, subtasK's PIB inactive (byte 0 = X'80'), and posting its ECB for termination. ~VC ~.§.: Fetches a CRT-transient phase and makes the CRT task dispatchable. The program issuing an SVC 48 is canceled if the PSW protection key does not equal zero. The first SVC 48 is issued at 1PL time to activate the CBT hooks in the supervisor and to lo~d the C~T root phase $$BOCRTA into the CRT transient area (CHTTRN~~ Each subsequent SVC 48 loads the specified phase via Fetch into the CRT transient area and sets the PSW address to the start address of the CRT phase; exit is taken to th~ disFatcher. SV£ 2!:" This supervisor call is only valid in 370-mode. In ECPS:VSE-mode the same function is provided by PEREE. SVC 54 provides supervisor support for the FREEREAL macro to release page frames to the page pool. These page frames may be released from a real partition or the SDAID area .• When the request is issued by tne terminator (the page frames belonging to a real partition are freed), the lower and upper addresses (lower address being any address in the first page of the area, upper being any address in the last page of the area) of tne real partition are passed to the SVC 54 routine in the registers 2 and 3 .. A zero value in register 2 indicates that the request is issued' bySDAID. In this 'case the lower and upper 1imit of the area to be released are.obtained from tbe internal page manager address fields. Control is passed immediately to task selection if no SDAID area exists. The page frames are freed, one after the other, b¥ updating the corresponding Page Frame Table entries (PFTE). The PFIX counter is reset and the partition PFIX counter in the Storage tianagement Control Block (SMCB) is decreased by one~ In the PFTE the page frame is indicated as unused. The address bits of the P¥TE are cleared, the storage key of the page frame is stored in bits 8-A1, the page data set bit is reset, and the high address bit is set~ The released page frames are enqueued on top of the unused page frames selection queue. The counter for the number of page frames in the selection queue is increased by one_ If SVC 54 is issued b¥ the terminator, the number of active virtual partitions (entry ~n SYSCOM) is increased by one, and the translation mode bit in FIBDATPL is set. If SVC 54 is issued by SDAID, the counter in the SMCB (which shows tne number of page fram~s that are fixed in the page pool) is reset to zero. The SVC 54 posts any task and the CCW translation routine ready to run, if they ~re in the wait state, and if more than the minimum number of page frames is available in the p~ge selection queue (PSQ).' §!£ 22: In 370-mode, SVC 59 initializes the page table and page frame table entries belonging to specific pages. In ECPS:VSE-mode, SVC 59 invalidates the pages of the area specified by the input parameters. The task issuing an SVC 59 is canceled if the storage protection key in the PSW is not O. The following parameters are passed to this routine: , R3: Address located in the first page of the area to be invalidated R4: Address located in the last page of the area to be invalidated. 11Q-~Qg~ Qnly: If the area to be invalidated belongs to the active part of the partition (virtual partition: the TRAM bit is s~t; real p~rtiton: the tRAM bit is reset), the corresponding page table entries (PTE) are set to X'OOSTK4', where STK equals the PIK 'and is stored in bits 8-11. If the area to be invalidated belongs to the non-active part of the partition, the corresponding PTEs are set to X'80STKO',~here STK has the same meaning ~s above. Each PTE within the area defined bt R3 and R4 is 1nitialized in that way_ If the page referred to by an entry is in real storage, the page frame table entry of the corresponding page frame is initialized as follows: (b~t o The page frame is marked as unused 4 in S370FLG is set) and the FFIX counter is set to zero. • The page frame is removed from the page selection queue and enqueued at the top of the invalid page frame ~ueue. • If a page is found to be 1 LXed, the system enters the hard ~ait state (de~ug mode only). The key of the storage block in this page frame is set to zero. Qnly: Each page within the area defined DY R3 and R4 is invalidated as follows: ~£R~:Y~~-~Qg~ • If the page is disconnected, the reference, change, and PDS bit is reset,. • If the page is connected, the same action is taken as for disconnected; in addition, the hold bit of the connected page frame is reset. • It the page ~s addressable, the corresPQndingpage frame table entry is removed from the page selection queue, and the page i~ disconnected by resetting the reference, change, and PDS bit .• Logical Transient Supervisor Calls 15 r~n;;' ~O~JBA-;;;;------l This group of B-transients consists of phases whose names start with $$BATT. The attention task is activated when the operator presses the request key on the console printer-keyboard or on the display console once or twice in quick succession, or when he presses the interrupt key on the system control panel. The physical attention transient $$ABERRZ is fetched into the Physi~al Transient Area~ On a display console, the operator may enter attention commands without pressing the request key first (see below). To service tbe·attention reguest, $$BATTNA reads input statement information and loads $$BATTNH, which ~elects the appropriate command processor. On a display-console, the operator may enter attention commands without pressing the request key fi~st. $$BATTNA moves tbe command from the attention buffer in the CRT save area CRTSAV to the 1/0 buffer in $$~ATTNA. It then ioads $$BATTNH which selects the correct command processor. $$BATTNA is always loaded together with the code of $$BATTNB, which is contained in a separate control section. That code is overlaid by other attention phases as the need for execution of those phases'arises. The code of $$BATTNA, ·which is contained in the first control section, normally remains in the Logical Transient Area as a root phase as long as the attention taSK is active. However, if $$BATTNA is overlaid by another attention pnase, its code is always reloaded when the current phase completes execution.· Figure 1 shows a layout of the Logical Transient Area containing the attention routines. 16 DOS/VS Logical Transients I I I I I I I I . f ROOT SEGMENT 1-~~I-;ctio~J~:;:;4;------' I I This Control Section is the same as the Csect constituting $$BATTNB. Therefore no fetch of$$BATTNB is required when code in this Csect is to be executed and th is area is not yet overlaid by another phase. I I .I I I I I I L--$$BATTNA---------.J If the operator pressed the request key twice in quick succession because he wants an emergency cancel, $$ABEBRZ processes the interrupt and the logical attention transients are not activated. . In the other cases, $$BATTNA is fetched into the LTA. If $$BATTNA is entered because the operator pressed the interrupt key, $$BATTNB establishes linkage to the Background Operator Communication routine. Control ~s retur~ed to the supervisoI, unless attention is pending. I I Logical Transient Area OVERLAY AREA j Figure 1. Layout of the Logical Transient Area containing the Attention Routilles tomm~nds accept~d by the attention ro~tines are: • ALLOC: Permits the operator to allocate the vi£tua!· address area among' . foreground and background programs ($$BATTNE) • • ALLOCR: Permits the operator to allocate the real address area among foreground and-backgro~nd programs ($$BATTNE) • • ALTER: Permits the operator. to alter one to sixteen bytes of virtual storage ($$BATTNT) ,. • BATCH: Initiates job processing in a foreground partition, or restarts job processing in a stopped partition ($$BATTNG) • • CANCEL: Modifies the PIB ot the specifiea' partition to cancel the current task(s) in the specified partition ($$BATTNC). • DSPLY: Permits the operator to display sixteen bytes of virtual storage ($$BATTNU) • • DUMP: Permits the operator to dump part (for example a partition) or all of real or virtual storage depending on whether the partition runs in real or virtual mode ($$BATTNV). • ENDSD: Terminates SDAID routines ($$BATTN 3) '. • IGNORE: Used to ignore control statements that contain errors.. Causes control to be returned i~mediately to $$BATTNA to read next command ($$BATTNC:) ,. • • • LOG: Permits logging tif job control statements for all partitions on SYSLOG~ The appropriate switch is set in each partition communications region ($$BATTNC)1. LUCB: 'Permits the operator to change the contents of the UCB (universal character set buffer) of a printer ($$BATTN9, U1, U2). MAP: Provides a map of storage utilizati6n ($$BATTND, $$BATTNI). An example is given in DO§l!~~ ~st~~ ~Qnt~! • NOLOG: Suppresses logging of job control statements on SYSLOG. The ~ppropriate switch is reset in each partition communications region ($$BATTNC) .• • PAUSE: Indicates job control pauses for operator communication at the end of the current job step in the specified partition, or, optionally, at end of job of the current program in the specifi~d partition ($$BATTNC)~ • PBTY: Allows the operator to display or change the priorities of the partitions in the system, which were set when the ~ystem was generated ($$BATTN2). • SETDF: Allows the operator to set and/or reset default values for the 3800 printer ($$BATTN7, $$BATTS1, $$BATTS2) ,. • SETMOD: Allows the operator to change the mode of a 8809 tape unit from streaming to start-stop or vice versa ($$BATTNK) .. • SIZE: Allows the operator to subdivide a partition permanently into an area for program execution and a GETVIS area ($$BATTNF) .• • START: This command has the same function as the BATCH command ($$BATTNG) ,. • TPBAL: Allows the operator to display or change TP Balancing ($$BATTN2). • VOLUME: Provides the operator with the volume identifiers of the volumes mounted on a DASD device, together with an inaication of ~hether or not the vo~umes are in use ($$BATTNO). LFCB: Permits the operator to change the contents of the FCB (forms control buffer) of a printer ($$BATTN8, Fl~ F4, F5) '. • • Stat~m!ts,. MODE: Provide's control over the recording mode for recoverable machine checks and allows setting various BMSR options for recording of device errors ($$BAT~NQ, R, s, Y, Z). • MSG: Causes control to be given to a foreground program operator communications routine previously activated by a STilT macro ($$BATTNB). • NEWVOL: Reactivates job control in the specified partition, which was waiting for a volume to be mounted ($$bATTNC). Attention Routines 17 Chart 01.. • • • • • Overview of Supervis'or Entry into Attention Transients External I n t e r r u p t - - - 1 I - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - , . - - - - - . I/O I n t e r r u p t - - - - t - - - - - - - - - - - - - - - - . Supervisor Call--., Program Check--, rylachine Check--~ NO NO -----T----- I 6 I r----.J I 0-1 YES Post Attention Task Selectable (X'83' in the first byte of the Attention PIB) If it was an external interrupt post it in the flag byte of the PIB $$ABERRZ· See Supervisor Logic PLM $$ABERRZ See Supervisor Logic PLM The message 'REQUEST CANCEL' is issued and according to the operator's reply the appropriate partition is canceted When the Attention task is selected, this Physical Attention phase is fetched in the Physical Transient Area. Assume that no intervention is requ ired on any device, or that tha operator replies 'IGNORE'. Set up to fetch $$BATTNA and go through Task Selection. $$BATTNA 18 DOS/VS Logical Transients Chart 02 .• Logical Transient Attention Routines (Part t of $$BATTNA, $$BATTNH ~ Charts AA-AD, AT ~ A, • "" I"\LLV\.o The first control section of $$BATTNA functions as the root phase. The second control section, which contains the code of $$BATTNB; is overlaid by other phases as required. The following functions are performed: • • • • • If an external interrupt is to be processed, establish linkage to the background operator communicat:ons routine. When the routine is busy, the complement of the address is set in the option table. A bit is set in the PI B to indicate to the supervisor that an OC interrupt is to be serviced. Read the command and load $$BATTNH, or if the attention command was issued on a CRT device without pressing the request key first, move the command to the buffer in $$BATTNA, display the command and load $$BATTN H. $$BATTNH scans the command, loads the phase requ ired to process the command and branches to the correct routine within the phase by means of a branch vector table. - t-- If the command is not a valid DOSIVS command imd ACF/VTAM and/or POWERIVS are active, and exit is taken on the ACF/VT AM and/.:>r POWERIVS interface since the command could be a valid ACF/VTAM or POWER/VS command. Exit via DTCHAT if no more commands are found or if an external interrupt was processed and there is no attention interrupt pending. DTCHAT • I I Deactivate attention routine and exit from B-Transients.- f- CONTROL • Command Load $$BATTNH, read next command etc. $$BATTNA also contains subroutines, storage areas and constants common with other phases. These routines are used to scan the operands, to issue messages, and to load other subroutines. L-. ~O) Phase Name II'cI'DATTlI.lC \IhP"'1""'\ I , I"~ Exit to Chart: 04 ALLOCR $$BATTNE 04 ALTER $$BATTNT 06 BATCH $$B ATTN G 04 CANCEL $$BATTNC 03 DSPLY $$BATTNU 06 DUMP $$BATTNV 07 ENDSD $$BATTN3 04 IGNORE $$BATTNC 03 LFCB $$BATTN8 09 LOG $$BATTNC 03 LUCB $$BATTN9 10 MAP $$BATTND,I 03 MODE $$B ATTN Z 08 MSG $$BATTNB 03 NEWVOL $$BATTNC 03 NOLOG $$BATTNC 03 PAUSE $$BATTNC 03 PRTY $$BATTN2 04 SETDF $$BATTN7 11 SETMOD $$BATTNK 03 SIZE $$BATTNF 04 START $$BATTNG 04 TPBAL $$BATTN2 04 VOLUME $$BATTNO 04 See DOSIVS ACF/VTAM or POWERIVS Logic manuals J t SVC II Attention Routines ~~ Chart 03 .• Logical Trans~ent Attention ~outines $$BATTNB (Part ~ of ~O) $$BATTNC MSG PROCESSOR PAUSE/LOG/NOLOG/IGNORE PROCESSORS Charts AE, AF This p ase selects the correct operator communications routine. It selects the appropriate operator communications option table entry and establishes linkage to the selected foreground user routine. The user's general registers and modified PSW are saved in his OC save area. When the selected operator communications routine is busy, the phase sets the complement of the address in the option table. Chart AJ This routine sets switl::hes in one or more partition communications regions. • PAUSE· Turn on job control switch bit for PAUSE at COMREG + 56 or for PAUSE-at·EOJ at COMREG + 59 in the communications region of the specified partition. • LOG/NO LOG - Set job control switch bit for LOG (on) or NO LOG (off) at COMREG + 56 in each partition communication region. • IGNORE - Return control immediately to CONTROL in $$BATTNA to read the next command_ $$BATINC Charts AG, AH CANCEL PROCESSOR This routine finds the key of the program identified by the operand, if any, of the CANCEL command. Depending on the key found, this phase: $$BATINC NEWVOL PROCESSOR Chart AH This routine finds the key of the program identified by the operand of the NEWVOL command. It readies the specified partition by setting the appropriate flag in the PIB. • Cancels the program currently being executed in a specified area, in a multiprogramming environment; • Cancels the background program; • Any subtasks of the maintask selected for cancelation are also canceled. Cancelation is accomplished by setting the appropriate flags in the PIB(s) of the task(s) to be canceled. When the background is canceled implicitly (no operand supplied), branch to DTCHAT in $$BATTNA. $$BATTNA DTCHAT NO $$BATIND MAP PROCESSOR (370-mode) Chart AK This phase displays on SYSLOG a map of the current storage allocated to, and the program active in, all problem P,'"ogram areas (BG, Fl, F2, etc.), the page pool, and the supervisor. Storage allocation is mapped in terms of 2K 'blocks as determined from the appropriate entries in the communication region, and the PIB table, using the EBCDIC. For active par-' titions, the name of the job currently executing in that partition is obtained from the partition communication region. $$BATTNA DTCHAT $$BATTNI MAP PROCESSOR (ECPS:VSE mode) Chart AL This phase displays the following information on SYSLOG: • • • • Supervisor size and amount of PFIXed (real) storage and upper limit address. For each partition: partition size, GETVIS size, amount of PFIXable storage, partition upper limit. status, priority, and job name if a job is running. SVA size and system GETVIS size. Page pool size. $$BATTNK SETMOD Command Processor The SETMOD command initializes the mode of a 8809 tape to Streaming or Start-Stop by inserting the specified mode in byte 5 of the PUB entry for the corresponding device. If the mode operand is omitted, a default mode of 60 (Low Speed and Short Gap) is assumed. CUUSCAN - Check cuu operand for validity and convert it to binary. - If syntax error, issue message lSOnD ---------1--...-, PUBSCAN - Scan PUB table for matching entry. If cuu is not found, issue message 1P40D - - , . _ _ - - - - t - - - . j If cuu is not a 8809, issue message lP41D------Ir--., If mode operand is omitted, insert default value 60 in PUB MODESCAN entry. - If mode is invalid, issue message 1 P42D - - - - - - - I r - - - - l - Insert mode in PUB entry. - Add X'03' to mode byte to produce correct CCW op code. Write message 1P431. - Return $$BATTNA CONTROL 02 $$BATINA CONTROL 20 DOS/VS Logical Transients $$BATTNA DTCHAT Chart 04. Logical Transient Attention Routines (Part 3 of 10) $$BATTNE $$BATTNF ALLOC AND ALLOCR PROCESSOR Charts AM, AN This phase performs the following functions: This phase performs the following functions: • • • • Charts AP, AQ SIZE PROCESSOR Checks the operands of the storage allocation commands for validity. Converts the values specified in the commands to binary, builds a parameter list, and issues the ALLOCATE macro. Checks the return code from the ALLOCAT E macro and, if not zero, inserts the translated code in an error message indicating the reason why the allocation could not take place. • • Checks the SIZE operands for validity. If a syntax error is detected, message 1 P04D is issued and control is returned to CONTROL in $$BATTNA. Converts the SIZE value to binary, builds' a parameter list, and issues the SET LI MIT macro for each partition specified. Checks the return code from the SETLIMIT macro and. if not zero. inserts the translated code in message 1 P03D. $$BATTN2 $$BATTNG BATCH AND START PROCESSOR Charts AR, AS Initiates job processing in a foreground partition, or restarts job processing in a stopped partition. If the partition is to be restarted, the PIB flag is set to X'83' and the 'partition was stopped' bit is set to zero. If job processing is to be initiated, the PIB flag is set to X'81' and switches are set in the PIB to initiate fetching of EOJ routines. EOJ will load Job Control in the specified partition. The current SYSLOG and SYSRES assignments for BG are also set for the specified partition. PRTY AND TPBAL PROCESSOR Charts BL - BN • PRTY - Displays the present dispatching order of the partitions (no operand given) o~ changes the priority sequence of the partitions. The order of operands indicates the new priority sequence, in ascending order. • TP8AL - Displays (no operand given) or changes the present setting of the TP Balancing function. The operand indicates the number of batch partitions in which processing can be delayed. $$BATTNA CONTROL $$BATTNO $$BATTN3 ENDSD COMMAND PROCESSOR Chart BP This routine terminates SDAID routines. Supervisor state is forced and PER bits are reset in all PSW's. This routine also frees the alternate area and SDAREA, if present, and returns the associated page frames to the page pool. SVC 54 is used for this. Control is returned to DrCHAT in $$BATTNA. VOLUME PROCESSOR Chart AU This routine checks the ;:>arameters of the VOLUME command, gets the volume characteristics for the requested device(s), checks the PUB2 and PUBOWNER tables whether the volumes are in use, and writes the output on SYSLOG. $$BATTNA DTCHAT Attention Routines 21 Chart 05 .• ~ogical Transient Attention Routines (Part 4 of ~O) )J $$BATTNO r---------------------------~------------------------- ~ MODE COMMAND PARAMETER PROCESSOR Chart AV 1-----------------------------_. This phase chacks the parameters of the MODE command: • Valid parameters set indicators in the $$BATTNA I/O buffer. • 'STATUS' parameter causes load of $$BATTNR phase. - - - - - - 1 - - - - - - - - , • Parameters are isolated by using $$BATTNA scan routine. • 'E' and 'T' values are checked for validity, given binary values, and saved in regs. 4 and 12, respectively. • Maximum length of command is 27 bytes. When scanning of parameter is completed, $$BATTNO loads $$BATTNS. $$BATTNS $$BATTNR MODE COMMAND VALIDITY CHECKER Charts A X, A Y MODE COMMAND STATUS REPORT PROCESSOR This phase checks for valid combinations of parameters. Error messages report inval id parameter groupings. Valid parameters are posted in the RAS monitor table, RASTAB, byte MCMODE (See Error Recovery and Recording Transients Logic). The phase posts, if specified, in RASTAB: This phase formulates and prints system status reports on SYSLOG. It gets information from RAST AB and the T AS Linkage Area. After processing the status report, it returns to CONTROL in $$BATTNA. 1. Mode changes 2. Error count threshold 3. Time threshold .. r ~, 02 $$BATTNA CONTROL 22 DOS/VS Logical Transients Chart AW Chart 06 .. Logical Transient Attention Routines (Part 5 of lO) $$BATTNT ALTER COMMAND PARAMETER PROCESSOR Charts BA, BB This phase checks the parameters of the AL TE R command: • A val id address Addresses that are not 6 characters long, or do not represent a hexadecimal address cause message 11410 to be issued. The same message is issued if the start address points to an invalid address space. (see Note). Message 11471 is displayed if some of the bytes to be altered fall within invalid address space. • An address within the supervisor area or SV A If the address is within the supervisor area, or in the SV A message 11420 is issued to verify that this is the correct area to alter. • When the address has been checked, this routine reads from SYSLOG 2 to 32 characters of information that is to be stored in 1 to 16 bytes of virtual storage. • Errors in the SYSLOG input cause message 11450 to be issued. The response to this message is either a new set of data or the END/ENTE R key, which results in a branch to $$BATTNA. - - - - - - - - - - - + - - - , Note: Inval id address space is the address of a location • When virtual storage has been successfully altered, control is returned to $$BATTNA. $$BATTNA CONTROL $$BATTNA DTCHAT $$BATTNU Charts BC, BD DSPLY COMMAND PROCESSOR This phase checks the parameter of the DSPL Y command: • • • • in the gap between real and virtual storage; beyond the end of virtual storage; in the page pool; in a virtual partition, whose real partition contains a program running in real mode. • A val id address An address that is not 6 characters long, or does not represent a hexadecimal address causes message 11410 to be issued. The same message is issued if the address points to an invalid address space. (see Note). If the reply to 1141 0 is • a val id command and address, processing continues . • END/ENTER key, the attention routine is terminated and control is returned to the supervisor via $$BATTNA.----------------------------------4---, If some of the bytes to be displayed are within invalid address space, only the bytes up to the invalid address space are displayed and the message 11481 is issued. • When the address has been checked, the hexadecimal representation of 16 bytes of virtual storage, starting at the specified address, is displayed on SYSLOG. $$BATTNA DTCHAT • When the display is complete, control is returned to $$BATTNA. $$BATTNA CONTROL Attention Routines 23 Chact 07,. Logical Tcansient Attention Routines (Pact 6 of 10) $$BATTNV DUMP COMMAND ANALYZER Charts BE - BH • Checks the operands of the DUMP command for validity. If invalid, message 1143D is issued. • Checks that the device specified in the second operand exists, whether it is a printer, tape or DASD device, and whether it is available. If not, message 1146D is issued. • If the response to the message is the corrected command, checking of the operands restarts. If the response is END/ENTER, the attention routine is terminated and control is returned to the supervisor ---------f----, • If the operands are correct, phase SIJBDUMP in the SVA is called via an SVC2 hook in the supervisor. 02 $IJBDUMP (in SVA) DUMP COMMAND PROCESSOR Charts EJ - EP, ES - EW, and FF - FK This phase dumps the following: • • • • • • Control registers 0 - 15 Supervisor if S was specified in the command SVA if SVA was specified SDAID buffer if BUFFER was specified One or all partitions (with registers), if requested and active. If a partition is not available, a message is iSSUed. An area of storage located between 2 hexadecimal addresse's. The associated registers are also printed. If the area to be dumped contains invalid address space, a message is issued. The output can be written on a printer, tape or DASD device. If the output is to be written on a DASD device, a preallocated file named DOSDMPF must be available for the dump output. Module IJBDMPIC performs the I/O operation for the DUMP command. SVC 11 TERMINATOR IN SUPERVISOR Returns to $$BATTNV $$BATTNV DUMP COMMAND ANALYZER Charts BE - BH Returns control immediatly to $$BATTNA at label CONTROL. 24 DOS/VS Logical Transients $$BATTNA CONTROL $$BATTNA CONTROL Chart 08 .• Logical Transient Attention Routines (Part 7 of 10) Chart BK This p ase c ecks the ODE command: If the CPU is not a model 115,125,135, 138 or 4300 then: ...----+-- If the parameter is CE, exit to $$BATTNY; If the parameter is I R or C R, set the appropriate switches and return to $$BATTNA; --------i----. Otherwise, exit to $$BATTNQ. - - - - - - - - - - f - - - - I , . - - - - - - - - , If the CPU was either a Model 115, 125 or 4300 and a MODE command with parameters other than CE, I R or CR was issued, return to $$BATTNA with message 'COMMAND IGNORED'. ---------------+--~ $$BATTNQ If an invalid command was issued, exit to the error routine in $$BATTNA. ------------+--~ If the request is to set the recording mode (to tecording or quiet), the mode is set, and an exit is taken to $$BATTNA. ------------+--~ If an invalid command was issued, exit to the error routine in $$BATTNA. _ _ _ _.c...-_ _ _+-_~ ~-+- If the parameter is CE, exit to $$BATTNY, if it is I R or CR, set the appropriate switches and return to $$BATTNA. Otherwise, exit to $$BATTNQ. $$BATTNY $$BATTNQ CE MODE COMMAND PROCESSOR Chart BJ This phase checks the CE parameter of the MODE command: For a Model 115 or 125, return to $$BATTNA with message 'COMMAND IGNORED' if the device for which the MODE command was issued is not hardware recorded. _ _ _ _ _ _ _ _ _ _ _ _ _--I_~ Check for additional parameters. If there are any, create the bit/byte mask and insert it in the specified PUB2 entry. Then, set the new mode and recording limit, and wxit to $$BATTNA. - - - - - - - + - - - . t If the cuu parameter has not been specified, or too many parameters have been specified, or any parameter has been specified incorrectly, an exit is taken to the error routine in $$BATTNA. $$BATTNA CONTROL Attention Routines 25 Chart 09 .. Logical Transient Attention Routines (Part 8 of 10) r---- $$BATTN8 LFCB COMMAND PROCESSOR 1 Chart CA, CB This phase skans the operands of the LFCB command. The functions are: • • -fo- • • • Check the operands for correct syntax and save information about the specified operands in tables FPRMADRT and FPRMVALT. (For layout of these tables, see Figures 3 and 4.) If an error is found, set the appropriate error indicator in the first halfbyte of FPRMECOD (see Figure 5) and load phase $$BATTF 1. Translate the (syntactically correct) cuu specification into the proper hexadecimal value. Store the specified phase name, the value specified for FORMS and LPI, and the NULMSG indicat~r in FINAREA. (For a layout of this area, see Figure 2.) After all operands have been scanned, load $$BATTF1. $$BATTF4 FCB LOAD EXECUTION PHASE FOR 3203 AND 5203 This phase overlays root phase $$BATTNA. The functions are: • • • • Charts CD. CE Align forms to line 1 Retrieve the specified FCB phase from the core image library and load the contents of that phase into the FCB. If the FORMS=xxxx or LPI=n was specified in the command, issue message 1 B13A to inform the operator about the required operator action. When the required operator action is finished, skip the forms to channell position of the new FCB load, print the verfication message, provided NULMSG was not specified, and skip to channel 1 again. Error conditions that may occur are given below together with the pertinent functions of $$BATTF4: • • The specified FCB phase was not found --issue message 1 B151 and execute aJ= ETCH !~. $$BATTNA.. f---The length of the specified FCB phase is incorrect, or the contents of the phase do not conform to the FCB load conventions -- issue message 1 B161 and execute a FETCH for $$BATTNA. r-- If the FCB load operation is completed successfully, execute a F ETCH for $$BATTNA. $$BATTF5 -... FCBLOAD EXECUTION PHASE FOR P.RT1 Chart CC This phase completes the necessary operations in preparation for the actual FCB load operation. . The functions are: • • • Find the PUB address of specified X'cuu'. Determine whether the device is a printer with an FCB and whether the printer does not have the device down condition. If an error is found, set the appropriate indicator in the second halvbyte of FPRMECOD (see Figure 5). Note: The preciding steps are skipped if phase $$BATTN8 detected an error. - • • • • If an error was found, build message 1B12D and return control to SSBATTNA to have the message printed. Place the information needed by the execution phase ($$BATTF4 or $$BATTNF5) into FINAREA and move the contents of this area to INFAREA at the end of the phase. (For a layout of that areA see Figure 2.) If the printer of class PRT1 load $$BATTF5. -1--Otherwise load $$BATTF4. -I-- • • • • Align forms to line 1.by loading an auxiliary FCB load. Retrieve the specified FCB phase form the core image library and load the contents of that phase into the FCB. If FOR MS=xxxx was specified in the command, issue message 1 B14A to inform the operator a60ut the required operator action. When the required operator action is finished, skip the forms to channel 1 position of the new FCB. print the verification message, provided NULMSG was not specified, and skip to channel 1 again. Error conditions that may occur are given below together with the pertinent functions of $$BATTF5: • • • The specified FCB phase was not found - - issue message 1B151 and execute a FETCH for $$9ATTNA. The length of the specified FCB phase is not 192 incorrect, or the contents of that.phase do not conform to the FCB load conventibns -- issue message 1B161 and execute a F ETCH for $$BATTNA. LPI;;;r\ was specified and the specified value does not agree with the line spacing code in the FCB load -- issue message 1 B171 and execute a FETCH for $$BATTNA. If the FCB load is completed sucessfully, execute a FETCH FOR $$BATTNA. 02 Chart CF This phase overlays root phase $$BATTNA. The functions are: $$BATTF1. LFCB COMMAND PROCESSOR 2 - f---- -I---:-- + __ I-- $$BATTNA 02 $$BATTNA 26 DOS/VS Logical Transients ChaLt 10. Logical TLansient Attention Routines (PaLt 9 of 10) $$BATTN9 LUCB COMMAND PROCESSOR 1 Charts CG. CH This phase scans the operands of the LUCB command. The functions are: • Check the operands for correct syntax and save the information about the specified operands in tables UPRMADRT and UPRMVALT. (For a layout of these tables. see Figures 3 and 4.) • If an error is found. set the appropriate error indicator in the first halfbyte of UPRMECOD (see Figure 5) and load. r---I~ $$BATTU1. • Translate the (syntactically correct) X'cuu' specification into the proper hexadecimal value. • Store the phase name. the value specified for TRAIN and the indicators for NOCHK. FOLD. and NULMSG in UINFAREA. (For a layout of that area. see Figure 2.) After all operands have been scanned. load $$BATTU1 . .1 $$BATTUl ~. LUCB COMMAND PROCESSOR 2 Chart CJ This phase completes the necessary checking operations in preparation for the actual UCB load operation. The functions are: • Find the PUB address of the specified cuu. • Determine whether the device is a printer with a UCB and whether the printer does not have the device down condition. • If an error is found. set the appropriate error indicator in the second halfbyte of UPRMECOD (see Figure 5.) Note: The preceding steps are skipped if phase $$BATTN9 detected an error. • If an error was fou nd. build message 1 B 120 and return control to $$BATTNA to have the message printed. • Place the information needed by the UCB load execution phase ($$BATTU2) into UINFAREA and move the contents ofthis area to INFAREA at the enJ of the phase. (For a layout of that area. see Figure 2.) • Load $$BATTU2. $$BATTU2 UCB LOAD EXECUTION PHASE Chart CK This phase overlays root phase $$BATTNA. The function are: • Retrieve the specified UCB phase from the core image library. load the contents of that phase into the UCB. and skip the forms to the channel 1 position. • If a train (or chain) number was specified. issue message 1 B 18A to inform the operator about the required operator action. • When the required operator action is finished. print the verification message. provided NULMSG was not specified. and skip the forms to channell again. Error conditions that may occur are given below together with the pertinent functions of $$BATTU2. • The specified UCB phase was not found - - issue message 1 B 151 and execute a F ETCH for $$BA TTNA. - - - - - - t - - - i.....~ • The specified UCB phase does not have the device specific length - - issue message 1 B 161 and execute a FETCH for $$BATTNA. If the UCB load operation is completed successfully. execute a FETCH for $$BA TTNA. ~, 02 $$BATTNA Attention Routines 27 Chart 1~ .• Logical Transient Attention Routines (Part Y $$BAT~N7 SETDF COMMAN_D ROOT PHASE Charts CL-CR This phase allows default values to be set and/or reset for the 3800 printer. It scans the operand field of the SETDF command and loads the update phase or error phase accordingly. The functions are: • • • • Check the unit specification Process any keywords that are specified Validity check the keyword values If all are valid, save them for $$BATTS1. Pass control to the appropriate phase: (a) $$BATTS2 Error phase Error detected. Process the message. (b) $$BATTS1 Update phase This phase updates the PUB2 $$BATTS1 SETDF COMMAND UPDATE PHASE This phase updates the, PUB2 for the thePUB2 defaults. 3~0 Charts CS·CU printer and lists The functions, if requested, are: • • Find the correct PUB Check for 3800 pri':lter device type Invoke the EXTRACT and MODCTB macros to update the PUB2 List the PUB2 defaults, if ~pecified Pass control to the Attention routine root phase if the update_ of the PUB2 is successful Pass control to tne error phase if an error is detected ($$BATTS2) • • • ,. t $$BATTS2 SETDF COMMAND ERROR PHASE This phase processes and outputs the messages produced by the SETO F command. The functions are: · • Prepare the message for output Output the message ' 02 $$BATTNA 28 ~OS/VS LogicaJ Transients Chart CV - ~o of ~O) r-----------------------------------------, I FINFABEA I I---------------~-------------------------I I ByteslContents I I 1-----+----------------------------------I 0- 7,specified phase name 1 ,-----+----~------~----------------------I 8-l3ltrain number, if specified, 1 lor blank 1-----+---------------------------'--------·1 • 0- ~Ispecified phase name 1-----+-----------------------------------1 I number, if specified, I 8-~~lform 1 lor blank 1-----+----------------------------------112 1not used -----+----------------------------------Inumber of lines per inch, ~3 lif specified, or blank • 1 1 1 1 • 1 I 1 I '. I IIni t address 1-----+----------------------------------114-151hex value of specified -----+----------------------------------14-151hex value of specified lunit address I-----+--~-------------------------------- -----+----------------------------------~ ~6-~9Iaddress r~--------------~------------------------, I UINFAREA I I-----------~----------------------------,ByteslContents 116-19laddress of PUB of PUB 1-----+_·_--------------------------------,20-22Ispeci£ied cuu as printanle -----+----------------------------------20-22lspecified cuu as printable I characters I Icharacteis -----+----------------------------------23 Inot used 1-----+-----.-----------------------------123 Inot used -----+-------------~--------------------- I---~-+----------------------------------124 IInformatio~ hyte 1 Ibit 0 - noi used • Ibit ~ - Fain was specified 1 Ibit 2 - NOCHKwas specified 1 Ibit 3 - NOLMSG was specified 1 I bit· 4 - TRAIN=xxxxxx was specified 1 Ibit' 5 - LPI=n was specifiea 1 loits ~ and 7 - not used 1---'-- +-.--:..------------....;-----:------------125 IX·OO· (usea to clea~ table J I IUPRMADHT) I 24 IInformation byte Ibit 0 - not used ,bit 1 - FOLD was speciiied Ibit 2 - NOCHK was specified Ibit 3 - NULMSG was specified Ibit 4 - FORMS=xxxx was specified Ibit 5 - LPI=n was spec~fied Ibits 6 and 7 - not used I 1X· 00' (used to clear table jFPRMADRT) 1 • -----+----.---.-- ----,----------------------1 25 L----------------------------------~--~---~ L-----------------------:--~----- __________ ~ 1!Qte: This area (FINFAREA in $$BATTN8 ~ud UINFA1--,N~O:::......_ _ _ _ _ _ _ _ _.,....._ _~ If IPL is not complete, fetch $$B EOJ. and RF table available If OLTEP is terminating, fetch $$BTOLTP. I n all other cases fetch $$BEOJ3A. Chart DO YES SVC2 $$BEOJ7 TAPE AND DISK PUB2 PROCESSO~ SVC2 $$BEOJ3A SVC2 $$BTOLTP* Documented in OLTEP publication Charts DL- ON For opened tape units assigned to this partition, RMSR records are created and the PUB2 entries are updated. For opened 3330, 3340, 3350, and F BA units assigned to this partition,counters in the control unit are emptied and the PUB2 entries are updated, provided the supervisor was generated for a model larger than 125. If PUB2 is for 3540 and being used as a problem programmer unit, then bits are reset in PUB2 to signify file open on device. If overflow occurs during PUB2 updating, a record is created which is written on SYSREC. . HALT 1/0 ON TIP DEVICES I t ( SVC2 $$B~OJ TERMINATE TASK AND INITIALIZE PARTITION SVC2 $$BEOJ 4 - Charts DA-DC If IPL is canceled, issue message and enter hard wait. Release all resources owned. In case of cancel code X'35' or LTA-cancel, output message. For subtask termination, detach the subtask. The following is done for maintask termination: If rotational position sensing is supported, delete any RPS phases, dynamically loaded into the SVA for the terminating partition. Invalidate page table entries for virtual partition (SVC 59)_ For real execution, release the page frames to the page pool (SVC 54). Clear and reset the G ETVIS area (SVC 62)_ Load $JOBCTLA into the partition. Initialize the PSW for the partition. 32 Chart DE TIP devices are disabled and halted (if on the queue) for a terminating task_ Channel queue entries which point to themselves are brought into the list of free entries again_ DOS/VS Logical Transients Hard Wait FDO t SVC39 DETACH ~-------" Chart 13 ... Terminat:>r Routines (Part 2 DUMP/JOUMP Macro SUPERVISOR '.Jf 3) Any ABEND Condition CANCEL Command/Macro ~ TERMINATOR IN SUPERVISOR (called by SVC 2 and SVC 6) Prepares parameter list for system dump (Cancel code and save areas address(es») I t $IJBDUMP (IN SVA) - See Note below SYSTEM DUMP PROCESSOR r-- Charts EA - EH, ES - EW, and FA - FC • Determines the cause of the dump request. No dump is given in the following cases: - a CANCEL macro has been issued without subtask attached - a subtask being canceled due to maintask cancellation - a maintask or a subtask being canceled due to a CANCE L ALL macro issued in another subtask - SYSLST was not assigned - OPTION NODUMP was in effect. • Calls IJBEOJ to get the terminating message(s) written. • Dumps the LTA registers if the failure occurred in the task owning the LTA. • Dumps the registers of the ending task (general registers, floatingpoint registers, and control registers). • If OPTION DUMP is active, the supervisor is dumped. ro• If OPTION PART DUMP is active, the following supervisor control blocks are dumped: COMREG, SYSCOM, PUB, PUBOWNER, PUB2, LUB, JOB; Extent Block, DIB, DIB extensions, SYSFI L buffers, PI B. I n addition, the l T A is, dumped if the terminating task owned it. • Dumps the terminating partition including the used part of its GETVISarea. __ • If the failure occurred in the SVA, the SVA phase containing the error is dumped. • If OPTION DUMP is active, the used parts of the system GETVIS area are also dumped. SVC 11 IJBEOJ - CANCEL MESSAGE WRITER Chl\rts FP - F R • Writes CANCE L messages for abnormal task termination. • Gives status of the problem program area at the time of cancellation by printing the user's PSW (message OS071). I~----------------~ Note: $IJBDUMP contains the following routines: IJBSDUMP (Charts EA - EP): IJBDMPPA (Charts EQ - ER): IJBDMPAR (Charts ES - EW): IJBDMPIO (Charts FA - FC): IJBDMPIC (Charts FF - F K): IJBEOJ (Charts FP - F R): System dump monitor - PDUMP monitor - DUMP command monitor Dumps supervisor control blocks Prepares an area of storage for output and validates addresses Performs I/O for system dump and PDUMP macro Performs I/O for DUMP command Writes termination messages on SYSLOG and SYSLST Terminator Routines 33 Chart 14,.. Terminator Routines (Part 3 of 3) PDUMP Macro SUPERVISOR TERMINATOR IN SUPERVISOR (called by SVC 2) Prepares parameter list for PDUMP (save area address(es)) $IJBDUMP (in SVA) -See Note on Chart 13 Charts EA - EB, ES - EW, and FA - FC PDUMP PROCESSOR • Provides a means of dumping a portion of storage as desired. Records on SYSLST (which can be disk, tape or printer) the contents of storage specified in the PDUMP macro. The printout is in the format: - Genera I registers 0-15 - F loati ng-poi nt registers, if present - Control registers 0-15 - Storage area specified by parameter limits. • The area is printed 8 words to a line in hexadecimal, followed by the same 32 bytes in printable character form. If the area to be dumped crosses an invalid address space, a message is written on SYSLST. SVC 11 Returns to supervisor which returns to problem program after SVC 2 of PDUMP 34 DOS/VS Logical Trallsients r--------------------------------------------------------------------~ Cancel Code (hex) I Message I Code I I Descriptive Part of Message or Condition ------------+----------+--------------------------------~----------- OF OP80I Invalid read from or write to system file on FBA Normal EOJ 10 11 OV071 No channel program translation for unsupported device 12 OV06I Insufficient buffer space for caannel program translation 13 OVOSI CCW with count greater than 32K 14 OV041 Page pool too small 15 OV02I Page fault in disabled program 16 OVOilI Page fault ~n MICR stacker select or P.F_ appendage routine 17 05021 Program request (same as 23 but causes dump because subtasks were attached when ma~ntask issued CANCEL macro) Eliminates cancel message when main task issues DUMP macro with suotasks attached 18 19 OP741 IIO operator option lA OP731 1/0 error 1B OP821 Channel failure 'lC 05141 CANCEL ALL macro 1D 0512.I Main task termination 1E 05131 Unknown ENQ requestor lF Opel I CPU failure 20 OS031 Program check 21 05041 Illegal SVC 22 05051 Phase not found 23 OS02I Program request 24 0501 I Operator intervention 25 OP77I Invalid address 26* OP711 SYSxxx not assigned(unassigned LUB code) 27 OP701 Undefined log~cal unit L--------------_______________________________________ ---------------J Figure 6~ Cancel Codes and Messages (Part 1 of 2) Terminator Routines 35 r---------------------------------------------------------------------~ I Cancel t Code (hex) I Message I Code I Descriptive part of Message or Condition t I t ------------+----------+-----------------------------~--------------- 2A OV10I I/O error on page data set 2B OP84I 2C OV09I I/O error durlng fetcn from private core image lioraLY Illegal parameter passed by P.F. appendage routine 2D OP88I Program cannot be executea/r€started aue to Lailing storage block 2E OS16I Invalid 2F OV03I More than 255 PFLX 30 OPi121 Reading past /& statement (on SYSRDR or SYSIPT) 31 OP75I I/O error queue overilow (erLor queue overflow) 32 OP76I 33 OP79I Lequest (posslble aeadlock) re~u€sts Reserved 35 OP85I Jon control open failure 36 OV08I Page fault in I/O 37 for 1 page ! Invalid DASD address I I Invalia first CCW • 34 ~esource appen~age routine Reserved 38 OV1~I Wrong privately translated CCW Reserved 39 40 5J95I Invalid termination oi VTAM 41 5J96I Invalid VTAM condition code 42 OP86I Violated DASD Lile protection OP83A** Supervisor catalog failure OP87A** IPL failure OP78.I Unrecogized cancel code xx all others L---------------------------------------------------------------------~ * If the CCB is not available, the loglcal unlt is SYSxxx. ** The cancel code is not significant in case of a supervisor catalog or IPL failure, because the systam is placed III the wait state without any further processing by the Terminator_ Note: In addition to recognizing the cancel coaes above, the Terminator also recognizes the same codes with the X'80' Dlt on (cancel occurred in LTA)~ Figure 6. 36 Cancel Codes and Messages (Part 2 of 2) DOS/VSE Logical Transients r------~----------------------------------, IheturnjMeaning Icode I The p~int control buffers of a be loaded as follows: • • printe~ can 1------1---------------------------------00 IThe FCB'load operation bas been • J Automatically du~ing IPL. $$BU~LD~ togethe~ with $$BUFLDl and $$bUFLD2 are provided to load the FCB and UCB of a pertinent printer with the standard control info~mation. (See QQ~Y~~ !~~1i~! g£Q~£~m 1Q~g ~ng JOQ ~on~ro! 04 1Q~~£· ) 08 Dynamically by issuing the LFCS or LUCB attention command. lSee tAe section OC !i~g~iiQ~ £QY1~n~§)· ~ • As a separate job step by executing the SYSBUFLD program. (See QQ~LY~~ !nit~~! !:£Qg£~~ 1Q£!Q ~ng ~QQ ~Qn1£Q! 1Qgi£,·) Dynamically by issu~ng the LFCB mac~o in a problem program. (This macro can only be used to load'the FCB of a printer) • 10 The specified logical unit has been assigned to a device without ( an FCB. I 14 The printer assigned to the specified logica~ unit is down. 18 $$BATTFO is executed when an LFCB macro is issued in a p~oblem prog~am (see Chart 1~_ This phase performs the necessary checK~ng ,~unctions fo~ the requested FtB load ~peration and calls $$BATTF2 (for a PRT1 printer) or $$BATTF3 (for a 3203 or 5203 printer). The phases $$BATTF2 and $$BATTF3 return control to the problem program that issued the LFCB macro. The phases indicate the res~lt of the load operation to the problem program by means of a return code in register 1~_ These return codes are: Icompleted successfully. I IThe assigned frinter ~s of class IPhTl and the LPIoperand specified lin the macro does not agree with Ithe FCB image. I INo LUB ~s available for the ISfecitied logical unit. I (The speciLied logical unit has not been assigned or is currently unassigned. lC I I I I The specified FCB image has not • been found. I I The specified FCB i~age is invalidl Ifor the printer assigned to the I Ispec~Lied log~cal unita I L-----------------------------------------~ r-----------------------------------------, 1-----1----------------------------------I 0-7 ISpecified phase name (-----1----------------------------------I 8-101xxx of SYSxxx specified in tne IByteslContents • Imacro 111 • IFO~MS ~ndicator: X'Fl' = IFOliMS=xxx was specified I--~--I----------------------------------- I-----I---~------------------------------- .12-15IForm number specified in the macro 1-----1----------------------------------116 ,LPI value in the macro or spec~fied 1 IX'FO' .-----1----------------------------------117 INULMSG indicator: X'Fl' = NULMSG J ~L-- _______________________________________ Iwas specified Figu~e 7. Layout of the LECB Macro Information Area Various Special Service Programs 37 r-----------------------------------------~ ByteslContents 1 -----1-----------------------------------1 0-7 JSpecitied pAase name 1 -----1-----------------------------------1 8-111Form number, if or blankt specif~ed, -----I---------------------------~-------I 12 INot used , -~---I-----------------------------------I 13 INumber of lines per inch, if jspecified, or blank 1 • -----1-----------------------------------1 14-151Logical unit class and number 1 -----1-----------------------------------1 16-19lAddress of PUB , -----1-----------------------------------1 20-23lAddress of user register 15 save 1 ,area 1 -----1-----------------------------------1 24 IInformation byte , IBits 0-2: Not used 1 IBit 3 NULMSG was spec~fied ~ IBit 4 FORMS=xxxx was specified 1 ,Bit 5 LPI=n was specified 1 IBits 6-7: Not used , -----1-----------------------------------1 25 INot used I L-----------------------------------------~ Figure ci. Layout of LFCB Macro Communication Area l$BSYSWR is used oy HAINT~ IPL, $LNKEDT, CORGZ and $iIBSTATto turn 'on' a bit ~n th~ communications regiBn, which allo~s programs to write on DASD devices that are DASD file protected. In addition, the transient moves the address of the label information area to the communication region,. ~$BCCHHR is used by IPL to scan the core image directory for' all modules whose names Degin with $$RAST. It builds an in-core directory (load list) for the RAS phases. This directory is located in the BAS taole in the supervisor. The directory facilitates the ietching function of the BAS moaales into the RAS transient area (BTA) .• 38 DOS/VSE Logical Transients The objective of this routine is to periorm close processing for any 3800 printer files opened in extended butfering moae and left unclosed by the user program; tnis ensures that all buiIered data is printed. ~nl£Y: From $$B~OJ4 when a main tasK terminates; from ~$BCLOSE and $$BCLOS2 when c10se processing initiated by $$BPCLOS is complete. ~~i1§: To $$bCLOSE to close a 3800 printer f11e lett unclosed by a aser program; to $$BEOJ4 when all 3800 printer files have been closed .. ~g1hQg: This module uses the chain of DTFXWAs (DTF extension work areas) to identify 3800 printer f1les opened in extended buffering mode and left unclosed ny the user program. The DTFXWA chain is anchored in the anchor table extens10n (ATXl- The ATX is created when the 3800 open rOlltine IJDPR3 issues CDLOAD for the non-executable module IJDANCHX. When the IJDANCHX module is loaded, it becomes the ATX itself_ Thus, the ATX is pointed to by the entry in the anchor table tor module IJDANCHX~ $$BPLCOS selects the iirst DTFXWA on the chain, builds a close parameter list uS1ng the DTF pointer in th~ DTFXWA, and 1nitiates close process~ng for the f11e by transferring control to $$BCLOSE,. Before invoking $$BCLOSE, $$BPCLOS marks the DT~XWA as hav1ng been already selected for close processing. Thus, if close fails and the DTFXWA is left on the cnain, it will have been marked as already processed~ After completing their processing, the close routines will fetch $$HPCLOS which will initiate close processing for the next unprocessed file on the DTFXWA chain. This will continue until all files have been processed .. If all files have been processea, but there are still DTFXWAs on the chain, this indicates that one or more of the files did not close successfully. In this case, a message is issued to inform the user of the situation. Afer all of tbe 3800 printer files habe been processed, $$BPCLOS returns control to $$BEOJ4~ Chart 115 ... LFCB Mac~o Processor $$BATTFO FCB LOAD INITIATION PHASE Charts GK This phase receives control when an LFCB macro is being executed. The functions are: • Process the macro operand information contained in MINFAREA, the 18 byte are pointed to by register O. (For a layout see Figure 7) .. • Check whether a LUB is provided for the specified logical unit. • Ignore the command if the logical unit is assigned to a 3800 printer. - - - - . - - - - - - • Ignore the macro if the logical unit is aSSigned to a 3800 printer with an FCB and whether the printer is not in a device down condition. • Move the information needed by the FCB load execution phase from MINFAREA to INFAREA. (For a layout 'see Figures 7 and 8.) • If an error occurs, place the appropriate return code in register ----11-------1 15 and return to the problem program .----+-. If the device is a PRT1 printer, fetch SSBATTF2. , . . - - - - l - - - - l f - . Otherwise, fetch $$BATTF3. $$BATTF2 .I LFCB MACRO EXECUTION PHASE FOR PRT1 Charts GL·GM This phase executes the buffer load request. The function are: • Align forms to line 1 by loading an auxiliary FCB load. • Retrieve the specified FCB phase from the core image library and load the contents of that phase into the FCB. • If FORMS=xxxx was specified, issue message 1 B14A to inform the operator about the required. operator action. • When the required operator actions is finished, skip the forms to the channell position of the new FCB load, print the verification message, provided NULMSG was not specified, and skip the forms to channell again. • If an error occurred during any of the above operations, set the appropriate return code in user register 15. • If no error occurred, set user register 15 to O. • Return control to the problem program that issued the LFCB macro. $$BATTF3 J LFCB MACRO EXECUTION PHASE FOR 3203 AND 5203 Chart GN This phase executes the buffer load request. The function are: • Align forms to line 1. • Retrieve the specified FCB phase from the core image library and load the contents of that phase into the FCB. • If FORMS=xxxx or LPI=n was specified, issue message 1 B13A to inform the operator about the required operator action. • When the required operator action is finished, skip the forms to the channell position of the new FCB load, print the verification message, provided NULMSG was not specified, and skip the forms to channel 1 again. • If an error occurred during any of the above operations, set the appropriate return code in user register 15. • If no error occurred, set user register 15 to O. • Return control to the problem program that issued the LFCB macro. Return to Problem Program Various Special Service Programs 39 included throughout the screen management phases. CRT transient routines provide support for the display operator consoles 125D (DOC) and 3271, and 3278 Model 21. CRT transients resid~ in the core image library and are fetched into the CRT transient area (CRTTRNS) each time the supervisor encounters a request for a 125D or 3277/32~8~ Since these requests may require different services, CRT support is aivided into 30 transient phases.. Each phase fits into the CRT transient area (CRTTRNS) which is 1~56 bytes long. The hard-copy file phase $$BOCRTH, the redisplay phases $$BOCRT3 and $$BOCRT5, and phase $$BOCliTU must write to (or read from) the disk on which the nard-copy file resides. Disk errors that cannot De handled by the supervisor-resident ERP routine are processed by $$BOChTB (see Chart 22). Errors that appear during screen I/O operations are handled by phase $$BOCRTE, which in turn may fetch $$BOCliTF (SEe Chart 22)A Each time the CRT support is activated, control is first transferred to phase $$BOCRTA (see Ch~rt 16). Since this phase is also the last phase executed before the CRT support is deactivated, $$BOC~TA is always in the CRT transient area (CRTTRNS), even when the CRT support is not active. 1 summary of tne CRT transient phases is given in Charts 16 through 22. It is followed by a detailed description at each phase in alphabetical order. ~i!!~~gn£g§ ~g1~ggn ~~! ~!!EEQ~i SUEEor1 ~n~ !Q~~ The CRT transient phases perform the following functions: • • Channel Program Processing. The channel programs for a print~r-Keyboard console I/O request (refe.rred to as SYSLOG channel progra~s~ although the--device may be assigned to any programmer logical unit) .are interpreted and translated (see Charts 17 and 18). Screen Management. Screen management performs two logically different functions: a. b. K-command processing and/or automatic screen management during any I/O~ This is handled by phases $$BOCRTK through $$BOCRTQ, $$BOCRTV through $$BOCRTY (see Charts 19 and 20). Redisplay of ~essages recorded on the hara-copy disk file. This is handled by phases $$BOCRT1 through $$BOCHT6 (see Chart 21)_ • Error Condition Handling. Errors may arise from wrong parameters of K- and D-(redisplay) commands. These errors are detected and their repair is 40 DOS/VSE Logical Transients CRT support and 1052 support are compatible with the following Exceptions: ~ CRT does not support program-controlled interrUpts (PCI). The ~CI Dit in any user-suppiied ccw chain ~s ~gnored, that is, the CCW is handled as ~i the PCI bit had been generated otf_ • An SVC 0 given for a display operator console always causes the associated data to be displayed on a new l~ne, even if the preceding SVC 0 has ended with a 'Write without carriage return' command. (Tnis applies only to read and write operations.) • When a Read command ~s encountered whose Skip-Data b~t is generated on, the user is allowea to enter all his data. However, the data is not aisplayed in the message area:- • ILan incorrect length is detected for a read operation, the Incorrect-Length bit in the CSw is set on only if the byte count is notexbausted and tbe SLI (Suppress Length lndicato~ bit in the associated CCW is zero. Chart 16. CRT Root Phases * From Charts' __- - - - -.... 17 Start I/O ) V~; '--_R_o_u....t_in_e---'· r-:-l T $$BOCRTA Charts KA-KC CRT ROOT PHASE This phase is always fetched as the first and last CRT phase: One entry from the Start I/O routine, phase $$BOCRTA: • flags the CRT device 'busy' in its PUB; • activates the CRT task; • replaces the SYSLOG-requesting CCB/IORB by the CRTCCB; • stores the address of the first CCW in a save area. If the CCW specifies special interface, $$BOCRTU is fetched. All other CCWs are passed to $$BOCRTZ for further a:1alizing One entry from the I/O interrupt handler, it is determined if more CCWs are to be executed. If so, $$BOCRTZ is fetched to analyze the CCW. When an attention request is encountered, $$BOCRTK is fetched. After completion of the channel program, $$BOCRTA: • Restores the CCB/IORB in the channel queue; • Moves the CSW that has been set up by the CRT phases to location '40' in low real storage; • Moves the cannel and unit address of the CRT device to location X'BA' in low real storage; • Deactivates the CRT task; • Returns control to the I/O interrupt handler via register 9. $$BOCRTU UPDATE HEADER RECORDS I-- Chart PJ This phase performs one or more of the following functions: • Forces writing of the hard-copy file buffer, calls $$BOCRTA.------------------------4-----~ • Sets new wrap-around address in header record, calls $$BOCRTA.------------------------4-----~ • Invalidates wrap-around address in header record, calis $$BOCRTB. 1 ~ $$BOCRTB 19 $$BOCRTZ I/O Interrupt Handler $$BOCRTK CHANNEL PROGRAM ANALYZER Charts QG-OM This phase checks a CCW for valid OP code, valid byte count, unused bit setting and valid or protected I/O area address. The status of the checks is registered in a CSW that is returned to the user. $$BOCRTZ calls the following phases: • $$BOCRTA if the next CCW to be processed is in error; • $$BOCRTC if a Write, NOP, or Alarm CCW is to be processed; • $$BOCRTR if a Read CCW is to be processed, or if Write without carriage return CCWs are followed by a Read CCW; ----------+-~ • $$BOCRTG if an error is encountered in a CCW $$BOCRTC which is not the first CCW in the chain;------I--o • $$BOCRTE if the nect CCW to be processed is a Sense CCW. ~ 18 $$BOCRTR 22 $$BOCRTE ~ $$BOCRTG Display Operator Console Support 41 Chart 17. CRT write Processor Phases From Charts: 16 18 22 $$BOCRTC WRITE PROCESSOR (Part 1 ) Charts KG-KK This phase transfers all the read or write data from a SYSLOG channel program to the screen image ruffer, inserts the relevant information in the screen control table (SCT) entries, and analyzes the message header. If the screen message area is full, $$BOCRTO is fetched. _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _+-_ _ _ _ _ _ _.... * From Charts: $$BOCRT A is called if command-chaining is indicated in the current CCW.-:------------+---... If the current CCW is not chained, $$BOCRTG is fetched. _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _-I-_ _ 16 22 ..=::=.:::..:::.!.!..!..!~ _ _ _ _ _ _ _ _ _ _ _ _ _ _ ___' Control is transferred to $$BOCRTO if the data exceeds one screen line. $$BOCRTG WRITE SCREEN MESSAGE Charts MA-MC This phase writes the screen image buffer to the screen after the data has been completely transferred to the buffer. .....t---+$$BOCRTE is fetched if a screen I/O error occurs If no hard-copy support and no console printer, _----=:=.=..::::..::~.:----,;. $$BOCRT A is fetched. . _ _ - - -.... Attention requests are handled by $$BOCRTK. If no console printer is supported, $$BOCRTH is fetched. . Otherwise, $$BOCRTI is fetched. $$BOCRTO WRITE PROCESSOR (Part 2) Charts LA-LC This phase handles the line overflow caused by successive 'Write without carriage return' CCWs, by data-chained CCWs, or by single CCWs with a byte count greater than the capacity of a single line. If the channel program is to be continued, $$BOCRTA is fetched. _ _ _ _ _ _ _ _ _ _-f-_ _ _.--I Control is returned to $$BOCRTC if no chaining is encou ntered. $$BOCTRO is fetched if .no line is currently . available. $$BOCRTA $$BOCRTK $$BOCRTI WRITE ON CONSOLE PRINTER $$BOCTRO * From Charts: 20 22 $$BOCRTH Charts MD-MF WRITE HARD-COPY RECORDS This phase writes on the hard-copy file the new lines that have been displayed on the screen. If a hard-copy disk error occurs, $$BOC RTB is ________________ ~tched. ~-------- ___ $$BOCRTO is called if a message exceeds the availablemessage area. _ _ _ _ _ _ _ _ _ _ _ _-+_____---. $$BOCRTU is called if overlay mode is entered to invalidate wrap-around address. _ _ _ _ _ _ _ _+-...., $$BORTU 42 DOS/V~E Logical Transients Chart MG Writes internal protected lines on console printer. If no hard-copy support, fetches $$BOCRTA or $$BOCRTO (if called from $$BOCRTY). Otherwise, $$BOCRTH is fetched. $$BOCRTO $$BOCRTB Chart 184 CRT Read Processor Phases * From Charts: 16 22 $$BOCRTR READ PROCESSOR (Part 1) Charts PA-PC This phase is the root phase of the read processor. It reads an operator command or analyzes a Read CCW. $$BOCRTK is fetched if an operator command is to be handled.------------------I----------------. If a Read CCW is preceded by an erroneous Write CCW, $$BOCRTC is called.------------~>-----------, On screen I/O errors, $$BOC RTE is fetched.-------I---~ $$BOCRTE $$BOCRTC $$BOCRTK $$BOCRTS READ PROCESSOR (Part 2) Charts PD-PF This phase allows an operator to enter data corresponding to a Read CCW, or if the Request key is pressed, to enter a command. A command is handled by $$BOCRTK.-------f--------.:....------..., Control is returned to $$BOCRTR if the Read CCW i+--+- is canceled. On screen I/O errors, $$BOCRTE is fetched.-------I---~ $$BOCRTE $$BOCRTK $$BOCRTT READ PROCESSOR (Part 3) Charts PG, PH This phase moves the data (corresponding to the SYSLOG channel program) into the requestor's input area. On screen I/O errors, $$BOCRTE is fetched.-------1---~ If the read channel program is to be continued, '---+-control is given to $$BOCRTR. $$BOCRTC is called if SYSLOG Read CCWs are to be handled.---------. $$BOCRTE $$BOCRTC Display Operator Console Support 43 Chart 19. CRT Screen Management Phases (Part 1 of 2) * From Charts: Y $$BOCRTK 16 17 18 20 COMMAND ENTRY PROCESSOR Charts MH-ML This phase analyzes operator commands and branches to the appropriate phase. $$BOCRTA is fetched if system commands are to be handled. On screen I/O errors, $$BOCRTE is fetched. Redisplay commands are handled by $$BOCRT2. $$BOCRTL through $$BOCRTP are called to handle screen management commands. ~ cb 16 $$BOCRT2 $$BOCRTE ~ ~ $$BOC RTM-----+ $$BOCRTL DELETION BY K_COMMANDCharts MN-MP This phase handles K-commands with the subparameter E except K e, N. If a command is in error, $$BOC RTV is fetched. 8 This phase determines from the cursor address the range of message lines to be deleted. On invalid cursor operation, $$BOCRTP is fetched.- $$BOCRTO $$BOCRTN DELETrON BY CURSOR Chart NA SCREEN MANAGEMENT MODE Charts NB-ND 17 20 22 $$BOCRTQ 20 * 21 22 $$BOCRTP 1 DELETION OF MESSAGE LINES 6 44 DOS/\SE Logical Transients G $$BOCRTW 1 20 2 $$BOCRTV $$BOe RTX ~ EXIT INTERFACE Charts NJ, NK This phase deletes message lines. Control is given to $$BOCRTP on exit from a deletion command. Exit is to the calling phase if message lines have benn deleted. $$BOC RTW is called during non-automatic deletion mode and if only non-deletable messages are on the screen. If line numbers are to be displayed/erased, $$BOCRTO is fetched. Charts NE,NF This phase proce~es the display K-command. If the system is in conversational mode, $$BOCRTX is fetched. If a command is in error, $$BOCRTV is fetched. $$BOCRTV * From Charts: ~ LINE NUMBER DISPLAY This phase processes the specification K-command. If a command is in error, $$BOCRTV is fetched. • f,om e,""" ~ $$BOCRTA Charts NG, NH This phase establishes the interface between the screen management phases and the supervisor. If a K-command had been enter~d because the message area was full, control is given to the phase whose name is passed in CRTNAM1. On screen I/O errors, $$BOC RTE is fetched. -Otherwise control is given to $$BOC RT A. 16 22 $$BOCRTA $$BOCRTE Chart 20. C~T Screen Kanagement Phases (Part 2 of 2) * From Charts: 19 * From Charts: 22 19 21 22 $$BOCRTV $$BOCRTW Chart PK COMMAND ERROR MESSAGE WRITER DISPLAY WARNING MESSAGE ChartOA This phase displays error messages related to invalid This phase displays the message 'OOOSA MESSAGE K- and O-commands. WAITING' if a message cannot be displayed beca~lse On screen 1/0 errors, $$BOCRTE is called.------fo-----..., the screen is full. $$BOCRT1 is fetched when the system is in redisplay ~----t- On screen 1/0 errors, $$BOCRTE is called. mode. $$BOCRTK is fetched to analyze the operator's action. If the message to be displayed exceeds the message Otherwise, f!xit is to $$BOCRTP. a~ea, $$BOC RTY is called. ~ $$BQCRTP $$BOCRT1 $$BOCRTK $$BOCRTY HANDLE LONG MESSAGES .....~---t- From Charts: 19 22 Charts OD-9F This phase handles messages that are longer than the message area . On screen 1/0 errors, $$BOCRTE is called. $$BOCRTO is fetched if the hard-copy file is closed. If a console printer is supported, $$BOCRTI is fetched. If the hard-copy file is open, $$BOCRTH is fetched. $$BqCRTX VERIFY OPERATOR COMMANDS Charts OB, ac This phase displays a message deletion request, given by the operator, in the form of a K-command and waits for the response of the operator. If the operator presses CANCE L, $$BOC RTP is fetched. Control is given to $$BOCRTK if the operator changes fll 8 $$BOCRTE $$BOCRTH SSBOCRTI the parameters or command. ~ $$BOCRTM is called if the operator sets the cursor . - - - + L...._'f_d_e_'e_t_io_n_m_a_y_be_p_e_r_fo_r_m_e-rd,_e_x_it_i_s_to_$_$_B_0_C_R_T_L_._ _Cj--'19 ~ $$BOCR~BOCRTP , 19 $$BOCRTL $$BOCRTK Display Operator Console Support 45 Chart 21. CRT Redisp1ay Phases * From Charts: 20 22 $$BOCRTl Charts RA, RB MESSAGES REDISPLAY (Part 1) This phase allows new display commands to be entered when the system is in redisplay mode. $$BOCRT6 is called if the operator pressed only ENTE R . - - - + - - - - - - - - - - - - - - - - . On screen 1/0 errors, exit is to $$BOCRTE.~--------+-------. If a ® D-<:om~~]', entered, $$BDCRT2 is fetched. V $$BOCRTE $$BOCRT2 MESSAGE REDISPLAY (Part 2) Charts RC, RD This phase examines the parameters of the redisplay command on first entry to redisplay. If the command contai ns a syntax error, $$BOC RTV is fetched.;--f---------. Otherwise, exit is to $$BOC RT6. ~ V$$BOCRTV f $$BOCRT6 MESSAGE REDISPLAY (Part 6) Charts RL, RM This phase checks the current redisplay command parameters for logical consistency. If the command contains a~logical error, $$BOCRTV is fetched.-+----8--'20 $$BOCRT5 is fetched on first entry to redisplay, while $$BOCRT3 is called if only the hard-copy disk CCWs and the CCB have to be relocated. $$BOCRTV $$BOCRT5 $$BOCRT3 MESSAGES REDISPLAY (Part 3) MESSAGES REDISPLAY (Part 5) Charts RE·RG This phase reads records from the hard-copy file according to the parameters specified in the current redisplay command. On disk errors, $$BOCRTB is called. -------+---~--__I $$BDCRT4 is fetched to ...ite to the .,'een. ® I Charts RJ, RK This phase saves the current screen image on entry to redisplay mode and restores the screen image on exit from redisplay mode. On disk errors, $$BOCRTB is called. $$BOCRT6 is called on entry to redisplay mode.---+---' Exit is to $$BOCRTP if the hard-copy file is closed.--+---. $$BOCRT4 is fetched on exit from redisplay mode. I $$BOCRTB $$BOCRT4 Chart RH MESSAGE REDISPLAY (Part 4) This phase displays eight message lines read from the hard-copy file. $$BOCRTP is called on exit from redisplay.--------t-----------------i~1 On screen 1/0 errors, $$BOCRTE is fetched .--------t------~...,22 Otherwise, exit is to $$BOCRT1.,....-------., 6 46 OOS/VSE' Logical transients V 19 $$BOCRTE ,$$BOCRTP Chart 22. CRT ERP Phases * From Charts: 17 21 $$BOCRTB HARD-COPY DISK ERP Charts KD-KF This phase processes all hard-copy disk I/O errors that are not handled by the supervisor-resident disk ERP routine. $$BOCRTB tries to repair the error and controls any subsequent messages. Hard-copy overflow conditions are indicated to the operator. To display messages, $$BOCRTG is fetched.------f------------, $$BOC RTO is called if no I ine is currently available to display the message.-----------+----. * From Charts: $$BOCRTE CRT E RP (Part 1) 16 17 18 19 20 21 $$BOC RTO $$BOC RTG Charts LD-LF This phase analyzes irregularities detected during screen I/O operations and processes sense commands appearing within SYSLOG channel programs. Exit may be to any phase after an intervention required condition has been f u l f i l l e d . - - - - - - - - I - - - - - - - - - - - - - - , $$BOCRT A is called if a sense command is command- or data-chained. ------------1-----------, Exit is to $$BOCRTC for a sense command without chaining.------------------+----, $$BOCRTF is fetched to handle all errors except intervention required. $$BOCRTF CRT ERP (Part 2) Charts LG-LK $$BOCRTC $$BOCRTA This phase handles all screen I/O errors except intervention required. Exit may be to any phase after screen I/O errors (except intervention required) have been handled.-----I--------------+I $$BOCRTE is called if a unit check condition occurs L-.-_+- during the retries. After operation check, command reject, and on programming errors, exit is to $$BOCRTH, provided the $$BOCRTG hard-copy file is open . ----..,.----------+---------, $$BOCRTR If the hard-copy file is not open, exit is to $$BOCRTA.,---t----, $$BOCRTS The hard wait state is entered when no recovery is $$BOCRTT possible from any channel errors. $$BOCRTK $$BOCRTP $$BOCRTV $$BOCRTW $$BOCRTA $$BOCRTH $$BOCRTY $$BOCRTl $$BOCRT4 Display Operator Console ~upport 41 'Any req~est for a display operator cnnsole (125D OL 3271/3218) is passed directly tram the Start-I/O routine in the supervisor to this phase to initiate tae CRT transient routines. The ChT routines hdnJle all requests on the display operator consoles~ En!.!:y: From the Start-I/3 routin~ in the supervisor when a 125D or 3211/3278 request is encountered; from ph~ses $$aO~hTG, $$,BOCRTE, $$BOCRTH, and $.5BOCRTZ when execrition of the channel program has,been completed; from phases $$BOCRTC, $$rl3C:tTD, and $$bOCRTE when the channel program . contains command chaining; from phase $$BOCRTK after an attention interrupt has been handled; ~rom phase $$BOCBTO after the PRINTLOG utility has been completed; from phase $$BOCRTP after a screen management command has been completed; from phase $$BOCRTF when an irrecoverable screen I/O error has occurred and the hard-copy f11e is not open .• ~~it: To phase $$BOCRTZ to analyze the channel program; to phase $$.BOCRTU to update the wrap-around pointer of the hard-copy file; to phase $$BOCRTK to handle an attention request. . l1~!.hQ.g: On entry from the Start-I/O routine, the CRT device is flagged 'busy' in its PUB. The CRT tas~ is activated and the SYSLOG-requesting CCB/IOBBin the he. channel queue is replaced by the CRTCCB. The address of' the ·first (or only) CCW of the scheduled SYSLOG channel program is directly taKen trom the CAW and stored in a save area that can be referenced by other phase~. It the CCW specifies wrap-around updating, phase $$BOCRTU is ietched. All other CCWs are passed to phase $$BOCRTZ for further ana1yzing. User CCWs are checked wheth~r or not they start on a doubleword boundary before being' passed to $$BOCRTZ,. On entry from the I/O interrupt handler, $$SOCBTA determines whethe~ more commands are to be executed for the current channel program. If so, $$BOCRTZ 1S fetched after the new CCW address has been saved in CRTSAV. If the channel program has been completed or if it is discontinued, tne channel gueue entry is restored to reflect the user status. In addition, the CSW set up by the processing phases is moved to storage location X'40', and the channel and unit address of ·the CRT device is moved to storage'location X'BA'_ After the CRT task has Deen deactivated, control is returned to the I/O interrupt handler. 48 DOS/VSE Logical Transients Hard-copy ais~ I/O errors, which are not nandled by the supervisor-~esident dis~ ERE routine, are proce~sed by this phase. $$BOCBTB tries to repair the error and controls any subsequent messages. In addition, hard-copy overfl~w conditions are indicated to the operator.' ~n!~Y: From the CRT transients that access the hard-copy d~~k file (S$B~C~TH, $$BOCRT3, and $$BOCRT~ and ~rom $$BOChTQ when the message area was full. ~~!!.: To pnase $$BOCRTG to display messages; to phase $$BOCRTQ if no line is currently availaDle. Method:' If less than two trac~s are available tor recording on tne bard-copy file, phase $$BOC~Trl sets a warning flag (se~ Figure 11) and, if subsequently the beg1nning of the tile is overlaid, also the overflow flag. Since botb indicators gi~e rise to a warning message, they are set off together by $$BOCRTB in orier to avoid repeated display of the ~arn1ng message. Phase $$BOCB'TH does not call $$BOCltTB but $$BOCRTA if the warning flng has already heen set previously by phase $$BOCR~H_ It disk errors occur auring redisplay, the messages already redisplayed on the screen are removed and the redisplay mode is set off. If the disk error i~ disastrous, CS~ and sense information passed via the disk CCE/IORB and thef~eld HCSNS in the save area CETSAV are displayed in a second me~sage ~ine. Furthe~ recording on the hard-copy file ~s then prevented by setting off the open indicator (see Figure 11)_ $$BOCR~B may issue the tollow1ng messages: HARD CUpy FL£E SHOULD BE PliINTED OD25EHARD COpy FILE IN OVERLAY MOD~ OD26E IR!i:ECOVEliABLE I/O ERROh. HC DISCONTINUED CSW=xxxxxxx SNS=x OD29E INCORRECT LENGTH DURING I/O FOR HARD COpy vD~OE This phase transfers all the read or write data from a SYSLOG channel program to the screen image buffer, analyzes the message type, and inserts the relevant ~nformation in the screen control table (SCT) entries. The format of an seT entry is shown in Figure 10 .• En!.~y: From phase $$BOCRTZ for write, NOP, and Alarm CCWs; from phase $$BOCRTT for Read CCWs; from $$BOCkTR if phase $$BOCBTA has indicated that a CCW chain is to be discontinued; from phase $$BOCRTQ when the message area was full; from phase $$BOCRTE and $$BOCBTD if the last CCW in a chain has been processed and the message type must be evaluated .. ~~it: To phasp.'$$BOeRTA when the current CCW indicates command chaining; to phase $$BOeRTG when the current eew is not chained; to $$BOeRTD when the data in a single tew or in data-chained eCis exceeds the space available in one screen line; to $$BOCRTQ when the' screen message area is fUll. Method: Data ox Read CCWs that are contained in the channel program passed to $$BOCRTe has already been entered in the screen entry area. However, since the data is part of the me~sage it mast be moved to the screen message area buffer like the write data. If a Read command had been cut off, that is, ~he operator pressed ENTER before the byte count had been exnausted, such ecws are indicated by the read processor phases, which store the relevant information in the save area CRTSAV. The address of'the last Read CCW witpdata is stored in CONTcew and the byte count is stored in ebNTRDSV. Residual count and CCk address are stored into tae requestor's eCB/IORB.·If a Read ecw has the SKIP flag set on, no data is moved into the message area. A message heaaAr analysis is performed when the whole message text has been inserted into the screen image buffers. Each SYSLOG message that is issued after IPL by a program via an SVC 0 interrupt and that begins with a CCW other than a'Sense CCW is preceded by the appropriate partition identifier (BG, Fl, etc). This identifier is followed by a message aeader (see Figure 9 for the message format). If the message begins wita a Sense cew, the header analysis resolves the message type as ·undefined'. This is also the case if the message is less than five characters long, since the type will then al~ays be indicated by a blan~, which is resolved as undefined. Each message hcs a corresponding SCT entry. The format of an SCT entry is shown in ~igure 10. The line status information in byte 0 is required for screen management. r-----------------------------------------~ t I I I I I 1 I ·l· · · ~;l F2' 1:) xyyy A D E -t5 text I. Z .. Fn 'I.Iwhere: hexadecimal alphanumeric Xl= y c: Z a~phanumer-ic except A, D, I• E, I I actio!! A I decision D t. E = eyentual action I I ~nformation I I ,Messages which do not Lit this format arel lconsiaered as undefined. • L-------------------------~---------------J Figure 9. CET Message ForQat r-----------------------------------------~ 1 I I I I I I 1 1 .1 Byte 0 - Line Statuz: Bit Bit ijit Bit Bit Bit Bit Bit 0: il: 2: 3: 4: 5: 6: 7: 1 A-type message 1 ~-type message 1 = D-type message I-type message Continuation Line 1 ::·Pree .Line Reserv<::d 1 = Protected (not yet on hard-copy file) Byte 1 - Partition Indicator: Bits 0 - 3: Contents of PID in xxCOMREG Bits 4 - 7: Contents of IJBTIK in SYSCOM Byte 2 - heserved Byte 3 - Line Numeer (X'O~' 1~ for - X'08' 5D) (XI' 01' - X' 14 ' fo'r 3277/3278) L-----------------------------------------J Figure lO~ Screen Control Table (SeT) Entry This phase handles the line overflow caused by successive Write without carriage return CCj.Js, by data-cilained CCWs, or by single CCWs ~ith a byte count greater than the capacity of a single line. Display Operator Console Support 49 ~nl£Y: From phase $$BOCBTC, which has detected the line overflow; from phase $$BOChTQ when the message area was full. ~~it: To phase $$BOCRTA when the channel program ~s continued; to phase $$BOCRTC if no chaining has been encountered: to phase $$BOCRTQ if no line is currently available.• flag in the CRTCCB are set OLf and the phase waits for the 'ready' interrupt. If these interr~pt condit{oLs are error-iree, the calling phase is :fetched again. The name of this phase is taken from CBTNAM2 in CRTTAB. Before the phase is fetched~ its registers are reloaded from the save area located at the ~nd of $$BOCRTE, where they were stored on entry to phase $$BOCBTE. ~gthQg: For the 125D, each line of the message area offers 53 bytes for the message text; for the 3277/3278, each line offers 76 bytes for the message text~ Since this is much less than the line capacity of a printer-keyboard console, messages must often be split up and distributed over several lines. If a message does not fit into one line, a backward scan by 22 character positions i$ performed on such a message for a blank, comma, or full stop. The message is split up at the first of these separation characters, if any, and continued in position four (for 125D) or five (for 321~/3278) of the next line. Apart from this separation method, $$BOCRTD follows very closely the method o£ $$BOCRTC. Th~s phase analyzes irregularities detected during screen I/O operations and processes Sense commands appearing within SYSLOG channe,l programs. From $$BOCRTZ fo~ processing of regular Sense CCWs; from any other phase in which a screen I/O erro~ occurred .• $$BOChTE may issue the following message: OD33A INTERV~NTION liEQUlkED FOR SYSLOG PhINTEli This phase handles screen I/O errors except 'intervention required'. ~n1£Y: From phnse $$BOCRTE. ~~i1: To phase $$BOCRTE if a unit cbeCK condition occurs auring the retries; to $$BOCRTH after operation check, command reject, and on programming errors (program checK or protection check), provided the hard-copy file is open (otherwise exit to $$BOCRTA). The hard wait state is entered when no recovery is possible ftom channel cha~ning checks or channel interfac~ checks. In that case, the code X'OOOOOCCC' is entered 1n general register ~1 and in bytes 0 through 3 in low real storage.• ~n1£I: ~~it: To phase $$BOCRTA on a Sense command with command or data chaining; to phase $$BOCRTC on a Sense command witbout chaining; to phase $$BOCRTF for handling of any errot except 'intervention required'; to any other phase when an intervention required condition has been fullfilled. Method: Sense commands from SYSLOG channel programs are executed as they occur within the channel program. CCW Chaining, however, is broken off.. The I/O routine works (disabled) with SIO and TIO instructions. Only one retry is perfo~med on any error during the Sense operation.. The I./O routine is also ~sed to analyze screen 1/0 err,ors. I If intervention is required for the SYSLOG printer, message OD33A is displayed in the instruction line (for the 125D). For the 3217/3278, the message OD38A is moved to low core. The Post flag and the Disaster 50 DOS/VSE ~ogical Transients ~g1hQg: The method is similar to the one usea by phase $$BOCRTh.. Three retries are carried out in the following cases: on channel errors, on equipment check, and on undetermined ~rrors (that is, the unused sense bits are on). The retry counter is passed between phases $$EOCRTE and $$BOCRTF in field DOCEIND in the save area CRTSAV4 An eqUipment cheCK may occur only for the SYSLOG printer. The hard-copy open flag is reset if recov~ry fails. Each message is displayed in the instruction line, because it is possible that $SBOCRTG cannot clear the ent1re message area, for instance, if an extremely long message is currently displayed. If there is no recovery from operation check and undeterminea sense indications, command reject, protection check, or program check, all the interphase cond1tions (indicated in DOCxIND in CRTSAV) are reset to the initial status. Thus, for example, a redisplay may be terminated. $$BOChTF may issue the following messages: OD34E E~UIPMENT CHECK ON SYSLOG PhINTER OD35E IRRECOVERABLE SCREEN I/O ERROR OD36E UNDETERMINED SCREEN I/O ERhOh_ SNS=x This phase writes the screen ~mage butter to the screen after the data of the SYSLOG channel program has been completely transferred to the Duffer. are set OfL. 1£ the hard-copy file is not o~en,the line protection is reset (see Figure 10).·Otherwis~, the address o£ the fir~t line to be pr~tited on the hard-copy file, the number of lines to be printed, and the relevantSCT entry address are passed to phase $$BOChTH in general registers 6, 2, and 13, respectively.. $$BOC~TG may issue the following message: OD28A INTERVENTlON REQD FOR HARDCOPYDLSK DEVICB From phases $$BOCRTB, $$BOChTC, $$BOCRTE, and $$BOCRTF. The phase may also be fetched when an attention request is encountered and after an attention request condition has been fulfilled. This phase wr~tes on the hard-copy disk file the'new lines that have been displayed on the screen~ ~~i!: ~ni£l: ~ni~Y: To phase $$BOCBTH for writing the hard-copy file; to phase $$BOCRTI for writing on the console printer; to phase $$BOCRTE on screen I/O errors; to phase $$BOCRTK when an attention request is encountered; to $$BOCkTA when the hard-copy f1le 1S not open or does not exist. From phase $$BOCBTG; from phase $$BOCRTI if a console printer is supported; from phase $$BOC~TF aiter irrecoverable screen I/O er~ors; from phase $$BOCliTY when messages that exceed the message area capacity are to be handl~d4 ' ~~ii: Method: Partition and subtask indicators are-Inserted into the relevant SCT entry (see Figure 10). The sound indicator DOCC02 in DOCxIND (in CRTSAV) and the message-type indicator are examined in order to determine whether or not the audible alarm should be generated. The screen message area buffer is scanned for messages belonging to the same partition and subtasK as the current message. If there' are any, the relevant lines are indicated as deletable by screen management. When a Read CCW is in the current channel program, the relevant message will also be indicated as deletable but the original message type will nevertheless be recorded on the hard-cop'y ii.1..e. The latter does not apply for E-type messages. The new message to be displayed is scanned for unprintable characters whose representation is smaller than X'40 1 • Such characters are replaced by blanks to'avoid that screen control characters appear within the data. Before the screen image buffer is displayed, it is cbecked whether phase $$BOCRTB has indicated that intervention is required for the hard-copy disk device. If so, message OD26A is displayed in the instruction line. Subsequently, a WAIT is issued on the disk CCB/IORB, which is passed in the CRTSAV CSECT. The CRTIC macro is used for the screen write operation~ Before the exit is taken, the line print control flags (for SYSLOG printer) in the Attribute Bytes in CRTSAV To phase $$tiOChTA; to phase $$BOCRTB on hara-copy diSK errors; for a message that exceeds the message area capacity to phase $$BOCRTQ when the maximum number of lines per message area has just been written onto the hard-copy file; to phase $$BOCRTU wh~n overlay mode is entered in order to invalidate the wrap-around address in the header record. . ~~1hQg: Starting with the message 11ne in the screen image butfer pointed to by register 6 (and ior as many lines as in~icated in register 2} a hard-copy record 1S built in the hard-copy file buffer (for record format see F~gure ~2)_ Whenever th~ bufter is full, it is written to the: actual disk address (ACTDSKA) of the hard-cbpy file by an SVC15-SVC7 sequence, then the actual disk address is updated,. In'correct length or irrecoverable IIO errors indicated in the CCB/IORB are passed to phase $$BOCRTB for recovery (see Fi9~re 11, bits 6 and 1). A test for remaining free space in the hard-copy file 1S then performed. If there is only space left for two records, an indicator (see Fi~ure 11, bit 2) is ~et which causes a w~rnin9 message to be issued by phase $$BOCRTB. If there is no more space left~ i.e. the wrap-around point is- reached (ACTDSKA WRAPSKA), overl'ay mode is entered (see Figure 1~, bit 1) and $$~OCRTU is called to invalidate the current wrap-around address in the header record.. ' = Display Operator Console Support 5l If overlay mode is active (see Figure 11, bit ~), the wrap-around point (WRAPSK~ is made equal to the actual disk address~ If the physical end of the hard-copy file ext~nt ~s reached (ACTDSKA the actual Qis~ aaaress is start of the message area STRTSKA) and the cycle bit Figure 12) .. = LASTSKA), then reset to the (ACTDSKA = is irtverted (see r--------------------------------------------~--------------------------------~---------, •'CRTFLGHC I I Hard Copy Control Flags: CRTHOPN - Bit 0: 1 =Hard-copy file is open j ,, CRTHCOVR - Bit 1: I HFEQUNO - HCERR - HeINCL - Bit 7: CRTHCWRN CRTIPL HFtOPEN 1 =Hard-co~y file is in overlay moae. This bit is teset together with bit 2 by $$~OChTB after the correspond~ng messages have been issued. bit 2: 1 =Warning message should be issued .Bit 3: 1 =IPL switch Bit 4: 1 =Rard-copy file must be creat€d Bit 5: 1 Bit 6: 1 =Hard-copy =Hard~copy file not in use t~le .has irrecoverable error 1 =Incorrect length during recording L------~------------~-~------------~-------~---------------~-------------------~--------~ Figure 52 ~1. Hard-Copy Conttol Flags DOS/VSB Logical Transients CRSTSAV -J Hard-Copy File 1-----_---jl-!h:ea:d~e:.r-::.re:c~o~rd::......_ _J.... _-_ FRSTSKA STRTSKA LASTSKA WRAPSKA ACTSSKA 0 2 fl .. 1 3 4 wrap-around address screen i mage buffer save area ==~I I I ~: I I X'OO' X'Ol' not set valid invalid X'02' I I I I I L Wrap-around address: I for CKD: for FBA: I I I CCHHR BBBBR I I L __ \ ./ ....... ,/ ","" \ - ---- ,/\ FBA device ", logical record ----- ~ogical r.::?~ _ CKD device "" ........ ........ ................ 57(80) 58(81) 59(82) * ....... I ~~ byte 1 : bit 0 - 3 : partition indication AR=O;BG=l ;Fl=7;F2=6;F3=5; •.. bit 4 : reserved bit 5·7 : number of partitions in system date : mmddyy I Address Description CKD format FBA format FRSTSKA LASTSKA STRTSKA WRAPSKA ACTDSKA Start of har~-copy file End of hard-copy file Start of message area Wrap-around address Actual address CCHH CCHHR CCHHR CCHHR CCHHR BBBB BBBBR BBBBR BBBBR BBBBR ~2~ J : bit 0 - 4 : message type same as byte 0 of SCT entry (see Fig.l0) bit 5,6 : reserved bit 7 : cycle bit Control interval VSAM control information Figure' '11lIIIo..- byte 0 \ CIDF ....... logical record \ RDF ........ --:'FiRures for 1250 (3277/3278) \ _ cpntrol info ADF j, , ,.- =- -=-~-:..-_-___~. .I_O......-.....L-_2_m_es.../~ Ii~ /' .",., r ,/ .",., \.",.,""" ./ ...!.ogical~ord , Hard-Copy File Format (Part 1 of 2) Display Operator Console Support 53 Messages displayed on the screen of a display operator console are collected in the hard-copy file, which occupies one extent on the DASD device allocated to SYSREC. Logical Format The hard-copy file contains a header record, the screen image buffer save area, and the message area. Tt'!e header record is the first record in the file. It contains the wrap-around address, which is the disk address of the first record in the message area which was not printed by the PRINTLOG utility. The header record can be: 'not set', then wrap-around address = STRTSKA 'valid', then the wrap-around address is valid 'invalid'; then the wrap-around point was overlayed and wrap-around address = ACTDSKA The screen image buffer save area starts at the second logical record. Its length depends on the screen size: for 1250 it consists Of 8 records, for 3277/3278 it consists of 20 records. The current contents of the screen image buffer are saved in it during redisplay processing. The message area starts at STRTSKA and ends at LASTSKA. Records containing the message are written to it in wrap-around mode. Each logical record contains a cycle bit which is inverted every time a new cycle is started, i.e. whenever writing starts again at STRTSKA. The point where the cycle bit changes from one record to the next defines the actual address ACTDSKA. New records are added to this point. Physical Format The hard-copy file starts at FRSTSKA and ends at LASTSKA. The logical records have a fixed length which depends on the device type of SYSLOG: it is 60 bytes for 125D and 83 bytes for 3277/3278. For hard-copy files residing on CKD devices the physical record equals a logical record. The last record is an EOFrecord with a zero data length. Minimum size is 10 ~racks. For hard-copy files residing on FBA devices a number of logical records is blocked in a VSAM-format control interval. The CI length equals the FBA block size. The last CI of the file contains a SEOF (software end-of-file). Minimum size is 50 blocks. Figure 12. S4 Hard-Copy File Format (Part 2 of 2) DOS/VSE Logical Transients are unique in DOS/VSE. A check is made for 'K' only, 'KI followed by blank(s), and for IKI accompanied by subparameters: 'EI, 'SI, and ID'. The full command is converted to uppercase characters. This phase writes all lin~s from the message area to the console printer if the appropriate support is generated. ~n!£Y: From $$BOCRTG or $$BOCRTY after the message area is written to the screen. This phase handles K-commands with the subparameter E except K E,N. Exit: To $$BOCRTA if no hard-copy support and-call from $$BOCRTG; to $$BOCRTQ if no hard-copy support and call from $$BOCRTY; to $$BOCRTH if hard-copy support exists. En!£y: From phase $$BOCRTK; from phase $$BOCBTX during message deletion in conversational mode. ~~lQQg: The message area is scanned for internal protected lines. All internal protected lines are moved into the output area of the console printer. The contents are scanned for trailing blanKs and the byte count for the print operation is reduced accordingly. When the print operation (SVC15, physical addressingl 1S not successful, a message is displayed in the instruction line, which'must be answered by the operator in one of the following ways: ignore printing of the current line, or retry printing of the current line, or cancel the printer support. This phase analyzes bperator commands. From phase $$BOCRTA and $$BOCRTG to handle an attention request: from phase $$BOCRTW during non-automatic line delection: from phases $$DOCRTR and $$BOCRTS when operator commands have been encountered in the input area. ~n!£Y: ~~i1: To phases $$BOCRTL through $$BOCRTP and $$BOCRT2 on screen management commands: to phase $$BOCRTA on system commanas; to . phase $$BOChTE on screen I/O errors; to any phase which was interrupted previously by an operator request. ~~1ftQg: The input area is read and the data checked. The exit taken depends on the result of the test. the CANCEL key has no effect at all as the exit ~nterface routine $$BOCRTP is fetched. The cursor in the message area indicates a deletion request. System co~mands (and the Request kej) are passed to the Attention routine. Exil: To phase $$BOC~TQ; to phase $$BOCliTV on erroneous commands. Method: The syntax of the command is checked and an error is indicated when the command is incomplete or has invalid parameters. The following commands are correct: K K K K E f;,SEG E,n where K E,m,n I 1SnSS (for 125Q) ,ior lSnS20 (for 3277/3278) where lSm,nsS, and ~Sn (for 125D), or lSm,ns20, and mSn (for 3277/3278)_ All these commands must be followed by at least one blank. The SEG parameter corresponds to the value specified on a specification K-command, that is K E,SEG is equivalent to K E,~,n_ K E,n is equivalent to K E,m,n. If the line numbers specif~ea in the command do not pOint exactly to tbe beginning or end of the message~ the specified deletion range is reduced in order to include only the beginning of a message to be deleted. The f1nal value of the line range to be deleted ~s passed to phase $$BOCR~u in field SEGVAL2, which is contained in the save area CRTSAV. P~essing Valid redisplay commands must begin with 'D' followed by one or more blanKs only or Dy several blanks and an 'L'. K-commanas This phase determ1nes from tne cursor address the corres~onding range ot message lines that must be deleted. ~nl£Y: From phase $$BOCRTK~ D1splay Operator Console Support 55 DOCNIND To phase $$BOCRTP on invalid cursor operation; to phase $$BOCRTQ on valid cursor operation. ~~il: The address, of the cursor is compared with the addresses of the different screen lines ... If the cursor address lies beyond the message area, the error message OD02I is set up, which is later displayed by $$BOCRTP .. The message is not set up if the cursor is set to the first position of t,he input area ... Bit 0: 0 DBL=N 1 = DEL=Y Bit 1: CON=N 0 1 = CON=Y Bit 2: 0 = ALM=N ~ = ALM=Y Bit 4: 0 = PRT=N 1 = PBT=Y ~~thQg: I SEGVAL1+1 SEG value If the cursor address can De assigned a message line address, it is checked whether the line contains the·end of a'message. If not, the line range must be redefined. The range of lines to be deleted is passed to phase $$BOCRTQ in field 'SEGVAL2, which is contained in the save area CRTSAV. This phase processes the display K-command. This phase may set up the following message: En!~y: F'rom phase $$BOCRTK, trom phase $$BOCRTQ for display/deletion of line numbers. OD02A ILLEGAL CURSOR ORATION ~~il: To phase $$BOCRTX when the system operates in conversational mode (CON=Y); to phase $$BOCRTP when the system is not in conversational mode: to phase $$BOCBTV in case of erroL' .. ~g!~Qg: In general, this phase is fetched for procEssing of the commands This phase processes the specification I\-command. K D ~ntry: K D,N K D,N,HOLD .. From phase $$BOCRTK. ~~il: To phase $$BOCRTP: to phase $$bOCHTV in case of error. ~et&Qg: The commands processed must be of the form K S,ftEF K S,parm where parm is at least one of the parameters: SEG=n (where lsn~8 for 125D, 11~n~20 for 3277/3278) ~n all cases, the line numbers are inserted into the appropriate buffer locations, but K D,N,HOLD causes a flag to be set (DOC008) to prevent the numbers from disappearing when the next command is entered~ Whether or not the phase that handles the K E,N command is tetched, is indicated Dy flag DOC001. This is the special case, not included in phase $$BOCRTL, where the subparameter ~L' is operated on. DOC004 indicates that the pa~se is fetched during processing of a deletion command in con.ersational mode. DOC002 1ndicates that the line numbers must be deleted.. This takes place during message deletion in conversational mode. The command K S,PRT,REF results in the current D~L,CON,ALM,SEG,PRT parameter values displayed in th~ instruction line (by phase $$BOCRTP). ~he command K S,parm updates the screen management parameters.. These parameters a~e represented in CRTSAV by the fields 56 DOS/VSE Logical Transients This phaSE establishes the interface the screen management phases and the supervisor. Det~een From phases $$BOCRTO, $$BOCRTM, $$BOCRTN, $$BOCRTV, $$BOCRT4, $$BOCRT5; from phases $$BOChTE and $$BOCRTF after recovery from screen I/O errors; from phase $$BOCBTK when a command is canceled; from phase $$BOChTQ after line deletion by command; from $$BOCRTX when a deletion request has been canceled during conversational mode. ~~try: To phase $$BOCRTA when the next Attention interrupt should be handled by the supervisor; to any interrupted phase whose name is passed in CRTNAM~ as ind1cated in CRTQPD (in the table CRT TAB) ; to phase $$BOCRTE on screen I/O errors.. through n. The screen image buffer. may also conta.Ln lines protected against deletion, that is, if they have neither been displayed on the screen nor recorded on the hard-copy tile .. ~xit: Method: The line numbers are deleted, if th~HOLD parameter is not active;. The instruction line and entry area are blanked. When entry was from phase $$BOCRTV, only the entry area is blanked, while the message area is displayed, that is, the error message from phase $$BOCRTV remains on the screen_ This phase deletes message lines. j~!~y: From phases $$~OCRTB tbrough $$BOCRTD during channel program interpretation; from phase $$,BOCltTX during deletion in conversational mode; from $$BOChTL for deletion of messages by K-command; from $$BOCRTM for deletion of messages according to cursor positioning; from $$BOC~TY during processing OL extremely long messages. Exit: To the calling phase; to phase $$BOCRTP on exit-from a deletion command; to phase $$BOCRTW during non-automatic deletion mode (DEL=N) and dur.Lng handling of messages that exceed the screen capacity, to phase $$BOCRTO for displaying/erasing line numbers during message deletion in conversational mode. MethQQ: The number of lines representing the range of deletion is passed in field SEGVAL2, which is contained in the save area CRTSAV. The lines following tne specified range are checked to determine whether they belong to the message(sj to be deleted~ A-, D-, and E-type messages w.Lthin the spec.Lfied range are not deleted. Messages of this type are deleted only when directly pointed to by a command or Dy the cursor. If the cursor is set to line n, not only the message pointed to is deleted (irrespective of its type), but also all deletable messages contained in lines 0 This phase is the root phase of the read processor and analyzes the read commands or reads an operator command. En!~y: From phase S$BOCRTA; from pbase $$BOCRTS when anoperatoL command is to be read; from phase $$BOCRTT when processing of the Read CCW is' to be continued; from phase $SBOCRTE and $$BOCBTF after successful recovery of a screen ~/O error. ~~il: To phase$$BOCRTS; to phase $$BOCRTK for handling of operator commands; to'phase $$BOCRTC if a Read CCW is preceded by an erroneous Write CCW; to phase $$BOChTE on screen I/O errors .• ~gihQQ: On first entry into the phase, the input area is read to determ.Lne whetner an operator command is dealt with or a SYSLOG cbannel program is to be interpreted. If the phase is fetched again by phase $$BOCRTT, a Read cbannel pr6gram is processed and the data may not fit in tne entry area. If a Read CCW is prece~ed by the CC~ sequence 'Write without carriage return TIC', the data of the Write CCW up to 80 characters is moved into the entry area before the operator is allowed to enter data. If the operator wants to enter a command ~hile a SYSLOG head CCW is handlea, he can do so by pressing the REQUEST key, but the message 'READ IS WAITING' appears in the warning line. The operator can then press the Cancel key to cancel the command Just entered and allow the SYSLOG channel program to be continued~ $$BOCRTR may .Lssue the following messages: OD09D READ IS WAITING. CANCEL OR CONTINUE This phase allows the operator to enter data cJrrespond~ng to a Read CCW. Eni~y: F'rom phase $$BOChTR; from phases $$BOCRTE and $$BOChTF after successful recovery of a screeu I/O error_ Display Operator Console support 57 gxil: To phase$$BOCRTT; to phase $$BOCRTK when a command has been entered; to phase $$BOC~TE on screen I/O e~rors; to phase $$BOCRTR 1f the Read cew is canceled. ~ethQg: The message tENTER RESPONSE' or 'ENTERCOMMANO' is displayed in the instruction line and a r~ad of the input area is started. The latter allolWs .as much data to be entered as specified in a correspohding SYS~OGchannel program. However, if the Bequest key is pressed, a command may be enteted inst~ad 'ot data. Pressing the Cancel ~ey, whet~er accompanied by entered data or not, allows the data to be reentered. $$BOCBTS may issue the following messages: This' phase updates the wrap-around address in the beader record, or 'invalidates the wrap-around address in the header record, or forces writing of the current hard-copy buffer,;. En1~Y: The pr~ntlog utility or IJBJC7 issues' an SVCO instruction accompanied by a special CCW. Tais activates $$BOCBTA, which fetches $$BOCBTU. $$BOCRTH fetches $$BOCRTU if overlay mode is eDtered. Exi1: If overlay mOGe is active to $$BOCRTB, else to $$BOCBTA4 0008A ENTER COMMAND 00070 ENTER RESPONSE Met~od: For the update £unction, the wrap-around address WhAPSKA is written to the header record (see Figure ~2). For the invalidate function, the heade~ record is invalidated (see Figure 12). For the force I/O function, the current hard-copy bufl:er is written to the hard-copy file .. Moves the data (corresponding to the SYSLOG channel program) into the requestor's input area ... ~ntry: From phase $$BOeRTS; from phases $$80CRTE and $$BOCRTF after,successful recovery of a screen I/O error. ~~it: To phase $$BOCRTR for continuation of read channel program; to phase $$BOCRTC wh.Em the S YSLOG Read celi s ; are handled; to phase $$BOCRTE if an errot has occurred during screen I/O. t~e ~et~Qg: The read byte count is reduced by the residual count of the previous read operation in phase $$BOCRTS. If the number of bytes is less than the length of the entry area and the current CCW is not data-chained, the data just read is moved to the reguestor's input area, the screen entry area is cleared, and control is given to $$BOCRTC. If the byte count e'xceeds the entry area length, the read operation may have to be r.epeated. The data is moved to the reguestor~s input area and phase'$$BOCRTR is fetched again. The data is not moved if the corresponding ecw bas the skip flag set on. The fact that a byte count exceeds t~e amount of data entered and that the entry area i~ not yet exhausted indicates that the read channel program has been finished. 58 DOS/VSE Logical Transients This phase displays error messages related to invalid K- and D-commands.. Jn1£Y: From phase $$BOCBTL, $$BOCRTN, $$BOCRTO, $$BOCRT2, ahd $$BOCRT6; from phases $$BOCRTE and $$BOCRTF after recovery from screen I/O errors. Exi1: To phase $$BOCRTP'; to phase $$BOGRT1 when the system is in redisplay mode; to phase $$BOCRTE in case of screen I/O errors. ~!hQg: The cursor is set to the pos~tion passed in field ChTPOS~ in CRTSAV by the ditterent phases. Tb~s indicates to the operator the invalia character or parameter. Lines 1 through the ~nstruction line of tlle screen are displayed. $$BOCRTV may issue the following messages: OD01A CONTROL COMMAND ERROR OD04A DELETION REQUEST INCONSISTBNT. INVALIL liANGB OD30A INVALID DISPLAY COMMAND This phase displays message ODOSA: 1. when the system operates in the non-automatic deletion mode (DEL=N) and a message is issaed but c~nnot be displayed because the screen is ful~_ 2. When a message is issued ~ut cannot be displayed because the screen is full with non-deletable messages. Inl£Y: ~rom phase $$BOCRTQ; from ~hases $$BOCRTE and $$BOCRTF after recovery from screen errors. I~i!: To phase $$BOCRTK to analyze the operator's action; to phase $$BOCliTY when a messagt should be displayed that exceeds the message area capacity; to phase $$BOCRTE on screen I/O errors~ fi~1hQg: When the message area buffer contains lines that belong to the same message and these Lines have not yet been displayed on the screen or recorded on the hard~copy file, phase $$BOCRTY is fetChed. Otherwise, IMESSAGE WAITING I is displayed in the warn~ng line and control is passed to phase $$BOCRTK upon the response of the operator. The message area is displayed to show the bperator that it is completely full,. corresponaing aeletion command in the entry area tog~ther with the message IDELET~ON aEQUhSTHDI, which ~s displayed ~n the instruction line~ The syste~ waits for tAe operator re~ponse. The answer 1S read and analyzed. If only the Request Key is pressed, the ans~er is considered invalid~ It the answer mod.iiies the d.el'etion range or the typeoL tommand, then control is passed:to .$$rlOCitTK" $$BOCRTX issues the following message: OD03A DELETION REQUhSTED - li~ng!i~g li9.!!! 1ing§ i!~Q~g!l Q1 !1g§§~gg2 bongg£ i~~!! This phase handles messages that are longer than eight lines. The support is Lor both DEL=N and DEL=Y. In!£Y: From pAase .$$BOCRTW; trom phases $~BOCRTE and ~$bOCRTF on successful recovery from screen I/O errors. I~i!: To l-hase $$BOClt'l'H when the hard-copy file is opeti; to phase $$EOeRTI if ~ console printer is supported; to phase $$BOCRTQ when the hard-copy f~le is not open; to phase $$BOCRTE on any screen error. ~g1hQg: $$B0ChTW issues the following message: ODOSA MESSAGE WAITING This phase displays a message deletion request given by the operator in the form of a K-command, ana waits tor the response of the operator. Intry: From phase $$BOCRTO (display numoers preceding the lines); from phases $$BOCRTE and $$BOCRTF after recovery'from screen 1/0 errors ... Ixii: To phase $$BOCRTP if the operator cancels the deletion; to phase $$BOCRTL if the operator does not change the deletion parameters; to phase $$BOCRTM if the operator sets the cursor; to phase $$BOCRTK if the operator changes the deletion parameters or enters a command other than a deletion command. !1~thQg: The range of deletion passed in field SEGVAL2 in CRTSAV is displayed in a The message DULLer is displayed on the screen and, at the same time, the message lines are printed on the SYSLOG printer, if available. The latter is controlled by the ptint-line control fla~ in the Attribute Byte' in CRTSAV. Aft~r trie lines have Oeen displayed and printed, the print tlag in the corresponding Att~ibute Bytes is reset. If the system is 'in non-automatic deletion mode (DEL=N),the message 'MESSAGE TOO LONG CONTINUE BY ENTER' is displaye~ and tbe system waits for the opeiato~ response. Any r~sponse othet th~n pressingENTEi is ignored. Deperiding on whether or not the hard-copy file is open, phase $$BOCRTH is tetched (file is open) or the internal linE-protection flag (see Figure 10) is reset and phase $$BOCR1Q is giv~n~control. If a console printer is supported, '$$BOCRTI is fetched ... When DEL=Y ~s ~ctive, the message ICONTINUE BY ENTERI is displayed in tne ~nstruc~ion line, the message 'MESSAGE TOO LONGI is dis~layed in the warning line, and the operator's response is waited for. Then the pr.ocedure follows the method for DEL=N above, but the'number of lines to be ptinted is taken from the value of the SEG parameter. Display ?perator Console Support 59 $$BOCRTY may issue ~he following message: Op06A MESSAGE TOO LONG CONTINUE BY ENTER (in warning line) This phase diagnoses and checks any user-supplied CCW or CCW chain for validity. The status of the diagnostic run is refle~tcd in a csw that is returned to the user~ In addition, provisions are made to discontinue a CCW chain at the point where an error is encountered4 ~~y: From phase $$BOCRTA to analyze the channel program. !xi1: To phase $$BOCRTA if the next ccw to be processed is in error, to phase $$BOCkTC if the next· CCW to be processed is a Wr1te, NOP, or Alarm CCW; to phase $$BOCRTE if the next CCW to be processed is a Sense CCW; to phase $$BOCRTG if an error is encountered in a CCW which is not the first CCW in a chain of CCWs; to phase $$BOChTR if the next CCW to be processed is a Read CCW or if one or more 'Write without carriage return' CCWs are followed by a Read CCW. Note that TIC commands contained within a chain of CCWs have no effect on the exit sequence described above~ .Het!g~g: On en try froll phase $$BOCRTA, the address of the next ccw to ne processed is loaded and the CCW itself, as well as any ccw that is data-chained to the preceding CCW, is checked for validity. The following· checks are perfor~ed: 1. Check for valid OP-code (omitted in case of data-chained CCWs). 2. Check for valid byte count (omitted in case of a TIC command). 3. Check for unused bit setting (omitted in case of a TIC command). After the various checKs have been completed, phase $$BOCRTZ fetches the proper processing phase to handle ail CCWs that are considered valid by $$BOCRTZJ If phase S$BOCliTZ finds that ~ ccw chain is to be dis~ont1n~ed, i t also passes the address of thefirstinvali~ CCW in the chain to the processing phases. This phase allows ne~ display commands to be ~ntered when the system is in redisplay mode. ~n1£Y: From phase $$BOCRT4; from phases $$BOCaTE and $$BOCRTF after recovery from screen I/O errors; trom phase $$BOCRTV after a redisplay command error. !~i1: Xo phase $$BOCRT6 if only the ENTER Key is pressed; to phase $$BOCRT2 1f a D-command is entered; to phase $$BOCRTE on any screen I/O error. MetAlod: Any pending request indicate. • BSTAtlJ.ISd • .L.UlltAGB to US,Ui. • OC 1I00TIIB • .................. i III •• .. .... .. .... ·•...." .• · . ·........... _..... •* *. . •• LI!IIGTfI •• 110 • •• OPEIIlIID:2 _ ••• 1. .* *. i • ,1>5 i • • • • . . . !l.j$4l••••••• BJl11Cll 'to • COlmOL III • S$BITT.. • ............... i . . . . .1',.. . . . . . . . . • 1'0.111'1' P1st • • PIB 01' flIGIIEst • • PABlITIO. .. •••• _••••• oX: i :!-••*G,...... -: :ItSGl ·...........__... • • • POllir TO IIBIT WIlER 1'18 • .. ... .. i ,. II 1 •• , •.• TIUS P111T •• ISS •• SPII:UIID ~ ••••• *. *. .* ··.... ...... .* i *.. * • 110 • C3 • .. . .•.i .* Jl •• •. .. • 110 •• l'OmrIIiG •• •••••• AT BG P"" •• *. .* *.•. *n;s i ••••1(,........ . • • ............... 6RAIICII TO .. USI!BR.uI $S1IA'l'fIIA .X ••• • ·......•••.. • • Al • Charts 8i1 Chart AF,. $$BATTNB - set Operator Communications and Exit Linkage (Refer to Chart 03) ···.11······.··. ··............... . • S'1'SICD ··........... • ··.......... • II) • • liS .. ... i S'1'SICD i ·····Bl ..... • •• ••• • ACCSSS '1'1I1! ". • PIB 1'ABLS AT • • '1'Rt: COIISC'1' • .PROBLSII PROGIAII. • PIB .. ................. i: SItU" Bl •• .·COIIl'LI-·. •• IIBII'1' or •• 110 •• USEB IDDI •••••• •• rOOID •• •• ". .* *. •. ·r2 •• * •• * as *. ·····Cl •••• • ... ••• : B~~~~RI'~TII : • IIESSIGB-PBOC- • .esSIIG ROU'1'1111 • ................. It:GISTSRS IIILL BS II0BDiBBD PBOII 9-8 TO 0-15. ·U2 THB OC KIUT TABLE REnRUD TO IN THIS PHASB lS COII1I0llLY CILLEIl TilE OC OPTION TABLS. t'HB ADDRESS or THIS TABLB IS rOUID II THE COIIIIUIICATIOIi HBGIOII AT DECIIIAL DIPLlCI!IIBII'r 1011 ····.01· •••••• ••• .DIVIDE rHI PRO-. • GRlII IBY 8f 2 • • UD ADD RBSULT • • 1'0 S'1'ART or OC .. • IXIT rBL .02. ................. i ·····0)·········· • • • • • SIT UP CCI COUIIT fIELD IIlTH THB LS'GTII OP TBB IIESSIIGI us *. .•. .:.•• 18gAi~L~ OR CRT ................. *. ...i : i ····.G1 ..•.••.••. .... ..... B~ : .. J6~ gg~n~8 • USI : .. i ·····ltl·········· B~~t~RI'~TH : • IIESSIGI rOR .. NO ROUTlIIl! • LINKAGE lCIiOI : • .. .. ................. i • •••• Jl ••••••• ••• .. SET UP Till! .. • CCIl COUNT • • rIELD IIITH • • LBIIGTH OP rHE .. • IIBSSAGB • ................. ··.......... i • 82 B1 .. DOS/VSE Logical Transients POINT IIIGI TO SYSLOG CCII • • • *. ·.··r . ········· ............... i • UfU8! 1'0 • • lODRISS I I • • LIII 8BGISTBB ." . liS 10 .. •• .i *. • *. * .• * .* .* 10 ······P5··········. ·.................. i • stir PI8'tI1'101 • • PIli "C'tIVE • :x .......... : i .. · *. •• PIBTIrIOI •• ISSI •• CIIiCELED •••••• ·IIC • • 62· nCP8l> • •• .* • • : •••• P] ••••••••• : • • • .* * •. * i ·................... : •• ·.................. ...... *.• * • 110 CLUB THE .:.~~ .•.•..•........• i PI·. •• USER •• •• IDOl •• US •• liAS POSI1'I'E •••••• •• SIGII •• •• ·P2 •• .. .* • u:s .•.i *. * .• * : x•••••••••• : Il •• •• SYSLOG •• 10 •• ttlRTI'llOI •• USI •• rSTCH •••••• •• BOUIID •• ................. i .* i ... cs· •••••• i ·····El· .... •••••• • l'UT 'filS • • DOU8LElIORD • • OPrIOII 1'AIIL! • • UTRY U'1'O • • PUR or RBGS • liS .•••••• .* . . ............. .* • • • • • *. •• • IIIOICAfE ". OC PI. DUG :.t~nh.:~~2!.: i *.. * • i i •• OC ttl.DING • YES ·····Cl ••••••• ••• • LOAD 1'118 SUI! • • ARBA ADDIBSS .. • or rHS COlllleT • • PIOBLIII PIOGRAII. .U'1'O A IBGIlI'1'BR. ••• • .. • i ····Gs········· BIITUB. 'ro AODBBSS 111 LIII IBG • ............... • • $$BATTNC - CANCEL Command Processor (Part 1 of 2) (Refer to Chart 03) Chart AG. ..... ··.... • l .... '" ··................. • UblTtliC • : CUC.sL ···.·B1*.......... •....-.•• .-.-.-.-.- .SCAllk2 AD. ·.................. GBT I'II1ST OPERAIID • • • .. USE STAR:rlIlG ADDIIBSS OF P.UI TAllLl! PLOS A D1:SI?L1Cl!l!lUIT (Kl!I "!oUE) TO POIllT to Td):; CORRBCT P1:B EIlTllY. i •••• J.J ••••••••• : : :x •••••...•••••••••..•.•.• : .S2 i ·· ....1"···_····· ·................. ..•·. ·····Al····· ............... •••• A 1*-. . . . . . CJJ.Rl'N • .. i • 1'01II't • • ·····8J*"·. •••·••· • • • • • : ·................... GJi;'fl'J.it ····11"···..•••• KlJ.'1 'ro AUDit III Lilli. .~EG • : • POIIII:f 'f0 *. .... • •• C3 i .*. C!> •• .t. •••• ... COl ••...* *•• * • !Ill .* 110 * & Gl$Tl'l.K 1 " .." * •. * .. tJ:::> ••• *. C!> T.ttlS PAil'!'. "'. PIll •• ..... .'" ElI'flli •• IE:; •• CAIICEL •• 110 "'. OilXlCdEi> .......... ...... CUi/ii = •••••• .~.i.* 'ao' .* ,JI' • .dIGtI£ST • • l'aBTITIuli VLB • • .I:l A liBl '130' C1 •• lJil)lCATBS TiiE •• •• AREl IS 1110'1 •• fiRST •• IES ACTIfE uBTA·QlEj). •• Ol'EllAlill •••••••••••••••••••• •• i'O 011 0 •• i ··b~.*·.··.··· • '" ••• • ·.• . ................ ................. . ........ · .. .*. ...* .......... ........ ..... .... ·..··D. .··•···•·· ............... ·................... 1i1$TUl i '" • TO PI8 IJF • PlaT. XIJ il~ • ClIICl:;1.BD .ilL ·.............-'" •••••• ~ ••••••••• * • • PO.1N~" PU.&. • US]! fll[ CM.a.IlXI • .·..............•.. : CII1.8'lN GIS:f £-LA' !II Iil$G1:>tISR .* •• *. •• IIi::;; -TO bl$ CAlle!!.....!). .* *. i * .••• i ·110 .. : r.s : ······D1*i..••·..••. CIICJ.IN .. • POT BG KEY. .* • X'10' 111m RJ;G POIlln *C51.8'1'1I· •• • • i ·····E1*····· .-.-.-.....-.---...•• lG. .. Sft CAICEL • : coor; 1:1 P1:11 : .** .............. •* EL .". •• ••••,1_*i..._... bJlllICB TO lI'1'CiiAT Dl $S11A'l'TIiA i *. *. .......*.......... :;tu'!:: • •• * •• .• • 1'10 ... •• lL!i •••••••• r:J .... .* '" • . ,.. . ....... *• • • 1'3 • • X • i 110fE CANCEL • CAIiCEL CUUJ:. • lly··rl:; • *' .. .. *••• •• >'Alif l:tl()~." '" lr;S .. : C!>: i • •••p~ ••••••••• •• .* ~O •.•• *- .* • .. l!IIAII".. to II V S<:Jtli • • J..Ii i:iliA:tTIiA • • • n.s i ·····b~·*· \ii;;,i;t • • : • : • '!'p-AC'r J. U, .lNIW,;,Hult • ( *: : •••• dii ............ ". fJ.S lli.a.!:) i:h~l1. - ¥!> - • .t. · . ··*··*. ................. "Xtf", CANCEL coo;:;:; A1U; SlH YOH O>'llllAtUi< U·ti:;Rvr:NriO~ CANe!!J. • •• *• •••• ••• ;;IJI'PuILr..:.l).'" ••• fI.s .. .................. .. tl3 *. ... hl"~&/b IN r-... • CODE · t o . .'" COliREcr PLl> ••••••••• ".. ........ *** ........ . ... - .•. * ••• iiI) •••••• .* *. • •• * .* i UP LoOP ....... ._...... -...... ................. . A.l· • .. • • • i .... .* •"'. .*la,D ... ·AII • A:; • G";1: tRUld.. 12 P"OGhA;; K.lW •• -. i *•••• NO -.-~.-. ••• • • - P.... lIIT Tv lIaT • .. :..ollt;&. l·J.l> • . i ~L • LN i>$cA'J:IIIA • •••• i3* •••••••• • • • • • GI;:-r~rK •• : ••••iJ~ . . . . . . . . . : SIUIiClI xu Eh.RR'ftJ t;!> ... •.• *.. * •• * • fl 1':A1'", • bAJ..AHC.iKb .. 1,;ud : .................. •••••••••••••••••••• • ~oJ 1i~~~!f.r .....:X •••••••••• : .... t *A.i .. 1. i ••••• J:L. . . . . . . . . . . ito". *-*-4-4-.-*-*-"-* ;jJ::t CA~Li';J.. • • CtiJ.ltI.', • .. • Cuv£.; Ii'll t J.b . • .............. *** •• ... ll- • • •• *J j • • • **** •• BUA,ica hI • ................. .. , t!ilRRfN • III "~l:IAl'.l'HA ,. .. l • • • • i(" . . . . . . . . . . . . .. .. d!\~eti,;H '1 () t.:O~'1'!hJ:".&.3 • *' ••• *:!~:~I~:.~ •. • Charts 83 $$BATTNC - CANCEL Command Processor (Part 2 of 2) and NEWVOL Command Processor (Refer to Chart 03) Chart AH. ..... ... ·AG • • EJ'O • · . POST CA~,CEL • III i'HOGRE::>S • • AIID I'.tTCIl EW. • • Ilf PIB ..... *......• .* • 0< ... Y:;S.. .* ••• ••• '". •• TASK HI QrAI'l •• A!{ ··...... . . *. • .. I'AS1' LAsr FL., *. *. *. •• .*.* G"X vi'Eh .. oliJ) t c.; • ." *. ••••••••••••••••• • t. * •• * .. NO .. . .i. 0" •* •• Plb = *. 'O. .. .. • *. * •• * .* • ····UJ··. ··**·· fl.UX 1'0 AODkt!!;S lit J.lNKl•. *. •• .. 'O.. LoCi .*.........•........ .• .* * •• * .. NO i. d,~!>EH'r i •• III Hu •• IIAIN TASK •••••• •• IV.· ............... AD • .- *-*-*-*-*-If:-''-* : "l~ao~T~~nll'" ,( • •••• 0.".** .......... . pOUir .1:0 "UI.' • • : .. flo:!; *.*. ~.h. VUL *: i •• • • •••• ** ..... *.... •• : • • • • • • • • • •J[ : i 1it.~VUl. .. ••••••••••••••••• ' . ' .. a.l. •• l . i C1 •* •• ··•...A4**.····•... •• . . . . 0 : •••• 8L . . . . . . . . *.•• WAlt ... ..... ........... S(J~LOO" .* *•• * '" IIv •• ANf !ill "T~Si\$ .. i A:.! .. x.. • • Al"tACtHW •• *. .* ··.·;f:.S .. •••• . • 1S1 .- . i i ••, 1* •••••• 04 ." • i : ••••.u~ ............. : •• .*U1'l':lIA"U... •• NU.* •••••••• COllH"Cf *. *. ¥6S .* .* •• * •• * • ft,S .. 4:lfT Db l:.1.b : IIG I\.<;J .. .................. .. AMi) • : • AAOf 'fASK .. *...... i .'O. :.*•• ilL 'O • •• ' f d l ! ; · . • •• 5UtH"!;l\ •• r.r:s. AJ..HJ;A!lt ••• • t • ·.':ANCELJ:,O .'O * •• .. * * •• *.: · ... ·................. *. *. i ~'l • • • • ',;r>'f 1'lB1'al> .. .. .* ~u • • AU"dE!;!; i **** : A:J. : ·····F4 •••.·.***• .-4-.-*-*-*-*-* i .l ....... y.t. . . . . . . . . .. • Sir Sllll'l'ASK • .CAII':",l. ';0))1. IN. • • PI8. PUS'1' CNCl. ••• A. .1:' Plh)G + fr:rCn. :~~~ .. :~:~; .. ~:;~*: . *!** : 1)" ....£1:PIK *.. A';. .................... : .. bGT .. "Jl.rl.l..:lr Al:.i : : :1 ........................ : .*.* • i : •••• G"'........... : bJ:.J'l'I,,'('£ • US.!! Kl:.t '1'U .. bl'i'l &lJDh U~ .. " 'OCUII.H~u fO;. TdlS. r&H'XL'!'lUH • " . **** •• u •••••••••••• ~ : d.. ....i. NU • • •• •• •• • •••• •• • •••• ... .1.11'1 ~G I'u'< •• *. 'O.~UU';'X.· vOJ..uai'. .* * •. * .. ~ GoS • ............ 8.0:. ~Udl.'''H1.·liUJ. ... 1/i !'aj('l'iLl.UN i:> ... All' ... ill> 1'01' • 1 i ••• J!J . . . . . . . .. ......... .... -J'''''-~.Jl.ll,''"- *!lJUIll' ".I.t lN "ella k Gob ut" f' • • • • ............ .. t5.AJ\~ ...... .it; ... .. ."LAlH ,),,, aUIi .. 'O : ..:... : ' <,U:'J :rh .... F ...C. illl' vi' c.;\,." 111<1,,- .. •• J't . . . . . . . . .. "TU",,, .AJ.'rJ.HI> • .. u;:, : ··liS····*-·· ". .* *. •• !-aa'f.l'flv" •• . JI. . ...- ;i~ : i .. • ····A!>·. ······• b"AN":J IO ll't Ol'~.ulll: .. • .. ••• !!iU'!:!...... 84 DOS/VSE Logical Transients $$BATTNC - PAUSE, LOG, NOLOG, and IGNORE Command Processor (Refer to Chart 03) Chart AJ. • •• **a 1.*.****.*. .. •••• '3 •••••••••• : : ............... PAUSE : ·····S1···i .. ····· PAUSE *SCANR2 ................. OPERUD • * • • ...... : *..* * ..• • .... : C2 : i : *. • GET ADDR OF PIB 'UBL!! GET BG KEY • • • • . *. *. E1 . * lNr *. *. NO . * •• OPERANI) .* .... 110.. .. ... *. •• ··.......... i i .~ OPER LENGTH *. 2 i DII .-.i .* •• EOJ *. *. •• *••• .* * IES .* • IOLOG i ··ES*······ .SI$T UP POll • I!IECUTI$ • • IMStR TO TUBI • • OPF JCTL SW • • ··.... ...... ........... .... . * *. ....... . i • * .•. 111YES • C2 .. • TURII OR BI'r. .FOR PAUSE IN • JOB CON:rROL • • SHTCH A1" • COIIREG+!>f) • ........... * • ..,......... ........... • TURM Oil BIT* *POR PAUSE-AT-. EOJ Iff JOB • COUROL SWITCH • • CO!lREG+S9 • rOB LOCO • p~ *.1. • i ··F3*·*···· • • C2 • i •• ·................ • •••• DS •••••••••• •• • F3 • •• ." F!l : YES 1I0LOG .• .. .* *. ··.... ...... i • . *. F1 NO ••• ~.. i .*. . * * us •* •• ....* .... * : *• * ••• NO · . ·.................. *. ........... * CII : Cli • - LAS! -. NO •• CHARACTER •• ••• ••• IS ,. •• •• SL1JlK •• • .... C2** ........ . BRANCH 'fO * x:• ••••••••••••••• IMNn~NTNA i *. .... ... ••••• v 1 •••••••••• • • • i ··IIS······· *SET UP POR • EIECUTI$ • • IIISTR TO TUIIII • 01 JCTLSW • • • POll LOG • i C1· *. *. •• LAST •• •• CHARACTER •• us • '.;S ~~G~QUA~ ••••••••••• : * i * LOG LOG AV" *-*-*-*-*-*-*-*-* .. GET • ............... ..... ...... * ,~.~.~ US!! I!lBCUTE • IMSTR '10 TURI • OFF/ON SIiiTCH • 1M ALL PUT • COli" REGIOIIS • • • • • ................. :1 ........................ : ••*-*-*-*-*-*-*-*-. . ··G1.· ••••. ••• * ·.................. i .GETPIl\ AG. GET PROBLE!! PROGRA!! KEr • • • • • • i ····G)········· BRlIICH TO COMTBOL IN UlIlTTNA ............... • • • • • i ····Gs········· BIIAICII 'lO COIITBOJ. 1M SSIIATTIIA • ............... * • • :1 .......... : i ••••• H 1•••••••••• • USE KEY TO • • GET ADDRESS • OF COIIII. • .REGIOR FOR THIS* PARTITIOII • * * ................. J1 ...i .* • * SCAli •• .... ·....•*. i *. * .•• • * .- ·................ IGIIORE • · . ·.................. IGNORE i • •••• J" •••••••••• -. 110 STOP •• .. ••• IS A COIIIIA •• •• • •••• H........... . • •* YES • IGIORE UROR • • COIOUIO. IN • • COI'rROL ST!l1I'f • • F3 i PlUSE2 , • • • • 1( , • • • • • • • • • • *SCANR3 AD* *-.-*-*-*-*-*-*-. * GET NEXT OPERANU • : ................. i .... * • .... : : • • • i ....,.......... . ............... BRAIICH TO COMTROL IN UB1TUA • • • C4 : Charts 85 Chart AK,. $$BATTND - ~AP Command Processor (/370-Mode) (Refer to Chart 03) ..... ............ ~ : ................ $SBAlTND .... ..... : : ·....."............... ·................... sef ut> : ItEAD£8 " : s:;'r u. • RUII 1D" i JOl:i li~'UD ·................... ·................... S1'!l' UP SOa>UlV.ISOIi DATA • i ~l . . . . . . . . . . : ~E"r Ill' 1'.1lr.L'f.l.vN • • : IDL! ...·.[P.[r:h : ................... ~O." • ••••• ". ··.···t . .·····_··-. .-.-.-$-.-....... i AC. .* lI:t .•.i *. ALi. *. ~ilil'rl'!·!o.:; •• •• ". PffOClISSi.li.* *. :x •••••..••• : ./1SGOUT .. : • i • .. NUl),; :*••• * • OO'lfU'l' • • UBAD':R W:U: *EJ. • • *: ...................... . -.-.-$-.-.......-. ······D1····..-··" : .. : •••• *C ........... . .1I5GI>01' AC • son tj~ Sl\.i,P8fl i : •••• n...::.. . . . . . . . . i • ..... .* * .•. *re:, . i */ISGUO'( ·····h~····· ·*A';" .. • *-*-.-..-.-.-..-.-. ................. , ..····1'1····_..••. ·.................. • ................. WIllI' • Uh'l'ITluH • ·•. ··Pl···.· . . ••• ·................... · . ·................... ······..;L.·.··.····. ·.................. · i :•••• rl,......... *: • • • ODTl'UT HlUl00S Lllre .:tJ • • ro • 111:.1('1' • • • i •••••til. . . . . . •••• • • • S~ UP }'AkllT~OIl SlZt. • " LllSl'l'S • <10 i . ••••• 11.1* . . . . . . . . . . • • 6:11' PAI'rU'IOI • • • 1'110111'1 • ••• >I!. . . . . . . . . . . . . . • . • (HI fl·UX L&l>'l' • PAhUl'lON • LIN'; .I!.l • • • • • • • • • • i 511' UP 'III OU~PU,! SU LUI SI1' UP 'ID OU~PU1' 'IS LUI • • • • • • ·.................. • • SII'r UP 'III OU1'P01' • • • IP LUI • • •••• ..J.t . . . . . . . . . BlliCR 1'0 • .... .. ._... i ·ll:l .. i • • 86 ................ CO.rlOL III 'UU1'I. • • DOS/VSE Logical Transients Chart AL .• $$BATTNI - MAP Command Processor (Refer to Chart 03) .. .. ................. .. (ECPS:VSE-Mode) •••• It.1* . . . . . . . . .. :O:>BA1TII.I. ........... .. .. .... d~ • i .••• . tsl·.·· ....··.. .. . ................... ~IUPll'ti i ..···C1*··· ....·• £s~n... i .. : S$1' U,' .... "t£'1·1.(11< 1.lletlfU.Ll:;Ii liU' IJP iiEAO::H •-rlSGou'r -.-.-.-.-.. • .. .. : Uf dOli IV i'. Ju>; HAil];; - i .····Dl···· ....·· ... S;,:r UP • SOPi::RYISult DA'Xa • .. : ................... "~j ES IIi' V .. .. : : •••• Cl. • • • • • • • • : AC • ··...................- .. ................. -*~-. OUfPUT hMD~Jj l.INE s,,;'r .. : ................. • .. i : •••• rll ........... : .. ... MO.• • • • • • O'. .. .* 0" .*.i * . *. ALL -. PAll'l'lt.LON5 .* - . Pll OCESSr.!I. *. :, .......... : .* * * .... • y,,;:; -r:.s vlA At"rDO If i • • • • • .1:. . . . . . . . . . . . . i • •••• r.:.l........... "'IISbIJO'r .f1:i~OO •-.-.-*-.-...... ................. .. • '" AC. -*-.. OUfPUT l'ltlNl.OUS LINE "'fOJ - .. .. i ....··.... '.····Pl···· " (QUi' .. '" TO IIE11' - ................. : I'AIrl1.UOh : i *-*-*-4t-.-.-... - • • out i"U't LASt 1'.1."1'11'1010 Li.i'f.t *:..,j • • ................. • .. i : •••• l"'~• • • • • • .. .. • *.*: SLt 1.11' AHll QU'XPU'X • • ................. : .sVA L.lN~ : i : ••• *G ........... : : •••• u,.l ••••••••• : .. .. .. .. SJ::l OP PAl!lltJ.!JII • • ................... Sl~t: & LJ.lIl.lS .. .····a,..·· .. i ....··.. .. Gr:T .. .. : i',l 1<1'U' 1 DJI FiUilJiHlC .. : ................. i ....... .... l"UNc.;UO~ Ar...:. J.' • • s~~r Ut' AND OU:l:HI'1' Re:U. SfllhAur; .. • • ................... .. .... 1NE .. , .. .. - ····11.4.. •··• . . ·. . ,,1. ~ll "~C,, l'U CON tit l~ S$,'A'fTl • • OIlCR/UIENT • • LEIIGTH 81 011£ • •••••••••••••••••• x. : : .* ..:x....•.•..•.....•••••••.. : .x •• .... ...... .. •• •• c" Y1!:S •• ADD OIl! • 01 • • . • • • ••••••••••••••••• ·······G]·......••..· ······GIt·······.·..• ·................. ................. • i . .• • 110 i NO ······H ,........... ·.................. • *. .* •• LAST •• II. 'K'. • • ns : * .* IS *. *. •• LENGTH OK *. .* • i .*. .* ••••...•...•..••.. I.X •••••••••••••••••CHARACTI$B YES IS .- * •. * • NO Fl *. '=' * .• * 000 SIZE * •••• II~ •••••••••• • • •• I E S · •••••••••• 1. i *. LEIGTH • OELlltUER*. 110 All •• *. *. *. • E) •• •• IS •• NO •• OELIIlItER •• COli OR X.X............... .•. *. •• .... • •. >., •• i *.• IS ... .. .i B.. * •• * * .• * • 110 DJ NO .*. *. Fl *. i . •. OPERAND OIlItTED *. .* i *-*-*-*-*-.-.-*-. •• •• •• .* • * 011 ItT ED *. •.•• ••••••••••••••••• ••• • 01 •• X. GET OPBRUU PAUITION 10 ... • • •• .* i Cl GEtPIO I ·····01·· .SCURl .. ••••••• AD. • . GET • OPERAIIO '11K' • • ·................. ...-.. . ··.... .. • AD. *-e-*-*-*-*-*-.-* i ·····el .... ······ 88 • e... B3 : • • i . ····*B1·········· of 2) ··.......... ..... .... .. : ~ .0 ··.....!.... • 62 • Chart AN .• $$BA1TNE - ALLOC/ALLOCR Command Processor (Part 2 of 2) (Refer to Chart 04) .··.AJ.·.·.·.··. ··................ . ······A!)········· . ................ ·: fIRuAll8rAL .: ······Bl····. ····.. ·................... .. . ·····II!)·········· ··.................. ·······C1•••••·••··.. .................. ··.···CJ····.·.··.. ··................. . .... ·· .. ... D) ·..····c,··.·.····.. ·................. ... • ...... ... ·AII • • Ell • IIIDICITE i :,.......... . • SE'l PlBTl'lIOI • • COUITER TO ZEIO. • : . • • : ISSUE ALLOCATE IIlCBO .. • : .................. i ·:................: BBS'lOIB BlSEREG .... * •• •• P1 .•.i • •••• • Us . , . . . . . . . ••• • •• ..•••••••••••••••••.. .····82········· ................ • .. RE'lURI TO CALLER ••• • • *. .*-. •• P&BTITIOII •• POUID **....* . •• •• .... ISS .. •••• ~~~;.;~ ...... •••••••••• , . COIITROL III • .oo • :U8A!TIIA • *. *. RC" 0 *..* ••••••••••••••• ·.................. TRAISUTl! RITUal! CODE TO EIICD • • • .4 05 _. •• * •. * • 10 i ·.................. nCRE"IIIT PARTUIO" COUIITEIl •• lES •• : •••• IJ ••••••••• : • • : ................. ... *. ..CIIAI ISTEB * ··.... ......* i * • • : • * • * i .IN.LTOPlll j ,2.·... •••• K , ••••••••• * * * * ................. • * YES • POINT TO • HIGHEST MA IN -: TASK PIS • • • • * : i ·····D5····.····· *. ... * . . * ... . .. • H~~L~A:f~1I ................. • NO •• OPERAND •• .X •••••••••••••••••• LENGTH IS :.! •• *. Gl!:T SYSTEII CLASS lIIDU : . .. • i .LOlD ADDBBSSI!S * • or LUB fABLE * AIID or * • .BLANK -. ~IlS •• OPERAND .* •••••••••••••••••• •• *C . l •• NO : : •••• I:tS ••••••••• : • : ................. • * • * •••••••••••••• -* Cl POINT TO BG I!IR ASSGNLOG ASSG.LOG : •••• b2 ••••••••• : AD* ............... YES ISSUI! !lSI> lP10D ARtA to VAILAIlLt * • * .................. ..._ G4 : • •• • ..• ..K".~ *. • RESTART PARrITlON A~~0~~~5T • ........... S~ITCH * i • .. * ••••••••• x: • ••• 115.*.*.**.· l:IlIANCH '[0 * 2!\i~~~N ~" * •••• * ••• * ••• * • : Charts ~3 $$BATTNH - Command Scanner (Refer to Chart 02) Chart AT. ·................ •••• A 1••••••••• : $:l8ATTNH ··.......... ........ ..... : " • 81 • i CHKSTT 81 ••• ·····83·········· i •• US.. . *SYST!!II -. •• ...... *. IN E-IIODE *. .* * •.• • .* NO ······C1.···.·.···. · . :.......... x: US.. ...... CHAIIGt: • SUFFIX OF • IIAP l>ROCESSOR '" •* *. •••• * •••••••••••• ·····01.·.....·. . C3 ...i • IBS • .. ... .. •• e4 -. •• .* .- VTaIl *. * •• * • NO NO • . . . . . . x. •• ACTI¥I .• • US i • • • • • INITIALIZE • "'REGISTERS WITH • • BUFFER LENGTH .. • AND POINTER • ·................... IIOVE OUIII! I ENTHI UP 'f0 I!ICLUDE liP COlIlIlNDS ,i ·····cs·········· ·.................. i •• .. .... .. •• •• •• ··.......... IllS • 1t2· i liPS SUPPOIIT *. *• . .. .. * . *. . ..•* ·····03·········· ·.................. i CHKSTT1 ••• • •• B4 •• 85 •• •••• •• IS •• •• V'flll •• NO •• PO~III •• 10 •• GEIERATED . . . . . . . . . . ,... ACTIVI •••••• •• •• .I *. .* ·.................. •• B4 • i VTIIIIIIOOI( • lion ¥EIIB TO • • COIIPARI! un .. • UU TO DUIIIIlr • .EIIral III TULI! • i • • • • Gal' l'OUII : • .g:IiA~B~I¥&1III • : • ADD8IISS • i ·····DS·········· • • PDWBI/VS • • • .. lIaUCH 'fO POll ER ¥I'flll • • • • • • ····IS········· IIIIUCH TO • DfCHlT II • nBiTnA • *-*-.-.-*-.-*-*-* ................. • • • ~DDIIISS : .......... X: ·• 1.···...···.•.. ·................... i ••••• ! IITLOOP j • • COIIPABI INPUT IIITH MlU TABLB U'fRY • ·····F1•...·•••.. ·................... i AU. VERB • NO •• ...... .. .• Fl IS •• NO Dt:LIIIITEII •••••••••••••••••••• •• A BLANK •• * .. * *. .* •• ... •• •• *. H1 .•.i 1i3 ... *. U:S *. . .. i *. * .. " • .* .* ...:.. NO : .* •• ... -. J 1 ...i •• VF.!l1l O"ITTl!lI *. * ..• • .....x .. .... : 94 113 : . .* *_ •••• SET UP 114 : i .. • IBS • . . . . . . . . . . . . . . . . . . X. • . .... . . III ... x• . .... .... i •••• K2••••••••• .. • • IIRAIICH TO NVSERa IN ,UBATTNA ............... .. • • DOS/VSE ,Logical Transients .*.*J 3* •••••••• BUNCH TO LOADI't IN ............... S$BAfTNA *. .... .* US . . ·.G,,·····•••• • • • BRUCH TO ............... . ..... ....... i • "LOAD OP811ATION • *. •• .- NO .... • .. • * ..• .. NO • •••• H .J •••• • •• i · . ·................... *. IS •• IES LENGTH)6 ...... .•.i • •. .* PI! *. YES •" IS TillS ... US ... DUIIIII EII'fRY . . . . .. .* •• • WAS •• 110 • •• IT VTAII ....... . •• ::OIlIlUD •• .. BI! • .* •• V'l'AII • BAL 'fO VTAII • • £11'111 ADDBBSS • i .* *. • •• COIIIIAND rOUNli i *. .•.i • G 1'·' •• .* •• •• • .. .. •. . * .. .. .* *-*-*-*-.-*-*.*-* • !lET CO/UlAND • • i • • • ·.................. ·.................. ... X. • SAVE POlnERS .. • SCANR2 ····.B4•••.•..... .-.-*-.-.-.-.-.-. ·····!3**········ YEn • D'fCIlAT IN UUA'fTNl • • • i ................ $$BATTNO - VOLUME Comm~nd Processor (Refer to Chart 04) Chart AU .• ··.... ...... • &J • &3 i .-. •• .*. •• ··................ •• VOLID •• 10 •• DEfICB •• AV'IL1BLB •••••••••• , . . IS UP •• ..' •• i ·····111 •••••••••• *-*_*_._*_*_*_*_e ······81·······.··. • ····11 .......... SSUTTIIO • .SCAHB3 • • • .* las.. •• ....i 110 1.'1111 *. • • • •• •• *. .* *. * .• • * •. * D3 ••••••••••••••••• •• • I/O : : i • x••••••••••••• • •••••••••••••••••• rES ·.................. :.< •••••••••• : ..... ··.... . • G4 • i: *. .* .. • 110 i DEVICE IS DASD : Gil • VOLUIIBbl •••• ···G. ·••••·••· ••· • PRIIit ALliE • • IP OllE IS •••••••• X" LEPT. • ...... .-.... . ..... • .................. H2 : •• NO • •••••••••• X. I· i 1>0 TO NEXT PUb t:NTBY H3 • ••••• •••••••••••••••••••• ~ • YBS ...i • -. .!.. ··.... ... * •• * . . 1[11:5 • 1t2 • i ro ·.................. • GO IIElT • .. • • • • • • K2 .......... . • 'lRANSLATE DU. • • • IDDR III PUB TO • • • PRIlltABLB HEX ••••••••• X. • III OUTPUT • • BUPpI!R· .. ••••••••••••••••• ··.......... i • NO ••••••••••••••••••• OOTPUT ENTRY • 011 THIS LUll .* i • : •••• JJ ••••••••• : -. •• J1 *. •DEVICE •• NO • •• IS IEQU&STSD •••••••• • • • • • 1( , . . . . . . . . . . .SBUnl • •• e" •••••••••••• •• • • PILLEU •• PRINT A LINE •• A PULL •• YES • TO CO.SOLB • ••• M~~u~P •••••••••••• X. (SYSLOGI • • Gl • .•.i .* IIIIT TO • ····G~········· UtCH1T 1M • ............... ••• * : •••• H2 ••••••••• : •• **. .•.* . • • : •••• i OP •• IES POB TABLE •••••• * .. - • (~~TO~;~W • • ••••••••••••••••• .. SET USED= • • YES I I OUTPUT • : G1 :.X. *. SBt USBD=- : •••• Fl ••••••••• : ·................. .. .... . · .. * .. - .. * •• * • SP!'f UP LOOP • :TIIRU PUB TABLE : •• • •••• 0" •••••••••• *. *..* ··••·.1'1.·.·••••.•. •. • • .•.i : .......... x: •• • SB., usall• liD I I OU'fPUr YES • •• •• i • • • B3 •• • •••• s" •••••••••• •• POB2 •• • • •• IIIDICATES •• 10 • SBT IJSEDa • ..OPBII DIU SET •••••••••• X. 80 I I On'lPOt • •• 011 VOLUIIE.. • • ................. .!. SBT 'OLIDs .IOI!!!. III OUTPUT .* *..* * .. * i •• H1 .* x: ·····B1· ••• •••••• • • GBIII08lS •• • .GET ' I IORlS • • • ."01 CO. SOLI • • *. i • • • •• pUBol •• 110 • •••• SUpPOlUD •••••••••••• :.......................... : .. ······B. ·•••·•••••. NO .-. • IBS •• • • • i •* :..•...•..• x: .•.i • • ••••••••••••••••• .•..x .•.i G1 • • • • C3 •• •• 01111£1 ... YES.. III PUB •• ••• ••• OIiIiER rABLE •• •• D1 15 *. *. :···~c~~:·::~···: •• LBIGTH' •• 110 .C;OIlVl!IT DEVICE • •• TOO LOIG ••••••••• .... ADUlass TO •• J~OIlIlEII~l.. : HU POlrln • .* •• EID SS! VOLIn.DOII.. XI OUTpur ·······as··········.. ·.................. ·...............•.. .................. SEt VOLID PROII GE'lVCI! III OUTPUT • 10 •••• • •• 10 • •••••••••• S. •• • :1 ........................ : •• *..- : : • •••• ,s•••••••••• *. • YES i • • • :. ····t~gin~!J:L~ ..... . ,.. *..* *..* * .• * • I~ ................. C1 .* *..* 10. GET DEVICE ADDIBSS pIIAIIE.,B! *. • • • "GBtVC! pall - • - VOLUIIE Ill"" • .. .. • " • .111 ••••••••••••••• ..........-.. ~ .. A3 • Charts ~5 $$BATTNQ - MODE Command Parameter Processor (Refer to Chart 05) Chart AV ... • •••• A1 ••••••••• * : ............... UBATTNQ ··.......... : • 81 .•.i *. ······B)··········. i .* *. 1 0 . . CI?O=l]) •• ••• ••• *. OR ABOYE *. •. . * • .* .* ·.................. • POST' B' OR • 'T' 111 • • .INDICATOR BUS. •• YES ······Cl·.········. i ·····Cl·········· i • • • InTE • • INDICATOR • . RESET .SCAMRl iD. e-e •••• _._._._._. ·.................. • GE'l' 'l'HRIISHOLD • • VALUE • • ................. ··.......... ... • IN :UBATTNA • 01 •• X. ·····Dl·.········ *-*-*-*-.-*.*-*-* ·.................. • PI BCIlBTII I • SCAIIRJ • AI). GKT • •• •• • PARA"BTBR .• D3 *. *. • ... •• .* ill·. 'STATUS' *. •• *. * . . * .* rES • •••••••••• l . ····£2········· LOAD S:5BA'f'l'NB • • • ••••••••••••••• • * .. * • NO ·· . . .................. YES •• . .•. *. DISlIlLE 'SI'A'l'US' *. *. .• ··.... ...... i * .•. *ISS El .. .i • Jl • •• •. IE' *. •• 10 •••••• .* .* •• .* .* * •. * • NO i i ••••• r 1 •••••••••• • • .* .•.i *. VALIV i •• BJ • : •••• f.l ••••••••• : ·.................. * CONVEdT .11 CLOCK • • TIU • UUtS • : .......... 1: Gl .•.. .* •••.G2.......... •• * G] •. *. .* *..* * .. * • .. ••••••••••••••••• *..* i .*. i .-. POST· •• SEll •• t ES COIIRESPOIIOING • •• LAST •• 110 •• NOTE *Cl •••••••••• X. lilT III ••••••••• X*. PABillB'rER .* •••• •• •• .1NOICIITOR BY'l'e: • •• •• * 110 ·......... * •• * • i YES • 01 • • .-. i i HI· • *. •• YES .* • *oa 'E' tT' .* .... *. *. *. .* • ··....... ··...... ··.··.Jl ..········. ··................... • ~.* * .• * *NO • • J1 •• X. •••• • • 113 * i ElIA8LE 'STATUS' • • :•••.••..•• x: i •••• K 1••••••• *. IIRANCH TO * IIVSERR • • IN JSBATtMA * *• ............... 96 DOS/VSE Logical Transients ···*H3······.·· ·................ • .* LOAD :UBATTHS • • * $$B1TTHR - KODE Command (Refer to Chart 05) Chart Ai. Report Processor ..••,1···••.•·. • $lonnl •• ••••••••••••••••• • Stat~s · i • Burrll ·.··a"·········• •: •• •••• • • 82 •• ••••••••••••••• .... . ·····01 •••• •••••• • CLUI • • OOtPUT • .* 112 ...i • *. .... : •• COUll' AID •• : 11181 gSu IT : t. ••••••••••••••••••• .• • liD • ••••c... I •••••••• SltUP TO : DISPUY HU.R •• •• : • • • ................. •• •* •• 01 .•. •• III i *. •• IICOIDlla •••••• RODI •• *. * •• * .* .SI't UP TO DSl'U. 'nl~18~AUXS ·····11·········· • • • • .....•............ · i 112 .•.i :OUTliur • SIT UP TO • : DISPLU HU.O : •.•. . J~Si:' *. .• i •• " ••• 5••• ••••••• :!I:=!'_._._._t~: .•................• • • · 015.1.&' IISSAGI • • i CS•• • •• •••• •• • .... • IIIr '1'0 CALLII .. •••••••••••••••.. COUIII' liD SIt OP • • ••••••••••••••••••• ••••• I ... •• .* *. •• CPO-1Q!). ., • i • • ••••••••••••••••• • NO • •• • _IIIC'01I' OUtS'l''' ·····0. ·······.·· : n'UULUU : .-.-.-.-.-.-.-.-.: : •.USBTUII •••• 02 •• •••••••• U. 1115 COU.I' AID OP COUIt I tROLD ••• ••••••••••••••••• :•.......... : i •• ................• • . •••••c1.i•••••••• •• ....." .........• •• ........... i: usIiUl s...!•.•....• •• •• IN •• US •• III1COBDING •••••• •• RODI •• • • ................. IIsarUI •• IllS ..................... : • : i ........ UD • • con .., Sit UP TIll tHIISROLD • : ••••••••••••••••• *.• t • NO • x••••••••••• .-.-.-.-.-.-.-.-. i X •••••'1 •• • ••••••• • USIIUB All. ••••••·2 ••• • ••• • •• •• •• .·................ ••···G1 ••••••••••• • ·····.G2.···.·.···. ·.................. ·................. ................. • SIT UP TO DSPL'. • IRR cns ANU • • '1'HRIISII "LtlIlS • SST UP TO DISPLAY • • lIur OIL· i .•.i i • • : S8I' UP to DIllPL" ICC,B,C .Su • liD • UP or 'to USPU. DIUTIU • P'GIS • • • : ••••••••••••••••• i • Sit UP TO • : DISPLU sec.R : 111 • • ·,,".'.··Fl••••••••••. .* •• G) .•.i. •• *. IN •• 10 •• RICORUIII; •••••••••••••••••••• •• 11008 •• *. .* * •• * • 185 •• .* *. •• CPU-1IIS. •• .... .* •• NO •.•. J: Si4, .•.•... : *. · • • : *. •• 10 •••••••••••••••••••• . • liS 1.i•••••••• . • • : •••••••••••• "1 •••• :•.......... : ·•........• .• II *..* *. t • • * .- .* SST UP '1'0 UISPLU Bce.I.R .'i .•• •• QUIll 110011 • us ••••• J H.. .•···•·•.'M·. .···.·.J2 -.-.-.-.-.-.-.-. . i • 0UTS'll! .·................ Burrll • • UISPLII :1 .......... . ...-.-.-.-.....-. i ••••• ,J1 •••••••••• • USIITUB &11 • 'SB'1' UP '1'0 05.1.,. • BRR CtRS liD • • !HRlSII VALDIS • ••••••••••••••••• : •........................ : • 82 • ..·.K2········· i ••••• JQ •••••••••• • • sir OP 1'0 DISPL&! ICC,Q,C •• ................. • : • : · . ................. i. • • • • • J!) • • • • • • • • • • • • : Sit D1' 'to DISPL&! IICC,Q,C'tH • • : :............. :, ........................ : i. • • • ............... BUIICII 'to COltROL 11 SSIIA'l'TU • • • Charts' 97 $$BATTNS - MODE Cornland Validity Checker (Part 1 of 2) (Refp.r to Chart 05J Chart AX .. * * ····11·**······ ...............** SSBATTNS' * * " : i ····*81·.·***···· ** ** ENTtR SUPERVISOR STATE * : .• .* *. *. •••• *** •• ** •••••• i RETUBN * * * * * SET UP BETORN POINTS B1 *. *. * * ................. 'O. *. . .. •• • .* IES * .•.. .*.. i * •• * * NO C3 "*" * •*. ftODE ECC,",Q *. *. * "A I • • 81* i .". ... .* * * * • 'O. ftOOE ECC,fI.R CKECC/lQ ••••• c 1•••• ** •••• IH : i: CII El:C PI * : .... ....* RBFERF:NC~S *. YES • * •••• ..... • * TO AXDS: AYCI, AYH2 .*. i * .• * *NO ..... .* .. • .* * ·AY " • 111 . *. * . *. •* • * "ODE *..- •••••••••••••••••• IES B *. *. .* . * * .. * * NO •* 'O. *. El . *. *. "ODE 8IB,R *. * •. * * CH8IRO •* . * 'O. *. Fl • .* .* *. *. .* *. * .. * * .'O. .* .*. ......." .!.. NO 'O. CPU=I'15, *. 'O. 1"5-3 •• OR *. '''11 .* YES * •. * • NO : •••• J 1 ••••••• FORCE ft SU' IN INDICATOR BYTE **: *• i ·**··G2·········· " POST HIR,ECl: * *RECOROING 1I00E " *. ." *. Rn~~B8g6~~l: ................. • • • * 1"" .* .• ... • : GJ * ..* * i ·····H2·········· * * . .* *.*; YES •••••• .* • ". 83 *. ................. *. ·····J2·········· • >0. * CHANGE Bce TO >0 'OtlECOBtIIIG ftOO£ * * * VIA DIAGNOSE : INSTRUCTIONS : .>0 BRAIICH TO COIITROL LN UBATTIIA .* J] . *. *. * *' .*. >0 >0 : ..... ·'Y * G2"• DOS/VSE Logical Transients SilT UP HBII • TLftE LUll II • BftS TABLl! : :x ...•..•... : * . *. IES •••••• .* • • i ..... *AI • * G3" " ,. * *. *. .* •• YES .* • NO BRAIICH TO NYSEIiR IN SSBATTIIA • " i ····H5········· IlRAHCIl 'to CONTROL III $SBA'l:fU ............... * .... i ····Kl········· ...............* * ** .* ................. i NO * .. * * .- IllS * IIOOE : .......... x: * .. * : • • • • G!) • • • • • • • • • : *. ECC,C. E, OR T.* ............................................. . *. *• '" B5" ". YES •••••• i i *• i * .. NO *. . * " *. * ·AI " .• •* ftOIiE *. ECC,C,TH *. •" • 1"5 ." CBlIIGE ". 10 •• TLaE LIIUT •••••• ..... i .CKEceCfH • CHUGE HIR TO *BECOBDING ftOOE * : IN CTL REG '" : i • PPOCTTT'r >0 '". • " * • :x ....•...•. : NO /lODE BCC,C,Q *. SEl' UP .EII i!1I110B COUIIT LIIIIT III BftS TABLE . *. .•. ·.................. . .. NO .... *. i * .... .* .f. .* *.. * *IBS ·····ss··.······· *• ,. * * *• j •. 1"3 1I0DE ECC,.C .. R :C1It:CCCQ IH 98 *. • ................. ................. • :x .....••... : ..*....x ."* i .... *.··*K2········· * *............... * * NO * .. * " : *. *. I 05 • .* .... .'O i • • • *. .*." *. . i HI = ·AI • "'OBr *. .* i ..... * .* /lOIiE CPU * *..* .... YES i *. *. ." • • >0. 80 'O. i PROC£DOill' .* • D5 ". *. i EJ **B~'O * 1I0Dl! HIB,O .*. <>1 .* .AY • 'O !lODE 'O. U:S 'O. HIR, E OR T .'O •••• •• •••• *. .*. *. .* i: *..* CIHlRECT *. us . * i ..... * i • • 'O * *..* .... YES NO .*. *. * •. * CKFORT5~ *. 03 "*.. ....* i .* .* ftODE *. YES •• CHA.GB *. NO >O.ECC,ft,B OR T •••••••••••••••••••••••••••••••••••• 1*. BRBOit'LIIIIT •••••• *. CHit lRR * * i" i: .* BIt* • • • Chart AY $$BATTNS - MODE Command Validity Checker (Part 2 of 2) (Refer to Chart 05) ... • POST RIR III • • RECOROIIiG IIOIlE • • RESET HIR • : ERRO!! COUNT : ................. i ·····CI···. ··. ··· • CHUG!! HIR • TO BBCOBDlIIG • IIODB 1M • CTL REG III ... ··. ·"x • • Fl· i ·····81***· .. •••• • • • FOil.~;~, C.II ·AI • ... . ·AI • • Ci • •• F~ • ······H2·········· .. .. ................... .. POST HIB lice • .. IN \lUUT IIODE • ·······B. •••··••••·.. ·····B5·········· ·.................. ................ ·................. *-*-*-*-*-*-*-*-* • • i :* ••• C2 ••••••••• : ·····C3..i ·.· .•• ·. ··.··c. ···..··.·· i ·................... ·.................. .....:x ....•....•• ... . . . ··02······. ··· • FOR .~~~, Ii. U rOB.~;i,,,,R ·AI • • B)· FO~.~~~, Q FO~.~H,R ·AX • • 1!1· • CHAHGE HIlI • • TO \lUUT 1I00E • • 111 c'rL REG 111 • ·····B3·········· i i "HIP.QUIIlT i U. .. fEst IF HIR • • IN QUUT !lODB • • POST ECC ""111 • • RECORDUC; "0011 • RESET IlCC • • .. E~ROR coon • POST ICC IIAIN • IN QUIBT 1I0D.<: • i • • • • CHlNGI ECC IN • QUUT 1I00B • ONLY l\UII IF • CPU" n50 • :~l~~~l!I-.-.-~!: • 'lEST IF 11111 • • III QUUT l\ODII • ·····C5·········· i "POST ECC COlT.... • III BICOIDIIG • • 11001 IISBT • .ICC IBIOI coun. ·.................. ·.................. ·................. x ·AX • i • 05· • CHAHGE ECC • .. TO (lUlET 1I01l1! • .. VIA DIAGMOSl!· • : lMSTBUC'l'IOIiS : ·····D5···.·.···· ·····D3·········· i • CHAliGE .<:CC 'ro .IIECOBDING "001 • VIA OIAGNOSI • INSTIIUCTIONS i • • • • • CltliGI ICC COI'fIOL 111 • .BICOIDIHG 11001 • VIl DI"GIIOSB ·.................. • • • • ·................. •••••••• * •••••••• . . . i . ••••••••••••••• x••••••••••••••••••••••••• x••••••••••••••••••••••••••••••••••••••••••••••••••• ••• ·F_•••••··.• ··................. • FOII.~;;,C ,Tit ~OIi.=~;,C,\1 ·•. . ·ax • ·U • • Gl· • * • ······G2··········. i II)· ·····G)·········· ECCCTBI! i: :~l!i~l~i-._._!!: ·.................. ·................. • • • POST ECC CONTROL IN (lUlET 1I00E • • • • • TEST IF RIB • IN .-.i •• • *. BRANCH T O . NO •• -. OtCliit IN .X. ••• •••••• &HY REPLY •• SSBATTNA· •• •• ......*........ i .... ·. ...* •.. * • IES ·..... B3 - ·.··£4······.·· * CONY e a T . INPUT TO ••••••••• X. PACKED FORII • • HE'tURM TO CILLER i • •••• r;;s* .......... • • ...............* i **** : ····D4··••• ••. · RIITUHH to CILLKR • ..* •••••••••••• • B2 : .** • · • - . *1'5 PROl;tlA/I-CKECI\ EXIT SUBIIOUU/IB ····r~······.·· PCROU'! • ·1'5 • ••••••••••••• *• ...i *•*. Gil •• £I.C. CAUSED B~ •• lES •• DUIIIIY INSTR ••••••••••••••••••••• .\lEAR LABEL.•• DUIIIIY.· •* *.• * • 110 .-. i *. HII •• P.C. •• •• CIUSBD BY •• YES • ..1lUI!~Y IIISTR ••••••••••••••••••• x • • NEAR LAbEL." ·OUIIII11.· • • : • BElD III!PLY ALL *.. . .NO. . . *..*••CHARACTERS SCAN •• IIESPONSE ". YES FOR 11420 •••••• ................. • • .. i RDST/IT IC ···c~········*··· *-.-.-*-*-.-.-*-. •. • . i Ill·. i ••••• 6 , •••••••••• •••• J , ••••••••• ................. i • ...i AC PIIIIIT IIESSIGE 011 SYSLOG • ······C]··········. ·.................. i .... PUNT ERROR 1156 &Nil READ REl'LY. ................. SVC 22 RELEASE THE SYSTEII ElCPR6 • ••••••••••••••• * •• * • YES .* BII . • • : •. * . . . .* X PUTIISG • • i ···85············ .-.-.-.-.-.-.-.. • SET TO SClI • :NEXT CIIA.ilICTEB : ···n2··*········· • -*-*-.-.-.-* -.-. • ALTER COBE TO • • EIIO-Of-ENTRY :OR END-Of-CORE : · POTIISG PUTIIS6 *. ... IS *. • ••• 8q. ••••••••• •• CHARACtER •• NO • BRUCH TO • •• 0-9 OR 1-1' •••••••••• 1. BRRRTH III • SSB1TTIII • . CcwLN6 i ······G ,.•••...... i • ·B&· • • Gil •• X. ...··!1.·.. ··.··. • SET UP IISG • '11471' XX .. • • BYTES CAN ONLY. .. RE ALTERED' .. ··.····'5········· ...............- • *111 .. • • B~* i i • • • •• 81 •• X. X .- • III SCANHEX. SCAN I ••••••• * ••••••••• CALCULITE NU/IDEB OF RYTES TO BE Al.TEREO ALTER • x •• IS REPLY •• IGIIORE scuaEl · .. Ill •• X. INVlUIl ••• **0 , •••••••••• • • • • · ..... • • 110 .. • R EFEIIEIICES • • • I.TO BBD1: • • B&B4, B1H] • • • • ................. ·....... YES •• ·..···*.1···**····.. ............... .... · ... BB PRlllt IISG 1110 BEAD RE£lLI • •••• •• STARr •• Y JISt •• 100R ALSO • - •••• •• IN SVA .- *. PUTIISG • i .* i ···'2············ *-*-*-*-*-*-.-.-* ·J2 YES .... - I!RR2 .* •• END ADOR •• III SVA *. 2 of 2) ••••• REFERENCES • ·TO BBA2: •• :·IlAI3. BAE2 14· i CHKSVA 1 (~art $$BATTNT - ALTER Gommand Processor (Refer to Chart 06) * .•• • NO ·Jl HlllD ADDRESS WITHIN SUPERViSOR OR SVA PCROUTI i ••• JS •••••••• i ..... J 4 ••••••• * • .SET INOICA.TOR. FOR ANY P.C. .. Hl~PE"BD • •* * •••••••••• i :.**.K" •••••••• *: • * SET INTERRUPT • 10DRt:SS TO LABEL OU!!IIY1 : ........... •* :.: •• £ICRUUT2 * ........ ................. : .se:'1' INDICAtOR. FOR INVALID • IIODIIESS •• * * * X K~;~~; ••• :.: • IIRlHCH ... X. TO lHTJllliIUPT • • :: AOUIIESS :: ................. Charts 101 $$BATTNU - DSPLY Comman{ Processor (Part 1 of (Refer to Char.t 06) Chart BC. ...... ..... ·. •* * lJ • : * ••• ·· ** •• '2 ••• ••• •• • • UBlTTNU ••• ** •••• **.*.* IJBATUII 1 BEGIN • ·.····02··········.. • X 83 .•.i *.• * • • : • • •• *. ••••••• ** •••••••• - i ••• * NO • G2 • ······c2.. . i IHI'rUL • • • • i ·····85·········· ·................. i .SET UP IIES:>lGE • '1111111.11.1 • 8fTBS CAl OILl BB • • DISPLlIBD' i ···c,,············ ElCPRG AC *-*-*-*-*-*-*-*-* ................. ........... • ................. ISSUE liES SAGE. i ···es············ . ................ . .... . !!ICPRG lC .-*-.-.-*-.-.-*-. ISSUE IIESSAGB ·....... • ·····.03·········· ····*D2·········· • -*-*-*-*-*-*-*-* .SCANR2 AD. • USE A DUIlIU • INSTRUCTION • FOR THE START ADDR • • .K 1 ·.................. • • SCAli FOR OPERAND NO.. •••••••••••••••••••• .* *. E2 .i' . •• AM! OPERAND *. .. ." • • •• .• • • • •• •• E3 .•.i. •• *. *. $I • • o YBS • * .- .* ··.... ...... i NO • • • • ic ····fl.········ BRANCH TO IIYSBRR IN U8AT'rNA • • • ............... •• •• .* *. F2 .•.i •• OPERAND VALID *. * •• ··.... .. ..... . • • .* . .. US •••••• • • - : SET UP IISSGE 1I1I111 'INVALID ADDRESS' •• •• G] END ADIlR *. *. *. EXCEEDS *..- * i ................. ISSUE I!ESSAGt:. i: ·K1 IF THE START ADDH IS ~~~~k~Dh~ ~~~G~c ~H~K ROUTINE GETS CONTROL IIHICH RKTURNS TO LAIIEL 'DSDUllftY' ··83······· ·. x · i .. AS • i ···H5.········ •. · *-.-*-.-.-.-.-.-. STCC~7 EXCPRG ..RIIIT DATA 011 srsJ.OG i • • • • • • • • ·K;l USE A DUII"I INSTRUCTIOII FOB TilE EIIIJ ADDR ·K:.! • • • • • * • .. ................. IISDUIIIIY 1 IF THt: END ADUR IS l~~~~~Dh~ ~~~G:c ~~f~K ROUTINE GETS CONTROL WHICH RE'J.'II11NS TO LA8EL 'DSDUIIIIY I' .. .* i 113 • *. •• ...... · ··.......... ·..... * .. * .* • i YES i DOS/VSE Logical Transients .. *. •• •• NO •• PROGR. CIIECK •••••• *. All ... . ·................... • • • • • J) • • • • • • • • • • *••••• ............... : • UNPACK DA~U • • TO II! PRIIiTED • ·............ • 102 ................. CLEAR SWITCH FOR • • PC BlIT • • SUBROUTINE • • • ....i • ·•.*.. • NO AC III1AIICH TO CONTROL IN $$8ATTNA • • TO ~ORK ABEl * ···.·GS·········· •• rES VIIIT •••••• •• EMil OF •• ·.PART •• • • • • i ···H2············ •••• J 2 ••• lion DATA ·................. . .. .. i *-*-*-*-*-*-. -*-* • • • ······85.•···.····. ···.·PS·········· • • • ............... A3 : ................. nCPRG .. ·................ . .. .. X • • SVC J.2 •• .. • :;!IZ! TIlB • • ... • • SISTEII . . . SiC 22 •• • .BEL!ASE TilE• • • • SISTBII •• • • • + 1& DEHRROUT 1 ·····G2··.······· • • • • . CALCULATE END ADDR= START ADDR • i • • • G2 • ................. ..... . .... .•. . NO G2 •• X. · · FULLWOIID i • •••• F .I •••••••••• *. •• 8RlNCR TO COR'tROL 1M $$8AT'rNA i *. •• START -. US •• lDDR Iav ALID •••••• .* ····D. ···•··•·· *. ·····DS·········· .. . DSPLI i • • • • • ................. ... OS •• 1. • i i • • • .. .. * **CJ······· .................. • • ••••••••••••••••• NO * • CLEAR • • SWITCH FOR • • • PC !!lIT • .SUBROUTINE •• • • • • * •• * ·····811 ••••••••• • • SE~ UP !!SSGE • • lSIIU 'SlsrEII • tRROB, PROG. • • CIIECK III LTl' • i **·· •• •• INITIALl:oIE PC EXIT BY STIlT IIACRO SYC16 l!> • • .* *..* * ·..... * .. * • *. • •• 5'1'611'1' •• •• ADDR •• US -.EXCEEDS VIRT ••••••• END OF •• ·.PAIIT •• . SET liAS!!; RtGISTER · CONY ERT ADDRESS TO PACKED FORII .... i .. ·...........-...... • • : ··.......... All : ••• DSPLIl i 14 *. • •••• &5 •••••••••• •• PROGIl. CALCULATE • CHECK DUB •• YES • IIUft8ER OF • TO IIIVAL. • ••••••••• 1. lurES TO liE • ..ENIl ADDR * DISPLAYED • i ·····13·········· • ~ • D~ .. AC • i ····Js········· * IIRAIICII TO COIITROL III $$8AT1'NA • ...............* Chact BD. $$BATTNU - DSPLY Command Processor (Part 2 of 2) (Refer to Chart 06) ····A.2········· .................. .• I>SPCBOUT "' • PROGII. CHECK • • nIT SUBSOUTIIIg • ...i B2 *• • - P.C. •• CAUSED BY •• IES ·.DUIIIIY-INSTII ••••••••••••••••••••• *IIEAR LABEL. * -DSDUIIIII· *• * •• * * NO .-.i . * C2P.C. - • • • • • - CAUSED IIY *. US ... DUIUI'l-IIISTR . . . . . . . . . . . . . . . . . . . . x • • NBAR LABEL." DStUllllf1- *. . * * NO .. - i ··02······· * SET ........... i ·*D3······· DSPCBOUTI .. .. 111DICAT08 • FOB ANY P.C. .. ". HAPPENED •• .. "' • SET .. INDICA'rOR .. FOR INVALID .. ADDRBSS .. .. ............. i : •••• 82 ••••••••• : • St:T INTERRUPT • .. ADDRESS TO • "LABEL DSDUI!!U 1 "' ................... .. : x•••••••••••••••••••••••• : DSPCROUT~ i :.: •• f2 ••••••• :.: .. .. - SVC 17 .... IIUIICH TO • * IHTEIIRUl'T • • *.. ................. *- lDDR. .. .. Charts \)03 $$BATTNV - DU!P Command Scan Routine (Part 1 of 4) (Refer to Chart 01) Chart BE. ··................. •••• A I ••••••••• • "DATTNY · • . ·.................. i ••••• /11 •••••••••• • • • POIlT TO 8G COIIIBG & SYSCOII • • • i ·.···CI •••••••••• • SCUR2 110- *.*.*.*.*.*.*-e-. ................. • SCAN FIRST • PARlIIETU OF • DOIIl' COIIIIANO 01 •* •- •• .•.i •• • • e• .... ..... AIr •• NO PAIl1l8T8R •••••• ·.SPECIFIED.· *. .* i .- • US ·8G - • 8:;· i EI ••• E:II DUIIP1LU • •••• E ............ •• •• *. •• LENGTH OF •• us •• • .FIRST PARAII. • ••••••••••••••••••••••••••••••••••••••••••••••••••••••••••••• X. •• 0 & *. * •• *.* •• • SET III'l'S TO. DUIIP ALL IIUfITIOIS ••••••••••••••••••• • NO ... i Fl •* •• •• •• =. e. DELIIIITE!! *. *. •• rEs •••••• .* .* i *•••• *.• * • GI ... NO .*.i *IIH • • 111I'll U1111 •• TOL Gl , •• •• .* *.*. 10 •* .• LENGTH *. *.•••••••••••••••••••••••••••••••••••• NO •• 1...** .La.GIH •••••• *. =6 .* 21.* *. * •• *.* *. * •. * .* i • us • US ..... ... ·5P • • 81· .*.i HI.. •*paRall. *. •• 10 BU'F.I •••••• *. .* *. *. •••• i •• •• • us X........................ ......•. *..• . • ,.i•••••••• •• SET BIT 'fO ••••• J III Hl NO •• .-.i ROIlIIAL •• P'111I *. •• • s •.•..•.• ••••• ·IIG • • II~ • . •• • .. •• •• US . . ••••••••••••••••• i • •••• J) •••••••••• ·................. . :X .................................................. :I ........................ : • • DUlIl' SDUD BUPl'Ba ..... • • • SET B~"S 'f0 • • DUIIP S va. • .iLL PAl rnONS • .. II •·BG B'·• •• · COlT' 104 •• DOS/ISE Logical Transients Chart BF. $$BATTNV - DUMP Command Scan Routine (Part 2 of 4) (Refer to Chart 01) ..... .·. "BB • • G3 • i 10RlllL 81 ••• SfAST •• .* *.•• •• LllIIGTIl •• w. = .. *. . •.. * •• .w .- tES • ••••••••••••••••••••••••••••••••••••••••••••••••••••••••••••• 84 ••• .1.. '" *. . * .~ .-. -. .el *. •. .... = 3 • • • • _ • ................ . ._.. ... .JIG • 81- •• LfilGTH • ••••85 ••••••• _ • i i •• *. *..* ~ •• •• •• t>lIlAIlETEB. •• IllS • sa ...Irs m !>fAS •••••••••• 1. DOilP Sf .. AIID •• •• • SOl'BlI.f.1S01l w. 110 .* .* COlI'll •••••• ·YES i ••• Ill.. .• W P IBAIi W. *. Sfi *..* *•• * • • *.•• '" .* IllS ·............._. -_... · • •W W i *BG • ·81· mlTl ••• •• = 3 Dj .* *. IllS .i. • •• •• .* LKIIGTIi •. •• 110 •W •••••••••• , . . *..* *•• * • ·····B ..••·....·· SB'l' 8U 70 DOIIP Sf A Dl .* Lt:IGTH *. •• *. i •• • 1I0RlllI. 1 . .0 1 •• •••••••••• 1.. ~ ;: **. . . .* •. * • 110 • •••••• 1 ••••••••••••• IES i B2 •• • •••• R3•••••••••• .* *. • • •• LAST •• rRS • SET ilI:1' 1'OR • w. clua '" s .w •••••••• X. PlBT.1T.1QII TO • •• •• W BE DoaPED • **. . * • • •• * ••••••••••••••••• Lal3 USl i ..... ... ·BG • • II!>· Uk W 110 ..... .. i ·810 • • 65· W BRlI i ..... ... ·BG • • Bl- con 1 Charts 105 Chart BG. $$BATTNV - DUMP Command Scan Routine (Part 3 of 4j (Refer to Chart 07) ..... . .... : .u : AJ RBFE8ENCIlS TO BGB1: •• ·... · oo. 110 •• •••• oo. •* ••• 81 •• DELlIl = COIIIIA *. *. *.. * • •• DELLII *. *. = BLANK RBFBRF:NCIi:S *. .- S'l'DUIIP •• •• •• rES ............. .- i * •• * • rBS 85 • i • POUT 8U TO • • PARAftErER LIS? • .• .- ~~01. Bgl~i g&8f: =,~~ •• 110 •••••• * i COIIT1 ...i ............ ·······Sl··········.. ·................. :~~~ *.* •• •• Uit: • .o$ us * • . ·....· ................ ..... . .......... i • ·····C]·········· ·.................. i ·····cl·········· i AD. CALL SIJBDUIIP PHASB I I SU .THRU SYC2 HOOI • POR SSBPDUIIP • • *-*-*-*-*-*-*-*-* • SCAli SECONIJ .. ·.................. .. P1RlIIE'1't!R ...i D1 • •• .* LENGTH *. •• •• • 110 I .•. -. *.. ...... .... i : :- j *. * .. * • .- .- • • • .- IES BS : i ·····81·········· FINDPUB .CHKADK BH. *-*-*-*-*-*-*-*-* • CHECK AND • • CONVERT DEVICE. • ADDR • ................. i ~VC"SGb • •••• 1'2 •• ** ....... .. PUT INULID • *. NO .. IlUPlP FILE .. .* ........ X. IISG IN .. .• X ",UISATTNA IIUFF ER" ••• 1'1 •• •••• •• DEVICt! •• IN PUB *. *. * •. * .o$ .. o$ .. ••••••••••••••••• rES • : i .... * c5 : ••• * i •• .* H1 .*. * . DUIIP *. *. •• SDAID BUFFEIl • ON PRIN'l'ER. *. *..* • .- rES • *.* ....•• 110 i: IlEVOK ••••• J 1 •••••••••• • ** SAV;;; l'UB DEVICE '.rIPE AND INDEX TU PUB ENTRY • * • ................. : : i ••• * * * AJ .. * • ••• * * 106 DOS/VSE Logical Transients i ····DJ········· BRANCH TO COITROL 1M SSBAT'l'1Il ............... • • PUT I1VlLIO • • .I*OPS8l.0 8SSSAGS. • • IN $$8.T1'U • •• BurlMI • • .SCANIl2 i *····85.··.·· •••• BS • •• • CS •• 1. ·····C5 •••• • •• • •• .slcpaG AC* *-*-*-.-.-.-*-.-. • IlBI:U IIKSS1GB • • ·.................. • • • • • • • * 011 CONSOLI i .·*·05········· BRUCH TO • COIITIOL III • $$UTrll' • ............... * • Chart BH,. $$BATTNV - DUMP Command Scan Routine (Part 4 of 4) (Refer to Chart 07, .··.1,.··.•••.••. ··............... . ..... ..· • ·BB • • 1'1· i 1'0UftP 111 •• •• ••• LOOP] •• .*LBRGTH *. •• •• (II *. CIlItIDB *•• *.* • ns •• 110 110.. • us · . i * •••• .. CII •••••• • •• • POIIiT TO • : IIUT DIGIT : ·.•................ ................. ... .CHBCK & CONVER". • ADDRBSS • • * i i .* •* *. * * •• • * US .•.i Bl *. •* *. •• NO • • * LBMGTH *. (6 .* •. X. *. *. .* *•• *.* • YES i * CONYKRT • * ADB TO PACKBD • IIBX • .....•.......•..• ... * * * •• 1'1l BK* •••• :.*••1'!)••••• *•••: •• ADB > •• US • *. KIID 01' CORE •••••••••• X. ................. • CHECK & COHYERT. • ADDRESS • * . i .. *.* .. ·E~ .. *·· •• ** .. * i ·*-*-*-.-*-*-.-*-* ..··Pl··.····..· .CHUDi * . *. .* .. .. ALL 110 • *. DIGITS TESTED.* •••• •................ • *. D~ ·.···01.· •• •••••• • SCUB2 AD* • -.-*-.-.-.-.-*-* • SCAN SBCOND * • ADDRESS * *. * . . * .* • .* - *. •• *. * .• * .* BH. ...i •• DIGIT .OIGIT (A-1'). i Gl i ' ··········· ••• •••••• 1 •••••••••••••••••••••••••••••••••••••••••••••••••••••••••• =VILIDHBl •• ·.···Cl·········· *-*-*-.-*.*-.-*-* • CHItADR .* B4 • • lDB '" EIIIl OF COBII lllB • • • •• • ••••••••••••••••• * •• * 110 :x ..................•..... : •• i *. •• BEGIII •• NO • •• ADDR < END •••• x. •• ADDRESS.· • US ..... i •.Bl· "BG • • B!)" ERB *. * •• *.* ..... .... i ..*.GII···. •••. *• ................. * ..* RETURII .. . ·BG • * CONTI Charts 107 Chart BJ,. $$BATTNY - CE MODE Command Processor (i~efer to Chart 08) ...... A1*******.*.$ : USSA'fTNY ...... : • *.* .*.**** ** •••••• * * • * El2 i .-. *. .... .. 112 • i *···**81···.······.. .. POINT to .. *RECOROING t'ILE .. : TABLE •• ". *. : •• ** ••••••••••••• *..* Cl ... .•.i *. *. GENERATED *. .* *.• *NO •••..•• .* .* ....* *. .• *. i •.••. c2*·······** * • · • • 110* *-*-*-*-*-.-*-*-* • ................. * • SKIP CE PAUl'! : .. * SET UP AND ISSUE !!ESSAlil! • .•.i *..* * .... *fES .SCAHlll * • IIUNCH TO .• •• ............... * CONTHOL IN $SElATTNA • *. OJ • VALlO *. .* *. NO • •••••••••••••••••••••••••••••• x. * .• * *~ES i . •* •• .... * .• *. .* ". 1I0Rl! *. PIRAII *. * .• * •• * COIV8Hl, TO BIURY 'lifO SU8 VlLUB .• •• * • • AD. IOET lilt * ................. : PlRlllJiTEIi F; .• i *• ** •• 115 .. .i : •• *··*~n:~~·;~*·*. i NO •• •• * .VSIRR .X....... .•. *. VALLO *..•*.•• *••••••••••••••• IN ;UBU'TIIA * *... *.•••••• YES NO ... *.•. *IES i FJ * YES *. ·.................. ~ •• .VALBODO!) *. *. NO *. VALID .* ..... . *. .* *. .* *. •• VALID .··.·os· ..i '·.·..·.* * * * CORRISl'ONDIIG DIVICE 11001 * *•••••••••• *••••••* •• .* . *. .SCAIlIU ** SAVE • i ·····ss·········· *-.-*-.-.-*-.-.-. **·**13··**··***· * • ** C!) NO •• ••••• ••• * . *. .." • i ..* 10* .*.i *. 10• DIIT IInl! PARAIIETER * • ................. .* ................. .* B:' : i ·····85·········· .-*-*-.-.-*-*-.-. *.... :GE1' pfhgb~~ " : i ****1)2········· * .... ULIIBOO *. *SCANH] ................... Fl .. *. i ·.···Cl·········· *-*-*-*-*-*-*-*-* .*.*.E 1**••• ****. *SCAHRl AD* *-*-.-..-.-.-.-*-. ** PAHAIIHTER GET CC/J * • * * •• . * . !!ORt! PAIII!! :VALNODOO i VlLCUUOO ElJ NO • •• ** ••••••••••••• * .•. *YI!S • SCA Nil 'J * * .* •••••• X....... *. res .. NO i ·····D ,......... . : *. RIISR RECONOING .........•. x: RIISH *. .* : .... * YI!S *• ** ••• * ..·.·Gl··········* ·..................** i i : •••• Gl ••••••••• : * : PREPA!!):; TO ~gI\Bw:{n~· •• * .. PREPARE TO SET Bx'n/BIl' • IIISK TO X' ff' : ................. i ••••• I.:i~ •••••••••• * • : CO.VEIIT TO IIINlBY • • ·.................. : :.......... x: i ·····fts·········· * * i : •••• H 1 ••••••••• : *• SEARCH PUB FOH TH.1S : DEVICE • • ................. Jl .• . * •• ····J2········· •• *. NO X• * SRIINCH TO • FOUNO • * •..•..•. X. NVSt!R~ * "'. * . . * . * • ••••••••••••••• IN UIIA'CTNA • i SE'rUPOO • •••• JJ •••••••••• • SET III PUB2 * •. * Y t!5 : ic * * * l'OINT 'CO PUB2 fOR *'" * .................* THIS DEY ICE * : .!.. • Hl : *.*. 10~ DOS/VSE Logical Transients * ~l~E6~;1'IIS~~1( : AND LlIlI'r • .•................* * : •••• K 1••••••••• : .. IIlSII :x ... ;...............•...••....•.•.•...•...•.•...... : .*.i •• * OB BXT~ ANO Bll VALUE TO S8T BYTE/lilT * ·.................. ** • .. .. .. i .···k.3········· ** III1ANCII TO CONTdOL ............... IN :UBATTNA • • $$BATTNZ - 115/125/135/138 or 4300 MODE Command Processor (Refer to Chart 08) Chart BK. .*.*. ··.... . • Al • i :...., ......... : ) ..... *11 •••••••••• : ·.................. • ............... $SBl'l'TMZ ·.. • POIIIT TO .* ." • : ails TlIlLP. *. *. ................... ... .... *• 8J 1I0DB .•.i *. IS lCTIVB *. .• *..* .- •• NO .* •.•. ... •• ··.......... i • 1::1 Jr'11~ *. .• ..... D2............ .. *. * .•.• • .. LOID $5BATTIIY •• *. IS * .• * • .- .* t'1 .- 110 *. *. •• •• * . . .. .* * .. * NO El :. X. i • • BRIICH TO ISHl'ITM! • • DIlG13~R • POI lit to • .RBCOIDIIG PILK • • • • TAIILK • i POST DIlG13!>w i : •••• 85 ••••••••• : • • BBCOBDIIG IIODS • III CR 111 .. • • • post UUIBT SODB 1M ca 111 .. • • H2 * i •• P3 *. * .• * .• .- ······G1··········. ·.................. i SB'1'UP STlTUS IIBSSlGB i •• IIODI! •• US IR •. .... .* •••••••• • • ••• p" ••••••••• BRUCH TO • • CONTROL • I I UBUTIl • • i • HXCPBG AC" *.*.*_*_*_*_*_._e • • • ................. • NO .•.i •• AJ : .. .. .. ·····81······*··. DISPLlY STATUS IIBSSlGK •• •• i : • • • i ••• i • YBS • • .. 110 ······B. •••·•••···. ····B2········· · ............... . .. ·.................. ·.................. ·................. ··.... . ..... :x ......•.••..••...••.•..• : .... .. .. ............... ........ .. ..... *..*lI't:s. •. X. •• IS •• NO •• IIODB STlTOS •••••• *. *. YBS .* : •••• 13 •••• * •••• : i . • .•.i •• .* .e ........••..•.•.. : Q IIODI! CE •••• *. IIODB B *. Dl ·...... : i •• .* • * 81 .•. .. PUIIIOO • IBS.. .X.......... .. *. .. • ••••••••••••••••• * .. * • us .* •• • •• 10 •• CPO=l)!), : ..•.•. •••••••••••••••••••••••••••••••••••••••••••••• 110 'IIOOE • ••• Bee. *. i 01 •• YBS . .. .. ... .. .... Cl *. *. • us •* .* i •• •* •• *. III1S *. *. RCC, Q • 1:1 • i i ·····al·········· .. : GET CONTIlOL • III SO PBBV ISOB • • STITH • : •• •• ··.......... •. • H2 • i ••••• H2.......... •• .* • .. . ................. IIOOE CR *. .... Hl .1.......... SBT UP I N D . • ISSUE !lBSS1GB • • G) YBS •• 110 .!. •• • • ····J2*········ HUNCH TO ............... I:OIITROL III $$B&T'1'1I1 .* YES •••••••••••••••••••• ······Y4·······.··. i .* IIODBL * ••• ... .... . 11!>/12!) •• •• OR 4300 •• 10 ······Jl··········. ·.................. • BESBT 1B • 1M RBCORDIIIG : FlU TULE • • • • • L01D UBATTlQ • • : ................. IBCBOO i : •••• tI~ ••••••••• : • post lB. • PILB tlBLK • ·.................. • • III BECOILDlIIG • :X •••••••.•••••••••••••••• : i i • .* • • :.•.••.•.•..•..••...•.... x: *. •• i • • • •• •• J4 •• • ••••• • BBUCH TO • ............... CONTROL II $5Bl'1'TlIl • • i ·................ • • • • • • Mj • • • • • • • • • BlllCH TO UB1TTlQ • • Charts 10~ Chart BL. $$BATTN2 - PRTY and TPBAL Command Processor (Part (Refer to Chart 04) .......... ...... : A2 : : • *.* :x .......... . . . ..····A ,••••••••. · SSB1TTN2 ~ P8'1'Y20 i : •••• A2 ••••••••• : • • * ••••• *.*.*.*. .. ·····Bl·········· i PBTY • SCANR2 ·· ·· . *-*-*-*-*-*-*-*-* GET OPERAND • • • i i •• SET NPlRT •• • AND • : HUY : • . ........ .. x: ····El········· ............... • : i ·····V2·········· :PRTY21 .CONVERT PII'IN • PBTYFLD TO • PAB'£ IIAIIE IN • BUFFER ElITlDDRESS .* .•.i •• i: : •••• £2 ••••••• · • • .. i ..... *. ... .* -. *. .* * .... • IES .. .i •• •. .* * .• * • YES PIITYSET: x • OUTPUT .. • : WBlTE LINE ON SYSLOG : i i ····H2····.···· · • .. • :................. IIRKRG2 : NPART IN • ................. .* LOAD • • ·····G2·········· *-*-.-.-*-*-*-.-* : •••• 81 ••••••••• : • 1'2 •. .* * .. * • NO Gl •• ... IS •• 10 •• DBLIIIITEB •• •••••• A BLANK •• *. . • NO.. ALL •• •••••• PIKS •• •• PROCESSED •• .•.i PBTISET **: "OYE DELUIl'BR TO BUFFBR * •••••••••• ** •••• IBS.. IS •• •• ••• THERE All •• •• OPERAND •• ·BII • • Al· • • • • ·.................. i BRANCH TO • • • HUBCH TO EXlTADDRESS ••••••••• *••••• . .. • ··...... i ••• * i ··Jl.···*·* • • SET • • EXITlDDBESS • •• TO PBTYJO •••••• AJ • ...... .. •••••••••••• i : .... A~ : ••••1 , ••••••••• • • •• • X. • BRllICH TO IIVSBaR III UBlTTU • • • ............... 110 DOS/VSE Logical Transients .x ••. • • NO ... •• .. • RHl'lldRNCllS • ..TO BLA I: ••••• SftCS. BIIE2 i ... •• •• •• 83 •• TPIIAL ACTIVE *. •• *..* * •.• ~ ··.................. ·····D,.......... ................. PRnos 1'1 • • SETUP FOB LOOP ........... PRTY1S .,.**.-••. .' GETPRTY IN PB'rIFLO • ·................. .. • •• NO • •••••••••• X. • YES ··CJ·····.. i i • ••• EgT~~~n~S •• '" : PIITIOS RE-INIT POIIiTERS : •••• C2 ••••••••• : • •• Cl •••••••• SET • • • . i * ••••• * ••• •••••• *** •• *.**.* • • • ••• •• H2 ••••• ••••• AD. • CLAER ElUl'FER+!> i .···*13····· ... ·· .-.-.-.-.-=.-*-*-. Plln JO ··................... • .. AJ : .. • SET • • EXlTADDBESS • • TO COUROL • ••••••. ** •• .. • ·····03·········· i ·.................. • • • nOYE 'TPBlL' TO IIUFFER • • • ..··8 . ···.· .... BRUCH TO COlraOL II SSIIArrllA ••••••••••••••• • • • ~ of 3~ $$BATTN2 - PRTY and TPBAL (Refer to Chart 04) Chart Bf!. Comman~ .... ··......... . ..... .·. *Ill. • • :rl· ...... ·· ,............ ................. .... . . · .. .. .. PRUSE'!' i • • SEr 01' fOil LOOP *• .._.............. •.._............. • .... . ... ··...... ···.._.............. i • s;.,t ut> lUll • LOOP S'l'• .II'l.l.ilG • lilT.. I.AS'f • p.II:rlrI0IlS • 1 • • •• 81 • .1. •••• I: PIlT'l'52 ••• &1 •• .* *. • -. .* • o.e:sca.e:asli' • .• •. *. 01 •• •• ··.... ...... *. .110 0' LOOP l'liU!»9 . • ••• -c~......... . . •• lUS:. • ••••••••• • .1. •• .I * •• * .Ik) 5.'1"»'11."CIIO . • • * • ................. ....... i ······11. •••..•••·•. • • ................. •• -.• * .bl. • i •• DI!1'XlllID •• i .... •• ·• ns •• .*I'Utl'J:'lLOIIe.•• ALanDI •• It..... . i e.. ••• •• *. .* .* *•• ·tllS .•.i • .... •• 110 •• PllaJ:'l.lO• • • • .l •••• :rOO.D XII PXiI •• : ..anS6 • I.OOP \:OU 1I'l'1$ii i •• .l . . . .·11 ..•••••••••• *•• * ·11lS ... • • • • &Ill •• .1. i''''!'I~_ liD •• l.BlGra o:r •• •••••• Ot'BIilIiD =2 •• Cl ~ Processor (Part 2 of .* • 110 • • GBT ~OIiBi.lft • • • PXI[ • * A.J* * ..liI'U,JO. • tU • i •••••1: . . . . . . . . . . . • S'lIEB plIt • •••• ··.................. • AID IJBUIUTER • • .111 psrl1'UI • i 1'1 ••• •• .•.i •• "';:~R •••• ns : III rillS •••••••• ..&'AafIT J.OIi •• *. ••• *.* - ClIK81.1( •• B.. 1'2 ••• .0 ..'".*..... i •• .• *.•• 110 .* e. •• •• "'. /10 •• DEl.1lUrl!R •••••••••• ' . . /)l!l.J:Il.1TKIi •••••••••••••••••••• *. :'.' .* *. =., • . * **.••.** . *.••• .• 1i!S • ns .. .. _.. ··...... •• 1'.a'l'J:'l'.lOIi • • • 01 •• ~O.'l'aOl.Li.D •••••• •• 81 roilU •• *•• * • I.IIS i • b... ······10,.···....••. PitTl 1.0 P i ·.................. • ucansE • • LOOP COO II'!'BKS • PRUS1 i ••• .*G~"LL *. e. •• •• •• -. PAliITITJ.OII /)~1'J:.ED • US ··.......... i ·····11,.···....··.. ····................. . i • GilT OPtlBUO • •• *. • •. *.* • A4 • NO • •••••••••••••••••• 1. ·.......... ..It.,········· .··............ .. • III ••l . • • • .1 ••••••••••••••••••••••••• i • • • BIIUCII 1'0 $$B&1'T.. IIVSIIRR LI • • • ··.... ...... i ·81 • Charts 1:11 $$BATTN2 - PRTY and TPBAL Command Processor (Part 3 of 3) (Refer to Chart 04) Chart BN. •••.••••· ······Al ................. • TPIIAL • i TPBAL ••• •• Bl *• TP •• 110.. AliI) 111'5 •• •••••• SUPPORTED •• *. *. * .• * • .* .* YES •·····Cl·.·.······ *-.-.-.-.-.-.-*-*• i .SCUR2 All • ·.................. • GET OPBRAND ... • j .. • =1.* .* 01 •• LENGTH .. *. •• .1 •••• OP OPERA liD ••••• *. * .. * .* • :1 .•. .. .. .1.... *. OPERIIII) NUIIERIC • 110 •• *. *. * ..• .* GET TPBAL VALUE PROII SISCOII ·.................. ... •• •• .* .* •• *. "'. •* Pl NO .* YES •••••••••• X i •• *. . *• PRTrlO· •• * .. * .* YES i • STORt: • ULUE IN • * * ................. • SYSCO" • DIS1'LAY TP8AL • i ••••• H 1•••••••••• •• * * * RESt:T TP BIT ·.................. • • · i . ••••• J 1•••••••••• ·................... • • • ••• X. • R~~gftT REsn •••••••• : •••• K 1••••••••• BRANCH • TO IIVSE8R • III IIBUTNA • ............... 112 IIIISSAGE 'TP8AL NOIII' ••••••••••••••••• * &3* ······Gl···.······. • • *8t * 'ALUE • • •• E3 •••••••••••• *. •• ..... • 1 •••• :NUIIBt:R or •• ·PARTITIONS •• *. •• TPBAL :ZJ:;RO • i • 110 •• t:2 *. * •• * .* • rES ... • i j t:l ·····1)2·········· • • ... 1: DOS/VSE Logical Transients • • • i ····P3········· 8RUCH TO COITROL III lIBA,TUA ............... • • • Chart BP .• $$BATTN3 - ENDSD Command Processor (Refer to Chart 04) ·••........13·.• ....,.,.........• ·................ ······13••••••••••. .·................ i ··.···H3··••·•••••. ·.................. •• $Sunl3 i • USUG c'tLlsr • • BUILD PJlBLIS~ • • lS POLLOIIS • • i ·····Bl· ••••••••• :-.-.~~-l~,~*-.-: • PSi lDDIESS or • • BlCH SIS'!all • • SlfB lIBl • ................. ... IUCP~ BY SOlID. • oro PBII~ I'I'S • • COBB iB1P BUP • • i Il!PS~" •• •• Cl •• .• *. SDlID ACTIVB *. *. .* .• ..... ··.... . i * •. * • 'lBS ·····C3···.·••••• i •• 10 •••••• • .PSIL lDDRBSS OP • nCH BIlS'l'I1G • SIS'I'BII rASK • SUI!! AREl • • • • ·.................. J] • ······01 ... ••.••...•..... ................. ······0]·····.··... ·................. ·:·····el.........,.:.. ·····B3•••.••.••.• ·................. i • • SBlza ~HB • • " . SYS~BII •• '"11 .. • • i • GB'l' SUPBBVISOR • • S~l'rB • ................. i • • • PSII IDDRBSS II LT. SUB lBEl • • • i • PSII lDDBBSS III • BACH 'I'lSK OR • SUB'l'lSI • SUB AREl • • • • ·•••••p,••••••••••. ................. .·................. · . ·.................. ·······G]····· .. ....·.·.. . ... ................ ·····81.··i ....... i ·····u3·····.··.· i • • • • RBS~ORB COII'l'BOL RBGIS~BIIS 8~O" • • • • i ·····Gl •••••••••• • RBIIOYB PBR • • SIT 1M PROGRAII • • IBi PSi • • BUILD C'tUS't • • III'I'H PUS ADUR • • OP BACH • .'I'ASK 011 SUIlTlSK. ·.................. ··.......... i • A] • i : •••• P3 ••••••••• : • USIlIG PERLIS'I' • • REIIOU l'EI BI~ • • III ALL PSI'S • i • .• RBLBIS£ 'I'IIB• • • ". SIST!!II •• • paBB alllL • • STORAGE • • ALLOCATBD TO : S011D • : ................ . ·....... · .. • J 1 •• 1. •••• POIlGiTI'l' .•• •• • • • *. J: JJ , •• PROII •• SSBArTli1 *. * . •• .• .* 10 •••••••••••••••••••• * .•. *ns i .···11········· BRAIICII TO D'1'CIiIT IN iSBlTtIIl ............... i ·................ • •••• K4 •••••••••• • • • • SVC 11 • Charts 113 $$BATTNB - LFCB Command Processor (Refer to Chart 09) Chart CA .. ··................. •••• A 1••••••••• • SSBATT88 ~ ~ (Part of 2) ·. ......... • • B2 • .. . ·····02·········· ................. ·.·.··Bl··········. ·................. . . ··.... .. ....... i I'POPRPLD • • • IIITtALIZE OPERAND FIBLD LOOP • C1 • CLEAR ADDIIESS • • &1111 VALUE • : TABLES : *.1. ···.·e2·········· .................. ..i "PIXTOPR II • •• Cl •••••••• • i "PCLURT • .PFGETOPB ·............ • GBT OPElllRD • • ANV PUT 1'1' UTO. • IIORK TABLB • ·CI!· .•. • Dl •• PFOPII *. •• •• OPBRAID •• NO •• 8UIIBB8 •••••• •• GT 5 •• ..... ··.... . *. *••• .* • · . .....•........... .... . .... . · . ·............ •••• ..... . ·..... ....... · . ................. i ·····El·.········ • IIIS!RT UVolLID • • liD COIIIIA IR • : OPElIIID PULD : D2 • • X ··Fl······· SET APPROP8 • ERROR CODB • III 'PIIIBCOD • *. ··........ .~ • YES • H2 .. i I!: 2 ••• •• .* *. •• KEYWORV •• •• •• PORIIS= *. *•• *.• • i '2 ••• PFFOlll!S • •••• El •••••••••• • rES • •••••••••• X. •• • •• ••••••• • 110 PPLPI *. ••••• pl •••••••••• •• ...*' *. .• • •• PROCESS F0811S= OPERlND ••••••••••••••••••• • .* .* KBIIIORD *. •• YES • *. LPI= • * .•••.... X. • *' PROCESS LPl= • • ••••• x. OPERAND •••••••••••••••••• •• NO ·.. .. ··...... .... i • •• * "POPRPCP X •• ··.Gl·········· PREPARB LOADING OF $SBn'lFl •• III • • Fl· •• • • Gl •• X. • • : ••• *. *••• .• • .RBFBREIiCIlS • • • X.TO CAP1: • .CBr2, CBH2 PPBOPR •• X. i •• OPE8ANV •• MO •• WITH •••••• ·.KlnVILUB •• i YBS • • • • • Gl •• 11. :.... i .• CB. e-*-*_*_*_*_*_*_* INCREASB • • OPBRUD MBR • BY ONB • • • .Pl • ••• * • • : • H2 • *••• ••·...··.• •····81 UBATTPl i ·................ • BUIICH TO • PPHUVAL i H2 ••• •• PI'10PR • •••• Hl •••••••••• .. •• 1ST •• YES • •• OPERAND •••••••••• 1. •• •• • *. • •• * .• ..• PROCI!SS OPERAND 1 ,'COO' • ••••• It. • • • ••••••••••••••••• • NO i .• •• •• ". J2 ••• •• PF20Pl • •••• J) •••••••••• *. •• • YES • •••••••••• X. ... • •• •* PROCESS OPERAND 2 PHASENIIIE • • 1. 112 ••• •• .• *. •• KEIWORD *. •••• /lULftS(; ...* •• •• ~s •• IES •••••••••••• ' : ··.... ....·· i n DOS/VSE Logical Transients PROCESS ~&f~~~O : • PFNULIISG • •••• Kl.......... • NO .. ·......... • • ••••••••••••••••• .. "0 114 •• .... . . ..... .. . i·...... 2ND OPERAND K.. . . J[. .••. • : •••••••• 1.. ••••••••••••••••••• ••• •• I!RRnR IN PPSTII.I!NO *. •• •.• ?~ERA.~. t. * •• * .... ··....·· •. YES i P1 II) : i II) ••• •• .* *. •• OPERAND •• NO •••••••••• X•• OELIIIITER YES •••••• ...... ··..:.......... .... * ••• '.' ••.• *••• • i NO : til Cl: $$BATTN8 - LFCB Command Processor 1 (Part 2 of 2) (Refer to Chart 09) Chart CB. ·................. '•" ··.......... ···.A1 •••• • ••• • PFGETOPR • • J. B2 • PPN 10PB i lil •• • •••• &2 •••••••••• •••• .SCAMB) AD. •• OPERlND •• rES "'. NOIIBER •••••••••• X. SCAli NEXT • •• .GT 1 •• .OPEBAIID WI'tHOU". •••• .LEADING BLANKS • PPGETOPR .-.-.-.-.-.-.-*-. * .. * • ................. . NO i ·····Cl·········· *-*-*-*-*-*-*-*-* -SCANR2 lD. ..... ··.... . SCAli NEXT • - OPERAND WITII • -LEADING BLANKS • ................. • :x .......... : · . i ·····01 ......... . I:'rS'fRPRII ·.................. • • • STORE OI:'ERlIID • ADDRESSES AIID • DELIIIITf!R • ... D2 • .•.i 1)2 •• • -LENGTH •• ..OP OPERAND YES •• + DELIIIITER •••••• •• GT 9 •• *. *. * •. * • i •• .* *. •• OPERAND •• .. .. NO •• LONGER THAll •••••• •• 8 •• E2 •• .·LENGTH •• • ..OP OPERAND •• YES. •• + DELIIHTER •••• X• •• LT 2 .- *. * .. * • YES i : •••• P1 ••••••••• : ·................. . :x ...•...... : • REDUCE LEIGTH • • OP PAIlAIIETIU! • • • TO 10 ····.·G1··········. ·.................. . . i PPPRIIIIVC 1I0VE OPB8A11D • • OR PART OP IT • • TO PPBIIVlLT • • .* IIICRElSE • • PoRROR EXIT • • lDDRESS • BY q • • ........... .........i 02 : * .... P2 .* • NO .•.i •• *. .. .. . •• DELIIIITBR •• YES. •• OPEN 1:'1!lEN •••• x. *. .* * •. * • i ..... ... ~O ·el • • F1 • .•.i PI'EOI:'R G2 •• ..G3 ••••••• •••• • RELOAD • •• DELIIIITBR •• NO • POIllTq WITH. •• IS = •••••••••• 1* AODB OP ••••• *. . PFEOPR • **. .•.** • .•. * •• ••••••••••• • YES •• H2 ..• PPOI'R •• *. •• END OP 0<. NO • •• KBY 'liLOE •••••••••• ,0< •• TlllLE •• • *• . . ** •. • i *.*•• ·CA • • D2· i i •• H 1••••••• • : 110 ... i E1 .* YES i ..... .·. ·CA • • F 1. PFEOPB • ..83 ••••••• IIICRE1SE • IIBKRGq TO • lDDR OP • FKIVlL11I 0< • ••••••••••• • ··.......... i • 112 • Charts 115 ce,. Chart $$BATTF~ - LFCB Command Processor 2 (Refer to Chart O~ ·................ •••• A 1 ••••••••• : SSIlA'lT'1 : • : PPR~22e~B 1*~ . . . * . . . . •* ESTA8LISH •* * : ................. C1 • • 1I0VB * 1IIFORIIATION FROII FIMl'lREA : TO IMFUU * *' *. PFOPBINY : •••• c" ••••••••• : *. *. * • * KEY~ORO •• 110 PHEPlBE 1I0YE • •• DUPLICATED •••••••••• I.OF APl'ROPBlATE • *. •• IIESSAGE T81T * *.. **. . ** .. •••••••••••••••••• • YES :~ * * • ••••••••••••••••• •*•••••• * •••••••••• .. • * PUB TABLE •• NO .s!'r APPBOPHUTB* •• EIITRI FOUND .* ••••••• • t* ERBOR CODE * *. .* x * IN FPBIIECOO • *..* *. ... * F1 *. *. YES .*.i: •• i IIITH FeB *. * ..• .* .* NO **·*·F2··***··*·* • INITIALIZE * • lIUILDIMG IISG * • FOH SEIIANTIC • • ERROR • • ·................. • *•••• x. • YES i i G1 •* •• .*. 0<. •. •• u:s • .* *. * .• - .* G2 .* •• *. H1 ...i •• 3211 * *. •• *. * .... :~* .* ** .!.. .... i PREPARE FOR LOADIHG $$BATTF4 • * * : B2 82 .. • ••••••••••••••••• NO i .*. *. *. PFworcou .****8J**** •• *.** .. *. **. ... ** •• * * ••••••••••••••••••• ······J3··········. PFUDNCOU • • PUPolRfj IIOU. • ••••••••••••••••• X.OF APPROPHIA'l'E * •• 1. . • "ESSAG! TEIt' • i .... *.... • 0< • C2 • 116 • NO •••••••••••••••• * • .. •• DEVICE YES • PRBPARE 1I0VE * • *. WITHOUT •••••••••• X.OP APPROPHIATB * •• 1. •• FCB •* • I'II!SSAGE tElt • .* .... : •••• J 1••••••••• : * * : .* YES * PFIIJ211 PFNKSCOU *** •• Gl.* •• * •• *.* *. **. .** .. • NO .* •• . *. *. •• DEVICE •• rES • PREPARE lion • •• UI'IOIlIl •••••••••• X*OF APPROPRIAtE * •••• •• •• • IIESSAGE TEIT • •• DEY ICE DOliN •••••••• *. * : .. .. • •••••••••••••••• .* *. •• PIIINTEB *. i : •••• D........... : PPt:SIIT ****.82.****** •• ' .. 011 •• 1 • PFBL;:;~ i ••• Dl.* ••••••• : * PUPAH/! lion * • IIOI.LD IIBSSAGB • *OF APPROPRIATE * •••••••• X.UD PREPABE FOR. IIESSAG! TElT • .IIESSAGB OUTPUT • ............... *. ....* . · .. •• PPKSlDPC i i ••• i ••• •• C3 • * • : **·*D2·******·* * IIRAMCH TO * * :UBATTFII OR * * SSBlTTF5 * * * * * * *•••••• * ••••••••••* B1 * * IIJ • *····01······**** • LOOK UP PUB TABLB POR SPBCIFIEO * X'CUU' • ·.................. * : C2 •• 1. i .* i ·····83·········· * i NO * * INITIALIZE • BOILDING "SG • FOB SIMTII • ERROR ....* ................. * • .... * .* * •• * 8J pPt:SYNrl ·.·.·C2·····.··.· * •. • * UBATTNII *. US *.POUIID SYNTAX .* •••• •• ERROR •• *. PUPAIB FOil LOADING UBUTF5 * •••• • •i •• .... ....•* * ................. .... . * *. * .* • • 82 : i ·····82·········· ** ** ·ADDR£SSABILITf * : FOR COIIUG : .•.i ....* .... DOS/VSE Logical Transients : ••••••••••••••• : i .*** •* DII •* ....• * i ····E . ········· BRIIICH TO SSIlU'l'IIA * : ............... ·· •• **A , ••• *** ••• • $SBATTF" .. • ** ••••••••••••• ....• * : : · . ·.................. IJBATTF4 i ••••• B 1 •••••••••• 112 ...i *. Rt:TRI .* LEIIGTH *. •• •• INITULIZI! • PHASE AND • RELOCATE CCWS • •• *. * •• * * XES • .COIIBEG AND • • SYSIB TO • • GET ADDR • • OF SIS US)! •• LUB •• •• •• •• •• · COIIPUTE PUI! DISPLACEIIENT OP PRIIITER . ................. ... i ... E1 •• *. *. .* * .. * • YES i . *. •• ................. ..... ··•..... B" . • •• x YES .. ... *. .. .. .. .. ... E3 YBS .. .. PUbLOOP : •••• F1 ••••••••• : • • : PREP&BE IIESSAG)! TO OPERUOR .* •• •• •• ................. • F2 X ••• •• *. . *. .* * .. * • NO •.. * • NO •• ........ i ···05··.······.·· . LIsno CB .-*-.-* .•-.-.-.-. PRIIT UBIFICA- ................. 'fION IISG • SKlP TO CIiA. 1 :.11. •••••••••• : ······E4•.·......... ·................. i • • • PREPARE !lESSAGE TO OPERATOR • • • ··.......... AUNSET i : • • • • s!J, • • • • • • • • • : * ·.................. • RES:rOR~ .PREVIOUS SYSUSE. • LUB VALU~ • i ~ISIIATCH PRINT •• YES. YEQUEST •••••• PENIlING •• .. .. .. .. .•.i *. • us 04 *. . *COIII!'!CT •. •• •• IES • R E P L y . · •••••• cs • VERIFICATION •• 10 IISG IIAITED •••••• $. ...i •• NO •• NO •• CHANNEL •••••••• •• FOUND •• • .* CE SEND !lSG TO OPERATOR BEAD REPLY :x ......•.... i ................. ···C4·········.·· • -*.*-.-.-*-*-.-• LOGIO •• i ................. .* 03 • LOAD Nt:W (REQUESTED) FCB I!'IAGE INTO STORAGE . YES i BAL •••• .. ..... .. LOADPIIAS .* . • •• DID •• 110 •• I/O ERROR •••••• •• OCCUR •• i ···K2············ * •.• .• : c" IOt:RR STORE DEVICE • SPECIFIC FCIl • LEIIGTH n ccw • *. •• PORIIS OH •• NO •• LPI SPECIFIED •••••• ·......:.1. ............. ·.................. • • • .-$-.-.-.-.-.-*-. *. ··C3··· . ••· i i *. LOAD FCB ·DEACTIVATE • • USEII ERRO R • • ROUTINE I" • • CClI • : •••• 02 ••••••••• : • • : *-.-*-.-.-* -.-.-* i ·.................. ••••• Dl.i•••••••• • • : . B4 : ••• DOSKIP 84 •• ..*8~ •••••••••••• •••• LIS~rIO CB •• FORIIS •• MO OR LPI •••••••••• 1 SKll' TO ..SPECI!'IED.. X. CHAIIIIBL 1 • OP!lESS CE .... • STORE ADDRESS • • OF VERIFICATIOII. .1Il!SSAGE IN CCW • ................. i ···6]····· ....... GJ : ······C2·········· i PRt:I?UIISG : ..!.................... .* : i •••••c 1•••••••••• .... B1 : LSTIO NO OF PHASE •••••• •• CORRECT.· of 2) ·......... ...... 82 : ••• * • • • ~ $$BATTF4 - FeB Load Execution foI:' 3203 and 5203 (PaI:'t (ReteI:' to Chart 09) ChaI:'t CD. i • : •••• F3 ••••••••• : . ................. .... ··...... .. • • • .. RESTOBl! PREVIOUS SYSUSE VALUE • • • C4 • • i ····'5········· ................ FETCH ~SBA'r'rtlA • • . : x •••••••••• : • G3 •• 1. i ·····G2·········· i *.*G 1•••••••••••• • SAVE SYSUSE • .LUB VALUE HAVE. • LUll POINT TO • : PRUTKR PUll : • LOAD DIRECTORY • ENTRY OF FCII PHASE ................. ... ................. * i •• H1 •• i .··H2··**········ *. LSTIO •.•.•. :~. CE • -.-*-.-*-*-.-*-. ALIGN POR!'IS •• PHASE III •• rES •• CORE I~AGE •••••• •• LIBRARY.· 'ro LINE 1 • • .~ •• * .................. : . X PR1NTERR •• ·G3·· . ·•••••••• .-.-.-.-*-. -9-.-* LOGION ct: PRIIIT IISG 011 SlSLOG .................. • ······83·········· . .. ·................ . ... i • : • NAIT FOR :CO"pH~lO" •• : • • • . i . ··G4 •• ***** MOP • INSTRUCTION IOERR • ............. * .i..,. ··.... . • B1 • : III : ••• * NOTPMD i i : •• *.J 1••••• ** •• : : : PlE~U~~R~o OPERATOR : : •••••••• * •••••••• ··.i.... • G3 • ••• * RETt:RR ••• J2 •••••••• • • • ACTIVATE USt:R ERROR ROUTINE IN ...... ..... ~~~ • • • i ····J3··.······ ·................ • • FETCH UBArru • • ..i... : .... Bl : Charts 117. $$BATTF4 - FCB Load Execution for 3203 and 5203 (Part 2 of 2) (Refer to Chart 09) Chart CE. .**." ••••••••• ··............... .. • LOG lOW • • LOGIO . .··B1· ••i ••••. LOGIOII • ··.····A)········· ................ ····&2········· ··................. • • i • • • STORB CCII ADDRESS IN CCB ............. :x ............•..•.....•.• : ······el·..·.·....· ·.................. ······01·········· CCII .. ·.................. ·······11 .. ••..••.•.•.... ................. • • • ······C3··········. i • • • i SToal ADORISS IN CCB ·................. • • • SYC 0 .* r1 ••• •• .. .. DISULI •• .•. .... .. .. ·•··..•.. ·P3··········.• .• ·................. . .. i 13 •• .. *..* • NO i • ... •••••• *.. • *us SYC 22 lliAilLII •• •• .. • •••• 1 ........... . X.. ................. •• LUll •• liS • • •• Sf ILL •••••• •••• •• CORRIICf •• • • •• . • : . COII~(gTI .:.~~.: *. .* i •• •• ·03· •• ••• •• •• SYC 22 •• •• •• • • *. • • • ·.·............... .. ..... : LUIILOOP i x••• ~ ••••••• LOOP PUT UNI'l' or SlfSUSB III'l'O CCB ....•.... .. 1: i •• • • • .•................• i PDT UNIT OF SISLOG liTO CCB • ······B3··········. LISTLO NOP I/O • COIIPLITION • • IIS'l'IIUCTION .. LOGIO LSTIO • • SVC 0 •• • •• , • •• ... . •····•·•·•.... ·.······P . . ............... i: •• ... svc 2il •• •• 11Il8LI :It ..••.•..••. ····G1 ••••••••• i • • • REToRN TO CALLER • • •, ............... .* G.. .•.x "'. .:**. COII~{~1'I! *. *. .• . .:*~?: .* * •• • *us i .. '" .. 118 DOS/VSE Logical Transients ····8 . ········· REfua" TO CALLI!R • • ...............'" Chart CF .• $$BATTFS - FCB Load Execution for PRT1 (Reier to Chart 09) ··................. • ····A1 ••• •••••• SSBITTP!> • : ·· .. ................. IJ81'rTP!> .i ·····B1 •••••••••• • IIIITIILIZE • • PHISE • B2 .... • B1 • B2 : .•.i .•.i NO PBISE •••••• •• CORRECT •• *. *•• • ...... .* j YES : · i . PIt:PVIISG i : •••• C2 ••••••••• : ·····C1·········· ·.................. • • • PIEPARE !!ESSAGB TO OPEIATOR .... D3 : · . RELOCATE CCIIS • : i .* E2 ••• •• ................. *. *. *•• ·....... • ·...... .* NO · : •• ••• ................. ...... • ... : i .* _. PHASE *. *. ...... .* * •• * • 110 i : NO'l'FflD i : •••• Jl ••••••••• : ·.................. ··.... ...... • • • PREPARE IIESSAGE TO OPERATOR • • • .... • • : IIIIT POR : OPEi'¥IO' : •• .* •• •.•. H2 1 ••• •• PRINT nigf~~ *. *.• * • DJ • .* : • rES i ···C!>···.········ • LOIiIO CI *-.-.-.-*-.-.-*-* . SUD IISG TO LOID 101 PCB. SUP TO • eRnUL 1 • OPIII&:fOB IBID UPLI • : ····Pl········· PE'l'CH • SSBUTIA : ............... i i SKIPL01D ·.................. • • • PREP1RE TO LOAD PCB •• •• • • • .* *. D!> •• cOluer IEPLI •. * .. * · i ··B. ·••·•·· PII •• X. DOSKIp i ···P!>···········. LsrIO CI 1 ···P. •••···•••••• ................. LISTIO .-.-.-.-.-.-.-.-* CB .-.-.-.-*-*.*-*-* SKIP fO CIIAM 1 • LOID IJSgBSUD. .. .•. .. .. *.. * .. i G!> •• • YBIIPIClrIOI •• 10 •• IISG IIAlrBD •••• ',. ·............ ... .-.-.-.-*-.-*-*-* .. .. .... ................. . . *. .*. • i IOIRII .* . YIS. all •• ....... . i • IES NO : · 1............X...... .... .... i I! ISI!ATCH ••••• J JIj • aES'l'OIlE • PREVIOUS • SYSUSJ;; VALOE • I!S •• • •• • • ••••••••••••••••• ......... ••• *4 . .. •• * . •• •• •• • 110 .... pIU'l' VEil PICAtIOI IISG-SKIp. TO CHAII , :1 .......... : .... BS : U'l'I i. : •••• J!> •••••••••: •• LOlD CHECK • i *..* 82 : IES ···II!>············ LSTlO CI e. •• DID •• NO •• I/O BIIROR •••••• •• OCCUII •• .* ·.................. . i ·.................. ·............ .... ··...... ... ··G"••i ••••• • SAVE SISUSf: • • LUB VALUE • • HAVE LOB POUT. .TO PRUTIR PUB. • *.•••••• 115. ·····E!>·········· • • PIEPABE • • •• •• IIESSAGE TO • • OPEBlTOfl • ·DIACTInTB • • USER BRIlOa • • 1I00TII! IN • • CCB • i ····*J2········,· *. .* .* • 10 • ACTIVATE • • OSEII £111011 • • ROUTIIE IN • • CC8 • RErRI j •• *. •• •. *. * •. *.• • • j • IETEIR i • •• -. •• .* *. LISrIO CE ···C .. ··········~· •• :x .......... . PUIlLOOP U:S •••••• •• •• . ..... ~ ..... I: • NO OJ : *. I I •• .•.i *.. - .... •• •• CORE IIIAGE •• LIBRARY •• G2 ERROR II PCB •• PBASE i H1 ······111·········· .. .. III : ·.................. •* YES.. • .... .TEST SPEClPIBD • • PCB PBAS! POB • .COBIIECT LOADING. ···Gl ••i ••••••·•·· LOAD DIRECTORY ElTIY OP PCB PHASt: ., ······r2··········. . ·.................. ·····P1 •• •••••••• • COIIPOTE PUB • • DISPLACEIIEIIT • • OP PIIII'l'ER • ................ ON SISLOG . I TSTBurr ••• 01 •• X. . ... ..i... ·................ .* *.. - 6!> •• POIIIS"1111 •• 10 •• SPIClPIBD •••••• • 10 i •. • P2 •• 1. i • • • *-*-.-*-.-.-.-.-* PRINT IISG •• LPI'"II •• filS •• SPECIPIED •••••• • .COIIREG IIID • • • SYSIR TO GET. • • • IDDR OP • • • .SISUSB LAB • • PRBPlB! !!ESSIGE 'l'0 OPERATOR PRIIIT£lR I ···D1············ LOGIOIl CE i TESTtPI *. .. i ................. ······.11·········· . .. .* IS •• JIS •• CIBRIISE 01 •••••• •• LIIB 1 •• i i OPIIBSS e• . ···02············ ·.................. • : •• • P2 • • LOADPHlS ·..... .* *.• • 10 .•.i • B!> • ·..... .-.-.-.-.-.-.-.-. ·................. . . ............... . ................. .... :1 .......... :: ··...... .. .•. ······D. ••••••••••. • • • ................. i ·····01·········· BII •* •• LPIEBR i : •••• C3 ••••••••• : • S'l'OBE ADDRESS • • OP YERIPICATIO •• :IIESSIGE IN CCIl : • • • *. ··.......... • BII • BJ •• •• LPI •• • YALOE AGREES.. IES •• III'l'S PCB •••••• •• LOlD •• •• .* *. •• LEJG'l'H OP •• •• ··.......... ··.......... ...... ·.................. • RESTOIt! • .pREVIOUS SISUSB. • LUB VALUE • .. X. 01 • ...1\2............ i .....11 •..••..•.. LSTIO CP!. • -.-.-.-.-.-.-.-. • COUNT READ FORIIS •••••••• X. AUXILUBI PCB • CONTROL ADIIR • • POR ALIGN!!ENT REG ANIl OLD PCS * ................. • • • • ................. ·......... i : BII : • ·..".......... ·............ ·.... ..... i • • • lOP • 10ERR • INSTRUCtION • i ···· . S········· ·................ • • PITCH $$IIAfTIIA • • i : FII : Charts :1:19 Chart CG ... $$BATTN9 - LUCB Command Processor (Refer to Chart 10) ··. ·1,·········.. ··............... • UBATTII9 ....• •.... * .. *••• ·..... * • 82 · . POOPRPLD i ·····111 •••• •••••• • IRlTIlLIZE • • OPERAIID • • FIELD LOOP * * ** • * ... BII •• .* . *KEYIIOBD •. •• * * CLEAR AODRESS '" • AIID VALUE * '" TABLBS '" * * ................. *. TRIII"= i ·····C2·········· • -*-.-.-*-*-*-*-. PUUIU ................. .... * *. *. .• .* * .• * 110 •••••• • IES • * *. *.X. • •••• * .i BII • i PUCLBART i ·*··*82·***··***· ................. • * **** (Part 1 of 2) ~ • CI **CI***·*·· * * •* IIICRBASI! * OPERAIID NO • IIY OIlE ...........* '"PUGETOPR * • "CII· • .* . *. •• *. NO .. .. ·.:... · . .* * .* .... .• *.X. *. *.. * • • BII * ••• i ** * : IlISERT IlIULID EIlD COIIIII ** * : ................. .... . •....* . * * • REPSRI!MCES * *.I.TO CGPI: .cHG2, CHJ2 POGOPR X **p 1***.*** * SST • * APPIOPRIATI! * • • 1* ERROR COOe: • * IN UPRIIECOI> * . . PI •* *. E2 •• FIRST OPERAND *. **. . ** •• • *. P2 ••• • •• rES • • * ••••••• • X. • *. • **. ... ** PUPAMB LOIOIliG OF UBUTU' * * • * * ................. •• 62 *. *. **. •..* . ·................ .• *... ." 112 ••• •• *. **. . ** •• J2 ••• • x: 120 DOS~VSE * PROCESS 0J~~t.D • x. • • : •••• PUIiOCHIt • •• *.10 •• * •• * ••• * • x: PROCI!SS O:~~ft:D • • • : •••• X. ..•••••••••••••••••• *. *. PDIIUI.IISG • ••• *J3 ••• ** ... *.. NO i **** •• III .. • ••••••••••••••••• ** . .* •. * · .... * · •••• • .. •• OPERAND *. lIS * *. 'IIULIISG' •••••••••• 1* *. •• • * •• CI •* NO i •* Gl i PUYOI.O • •••• G3 ••••• * •• *. OPERIND *. IllS • 'HOCHK' • *' * •••••••• * .... • • * • * * .... ·..... 110 i i ****11 1** •• * •••• • BHAIICH TO • • SSBATTU' • * * * • PROCESS OPERI.O PHASENAIIE . .* OPIlIlIND •• lIS • *. *. 'POLO' • * •••••••••• • •••. = '.' .••• ••••••••••••••••••• NO i .*. . *. . * PU20PR • ••• *P3*.* ••••••• GI • *• . i ••• * •• SECONO •• IES • *. OPERAND • * •••••••• .1. *. •* • * .. i .... • .... * ** • • '" OPERAND *. US *. DELIIIlrEB •••••• • 110 ...X.* ·····G1·········· * * * • ••••••• • *' • ••••••••••••••••• *G'·.I. * * • PROCESS OPE RAllO I'COU' . •• IllS. •••• 1. .* .• · .. • Ell *.1. .*** I PU20PII ••• E.. NO *. *. • 110 PU'OPR • •••• £3* •••• *•••• i .* •• ..... .... • *. * .• Oil .* ERROIl II •• KEIIIORD *. VIILDI! * ........... .*•••• ..... . .....*....•• .. i * •• *. ••• .• ··........i .. .* NO • 82 • *.***E 1***.*** •• * .•.i i *. i • * • ·................. ••• 02 .* OPIIIAND *. YIlS '". illTH KEY • * •••• *. VILO!! • '" lfES PROCBSS OPIRAND TRAI"" • .. .. PUOPR . *OPIIIAIiD*. •• 110 GT 6 IIJ :.... i *. *. •** * GET OPERA.U * • AIID PUT IT • .INTO 1I0lKTA8Li • * 1>1 i ·····c. ·····.· ..*· CH'" F l ·* • *** .. Logical Transients PROCESS OP18&1I0 NULIISG .*. JII •• . .I . * •. • •• IIIIOR I I *. 110 * •••••••• 1 •• OPllIlIND •••••• * *. •* ••••••••••••••••••• * ... * .. * • YES i ••• * •* F' *• * • .... .... ·.... i *'" .. Ell • .. Chart ca .• $$BATTN9 - LUCB Command Processor (Refer to Chart ~O) ~ (Part 2 of ~ ****11********· :* ...............* PUGRTOPR PUGETOPR : i 111 .*. •• .* *. •• OPEllllD *. •• *. 110 GT 1 *. *. . * * .* .* IES •••••••••••••••••••• ....* . ....• .. NO ** * ·····cl .... ·..·.. i *SCIIl82 lD* *-.- SCllI *-.- .-.-.-*-* * IIEIT * ................. *PlRAIIETER IIITH * " LElDIIiG BLA\l1I * Cl •• 1. ·····C2·.········ *-.-*-.-.-*-.-.-* PUN 101'R X *SCAIIR3 AD* * sell II!1T * * PARII IIITHour • * LIIIIlIII!> BLIIIK * ................. :1 ........................ : PUS'fBP~1I i :.***D 1* ••••••• *: .... ·..... • STORE Ol'EIUD * * lllDRESSAIID * • DELIIIITEB • * * ................. * .. .i i •* El .*. * • *. •• OPERlTOR *. 110 *.L1RGER THAN 8 •••••• *. *. * .. * * .* .* .* *. * •. * • i •••• *1' , ••**.****. • BEDUCE LERGTR • OPERllliD • TO 10 • • or • ······Gl·..·····.·. PUPBIIIl'C £2 •• .*LEIGTH •• OP OPE!I • • • YBS ". DELIIIITI$R •••••• •• GT 9 •• IES . ·.................. :1 .......... : · • • £2 • .•.i 1'2 •• .·LEIIGTH •• • •• OP OPE'! • • • IES. ". DELIIIITER • " • • 1. ". LT 2 *. • . * ................. *. . * • i • 1I0'E OPERAIID oa. • P1RT OP IT TO • • UPRIIV< • .* MO G2 .•.i .* .* 110 •• .* *. •• DELI III 'fER •• •• OPEII UREJ -. *. *. . * • .* .* . YES • •••• 1. .....i ... NO ·CG • • Pl· .··81·······". ... i i .. • UCRUSE ERROR EXIT • lDDR 81 II * ...........• ·..... • • • •• •• PU!>OPB 112 •• •••• *. DELIIII!ER •• 110 ':'.* •••••••••• j(. **. •..** • YES ·..... .. • ..H3••••••• RELOAD • POIITII IIITH • lDDR or • POlO. a • • ••••••••••• • ..... i i • E2 • • PUKEIWRD .* i J2 ••• •• *. •• EID OF •• IES •• liE! VllLUE •••••• •• TlBLE •• *. *.• * • ... ·CG • • D2. .* 110 PUOPS i ..... ... ·eG • • Fl· i • • • ··112······· ............. PUGOPB • INCRUSE • IIRKRGi! 10 • lDDB OF • UKYVALAD • ··.... ...... i • C2 • Charts il2,. Chart CJ. $$BATTUl - LOCB Command Processor 2 (Refer to Chart 10) ··................. ····Al •••• • •••• • UBATTUl • i PU8COIIBS : •••• 61 •••• ' ••••: • BS~ABLIS" • ·ADDRIISSA8ILI'I'Y • 'OR C0ll88G • • ·.................. ··.......... • CII • .•.i ······c. ··········. .·................ ** . . ** .. .51'1' lPPIOP8Il'1'I. • 11101 CODII II • • UPIIIIICOD • • • ••••••••••••••••• • 110 i : •••• Dl ••••••••• : ._ D2 LOOII UP PUB 'I'AIILE P08 X'CUU' ... • *. i El •* •• PUB •• I!I'~'Y ,*. · . ·................. .... . . ·····12·········· 80 POUIO •••••• * .• * .* * •• * • 10 .• i •• *. TABLE •• *. *. .* PUIIIIDPC • "IIPAI' PlOYI: • .OP ,ppIOPIlIlTE • • IIBSSIGE TIXT • .* • lIS ·....... • ,:t •• 1. .•. • i .• Pl •• •• PIII'I'III •• WIT" UCB -. *. *. . * • *. .* •• 10 • •••• X. .* .•.i •• • • i ····102••••••••• .... ·..... ............... ·..... ....."'.......... ·.................. •• •. 110118 *. .- .* 115. •••• 1. • : BRUCH '1'0 'UU'I'1Il i • CII • i • • • • ····oJl·•••••••• ·................ i • • 122 BIIIICII '1'0 SJBlftU2 i ·.................. • OP 'PPIOPMIAT• • • 1I1SSAG~ '1'11'1' • .* lit ••• •• *. • • PUIISCUU • ••••• 5 •••••••••• • • •• IS .1801 •• 115 • PIKP1811 1I0va • •• UI'ICI 110'1 •••••••••• I.OP lPP80'111'1' •••••• •• •• • II1SS1GI ~III • **. ••.** ••••••••••••••••••• • 10 i .* I'll ••• •• *. PUIIODCDU • •••• PS •••••••••• • • • • DOS/VSE Logical Transients . •• IS 18ROI •• 115 • PIIIPIlI 1I0YE. I .DE'ICE III'I'IIOU'1' •••••••••• 1.01' lPP80PIII'l1 ••••• •• UCB •• • IIESSIG. '1'11'l • **. . ** •• • • ••••••••••••••••• • 10 ······liS······.···. ·.................. :1.......... : .·... ·...... PDDII.CUU • : • 10 • 110'1 • IIPOIIIATIOI • PROII IIUPlRBA • '1'0 IIPlR£A ·.................. i ••••• .f:) •••••••••• •• PIEPUI 1I0U •• • • • ................. e •*. •• •• III1YICII • lII'I'Il 1.11. • BDlLDIIG • 1I.551GB 1'01 .SEllIlIIC 11108 .1 ••••••••••••••••••••••••• PUIILTII5G I .···.P2·········· e • • BUlL&; IIISS1GE • • lllP PRIP181 • • USS1GI OU'1'PU'I' • • IES Gl • ·····0. ••··••···· i •• e. •• KEIIiORO e. ns •• DUPLICA'I'BD •••••••••••••••••••• ·.................. • • • .•.i i PUKSII'I' Cl •• • •••• c2 •••••••••• •• DID •• • .lIITIALIZI • •• SllIAftU •• US • BUILIlIIIG • •• PIIIO StI'I'U •••••••••• l . IIBSSAGIIS rOR • •• 111808 •• • SIN'lU E!t801! • • • PIEPIIS 10VI • ••••••••••••••••• I.OP lPPIOl'II1'l1l • • IIESSIIi& IIIIT • I • Pl· $$BATTU2 - UCB Load Function (Reier to Chart 10) Chart CK,. *•• **l1 . . . . . . . . . .. : SSBUTU2 : i ... •• •• •• • • 3211 .. • • • • : .. PREPA!IE LOADING UCB IIITH THE FOLD CCII • D:.! •• X. •••• X BLOCKED ••• D2 •• *. *. . .................. i .* • • • • • ..... . .* IES. .•.•.... NO i ·····D"·········· • SAn slSUSE • LOB VALOE • HlYE LUB • ponT TO LUB • • • • • ·.................. .- NO i .-.-.-.-.-....... ···E4···.· •• •• ••• LISTIO ............. CE ................. SET UP THE • CHECK 011 • UNBLOCK CCII • - SlIP TO CHUIlEL 1 LOAI> OCB • X .LOAD DIR1!CTOI!Y • UTn OF DC8 PHASE ··........................... .* •. ···P2····.····.·· *. •• FOLD •• 18S •• SPECIl'II!D •••••• .* * .. * • 110 ., .... • .··£2·······. REAIlDU !'1··- •• ••• ~~wgf~~ *. .:x .••...•••• : i ell •• iNI P'lIIIT •• i • • • : X PUBLOOl' *. .* *. . * • • .. ···E1 •••••••••• *. • * ••• * •• * •• *.* •• ** .. .x ........................ .• ... . .. ...•............. *. INTO OCB • •• IIOCHK •• ns •• SPECIFI&D •••••• .. .- i: ..LOAgC~E~~fWO;O • • ................. ·....... ·····D1· •• ••••••• • .COIIBEG AND • • • SYSIB TO GET • • • .ADDBESS OF • • • .sYSOSE LUB • • COIIPUTE PUB DISPLlC811.BRT OF PRINTER ~O ••••••••••• .. i .. • • : ···s,,············ • : •••• C2 ••••••••• : i · • SET UP THE FOLD CCII 84 • L01DPliAS .. •• 81 . . . . . . . .. •• tES .. •••••••••• x. •• • .... : x•••• , •••••• N03~11 ·.................. RELOCATE CCWS *. *. *..* • ·····el· .... ····· . .. : • * .. * . i ••• •• 82 .................... I NITIALI ZII PHASE .... B2 : i YESFOLD : •••• 81 ••••••••• : .. .. ......... ...... : •• ** ••••••••••• i • .,2 • .•. i i •* •• •• *. ,,1 *. •• 3211 .•. *. •• .* .* NO •••••• •• * .. * • US . *.• .•'.* •• *..* NO : • • • X NO'fl'ND : ..... "2 .......... : ............. ·................. :x .......... : ··...... SET UP THE UNFOLD CCIi • • • • • • PBEPAU !!ESSAGE TO OpERATOR • • .. ... x * ••• • D2 • .·····K3··········. INVPKASE • i PREPARE .. : IH!SSAGE TO OPERATOR PRBPARE I!EsSAGP. TO OPUAT.OR .... i • •• J 2 ••• i: ···tis.···· ..····. .-*-.-.-.-.-.-.-. LISTIO • ................. ................. • ..JlJ CE PUNT 1!1lSSAGE ON SYSLOG i • : • • AIT F()R .t :UTUBII •••• i. •• REPLY.. I E S . •• COB BEeT ••••••• , •• •• • ······K2·········· . .. ·................. . .. ** . . ** •. • ~ETERR .... .. :collpH~ION : : •••••••• ' : ··. ·Kl······.·· ..*............ PE'I'CH :UBATTMA 'lION IISG SKIp. TO CHU 1 : 1 •••••••••• : * •••••••• ................. CE puNt Vl!RIFICA- • : .-.-.-.-.-."-* -.-. LOGIOII ·~5.· PBi!l'lil! 'ro • PRINT • YBBIPICATIO/l • II1!SSlG8 - .. 84 : :x .........•.............. : PRINTERS i • • • • • • : i • .•• • ·... ..·....·. ·.................... . i ·····G~····.···· .. • • : ...... ................. •• CORRECT •• • ·NO i •··H ,•••••••• · .* . G2 •• G3 •• •• PHASE •• • • •• •• III COlK •• IllS •• LENGTH OF •• US •• II1AGE LIBRAQI •••••••••• , . . PH1Sr: •••••• • : :* .•• • • •• • •• : NO i 1(4 • • • • • • • • P8EPABE IIESSAGE TO OPEBI.fOR : •••• .. ................. .• *: .. • : .** ••••••••••••• * i JS .......... : • BEs'rOR8 .. .PREVIOUS SlSUSE. • LUB VALUE • i • : •••• K5 •••• • ••• • l'ETl:H • U8lTTNl : ............... Charts 123 Chart CL,. " : $$BATTN7 - SETDF Root Phase (Part 1 of 6) (Refer to Chart 11) ···*A2··**·····" ................ :neUTN7 : ·····1:i2·········· *-.-*-*-*-*-*-*-* i " SCAIIR2 • ·.................. • • ISOLATE PIRST .. PABAIIETER • ··C2······· i • PREPARB • ERBOR CODE '" ........... • '" lMVALID OR 110 • "~NIT SPEcrF. '" • V2 .•.i •• *• •• FIRST •• PARAIIE'lER "'. LENGTH > 0 • *. *. *. *.... . .. '" NO ... •• . .. i .* YES. '" ... *. ..... E2 it . -. "'. *. *••• .* * ·CP '" ... I(~' i DEVADDP. .* .• SCNSTP= ' . ' *. US * .••...••.•........ ••• .* E.I "' • ... *. •• FIRST NO "'. PARAIIETER •••••• •• LElIGTII=5 ." .·C"....• *. *••• .* NO i '" HlS • ··F2······· it F.I .*. "'. G3 ... i * * LOAD ........... ..... *. i . i -CP • '" K3* '" Bl· •* .*I'IRST TWO*. •• NO CHARS = X' •••••• ... .* *. . .. * .• * '" YES '" '" BHROR CODE • NO PABAIIETER • • '" SPECIfIED . . ..- '" ... "' • •• SIITH "'. CHAR =' *. ...... *. •• ;~: .* NO • •••• x. ..:.. ·CP • • *K~* i * : •••• H1 ••••••••• : .................. *SAVE PRINTABLE * I'ORII CUD : : " it •••• *JJ •••••••••• '" HEleuu '" .-*-.-.-*-.-.-*-* "CONVERT CUU TO • ................. ..... : BINARY FORIIH : i . *CII * • ",E~" 124 DOS/VSE Logical Transients $$BATTN7 - SETDF Root (Refer to Chart ~~) Chart CM. .• Phas~ (Part 2 of 6) ..... *CL * El* * *** i DV 31100 .*. . *82FIRST*. *. • * PIRlIIETBR *. *. LBNGTH = 3 *. *..* * .. * • YES .* CUUIDDR .*. 83 *• FIRST *. * .*P1RAIIETER *. IES •••••••••• X•• LBNGTH = 2 •••••• 110 • •. *..* *.. * • NO .* i ••• * • ...* * *cp • K3* .* 110.. •• ••• .....i * . -CP .. Kl* *. C2 .•.i •• -. FIRST •• PARIIIETE! .* =31100 *. * .• * * .* YES .* i ·····Cl·········· • * ·.................. *SAYE PRIIT1BLB * • rORII CUU • * * * * i ·····D3·········· *-*-*-*-.-*-*-*-* * HBXCUU • • * CONVERT CUD 1'0 BINIRI * • ................. • * .... .... . *CL· • : J3.*.I. CHKLIIIIT 1 *·E3······· * PREPARE * • • EIIROR CODE • •••••••••••••••• • 1* NO P1RIIIETBR • • SPECLrIBD • - ...........* .* •• .• r3 .*.i •• *. *. IBS DELlIIITBR • * •••• *.='8LANK' •• *. * .. * * .* NO i **G1*****·* PRBPAIIS • * BRlIOR CODS • • INYALIIl OR 110 * *~MIT SPEClr •• * * ........... •* •• .• Hl .*.i •• *. *. 110 • DI!LIIIlTER •••• x. ....... * -. *. = * .•. *IES i ..... * . ·CP **K~ • i ··J3·**·*·· • PREP AilE • .. I!RIIOII CODI! .. .. NO PIR1IIBTl!R • * SPECIFIED * • ...........* .....* i *CN 82* * * * * Charts 1~5 $$BATTN7 - SETDF Root Pbase (Part 3 of 6) (Refer to Chart 11) Chart CN. ...... •••• * ·CII • •• J~. : · i : •••• 82 ••••••••• : • • • .... Bl : .........•. x: GET PAST D£LIIIITER TO KEJWORDS • • • ·................. . .... .!. :l'INUnr PROCKU B1 •• ..Bq ••••••• •••• • PBBPARB • •• KEIllOR" = •• YES • BRROR CODE • •• TABLE BII1~RY •••••••••• X. DUPLICATED •• •• • Kl:!rIlOIiD *..* .. * •• * • 110 ••••••••••• • ·Ci'· • : J4. *.X. .... . ·····C2·········· ·.................. 1\1!~.OIlD I • SCARRl • • • SCAI rOB KEnaRDS • • • -*-•. *-•• *.*-*-* ······C3··········. ·.................. • • • nCRBIIBII'r TO NEXT TAbLE ENTRY • • • ... i i Cq •• ALREAD~ D.:l··· •• •* -. ........ ..... ... ·. ···£2··········. ·................... NO •• KUWORDS •• ••••• SPBCIPUD •• *. .• i • ns ·CP • • IIj· .* 01 .•.i ". *. * •. * *. *• .* .* * .. * • lIS • STORt: KElIlORD • • • AOURBSS &IIU LBIGTH • • ···'2·······. ·............ i • PIEPUB TO • • SBARCH 1181110RO • 'UBLB • • • • • INDICATB KBlIlORD TO BI UPDA~rBD i Iii ••• ··G2······· •• .* •. IE:... KBIMO~D •• .... •• ••• LENGTH> 8 *. .."CP!..• *. .* .* •• . ·..... ·..... • • • K~. • 12b NO i B3 • DOS/VSE Logical Transients • •••• B5•••••••••• • MO • •• IIITH •••••• ' •••• 1. •• OPIRUD •• • ** . . ** .. • ··.................. i ••••• p~ •••••••••• • • GIlT TO OBI.IIIITBI · GU to UBLIIIU'I.:B • • • • ••••••••••••••••••• YBS •• B~. ·............ IIOOPIIIO •• *cp • • PRBPAlII • • nRoa COOB • • INVALID KEUORO" .OR PAIAIIBTER • • • • .* *. •• KEnORD •• i ..... i ... ·CP • • Kl· • •••• D" •• •• •••• •• ' .•.i i e._._ 0 · . ·.................. i H2 .* i • NO.. IIIID OP •• ••• ••• II£IIIORO TABLE •• •. I£S •••••• ". PROCESSED.· • i ". .* *. •• KI!IIIOBD •• • • $$BATTN1 - SETDF Root Phase (Part 4 of 6) (Refer to Chart 11) Chart CP .• ..... ·..... •..1'' . ·eM • · : i i • Bl··· •• ··1l2······· • "'IIPA't£ • • 18108 CODI • UHLID OPERAND. .* 1l1L1l1tTER ... •* C2 ...i •• *. ·: .... u . : .... *. a. i :: 'zl *. ._ .- ..:.. .• .* C3 .. .i . ·CO • • • B~ • •• *. •• OPt:8&ID -. 110 •• LEIGTH = 1 •••••• •• *. a. * •• * • YIS .... ...... .... .•. .* .- i • US : KJ : i i : •••• D2 ••••••••• : GilT OP£RIIIO AOOBBSS D1 .* ·.................. • • * .. * • YES 110 •• DItIlIITIR •• ..• a. *. •• KIU WORD -. MO •• III'lU Y OR II •••••• •• OPt:R&NO .- ........... .~H BJ : •• *. • •••• D" •••••••••• • • • • •• •• lIS • 1I0YI BURST-I •• BURST = Y •••••••••• X. 1111'0 KIYII08D •• •• • TIBLI • • *. i .-.-.-.-.-.-.-.-. ·····£2·········· • SCllRl • * •. * 13 .* .• • 110 .•.i: •• ••••••••••••••••• • •••• 8 . . . . . . . . . . . . *. • •• •• NO • 1I0YI BURST'" •• BURST = II •••••••••• X. liTO KEYWORD •• •• • TABLE • SCAli 11£11' • • OPIUID II1'HOOT. .LIIIDIIG BLAIKS • ................. *..* • • • • • • ••••••••••••••••• * .. * • • ••••• • YJ!S ··.......... i ······1'2··········. ·.................. i • • STOll OP&lUD • • IDDIESS liD • • LEIG1'U • .* G2 .•.i · . ·.................. :1 ..... , ... , : ...... i 111 • • •••• p" •••••••••• • • Gn: TO DELIIIITEI I •• : .. .. *. •• OPB81llD •• 110 •• LIIIG'fH ( 0 •••••• *. .* • ~~Es.c~g~l: .: •. 1: •••• i YBS • B3 • I CHICKEIO .... H2 : ··.......... * •. * RIPEBBIICIlS···· • • ,., H2 •• ..H) ••••••• •••• • PREPARB • , . DIILIIIITER ., 10 • ERROR CODP' • •• 1*. :a" •••••••••• I.I.'aLID OPII •• D. •• ,. .OR DELlllIrER • .. .. ...........• *... • ··...... ···.............. •••• • YES • 82 • LOADUPD! i ··J2······· Jl .* *. SSBITTS1 •• • •••• J" •••••••••• *. *. .' ,. *•.• . .* . .* • • GET IEI1' . •••..••.. 1* K~IIIOII:D * * ...• • ••••••••••••••••••••• • NO •••• • RErBRBIIC£S • • 'TO CPKJ: CNC". CND:.! • • •• I'CLB2, CLP2CMO), CNH2 :.... 'CLGJ, CPlIIJ C~B2. CQG2 LOIDBRR1 JCIIC2, CIIHJC DJ .. ....... i • i, •• DELIIlIrBR •• US • ... 8EPIRE POB • • UPDATE PHASB • ····'2·········.. ··............... .. ,,) • •. . '* .•.. ...........• ..1* • • i ... ·CII • • C2· .····K. ·········. • PREPARE poa • • ERROR PHISI . , . . . . . . . 1. ··...... ..... SSBlTTS2 • • •••••••••• $ • • • • III • Charts :1J.1 $$BATTN7 - SETDF Root Poase (Part 5 of 6) (Refer to Chart 11) Chart CQ. ..... ·CP • • 83· •• • i .. . ··.... .. ........ 1'11'1::0111 B.2 •• _ •• .- •• OflUIID •• u:s •• LI!IGTH >/J •••••• *. *. *•• * • • .* .* i ..... .. NO ·Cl' • • Kl· . CO! •• X. . ··C2.······. SEUCH X ............. • P.BfUI TO • • SIIABCR VALI- • • DITY TABL! • .....•..•. .x: J. :IIITCH .•. D2 •• OJ •• • ..... 0 ••••••••••• •••• •• ALL •• • • •• CIUBlCTBR •• YBS ."CHABlCI'ERS ... 10 • IIC .... IIT • •• IIIKH II •••••••••• x•• IN OPIBAIID •••••••••• X. TO lIlT • •• TABLE •• •• 'IRlrIED •• • CHIIICI'II • **. ... ** **. ••.** • • 110 • • ••••••••••••••••• rES ........... i ······82··········. ·.................... ... i • • • IIICRE!lBlT TO lEI! uan IIII'RI • .. .. i r2 • •• .* 110.. IIID •••••• •• OF *. ._ VALIDIT! _. I'ULR •• *. .* *.• * • liS i ··G2······· ............. .LOAD IRBOB • .CODE UULIO • • OPIIlID OR • • UILlIIITER • ·····E3····· .••••• • FINISH i ·................. • .. on Ol'BRUD • • nLOI liTO • • KEJlORD I'IBLI • ·······1'1··········.. ................. i • • GEl' TO DBLI!II1'U • • ..... ..• i ·cp • • H2· ..... ..· i ·el' • • 11· 128 DOS/VSE Logical Transients ..• C2 • Chart CR. $$BlfTN7 - SETDF Root Phase (Part 6 of 6) (Refer to Chart ~1) •• ••••12····.··.· • HI!XCUII • •••••••••••••••• • i •·.82··.·.·· • ··............. • LOAlI 11011 • • u:caS'f1B II1'fH 1* .•C2····.·. •~~nAnv:Ug8. • 08 10 uln • i • SPBC1PllID • •••••••••••• • ......... .. 1:I • .COIIPUB2 •* 1:2 ••• •• CHI\OIGI'I' *. ' . •. CII181C' lIRS ......... .. l'. *. I - P •• •• 10 •..• .* Dl .'. *..* :x ........................ : • ··.12·······. ·•••••••••••. i • • *. *.•• • ns *•• * • 'liS :lIxor •• 0-' .... .. .'CHIIIC'I'IRS". 10 DIGIt •• •• nCII"!!! • 'f0 IIBI! CHABICTIR • .. ·c,i •.• • 1\3' •• • • .'.i •• '2 ' . *. •• • NO.' liD or ...... CIiAIIC'f1!8S •• *. *. .* * •.• • liS .• ·.G2.·.·.·· i • • • • PO liT • BlCK '1'0 • 81GIIIII NG • ...........• • or cuu • ·•·····H2·········· .• HIX CIIU • • ................. i • • IIACK COU '10 28ft! • • ····J2·········.. ··............... i • ailfURM • Charts 1~9 $$BATTS~ - SETDF Update Phase (Part 1 of 3) (Refer to Chart 11) Chart CS .. • •••• '2•••••••••• : ............... ... UBlTTS' : i • *B21800 *••• *. NO *.• *AS SPECIFIED DEVICETYp! •••••••••••••••••••• *. *. DBVj~OO ••••• C , . . . . . . . . . . • • • SET 1800 FOUND FLAG • * YES.* .1 •••••••• *. • • •• ••••••••••••••••• GET HEX COU POR PDBDTI! *. C2 :x ...................... 1: J. •• . :FLNDPUB CJ .!. *. DEVICE TYPE= 3800 *. *. * *... * •• * * ................. ........... PUBI'OUlfD ..C4 ••••••• .••. •. PUB CUu: SPECIFIED CUU **...... * * NO INCREI'IENT • TO NEXT •• PUB ENTRY * *. •• • PREPARE * *..* •....... US EIIROR CODE *• x* * DEVICE NOT .* * A l800 • • NO ··03······· • * *• • • i 04 *• • ·............ • *. INCRI!I'IENT TO NI!IT PUB EIITRY ..**.•...•. .. ... .. i i TRYUT * •• • ·..D2·······. ·"'····01 ••i ••••••••. • • : .• .* .* *•• * *YES •• • DEVICE TYPE •• Jt!OO *. • ····0·;;: =.•••••• 110 .* ••:... • .... o x ·····El·······.·· i -PUBUPDTE E2 ·.................. THE PDill •• *. *. NO • · * .* OF END •• PUB .* .... *. ENTRIES • * *. .* *•• * * YES CT- *-*-.-*-*-*-*-*-* • UPDATE • • .*. i • ·.P2······· .* *. • ........... * . *. • SSBATTN7 .* ·.1'3.·····. * * ........... WAS*. * • *. *. G2- *... * * NO : x•••••••••••••••••••••••• : LOAIlERII2 i **H 2•• ** ••• *• •• .1* * * PREPARE ** ........... . ....... .... ............... FO~Hg~OR * •• X ••• " **** : * • * .. H:.! : !It:I'ERENC~S • X 'fO CSH2: CTE2, CUE:.! * •••• J2 ••••••••• ., : 130 $)Hl'fT5l .* YES .LOAD EIISO!! • COIlE • UNIIIIOWII DEVICE • • ADDRESS • * ** AT LEAST *. * ONE 1800 •• *. *FOUND . . *• * YES • *X •••••••• • ••••••••••••••• * ·····E4.·······.· i *.,: .PUBUPDTE : DOS/VSE Logical Transients CT. *-*-*-*-*-*-*-.-* • UPDATE • .·................ • i * X i •.••G1......... • * *. .... * i PRI!PARE ERROR • • CODE INVALID • OR NO UtlIT • SPECIPII!D • El • NO.. END •• •••••• OF PUB •• •• ENTRltS •• THE POB2 • l·····.··· ..···P' .............. i o : SSHATrH7 • : H2 0 0 Chart CT .... $$BATTS1 - SETDF Update Phase (Part 2 of 3) (Refer to Chart ~1) .···&1·········. ··............... . • PUBUPDTB ··.......... • • . . i T~STBBST ··B1 ••••••• • • Bl • i ••• Bl ............. pal PUB • BRROB COD! • .SETDP PULED • •• *. BURST *. *.. * w* • i SlYB UlSB aBGISrEB .. .* w* * • • • • • 110 GB'l DBYICE •••••••••• X. MUIIBIR POB • •• • SITDP PAlLORS • ................. ..... .* ·CS • • H2· i ••• ••• ·.P1 •••••••••• •• ·.................. • BlSI RIGIStBR • •• *, RBSKT .. -, ,*.. SPEC IF XED ....... ...... • Bl • i •••• *11 1 •••••••••• • • SIt BURST rUG O'IF . • • • ••••••••••••••••••• • • • BO'IB PCB 'lLUI liTO tHE POB2 • • • • ................. • •• • • •••• E........... . *, • •• US • •••••••••••• .1: Bon CUBS '~~~Ip~n0 • : 80 · NlI.lrl • • • ••••••••••••••••• . i X••••••••••••••••••••••••• .... ••• Pl·. •• UPDATE •• BODIFY •• . . • •••• P........... . •• ns • •••••••••• X. • •• IIOVE 1I0DIn 'ALUB IMTO THB P082 • • • ••••••••••••••••• MO :X •.••••••••.•••••••••••.• : x Gl ••• •• •• UPDAU •• PLASH •• *. **.. ..•* i ··.. . .................... SBT BUBST PLAG OPP .•.:X •••••••••••••••••••••••• : E3 • .• •••••• • YES .. .. • •• 80 ,- • •• IBS • •••••••••• X. •• • *,.* *. ,* RB1TJ *, • .1. • •••• D" •••••••••• *. **. ••. ** i •• 1 ••• Ill.. •• UPDltE •••• CHUS i G,··· •. •••••••••• 1 IIACPUL • •••• 12•••••••••• • lIS .• . • •••• C" •••••••••• •• 10 • 110 .* *. •• BlT8.&CT •• BasroaB .. *. *..* i a 1••• •• •• • • • IES •• UPDAl'S •• PCIl •• ' .. .. SIT BOBST PLlG 01 :x ........................ : ·.................. *..* •• **. . ** •. InTO • ISSUE BI'l'BlCT • • IIACRO to • • • coPt PUB2 •• .•. C3 • i GOOD • • * ••••••••••••••••••* 110 •• •• BURST =1 • • ······01•.••••••••. •• .* • •••• B. . . . . . . . . . . . IBS • ••••• ••••• l . : I •••••••••••••••••••••••• : .I ·······C1··•.·•.···.. ·.................. • • •• .* *. •• _. UPDATE • • •••• G4 •••••••••• • •• YBS • ••••• " ••• X. •• • IIOU PLASH 'ALU& lITO rHI$ P082 • • • • •• ••••••••••••••••• NO : x•••••••••••••••••••••••• : x IIEIT" .* H] ••• •• •• OPDATE •• FOBIIS •• *. ** . . ** .. • • •••• H4 •••••••••• • •• YES • •••••••••• 1* •• • IIOVE POBI!S vaLUE IIITO THE PUB2 • • • • • .. ••••••••••••••••• NO :x ...............•....•... : x ..... · ·.................... .... .. ··.... . i ••••• J 1•••••••••• • SET DBPAULT • • ARBA TO ZEROES. .·. ·CU • • B1· i • Ul • Charts 13~ cu. Chart $$BATTS~ (~!fer to SETDF Update Phase Chart 11) ...... * *.Hr : * PREPARE • ERROR COOP. *SETOF PAlLP.ll ........... * * * ic : •••• C 1* . . . . . . . . i :***.C 3•••• ** ••• : .!lOVE IN BURST=I* :TO OUTPUT AREA : .................* * i * * : • .* * .* D) *. *****0"*********. *. •. *. •. ... • .• .* * •. * • :* ••• : IIACPAIL •••• .* 1I0Del'B *. GOOD *. *. NO * .*.. .* •••••••• x* t;2 . . . . . . . . . . : GET D.t:VICE * NUIIBER FOR * SETllF HILDRE : •• * •••• ~ ••••••••• YES : •••• F 1 •••••••• !1V~E/IAIN i : •••• 83 ••••••••• : ** * !lOVE PU52 DEFAULTS TO OUTPUT AR El * * * .................* * *CS * i. *.H~. *: • •••• p J •••••••••• *• * * * RESTORE * BASE REGISTER * /lOVE LIST OUTPu'r IN'lO BUFFER * : ** i: *. .*. * • LIS"r ...... NO SPECIPIED *..* ... . ····G2········· . .* ••••• , •• x* .. •• . * • * * * : ................. ................. •* *. RETURN ••••••••••••••• * .. * YES • i ··G3*······ ** *PRt:PARE .............. * TO OUTPu'r LIST * IIESSlG!! .. x . *. .* H 1800 *.... : •••• H2 ••••••••• : * • * SPECIPIED *. YES * CONVERT PUB~ FOR DEVICE •••••••••• x* HEX CUU TO * *. TYPE.* * PRINTABLE CUU * *. *. *. ... • ... .. .. • •• * ••••••••••••• i • •••• H3 •••••••••• : UBATTNA ••••••• ** •••••• NO :X ••••••••.•••.•••.•••..•• : .! •. * : 132 * • .. • ••••••••••• * •••• YES i ..... i • * ... * : I •••••••••••••••••••••••• : i ••• •• El G! .. • *. NO */IOVE IN BU85T=II. •• BURST PLAG OM.* •••••••• I*TO OUTPUT lllEA * * : •••••••• ** ••••••• *. ... i: *: ISSUE IIOOCTB IIACRO 'ro UPDATE PUBl * : ................. • * *..... **** •••••••••* : •••• 01" ••••••• IU : IIOVE CUU TO OUTPUT AREl * : • *: SAY;: BASE REG I STER : .... * /lOVALUE i : •••• U3 ••••••••• : i . ·.81·.···** . * 3 o£ 3) *.* • *c'r * • (P~rt * B3 : DOS/VSE Logical Transients : Chart cv .• $$BATTS2 - SETDF ~LLOL Phase (RefeL to Chart ~1 *' •••• A2 . . . . . . . . . .. ~$BUTS2 : ··........... : •• * •••••••••••• • i . ··i:S2····.·· . NOI'lOY! IIJ • i: .. • • H] • • • • • • • • PREPA 1£ • • TO SEAaCR • • /:RROR TABL~ _- • • ........... PREPARE • TO OUTPUT • .. IIESSiGE _• ........... : x••••••••••• X FNO/IATCH C2 .-. .* •• CODE US • ••••• •• i -. .. • • • • C) •••••••••• /lATCH -. IN ERROR •• *. TIBL!! * ..* • .* .- .* : ............... UBUTNA : NO i : •••• U2 ••••••••• : - GET ERROR • • • COOE ENTRY LENGTH • - ·.................i : •••• E2 ••••••••• : • iNCRE/lENT 'to NEXT • • : ................. : TABLE ENTRr •* •• •• F2 .•.i •• *. EIID •• NO • Ot' ERRoa •••••• •• TAllLE •• *. * •. * • .* YES ··G2······· i .LOAC ERROR TABLE TO • .. FORCE INVALID • IIESSAGE • • • CODE .. .. ........... : .......... x: PBOC/ISG i H2 ••• •• • * /lESSAGE *. •• •• •• •• WItH FILL-IN •• *. * •• * • NO ...... . .* YES i /lSGOl : •••• J2 ••••••••• : • FILL IN THE : /lESSAt;E • : ·.................. :x .......... : ..... .. .... x : III : Charts ~3J ChaJ:'t DA __ ·................ .···11· •• •••••• nSBOJ : : ~ $$BEOJ - TeJ:'minate Task and Initialize PaJ:'tition (PaJ:'t (refer to ChaJ:'t 12) ot 3) ··.......... • III • i: i UTBRI! ·····81 •••••••••• • RESET LIOCS • • OPEN INDICATOR • AND PCIL • • • CONDENSE • • INOICATOR • HIS •• .* Bl ••• *. ••••••••••• ** •• ** *. * .• * • .* c1 .•.i: *. .. i ••• I)) ·.................. *. *..* * .• * • : .......... x: :x .......•..•.••.....•...• : x ••• HAKD~llT ** . ••. ** rES ·····'2·········· ·.................. i PC. *-*-.-*-*-*-*_*_1It ·.................. • POINT TO PIB • • OP TERIIIMATING • • T1SK • .OUTPUT IIESSAGE • OP87I • • ······G2····.·····. ··...... ·.................. ····H2····..•.. ............... ·.................. *. * .. * i *. •• ns •••••• .* .* • • • 1I0Yl C&IIC!L CODE UTO LOW CORB • • • i •• *. • 110 • B1 • i ••• ··H1· •• ••••••• • LOCK CII • • APPEND1GE • • BOUTIIE AlIO CE • • APPEIOAGIl EXIT • i: • • • HARDIIAIT 'PDO' • • * i •••• ·J1· •••••• ••• .lCTUATE SYSBES. • OASO PILE • • PROTECT &110 SET • • CAIICEL BIT OFF • III PIS • • ................. · . ·.................. ..... ··.... . i • •••• K , •••••••••• • • • BPSLOAD CLEAN UP RPS TABU • • • i • 134 • ... .. ••••••••••••••••• • •••••••••••••••• :x ....•..•.. : E) ••• •• B1 • DOS/VSE Logical Transients • •••• E4 •••••••••• ····15········· •• . * IS tHIS *. •• IES •.. RELElSI ALL •.. • SDBTASIt, ••••••••••• 1:OWII:gs~~VgE~4) : •••••••• 1: * •• .' *..* * •• * • NO • IISGOUT .....05........•. • .IISGOUT DC • • .-.-.-.-.-.-.-.-. ••••••••• x.ourpur IIESS1GI • • • OP!llI • lIO i •••• * i *. 011.......... I CHKSUB • .. ••••••••••••••••• ·•..··'1·...··.···. • '. • •••• : x•••••••••••••••••••••••••••••••••••••••••••••••••• : •• E1 *. *. : •••• £2 ••••••••• : •• IPL •• NO .CONVERT CANCEL. •• COIIPLETB •••••••••• X. COOl! liTO •• •• • IIESSAGII •• TBBIICAIC •• ..., • •• 'rJ!RIIIIIU,'OR.. IES • 1I0YE CAIICEL ROUTINE •••••••••• l[. COOl - 1'80' ..CANCELLED,. • UTO IIISSAGE • LOAO UK PROII • • SYSCOII INTO BA • IT 1 SUBT1SK • * . .• ••••••••••••••••.. ••••••••••••••••• • NO i .•.i •• NO *. * .• * .• : •••• D1 ••••••••• : G1 •• .* •* ••••••••••••••••••.. • rES .* ,.. IS . .. i .. ** . . ** .. • •. ••• JCLPlIL Cl •• • ••••CII.......... • •••• C5 •••••••••• ..., • • .ftSGOUT DC• JCL OP!!. •• IES • IIOVE JOB lill& • .-.-.-.-.-.-.-.-. •• PAILURE •••••••••• 1. UTO IIESSiGE ••••••••• x.ourpur USSiGE ••••• •• •• • • • OP85I • • •••• C2 •••••••••• *. •• IS lP •• NO • LOAD PIB • •• SUPPORTEO •••••••••• X.FROII BG COli REG • •• •• • I"TO Rl • 1I0AP •• •••••• NORII1L I!OJ .. *VII • • B1· · III1TPART .. .. ••••••••••••••••• OET1CH (SYC H) ••••••••••••••• • : Chact DB .• $$BEOJ Terminate Task and Initialize Partition (Part 2 of 3) (Refer to Chart 12) ** ....* : • * ... * * i AGAIN ** ••• * "RESEr JCL OPJ;;N • INIJICUOR • * -JCSIl1• * * ..................• *• ** ••••••••••••••* . • DA • El* .... • : •••• 14 . . . . . . . . . . : * * * EXT BACT PA BTITION HOUNDARIES ...... -.. A4 : j : •••• A2 .......... : * • • . ...... * A2 ....* &5 i ····· . 5···.······ * * IIIDIC6TH EIIU OF TB&SIM6ToB ROUTIIiES * * • • • • .. * ................. ** i ··til···.··· • * * ·............ i: nITPART • • II/DICATE * 'NO PREEVIS • DONE' * .*. B2 •• B3 . * RUNNING *. *. •* *. IN E IIODE *. *. *. ... * ... .• NO • ••••••••• _'*. . •. •• * .* RUNNING *. •• NO VIRTUAL . - •••• ••IN* IIODE •• . . .. * .. * * n:s YES i : •••• Cl ••••••••• : * POINT Rl TO BG COli REG : i INV PG : •••• C2 •••• : **.**: POINT!!J TO PBEGIN • • : ................. • * ................. * - *: : •••• 02 ••••••••• : i : •••• 01 •••••••• * SAVE ADDRESS : OF AT'l1i PIa * : * * ................. i ·····El·········· * ** * ................. * POINT R 11 • TO PARTJ:'rION : COIIREG : ·· .................. i ·····P1·... *·.·.·.* .SAVE PARTITION • SAVE AREA • • LOAD Rq WITH RI ·............ SET 87 TO PEIIDLOG • • • * i .... • .... * : 12 : : : ................. i .... * ...... * • SE r EN'rR y POINT IN PSW *: .* ............... *. i .*. "'. f2 • * FREE IS *. •• ." VIS .. •• . * .. -.ALREADY *. * DON~ .• XES .* .... NO :* fREEVIS ALL :* *••••••••••••••• *... • • ....- • * : ·····D4 ••it·••. * •••" * * * * IIOVE LOilCORE '60' 1M PSII • * * * ·····E4 .•i ·· ..•...• * INV PAGE R3, R4 &ETURII VIA SVC 11 **••••.•••••••• • . i • : i **··uS········· it ·····C4*········* .. * -•*•••••• * •••••••••.• • • ................. : •••• E2 ••••••••• : * * * 05 .. .. IIOVE PERBIT • "AND SXSTEft "ASK* IN PSW .**................•* ·····F4 •.i ·•····••* • • • SET ON BI r AND 7 b * • .**................•* .• .. G4 ... *. *. 1)5 : i ·····DS·········· * REAL110 POINT R.l TO PIlEGIIi UD Rj TO PBIIDLOG • • • • • ·................. ... *. * .. .. i &5 NO.. .... *. •• .* *. PBBGIN •• > PEIIDLOG •. .... • .* .• .* XIIS i: ·.···ps·... ····.. - • : * POINT R3 TO PGElill • : .*................• .* FREER 1 i * : SVC FREE REAL : •••• G5 ••••••••• : .. ." RDRIIlIIG •• YES ... III E MODE •••••• •. .... : ••••••...• J(: i: :* ••• G2 ••i * •••••• : i • • * LOAD SJOBCTLl ................. • * * .. ··Gl •••• • .... • i • : • *. • :x .............. _......... : ·····84 ..i **· •••••• * * ..• .. NO . * : ................... :X ••••...••• : it :* ••• H2 ••••••••• : * i ·····H4·**·····.· * * *••••••••••••••• *** ................. RESCODE * : SE'r CANCEL CODE TO ZERO : SET OAT Bn 011 .. • : i: • •• HS . . . . . . . .. • ... SBT R7 TO PGt:IID * • • * ...........* : x•••••••••• : i : •••• J:l ••••••• * * **: RELEASE ALL BHSOURCt:S *OWNIlIJ (SVC 6q) * * • * ..•... **** •......* ... *• • ~ * .... ** A4 ·····*J4***····***. ·.................. i * • ~0Vl:: PSW TO SAVE 'REA .. • .. * .·*·.1(4 ••i *·._ ... -.. * STORE NEW SAVE !lREA ADD 'I • • • * * ............. * ••••• .. : i: *.*. * .... A~ : i : •••• Js ••••••••• : • : * fl!l!VIS ALL : .*.................• i •··K!>· ••• ••· • • lIIDICATl:: .. *'FREl!VIS IJONIl' * ·............ * • • : .!.. .... * Al : Charts 135 Partitio~ SSBEOJ - Terminate Task and Initialize (Refer to Chart 12) Cll3.rt DC. (Part 3 of 3) ..... ·•.... • • 11 • ... ....... ····x • • •••• A t •••••••••• ·...............'. • IISGOUT • • RBlOCATB .CCW·S • • ••• A2 .... 0151111'1' •• **.••.** 11 ••• •• ••••·•···•• •• ····111PRIll! • • ............... **.••.** • 10 • 80 i ·.................. i .... •• !B8I1IR •• YES US.. BID •• •• TlSI-lT!1 •••••• X,.. ••• 01" BI1'£I! •• •• BOU1'II£ •• •• •• • ······81·•••·•.···. ONLIS! .* B2 .•.x •• •. NO.. TBRIIIN •• • •••••• !ASK-BG JOB •• *. *. *•• * • •• .- YES • ······83··········. • .·................ .•.........•......• .... • • ... •....• • • • i i RBLOCl!B lDDR OF IS! CCII ·····811 ••••• •• ••• • LOlO CC8 • • IODR XI • • R8GISrlil 1 • • • • i . ·······ct·.•··..··... · ·.....•........... ................. i X ·····C2 ••••• ••• •• • CLEAR OUTPUT • • lRBI • LGLIIIEt • - 88SB! • • • • CArlL UD SUP'R SIlITCH II JCSII2 • • • • i • 12 • •• .111 c" i • • • 1I0VE IISSSIGB • • • 'lEX! TO LGLUE ·· .. ................. i ·····Bl·········· • srOBB • • LEIIG!H 1M cell • ... •• Gl •* .. .i • • •••••••••••••••• • YES • WAIf .i • S'C 103 • • . .... ·................ ·••.....• . .• • i •• • •••• 1") •••••••••• IS •• • PICK UP CCII • •• SYSLS! •• US • lDDR OF • •• I P8lM'UB •••••••••• X. PRIn'I8 CCII ••••• *•• * • i 1Il11'1 • 1I0DIFI • : CCB !O SISLS! : *. 0 ·······B"••·•··••··... ..........•...... · . ·.................. .. .... svc :,........................ : X 1'2 i ··0"••••••••••• ·.••••••............... ..•• ·····82·········· •• ·······O!!·•••.••••... .•....•...........• i Paxl!1 •• • • ••••••••••••••••• NO • • ····1'11········· BBtUBR 1'0 • CALLBR • i • 12 • i •• •••• =SlSLOG SISLST *. ••• *. * . . * .* *•• * i 1"1 •• •*SISLOG *. •• NO • •• ASSIGIIED •••• X ••• *. *. .• .• *•• * • YES 112 IS.. • •••• 03 ••••••••• •• SISLST •• NO I • RB1'UBI • •• ISSIGNED •••••••••• X. TO ClLLBR • •• liS • 10 X TS'NBP *. •• *. *•• * .* : : ...•.•..•. x: ······01.····•.···. ·.................. •• srsr.s! •••• • raA ••••••••••••••••••••• : *. •• *. *•• *.- .* us • •••••••• •• •• .• G2 ••• •• BG JOB FGLS! *. •• ...* .... · ... •• •• NO G) •• •••••••••• X.. •• .•SYSLS! IS •• *. .• • NO ••• **.••.** • !8S • • ••••G".......... • •••• as •••••••••• • .PBllr DC• •• YBS • BRLOCA'!I. .-.-.-.-.-.-.-.-. •••••••••• X. CCW lDIlR ••••••••• , . •• • III CCII * • S81S8 * •• I TAPE • • •••••••••• ~...... *•••••••••••••••••• 110 • 112 •• X. ······H ,••...••.... i ·.................. • • • 1I0DIFY CCB TO SYSLOG • • • i , •••••••••• .-.-.-.-.-.-.-.-. • • ................. ••••• J • PRIIIT • ••••• i 1'PTYPB1 •• 62 ••• i DunE •• II) ••• DB TYPE 1 •• II Ii ••• i *-.. ..•* tflfli .•.•...... **.. .••* • ns • 'lll'I!DIU i ••••• J2.......... .* II!!.-. .. ., IS •• •• IS •• •••• •• SYSLST •• 10 •• StSLS! •• rBS •• SISLS! •• IBS ••• , A 'rlPB ••••••••••• "*'.~ CBO OISK •••••••••••• x •••• •-.. . .-• 10 *••• • 18S • 10 i J) ••••• : •••••••••• X: •••••J".i•••••••• •• ••• •• .* •• •• IS 'tlPI! •• 10 .flU PBO!BCt8D.* •••• *. *. •• •• X ··.... ...... i • •• ·................ . ·••••. ................. . .... ...•....•••.. · •••••K).· ..•.•••· ···.111 ••••••••. ·....•........... ·.................. ................... ............... DC. • OU!PUT IIBSSIGB • • Oil SISLOG • • ... • • l'ICI( 01' lDDR or TAPE-CCII III IS •• • IRS •• SYSLSt •• 10 . , •••••••••• IN PBl DISI< •••••• • . •• •• • • ••••••••••••••••• . ··.... .. _..... . •.••. 1(2.......... • K2 •• x. RLCCB i • • BBTU81 TO CALL8R 136 • • • • • • ...* *•• * i • Aj • IIOOIPI CCII • •• X. K2 • X • .PRINT DC. • ••• 1" ••••••••• 8ILOCAT8" .-*-.-.-.-.. -.-.-. • 8BtURI '1'0 • CCII IDOR ••••••••• '.OUTPU! "BSSIGB ••••••••• X. ClLLBS • III C C B . • O' S Y S L S ' I ' . . • DOS/iSE Logical Transients • • .···Js••• •••••• n!USI TO • ClLL8R • 82· Char-t DD. $$BEOJ3 - Decide Next step in Termination Handling (Refer to Chart 12) • •••• 12 •••••••••• ·................ • $SBBOJ 1 •* •• •• •• 112 .•.i •• IPL COIIPLII!B • *. •• **.. . . ** NO • •••••••••• 11. •• • • ..111 ••••••• SET UP TO PITCR SSBOJ •• • ••••••••••• • • IBS • • ··.......... i i IJII!!J33!) • IJ • ••• ····C2·········· pOIllr BIG IT BG COIIIlEG • • • • 'l • BIG 8 l'r BG COIlIl8G UrEiSIOI • • • ................. .• •• •• *. D2 .•.i •• *. .. .. Ii' •• US SUPPOIlTBD •••••••••••••••••••• .* * •. * • 110 ••••••••••. ·..···K)·········.. ······B2 . ·................... ·.................. i • • PLICB LTI IN BIG 10 i • • • PLICK tlSK • ID 1M REG 1u • • :1 ••.. ..•...•...•......... : i con : •••• F2 ••••••••• : • • : SUB ID I I IIG 7 FOR SSBBCJ)l • • : ................. ······G2····.··.·. . •CALC ·.................. i PIB Blral • • OF PlaTITION • .. OIiNING LTl • i .*. .*. *..* * •• * *..* * •. * 82 •• Ifl •• •••• •• IS •• •• DUIIP •• 110 •• OLTBI! •• 110 •• IIlCRO IN 18 . . . . . . . . . . x •• fl!811IIIITIIIG •••••••••••••••••••• •• ROUTINB •• •• •• • YBS • .··J2······· ClIICBL .• ··Jl······· i • SilT ••• ¥rhI=f~gl •• Blr • ........... i ................. ·...... i .·..K2········· SVC 11 BflrURII TO SUPERVISOR ............... FlTCK .. • • KJ •• X. • • • • SEr UP TO· nrCH SSIlBOJll • • • ~ . • ..·J4·.·····. .... ........ i • SE:r UP TO • nfCK SSIl:rOL'l'P • • • SEE OLrEP • • 1'1.11 • • • • • US • .1 .••.•••.•..••••••••••...• .···Kl········. .................. .. • i FlUCK II!!IT PIfISE • .. Charts 137 $$BEOJ3A - Quiesce IIO for TIP Devices (Refer to Chart 12) Chart DE. . ..... : : ................. ol$Ui:.OJJ" : : O'. :S~C ~ - * .. • OL';80L,; r",,;* .. *JilV ..CE A"4~ • '. ALJ.' t'VJ:l>Jd • • .r.~rt(!:...-. .::i~"N~£(\) * •• • i !ld vl' !l1!lCVII I'UlH·J.'J:;1( • .. 'ri'1 J.i. .<. .*. u" .* ••• .. A1)O J.~:sl· .. ... PU ..: •• •* • *u.::: ....1.J,bl(,. r(o' .., .. :.• .,) *. "RUI; "ld lit; • • • • • • .. ..................... .. .. •• .. .... •• ~NDJ:.O •* • .. •• tH!:) i \,; LVAII II~G b ';.I.1'1l ADDI1.r;:;~ 01' HlBOIlIiL~ 'lAIILll • • ................. i .* .- .. ST(,R ... I'LK Lit .-CJ.l lllS'.l'RUC'l'lO"'• J)L .-.i *. -.IIt:ua .................... : .... ... *. t,,3.. .. O.. V.&Cl:; •••• &. * •• of: • .* a),;) ....i ... ;:;/iil •• •• Hu .. .. liT ..:!» ~J..":'A1t jj,.(bD ukuI::..ll • - "tlr. .. vr' lJ'f * .. *. hiD "U,ill.i: ..... •••• .. t£:!> .. 1111.1 *. . •• .. .. 1;:> •• .l. ... _. . . . . .. .* ••.• .$ *. * •• * • ~ : •••• r; ,. ......... : .. Ghf NllN ~lA • u!' f /1..::> *. •• .. · . ....i_.. .................. It-S. •••• A. •• COtiSU.L:":. • IIJ .. *.... .•.• .. ,'CO : i : •••• ft. . . . . . . . . . . : • S"l'Of!,L; ~A.i..11 • .. Of TASK IN • * .- SJ:"u.:i~ A,$,s.ll.hi ................. · . ""••• •.. •••• 6,,, •••••• :;::.l Ut- .i.IISTIIUC'l'...u,~. : i •••••G 1.......... .. • PVilll' HiG l> ,,'r P80l'al LU;> l'A&lJ:. .. lv rllia - j).-)t.a.C.t : ':':r • • .fUJufU~;S~';'~ .. • • IN ...:C~ • :.1~!~~=.;~~~*: • S1SU::iil • • ................. .. U.J i • * • •• .. .* R:JM!l ?Ad'rllLJII -. J~S •• Rr:Al. •••••• *. .• •• • * ... ... .. '" NO )r."s .................. .PUilO~M~R - \illJ;;Ut. .I.. dEl> 'fleW; • 1l .- at. 135 ••••• .. "'~"*. .. *. \jUt:UL J.:. vi' illiG 1.: •• lJf I'll ...i : illlIO"EAL : •••• J •• 1't!!"'J.~A1'l"; *. , *. *••• .* • ·····K ........... i - Gt:'1' 3;:Arif.l.i01, • "DIJ .. 0/ PUiO .. "'A"~ III it.. tJ.l:3AlS.i..t. ~.! -' .*. .* :llJ ....... . • • : .. : i .:s.......... : .tOVB 11':"1. I'AliTll'luli ilOUIlDAiiLE.:i • • : • . . . . . . . . . . . . 41 . . . . . il:.S • *. .. :;,,:-1 RI ~ 1\ LiDa 1 • .. • i .. 1aJ. .. 138 : • ~att ';"AtlNt:J. iiJ .. U" <:H flil """!H ANO ,,~Gl!lr ~d u • : • • - )"'S AI. : 1I0!JHIU'r. •• B.:J • A.:J : DOS/VSE Logical Transients *. •• .,,:; au •• •• "VI.:.,1 •• • • IiAI.J: L/u ... ... .i'lji\JUl' •• • • uJ:owUk,,,J..rU,, • • : .. - 1'Ol/l'1' 1U • ut"OAl't fJ.klt- • .. .&.-,t io..da ~tit..L. .. IJU.r;u£ I:Llti'iU ~ ....l.t,ll *. *. ~u *. IIftiU1.L -r&I1J.£ .* •.•• ·.!iJ:.Ath':'dt.D •• •. .* i *.... .. : k" : • £.~ • •• • • \:.~ :iW'-.t~ . . .AJ.i' l/U * b'i : : r." : ... ... iil:.L.t.A~~ slsrt.1'1 :I:~~i;lIt{~ j)U~1I : .. . .. . i " .. l< UI' 1'0 l'r.'t'-lo .. $CLO"'.. • .................. * : . • . . . . ft. . . . . . . . . . . . • .. • .. .. 0...:. • .. • .. *. ... .* • • • • • ,(j. . . . . . . . . ... • ..................... ....... ................. ....... .. ...... -.~... .i ... ...... .. . -..... .. ..... .... • ..... *. ... 4 .ul.rJ.'JOl' •" •• • • • • • ,,!) . . . . . . . . . . .. • : : •••••••••• X: • " .u.. .:.. *. ... ~u .. .. A.-. *.I:!'I aLi ..,l,.$AI.:i..l •••• ,(. l.:.J.A~tio .* *. •• i .. ... * • • .. * ................. •• * * • •• •* •,1ol.l.lIrASK • • .. ................... - .* .. "OVE VIK1'Il",1. ••••• PAII1'L,'lUIi : l>OlJilI)AIlU:i •.•.•. ::. i • : . . . . . d,j• • • • • • • • • : 0:> • : • • • • J 1........... : S'.l'Of'~ VALll.t; i. •• C"AHIIl.'oL .. ••• *'" • .-. • *.lS •• • .o Dt. V.l.Ct: vI> ... /,;VI\1'I.I'13 HII .. VALUE l'V • COj(8~ ..Oliu.l.lliG • - ~ i .. d':;SH! flU:,!:. • J..I."r .,,,un:l:.ti : .( i • • • .. .i • • • ............... ~V~ " r"~n;J.r :O:Obt.O.,.. • • • ...... .... ..- ··•. ··h4.·••·•.•... ··.................-. ·................ . .. :X ••••••• _•• : .- .. .... •• ..··'4 ..••••••••• ·.................. ...., .. ..... ............ . G" .. ... .... .... .··............... .... .-.-.. . · .... ·····a. •·······•· : :: . .... .·............... .·...... "........... • • ,,;.e •• t. ·····d ........... lOU •••••• .!•• i ................... .....'". ·-.... .. .. iJHASS LI>~ ...... y,j•••••••••• • sg-r UP S1.iCtJli • • P01 .. lEii . . . ~r .. tldUX ':'111" .. • "::IA 1111;:;1. "J.;~ L. • POUIJ.'.liiS • '"llll';l:>'I!>!! 1 A,i!) • • l':~" "DlJl''';'~ .. .. • : .. : ••••J~l!L .....: -CJ.L itj .Il ; •••• ~1. . . . . . . . . : i"J..i( ..*. 1 : • • • • i;.,:l• • • • • • • • • : •• i DoS· ._ DJ:;Vl.:i. 1171) •••••• : '.t : ~ou .* * •• * • ft.:> .'" Cl.:ll - . /10 l •• 1.H In.!.;) • ... lih.rL:rl.v~.· * •••• • •• *'. •• YO ...rA~4 .t"l:> i •• ..... .*jtl!:\10,,:>:t:•. •• _" • • ~::Il~O!~~~, edAM\< .c;'H'llt • • ..;/,;" h,llil::'1l :• . ................ ....: • : *'&'OJ.II'1 d!:.b oS A"I: • : Jj;:':!,t. .. ..... ............ . ................. .. ... .. • • tlIlGLST:.iI b • • 1'0 I'vl"r tl.l • '-"Illr hIS O.Hr." • • TabJ.J:. • : •••• 01.......... : (:..~sr.) riJ •. *. * ••• ..* .( luD.: b~ ""L'I:"" ~ : ••••.0" ••••••••• : .-. .. .... - : *. »0 *..*••J)£Ad/"'.L.~·ul' !'.NlAL .* .*.... : ....... .- -rlll' .. dHilt':£!l . . . .( • ~u.a i/U • '*.).l!:JA.ol..e • .* • . . . . . \,,;j . . . . . . . . . .. - .. • .. .. .................... : ~E~l' : • ... ai'!:ilJH'A. .. ,,It':iiloOOI' .. .. ................. * .: ·. ...... .. .. . .................. ... ·.1. ·•-........ .. u.. .. ....... . b'(U dEG.I.!lJ.'c;" " J.'O ..al~l' Xv • -..... ............. • • - l ~,j*.* A'f • !lIUL;.t: ·r .. .<. - .... * • J::J ••1. : ..... ~~.* .....*: ... . ................... . i AU!) I jU i!.1 .. ·····A..:.·*···~··· (,iu JI'I"IIB .. ! tL.i : ·····AJ······. •• . ...................... ·.. .... ..... . i llr.RA"l::. • ••••• 1* . . . . . . . . . ........ -*....'" .. A" : • * •• Chart DF,. $$BEOJ4 - Clean up Non-TP I/O Devices (Part 1 of 3) (Reier to Chart 12) .... .*.... .• • • SSBBOJ4 * i 11 .. BOlas ····11······*·". ·............... A3 • • • SIC 64 •• •• •• 115 • • aBLEISE ALL. • •• ITlEBTIOI •••••••••• X• • BESOUIICES • •• TISK.. •• 0111110 •• • • *..* .•.i ·62········· •• •• • * IPL *. •• 110 • •• .. SiC 2 FETCH •• COIIPL£TE •••••••••• X. $$BEOJ *. *..* .* .. * .. * • ••Cl .•.i ••••••••••••••• .. YES •••• **.. ....* • YES ······01.··..·····.. i .. • : LOID TIK FROII SISCOII UTO III •·····c~··.···.··. aBSET calCEL • *. *. * .. * • . *. * ..• • ! .......... x: ·····03·········· 11 • ·····1)5········· . .* .* •• ••• HI... • .. • • • SYC BlrU.N ............... .* •• 10 . I!)··· •. • •. ..GIlTYIS aaBI •• IES • 10 ···.··P5··········. .. ................. ].* •••••••• G3 ••• • .* *. H2 • •• •• *. *. • GBT PU'UTIOI. • : 1I0UHDlBIBS :X ••• IIICB.·• G4 •• .• *. i : •••• Gs ••••••••• : *. .* *. J2 .!. •• RAS ACTIVE • YES .·................. • • i CLUR DTF TABLB ENTBl • : s~·r UP Foa ":liBACLOS i ····as···· . ···· SVC 2 UBACLOS • • • : ............... :x .......... : ··••···J4••••.••.•..• ................. i :IIICBl * . ... *. * •• -.-.. • : ................. • * ........... x: . NO • : • YES :RASWlIT *••. . .* . ······H4••·•••·••.• *. * . . .. * •• * • YES •• ....... .... • ..* US ·• x••••••••••••••••••••••••••••••••••••••••••••••••••• i . i ••.••.*• • NO AJ *. FOR YBS •• TASK •• 110 ..!HCR SUk-Poar •••••••••• 1 •• USING IIICR •••••• •• . •• I •• DEVICBS •• * •. * • YSAII .... NO •• orr's • *..* .... • ** •.... * .* *. .• * i .* RAS •• VHS •• BAS •• NO •• INITIALI2;ED ........... ll.. DIRECTORY •••••• •• •• •• UPDATE •• i •• • SVC ) DEQUEUB • .ALL OUTSTAIIDIIIG. • 1/05 • .. • •••••••••••••• .. i NOCRT SIiAUTOCL BIj ••••• •• YES ······F . ·.................. AurOBIID NO PARTITION • • • .. *.• .. • .. BurrBR rOR UD ArTI SMITCHES i OK. •• IIAINTASK i .. ci~g:f. n~~s. *. ••TElllIIIIA'ltlG•• •••••••••• X•• ·.DISIBLED AUTOII. CLOSB •••••••••• X•• IIITIALIZl$O •••••• •• •• •• .* .. CLEAN UP CRT : • • i ·••·.·Gl•••.••.•••. ·.................. CRT : ................. lES ... i • • • 83···.. .... CLOSAPIIT Fl •• •• IS •• • .... F2 ........... . •• THER!! All •• US .. SiC 2 nTCH • •• OPEN 1800 •••••••••• X. $$BPCLOS .. *. • • • .·................. .••. i .CBKAPRT i CLEAR LIOCS BYTE IN COIlIiEIi BIITS *. .* IIlIB Arrl UlCTIU • III PLB :tABLE * * • ................. 10 •• IIUIIT1SK •• •••••• TEllIIIIIATING •• • ······C)··········. It .* i * • • *-*-*-*-.-.-*-.-* * R~SET USBB • ...:x .••....••.•.•••.•....•.• : •• ··.··85·········. i ................. El NO .RBSElIT .. • : • • ·................. • • • •.. •••••••••.•••••••.. DH. BESET USBa BXITS ................. 'UTOCLOS : •••• C2 ••••••••• : •• AP •• 110 • LOAD PID FROII '" '". SUPBRVISOR •••••••••• X. HG-COIIRBG • •• •• .. IIITO RA • .aBSEXIT .. • • ••••••••••••••••• • ••••••••••••••••.. IIsnECB i ·····B1·········· • RBSBT XECB • • B"TRI~S • OCCUPUO BY • • • TBRIIIIIATIIIIi • • TASK • • • .•.•.A5..•••••*•• .-.-.-.-.-.-.-*-* *•••••••• X.• .. .. * .. * • IH ••.••14.......... .... •••• . .. * liD • •••• x. .. : .i.. .... • INCaBIIEIlT • TO lIEn BIITRV • . • * 13 : .. .•. .. .. .. .. .. .... ..... i 14 •• • NO •• ALL EIITRIBS'. • • • ••• PROCESSED •• • US : •••••••••••••••••••••••• I:CHKSUB 1 X ... ·DG • • AI· Charts 13~ Chart DG. ) . $$BEOJ4 - Clean QP Non-TP I/O Devices (Part 2 of 3) (Refer to Chart 12) ..... ..· ...... ·DF· • K.. • i CHKSUBl ••• Al •• •••• •• SUBTASK TERIIINATING '. .' SU6TASK ••• A2 •• • •••• Al •••••••••• •••• • LOCK CHANNEL • .*TKHIlI-IIATOIl YKS • APPENDAGE • CANCELLED •••••••••• X. EXIT III PIB • '. .' • TABLE • *..* •....... YES X*. *. *. . * * NO A4 : .1AKXIT •• Ali *. **. . ** .. *..* • .... : .•.i '. *. . ' SYSI'IL ' . NO •• SOPPO!lTEIl ...... *. • • ••••••••••••••••• *. NO * .• • .* .* ..... ··.... . i YES • RFCHECK 110.' •••••• .* Bl .*.i '. RIISII •. G~NE8ATlm *. *. *.• * • : .* .* * .• * *YES ·····C1·········· CHANGE 'PHASNAII' TO i$BBOJ1 FE'rCH UB=OJ ............... : • * • : * *. US *.•••••.• **.. ..•* ····C3··••.• •••• ............... SVC 39 DETACH .. .. :AGUII c" : *. .* •• • ••• 12 ••••••••• SVC 2 PUCH $$IIPOIlII *••••••••••••••• *..* * ••• *. ... •• *. * •. * .* IS *. ... ••••••••••••••••••• . • *. .* YES ······H,........... i *'FROII REIIOVE PIK • ACCOUNTIIiG. * • ................. • IIOVE CANCEL • CODE TO ACCT • • TAIlLE IF 1'57 • TIllE THROUGH • CANCEL • ................. :x .......... : x ..... . .... .140 .* • • ••••••••••••••••••• • '. *. .!lEITDIII I ••••• 1' . . . . . . . . . . . . • • • POI liT TO fIRSt S!SPCH DIB .. ~Ii : DOS/VSE Logical Transients • • • i *•··.··r~······.·.· •• UIASSIGII * : THIS LUIS Bnlll • : ..,............... i .* G.. . •• *. • NO • * SISPCH '. ...... ALREIlDI .' ' . CHECItED •• .... . .*. .~ .* • ns ..... .. •• 'DH' • : HII C1 ••• I. •••• I •••• DUTHO HI!···.. FETCH i • .POIIiTER.. H!) . . . . . . . . .. • .TO TRACI( - •• 110 • SVC 2 PBTCH • •• HOLD 71lBLE . . . . . . . . . . I ' 'PHASEIIAII' • * • AVAILABLE.· • • • : .* •• *..* * •• • YES i ..... i ••••• J , •••••••••• CAMCIiLCD : rli • .. II •• 1. :.1: ** *** i • 110 •• JOB •• NO •• ACCOUlI'lING . ' . . . . ' . SUPPORT •• TABLE ··.......... .... . ·.... . · . ·.................. :x ........................ : * .* • **. ••. ** X .'. * .. * .* YBS : •••• 85 ••••••••• : ' • * • •• US OIl! • SET CAIIC£J. • BIIP!I . . . . . . . . . . 1. CODE TO I'J!)' • Eli • 110 '. *. i .' •• NO **. . ** .. • DII :DISII1 * * * i *. 110 • • *. CLEAR Pl'. " ••• 11 2 ••• ' ••" . ' •' IS '. • • • RESET SPOOL • • ' PARTITIOII •• YES ' . SPOOLED By . . . . . . . . . . X' 8I!QUESTS '. POWER . ' • .• .* * IS IT •• 110 • •• DISI< OR rBA . . . . 1. •• ••••••••••••••••• .'. Gl * .• * NO • * El 15 *. *. NOPART .f. •• •• IS tUB •• IES •• UIIASSIGUD . . . . . . "08 IGNORED •• • * •' POIIER ' . US • '. PARTITION • * •••••••• X. *TERIIIIIATLNG' HOPOWEII ................. • •••• 1)2 •••••••••• • • • IIESET I!!II!P • x* OWNERSHIP * FLAG III llF7AU • : .•........ x: :x .......•................ : 1 • • • : i Dl '. •' IS '. • ' EBEP TASK '. ENDING • '. .' POM ER • POI.! TO • PIRST SYSLST : DIB * • ........... 1: :.HH:!U!~~L.*: • j ·................. . .. i .'.i ······B. ·•·•••••••. i ·····83·········· • • SVC b.. •• • .RELEASE ALL • • • • RESOURCES •• OIiNED •• 'I'OR WHITING 'tHE CANCEL IIESSAGE i • • • i ····62········· * H. . . .·. *DH • • • 1• ••••••••••••••• $$BEOJ4 - Clean up Non-TP I/O Devices (Part (Refer to Chart 12) Chart DH. ..... •./I,.. ·. ......,.......... · .. ................. • •• * • AJ • " i "* 8EWCATE CCIl AIID CCll i : •••• 1..3* •••••••• : • • : • • · · ASSIGN SISUSE 1.1I1l · • • •• .* •.•• IBS.. BIIID or CLEAR eC~80t ..... ... i *. *•. * .* .* .* ... Dl *. *. ··........ •• *..• .* • .* J. •• :1I0110l.D • •••• B;t. . . . . . . . .. •* •• • *IIICRBIU:IT 118 1'0* •• mTAB •• 110 l[ .IIBIT HlB 1$11'111. • •• IIDn POOIID •••••••••• X. AIID lliCREASB ••••• POB 11I1lz;J. • **. .** •• •• * ••••••••••••••••••• ·XI$S · • • 1'011'1' 82 TO CORDill' AIID Rio 10 IErr TIlTlB Elnl •• •• *. ··.........i i ·····D4·········· * • ..* • .................. .. • IIUlLD FilA CC_ PREB1'IIK • : ."...............". OIiASIGIII SISOSE LUll • • • IT 1'011 •• 1110 "POI ..1 RJ. 1'0 • •••••••••• 1. HBtl' l'HT11I • •• "l::N1'Rt· • •. • *. .* .* * •. * • 110 ··.···O!)·······.··. ·................. .. . :.i - S1' lit .iT I.:LISAIil • *11' l'AHJ.J:. .t;lIl'lU • ·.....,E,••••••••••. i • 1"1 l.4Jsll '::&.I.:Js.l. • • • I.:J.J;&R 1'X.1JU!1I ................ . : taT"r : ·..···r5·······...· i • 51'.7 AS ~u A .. • UB .. B: .................* • CdKSOS .* G!> i .*. •• .•• JU•.lll:r.SK *. •................... ··.......... •• J!) • .. taIS TASK .. .i IRS ." ATTISIII:flOI •• •• ••• BOIITllll1S •• i ........................,. • . . . .G:t. . . . . . . . . . **. . ** •• • ns SYC J6 i DBLl'ill *. : • • • • ... • ••••• 1' 3 •••••• ".". • .i. Gl •* •• IS CS .* 1'''''1''8& :.t •••••• •••••••••••••••.•• : I'lIlCE'tIUC i : . . . . 1::J••••••••• : ··.. . .................. *•• *.1"1*i•••""."* .................. • • BUH.D CKD eCIl "" . •• •• i * ·YES 21 :~~lh&ll i~'AV * ··.···Dj·••····_·. ·................. *. • El • ..1. DELT:~·· . • IS IT •• NO •• DISK OR I'BA •••••••• •• • i *•• * • 110 i rE'l'CH CJ R}'SEJ..1T ·-···IIS"····*"·.: ·....................... *. •• n;s I'B& "*. DErret: •••••••••••••••••••• *. .* *. .* • 110 .JIG • • as· .. .i .* •• •• ••• FOB RBACIiED •• •. • .*•............... **. • :lI •••••••..••.••••.•••..•.•..•....•••.. .•. C1 . i :.**.jJj••••••••• : • • II DBLTli1 • ...... s ......... .. ·................. • : • •••••••••••• * ••• i ···.·61*···_ ..•• .................. • 1-0.lllT BD TO • PAB1'ITlOIS • SISLDB AIID itS • TO POSTAS of 3) ··..... "IIG • • • ~ *. *• .* •• aiU •••••• .* * .• .*I~S i ·······8 ..···....··.. ................... ..... ..... i • • ZERO :rh-Q)OIl1'tJI i : 13 : • • • El • i: : ••••05 ••••••••• : • :-:.I.B S1'li' u;; • ·....................... .. ·.......-.1. A.II. UC TA tolo'" : . . .............. . • : • J!) .-.*It!>."i ••••" ............... 8arOb 10 U ..... U • : Charts 141 Chart DJ. ·· $$BACLOS - VSAri Automatic Close (Part 11 of 2) (Refer to Chart 12) ,. . ····Al·.·.····· • $8&CLOS ..... ...... . • • *.*~ •••••••• *. i: : •••• 81 ••••••••• : : l!f~g~g~ • COIISTUTS · 82 • 83 • • . •• 1M PlIOCESS *. *. * ······c1·.......... I. LOAD I'IB P'I'II AND PIB2 PTII *.• * .* C2 .• . .. .-.i i ..... ... •• *. ·.................. . . LOAD MEI'l OAL 1'18 i ... ·................ • - • • ·OK • • Cl* ······111····.·····. i i ·····D2·········· * • ·.................. ·.................. • LOAD PIK • • '-ND CAL PTa • • • • 'UUSUTE ERROR CODE 1'011 IIESSAGIS •• •• • • • ... *. D) .•.i •• OAL lV VALID *. .. .• •• MO •••••• ··.......... .• x * •. * * YES • .•. i Ill 110.. ... *. ··...... .* OAL *. i • •• ID VALID *. *. . * • :*••• -. •• .* .* • * YIlS ·IIK· : • i . x OALU .RES!!T ACLOS AMD. : ACTtY FLAG : ·................. ................. ··.·.*G1·.··.····.. .··................. .... .. ·· .. i .·...a2·········· i OALJ OK. .OLLLOG *-*-*-.-*-*-*-*-. • LOAD ADDRBSS OF. • USER SAYB AREA. ·................. • ISSUE IIESSA(;E • • . 227I • Kl •• 1. OlLl···· .!. •• OUII i • •••• H2 •••••••••• . .... Hl .* •• OAL ENTRl •• MO • POINT TO NEIT •• VALID .- •••••••• X. OAL ENTRY *. .. .. ...* • •* •• •* *. J 1 .•.i •• * ..• •• .* • yes ·· .. i • **. • BJ • * ••• 142 •• NO • •••••••• .• * .•................• ,. lES OAL FLAG ACTIVE *. .* .• J2 .. .i •• *. .. .. .. .. .... •* •• LAST ENTRY • ~O ........... i : RIITRY N.DU&B • 111 • : •••• P2 ••••••••• : • LOAD MEXT • .SEGIIl:!NT PTII AND. : EMTal HUII8BB : LOAD i • J2 *.X • :...., ,.........: - : •••• £J ••••••••• : ·.................. ·.................. ..*. ·..... ··.......... •• BII • ••• * i i £2 ••••••••• : ."OVE ERROR CODE'ro I!ESSlGE • • •• YES •••••• ··........ .~ • Kl • ~.i : DOS/VSE Logical Transients • : ••••••••••••••••• lES OALS i : •••• C3 ••••••••• : • • . . OAt 1 i • •••• BII •••••••••• •• ·................. .• * i ..... .* * •. * • YES *. ••• • ·DK • • 81- •• RETURN •• MO •• CODE 1M •••••• -. R15 •• • : i B3 BII • •• IIORK •• MO • RESET ACB • ••• SEGIIEIITS •••••••••••• X: COUIT IN OlL MO •••••• rES • .... .. •.. * .. 1.& •• .* *. • - AUTOCLOS •• •••• * •••••••••••• • : .•.i ··.......... ··.......... - 82 - • : 1111 • ····CII···.··.·· SVC 2 • UBEOJII • $$BACLOS - VSAM Automatic Close (Part 2 of 2) Chart OK .. (Refer to Chart . i i *: .. : •••• 82 ••••••••• : • : C2:. x. ••• * • x : ••• *c 1*.* ••••• -: LOAD lca PTR '" : i OAL 12 ..••••••••••• * •••••.. IIESSlG! 42l7I ON SYSLOG ·.................. ... • SET IISG :INIJIClTORfO " : ..: OALLDG i • •• SII •••••• • ... • •• illItE .. . ................. ••• * •* NO.* •••• *. •• C2 •• e. AIIBL •• ADDRESS •• V1LID •• *. .• *. ... '" '" •• * •• * • YES ................. '" '" SfC 64 RELEASE ALL .•.i *. '". i · *. *. • '" .. '" •• •• •• .• *. i Aca NO • ADDRESS .'" •••• x. VALL!) .'" *. * ••• . .. '" YES D" .•.i: .. .................. . .. : '" SET IISG * *INDICATOR oro 2 • '" G1 .. ·i •• .'" ICI! '". 10 VALID *. *. *. .* .. LOAD ACIl PTa IN RO • : i ·.·.P2········· SVC 2 UIlCLOSE ............... •• *. .. .. SYSLS'l" PIIIII'l"EIi .- E" .•.i . NO X ". .• .* .... YBS •• -. NO .•••••• FIRS'l" 1"IIIB *. •. • •• * • i ....... ,......... .* .. •* .................. * : •• 10 •••••• .* *.• * : • • • • 8,2 • • • • • • • • • : *. •• *. * .. * • ns • t: 1 •• .. .. i '" SET ~SG • :INDICA'rOH TO 1 : C4 •• SYSLS~ •• lSSIGlIl!D .* ······D2·········. . .. . ·................. . .. .. x : •••• v 1••••••••• : .* •• • '" I!l '" SET ACLOS : OlLLOG * : •••• 81 •••••••• . • ....* .... ·DJ" ·................ • •••• 14 •••••••••• ...... * •••• ·DJ • .. I!l· OIL10 ~2) .* *. . .. •• US ···P4•••••••••••• ................. i: • : SKIP TO CHUIIBL 1 SYSLS:r . : •••••••••• X: i: ··.Gq.··.·.· ..·•.. •• 110 .* .* .... PRIIIl' IIBSSIG! IIU7I ON SYSLSl' • X. ................. * •• * • YES : X•••••••••• : i ••••• H 1 •••••••••• *'" SET "5G *INDICATOR TO '"'" • .. ................. •• Jl .. ·i •••• •• •• ACS OPJ.:N •. *..* •.. * .. YES .... .. i '" : U2 : • IIB~IIIiN VII LINIt REG " • : •••• J2 ••••••••• : •• NO X • . . . . . . . . . . . X. !lOVE !lESSAGr; .* i .··.H...··.·.· .. ·................ ** ** 1 * " " • • .. • ................. . .. a.. . ·DJ .. •• P:* OALlA Charts 14.3 $$BEOJ7 - Tape and Disk PUB2 Processor (Part 1 of 3) (Refer to Chart 12) Chart DL. .....,.......... ··............... . • STATOO .......... • : i ·····111 •••••••••• : :gU8R (~~i¥~: : • • AIID 1IAIT •• ................. : ~J~~t1~pP~'0: • -*.*-.-*-*-.-.-* • • • ................. i ···*·D , •••••••••• • STAT2S DL* *-*-*.*-*-*-*-*-* • ACCUIIOLlTE • ................. • BYTE DATA * • CHECK COUIITER • .•.i •• .* *. •• 8l!CORDIRG •• •• : SUt'O!> i ·····Cl·········· • STAT20 DL. • ACCUIIULlTE • BYTE BYTBS• lEAD COUIITER 82 ti2 : *. REOUIIIEU *. .* * .•. *YES .* 10 •••••• ·····1)2·········· ·.................. • : • lDD COO"fERS i DII •• •• i *_e_._._._._._._. ••••• G1•••••••••• .STlT2!J DLACCUIIULlTB - BYTE OVERRUN • A COUNTEtI • - .................* i ••••• Ii 1•••••••••• DL* •• .. .. •• 3330 IN •• NO ·.COIIPATIBILUY.· •••• •• 1I0DE •• *. ... - .* • YES i ···..G2·········· ................. • • CORYRlIT 1I0DULE 10 • • l/l1c~gE3/6 : PROII i : •••• "2 ••••••••• : *-*-*-*-*-*-*-*-* • ................. ..*....i ..* .... .•................* • ACCUIIULU'E • tifTE OVERRUN B COUIITER 112 * • • PUT 1I0VULE It III PUB2 • • • ·····.J2..······•·. S'UTh i ·.................. • IIOY B COUNTEtlS • • • TO PUBl ENTRY • • • ····K2••i ••••••• * • 144 •••••••••••••••••••• i . RETURN • TO CALLE'! • • ............... DOS/VSE Logical Transients TO MElT : . i • ••• 1'"••••••••• ·................ • • BlfUBII fO CALL!R • • . SflU, i ·····E5·········· SEt' to RICaRD • • : ................. • COU.'fI!l~ :1 ........................ : i ••• : x•••••••••• : • STlT25 •• YES .• ................. : DL. ................. .. .. * ••• • 10 :1 .......... : • lCCUIIULlTE BITE SEEK • • • ERROR COUNTER. *. •• COUII'rKR 0¥I!RFL01l • srOBE coo.rEB • • .BD POIlt' • P2 ~nUg STl'UO IS IDEII'IClL. • ••• •• BII •••••••••• STAT12 rHI LOGIC rLOIl POI: ~ · • ·BS i i • GET OS DEVICE • .TYPE CODE WITH • :GETVCE (SYC 99): ................. .STATJO • .. .•. .. BUILD IIDR RECORD *-*-*-.-*-*-*-*-* ACCUIIULlTl!: • i ·····P1·········· *.e •• _. __ •• ___ ._. ·B!> ·······C,,··········.. ..... ........... • : i BYTE SEEKS COUNTER • · . ·.................. STAT10 i ·····C2·········· ·····El···.··· •• • • STAT2S DL. • • • ·•····a".····.··· ................• $$BEOJ1 Tape and Disk PUB2 Processor (Part 2 of 3) (Refer to Chart 12) Chart DM. . ··.·a ,.......... ·................ • ISBEOJ7 ..*.... .. BII • • ....• * .. . ···"·*····. ···"·8 * i ·····81······.··· i UlNOU • SliT • ·IDDRESSABILI'U • • AND IIiHIBI'l • :FILI! PROTIICTIOII: ................. ·.................. i .. .•. .. nnoo .. ISSGII SYSUSE .. PUB AID PUT • IN CCII i c" : •••• Cl ••••••••• : ·.................. • • RELOCATE CCII'S .* •• D1 .*.i *. *. •• *. .* .* • •• NO * •••••••••••••••••• •• !Nno!> i • GET 10 OF I?UTITION : * DillinG LTA ······l"1·.········.. ·................. . .... ·· .. .. • ••• • G2 • i •• .* .- •• DOES •• •• ACI'IVE TASK •• •• Olill THIS •••••• •• PUll •• *. .* *••• • YES : •••• 11 , •••• i ~Ij ·.................. 35"0 *. .. 4. *. * •. * ···.·D5·."·· •••••. .-.-.-.-.-.-.-.i *. *. .* .* .STlrOO OJ.• .. . ..... ................. US •••••• • • GIT DIsa SUTIsrICS • • i • 110 ·DN • • 11· :.X:. I • i *• •• • •• * .* .. YIIS .. .* 110 •••••• Gil •• *. .. .. .. .. ··.......... i •• EIID OP PUBS •••••• i * •• * • IES i .*. *. 112 .. . *. .* •• * •.• • 110 .·.J2.·*·.·.. i .............. :x .••..•...• : ... ... .. • * IIAlN07 •• *. *. G1 • ·····8. ·*·.*···.· ···................... BUTOO • • UIlSSIGI SISUS! PUB • • ·..................... · IIU01 i • ..... J ............ US!:;" BIT I'I!.K. • 01'1$11 ON VEVICI! • i Gl • *. G:2 •• •• IIISI ... SYSrKIl PILt: •••••• i ·.................. ··.........- •• TAPR DEVICE • : •••• J1 ••••••••• : .lNDICATII DI!VICIl. :CLOSED IN PU02 : .. .i Ell • - *••• *: • IIAP TO PROPER • : POB2 IINrRY : • .. •• .... .. -..... • i liD • UPDll'! TO • .ISSOCIATED PUB • .01l1l11SHIP UTili. ··.......... ... • • G1 •• X. •••• X G1 ns •••••••••••••••••••• i • • . 11111105 • .* .UPDATE TO IEIT • • PUB .1 ••••••••••••••••• .. i --1Il1l05- DIf .* ... .... ·····B. ······*···. ··.1.· .. ·· ................ ......... ...... ..... * ,............• ·................. ... .. .. IIUII1D :x •....................... : • *. *•• * •••• DIIE": • • g:~~. DNID: • .. .·····£2··········. ................. ................. i • GET ID FOR TASI(. .. OVIIING LTA • ••• ··£1 •• • ••• •••• • SET IIlSI( POll • TEST AT *. R~I'~ReNcts TO .. *. 08 '81 •* •• * .. * • IllS ·· •• •• ,U10.H50 •• • • IP •• SUPERVISOl! *. • • • • IIISE!' PILE PIOrBCTIOI • • i *. 1(2 TAPE •• YBS CARTRIDGE •••••• * -...-. .... · . .... •. •.• * .* .* i NO i : , i • •• *1(" ••••••• *. . • SVC 2 - PUCII • • $IBIIOJ • ................. E" : ...... *• II . . . Charts 145 Chart DR .• $$BEOJ1 - Tape and Disk PUB2 Processor (Part 3 of 3) (Refer to Chart 12) .·. ••• *. ·DII , , Dli • i T&l'EOO : •••• '3 ••••••••• : , INn &lIT II • PU82 TO C'RO' • 'UD CLEAR PUB2 • • U.SOL lilT • , ................. •'. .* *. II) i .'. e• *. * .. • tlO.' .* CJ ' . *. i • .. • NO RECORDII', UPDl'U TO IUT PUB • .. • .- YES i .'. •• 0 *..• • ' . 110 •••••••••••••••••••• .• ERROR COUIIT • • • • • • • • • • • • • • • • • • 0. ······D2··········. ·.................. •• YOL 10 IN .. U82 •. ' • .' .• . ' YES ······D. ••·•••••·•. i :·····D3·········· :~~~~E (~Y50~: : IIOYOLIDI : :WAITFd~'C71: : • • • • 'COlIpLETIOI • • ..... ... i i IOREG05 .* El • '. •• '011 • • Ell' e. . ' UIBBCO' ' . IES '. I/O ERROR •••••• *. *. * .• - .• ..... ... .*. i • 10 'DII • • . i ,·····P3·····,.···· • BUILD • gIl' IIUl10 .................. raPE , • BBCORD • ·····G)·········· : i : :n~R~~'~~~I: :JA~'r RJ~Y~~I: : ................. , • COIIPLS'r! : •• ..... : •••••••••••••• ~ •••••••• • X: I .., 'DII • • Ell' IIlIlIlO 146 nOS/VSE L~gical • • • ................. ................. , i CLEAR STlTIS'UCS AND rUGS Itl POll2 Transients IIUN10 • Dump Monitor (PaJ:t 1 of 13) (Refer to Chart 13) EA. Chart IJBSDUMP - • ••• *A2 . . . . . . . . . .. : ............... IJBSUU!\P :*••• : i H2 ••••••••• : .GI!'I: ADOllKSS Of • :~~II~f~: g~~~g~.: ................. i : • • • • C] • • • • • • • • • : .INITlAT!! PARI'S. : Of OUIIPC;A : ·.................. i : •••• D2 ••••••••• : .Gllt TASK 10 Of • : C;ALLING 'rASK : ·.................. i NOAP : •••• 82 ••••••••• : • PO I NT TO PIli • : fOR CURRI!N'C taSK • • : ................. .•.i F2 •* •• 'J.'ASK oO • *. BEING •• ~ES CANCELED • _ •••• oO. *. *. . .. .* * ..• • '10 ..... i i ... .oO. G2 .... ·Re • - A100 SOU~PR *. -. YES •• ATT&NTION oO. ...... TASK ." •• CALLING •• ..:.. . .':J - ... A!. UU~PCN *. * .. * - .* '10 i ..... ... ·E5 • • 51· POUI'IPR Charts 147 Chart IJBSDUMP - Dump Monitor (Part 2 of 13) (Reier to Chart 13) EB~ ...*. *EA * * G.l* • * * I!DU"PR i : •••• 81 ••••••••• : : : :~g~~~~ ................. : nLIDATION C1 : .*.i •• • *ADDRESS* • PAIR 011 1I0RD • *. BOUNDARY •• •* *. *. *. NO * •••• .* * .• * • YES 1)1 ...i *• .* .*BEGIN •• > END *. *. *. . ADDl! *. YES • Of CORE.* •• X. *..• .* * .* NO i £1 •• ·~MD .*. * • lODR *. *. IESI • • *•• E~;~;; •••••• BEGIN ADDR .* ........ Jl* tUTURN TO • *. *. * • •••••••••••••• SUPERVISOR • .• .• *.. * *NO *.> •• '1 i .* . *_.. :•••• F2 ••••••••• : •• END ADDR •• YES * END ADDR • END Of CORE.* •••••••• X. = EMll OF CORR • ADO!} • •• > *. * . . * .• •• •••••••••••••••••• * .. * • NO :x ..........•........•••.. : i ····*G ,.•..•••••• • PRINT EP* *-*-*-*-*-*-*-*-* INITIALIZP. • :SYSLST FOR DU~P: ................. i ····*H1· ... ••.•.• *-*-*-*-*-*-*-*-** ................. * *PREGS EN* *PRtNT ALL REGS .(CR + GR + PPR). ... i •- .* *. = ... J1 •• *. *. END ADDR YES !lEGIN ADDR • * •••••••••••••••••••••••••••••• *. .* .* * .. * * NO i ••••• K 1.......... • PRINT ElI* *-* -*-* - *-.. -* -* -* * SPACE A LINE ••••• K2•••••••.•. .DUIIPAS KP* .. -.-. -* -* -* - *-.. -* . * ..•..•.. X.DUlIP REQUESTED *•• X. • * ARBA * :••••••••••••••• : :••••••••••••••• : •• !2~"P~ND .. * -ilL • E"* - 148 DOS/VSE Logical Transients Chart EC .• IJBSDUMP - Dump Monitor (Part 3 of 13) (Refer to Chart ~3) ··......... ..... · _ ·IA " .F~. · • lJ • i SDUIIPR ••• A1 • *. •• .• •• •• "0 •• VSB/ICCF ' •• ••• ••• PAR'lITIOI •• ·'lERlllIATING· *. •• *•• *.* A1 .. .i. .•.,I ••. * •• • •••• 62 •••••••••• .• (;~I'I~H·· •..* YES :pg~v~n ¥::~~L •• CCTL TAS~ •••••••• x* or VSS/ICCI" • 'I'BBIIIIUING. • *••. .•** • Cl •* •• •• PARTI'I'IOR •• Dl •* IES.. '..... ...... .... •• i : .•. OPTION IN JCL PLAG LNITOOIIP .... 10 i Cl •. *. • ••••••••••••••••••• •• *•• * • *. .* •• NO ..... · ··...... ·..... •••• • 04 • • C3 • .!. *. .*.. • •••• • i Dl 0 ........... . SEt SII TO • •• •• NO • PROVOKE DUIIP • •• OPTION •••••••••• X. OF SUPERVISOR • •• PlRTOUIIP •• AID nSf Ell • *..* • GBfYIS • •• *. OUIIP OR JOUIIP •• IIlCRO •• * ••••••••••••••••• • •• * * NO YES • : ••••...••. x:' ............••.•••• : C] : ·····£1··.·.····· ................. ·····X]···.······ .-.-*-.-.-.-.-.-. ................. i SDUIIPR • IJBEOJ i I"P. .PRINT *-*-*-*-*-*-*-*-* • ISSUB IIIISS"!>E .. • • ····BII····.···· YIS •• • ••••• OPTION NODOIIP •• X ••• • *. *.•• .* • •• I SVCll • *. *.•••••••••• . . X. IITuaa TO • • SUPERVISOI • *TASK . . * •• ••••••••••••••• NO •• .. .i .. .*. .. i • ••••C2 •••••••••• • •• • RESTon: DUIIP *. •• i x•••••••••••••••••••••••• : 10BTSS lIS • **.••.** :...•....•. x: • •• .• VTAII •• USER : • • • • ••••••••••••••••• IIAU YIS TASK •••••••••• x* • • TERIIIIIlTING. • B1 HO J. *. *. .. .. • 115 61 •• t. 10 1I1I"TASK •••••••• ·TRRIIINA'lIoa· FOR CANCEL CONOITION F1 .•.i *. •* *. *. .* **.••.** .* F2 .-. .. !.. ·1::0 • •• •• POIIER •• u ; S . t •• PARTITION ........... Jl*. IIAINrASK • *. 110 .B~. *. *. **..•.** • · .• liS •••••• .......... •* •• i Gl · LflDUIIP i NO : IORIIDIIP BP • .LTlOUIIP INIfll-* .LIZE SISLSf POR. • DOIIP • • • 011 : ••• t • • t t • OPTIOII •• HODUIIP *. *•• *.* • HO ... *. •••••••• IES • J. ••••••••••••• •• x •* •• ... H1 Aa CAIICBL *. *. *. •• .* .* . u~s. •••• X. *••• t NO ... i J 1 .• •* •• *. *. .• *. * •. *.* . rES • •• CANCEL IIACRO •••• X. *. K1 • HO ...i •• *. •* . .... X: .:·CAIICP.L-ALL ·:.~?~ •• "ACRO •• *. ,,* *•• • YES • ····K2········· 8I!¥~i~'TO SUPERVISOR ••••••••••••••• : • .!.* ··.... ... • AJ • Charts 14~ C,.art ED. IJBSDUMP - Dump Monitor (Part 4 of 13) (Refer to Chart 13) ..... ..· ·BC • • El· i LTADUIIP .* 112 ••• •• •. 110.. CORBE,,'r •• •• •••• TASK DWIIS L'lA •• *. *. .• • us .* *•• * .······C2·········· -.-.-.-.-.-.-.-. ·................... i .pRIII'r • J.;p • SPACE A LINS • ·····D2·········· i .PRIIIT EP • •*p8IlIt -.-.-.-.-*-.-.-* TITLK FOR. ·.................. • LTA REGISl'BKS • i ·····E2·········· EN • .PI!t:GS •.1'111111' -*-*-*.* -*- *- *-* GPR'S AND. ·.................. • FPB'S • i ·····1"2·········· • -*-e-*-*-*-*-*-* ·.................. Ep • .PI!INT : SPACE A LINt : : .......... x: .·····G2·········· -.-.-.-.-.- .... -. i NOLUDUIIP 'PRIN'!' Ill' • ·.................. 'PB1IIT TITLE roa • • TASK REGISTERS. ..····J2·········· -.-.-.-.- ...... -. ................. i EO • "IJIIDIIPPA • P81NT SUPERV!- • • SOB CONtROL • • IILOCKS AND AODR • .* 11.2 .i'. •• NO •• PARTDUPIP •. ••• ". '1'0 BE GIV EN ..... SUPDU/lt>X . "EI! " •• B~* *. *. * .• * . .. "• . .. ." • yes :LBLPR •• !.* *EI' • * "IJ!* .. 150 DOS/VSE Logical Transients Chart EF. IJBSDUMP - Dump Monitor (Part 5 of 13) (Refer to Chart 13) ··...... ••• * • All • i ·····111 •• ·.•••·. • .-*.*-.-*-*-•. *-* DUftPPAI'l Epo< .DUIIPl~ ·.................. ... • • * •••• • ED " •• K~" " DUIIP CUCILID 0< PISTUIO. 0< i SOPDUftP i ...... Ii 1•••• ** •••• • PRINT IlP" BIl - • e. •• DUftP DB IllS ". JDUftP IIACRO .0< •••• .* *-*-*-*-*-*-*-*-." ·................. .. SPACE A LINIl *. "" i ·····el·········· *-*-*-.-*-*-*-*-* "DURPAR •• • " NO .•.i •• *. * •• *- · . .* .B~. X Ep. • PRINT ··.................. *-*-*-*-*-*-*-*-* • SPACI A LINE • -. US ·IG " .****0 , •• *** ••••• .* II •• NO • •••• 1. SVA .....i : K2."'X. LBLPR *. .* • • • •• *. * •• *- CIl ................. " " .... ·ED" *. .* •• PAILURE IlP" DU!!P TilE SUPERVISOR " • *. · .* .....i ... ·!H • • 81. NOSV!lDIiP !iVADIIP ······El········*·. ·.................. i • • " I!ITRACr PARTI'UON BOUMDAInES • i ....., ,......... . *-*-*-*-*-* -*-*.* ·................." IlP" • PRINT • • PRINT LBLrlP LENGTH " " i ••••• G 1•••••••••• • PRINT 110'. *-*-*-*-*-*-*-*-* .PRINT PARTITION. ·.................. • ID • i H1 .". -. • •••• H2•••••••••• '". • EID OF DUIIP •• VIRTUAL •• YE!i • AeDIl = •• PARTITION •••••••••• X. £ID 01' •• •• .PABtITION ADIIII •• *. *. .• • .• • • ••••• • • • • •••••••••••••••• NO i . *. *. Jl .* . . •• GETVIS A REA •• NO • •••• J2 •••••••••• * • • END or DU!!P • • X •• INITIALIZED •••••••••• X. ADDR = Gllrns ••••• •• *. .• • n:s •• "ABBA ADDB • * .. ' " • ••••••••••••••••• i ••••• K 1•••••••••• • END Of DU~P • ADVR = IUD 01' '" • • ·.................. ··........ • USt:D GITY IS AREA ADDR • • :X •••••••••••••••••••••••••••••••••••• : .~ • All ,. Charts ~5~ Chart EG. IJBSDUMP - Dump Monitor (Part 6 of 13) (Refer to ~hart 13) ... ···· .. ·.. ··············· .... ············x .* ..... •. ..· ·EI' • • eli· C2 •• *. ••• * •. * • .....01.......... IICREII •• •.. • •••••••••••••••••• *. * . . * .* • • •* .•.i YES •• ..... t:l............ .. . •• · •• PIIASE ADDR •• YES x • > FAILURE •••••• . . . . : •• lDDR •• • .* * •• * 1'2 .* • !l0 .•.i •• *. .* • "~X =. lDDR ZltD OF SYA "lXPND i :1 . . . . . . . . . . . . . . . . . . . . . . . . : I ••• B.. .*-. *. .... . NO . - IIAX 8NTRI •• : , . . . . . . . . . . . . POUIID •••• ••••••••••••••••• * •• * • .* • • • .• YES ······G2.·······... i 1111 IDDR = • IStGIIi 01' THIS • PH1SE • i .* ·................... *. .. .!:........... .. . :TJ!STIIAl H2 •• *. •• PHASE ADD II • ..... > IIAX ADDR •• X *. • .. *. *.. * • Gil .•.i •• *. 110 •• PULUR! 111 •• . . . ••• THIS PHlSE •• • • SAVE THIS SOL • ..... BIITRI AS • X • 11111 ADDR • ·• YES US ······P. ·•········. ·.................. CIILC2 *. NO •• PUSE ADDR •• .................... > IIIN ADDR •• X·. -. MO .IIlM lDDB 3 8MD • • OP THIS PH1Sil • •• *. * .• * ·······D. ••••••••••.. ................. **. . -* .• E.2 •. !IE~III. •• POIlT TO NEXT •* 110 •• .* PHlSI!: II *. •• • ENTRI IN SOL . . . . . . . . . . . . . SYI 1'01 THIS •• • • •• EIIT111 •• • .* • i X • • • i !l0 • •• ••••••••••••••••••• IBS .IIAX lDDR = £110 • YES •• UILURB II •• . . . . . . .. ••• OF rHIS PHASE .X.......... THIS PHASE •• 02 .. • .* NO x *. .* • us .* *.• * ····.·8. ·.·.····.·. i • IILM ADDB .. THIS. • PHlS!! lDDBJ!SS • • Iii Sf. • ·.................. i i : ••••J ............ : : •••• J2 ••••••••• : .................... • • • • • J!) • • • • • • • • • • .-.-.-.-. .-.-.-.-* D~:~TIg~u~nD *OUIIPAR : 81' • ·.................. ................... ..... .................................... ,: ... ·····K . ••··••••·•. . ...-.-.-.-.-.-.-.-* .II&X lPDB = END • • 01' THIS PHlSI! • III SY. • • • • SAVE THIS SDL • . . . . . IlIlTRI AS 1111 • ADDR • • : : .......... X: i • 111· .palIT EP. ..... . ·.................. • SPACt! l DOS/VSE Logical Transients : ·lId • i 152 • • • • • ••••••••••••••••• .....C).......... • *. . ENTRY •• ns. .* .* i •• II SOL *. • 11111 .DDR 3 PHASE IIDDR IN SY' • • •••••••••••••••••••••••• •X:x .* •• LAST • ••••• !)• • • • • • • • • • *. ······8...·········. ·.................. C" ... .. i • 1c'0INT TO. PIRS'l • : E1THI IN SOL : NEXTENT •• **. ••. ** • ·····*B2·······**·. ·.................. SVAOIIP I.. •• 11111 EIITRI •• 110 • 11111 ADDR '" • •• i'OUMD . . . . . . . . . . X.SVA START .DDR • LIIIl • .OSYADlIl' Clart EH. IJBSDUMP - Dump Monitor (Part 1 of 13) (Refer to Chart 13) ••••• RlrlBllICI!S • .TO EHB1: •• :·ErCIl. IGJ!'o 1I0SVlOIIP •* •• · i Bl ••• •• *. •• NO •• 01''1'1011 00111' •••••• *. *. .* * .. * • us cl .•.i .* •• .* *. •• •• SISTIII •• 110 • GETfIS •••• 1 • • IIIITIlLlZEO· *. i ..... . .* *. . * ... • IES ·EL • • Ill· OUIIPINO i ·····01· ••••••• • • • PRIIIT Ep. ·.................. *-*-*_*_._._*_*_e • SPACE A LIllI ··.......... • • Ell • ······E. ••••······. ·................. i *-*-*-*-*-.-*-*-* • pBIIIT TITLE roa. • pBEpABE TO • .. pROCI!!SS MEXT • • !'o12-BtTE ABEl • ................. • ·StSTEIl GETVIS • • ABIA • i ·····Pl•... ··.·.. • 0UlIpAB i SI!!EJ:PIIOB ·····El •••••••••• • pRIIIT Ep. Pia Ep. .•.i .* ..aLL *-*-*-*-*-*-*-*-* •• -. GUVIS •• NO •• lBU TI!!STEO •••••• • OUIIP ANCHOR • • TABLE AND BIT • • plTTIBII • ................. *. *. .* ··.......... ... * .• * .* i • rls • HI • i · ·................. . .... ··...... . · . ·.................. ·····G1·.·i .•·.·.·. Gia •• • •••• G!'o •••••••••• •••• .DUlIl'lB CP. •• alit <El •• liES .-.-.-.-.-.-.-.-• •• LIPT TO DUIIP •••••••••• 1. DUlIp rlill • •• •• • ARn (5) LIl:PT • • POINt' TO BIGlII • or SISTEII • • • GE'l'US ABU • *..* *..* • .....:x..............•...•..... : x • HI •• x. .·. .X ·EL • • I .. • TsIT ··.··Hl •••••••••• • • • !'o12-BUI ABU ALLOClTEO • • ••••••••••••••••• 110 DUlIpUD • • • .•.i J1 •• • •••• J2 •••••••••• •• lNII •• • • •• PBIYlOOS •• 110 • POIIIT TO MEXT • •• ABEl' •••••••••• X. !'>ll-BYTE ARlll • •• TO PBIIIT •• • • ** . . ** .. • ••••••••••••••••••• YES tOllpIT i ·····Kl···.······ .DOIIPAR Ep. *-.-*-*-.-*-*-*-* • DUIIP THE USID • • ~'2-Bl!TE lREaS • • JUST CHECKBD • ................. :1 ........................ : .... ··...... I • III • Charts 153 Chart EJ. IJBSDUftP - Dump ftonitor (Part 8 of 13) (Refer to Chart 13) ..... ... -.* •• RB1'EREIICIS • *'1'0 EJll: •• :-EK1'2. EltH2 . ·El • • G2· ······A ,••••••••••. ·.................... i DUIIPCR • • • . INITIALIZE PIRTS or IlUIIPCA • • ... i ·····111 ••••••.• •• *-.-e-*-e-*·*-.-. .0nJT. • PRIIIT BP. ·.................. • • OPEl OUTPUT rILl • • i ·····C1*···.· •••• ·PIIIII'f p,p. *-.-*-*-.-*-*-*-* SKIP to IIEW PAGE • • • • ................. • * i ·····D1·.· •• ••••• • PRRGS ER* e·e· •• e-.-_ .•• _.e ·.................. • DUIIP CONTROL • REGIS'fIBS i SVADUIIP • • .•• •* •. A3 ••• •• StA :f0 DUIIP *. *. . * - *. .* rES i ·····B).········ . *-.-*-*.*.*-*.*-. .PlJU'l' BP. ·................. • SKIP TO IIEW PIG!! '0.* •• •••• .* BP. ·.................. • • PRINT SVA TITLE *. E1 •• ·.-.................. • BP • DUIIP Sfl *. * ••• .* •• • !ES ·····Pl ..i ·..·.•·· *-.-e.*-.-*.*-.-* .PRIIIT EP. ·.................. • • PRIII'l' SUPYH 'tITLE • • i ·····G1·.··.····· .DUIIPlR RP. *-.-*·*-.-.·*-e-. -.................. • - DUIIP SUPERVISOR • • : .•...•..•. x:x ..... ·EIt • • *II~. - SIIDUIIP 154 . * • •• •• DOS/VSE Logical Transients * .....:x .......... : - 81· •. • • i ·····Dl······.· .. *-*-*-*-*-.-.-*-* .OUIIPU ·I!L • SUP'II TO DUIIP • i ··.··Cl·········· .-*-e-*·*-.-*-*-. .PUII1' x .•. i -. 10 •••••• .* TIIOIDUIIP Chart EK,. IJBSDUMP - Dump Monitor (Part 9 of 13) (Refer to Chart 13) ••• * *••• *. .. A" • * * i Pll'EPA ••• : •••• A ) ••••••••• : • ..... -... * • .. i 1:12 ••• •• i ·····B3 •• ·.•.•••• • -*-*-*-*-*-*-.-$ ·................... .. • PRINT NO.. SDAID -. ••• .... HUPPER TO •• DUIIP ." *. *. .. II". SKIP • .* * •. * • us to III!l1 PAG! • • *-*-*-*.*-*.*-*.*• i ····*C3···.·· .••• *-*-*-*-*-*-* .*-* ••• * ............. . •••••••••••••• ** • i PUPA .. .. • .. <;2... • .. •• .. ••• • •"RIN'r llP. • WRITE SDlID .. BurfER 'lULl! * AND ADDRESS • • • .. • i . X NO.* 02 .* • ...... •• .*. -. *. SDAID BOFFEll ACTIVE *. .• • "'REGS .* * .... .. YES * ·.................. * COIISOLB • i .···*C'I··*···•••• .-.-.-.-.-.-*-.-* .*................ *PRINT £1''' *WaLT! fBII SAllE. ft BSS6GB 011 • OU TpUT DJ::V ICE • .. I!M* AIID Fpd'S .DOIIPAR IlUlIp SOlID Ill'. • DUIIP • * PARTITION * •*... *- ••••••••••••• * • ................. /lOFP!!!'! :.......... x: :x ........................ : i PHIlUIII1 .. .... i *····B ..WRITH •••••• •• •• • • ~A aUTIOI MO'E • • AVAII.&BLE ON • i ·····Kl·······.·. *-*-*-*-*-*-*-*-• BP* ... • 110 .................* : i NO.* • • • .* ** . . ** •• ·····U1.··i .....•. .·····E2·········· -.-.-.-.- ....- .. -.* * * .. EITRAc'r pARTL'UOH'S BOUHDAlIlES •. PARTITION •• ACTUE •• ..* -*-*-*-*-. -*-*-* DUlIp GI1i1'S ... ." *DUIIPAR E" • .EXTRAc'r •• *. ns •• X.......... ••••••••••••••••••• ·EJ • Gl- SIlIIUII!' REQUEST. ADDRESS .. VALIDAUOII" •• 14 F2 .* •• 6 lIlY •• ... I1ABTITION •• ... 'ro DUlIp •• *. •• *i •• *.. * • • .t::J • *.11* * SVADUII1> .• YES :x ........................ : • X UpOATt:1I ····*G2·**·.··.·* ** * IIOUT TO HEX'!: • PlS AIIU BUlLO • "IK OF HEX't .x ••• pABTITIOB : .................. : i •* YES.* 82··· * . •• .... .. .. ... ALL ... *. ••PlilTITIONS .* TEStED • * .....i * * •. * * ·BJ .. *A~" * i SVADUlIp •• *. NO •• J2 IS *. CURRENT *. *. "ARTITION *. *.TO .. .. UUftp • • .• NO • * .* .... YES *~.* ·..... * • A4 ** Charts 155 Chart EL .. ~3) IJBSDUMP - Dump Monitor (Part 10 of (Reier to Chart 13) ....*EJ * * *D~* i TIIOADUIIP • *. 81 .* • DUIIP *. TWO *. *. *. BE'fIlEEN*. IiO * •••• ADD~ESSES. *. *. *' ;~: .• ....!..... : I!" : i C1 . *. ... .* • *START *. ADDR *. NO *.IN SUPt:RVLSOR.* •••• *. *. .* .* i ..... * .. * -fES *t:1I .. .. *II!* * i ·····D1·········· *-*-*-*-*-*-*-*-* .PRINT * t'AR'fl REFER!!IiCRS TO ELE14: EBK2, ERCI EUG", EII!!q ~IIE5. EPflq EI'* PRINT' sup' ..... * • * ................. : TITLE : . .. .. ** * .... * * ··.··'1· ....····· .-*-*-*-*-.-*-*-* ................. i ..... * i CUIIPSUP *DUIIPAR EP* "DUIIP UP TO END * : OF SUPEBVISOR : *EII * B'* * * * PARTI ••• * ..··.r4········.. DOS/VSE Logical Transients I *PBIIIT t:P* $-*-$-*-*-.-*-*-* * CLOSE OUTPUT fILE * * *• .................• PDUD ** • 156 ..*.X ••• DU8PENDI ·.··GiI••i ·•••••• * Sfctt ............... RETURN TO SUPt:BYISOB • * Chart EM,. IJBSDUMP - D~mp Monitor (Part 11 of 13) (Refer to Chart ~3) ····as.·.······.. ··............... • ·····IEFIIIE.CIS • ·1'0 EIIS1' •• :·ELC1, ILFt · i paRTl •• • Sl ••• •• ::EALs'~~AGI·:.~? •• TO DUlIl' •• *. * . . * .* • us I: pnll~~ :n~D ••••••••••••••••••••••••••••••• X • paRTIrIOI i i C3 • J. PAt>Kl'OOL D1 *. • •••• 02 •••••••••• •••• .pAIUV III. •• ALL *. IES *.*-*-*-*-* .•- •• * • •• pAITI1'IOIS •••••••••• X. LUlIp PIRT 01 ••••••• •• TESTED •• • ALL OF THE • X •••• • PAGE POOL • ••••••••••••••••• • NO *-.-*-*-*-*-*-*-* • GET plBTITIOII • ·.................. BOONDAIIIES • .•.i .* Fl·. *. . * *. .* • IES · . i • ····Gl·········· • ISSUE A IIESSAGE. • IF PIRTITIOII • • NOT ACTIVE • ·.................. ... i .* ill·. *. • 110 •• •• • ••••• palTITION •• I •• ACTIVE •• *. * .. * ••••••••••••••••••• NO i ..-*-*-*-.-.-.-.-. ····OJ·········· • BIT RlCT 11'. .* ·····0"·····.·... i .PRlIIT EP. *-.-•. *-*-•• * ••• * • PUNr TI'l'LI rOI • ·.................. ·................. • CIT pAIITI1'IOI • • BOOIIDAIIES • ... E3 •• •• ABEA •• • NO.. TO DUlIp •• ••••• ••• IN 1'1115 •• X •• pARTIllOI •• *. * .. * .* • IES .····F3·········· i • 10.. IREI 1'0 •• •• •••• DOIIP IN 1'1115 •• X •• pIRTITION •• *. • •••• C••••••••••• i i ·····El·········· • EXTRACT E1'. • ................. DSV' •• ** . .** .. · .••....... x: * .. * ••• • ISSUE I • !lESS AGE IF • PlIlITITION 1101' • ACTIVE • • • • ·.................. .* GJ .•.i •• *. • 10 •• •• • ••••• PAITI'UOI •• X •• ACTIV!! •• *. * ..• • .* IRS • SYA • i ·····EII···••••••• .0UlIplB IP • .-.-•. *-*-.-.-•.•* • DUlIp SY, ••• •• 0UlIp pAliTITION • • REGISTI!BS AND • • S'l'OIAGE • *** •••••••••••••• SliP 'f0 IBM paGE • : i ·····CS·· •••••••• .PREGS II. .-.-•• *-*-*-*-*-* .·................ • 1'1111' • .paUITIOIL alGS • i pARIIV ••• DS •• •• IIHOLI •• •• ABEl •• 110 •• I I TillS •• _ ••• ·.l'AB'l'ITIOII.· •. .* * •• * • US ·····15·.·.· .••.• .-.-.-.-.-.-.-.-. i .OUII'18 11'. ·.................. ·.................. ..... .••....1:• ....E.· . • STORIGE ARU • • DUlIp liD OP • .RIQUIlSTIIIl Alii • i i ·EL • ·BL • DOllPEIID OUIIPENU •••••Q!)•••••••••• .-.-*-•. *-.-* •• -. ·.................. .OUII1'a8 11'. . .OUIIP UP 'to BID ••••• • OF l'aRTITIOIL • i .··.·11)·····.···· .IIEGPAli 1111. · .-*-.-.-.-.-.-.-* I '• •• * .•. • : •••• .PIIIIT 81'. •• ILL •• liS .-.-.-.-.-.-.-.-. •• plIRTITIONS •••••••••• , . SKIP TO 11M • •• TIST!!I) •• • paci • ·.................. : 137011' .PRIIT : • • • ••••••••••••••••• ·····Cl • PO III l' ••• TO ••••••• NEXT • • PIS liD BUILD • • KEY OP NEXT • • PIITITIOII • • i ·····8!)·········· *.* ••-*-*-. ¥LOOP • •••• s3 •••••••••• • POIIT 1'0 IEIT • •• UGPlR i 1I1'UII • ····tl~········· 'ro CALLIII • ·................ • • • I!!S i ••••• J , •••••••••• • IEGpAI Ell. ·•••••*-*-*-*-*.*-*-*-* DUlIp PARTITION. ................. • REGISTEIS AND • • STORlG!! • Charts 157 Chart EN. IJBSDUMP - Dump Monitor (Part 12 of 13) (Reier to Chart 13) ••••• A ............ ·................ • PRIlGS ...... .. ... .. • : IlJ : ;* • • • HI> •• ••• ••• •* III 'to PSII *. *. .•.i i •• -.-. DUIIP •• .* * •• * • u.s .• i ..·..····. -.-.-_.-.-----. ······Cl· ~OlYl!ltl'l ............. -.. . : . BII. DOlIP PSI! : 63 •• •• CONTROl. • • •0 •• REGS fO DU~P •••••• *. *. .* * .•. *ns .* ·····Cl····. ··•·• ··................... i • J<;.l'tIiACl' • COII'l'ROL RIo:I>;:; • • •••••••••••.1. i PGRmS .• Dl ••• •• *. 10 •• aPla·s AID •• •••••• FP.·S 1'0 DUIIP •• *. *. .* .* *•. • *U:s .....·....·· .·····8 -.----.-----. i BII. • CONYBKl' i ··· .. Dj·········· .-----.--.-*-*-*-• ..:onltli'r Ell. ·.................. • j)"Ill" COl/'tlWJ. • ~EGS \I - 1 • • i • • • • • Io:j• • • • • • • • • • .CONV'lt8T 1111 • *-*-*---*-.-*-*- •• • I>UIIP conROJ. ·.................. ................. , ....... _.. ...... -.-.-_.-.----. ·.................. • • ·................ WIl'S •• IN SfS'!'. •• ····GJ·········.. ··................ DUIII' aPR'S 0 - 1 • • • • : liEGl> d - BII. IIUIIP aPII's 8 - 1!> • • ... i G1 • I .* •• If 0 •••••• *. *. •• *. .* .- *•• ·Its ...-.-.---.-----··Ii ....•....·• .··................. .. i *COJViOBT • DUll P PPII'S 8.11. • : :x ••••.•...• : i *Con&1I'l' 1!'> i • ••• , .'I••••••••• • • IU1'U II II 1'0 CAI.J.tllI • connt • • • .................. ··............... . • CO. ');11 l' 1 • :, .......... . i ·•••••dJ*......... . .•.... i . ·.................. ................... Ii . . . . . . . . . . . . • S&1' IIUIIIII::" 01' • • UIIl'ACIl AliI) • 11011.05 1'0 .••••••••• 1. 'lIUISI.It.:rls 011 . . . • • COII't:S't 1'0 II • • WOIID 0' 1IA'l'A • :••••.•..•• xi •••••• ••••• • .. .... .. i • 8l • J't *. • • • 158 DOS/VSE Logical Transients . •• ••·I!OBt .0 ..115 •• U;:> • •• J!O coaVk;8'l' ..•.KJ*........ •. .* .•••••• .* * ..• • 110 i lS... . . .................. .1'R!II1' •• . . ·11 ..•••••••••• RI:."fUHII. . - - . - . - . - . -..- . - . 'lO CALLEIi .X •••••••••• Ii,Url ':Uluu!Otj'r • . . . 011111.' .. 1.11> .. ............... IJBSDUMP - Dump Monitor (Part 13 of 13) (Reter to Chart 13) Chart EP. • ••• *A 1 . . . . . . . . . .. : ............... PRINt : '" : i 111 • •••• 112.......... CO~ftANU *..* •• •• NO .* ........ 83 .. ••••••••••••••••• YES *IJBDI'IPIC I'Y. • PERI'ORI'! • REQUESTED 1/0 • ................. • * i .... * • .... : B4 •• .-. •• *. *..* *..* • • • •. * ·····c1 ...i ·.·.· .. *-*-*-*-*-*-*-*-* • • .*. .1JIIDI'!PIO 1'1. •••• •• DUIIP .-.-.-.-.-.-.-.-. •• •• rES •• CANCELLED I ES X. PERl'O~ft ••••••• •• x*. ANY PROIIL!" •••••••••• X•• 8Y OPEflATOR •••••• • REQUESTED 1/0 • •• •• •• •• .. * •. * * 8J : i . *. •• •••• •• *. DO!!P '". ..... * •• * NO i ····C3········· RETURN TO CALLER ................ *. • : • 110 i ····c. . ·····.··. * • SVC2 RETURN TO SUPt:RYISOR • • • ............... 113 : ...... U2 . . . . . . . . . .. : ............... EXTftAC-r : i ...... £1 •••••••••• • • ...............** DUI'IP1H i ·····Fl·.········ *.*-*-*-.-*-*.*-* * * * ................. *IJ8DIIPlR • Dunp AREA DELIIiITEIl Br REGS 5 ANIl II ES. • .. : •••• E2 ••••••••• : .. • : EXTR1CT PARTITION BOUNDARIES • ................. • i ····P2········· oro • ............... .* .. • RETURN CALLER • • ..!.... : .... BJ : Charts ,159 Chart EQ .• IJBDMPPA - Dump Supervisor control Blocks (Part 1 of 2) ··.... ...... • .... ......... ... ··.......... A2 • • .. All • AJ • .•.i i ··.................. ···12·.···.··.· .·..-.-.-.-.-.-.-.-. ·................... ·····BI••••.••••· ................. ·····112·········· .-.-.-.-.-.-.- .... ................. ................. ................. .·····cI······.··· -.-.-.-.-.-.-.-. ·····C2·.··· •...-.· .-.-.-.-.- ........ ..··.·C)·.·.··· -.-.-.-.-.-.-.-..·. ·····CII···· •••••• .DUI!PIII BR • •••• A I ••••••••• • IJBDIIPPA • i DOI1PCR ER. .PRHEAD *-*-*-.-.-.-•. *-* • PRINT COllllEG • HBADER •. AII,D'ADR • • • i .OUIIPAR ER. i £R. .DUI!PAB • DUIIP PUB • • • • i • DUIIPAB ER • ................. ·····ul •....·.·•• e-e-If-e-._._._._. 112 .. •. DOIIP COli REG • • • : DUIIP PUll OWNER ER. • PRINT SYSCO" • HBADIR • AID ADa • • • ................. i ·····E1 •••....• ·. • : 110.. •• •••• .* PUB2 EIISTS *. *. •• .* •• •• •• ·····B3········.· i ..···£2····.· ... · • DUIIP EXTEIIT BLOCK ER. •-e-If-e-e-.-.-.-. • • DUIIP SYSCOII • • .PRHEAD BR. e-If-e-e-e-.- ..... _. • PBIIIT PUB2 • • HEADER UD AIIR • .• •• •• .* • •• * • IBS l:a. PI1NT BuprBR HKlDUG liD lua • • • ·.................. • • DOI1P SYSPIL BurFER • • :...••...•. x: .......•.•.•. x: i • lB. . . ................. ·., HEITDIB i ·····DII·········· *-*-*-*-111-*-.-••• PRUT UIB READING Ulil lUR • • • • • • ................. POII1T TO KElT nIB i!IITRY • • • .. .•. -. i ••••• EJ.i •••••••• ·.................. ·.................. ·.................. ....... • DUI1PAR •. i • • • ·····D3·········· • • • *. *. .-.-0<-.-.-.-.-.-• lB • • ... RHBAD *.. * • IllS • • ................. • • • •• BurrlH U'TACHED .PRIlZAD i • DOIIP1R All ·····B"·········· .-.-.-*-*-*-. -.-. £8. PBIIT BITEIT • BLOCK HEADIIG • lNU IDR • • • • .* i i *-*-.-*-.-.-*-*-* PDIB •• 110 •••••• *••• • ns .pRHEAD *. •• .• .- .0< e. : •••••••••• X: _i i .PRREAD *. ER. • PRIIT PUB • ONIII!8 HEADES • AIID ADR A3 NO •• EUnT •••••• BLOCK •• EIISTS i .PBHEAU ·.................. • • .* ·.-*-.-*-.-.-.-.-. .DOIIPIR • Ea. DUIIP DIS E" • ·· i *. BS •• 110 •• ILL •• ••• uIB'S •• TIISTBD .* •• •• •• .. * •• * • IBS .0< ....• .. . •• .* .• T1SK * . ••••••• ••0 ......... O.. IS loTI •. .* * ..• • YIS .- •• GJ • ······P)·········. .. ·····F"·········· .. ·.................. ·.................. ·.................. ................. : ...•...... x: .... ··...... ... •.•.• G2····· •.·.· ·····GII········ .. •-.-*-.-.-*-.-•. *-*-.-.-•.*-.-.-• · .. .. ·.................. ................... · ··...... ·····H2··· ..•... ·····HJ·········· ._._III_e_._. __ .. _.· ·............•.... . ................. ·····P1·••••••••• i •e ..... PRREAD ER. e.e-_ ..... __ ._. • PRINT PUB • • HEADER AND ADR • .·····P2········.· -.-.-.-.-.- ....-. i i ga. ·UUIIPAB DUIIP PU82 POIIIT to PIRST DIB • • • • • • i .l>RIiIID i ••••• p~ •••••••••• *-.-.-.-.-.-*.*-. BR. • • • PRIIT pIB IIBlDIIiG UD ~DR • • • • • • PUHT LTA HEADIHI; lID ADB l:l • i i IIOpUB2 .PRHEAD ER. * * pltINT LOB • • Ht:ADING AND ADR. •• i *• G) HilS •• •• DIB AM •• NO • •• X.. I'!ITEIISIOH •••••• *. •••• .DUIIPlB • .- DUIIP PIB • • • ................. i • U. .PBRIIlD *-.-*-*-*-.-.-••• G~ ER. • .. .i •• .. .. •. . * .... IllS •••• OPT!ull •••• ••• ••• DUIIP •• • • .• ·;£5 • IIU • G3 • i .UUIIPlR : i ER. DUIIP LU8 : &a* .PRRBAD e- •.-.-.-.-.-.-.-. • PBUT DIB I'!"- • • 'l:EN51011 HEIDlIG. • AND lliR • i. ·····tl5·········· .IJIIDIIPAB IRe-e-.-.-e-.-.-.-. ·.................. : DUIIP LTA : .•••••••••• • 1. .• . .1 ••••••••••• i ·····J2·········· .PRKEAD Ell. • -.-*-*-.-*-.-.-* • PRlHT JIB • :HllAilING AND Ailll: ................. i ·.··*K2.·.· ••• ·.· -e-.-.-.-._._._. ·................... *IJUIIPAB : . ER. IlUI'IP JIll . .DOI'IPAa .. : PRINT DIB EXTBII5!Oll • : ................. ··•........A"i ..• : i 160 . lB • -.-.-.-~-.-.-.- ·.... ..... : i ••••• JJ •••••••••• Al : DOS/VSE Logical Transients • i ····J5··.······ IIErU81 ClLLU • : ............... :ro Chart ER .• IJBDKPPA - DUMP Supervisor Control Blocks (Part 2 of 2) ·•••••••••.• • II' • ····A1 •••••••••. ·•••••••••••••••• • • PRRIAD .. lIS.' ••. • *. ' . • i B1··· •• :tK BLOCK OU'fput *. -... -. .* '. .• . ' • 110 ..... .. • • SUCI II LUB • • •• AD ,0"111 or D 'fA • • • • LII • ••••••••••••••••••• ................. i .'. .... B2 .' '. '. '. .... .. .. OPtIOI DUIIP • 10 ••••• c1.i •••••••• 'PRIIIT SR' _ _.•. _- _.- Du·rul."'.i........ ••••......• •• .···A2 • IIUIlt'l1 •• .' • ·. ··B).··.··.... ............... •• 115 • •••••••••• X. II'fUI. to CALL1!8 • • • .* .'.i '. MO.. i ••••• • •• CIi •• •••••••• •••• IL>IIIIUI TO • • DUIP , • • PABUlL LIII • •• • •••••••••••••••••• :.......... ,: • • i ·····D'·········· o. : t. • • : i _ _ 'PUIT • • BLOCK • ....'i . i ................. ................. •• 1I0lB '. *•' . IBS .' ' . TO PIIII'1' *. t. .• •••••• •• i -•• * • 110 ••••• r1 •••••••••• 'PRII'f BR' • nut conlOL • ·•........" ..• • BLOCK HIUIIG • • UD aDR • :.......... ,: i ····G. •••••••·•• • ·................ RlTURI TO CALLIR &I' 'LIII • •• PI1I1' or conlOL • • • ••••••••••••••••••• :x •••.••.••. : ·.··G1••i ••••••• • • 101 ~nf' ...... ,......... ... ..... _._ ..-.. .................. i put PUT II 10 II "IADUG CUn.8T B lI0RDS ·................. •• -... • us ·····111·.········ • • • • -. -..... •• • us '111 "BlDtlG.' • • • •• t. :·····!~·'0IlD3a.D~ ••• •' PAltl •• 10 '.10 'f0 BII PUT •••••• *. .'.i LISS .i•• •• u •• ••••••••••••••••••• D1 ._ Bli • • • •••• 1;5•••••••••• ..•............. ·................ ...•.K............ • • •• • • BBTURI 'f0 CALLBB • IJIIDIIPIO • • • .X.......... • '. PRINI' LIME 011 SISLS'1' 10.' ••••••••••••••••••. .'. .···Jl·········.X...... .... .... JII • REI'OIN ' 1 ' 0 ' • LOCAL CALLER 10 . ' •.................. • '. All P80BLIII '. •• *. *..- .- •• * • us 1 5 .'.'. AlII BLOt:' '. OUTPU'r .' *... *•• .' t .. US : I ••••••••••• I THC • i FA' • -.-............. • • PBlit . i • •••• J!J •••••••••• .-.-.-*-*-.-.-*-. 'lJ IlDIIPIC PP' ................. ....... IIIUtl! 211 • • .. al.OCK 011 SISDIlt' • • ....,........... i .•.............• • BErUaN to • • IIXTBRUL CALLER' • Charts 161 Chart ES. IJBDftPAR - Storage Dump Routine (Part 1 of 5) (Refer to Chart 13) ...... "2. . . . . . . . . .. : ............... IJIIDflPAR :.... : '!lI!I'ERBNC!!S : "••• I:~gJ!J, E~~~~ •••• TS','ADDR d2 X ••• *. • •••• 8].......... ." ". • '{OUND IIEGIN " •• LUIIP or •• NO .ADDRESS 'ro IIlnT" LOWER PAGE ••••••••• • • " •• ABI':A COIIPLU'E •••••••••• ," ". ." • 80UNDARY. *. * ... -;8S ... •••• : • ····c2········· ............... RETURN 'ro CALLBR • : .". :* ••• 85•••••••••: *. **.••.- ;ES * VALIDATE i • X". .. .. ••••••••••••••••• Sol :..... : RKfKttENCES • • • • X. TO !!SC7.: ••••• • .ETD!>, EVD4 •••• • EIiDl EU'l : B'J ." ". ADDI! •• NO .PREP1BE TO IlUIIP• YALIDAlION •••••••••• X"THE WHOLE AIiEA ••••• •• REQUESTED.. • AT ONCE • •• .* •• •.................... i C4 ••• •• ... rES ". ••••• EcPS:YSe liDO!!." ..... .. *. *. i ·El' • • Jl2· " rSTE&OR . .. .* *•. * • NO .. ... i 04 ". ". •• PAGE IN ". YES "PIlt,;PAIiE TO DUftP. ". VALID ADDIIESS." •••••••• X" fHIS P1GE " ". SPACE ." " " **.••.** ..•••••••••••••••••.. " NO .....:1.......... : x nyp ... i 114 .". ". "EU " -. IES •• PRt:YIOUS •• '" ••• PAG!! •• •• IlIViLID ." *. .* * •• " NO ····.P4.····....· .................. i .PRINT EW" *-*-*-*-*-*-*-.-* "PRINT • I/tV ALIll • .. .. lDDR SPiCI!' II£SSAGE " • : .......... I: i UN Il : •• **G4 ••••••••• : " . ................. • POINT TO NElT • : PAGE : . i .*.* " "•• ** " • 82 • 362 DOS/VSE Logical Transients .... B!* " PVU.Ill Chart ET. IJBDMPAR' - Storage Dump Routine (Refer t·o Chart ~3) (Part 2 of 5) ..... .. •'ESe,,'• · 82 i '. •••••113.......... ••.••B".......... •....BS........•. ·•••• ..... '.•. ':0 ••••••••••••••••• •••••••••.•••••••• ••••••••••••••••• C2 '. C) '. • •••• C........... . •••• •••• • PIIP1IE TO • • 'STUT lDDR ' . liS • 'EMD lDDR II'. liS '00111' UP iO BID • 1~ SOPIIVlS?= •••••••••• I •.• ~DPIBVISOI •••••••••••• I: or l:iIA STID : ·····CS·· •• •••••• • lion! TO IIXT • • P1BTITIOI • TSTlIlDDB .'. • 'UV1LIO'. 'PRIII! Ill' 'PBIII! Ell' 'PRl.~ III • • 'lDDB SPACE ' . I KS .-.-.-.-.-.-.-.-. .-.-.-.-.-.-.-.-. .-.-.-.-.-.-.-.-• !lESSAGE •••••••••• 1' ••••••••• X'PRII' 'INVALID ••••••••• X' • • • '.. '.TO PRIlIT . ' • SPACE 1 LIIE • • lDDR SPACI' • • SPACB 1 LIIB • '..' • • • IIKSSAGB·' • •• '.x. .....• ••••c:.t .. x B2 • '. .*. .*. •. ** . ••. ** **.. ..•* • 110 •• ••••••••••••••••• • 110 ••..•..•••• x: ·· .. ·····D3····.····· ·................. ·................... .'. .' .. ..... .' ..... · ... ·..... .'. ······r2··········. ·.................. ... .'. : 11'1' i i ·····02·········· • PREPARB TO 'DUlIp UP TO THE • EID or • SOPEBfIsOI • BUILD Kit 01' • 'IIIXT PARUTIOR • • • • ..... 1 ............ . • '. • .. .'.i .. u5 '. .' "HOLI •• 10 '. lUA ...... ' . DUIIPIID . ' *. ..... · ..... ·..... ... .* * ••• • liS i • C2' 'lIs • • C2' BIn .' lLL ' . IES ' . PIRTITIOIIS •••••• ' . 'rESTED . ' '. * . . * • ·.................. i i E2 i • i 10 • f3 • '10 • • B1· i i • • • IXTBlCT I!IBTITIOII'S 1I0UIIDABI!S • • • .• f ) '. *. . • 'GITUS AREA'. 18S. ' . FILLS UP •••• x. ' . plBTItIO •• • *. * .•• .* • NO i i G2 ' • • ' IIEIT ' . • 110.' ADDI TO ' . • •• • ' . DUIIP II fHIS . ' '.plRTITIOI •• *. * .. * • .* 1 2.'.'. ••••••••••••••••••• **. . ** .. i • US :........................ x:x .-J.2 .'. '. -. 110.' RU'li '. ••••••• PA8TITI01I." •• ..... i . *. * •. * • 'EIl , •. *.. * .* • 110 i • .'UD 01' ' . • NO . ' UU fO ' . '1 •••••••• '.DUIIP IN fillS . ' • ' . PIBrITIOI.' TRHL '. YES .....81.......... • PREPAIE TO '00111' UP TO THE • EID or THIS • PART IT 1011 G) .'810 or ' . • . ' lBU TO ' . YES • *.DUlIp IN V1LID •••• X. 'lDDR SPACE.' .* YES ·····H)·········· * PRIPARB TO • ISSUE IIISSAGB • rOR I1VlLID • 1DDB SPACI • • • • ·.................. .·.··J3··.·.···.. i • • • • PREPARE TO 00111' UP ~o IMULlO lDDB SP IC! • • • • ·.................. '.B ~ • ••••• 11.1..........• • PVALID .i'. '. 11. 2 .*-. 'PREPIRE TO DUIIP' NO . ' PABrITION ' . • UP TO GETVIS 'X . . . . . . . . ' . GKTYIS HEI . ' • lREl' ' . III USE . ' ..•••••••••••••••••• ** . .* •. * • :........................ x: YES . .... .~ : .... F3 : .'.i .* K3BEGIN' • ' . .'OF ABEl TO ' . • IES. *.DUlIl' IN VALID . . . . I. .AVDI Sp·ACE. *. * •• * .* * ..... ·· .. .. • NO .*i •• * XpVALID *EU • • , Bl* III • * ••• Charts 16,j IJBDMPlR - storage Dump Routine (Part 3 of 5) (Refec to Chart 13) Chart EU,. ••••• RIlFIlRINCIlS • .TO IU01: .•.:·ns~: Ug i p,aLID 01 ••• •• . *.~ •• 2K SLOCKS •• r IS .* •• TO OE IIRITTIII •••••••••• *. *..* .* X.. *. * .. * • NO .* •• .. 40.. *. 10· ct .•.i •• *. . * ••• •• *. *..* * •• * OLOCKPUT • •••• 0] •••••••••• • • I· • •• 110 .1I0YE PAGI 111.,0 • •••••• •••• 1. OUrPU! BUFFIlI • .* • • ••••••••••••••••• • US i .* .* i ·····C2·········· .PRINT JIll. -. •• FIRS! LIME *. S2 •• IISSGS IN SUFFIR •• • YES e-*-*-*-*-e-*-*-* . .WRITE 21( BLOCK •••• • 1. ................. .CONTAIIUG THI • • IIESSAGES • .•.i .... • . ................. • : NO i .• lCIlS • II&KI LIRE ADDR • • 011 A 32-BITI • • BOUIIDAII • •• •• TO DUIIP •• *..* * •• * • •••• G2.* •••••••• .. • • • ..... ~:g~II~Ag~ ~~ ~=g : • OF PABTITION • ••••••••••••••••• i : •••• H 1••••••••• : ·................... DUIIP UP TO END OF'IIIEII • • : x. ~ •••••••.•••••••••••••• : GE'fD!T i : •••• J 1 ••••••••• : ·.................. ..... .... • COIIPUTI • • NUIIDIlR OP 1I0RDS. • TO DUIIP • i ·EY • • 111 • TIIORD:; 164 .* * •• * • 110 ... • IES • • *• TSUDDR i ••• •• ·IlS • • 82· ·.................. Gl .•.i i ..... : • • .* *. • :.L~nT~~~g, .:.~? EJ .* •• lIlT *. : ......... .1: SETnL PO liT TO NIIT • PAGE : PAGE •• ••• ••• INVALIDATED •• .lDDR SPACI •• i ••••• r 1 •••••••••• TO CLUI IN FIRST LUE i ·····Dl·········· .* :cgpPgUI:g¥~n .IIRnl 2K BLOCK • III Tln'a~ISKI : ·· ·····.1,···..·..·.. ·.................. • • ·····C3·········· .PRII! 1111 • : Dl •• • •• FIRST •• liES •• LIIIE 01 A •• •• •••• 32-BITE •• •• BOUNDARY •• *. .-.-.-.-.-.-.-.-. ................. DOS/VSE Logical Transients IJBDMPAR - Storage Dump Routine (Part 4 of 5) (Refer to Chart 13) Chart EV ... *.* •• ·.. • ·ED • • Jl· : B1 • oo. ..···64 ..i ··...... :~~::!*-.-*-*-~~: •• .* *. • *8 WORDS OR oo. NO • • xoo. LESS TO DUIII' • * •••••••••••••••••• *. *. *•••• • 84 : • •• * i TWORDS .... * .* .... : 81 : i *PREPARE TO DUIIP* : PARTIAL LINE : * * ................. C2 •* .*. oo. .." *. . * * YES ...CONVERT AOllR 01'X NO • -CURR LINE= *. YES • *X •••••••• *.PREVIOUS LINE.* •••••••••••••••••••••••••••••••• * DATA IN LINE • TO HEX •• ••••••••••••••••••• i : •••• g 1 ••••••• i **. ••.. ** POIllT TO NEX'r • 12 BUES : • ·.................. ... : i i •••.. D1.......... D2 .t *. ....*-. STORES * ······C4········.·. :TEHD1 -. NO .* PREVIOUS •• •••• oo. LINE WAS •* .EQUAL LINE •• *. LIM:: • ...•....... x: i TSAilE : •••• c , ••••••••• : TH~ .PRINT * * ................. • * .* * .. • *ns •• ... D4 •• *. *. * •• * * **: E4 .* *. * * ................. .* i ..... - NO .*.i * . . * PAGE •• *CONVERT 8 lIORDS* * OR LESS TO * * PRINTIBLJ! REX. *. •• LAST LINE oo. XES DU/lPEIl • * •••• *. *ES • * .C~* EXIT *. OR *. XES PARTITION • * •••• *.COIIPLETE •• *. * .• * * ..... .* i NO . *IIS * •• B~* ·····F1·········· x :....,,, ......... : .................* ................. TSTADDR i • REPLlCII * • NON-PRINTABLE * .. CHARACTIIRS BY .. .. BLAIKS * .SUBTRlCT 1:1 FROII* * IIORD COUIT TO • : UUIIP : • i i ••• G1 .* SWTCHOFF *. *. ... ."'. G2 *.*** • : *. * . •• FIRST OR •• X R S . " ' •• NO *. LAST LINE X*. FIRST LINE .* •••• •. **.. . . .• .* .•...... ... X·. "' NO i *. *. · *. *. * ..• * •• 81 : .* * XES H1 •. ... ALL WORDS ... NO • *. EQUAL IN LINE. * •••••• .* *..* * •• * .... .• i : •••• H2 ••••••••• : * : SLARK BEGIN OF LIME • : *•••••••••• *.** •••• XES :X .••••••••• : i ••••• J 1•••••••••• • PUT 'SAllE' IN • .. THI! LINK AND .. • CLEAR RJ!ST OP .. LIRE * * * • ................. : x•••••••••••••••••••••••• : i SHUT ••••• K 1•••••••••• * ..* .. •* • CO"PLETE LIM! * * EDITING • ................. ....i • ** *.... * • BII Charts ~o5 Chart EW. IJBDMPAR - Storage Dump Routine (Part 5 of 5) (Refer to Chart 13) ··................. ••• *,1·*.*****. • . PRINT • i •• 81 . *. *. ••• *.82 •••••••••• *. .-.-*-.-.-.-*-.-. 2K •• .IJIICIIPIC Pl'. •• BLOCK YES •• OUTPUT OR • * •••••••• 1*WRITI! BLOCK OR • .LINE 011 OUTPUT • DOIIP COIIIUND. DEVICE ...* * .• * * BIL * * ••••••••••••••••• 110 i *•• **c 1•••• *.***. FA. *IJBDIIPIO **-*-*-*-.-*-*-*-* WRITE LIIIE 011 * * * • ................. SYSLS1' • :x •.•.•......•.....•••..•• : I TBC ••• • *... D1 *. *. *. YES *. * . . * .* *•. * • ItO ····02········· * •• RETURN CODII=O •••••••••• x. BETURN TO CILLiR .. ••••••••••••••• • i ..... * . *gS • C2* *• EIIT 166 DOS/VSE Logical Transients a IJBDMPIO - System Dump I/O Routine (Part (Refer to Chart 13) Chart FA. of 3) .. **··12·· .. •••••• .. : ............... IJBDI!PIO .* *.• * *. 112 ...i *• *. PRINT IlEO *. * •• * • . .. : "'.•••••• YES .* i: ..... NO ·I'B • • • II~. .* •* •• *. C2 ...i: * PRINT *" *. CLOSE !lEO *. * •. * • .* *.•••••• YES . .. • • • i ..... * NO i ·.....Cq.......... .. .. .:....C5 .: .... C5... •. .. .* *• AVOID RESTORE • YES •• •• OF 3800 CII AT .X •••••••••• &111 PIiOBLEII •• OUIIP E N D . •• •• •••••••••••••••••.. *..* * .... • . NO ·1'8 • ",B~ • CLOSER i ······D'···.··.··.. SBlP : •••• V2 ••••••••• : RE~nf~SI/O ·.................. : • IN DUI!PCA .* E2 .•.i •. *. ... EX '" F2 : .* *. i G2 *. * .... • • '" -. •• . .. . .. : ASSIGNII!!N" • •* *. .• •• 1'3 REPU= 110 OR ENTER • *. tl2 "'. 3800 PRINTeR *. * •• • . .. . .. •• • *• • ..* .. ••••••••••••••••• . *I'B * E~ • •* *. *. RESTREGS ••••••••• ** •••••• E!> : i .pur tIIIE STAI!P • .. IN TITLE ANiI • .FORCE PAGE SKIP. .*................• ..... i .. ·1'8 • .8~. PRIHT .• YES ASSIGN SYSLST POR POIIER PART lTION • • • • ••••••• ** •••••••• YES ..!.*.. i : •••• J2 ••••••••• : USETPRT • SET IRULID • 1. SISLsr RETUEIN • COD! • x ..... •• : i :*.*.H 3••••••••• : •• E~ : "' * ........ NO .... • F4 : r :•••• '4 ••••••••• : YES • NO.* VALrD '" ••• PRINTER lDR • * *. REPLIED •• *. i ... GJ .. .i *. • •• ...... .... ······,s··········. . .... INVLSTS *. **. .. ..* .* •• ...i *. X .PUT PROPER CCII • " X. ADDII IN CCII • : : (GBNIOBliI : ...... * •• ** ............ . NO ... .. I'll '" i .... '" •• ANY PROBLEII • NO •• " ••• "' 1I~~SLnAD • i ··.... . ..... : ... • • • : •••• £5 •• ** ••••• : : EXTRACT PUB DEVICE! TYPE FOR SYSLST YES.. ••••• • • -X-.X: NO ....................... : STOIiEl • •••• E3 ••• ** ••••• WRITE POIiER • • TERIIINATION • x ·· . • ••••••••• ** ••••• : •••• F2 ••••••••• : • •• X. • • ·.... · :........................ x: ... •• SYSTE~ •• YES •••• DU~~W~~l! . . . . . . . . •• PARTN.. • i • SEPRT SET CU 'fO • • STANDAIID SET : • : 1'2 : • ~~O~tA~ggp : ................. ...... .... : i: : C5 : Charts 167 Chart FB,. IJBDMPIO - System Dump I/O Routine (Part 2 of 3) (Refer to Chart 13) ..... ... RBI'I!IU!HCES ••••• TO PIIII!>: • • 1'AII2, I'II.P5 •• : • ·PA • • C2· .. CLOSKB· i B2 ••• •• • i .. HO •• •• • •••• SY SLS'l=.lIlOO •• *. *. .* *•.• • YES NO .* •• ••• ••• .* -. •• PAGB POLL -. *. .* .* •• * .. • IIBS i i : •••• C2 ••••••••• : ·····CS·········· : PgITilOB~t:=' : .CPU.lII ho 1'A4B • .MUII888 U TITLE. ·.................. ·SETPRT=BESTORI! • • 31100 CD STUUS • ·................. : .......... 1: :X ••.•••••••• ·······02··········.. ·................. *-.-.-.-*.*-$-.-. ·······os·········· ................... i OKI!XIT 115 ••••• PBIMT i pc. ·PRU'l1 • SET • • OK UTDRN CODE • • PBUT 'lULB • :.... :REPE8BNCBS: • • • • X. TO PII£2: .... • • . .1'11.1'11, 1'CD1 ··................... BESTRBGS i X .-.-.-.-.-.-.-.-. ··..•.............•.. ·····£2······.··· • RESTORB RBGS ··.··B5·········· .PRIII PC. • • SPACB A LUB • :•• ••.••••• x: ····r2·········. ·............... ·····ps·········· · . ...............•. • • RETURH TO CALLER • • .PBUTl PC. .• . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . *-.-*-•• *.*.*.*-. . PBIN2 CUBBEIT • • ..•·G3·········. ··............... . • NRITER • ······H3·········· .•• • • i • £lCP • ••••••••••••••••••• i ••••• .J]•••••••••• •• ••• WiIT ••• • •••••••••••••••••• .... ......... ,] • • i ...............• • 168 i pRIno i RBTUBI TO CALLER· • • DOS/VSE Logical Transients DUlIl' J,lla • Chart FC. IJBDMPIO - System Dump I/O Routine (Part 3 of 3) (Refer to Chart ~3) • •••• &2 •••••••••• : ............... PRINTl : i PRINT 1 •* B2 ••• •• rOLSK *. .* II} ••• •• • •••• B........... . *. • •• •• NO •• •• IES • POINT TO OIB •• srSLST=PBA •••••••••• I •• SYSLsr=DISK •••••••••• I . rOI S1'SLSr *. *..* .* *. * •. * *..* * .• * • YES .* • 10 • ..... 01..........• • i SDEO. .* •• ·.................. 02J. .. .*-. • S¥Cl0):IIRITIl • LUI 011 ral Dl • • *. • • ••••••••••••••••• ..... .'.UGS US'I. *..*•. * • *. • B2 • •• *. .- ···........01 ... ······0. ·•···.•···. ·.................. *. .* •. * • 110 i i • : .* 110 i ·ra • CII •• IES •• EIrlllT POLL •••••• • • • SlT UTEII" rOLL. us .• •. • aErUII COOl .1 •••••••••• IxrlNT POLL •• • ... i i : •••• C2 ••••••••• : ··.......... • • • • • • • ••••••••••••••••• BOILD Sfl~6~~:~~H • : : .....................•.• 1: ..•.. B2.......... •..••E............ : . .:x. -................................. .. ................. ................ i usn STUTlO • • .RESTOIE PUllrEI. : CCW ~~hi~IU . 2.•. •. •••.. 1........... i •* *. i .IIIITIR PB • .-.-.-.-.-.-.-.-. IlRI~'st~~E 01 : • p . •.••P............ ... •• EIID OP IIEEL •• YBS .1I1CKSPACE O.ER • • WIItIl A raPE •• OR rAPE •••• _ ••••• x* LAST RECORD ••••••••• X. 1I1RK *. *. * •. * • .* .*. .....'5•••••••••• •• • • .B1CKSPACB OVRI • ••••••••• x. 1'APE IIlRK ••••• •• • •• •• • • •• • ••••••••••••••••• ••••••••••••••••• ••••••••••••••••• ··...... 110 i •••• • 01· ····G2·········. ·............... i • • BETURN 1'0 CALLER • • Charts ~6~ IJBDKPIC - DUMP Command I/O Routine (Part , of 5) (Refer to Chart 13) Chart FF. ··.......... • IJ • ••• • •• IJ •• A4 •• • •••• AS •••••••••• •••• •••• .MII1'IS '11. •• OUTPUT •• IllS •• SlIP 1'0 •• lIS • •• ' . . 011 PRII1'IR •••••••••• , . . PAGE IEIDID •••••••••• 1. SlIP 1'0 IEII • *. .* *. .* • PIGB • ··................. ... .. .. • IdBDIiPIC • • 80 IU .* • .SKIP *. *. C1 .*.i •• •• 2K BLOCK *. * .•• .* • .• • to ................. :g~3B II!S i ..... ... :, .......... : ·PH • : ........................ ,: i ·····DS·· ••·••••• _.111-111._._._._._.- PlUTO *. .11111'81 *. * •• * .• ·: .• R~Hf~~ ~~O ... ·PJ .. • B1 • . i ·.···11 •••••••••• CLOSII ·.................. • BUIiPel .PIUT TITLE 01 • .. LIS1'liG • i ..... 110 : • ·······13··········.. ·................. i PUTIISG1 i .111.111-.-.-•.• ····BS··.•··•··· -.-.-• ··................ .. ·IIIlT81 • POl illS SAGE 11 • • 1I0rrlR • .* '3 .•.i •• *. • US :x ..•.•................... : i ··................... • GEMIOIB POB • • OUTPUT DIYXCE • .• G3 .•. •• ·····PS·········· .IIIIrKR r .. . *.*-.-*-*-.-...... • IIRIrE CUIREIr • ................. • DUlIl' LIllI 01 PRIITER • • • : .......... x: i *: • i. *. .• * •• * , ... .. SPICE I LIII • *"ESS1GES 1'0.. 10 •• BE IIRITTEII •••••••••••••••••••••••••••••••••• •• OUT.. I : • • • •G , • • • • • • • • Pl • ·.................. •• •• YES •• CLOSE RBQ •••••• *. TUBT ~~f.: ······cs··.•···•··. ··.................. PUrl/1U •• Pl • DOIP COil ••• • POT PAGI IUIIIII• II 1'lTLE • • • B1 • •* .* .* •••••• NO .•. i .IIUI/BI •• YES i 111 ·····BS··.•.••··· .-.-111.111-.-.-.-.-. .pur *. i *. •• OUTPUT lEO *. •• * .. * • 110 . *. • 110 TO 1111.. 10 •• paGE REQUEST •••••• ~ .• ... ••••••••••••••••••• i :PUTIISG •• . * LIllI *. •• IES •• • •• *. PIIIT lEG •••••••••••••••••••••••••••••••••• . *. .-.-*-.-.-*-.-.-. ** . .* •• * ** . . ** .. i 1f1 i PIIIIT ····A1 •• • •• • ••• *. . •• Gil ••• •• 0llE1IT *. i GS ••• •• .••. •• •• YES. NO •• IIESSILGE •• YES •• DUIIP CliO •• •• IIIIPPER EIIPTY •••••• ••• ••• lLREILDY •• X •••••••••• Cl.CELID III •• ' ••• •• PBIIITED •• ..0pIIlrOR •• *. .* *. • ..... ...* .• * .. * i i * •••• .·..···1111............ ·PH • ·fG • • • l~. i •.6!• · · • SET DUIIP • .CAIICELBD RETURII" : CODl'! : PUTDATA ................. ..... ...... •..• * .• * • YES NO * .. * • 110 ••••• RETOII I REP.,;RENCt:S TO PFG!>: • ..... IIS•••••••••• FGH'. FHD2 • .FHEII, FHII1 .. sIr B1!TUIlIi • : CODt:=O : ·................. : ..........•..............1: i ••••• J ] . . . . . . . . . . . .WRITIR Pl. *-*-*-.-.-.-.-*-. .. WRITE IIESSIlGE • ·.................. ·.....!... • 011 CONSOLE : u 110 DOS/VSE Logical Transients : • .···Js··i .......· ·................ • • RETURII CALLER 'ro • • Chart FG. IJBDMPIC - DUMP Command I/O Routine (Part 2 of (Refer to Chart 13) S~ ..... ... • pp • • Gl· ·····'2·········· ................. i • PUT IIIDEX TO • OUTPUT PUB IN • BG SrSDI1P tUB • POR DUI1P COl1l1l11D • .* B2 .*.i •• • • • • • *. •• TAPE OR •• US •• PRINTER •••••••••• •• OUTPUT •• **.••.** • • IlRB !to .....01.......... i CJ • I!I •• *. ERBIl SET IMULID ................. •* *. •• •• .•.i *. g2 DISK OUTPUT *. •• •• • c~ • ····r1.········. ·............... i 88TOIII TO CALLllR • * · . ·................. . .... . ... ··...... ·····05·········· .-.-.._._._._-.-. ................. .* *•. * ·····C~·········· SUB FILB • • • • ··.... ...... i rES • GS • ·····03·········· .................. PK. .WRITER .. .. .... · . NO .* •.•. •* •• •• CAli TAPE •• BB USBD * . •• • *. *. i YES .•.* 110 •••••• ................. .:.. .... • : i * •• * *IES * • • • F' • IBAO POIlTBI IIICOSO .•.i • • • •• ··.......... i * •• * • rES • Dl. E1 : ·····F5·········· ................. i • SAVE DEVICg • ·CHAIllCTERISTICS· • AND FILl! • : ElTENT tII1ItS : 1 8~ : i D!) •• 1. • • .·POIITIS· • •• TO IIBI'l •• 10 •• FIBI BBCOIO •••••• •• 11 UTBJlT •• •• .e ..... · ·..... .... ·····r2·········· ······F3··········. .* *•• * • TPUL • • • .ASSIGNBD' I1SG S. • READ RBSPONSe: • .•.i BIT81!' LII1tTS -II Bl'lBl *-*-*-*-*-*-*-*-* • WRITE ''lAP!! • IU i OPU •• • CS • • • ..... ··.... .. NO •••••• i • NO X • • DUI1P FILE • .RgTUIII CODE UD* : RESTOIIE REGS : • ... • *•• * x. *. •• •• A PAR'IN •• *. . ··.......... ... •••··.t!1·••••••••• •• . * •* TAPt *. •• NO • •• ISSIGNIlD TO •••• x. • WRITER FK. •••• • -.-.-.-*-*-.-.-* IE:; •• lNY •• • WRITE 'INVALID .X •••••••• PROBLEI1 •• • DUI1I? P I L E ' . •• •• • I1ESSAGE· •••• ••••••••••••••••• .*. **.••• .* • 185 i • OP!!N YTOC IND. • READ FORI1IT 1 • taBU POR • • • 00SDI1PP + ctOSE. • VTOC • Dl • Bl TAPE OUTPUT i ·····c2·········· ................. 02J. .. OUASD ··.... ...... .* X..•••• i .IIBI'I81 Pl. e-e-•• e •••• _._._. SBT 110DI! • POR 7-TRK UD • 81109 taPES • ·................. • • • IIIIRlI'II: POIll1'BIl IBCOID • • • :...................•....•...........•.........•••. x: DS : OPUUD i • • SAVB ... 0 BOlT TIIII : •••• Gs •••••••••: • ..............•.. ..•. • * . , ••• • Of! 181 UU • ··...... • G5· i : •••• 84 ••••••••• : • • • SIHZI! SYSTIlIl (SVC 22) •• tI~ * YES.. .X....... .•. •• * ..•••••••••••••••••• .*. *.•• DOIIP COl1l1l1U) *..*•• * •• •• .* ..... .. · • :..............•....•.•.. x:1 110 ·PF - • uS· olllxn Charts 171 ChaL't FH .• IJBDMP.IC - DUMP Command I/O Routine (RefeL' to Chart 13) (Part 3 of 5) ·····REfERP.NCI'!S • .TO·· PUB1: •• :.FfC1. P1G) · .... •••••.....• x: :PUTDUA •* B1 .~. •• *. •• •• IES •• DISK OUTPUT •••••••••••••••••••••••••••••••••••••••••••••••••••••••••••••••••••••••• *. *. • .* .* 110 i .- ••• Cl *. ..... •• TAPE •• Dl • 110 ...i •• •• • *. * .. * • *. •• .* .* NO i . PK" *-*-*-*-.-*-.-*-* .nITE· 2K BLOCK .. ·.................. • •* ". .* -. D2 .•.i *. • 011 PBA • ••• •• .. .. ·····D . ·········· *-.-*-*-*-*-*-*-. ·.................. *. •• .. ·."...... .. X: G\ • .... Fl • .IIRITER YES • ••••••••••••••••• • 1 • .IIRITE 21t BLOCK • • all DISK • .* ·····E3. . . ··. . . ·• ·.................i CLOSl!D n- "WRITER • OltKltT . - . - . - . -.. - .. - •••• • •••• ••••••• •••• •• •••• •• ••••• X" !lRITE -, fILE .. PULL' IIESSIGI! - i ·····EII·· . ·.····. *-*-.-*-*.*-*-*-. ·.................. ..... .UPDCCHHR • • ··.···1"1·•.....•••. ·................. .. . • POINT TO NIlIT • "21{ BLOCK ON fSA. i ·····F3·········· .. .. • SBl' PILE rULL SWITCH ·.................-..... ... " i ·····Gl·.·•...·•· i • .. • : ................. .* 61 .•.i •• *. • YES • "2K OP DATA •• .. .. .. .. •• •••• LEPT TO BE •• •• WBITTEN •• • NOTPULL NO i ••••• J 1•••••••••• • • • • POINT 8EHIND DATA 1I0VED TO BEGIN or BUPPER • • • • ·.................. i .*.**K 1•••••••••• • LENGTH TO ftOY E • • NEXT TIft!! = • • LENGTH ftOYI!D • • THIS TIllE + H • ·.................. ..... ... · :OKEXIT I ·PF • • G)· ~12 DOS/VSE Logical Transients - ·PJ .. • B1· CLOSER PIC. POINT TO IIEIT • RIlCDRD • i . .* * .• * • 110 i • ftOVIl DUA NOT • WRITTEII THIS • TIftt: TO BEGIN : or BUfPER -. i ". TAPE PULL *. CII YBS • • • ••••••••••••••••••• EITt:IIT FULL •• • 110 • .pp" ·····El............. "II RITER .* •• •• ••••••••••••••••• rllS •• EXTENT PULL •••••••• *. 011 TAPE i DISKB .** •• C2•••••••••• .WRLTt:R Fit • *. Ii:S .-*-*-*-*-*-*-*-* OUTPUT •••••••••• X.!lUrE 2K BLOr.;K • **.. ..•* .* •• TAPEIO ... • pp • .. G5* OK EXIT Chart FJ .. IJBDMPIC - DUMP Command I/O Routine (Refer to Chart 13) ~Part 4 of 5) ··**·Al·.········ CIIISK .WRITER Pt(. *-*.*-*-*-*.*-*-• WRI'rE gOI' • •• • J[. ................. : ••••• RIIPI!RI!IICIIS *TO PJB1: • •• :.PI'01. 1'81'3 i CLOSER IES •• ••• ••• .* *. 81 •• PRINTER OUTPUT *. .* ••• *. . * Cl *. .* • NO ...i •• *. .... .OPOCCHHR • ·.................. .* ••• Cl'ilA •• OUTPUT •••• * .. * • *•••• 02 •••••••••• •• •••• .•• I'IlA .WRITBR I'K. *.•••••••••• rES *-*-.-*-*-*.*-.-* X*WIIITg 211 BLOCK. •• • i ·····C]·········· *-*-*-*-*-*-*-*-* .WRITER • : PK. WBITl! EOP llECOIIO • : ................. i .WRITHR I'K. i ·····D3·········· * • CORPUTE MUR8BR OP *TRiCKS LKFT III • EXTgNT • • * * .COIiT1IIIUG EOI' • * AT l!llD ,. ••••••••••••••••• ·.................. i ·····12·········· .-.-.---.-_..- ..1'''•- i ·····£3·········· *-*-*-*-*-*-*-*-* 110 ·····El·.········ .-.-.._....._..-- :C'UPE RECOIlO 110 i 01 I'll.. *.*-*-*-*-*-*-*-* POINT TO NEIT • • • .* *. .* : ·····83*·i •••.• •·· •• •• •• •• YES • •• DISK OUTPUT •••••••••••••••••••••••••••••••••• *. RECORD • WRITER *WRI'1'ER PII. • ·.................. .211. BLII. W. ONLY. ................. .*................* ·····1'1·········· *-*-.-.-*-*.*-*-* i ·····,2·········· n. *-*-.-*-*-*.*-*-. i ·····P]···.· ..··· *-*-*-*-*-.-*-*-$ .................* ................. • • WRITE TAPE IIIRK i .WRlTER • • I'K. WRITE TAPE IIARK • • • ··.··G1 ..i ••••·••• • WRI'1'ER PK. *.*-*.*-*-*-*-*-* · .................. : .••••••••• x: • • BACKSPACE RECORD • • * WRITE ANOTHER. * EOI' IN IT • • IIBIT!!R * • * READ POINTER RECORD :::~;~, * • • i ••••••• ::: * * READ PO IN 'rE R RECOBIJ *WRITER * * PK • *IIEilBITB POINT!!R. .BEC. TO REPLECT. CURB. OUIIP • .*................ i CONY :··~~;I::;·:~=··: *-*-*-*-*-*-.-*-. * OF TRACKSI .REWRITE POIN"rEB ••••••••• X*IILOCKS LEFT TO ................. * • * * ................. .BEC. TO REPLKCT. • * CURRo OUI!P * . DECIIIAL :•••.......••..•......•••.....••.....•...•.•....... x: i ·····HJ·········· *-*-*-*-.-*-*-*-.* ................. CPIIIU .WRITER * • * PK* WRIT!!' DOI!P COIIPLE'rE' IIESSAGI!! • * i ••••• J] • • • • • • • • • • • RESTORE • *CORTEIITS OF LUB* • EN'fRY POR BG • • srSDI!P POR OUIIP* COI!I!AND • * ................. i •••• *K J •••••••••• • RELEASE * *SYS'rEII POR DUIIP. COIIIIlNll IP IT * * ilAS SIlIZED • ·.................. * ..... : RllTOK x . *pl' • • • H~ • Charts 173 IJBDMPIC - DUMP Command I/O Routine (Part 5 of 5) (Refer to Chart ~3) Chart FK. ····14·········. ·............... ·................ •••• '1 •• • •••• •• : UPDCCHR •• l:i1 .•.i : •••• : *•• * •• • •••••••••••••••••• .•.i ••••• C2 •••••• " ••• • C1 YES ., •• ·~YLI.DBB·· •• "0 : •••• PULL •••••••••••• 1: **.••.** • POll! TO MIlot: ~~t~~D~: :.... ··."··D1••••••••••. i ·.................. • POIBT TO MElT. • CYLIIDER 1M • • EITElI' • ····E1••••••·•• HETua. TO CALLER 174 • • DOS/VSE Logical Transients • ·······cs··········.. ................. "" . ·"···D"·········· • EICP • • WAIt' • i • PUT OUIU.' • COIIIIAMIl, DATB " AIIIl TIllE III : TITLE • • • : i .COllnIT UD PDT. .CPUID III TITLI • i · . ·.".... ........... ·................ • CLUI BDPFIR " • " i ·..............." • • HElDER ··•·····C,,··········..• ................. • :1 .................................... : i • " ··.................... i i .............•.. • •••• '5 •••••••••• ·····ss·········· ................. i • • ••••••••••••••••• YES : : •••• 8" ••••••••• : : •••• 82 ••••••••• : •• •• 110 • POINT TO IIElT " •• TRACK PULL •••••••••• X"KECORD IN TRACK" •••• *. * . . * .* WBITER ····E"·.······.. ·............... • • BETUliN TO CALLER • • i ····Ils··.······ IITUa. • IJBEOJ - Cancel Message writer (Part 1 of 3) (Refer to Chart 13) Chart FP .• ..... ...... : • ....,,......... ............... IJBEOJ *• i •.. .. : ** i CNCLTIIST *SAYB REGISTERS * • • * OF DUftP • • • •••• * : ·.···Cl·······.·· • * i .... i ** ..•••••••••••••••••• • •••• I.S•••••••••• • • **. .•.** NO .. lIO'1 SlllBOI.IC • •••••••••• X"UIIT uaB .UTO • ." * lISG 01'111 • • • ••••••••••••••••• i .. **8" .. ***·*·**· ..•• * .. HESIT 'ClICIL • ·...................... ......... * II LTl' -BIT • .*. .. • ••••••••••••••••• [;2 .•.i *. ..*.. *. ... *•. * .... • E2 • NO ....i ... • ..x ................................ . • TEST1P I ·*·*·CIi·*·"*·**·* ** •* ADDRESS .. PA BTI!' 1011 * ................. : *.. COIIRl!G Oil •• .•.i 1115 *. - : .** .... 05* •• *.***** .. RBPL1CB 'JOB' * ItY 'LTl' 1M .. OUTPUT lBlIl ••••• 'I.GI.UI&' • •• •• n'll.TION *. US • ... ROUTINE •••••••• , .1* -.CANCELBD •• • *... *. •• ••••••••••••••••• * • • • •••••••••••••••• NO i Iii .* .* . •• •. .......... .. . * DOIIP III *. •• YES •• ... "lIRTASK •••••• *. . .. *. *.... .* i .. NO ................. NOLTI *. •• .. Cli ".1. i i •• • ....... B3 .......... . .PROGCHK 1'0. •• leES *-.-.-*-*-*-*-.-* •••••••••• , . OOTPUT PROGR. * •••• •• *CHECK II£SSAGBS * *. D1 ........... "PIF FO.. PH1SE YES .-*-*-*-.-.. - .. - .. -.. I •• 1I0T FOUIID ........... X. OUTPUT PH'SE ••••• •• •• • NOT FOUID .. •• •* • IIESS1GE • ·................... .. . ·····B1··.·.·.··· * .. •• **. •..** * NO .* •• • : • CLEAR ODTPDT • lREi LGLINE .*. .. NO ··.·.·0'··········.. ... *. LTl CANCBLED i 82 PROGR11I CHECK .*. • us **.••.** • GET lDDR 01' BG COftR EG ... : • C2 •• * ••• *C1 •..•••••• *. •••• .S'CERR PO.. •• ... YES .. -*- .. -*-.- .. - .. -.-. X ... ILLEG1L s,e ........... X.OUTPUT ILLEGAL ••••• •• •• • SVC IIESSAGES • ·.................. • : &4 SA! : • GET ADDR 01' .. • INTERF1CE ARlIl .. * ... . .X.. •• •• 111 • .* •• illS *• SOPRESS SKIP TO NEltT PAGB ....... .... i ·····12·········· ................... ·.···81·········· ·.................. * ..• .. A2 : 110 ." -. '" .... IP SUPPOR!'ED •• ........... .. YES : J5 : .. .. ·····r2·········· i • • • • .. ·*Fl*· .......... SET LTA IHDICATOR TO ZIIRO i *• ............. • .. .. : * IIOVE C1NCEL IIRSS1GE TO OUTPUT AREA i • :CLI '4 .*. • • : ~ • : :.......... 1: .*. •• G1 .* .* illS LTl *. CARCELBD i *. *. .* .* NO •••••• .. i .. **111*·****· .. .. INDICATE * • * LTl C'HCIILLED." ........... .... .... *•• * i * •• * *YES : .. .... C10SE2 • G2 ... ** .... Gl .... * ....... . .".. .. I'INIl THE * • • .SUPERVISOR ... US .. lPPROPRIATE. It ... CATALOGED OR ........... X. "ESSAGE TEXT ..... . ".IPL JUST.. .rOR THE CANCBL • ... ftIDE •• • CODE • *. *. * • * i .. 1I0YE ftllSSAGE OS08I TO : OUTPUT AREA * * • ................. : ••••••••••••••••• NO :J. ••.••••••• : ·····G5·········· .. . .................. i * noVE JOBUII& • FROII COIIRl!G TO .. OUTPUT ARBl • 'IIAIIB' ftOUSUB1 • * • • .. . ...........•..... .. • • .. *ONLIST I'R* ................. • P!lINT IIESSAGE .. : ON SYSLST : .. ...... .... i : '2 : i: lIO'1 T1SII NAIIB TO OUTPUT ABIA '1IA1II1' * .. • .. :x ........................ : i ·····U2·········· • • • • "OVE OP8H TO "ESSAGE IIUIIBER IN OUTPUT AREl . . ···**H . . ••••••••••* • • • • .. "aVE ftBSS1GE ·................. .... *.x: . .... ·····J2·········· ................. ................. .TO OUTPUT ABEl • : 'C1USE' : .. i i • 1I0VE CO.DUIOII .. CODE I'ROft • LTI SlVE lRtA :IN OUTPOT ABEA i • .. • *l ••••••••••••••••••••••••••••• : ••••• J ............ . .LOGGBRR FR. *-.-.-.-.-.-.-.-. ..•.............. * PRINT ftP.SSAGE * • 01 SISLOG • • l.D SYSLST • *._.* *ru * * ...* 111· · . ...... ·................... .... .···Kt.··. •••••• ............... i TEll II • •••• J5I •••••••••• .... i 112 *. • ·CANCEL ... CODE: 110 •• DEY Ie II NOT •••••• ... ASSIGNED ." *. •" *. .... ...... .... .... .... . .. * : ell : i * : i YES .. Ali : i ·····K.,·········· .-.-*-.-.-*-.-.-. "PRTPSW I'U • ................. ....... .. .. • PUHf 'fill! PSW • * WHERE UROR .. • OC::URRID • .. Bl!s:roar: DUIIP • .. • * •• X. : i ·····K ,•.•....... *-*-*-*-.-.-*-*-* * * * * ..•••••••••••••••••- NO ·····G,..·········· 1I0lP 1>2 : t~2: : •••• J , ••••••••• : • •••• '5•••••••••• *••• . .** ••• *••••••• ••••• i 1I0YIISUB *. •••• • RtPLlCB 'JOB' ." IS IT 1 •• US .. BY 'SUB' I I ... SUBnSK •••••••••• 1" OUTPUT UU •• •• .. 'LGLlllI' BIGISl'lUIS J~ : i • : R!'lUBI BII 116 • : i • J'i • ••• * Charts 175 Chart FQ. IJBEOJ - Cancel Message Writer (Part 2 of 3) (Refer to Chart 13) ··................. ····A1.· ••• •••• • PRTPSII • ·................ 3·········... ··.····'............. .......... ··.................. .. i ·····82·········· ····A2········· : I'BOGCHK : • SVCERR .. ,,, • PH" • • • • • i ·*···8)·········· ··.................. ·................. ··.··8. ·.·...·... ·.................. : PlTPSII1 i ·····C1.·.· •••••• • IIAlE THE • • APPROPRIATE • • PSII PRIIiTARLE • ·····C]·········· ·.................. ·······c. ·······.··.. ................. ·····03·········· ·······04••••••••••.. ................. i ·····Bl ....•.... · • POINT TO • SAYS AREA 01' • THS paILING • TASK ·.................. • 1I0VE SKELIITON • • Ot' IISG 05031 • • TO OUTPUT IBln • ...... ..... x: i . ·····01 •••••••••• • 1I0VE IIESSAGE • OS071 TO • OUTPUT ABEl • • • ·.................. i .····E1 ••• • ••• • •• • 1I00IF! TO • • 'PROBLEII PROGR •• • PSII' OR • • 'LTA PSII' • ·.................. :PRTPSII2 i • •••• 1'1 •••••••••• .0IlLIST pR. .-.-.-.-.-....-.-. ·.................. • PRINT IIESSIGE • • 011 SYSLST • • .. .. .. i ·.................. · • 1I0Yl SKBLBTOII • 01' IISG OSOIU • TO OU'fPUt' • ARKA • GET 100R AIID SVC CODE OF • • CIUSiNG • IIISTRUCTIOII ·····02·········· i • lilliE IT • PilI N'U IILE AN 0 • 1I0VE IT lITO • OUTPUT IREA • • • • ·.................. • • • • i • • • • • IIIKE IT PRIUABLE UD 1I0VE It' 11I'f0 OUTPUt' AREA • • • • • ................. · .. · . ................. ·................. .. .. ·.................. ·····1$2·········· i .. lion TEXT 01' .. IIITI!RRUPTION • RElSOIl TO .. OUTPUT ABBA .. • • • .. i • •••• 1::] • • • • • • • • • • • IIODIFY eel's • i • IIO'B • SKELETOII or • IISG 05051 TO • OU1'PU'f IREA i • GE'f REQUIRBD • PHlSB lilliE i • IIODIFY CCII'S : . i . • x••••••••••••••••••••••••••••••••••••••••••••••••••• · . ·.................. i ·····G1 ••• • ••• • •• • POIIiT TO • • sin IBEA 01' • • THE PARTITION. .• YES 81 .•.i .* •• liAS •••••• *. •• -. LTA •• CAIICELLEO •• *. .- * .• * • NO .- LOGllIMG i •• ••• G2·········· .LOGGER FH. .-.-.-.-*-.-*-*-. • PHIIT 118SS1GB • ................. • ON SYSLOG All 0 • • SYSLST • ··.................... · i ·····U2·········· • .VOIO SKIP • TO NEXT PIGg • • i ..... ... ·pP • • J~. TERII i : •••• J2 •••••••••: • SI!'l' UP rOR • :CANCBL IIESSIG!! : ·.................. ..... ... i ·rp • • J2· Il 176 DOS/VSE Logical Transients • • ···.····E...•••••••••.. ·................. i 1I0DIFY CCII'S • • i • 1I0VE IT 1IITO • OUTPUT AREI ·····1'2·········· : • • • • • Chart FR.• IJBEOJ - Canoel Messaqe Writer (Part 3 of 3) (Refer to Chart ~3) •••••• • • ....· • .2 • .....,......-.• •• .. -&.)e. . . . . . . . . .••_ .............. . .... ··.·:0 ••. 1S •• • .' •• SfSLS~ •• n:s • PICe UI' CCII • •• • HI.rIl:8 •• 0 • • • • • • • • •&0118 01' PBI'~" ••••• •• •• • CCII • ...............• • IoOQdBll1l .•.i .0 . &~ • .j l ·.. ·•••••.• 1•• • Il • .1.•• 81 i ft'!'rPB ...... .-.-.. .*• •:•• ~lmD .• :.~~ .. 841 ••• •• •••• ..... .... · .. •• ellIS !'GJoS!' •• 83 •• e. BG eJU.IS .. .. •••• • • ...... .-.. .- •• e. •-SISIoOG *.•• .. SfSJ.Stf' rprlPBl • e2 ••• IBSI •• jI!) . . . . . . . . . . ................. • • 10 C3 ••• •• PIl'tIP21 .0 C4 ••• illS • •0 ·····lIl·····..··· -............... i 0".•.•• i •• PI.CK UP ADIlK •• • 01' rAPE COl • •• •• ................ . .... . ··...... ... ·······a;te····..·••.. .•................• IUoCC8 :!t!t!...........J!! ............ •• 15 •• • IllS.. srSLSr •• • ••••••••• paA DISK •• • 10 • . . IUJ 4:$ •• •• IS •• •• rll'a I'UoB •• .u •• PIIOI'","~¥P ••••••• - • 185 ·c... • • .....".............• •· ·................... · ..... .. ...... ....••. ······E.··· .-........... .. • IlOBx,r U:II • • . , . B2 • %. • aaLOCA~! car • &DDli II CCB e007PU!' RSSlGB • 01 srSLOG • • ie i • Bl •• 1. • ie • i •• •• *... •••• • S.IU ••••••••••• 1.. :%.0 ••••• 0••• • ·l'uaoilr •• -~: ................. ... ............ .J• . • • • • •• ...• *•• * *. ~'.B • _...........-.• · ·.i. •:!t!C!. .... __ U.wCU'II: CCII aD~a ••••••••• aII C C i . • i Dl!'JPB •• •....*.• ••• * t! 10 ...... ,.i........ : •- . . •• IS •• •• e• •• IS •• .0 •• SISLSr IBS •• SISLS! •• I.li:S •• SISLST A •• 0 • • • • • • • Il •• A cm DISK ••••••••••••• u r••r rlUo11D •••••••• •••••• .....»,.i........ • • : a¥8~lsf~ : •• •• us t •••••••••• 1.. •••• IKS a........... • .... 'I.'. •••• • Cl •••• • •• .0 •••• uHsr •••••••••• 1-. 1 •• •• ...... i .i.•• Cl ••• • • PilL. 1" • • • 1 ••••••••••• ••e. • _ 1'1 •• THUIII • • • las -. .. ..• .. •• I!Sl • &r1:.:.......... : • 10 ·····r:t·····..··· ·.................. i OII1our i .p.IIl.r I'll.. • _e_e-.... - . -.... - . • 0u:rpU'l IESSIGI • • 01 SfSLST - lIISU1'!' .- .. i 1'3 ••• •• i -... . . . . .1'. . . . . . . . . . . IIS..ID •• •••••••• 01' 8fTBIT •• *. ••• *•• • 10 . •• •• .·................ WA" CCB .01)11 11 diloilS'l1l1l 1 • • • • ••••••••••• 1 • .. .i. •• .•• ~.:;ASI~lf·JoB·:. 61 • t. .... .. .. i ·····G;te····..•·· :PR'lBiD •• CLIAa oura!11l •• • IIlBI 'J.6LIIB" • • • ·.................. .* • us ·.. ~ ..··· ·.····.u····· ·.·.................. :1 .......... : ..... Ii,.L....... • (jUt:!' CAUL • : ~:ir~pm : '-:l$II2 . . . . . . . .>4! • • _ i : • BlSSB'l CCII SIP • • 'lDLI'1! DBf.lI.:i: • : .... , : ••••••••• d~ ",.WI.i. .• If. •. . oJl.. .... .-.. •• SIS r •• 'ASSI lap e. •• .* 10 • ••• 0 • • • • • ras · •••··1,.i..•....•• ··: ..: ................... •1... ....... . ' IW~f$f~ . • • - ••Jl.! ....... ............... •• Ri:~OR. 'lO CIILLBJi · . ·.._............ .•.i i G.. J.S • ••• . . .-63*••••• ••• • • • • aaJ.OC&'l1l ADDa. 01' 1S'l CCII ··_.... J •• • a:t • • • •• •• :i1.::;L:i:r ali •• II!.S •• P81 PJ::S' . -•••••••••••••••••• *. •• • • liO ...4···..·••••.. ··.·-··............... .. l'ru.IU • i sre 0 :X ••••• • i ··• . ..................• : ••••a!> . . . . . . . . .: • svc.: 1113 • o •••••••••••••••••• : ·•..• ···J4···....•··.•• ·.................. 11&11'1 •• -..-.*.- • UI'l' • ...............•·. .····14····· · • • i i IIi:TUdl til CILLI. . • • ·12 • 1177 $$BSYSWR - Set up a write on SYSRES operation; Move Label Cylinder Address ·to COKREG Chart GG. ····11·•.•.•·•·. ··............... . ... 118SIS111 ··.......... ··.......... • • • B2 • i ..... •• i ·HIIE .* •• B1·~· •• · . ·....•..•...••..... SISIIR i •• ••• BII ••• ••••••• 82 *. •• .. .. ··.... . ..... .•. •• • * •• *. BO IES •• TIIST •••••• •• ZIBO '.01 •• ·.S!SIIB.· • lil .". •• ,.* !IS •••••• • LOID IDOBESS 0' eOIllSG • • 11~0 RBG It ••.. . * i . * •• * TEITR IETR! • 110 • · • LOID DISI • IDOl liTO' • 10 110 SI'OIB ' II SIll CCII'" • ·LIBRY2 •* !IS.. ·····c.····•..... ·.................. i C2 •• i •• • • • • IE'll! •• •. 01 .* ." .•••••••• •• lOP •• • • *. .* ..... * ·....... *. . . • 10 • • .1 ••••••••••. • 02 •• X. i LlBRY) X ·····02·········· • LOID IDOl • • or COli REG • liTO 12 • • • 110 ISSUE • • SfC 3l .03 • ·····01·.··.····· • LOID DISI • : l¥nO·I~ : • lID STOBE I I • • SElleR CCII • ............•.... ................. BLOCICS BEGUIUG IT LABn) BEPBBSEIT I I BlPIISIOI OP TBE S!SlB RICRO. . ··.... ...... *. . * • YES ~. • '2 •• 1. i ' . EXIT ·····P1·.· ••••• • SET UP •• IUD • • CCII IIIrH IDOl • • OP BOPPBI lIBI • • UD STOIB SIIIC • • CCII lDDR 1M ces. · ............... . • • • ··.......... i · . ·.................. ··.. ..*... .. ................. L01D CCB ADDRESS III REGIS'fKIl 1 • 02 • • • • i ••••• J , •••••••• •• • * SYC 0 •• ISSUI'! I/O • • :X ••••••••••••••••••••••••• X .* I< 1···.. *. • :. COII~£~'U ·:.!? *. .* *..* * •• * • US • •••• K2 •••••••••••• • • ..... x:: • • • • U~T1 :: • • • • ••••••••••••••••• .......... i : 178 ... • • • • ................. LIBBY 1 i • •• ··H1···.···.·· • • • • • • i • GBT PIR~ITIOI • CORBEG liD • lion LIBEL • DISIC IDORESS • TO COIIJlEG ·................. . :x ..•......• : SET UP TO IITB! 10 TIllES ·................. • GET liD SI'I • IBIT lEI FOB • BlECUTIOI ·····G)··.···••.. LIIIBY1 i ·····G1·········· • • • ······F3··········. i i ····P2········· • s,e 11 • • lilT 'f0 • • 1.'1I0llLBII PBOG • ................. ··0.······· 8l : 60S/VSE Logical Transients • • • • • SIT X'80' • .11 .LIG IIISI • • l'OSIrIOI • • OF PIli • ............. ··.......... • F2 • 12 •• •• HIS •• •• HIGHEST •• 10 •• PIRTITIOI •••••••••••••••••••• ..BEEI PIO- •• ·.CESSD.· ................. ~B6UIlIT Itl! tiLDE i i ·····11·.· •• ••••• • LOID 1001 • • OP SIIICR CCII • • 111'0 10 • • litO STOBI II • • TIC CCII • SET IBG) ~O LOGICAL i ·0) ... i • • • .' B4 • . ................. LIBIIY i ·····C1 •••••••••• 811 • Chart GJ. $$BCCHHR - Core Image Directory Scan * ****11********* * SSBCCHHB * * ...............* * • •• * * : * B4 : ** •• USSI ... .*.i *. 81 *. • •••• 82 •••••••••• III .* ......•. J(*** •* IS *. I ES •• BAS LN *. SYSTEII? •• **.. ..•* .* • GE:f ADDRESS OF BAS LOADLIST ....* .... EXIT *• .* PB1-SYSBES .*..* 110 •••• * ••• X•• ..• ••••••••••••••••.. • NO .•. *. B3 *. *. .* .* i .*. *• B~ .* •* fIBST •. *. *. 10 CALL TO .* •••• *. IIODOLE .* *. * .. * • YES *. . * * .* YES i * : i *····C2···· ••. ··· i ·····C3·········· LUIICHECK G4 : • COIIYERT PHASE. • REL. BU. 110 • • • IIITO ABSOLUTE * • FlU BLK-1I0. • * * ................. .................* .....i . *.... * • i .* NO ••• *. * • .* •• ....i -* . *. *. 02 *. FIBST CALL? * •• * * • J2 • *-. .* *..* .* IES ....* * G~ i :nIPIIASE * IIISERT DEVICE * * ADDBESS OF * :SYSII~~hgaSB~I:.: * ··ell ••••••• * INDICATE ** • 8&S IT IPL * *• ** • ........... ·. .. ·................. . .. i ****·D~***·*··*** * • CALL liAS : : (SVC 13) * * :: ........... ,: :* ••• Iu'rilH i £2 •••••••• *: :*••• :CI\DPHASR * ·.................. • SE't II =NO. * OP BAS • *LOADLIST SLO'tS * * * i £3 •••••••••·: COIlVERl PHASB * TTB UTO CC. HH. R : * ................. : ....* :RASWl1T Ell .f. *. • •• RAS • r~s.* STILL ••• ••• ICTl'l! *. *. * •• * * * •*. .* .* •• 10 i .... ** i : •••• F2 ••••••••• : : xx MUIIBI!R * * : SET RAS PHASE • = 0 . · : REXUII i ·····G2*·**.····* • GET SCLL-DII • PHASE ENTBY : POB UBASTU •* *. *-. •• *. rOUND *. * .* , ~ Gil X• .····G4·········· * * UUI * * * : : X * * * :: ·................ . ... * • : ................. .•.i RIISPOST i **FII******* • POST RlS * • aCTIVE IN *EACH PIITITIOIi * * * COli lEG *. * .....•..•. . x: 112 * ........... . ..... • .x; •. ••••••• ** ....•*. •. ................. • * •* J2 • EIIT (SYC"I i *.•••••••• YBS • • .. • •••• H . . . . . . . . . . . . • * * •• * • NO ...............** BI!TORM ······J2··········. ................. ..•... i : NI::XTENTIII xx = = If XX+ 1 If - • I :1 ... • * : .* . * • NO •••••• *. K2 *. .•.i *• .... If = 0 .... J2 : *. *. .* . .. •• • YES .a .. ·.... . • • 84 • * Charts 17~ Chart GK.... ·· $$BAfTFO - FCB Load Initiation (Reier ':0 Chart 15) .. •••• , 1**·**···· • $$BA'l'rFO ··.... ...... • ••• * ••••••••••• ··.......... • BII • • 112 • PPUNl'r ................. • DETERIIINE • LOGICAL ONIT • CLASS • • • ·................. . ·.................. · · . . i ······ct*·.······. • • • .. .i •• *. SPECIFIED *. * .. * • CALCULArB POB • ADDRESS UD • STORE IT IIi • INl'lREl .* .* 110 •••••• • YES PFPUBCIIT .* ••• **** •••••••••• • •• * • •• ··02·········· .PIMD AIID STORE • • USER REG 15 • • SAVE A!lEA • • ADDRESS • •• •• •• *. P1 ••• •• LPI= •• 110 SPRCIFIED •••••• *. * .. * .* .* DII .•.i *. * ..• *. .• . .. •• YES. •••• 1. ··.... ...... i ... • J3 • Ell •• .* *. •• pRINrBR •• • • • • •• i .*. •• F3 *..* * .. * • NO •••••• i . .. A 3211 •. * •. * ..... ··.... . *..* i * .. * ltO • .* .. IRS •••••••••••••••••••• 110 · ·................... i .*. •• •• ;';OGRAIIPlE;· •• YES •••• LOB FOR·· •• 110 •• LOGICAL •••••••••• X•• ONIT DBPIIIBD •••••• •• ONIT •• •• •• • IES •• DBVlCK DOliN • F2 *. •• • NO * •••••••••••••••• i .* •• .• .. ·.................. • DETElIIIIHB LOll • ADDRESS OF • SPBCIFIED • SYSXXI *. •• • YBS :x .......•.. : PI'LPI •• .. .. ••• ·.E2·········· ·.................. ••• •• DEVICX •• IIITH •• PCB i • • i CII • ESTABLISH • ·ADDUSSABILI'U • • FOR COllREG • · i ••••• E 1•••••••••• 1I0VE FORIIS 110 • • TO IHFlR£II • • SET PORIIS • • INDICATOR • • • • ................. i •• .* *. •• •• PORIIS'" . i ·····BII.······ ••• i ...··C2··.·.····. !lOYE PHASE IIIIE TO IN FAR EA 01 · i :*••• H2••••••••• : i ·····B1·········· • ESTABLISH • ·ADDRESSABILIl'Y • • FOR PHASE • • CO!lIlU NICATIONS • • ARUS • YES ···................... ·····FII.···•••••• PrFErCH i ·····I's·.········ • PREPARE TO • • LOlD ,.BlrTF3 • • PRBPARE TO • • LOlD UBuru • • JJ • ·····Gl·..i ·····.. ................. • • IIOVE LPI VALUE. • TO INPlREA • • SET LPI : INDICATOR • i ·····G2·········· • • : • DETBRIIIN! CORRECT LUB D~~~L~~sn~UK OR SYSLOG :x ........•. : .* H1 ••• •• *. *. .* .* ·.................. * FIND THK LOB ADDRBSS • ·.................. · .... ··...... • • • * i SST IIULIISG IIIDICATOR .* •• • • •• *. J2 .•.i •• LUB ASSIGNBD •. .... *. •• .* .• • JJ • :pPIII! i : •••• Jl •••••••• • INSBRT p1I0PER • • • RETURN COOl * •••.•••• 1. .I11 OSER RKG 1S • • NO • •••••••• • YES . pOWCHK 1 *: ·.................. i .*. *. K2 ..10 ••••••• •••• .SET SIlITCH • •• pHINTER 1 •• YES • IN INFARKA •• SpOOL8D •••••••••• X. TO INlIICU:S • •• DEV ICB •• • PRINTER •••• • SPOOLED • -.. • NO ........... ··.......... :......••...••........... x:x • BII • 180 • ··.... ...... .........•. x: • x••••••••••• x • B2 • ·................ nrCH $$81rTI'3 :x •.•..................•.. : • * •• * • us ······J1•••..•·.... * ................. ····G,,·········* i • • Pl'LUflAD i : •••• H2 ••••••••• : •• IIULIISG •• NO •• SPECIFIED •••••• *. ·····G3 •• • •••• • •• • DETBRIIUB • • CORRECt' LOB • • DISPL/2 YALUB • .POR PROGBAIIIIB:R • • LOGICAL UIIII' • • • : • ................. i PFIIUL i PFsuu'r JOS/VSE Logical Transients * * ••••JII ••••••••• RETORM TO USBR • • • ............... i ····Gs·.······· PBTCH • UBATTF2 • ·................ • • - LFCB Maceo Execution foe PRTl (Refer to Chaet ~5) $$BArTF~ Chaet GL. ....• .... * : rS1'8UPF i : •••• 13 ••••••••• : 1···***···. ··............... . •••• j • UBATTP]' AJ : .'fEST SPECIPIED * PHASE FOB * * .CORBEcr CODING • ·.................. * ... .... ·..... • i: IJB1TTP2 i : •••• 81 ••••••••• : .* .* • IRITIAloIZE * * PHASE AND • * RELOCATE CCIIS * B) •• *. * •• * • . .* ·····C1·········· * * * CONVERT CUU AS IN PUB TO • PRINTABLR • CHARACTERS C) .•.i i •••• NO : i ••• DOSIUP 84 •• • •• 85•••••••••••• •• *. I.ISTIO Gil •• PORIIS=JtIXI •• NO .-.-.-.-.-.-.-.-. *. SPECIFIED ••••• '" •• I SKIP ro •• •• X. CRAIIIEL 1 • . *. * ••••• . .... .x:. • rES J!2: •• : Cq : BlI. •••• *··C4 •••••••••••• 1.0GIO Gil .. .. ....................... .... ···Dl············ .. ... .. ·.................. •• SPOOLE!) 8Y ·.POIIEB/VS •• * * US •••••• OPEBAl'OB BIlD REPLY .. .i •• *. .9EBlPIC1TIOI •• 10 •• IISG 1I&1I1'I:D •••••• •. *. .• .* • .. * • filS i LISTlO Gil *-*-*-.-*.*-*-*-* RUD I'ORIIS ................. • CS G4 : i: ···01*****·.·*.*· LOAD OIUCTORY ENTRY OP PCB PHASE * .* NO : i: *-*.*-*-*-.-.-*-* SIlO RSG TO i *.. * • ................. .... . ..i .* *. •• PBIMUR •• * i OPIIESS *. EBROR •• IRS •• III CODE OF •••••• *. PCB PHASE •• ·.................. * " BII • i *. •• •• *. CONTROL 10DB • R!G UD OLD PCB oil COIRBCT DBPL! *. .* * •• * • NO •• illS • •••••••• .* • .. ·05········.·.· I.1S1'IO Gil .-.-*-.-*-.-*-.-* PRINT Vll:8IPIC1- ................. • 1'101 IISG SlIP. TO CUll :X •••••••••• : i i • *. NOTPNO E1 •• .*E2•• ***.* •* *. *SET I!~TURH * .* PHAS!! IN •• NO '* CODE X'18' * •••~O~fBUt~E.*.* •••••••• I •• I:~8 V~E!! *.... .• ** '* .. ••••••••••• .. •••••• YES i ••• ~~:1l~~T •• *..* • *~~~ER~rv~~ *... • ........... * ...... • * i •••••• *. *. *. .* .* ··J2······· .SET RIITUBN • * CO!)E X'04' • ••• 1* liTO USER • •• REG 15 •• ........... *•. * • 110 :IIACRKT K1 •• •• OOIS •• •• SPECIPIBD •• 110 • •• LPI ,ALUE •••••••• •• lG,BP •• *. .* * •• * • US : •••••••••• x • i ···.K2·.···.··· • OSBR ................. BETon TO •* • Gil .-*-*-*-*-$-*-.-• PBIar BID II&SSllil 01 Sf SLOG ................. • ··p5······· i CII : ·.•.... .SBT RIiTUal • • COUI 1'00' • • • uro USEB • RBG 15 • ...........•. • Gil • Gil .*.G".i•••••••••• ................. 1.1S1'10 Gil *.*.*-*-*-e-*.*.* PASS SPECUL RECORD IIITH • LPC8 lIPO i ···*GS···.····· ·................ • • BBrURN TO USIR • • ··tll······· ACTIVATE • ERROR • ROUTIME I I • ............. * * CCIl i *••••••••• • •• JJ •• LISTIO Gil *-*-*-.-.-*-*-*-* LOAD fCB * •••••••••••••••• : x•••••••••• : .•.i: PREPARE IIBSS1GB ro OPER1TOB i LOGIO • usn BURr -. * ···1:5············ PRINrEliO ·• X ••••••••••••••••••••••••• i . i LOAD ................. I.PI=II •• SP!CIPIED •• .* UD SKIP TO • CHAllIIEL 1 LOAD NJ!II ... * .• * ................. (:~iUnI~g) JI .. *. LISTIO INTO STORAGE • ................... ·.... ..... ·..... *• : i ···G).··.········ . .··81 •••.••••·.·· i : •••• £4 ••••••••• : i •• *.*-*-.-*.*-*.*.* L010 AOI. PCB i rls •• • * *. * ·.................. • ...i • 110 • GET COBRECl' • • STAII'f ADDRI!SS * .OP Vl!R:Il'ICATION* • eBSSAGB • 1.01 DPHAS .. pj • • • •• CARRIAGE *. IES OM LIIIE 1 •••••• •• * .. • Pl PIEt!=~~G 1.:***.".* COOIIT AOI FCB POR 1l.IGIIIIElI'r •* i *. ·*·····T 1 .* 1:18 n1!R ••.... ...... ;ES ·.................. • IHVPHASE **1'2 •• ***.* *. 1'1 • *' * PHASE *. *. 110 *' •. : •••• El ••••••••• : • • ··.......... i: • BfI * i .... ··...... • 13 * Charts 1181 Chart GM .• $$BATTF2 - LFCB Macro Execution Subroutines (Refer to Chart 15) ··.····B3········· ................ ····62·······.... ·................. .. LISTIO • • USTIO i : •••• C2 ••••••••• : PUT USBa OIlT UTO CCB ~, .•.i • .... C] ·........ .... ..... • • • LOGIO ····c. •·•. ····· •• • • Plurll •• liS • IErUla TO • •• SPOOLIID Bt •••••••••• 1. CALLBa • ..~~IIIB/V~... • . . . . . . . . . . . . . . . .. .. • • *.. * • HO ~ :1"...••••••.• ···•.·»2·······.... ······03··········. ·.................. ·.................. ······12······· . ..... ·................. . .. i • • • STOll CCII ADDRISS III CCB • • • • 1o0GIO • •• ••••• i •• SYC 0 •• ······P2········ . .... ·................. . .. i • • MAlT POR • • •• I/O •• • ·COIIPLITIOII • • ····G2········. ............... · • • 182 i IITun TO CALLER • . • • DOS/VSE Logical Transients • i PO'1' URIT or 5tSLOG U'1'O CCB • • • $$BATTF3 - LFCB Mac~o Execution for 3203 and 5203 (Refer to Chart 15) Chart GN. ••. ·•·•·. ··*·*.1· ............... : UBUTPl .......... : : i : •••• 81 ••••••••• : ·.................. • : INITIALIZE PHASE • : ··.......... .......... *• • BII • 112 : i ···82············ i OPIIESS ••• .LOAD DIRECTORY • BIITSY or FCB PHASE • •• ................. *. * . . . .* SPtCIFIBD i DOSKlP B" .* .••. ..PoaIlS=1111 •• • B!> • ••• It) •• .* 'IS •• •• PBI.TBi •• NO •••••••••• 1.. . ··...... ... * .•. *YES *. SPOOLED .* ...* *••• IRS •••••• • 10 • CII •• 1. i x : •••• c 1•••••••••: • CONVERT CUU • AS IN PUll TO • PRINTABLE • CHARACTIRS • • • • ................. ·······D1 •......•.... ·.................. i '" • * RILOCATE CCIIS .. .. ........... *..* • .. YES • El ...i *..* •• *. SPECIFIBD *. .* .* NO •••••• * •• * • YIIS ................. ...... ·***··E2··········. ·.................. •• •• •. ••• *• • !lOVII PORII NO TO IIESSAGE ARBA ................. : : i : •••• P2 ••••••••• : ................. *. .. .. •• •• IES •••••• .* PRBPAIB IIBSSAGE TO OPBRAtOR • •• *• liS .... ............ ~ i .-.-.-.-.-.-.-.-. LISTIO Gil PBIn fBBIPIClTIOJ· IIESSA,"B ................. • :,.......... : i i .•. .. -. .... .... i • • • D!) • ,I\UrXClTIOI •• 10 •• IIS6 IIAITID •••••• ··.... ...... i • • • ··Pl······. ·DEaCTIVATE • • USER EBROR • • RoutINE III • • CCII • • STOBE DEYICt • • SPECIFIC rCB • : LENGTH IN CCW : •• ······E"····.····.. .·................ ···........CII ..• i ····El······· •• REtURIi TO • USER • •••• :l .......... : • 85 • • P l · ••• i ·····P1·......• ·• DII CORRBCT BBPLY * ..• • 10 ·................ ··...... . ·............ • • .• . • i :1 •••••••••• : IIlCRI!T • "IT ADDRESS • .Of' VlurICATIOII. • IIBSSaGB • .•. CUIMEL 1 i .. ...... .. ••••••••••• .. ··.·;8S ···C!)············ LISTIO Gil .-.-$-$-.-.-.-*-• SKIP to Gil SUD "SG TO OPBBlTOR IElD !lULl ••• IIIVPHlSE D2 •• ..Dl••••••• •••• .SET RETURI • •• LBIIGTH or •• 110 • CODB l'1C' • •• PHASB •••••••••• , . IIITO USER • •• CORBECT •• X. RBG 1~ • i •• LDGIO •••••• i ···CII.··••·•••.•• .-.-.-.-.-.-.-.-. i • Dl • •* *. • • FOR!lS=llll •• i BAL •••• ••• 1I0TPIID . C2 •• ..C) ••••••• •••• .SET RETURI • •• PHASE III •• NO • CODB "18' • ••• ~onBU~~E •••••••••••• l * . I:~g y~EB ···r$············ i PBUUU LOGLO Gil .-.-*-*.* -.-.-. pun ••IIID ................. IIBSS1GE 01 SISLOIi • :x ......•..• : i 1I0rORIIS .* •• •• *. Gl ••• •• LPI=N SPECIFIED *. •••G2·.·i •••••.••• LOADPKlS *. •• .* .* IOBRR 110 •••••• •• •• .• •• * •. * • YES G) .•.i •• DID ······H1·..•······. .IIOYE LPI VALUE • • TO IIESSiGE • ................. : lRBA : .. H2 .•.i *. •.• * • :x •.•••..... : · . ·.................. ··.... ...... i STLIIGTH ••••• J 1•••••••••• • • PRBPARB IIESSAGE CCII • • •• .. ..... ··.... . .* ··.... ...... .* i * .• * • IBS • i • B2 • •. ALIGN FORIIS TO LINB 1 • ··1\2···•••. ............. • ····H$·········. ·............... i •. i *•• * • NO ·..... •• Dl •• · . ·............ 1I0P • INSTBUCTIOI • • IOEBR • • ··.......... .... .* i • ................. i B" • • BBTU8I TO usn • • • J" • .-.-...-.-.-.-.-. i •• JJ ••••••• Gil i •• JII • ···J2····.·····.. *-.-.-.-.-.-.-*-. LISTIO H) .•.i •• 110 •• IBS •• CHllIlIEL •••••• •• rOUND •• i NO ............. I/O ERROB •••••• OCCUR.. • •. .* •• PRINTER •• filS •• SPOOLID BY •••••• •• POWER/YS •• .SIT BITUBI • • CODI X'OO' • • UTO USER • BEG 1~ • • •• 10 • i ··G$.·····. i *. • •• JII •• ••••••• ••• LISTIO Gil PlSS SPBCIAL BECORD WITH rCB UfO ................. * ........... 1:' ........................ : :RETRI • ACTIVATE • • • lIStR ERROB. • RoutINE IN ••••••• • CCB • i ···l)······· .. ··· LIsrro Gil e.*-.-.-*-*-._*_* ~g~D I=f8~ESUD I ................. .:... ··.... . • MTO rCB • PJ • Charts 18,3 Chart KA .. $$BOCRTA - CRT Root Phase (Part (Refer to Chart 16) ~ 3~ of ·•.........• ..... ··.... . • IIBOCR'rA •* B2 .•.i •• ·····1. ······•··· ··................... ··.......•........... IC~IfaTI CR~ • • • TISK • • i ·····8l·········· .*.* • • PUT CRTCC8 TO CHUQ • • i *•• • * IBS • Glt' CCII 10DRISS rROII CAlI • • • • . ·.................. · i ··.··811······.··· • • • PUT CCII IDDRESS t'0 BEITCCII • • • HI! • ·.•···C2··········. i • • •• X. • • • ······C3··········. · ······Dl··········. · i • SUE TISIT • .REQUISTOR-IO II. • CR~SlY • &5 i, •• •• IS lPL •• 10 •• II paoca5S •••••• *. *. .:.* .* *.• * • IllS · . .·............... . :,.......... : ..... ..· i ·····B5········.· • • • CLaiR A~~EIT101 BOIPII • • • I: i i . •• ••·C ....•••• ••• • • CLEAR SBYIBlL • .BI~S II CBTCSII • • liD 11 CR'rCCB • ·.................. ·.................. .·................ • SIVE CHIRIEL • SCHBCULER • BBGISTERS I:) • .. .. .. SI'rCOIIBG · .. · ··.......... ..............•.. *. •• PIBS~ ~IIIE •• 110 •• THROUGH •••••• *. *. • 10SIS'rSK i ·····Il·········· ····12·········.. ··............... • I) • ·IB • • A2· tasTBRR . ·.................. ·................. ·................. i .····U2·········· • • • • SUE lOS BASE RIG • • • • ·..··12·········· ................. . i • SIT I'll + • :COIl8l!G ADDRESS : INDICITI BUS! 110 SE~ DIUCE BOS! CR~ • • .. •* 13 •• •• •• AP III TilE •• 10 • SISTEa •••••••• *. • ·····r2 ..•..•··.•. .. ... • SIT OP PROPBR • .. LU8 DISPL. • II CR!CC8 • • i i • • • • • ·····011.····· ••• • *. * ••• • .., .* .* BII .•.i •• -. .. .. •• IS THIS •• 80 •• A PorR •••••• •• REQUBST •• *•• • IBS rES ······1'3··········. ······F. ······..·•. . ·.................. ·................•. .·............... :X ••.•••••.• : • • • i i i SAVS ORIGIII... 8I!QID • SIT TIlt 110 UD. • • UD SAYE PII( .III ••••• • CRTSU • ······G2·••••••·••. ·.........•........ i .. .. • ClIT 8I!QID TO CHIIIQ PU~ • SAn PUTR • lIDICITOR III • CR~CC8 TICCIIICII • • • i G.. ••• rIclIBBDR : •••• GS ••••••••• : •• •• ·~S FIRST·· •• us. • SIST Ul' CSII • •• COlIlIllO •••••••••• 1. ACCOBDIIG TO • •• t\ TIC •• • PROGRIII CIIICK • • • • ....... ··...... . ·••···8....••••...•. ·.................. **.••.** • 110 • • ••••••••••••••••• • 84 •• 1. i ·····H2·••••••••• • • • • GET IDDRBSS OF CRT BLOCIT • • ·.................. ·····J2·········· ................. i • • • • • ••..•K 1.......... • II lit I! • PUT PIK to CRT BLOCK AIID SAVI TIK IN CRTSIV • • • • • 1 2.•. .. • IIITERBUPTKD. II';:;.. "ESSIlGK •• • TASK .1 •••••••••• FIIOII S!STE" •• • OISPATCHABLI!! • •• TASK •• ••••••••••••••••••• **.••• .* • MO ,:x •.•..•.•......•.•....... : .... ··...... • 184 AJ • DOS/VSE Logical Transients i ItS· •••• •••• • :•• •••• : CLBlR car.IIlT • • ..JJ....... SET. ·ItB • • DJ· •••• rES •• •• ••lIIITIlLlZATIOIi. ~~ti~Tc~n= ...1........• I=~TIILlZlTI?= •• •••••••••••• • **.••.** .. 110 • ••• 1..) ••••••••• RETURN • ·................ • VIA REG6 ·.................... ·.................. ··.......... CRTUS8L1 i • • • • • i sIr UP SISCOII POlUER i • l'> • .·...............•... ..... .·. i J4 .•.i .. i •••• X • SIT UP SISCOII • • PQll1'1II • CRTDSBL • • • CIlTENIl Chart KB. ~$BOCRTA - CRT Root Phase (Part 2 of 3) (Refer to Chart ~ 6) ..... ............. ·11& " •• B~. .. A5 .. · TESTE III i : •••• A2 ••••••••• : i ·····'5·········· .. SET 01 IIUTB .. IIITHOUT CARRIAGE RB'lUn .. UDICATUR • RIlSET IIRITE • • IIITHQUT CABIL. " : Rl!TUBI SIiiTCH : ................. B2 .* • " CCII ................. .".i •• .* *. CHUB •• ns •. ··.... ...... ······C2··········. *. . * .* IlS .. .i "• ." COIIIIAlO ". CHAIIIIIG •• TO BE DIS- •••••• ·.COITINUBD •• *. • • • • • i •• .. •.. * .. • " 10 •• 110 •••••• .* YIIS • G1 • . ·.................... i .. GilT IIEIT CCII • &DDBESS PROII : UUCCII i ·.···c~··.······. . • • : ..... ................. .* 02 J. •• •• IS THEBE •• A CCII *. *. *..* * • • . ·KII • •• II~ • CRTKIID i • •••• Dl •••••••••• • • • • •• 110 • • TBBIIIIIIITIOIi • • •••••••••• 1*. BOUTIIIE • * .• • c" • ··.................. .....r1.......... P2 .. •• ······B1··········.. ·.................... .* ··.......... ... ·····Gl···.······ · . ·.................. • COI'UIUATIOI CCII CRTEOJRT • ...... r .............. .. •" ". • GilT ADDBESS • •" ANY ". 110 .. OP CHllIHEL • •• ATTElirIOIi •••••••••• 1" QUEUE AI D .. •• PBIOING ." .CHANlIIL BUCKET .. *. . .... •.. * • IES PS 1 • RESET CRT-FLAG • AND IlRRoa • • .nOICATOR BITS • ·······81·.·.······... ................. CLURIIXT • CLIAR CRUElT • ······G2··········. ··.................." i i . *.. SSBOCBTII lIAS I1TIUIBUPTED • PHIISE H2 .•.i .... .... .. " .. ·....". lit. ·................ .* •• •• *. i .... : J3: .• .. .... • • "KC" .. All" 'lICaT • *. • • . •• IIIITB •• •WITHOOT *. 110 ". CARl lAG!! ...... . ". RETURN .- .. .. .* • IES .. .! .. .. : .... AS : G5 : * ••• PEtCH • ............... $$BOCBT~ : PBOVIO!! POR PROPER CSII • .. • i .. • .. •• .... •• • *....... KlPETCH • i . "KC .. .. 1:1· .... : ·................. ...!.. .. : i ····G5···.··.·· ..... .. . ••••••••••••••••••• .. 110 •. .. : J ) .... . J( •.......J ).............. . *. ". •••• • ...... PETCHU .. **. .** •• ....i .. • .. ·R).. •• ...... • .... PETCH • UBOCRIK • • •• NBAP AROUIIU-. YES * ". UPDlTIIIG ........... 11. K2 FErCH:!: .. • • : ·................ i ..... .* * .... -110 J2 ·····G . ••. . ••···• ................. .DESTROY DEVICE .. AID CH1UBL • ADDRBSS I I : BuenT . ...... .. IIU i ". *. THIS •• US A TIC ...... . •• COlIlIAlID ." . * IS •• • • • ·.................. • CLIlAR CBTIEIIT • i i -. *. i •• .... • .. G) .. ••• .. •• .. •• IIIDICATE .. ... .... ••••••• • • ····J1PETCH • S5BOCRTG • •• .* ••••••••••••••••• XES ....i • • .. G!> •• 1. i i .""RAP ABOUND •• YES ". Ul'Dl'lIIiG •••••• • Gl *.1. SBTPUG . "• i **. •..* . • .* i ••• Fl.. SET CSII T O . 110 •• IS CCII 011 •• .1 ••••• u • • • 1l0UBLEilOBO ." • REFLECT .. PROGalll CHECK. ..BOUIIDIIRY •• ••••••••••••••••••• . * ..• ·····B~·········· • 1I0lMT TO • .(oET ADOBt:SS OP .. • OSER CC8 • • • i .•. • . .... ....... · . .................. i ·lIe • • STOllE ACTUAL • CCII i *. • GS· • CII •• X. paOGCHCK .•.i " • • !IIS • S'I'ORBCCII I : •••• £2 ••••••••• : ... os *. • us ..... .* • • IS THIS •• 110 • A TIC ..... 1. ". COIIIIA.O •• ." *. • • • • • • • • ................. . .... * •. ·..... . *Ke· PonT TO IIIlU CCii UBOCBTU • 1I0KCOl!II i • .....J .............. . • SliT UP PIOPER .. .. STATUS BYTES • .. IN CSII .. ·...................... .:......fe,T................:. i I:1l8~nT .. ................. • .. QUEUE TO ATTEITIOI • • ..... : KCOIIIIH 1 ..... °IC .. • A·I" Charts 185 Chart KC. $$BOCRT~ - CRT Root Phase (Part 3 of 3) (Refer to Chart 16) .....* ..... * 1I0KCO"1I .* NO.* . •.. *. *. &2 *. ** * .*.i: *. .* .* .* ................. 111 CBTCCD C2 *. : .•.i *. *. DUE •• X NO •• £BIOII • ,. ••• TO UNIT •• CHECK •• * •. * * .* .* 1115 i :*.*.D2••••••••• : • SBT 011 DUIIIU • SElISf. • INflIClTOI • • • ................. • * :•......... x: ·····B2·········· 10UNITCH i: • IESTORB • : CHt:U~-igEUK : • IBFLECT USES • • EIITRJ • ................. 186 • 82* • i RESBT CIT FL1G BYTES i nCBT ••• .*cell •• • • * •• DOS/VSE Logical Transients i ·····B]·········· • • • : SE'r UP IllTERRUPT IIIFORIIATIOM III LOll CORE • • • : ................. i ·····el·········· • * • • • PROVIDE EXIT INTERFACE • • • ·.................. ······D]··········. ·.................. i • • • DET1CH CIT T1SK • • • i ····E1········· • EXIT TO • : I/OHutu:up'r : ............... *. *. ON PIIOPER •• BOUIIDARf •• *. * •• * • i .* • • *•. * *YES * SET UP ST1TUS * *BYTES lS SrOllt;D. . ·KD • .··11··..•... ............. :I *. .•.i •• • • *. * ..* •• • IllS · .* ·................. ..... • JJ. ·.. PETCH SSBOCRTA IPa1 I •• LiST UAD •• 110 •• CCI 111 •••••• .CHAIIIIlL l'GII. ................. • • .KG • , • • • i: .....i • Dl· • ss'r nAO-CCI • UDIClTOI • • U. ilEDU. LIlli STATUS IP • RBAD+SItIP' .* ... ······0$··········. ·................... · .-*-*-*-*-*-*-*-* • • • .• • YES .REiDCIID •···.Z. •••X ..••••· • SlIP!S! * .. * ·IlJ· • : &2 ••• 1. DOCUX : •••• '1 ••••••••• : • •. .* •. • • LAST CCM : ". 110 • ".IIRITB M/O ca • " •••• *. .. i ". *..* * .. * i i *. *. * .". *YBS GBT CCM. • IIOVB TIC 111'0 • POlllTBD TO .X......... MOSl ARBA • .* C] .. AS .. i: 11 · *. •• .* •• • 110 ". YES ." •• •• 1 •••••••• ".DATA CHAINING." ....... ..••. D2••.•...•.•. ··•.•••D1........... . . . ................... ·.................... GOONJO .. i .e. ". NO •• NEIT CCM = TIC ..... .* .•.i • . YIS.. lOP oa •• •••••• 1101111 CCII •• 'US • ••••••••••••••••••• ." 1 * .•. *NO . _. IPS •• • ". *. 110'1 BI1:I1S :l'io·GJR~p.~: • .* *. •• aBTun TO •• •• AS : · .: ·.................. i • GET IIEXT CCII .... r$ .•.i •• •. • YlS •• BltS COUI., •• I.. ••• EQUAL zaao •• •. i *. * .. * • ·KG • NOIIOY! .* .* 110 i : •••• G5 •••••••••: .. . ................. • SToaE RESIDUAL COUIT • • • i : •••• 85 •••••••••: .. llOICATIl • • lICOIIU:CT • !LUG'fH I r 11111/. : ' ................. :1.......... : ..... I ..· ·KG • • J1* lUI. Charts iJ 91 $$BOCRTC - Write Processor Part 1 (Part 3 of 4) (Refer to Chart 11) Chart KJ. ..... .. ·KG • • H1· · 112.•. •. *. .* i •• •• iliAD CCW *. *. * •. * • .* ····11)········· · . .............•. ..... ... •• liS •••••• .* • • SIlARCH SCT BlTRI • • i NO ·IIH • • OS· 112.•. •. *. i IIB&DCIID ·····B)··········. · .. .. ..... ·................. . .... . · .... . . . · .•. ..• •• SIAReH i • • • PROVIDE ADDRIISS !lEGlS'fBRS •• IBS •• IIIII1'E 11/0 CII •••••• *. .*. * •. * i • ·KG • • J1. 110 i C2 IKS •• • •••• *. ..... i . e. TIC CCII *. * •. * • ·K8 • • • D~ • GOOUO •• .* .* • C1 •• x• •••• HIIiL S'lRG&1ID .* .* • • • • • • to •.:LUe{~~~6~1I:. SE1' ON ........... *. *. to ··.......... i * .. * • .* .* 1$3 *. .•.i •• • • • -. 110 •••••• .* • liS C) • .. .i •• .* *. •• IIESSIIGE •• •• IES 'fIPI •••••• ·OEPIIlIrIOI.· ..... ... ······Gl··········. ··................... *. * .. * • YBS .* .* i liD ·KG· • i DOCQU • •• G2 •••••••• • ··............. • SET 011 ALARII PLAG • • .....:x ••••••.••• : ..· • I • P!lOYlDE RETURN • • IltPORIIA'fIOM • X 101l0n 192 i :····H)········· UBOCBrQ : ............... • PlfCH 12· DOCGII1 ·KG • .. J]. • • • • i *•. * pj *. to. ALARII CCV *. c............ ••••••••••••••••••• 10 •• • •••• S1'IIIIIG BID •• • •• • GET IUT SCT BII1'RI •* •• • •• • •••• i • • i .•.i II DUICII: *. ·······D3··········.. ··.····D . ••····••·.. ............. . .·................ • •• K2 •••••••• 1'2 •• • 110 I .* •• ••• **. ...** 110 • SUI COR9BlI'l • SCIIEEI BOPUR • ADDRESS AlID • SCT POntEIL • I C) •• RIGH1' SC1' •• liS • ClLCOLUI •• EII1'RI POOID •••••••••• X. IIPPBOPRIII1'II: •• •• • LIII lDDIISS •• •• ·····02•••••••••. ................. GOON.. • • • • DOS/VSE Logical Transients U1'ORI • Chart KK. • • • $$BOCRTC - Write Processor Part 1 (Part 4 of 4) (Refer to Chart ~7) ···.11···.•.••. ............... OlrIU II&SSUI TIPI .. TISt' i a1 .'. '. l i S . ' IPL II ••• • ' . PIOGRIISS *. *. *•• * -. .* • • • ' • .' .* • 10 .'i . .•i~ssl:i •• •' IIIrll ' . lIS ' . IIUUISt' '08 •••••• ' . IIPLI.· • *. * •• * .* i •••••• H!t ••• ••••• • 110 i •* 01 . ' . ' . PUIIL • •••• Da •••••••••• *. • •' ' . liS • ' . PIOGIIIIIIII •••••••••• , . '. UU".' • 1II0It"1 '"'01111'1011 starus • • • ................. .. *' . .'* • • 110 ·····11 ••••.•.•.•• • i • • i : PlRrnf~1 10 : •• • •••••••••••••••••• • ·.·.12•• • ••• ••• II'IUII •• •• ••••••••••••••• • :.......... ,: ..... ',..........• • : lUiUUI: : i •• • •••••••••••••••••• i G1···.. •* *. .* (02···.. *. 'rlsr02 .* a:.. •••• *. •' HII088 -. US .' '18S., ' . liS . ' 811011 ' . liS -.ILPHIIUIIIIIC . . . . . . . . . . I'. CHIIICIII •••••••••• , •• 'OLLOIID BI . . . . . . . . . . '. 1.. .' .* Gil···.. ULID IIPB *. . ....................... :......................... :........................1: **. ••.** .' .IIII&DIC1II.... **. . ** •• ~ .~ '. BUI. **. .** .• .~ .' • •••• a5 •••••••••• 1.• ' . liS • Gil IIP8 liD .......... PIO'IDI '.1I0IClt'01.' • **. . ** .. .~ :11 .......... . Olirst' • _oJ1 .'. .··.HII.····.•·• ••• ·112••• •• •••• ULIISI • • 11.,011 •• •• ••••••••••••••• • i SKIl'rst' ' . *. .* oJ2 .'. e. ·. *..* .* *. e •• * • 10 ••.••.• •••• •• ·.··K1 IIIUn •••••••••••••••• • .* .* ' .. · . ·.................. UnlIL , ••• •• 115 •••••• • ••• • USIU'IIP& • III1ICI'IOllll • SC'I BI'III • • • •.......... 11: i .*. . '. • 8~ '.1. • 'nSIRI 15'111115.. '_ • ..... ' II '101'1 0' • • IIISSI611 • •• •••• •• ••III •••• • 'US 12 ··........ i **.••. ** :, .......... . i • • ·····.oJ!t···.······. ·.................. ' . e. liS . ' e. 110 . ' ' • ..... *.IBII POSe • 1.*1 •••••••• *. MKI!' POSe • 11.- i •• •••• • III' • •••• • i LUI •••••••••••••••• •• • • ••••••••••••••••••• :.~ • • IIIDICIIOI '. *. .* III .*. :81151 '. *. •' ' . 10 .' ' . liS • ' . PIlOGIIIIIIII •••••••••• 1'.COllrI.UarIOI •••••••• ' . 0111 .' ' . LIII .' *..* *•. * • 'liS *..* *•• * • 110 i •••••••••••••••••• • • I1DICIt'! LIIB • ·•...............•..• • AS I'IBI • : ............. :,........................ :......................... : Charts 193 $$BOCRTD - Write Processor Part 2 (Part 1 of 3) (Refer to Chart 17) Chart LA .• ··.... ...... ·.... ..... : u : • ·:n·····&3··········. · . ·................. .... . . .................... i * ····A1·.*·····* * * SlBOCRTD • ............... * • • .... .•. *. • NO .•. i · . ................. .... ··.... ... ...... ••.•.••••• . ·..... .•. ·····01 .. .. ··.................... i •••• *C 1••* •• * •• *. .* * •* *•• * •* *. •. * ·····£1·.········ * '1'ISPB1 i • CALCULATE HOIIBEB OF BYTES:tO BE TRlNSPBIB1!D *••• ** P'1 .... *. *. NO •••••• .• .* YES * • TR:SPB2 ........... 08 i i * • * i • • * • • •••• .* * : • 08 • i i : •••• J2••••••••• : • -. .x *. • : : & .*~*.. .... : *. •• • : 110 t'3 : ZERO BI'rE •••••• COUN'r •• *.. * .* ...:... ...... .... .... YES i 194 ALLOW POR NKII LIIIE .·................ ................. : .* •• *. *. IES ... •••••••••••••••••••• BETUBK TO SSHOCRT1 *. • •. * .• • NO Ell .* .* *. .*.i •• *. D&~A •• IES CHAIIIIlIG II •••••• CCII •• ..L&S~ *. *•• * • ..... .... ·.':.· .... .* i NO ·LB • • * ·LB" • : Dl. *.X. ••• •• •. rES i • Dl • • *•• ...... . ..... . *. •• F4 .* *=•*. *. * . . * .* • AJ • • Aq : DOS/VSE Logical Transients .. ...... • ••••••••••••••••• ••• * i * i : •••• F~ ••••••••• : • *L1S1 CCW NO .. lIIALIZE EXlf •• WRITE illO CR •••••••••• 1. COMDITIOIiS rES 1'1 • ······G. ····••···.• i • INHIBIT MEW LIIE ..................... . . ... • * HII .* .* *. *. •• * . •. YES ". WRITE WITH CR •••••• ..... .·. .* ••• .* i • 110 .* •* *. .. JI! ·LB • • E1 • " .•.i * • READ *. * •• *.* • III! .- ." .* • 110 .* .... YES i .* .* IiEIlCIID *. •. ..... · i ·LH • ... • l~. GOOK10 * • •. NO •• LAST BEAD-CCW •••••• *. *. * ••• .* .* • lES ...... *.Ar · i *LB • ·..!...••. : ····Gs····.···· i • : • : REP£IIENC£S. • • TO LAHII: • • *.1. LH&II. LBD2 :" •• • i i GOON 14 * UPDATE CCII BITE COUIIT 1'3 Fl : • ADJUST STARTING. • POSITIO. IN • : lin LIIIE : : •••• ..1 1 ••••••••• : • i i *. ••• *.• ·................... ................. *. • .... .•. ... DII • • • • • •• 1I0RE THA II •• 110 •• 1.. OllE LIIIE TO •••••• •• BE IPRD • • • : •••• tl2 ••••••••• : * •• ccw GBT MEX!' i TRSFR] &4 : TRANSFER DATA * INTO CUU!IIT * • LINE • •• RESET SSBOCBTO RETURII UDICATOB 04 ................. ..G2·*····· RESET • SSBOCRTO • RETURN • INDICATOR • • i NO ** * .* •• • • • i • • • • ••••• H 1•••••••••• . PREE SCREE. LINE .................. ... .x •••••••.••• : B3 : *.... : II 1 i ·····D)·········· i *. *. *. * •• *.* • • : * .&DJUST STARTUG. • POSITION or • : IlEIl LUE : LC* • SE&BCH FOR II PREE LIIIF. : •• YES ZEBO BIT!! • *. COUIIT .* • BII • *-*-*-.-*-*-.-.-* * SEARCH rOR l" • i : ._. • • ·····C]····*····· .SEARCII LC. . .•.. ..... ................. · .*. ·.... .... ·..... · . ........... ·.... . .... * •• * *YES iO .SEABCH ••.·*·· DOCCEl •• PB~CH : •••• &3 ••••••••• : • ··*-.-*-.-.-.-*-.-. ....·2.·.·.···.. *. .* .,~ G1 •• ••• ·LB· • : G4 ••• 1. ••• P1 *. *. NO •• ENOUGII •• SPACE III .* •••• *. CURRBNT • * *.LIME .* BII *,. •. NO .* •• • *···B~·· • ..I •• CCli CH&I1II11G •••••••••• X. UBOCBTC •. * . . . t ' .* •••••••••••••••• •• * •• * *YES •••• • • • • i i * . *.1. • ***. *.x *. i • • • IIOIIOVB X • 04 ••••••••• *•••••••• ·*1$2······· SET ON • • SSBOCRTO • * BETURN • • IIiDICATOR • • ·....•............. • •• *•• * • * *. .* •• NEll LIlIE •• BBQDlRED .CUT OPP IIESSAG!* • D2 • i • 81 •• x. ·..... ······Clt***·······. .:._.-83:. ................. ··.................. i NEWLIIIE 1 ·LB. :.... i • MO ·LO· • • E1 •• X. • D1 *.X. TRSFR •• •• • •. SET ON $SBOCRTO BETUIlN IIIDICArOR • • • • UPDATE SCREEII * .BUPFEB &DDBESS • ·····S3·········· •• UBOCBTQ *. US •• BETUIII •••••• *.INDICATOR.* •• 04 • GET CCII ADDRESS. •* C2 ..... ·&4 •••• • ••••• *• B3 •• 1. II1!11LIIIE1 • •••• l:i2 •••••••••• .* RETURN *. •• YES ..* .... REBUILD PROI! .* •••••••• x* CURRENT CCW .. *. SSBOCRTQ •• * • **. ••••••••••••••••••• .•.** •• •• i ALUrB UPD&TE PlELDS • CURBEIIT CCII : * *• i 61 All • B4 : * ............... PETCH UBOCRT& : $$BOCRTD - Write Processor Part 2 (Part 2 of 3) (Refer ~o Chart ~7) Chart LB. *LA * ..*•• * * • * *.* •• • i GOON 10 *****A ,*******.** · . .................. .... .... ·····61··*·*····· ·.................. * • * STORE RESIDUAL COUNT ·• * • .* . * -LA· -.E:• JII. · * •• x*•• ..... .LA • * KII* .*.i •• A2 i *. •. *. * * * .......... NO : i i lIIDICUB I.CORRECT LEIGTH IP REQUIliBD * • • .* •• •• •• cl *. *. .•.i *. *. .* .* . KESX ·.................. . *• * NBIILIIiI *. *. "'BOCRTA *. *•• * • * * .* YES i ..... .x ** ••• SAVE CURRENT SCREEN BUPPIB * ADDRBSS AID • SCT POIIITER ··. ·LA • • • • • * ·.................. • • .* • .. .•. .. .... D3 NO * .... •• •• i ..... *. i 110'11 BYTES • -.. ALAR II CCII *. .* •••••• .* •• 1111 • • SBT ALARR !lDICATOR ... • i *• •• •* •• .* £4 *. *. A1 • •• 110 LAST CCII •••••• •• z BBAIl •• *. ....* .* IBS x ... i *Ll * • 84* *• * i • NO : •••••••••••••••••••••••••••••••••••• X:l •••••••••• : NOBOYB ··.......... *. . * ...........* .....x * * *. * . .. .. YES *·E3··.···* .. .i •• KBS •• LAST • RBAD' •••••• •• CCII •• i • • : • 110 HII- • P5· * .•.i •• 10 X .* .. .*CII - • *. ... ~~~.: *. - f~~{~k~g; .*.:. *. .* * •. * . •• • ·LA • • ..... ·Ll • • 811· :I~io' ~~I~P A~i: i *. TO •• YES •••••• · . .·................ • • • *• *. • H4 •• X. *LA • D2· S8T 011 ···.·e3.·i ....·... * •* •• RETOB8 .* ·····B4·········· .. YES GET CCII POINTBD 1'0 112 .* •.•••. • i * i *. •• InCIID : •••• £1 ••••••••• : * * NO ·.................. * * .• * .. i • • ••••••••••••••••• • *.. * *110 GET DAU lDDRBSS *. • i ...··e2·········· *• * *. •• SKIP FLAG ·LA· • • * •. * • 110 DI *. -. * ••• • NO GOOlitt .***.B3 •• *.* •• **. **. ••. ** .* .... ·..... • •• .* .* · *. *. 112 *. •• TIC 11 : *'*. 'tIC CCII •••••••••••• 1:s~i~:Il{:glc~;ga: * KES ZERO 6XT8 •••••• COUIIT •• .* •• •• .•.i • • • •• .*. *. .* i *. . * AI • • .* •• XIS • .IIBITE wlO CR •••••• • • • ...· All •• P4 *. * . • YBS.· •• •••••••• SKIP fLAG SIT.* •. *. * ..• .* .* • 110 :1 .......... : i ··*·*G4*·*·.·.*·· ••- •* couaT •* GBT Dp.n lDDRESS lIID 111ft: ................. • * .....* • i .. ·LA • Pl • · ra~PR] Charts '195 Chart LC .• $$BOCRTD - Write Processor Part 2 (Part 3 of 3) (Refer to Chart 17) **··12···**···· ··................. • Gt:T FREE LINt: • i :* ••• 82 ••••••••• : SEARCH • • • PROVIDE ADDRESS REGISTERS • ** •• • ** •••••••••• * ••* .......... .1: :S'fRGnD C2 .!. •• .• .*FREE •• •• *. LiliE *..* * •. * • ADVANCE : •••• Cl ••••••••• : *.•••••••••• YES • 1. •• • • i GET HEIT SCI' • • EIITRY .* • * MO E2 .•.i *. • • .. i : • • • • J)) • • • • • • • • • : • IMDICATE • .PROTECTION AIID • : COITINUlTIOII : ................. ................. i * . *. ··.·E1·.·.··· •• • • •••• SCT STRING •• END •• •• *. • • • ••••••••••••••••• NO ····. ·D2··········. ·.................. • CALCULATE lPPROP. LIlli! ADDRESS .* *.. * • YES : RETURII : . . .··f2······· . 1l0CQEX i ............. .SET ON R£rORIi. • IliDIC1TOR • i : •••• G2 ••••••••• : ·.................. • SAVE CURREIIT • : CCII : • : ····H2····.···· • : i FE'tCH UBOCRTQ ............... 196 DOS/VSE Logical Transients $$BOCRTE - CRT ERP Paz:-t 1 (Refez:- to Chart 22) Chaz:-t LO,. (Paz:-t 1 of 3) ..... ··.... . ..... .·. ·LI • • G2· ERROR i : •••• &2 ••••••••• : ··.................. •••• A I ••••••••• • SSBOCRTB • A4 • ·······14.•.......•.. i : •••• a.l .......... : ·........-........... .•.. ·.................. ·................. • .. urrULIZE • RBTB! COONUR .X . . . • • ·....- SOPPIlESS CHAIIIIIIG • .1 ••• .GBT ADDRESS or • SENSE CCII • • : &2 : .* Bl .•.i •• .-. i PUT .* *. B2 •• *. *.. * • *. .* .. .. • NO ·····B)··········. ··-................. . .... ·· .-. i *. *. • SET BYTE COUIIT • • • EQUAL TO 1 •• BBTUIiN •• YBS •• HARD YES •• raoll SSBOCHrP •••••• . . • ' . . CHANNEL ...... •• IIRROR •• *. .* .* NO C3 •• x. •••• i * ••••c J •••••••••• • STRIO Lp • *-*-*-*-.-.-.-*-. ·····.B4••••••••••. ··.................. i • • IIOYE CCII UTO • IIORK PIELD • • . ·............ · i ··Cl ••••••• • • • RESET 0111 SBIISE IIiDICATOR • .. : :CIIK2 .* -. C2 •• *. .. •• •• NO • •• UNIT CHECK •••• X. • *. * .. * • :x ... ,•.•... : . .* ·.................. i ·.... . .... YES ... : i i STlUE .•.i • • K) ·............ *. *. * •• * • .* .* .•.i •• .. • YES.. -. NO ••••• ••• SEISE CCII ................... . *. *. . * ••• .* .* ···D3·.·····. ·............ i • • ··.......... • i YBS • • CII : D2 •• •• OMII •• SINSB ... NO •• •• NBCESSARY •••••• ··Dl·.····· RBSET • • RBTURJ paoli .. • SSBOCKTP • I1DICATOK • • • GET SEIISE IIIPORI!lTIOI .. RESET SEIISE IIIDICATOR • • • • J5 • Bl .•.i •• •* *. •• u~S • •• BETURII .* ...... • , P8011 ERP *. *. *.. * • .* .. SAfE CURREN'r • CSN STATUS : BY'lES • • : .. •• *. ................. .* .• BJ · • : RBLOCATB SENSE CCII .* •. GET SBNSE I1rORIIATIOH i .• 82 ...i • : •• ·.................. * ..• - •• .* .• I'll ... ........... x: •• *. .. ...... ··........ •• •• 110 • ..AIX ClIlIMING . . . . . . . . *. • NO C) : .* YBS .. : ···Ul········.- .RESET E8ROR- • • OK-SEIISE • • INDICATOR • YES ·LI • .l~. i i . .• J2 •• i *. • YES •• •• •• • ••••• rIRST TIllE • LOAD CCB .. :IDDRI!SS FOR CRT: *. .• ·LE. • i •* Kl •• *. *. * • .• ...... : .... J!i : i : •••• J5 ••••••••• : • • • KJ •• X. • 10 •••• : i DOCFEX INDICATE" • liARD IlAIT ••••••••• X. FBTCH ISBOCRTF • • 1'\4 OOCAU i • • FETCH $SIIOCIITA • .. ·................. i ..... ... .LB • • 82· NO i : .* • • • : .. PICM. UP SIlNS!! • : IN FOBIIATIOI : ,) ltllS •• NORIIAL SENSE •••••• FETCII UBOCRTC ............... : •••• J4 ••••••••• : !l0 DOC •• FH~.K2.~......... *. i ····Gs······.·· • INDICATE I/O • • • • ERROR FOR ••••••••• X. CLBAH CRT NEXT • • I"BOCRTA. • FIELD • : •••• J3 ••••••••• : •• . * • i I1DIClTB 'UAT • SIIIS8 VAS • PROCBSSBD : ................. KII • i : •••• J 1••••••••• : • • : .~ • .. *•. *.. ..... ·............ ·. ... ·................. . ................. .. ·................... ...... .. .... . .-.. ·...... :.x. · . . . .... . .... ... .... ......... •••• 1(4·.· ••• ••• .• *. · . . . ·................ * .. ..:... .................. ............... ..... - .... .... • ······ps··········. : DOCCBJ[ i *. •• •• NO •• ERROR ON •••••• -. SENSE •• • : •. • STORE STATUS • • n'ro USER CCB • •••••••••• * •••••• : •••• Hl ••••••••• : *. • • i •• ··••···G)••·••••••..• ................. LF. *-.-.-*-*-.-*- *-• • : ~3 • . • • ••••••••••••••••• YES i ·····G2·········· • STRTIO • . .. .... i • GET ADDRBSS OF • : SYSLOG PUB : • GBT PHYSICAL : I/O ADDRESS : ........... X: ······Gl....··.....· ·.................. ... CHUITST • •••• E" •••••••••• •• N O . •••••••••• X. RIDErIIIE CCII •• YES •• • •••• FIRST TIIIB •• • : i i *. i ·..........,........ ...... • SAYB REGISTERS. • • OF PAILING • PHILSE • -. *..* •.. * • ·····F2··i . ·······. i ••••• '1 •••• •••••• ••• ERROR ON SENSE NO . ·.................. · i . ······£2·········· i : 14 : A2 : Chaz:-ts 197 $$BOCRTE - CRT ERP Part 1 (Part 2 o£ 3) (Refer to Chart 22) Chart LE. *.*.* ·LI) • • • H~. · GO ······12····. ·. ···. ·....................... i • HBSTOtiE CSW : STATUS BY'rES ··................. •• ··A3 ••• •••• •• .SEND ERBOR IISG • • : ·LD· • • J:' •• X. :.... DOCPBl • • • ····81··...···· PETCH SSBOCHTP i 82 • NO •• ••• ·..···B).······.·'·. ·................... *. •• • SE,. UDICUOI • : rOR BARU COPY : .1 •• •••••••• INTERVEIITION •• ••••••••••••••• • ·.BEQUllf!D •• *..* *.. * • YBS i····· .................... . ••• •• C1 · . ·.................. i INTi •••• ·····C3·········· : •••• C2 ••••••••• : .GBT ADDBBSS or • •• COIISOLE •••••••••• X. INTERVENTION • •• •• • "ESSAGB • •• 12SD •• VBS ** . . ** .. • • • ••••••••••••••••••• • 10 ······D2········*·. ·.................. ·.................. ·····D1··i .....··. • REsn • DISASTSR lIfl) • POS" PLAG • III CCH • • • • ·····E1·········· i • 118SS6GB CODS liTO LOll • • 1I09S • • • • CORII: • i SUDIISG •• .* CLBA!! INS:lRUCTIOI LIIIS ····................... i i •••• ·03 •• ••••• •• • .RBSBT DISASTU • • &iiI) POST rUG • • IN CCB • • ·····B2·········· ·.-.-.-.-.-.-.-.-. . GET SISLOG ID • i • SBIDIISG • • • i ·····13 ••• •••• •• • • IIOU EIIIOR • • IIESSAGI TO • • IIIS:l!!UCTIOI • • LINE • LB. ·.................. ·.................. ·................. ····.r2..•·•.•.•· ··... ... .. ·.................. • SIND IIIISsaGI! • : ••••••••••••••••.••••••• X: i. i ·····F3·········· .SAYE LAST FOUB • • CRlRAC1B!!S or • • LAST IIIISSAGE • • LINg • .. • IIAIT r08 • • • ·INTERRUPTS • • •••••••••• * •••••• .* •• G2 ....i •• i *. •• .····G3·········· .USRRT COITROL • • C8U6CfSB I I • • PROIIT OF III- • .STROCTIOH L1I1 • rss •• UN8f!cOVERABLE.· •••• •• ERROR •• *. *.. * .' • ItO ·................. . i ..... .... . ... ··...... ... ·LO • • 12· • i ERBoa : INDICAr& : • : RETURM raoll ElP .. : SXIT ... ··.H2·. ••·••••· Hl •• 1 • •.···8.3·········· IISG3 I ··................... .STITIO Lt. *-*-*-*-*-*-*-.-* ................. • OISPLAY IIBSSAGS. i ······J2··········. i "SG2 •• • •••• J . . . . . . . . . . .. •• • RESTOBB LAST • •• B880R •• 110 ... CHARletBls OF. •• DORIIiG 1/0 •••••••••• 1. LASt' IIBSS6GS • •• •• • LIIE • J3 ••• •• • RELOAD .. • 8I!GISTEBS or • : CALLING PHASE : ................. *... *. . * i Kl .* •• .•.i •• ·................ .... ··...... ..... .. • •••• K2 •••••••••• • Ps'rCB PRASI:: • ••••••••••••••••••• • US •• lIS •• •• ••• FIRST TI"B •• *. i. *. ••• *.* .* • 110 • H.i • : DOCPBl1 I ·LD • • K2· · 198 DOS/VSE Logical Transients ...,".......... ··............... .. i • RUDa. • Chart LF. $$BOCRTE - CRT ERP Part (Refer to Chart 22) (Part 3 of 3) .....: i ·····A]·········. * • -···*11·····.···. : • • : ............... I/O ROUTINE S'fBTIO it ··81·····.· Al : : SAVE ECSW AND • CSW STA'rus • BYTES : ................. CHK EIIABLE, THEIl_DISABLE POI! I/O_ . •• •• --........... * .• *. B3 i .*. •• CHANNEL EIIRORS *. *. . .. •• YES •••••• .* *••• • NO ***** • .. · .. • it ·····cl·········· S~~TC~:' : • • CHK.i .* : • • SENSE INDICA'rOR C3 *.X. •••• X ••• C3 •• ................. • * *. it : •••• U1 ••••••••• : • * ... ................. : *. : :x ....................•................ x ·.................. .• •• .* *. .•.it Fl -. *. BUSY *. *. . * • .• D3 *. NO ...i •• *. CKECK *. ... .• EBRl : •••• D4 ••••••••• : . •.•••••••••• YESX .INDICATE 1. DURING .* • EIIBoa • I/O • .. • •••••••••••••••• NO : 1. ••••••••••••••••••••••• : i ENBL : •••• 83 ••••••••• : • : SIO * . !ES. .• * • srIO i : •••• 81 ••••••••• : * * * .. * .* •• (JUT * • RESET I/O ERIIOR INDICATOR *. .*PROGIIAII OR •• *. ••PROTECT 1011 • - •• I. CHECK •• RESET SYSTEII IIASK • : ................. * • i . *..* .... YES. • •••• P3 . . . . . . . . . .. : . '* ............... RETURN : NO it Gl···.. .* •• EX *. •• CSW STORlm *. *. * .. * • .* G2···* • •• U : S . * .* • *••.••••• x*. NO *. *. .* *. ATTENTION **. .. ..• • .• . YES • • - •••• NO :x ..•....•... it TESTIO ·· i ·····H2·········· * • .* ................ •. . .................. : ••• *H 1 ••••••••• : * SAVE CCW AtDRESS TIO * it •* •• .* •• J 1 .*. *. i *. BUSY *. * .• * .- • NO ... *. . *.•••••• IRS. •• x i .* K1 *. •• •• NO • •• DEVICE EMil •••••• *. *. * •. * • .• YES ··...... .!.. • A~ • • : .- : •••• J2 ••••••••• : * • : PROYIDE HETURIf ADDRESS ................. • :* ••• K2*.*i •• " ••• : * : •••• KJ ••••••••• : RES'rORl!·· cc~ lDD~ESS : •••••••• x: • : .. .............. .... . ...*................ ..:... : LPS~ : ..... CJ : Charts 199 $$BOCRTF - CRT ERP Part 2 (Part 1 of 4) (Refer to Chart 22) Chart LG,. ··................. ····11···.····· • UBOCRTP • - i ·····B)·········· • • ·.................. • GB'l' IDDRI!lSS 01.' • • StSLOG PUB • - · . ·.................. i ··.··C)·········· • GET PHISIClL : 110 UDnss • : ·····0)·········· ···................... i • 10010 cca • • ADDRESS OF CRT • ..... ..:1........... . •• • * · . ·.................. • i H2 .•.i .. .. • HAIID •• CHAIINBL •• BRIIOR •• *. *•• *.* G] 110 .•.i ••• *. * •• *.* NO ............................... . • IES i •• · .. . ··................. ••••• • •• • J2 •• x. H3 • • : ...............: .R!~B~I·· • • BQCHI(1 • RECOV:.! • •••• 11" ••• • •••••• •• tES • PROHIBIT • • •• IICEPT. OR . . . . . . . . . . 1. rURTHER SIISE . . . 1 • •• COlIllllD •• • BY SISTIII' • • HUD lUIT ••• .* *. •• OPI8&TI0N •• ·LH • • 82· •••• J2.~ ••••••• .* oJ] • 110 .•.i •• i .••.1. ••••• ·LoJ • • UIIICO" *. •• •• YES •• BIIUIPII£IT ...... •• CHECk.· • *. *•• *.* i ...... ...,. .. · • liD i .LII • 200 .. *. •• •• UNIT CHECK •• •* RETRY *. •• NO •• COUIT BQU1L . . . . . . *. Ilao.* *. *•• *.* .x• • YES ••••• •••• HUllun •• •• • * ·.................. • UPDATE RETRr .. COUITBR i 1.'3.•. .. *. • ···....G2··········. ··.......... NO i • ........ : *. • J2 • .* YES.. • RE'rn • • i oELU NEXT : •• *. * •• *.* • E2· •• •••1.'2·······..·· .•.i •• tES •• UNqBCOVER1BLE.· •••• •• E811011 •• .LH • ER 110 1111 B3 ••••• ·LH • • &5· BQCHI( • DOS/VSE Logical Transients $$BOCRTF - CRT ERP Part 2 (Part 2 of 4) (Refer to Chart 22) Chart LH. ............. .... •••• * ·LG • • JJ. i EXIT : ••••• 1••••••••• : ·................... • IIPDATE u'ral • COUlTER .* IU .f. •• • ..... • ..· ·LG • • H2· • *..* ······Cl••••••••.·. i • • .. LOAD ERROl 118SSaGE IDDBESS · i • • • ·.................. . ·····D1 ••• ••••••• • USUT SBIISE • • Bna lITO ERIOR' : 118SS,GB : .................. ··. ·. C2·········. -e-. i • STHTIO B2 : •• * •• * • · . ·•..•.............. . • .... . ··......... .....',........... ·.................. ·····E1·········· • nOID AUDIBLE' • ILUIL • •* E2 .* • • •0 ...... •• YES ....... .... *. • -*-*-.-.-*-*.*.* SEID BlIOR IIBSS.GB • • .* '2 .t .* **. .•. ** .* YES ... ··EII........ .. SBT • SlBOeRfr .. • IBTUIlI • • I1DICATOR • ....... . . i .. 'U • • 1'!> • ·LG • *. • 1'1 .. i ...... EIIIORII •• ·............. :X .......... : DOCUX i • •••• P'1 .......... . • • • • • ••••••••••••••••• i ·.................. • • ••• '11 . . . . . . . . . . PlfCH PHiSE • NO i ..... ..· •••••G1.1•••••••• ·LJ • • A1· • IIflSB'l' CONSOLE' .. lIlIITBI • • COITIOL PLlG • UUBCOV · . ·.................. ...... i &II : e. 10 • •• * • •• •• US • SET ON ilETUl1 • •• UIIT CHECK . . . . . . . . . . , . to SSIIOCBTE • •• •• • IIDICITOI • • "GBr lDDRIISS 01' • .. IRII08 IIBSSIGE • •. .. P2· I LJ. •• * •• * • • ULOID • • REGISTERS 01' • .. CILLlIIG PHIS! • i •• HARD •• US •• CHI.lilL ...... •• BIIOR •• • P1 •• X. 'SENDIISG .•.i IJ$S i DII ... ." IS •• •• CALLUG •• 10 •• PHASE ...... ".IIBOCRTI •• e. : i • i •• llIaOR ... DURIIIG •• alTRI *. •• •• RBT8I •• 10 ". COUI' I$UUIL . . . . . . •• ZEIIO ." i i D2 i B!> i •• .. ··CII••• .......... . ~n::TI~~ •* • • • 82· : ................... .: ... ·.. ... .............. .. .•. .. .. • •• * .. '" UPDATI IIUB! .. COUI' ··.... ....'.. . C!;··········. ·.. .. ··..··· ................. .................... ·...... ... ....... . . .... LU *.e .•••••• * •• i ·····'51·········· .. .. EUCHI ·............. • SKT OP'P • • DISISTEII PL.c.; • • III CCB .. •••••••••••••••••• •••• : • • .... ·LG .. • JJ. ·.................... .. ·811 ......... . • • ··.·;IS i i E\lCHK1 i • •••• 112••••••• ••• *. ···.11·······.. • SBT 011 PHASE • .. RUURI • • UDICII%OI .. •• IKTIII " NO • GET IDDRESS • •• COUIIT EUUIL . . . . . . . . . . X. 01' SCIECII CC • • , ••• •• ZERO.· • • IIlT1 ..... .. All • i ····G:J········· ·.....•.......... • • PUCH IIBOCITE • • i : .... III : Charts 20il $$BOCRTF - CRT ERP Part 2 (Part 3 of (Refer to Chart 22) Chart LJ .• 4~ ·····RKPBRBlICES • ·1'0 L.JA1: • * :.LGHII, LHP2 . ·· .. ·................. .··111·••••••. UUBCOV i ·····Al···.······ • • GET ADDRESS or IIESSAGE • • • • • i NO •••••• ........... *. • • • ••• ·.................. SSBOCRTG *. .* .* •• .• * .• * • YES • . .* ••• IISGl • : i £1 • • • X·. *. *. •• .*HIRD COpy.. 110 • •• OPEN •••••••••• x* *. * . . * .* * .•. *YES ····E2········· PETCR "BOCRT. i • INITIALIZB POR • HARD COpy : ·.................. : i CLEAR INSTBUCTIOI LIRB :UBl)ilAIT • • • : •••• E3••••••••• : • • • ••••••••••••••• • ·•••••.,1••••••••••. IISG.o! • •••• B5 •••••••••• *. • .• ·.................. • IRsnT SYSLOG • : III : i ••···P3•••••••••• ................. • • • : 1I0VE IIBSSAGE TO INSTRUC'rIOIi LINE • • • : • ·····C5········.· i •. TIllE •. • * • • • • •••••••••••••••••• •• YES .•.i *. • i DOCIEX •• CII . ... *..* PIBST .IES •• .• •.•• .• 110 ······D]·······...· ··.····0............. . ······••·... ·.................. i SET EXIT CONDITIONS ••• **. ••.* . :.......... 1: • : BII EBROR •• NO • IIESTOIB CS~ DDRlRG 1/0 ••••••••• • X. STATDS BITliS *. *. •• ·.................. ······01..•.···•·.. ·.................. • • SCBEEI 1/0 i -. TO •• • SET IMOICATOII • : POR HUD COPY : • • ·.................. •• . LJ. .-.-.-.-*-.-.-*-. • •• 1· • i Bl i ······e3········.· i ·····el·· ..······ *-*-*-.-*-*-*-*-* SEND ERBOR IIESSAGE ••••• &11.·· ••••••• .STRTIO LK. IISG3 ............... .* •• BETDBN SET OPP * • DISASTER PLAG • •• II CCB •• • • OISPLU ERBOR IIESSAGB SENDIISG • .SEltDIISG ····A3········· i HAIID IIIIT • • BESTOBII LAST • .POU8 CHAIIACTIIBS. .OP LAST IIESSAGI• LIIIII • ·.................. ·····05·········· i • UlIICA1'1I THAT. • $$1I0CBT' GilTS • • CONTBOL "TEB • • ATTI.TIO. • * I1TIIBUpTIOIi e ................. ······115·········· .. .... ·................. . i •• •• SVC 7 IIAIT .. P5 .•.i •• •• • * .. •• DISASTEB •• IBS •• PLAG III CCII • e •••• *. *. • .• *.* • 110 •• i *.* •• ... ·LH • • P3· • : i ····Gl········· ............... PETCH $$BOCRTH DOCln i ·.................. • SET CSII • STATDS BITES • • i ·····tt3·········· .SAVB LAST pOUB • • CH&81CTl!RS OP • • LAST IIESSAGE • ................. : LIME : i .····Jl··.·.· ..·. • USERT COItTBOL • CHARACTERS IN • PRONT OP IN• S'I'RUCTIOII LIII! • • • ••••••• • ·.................. 202 i : •••• Gl ••••••••• : • : DOS/VSE Logical Transients • : ····li5········· ............... BETUn * : $$BOCRTF - CRT ERP Part 2 (Part 4 of 4) (Refer to Chart 22) Chart LK .. ··...... ••• * • .. : ····A2···.••··• SCREEII 1/0 ROOTIMII ............... ······A"··········. i • ·.................. • SUB BCSfi 1110 • • CSII S'l'ATUS • • IlITIS • : i STllTlO BII • •• 82 •••••••• • • ........... POB 1/0 .•.i •• .* -. •• CHlIlIIL •• III1ABLE • TUII DISlBU • ... 14 • •• •• *. ERIOI . ··...... .. *. * •• - .* .* IBS •••••• • liD • CII •• X. •••• X CHn ••• i ·····C2·········· CII • S8'l 0l1li SBIISB • : •• •• ·.................. !MgI~A~~5' *. . *. • •• *. .•.i .. .. BOSY *. • •* •• •• G2 .* . YIIS. •••••• i .*. •• Gl ~..* .• •••••••••• *..* * •. • :x .......... . ···.................... TIO J2 .* *. •• .•.i *. * •• - *. •• YBS.. •• .* ....x .* • 110 ... •• i .* •* 1\2 *. *." .- .* ··.......... • liS i • 111 • .* liS i i • • ··................. ..··GII·.·••• ••• • RITOII • 110 SUI cell lDDBlSS • • ·····Jl·········· · .. ·................. ··.....IJ........... ......1............. ...........•...... ................... • • • PIOVlDB RITURI lDDBBSS • • • i *. *. •• DBV ICB liD *. .* i •• BUSY * •• - ·..···Hl··········. ·................. • • • •• *. i i : •••• 82 ••••••••• : • -. i X.. *. lrrEIiTlOM .• •• * .. * • NO TESrIO . us .*. •• . * - . •• YBS.· *. •• •• • RlSBT srST811 • IIASI NO •• CSII srORED *. .* ... .UDrCArl BIBOR • • • DUBIIIG 110 BIIBL *. •• 011 ···.···111••••••••••.. ................. : .......... x: .·....,............. ·................... : 1IR11 SIO P2 110 . IISI •••••• :X •••••••••• : i •* •• .* • • ······112······. •··. ·.................. : * .. - .* 110 •• • ••••• UIIIT CHICK •• • • :x ......•.......•......•... x STIO *. .* •• ·.................. USBT 1/0 BBBOB IIIDIClTOR CHICK i i ······02·········· • • • •• .* PROGR11I *. •• .* 10 .• •••••• • • LoaD PSII • • ••••••••• 1. RiCsrOl1 CCII ADDRBSS • • ·......... i : c.. : Charts 203 $$BOCRTG - Write Screen Message (Part (Refer to Chart ~7) Chart M1. ··.......... ..... .·. ·IIC • • J4· ··................. • ···A1· •••• • ••• • $SBOCRTG • · ................... .•.. ··.... .. ·.X. • .* 81 .•.i •• *. *. i .* * • * • * .. * ... YES IIIsBRT IIITBRVI!IrIOI REQ. IIESSAGB ··· • tiET llil'l LUB • i i •• B" ••••••• • ·.................. ·.................. • LOCK ,nBOARD • • IP IPL /lEsSAtiE • • • • • /10 •• • SET opr • I1DIClrOR • • FOI GII1'TIIG • CO.TROL • • •• ••• i • 1111 • • CII ' •• · . ·............ i ··C1·· ••• •• • •• RESIlT INDICATOR • •• ······CJ··········. ·................. . .... ··........ ····.C2·········· i i • lIIDICI'U LIIE • • ' DELBTABLB' IP • • 'IiBID' IN • • CHANIIBL PilOti • • ·.................. • INsur : . • ·····111·········· ···................... i • • BRANCH VIII REGISTER 1 • • :x ..•.•..... : · GO . ............ i .ADVAIICB • • ." RESET • • INDICATOR POR • • SiBOCRTN • IIC. GET PIRST SCREBII LINI$ . ·.................. · i • • • * PIIEPARE PID/PIK "l::SSAGE III • • i ··.··Gl·········· *-*-*-. -.-.-.-*-* .SEIIRCH • • • PIC. SEARCH POR • 1ST PROTECTIID • /I ESS"lGE • ................. ..... ·IIC· : ·.................. • • 1l2J ••• .* *. * ••• ..... .• i MO ·.................. · . ·........... . . .... ... ·/IB • • 106 .. .. .* •••. * •. * • YBS PLAG LIII! DELETABLP. II' 10 RIIPLI R£QU 1 Rf!1I ······r"··········. ·.................. i : •••• '3 ••••••••• : i *SE"r OPI'/BIISTORE. • ALAR/I COIITROL • • rLACO • ·.................. • • • .IORODT ................. : ' . i • • • ·................. • • WRITB BurrER ONTO sCHBBM ····..H2··········. ·.................. i • : GET NEIT SCHEEl! LIn .• Hl .•.i • • • •• *. .. .. ··.......... i ••• * • ReSI$'!' LINB COUlTER TO ZERO rES • • • H4 •• X. •••• I COUN:r •• INTBIIY. •• NO •• REQUIRED rOR •••••• •• HC DISK •• • : • • • ••• •• GII ••• • •••••• IIC. • -*- •••.• -.-*-*-. • • • sAYB TH1T AOD8Bss POR HARD COP I · . ·................ . .... . ·· .. .. i ·. ···Gl·········· i ···.·G2·········· •• •• .* II" ••• •• *. •• NO PIO'l'EC'lED •••••• •• LIIE •• *. i ..... ·"B • .* * .•• *YES i .•. i &2 : .* J2 •• i •. ••• JJ •••••••• .. • NO •• LAST LINE •• . ...•. *. .... •. * •• * .* .• • • YI$S REI'ERBNCr.S. • TO "AKl: • • • "x· IIBA", 118K4. • •• •••• .• 112 .•.i •• .. .. .. .. i .... ··.... .. • ............. SET opr POST FL1G II CCB • • • i *. •• INTERV. •• NO •• IIEO. PO"! HC •••••• •• [15K •• • • • YES ··.......... i • ·····Kl·········· • IIIDICATE THAT • • SSBOCHTG GETS • • CONTROL AF1'BB • IIrTl!IIUOI • • • INTERRUPT"" • .................. DJ • AJ • DOS/VSE Logical Transients ·......... i : &II : ... • -12· • CII • * ••• 204 .sEARCH rOR 1ST • • PROTBCTBD • IIESSlGB • • ................. •.1:• .•.i • • • : i .-.-.-.-.-.-.-.-. .····BII •• • ••••••• .SEARCI! IIC • • SBr opr/RBS1'OIB. .COlIsOLB PUlrBI. • CONTROL FUG • : x•••••••••• : • SET OPP ALAIl". • liND UNLOCK • 10 KEYBOAilD • ·............ RESET • INTSR'. RBQ • • • IIOICATOR • i P2 •• •• LIME •• • .BIILO"Gs TO •• NO •• CURRENT •• TASK •• P4 .. *. x. : • : •••• B1 ••••••••• : *. •• •• YBS •• PROTBCTBD •••••• •• LINB •• • R8S;:··•• H 1••••••• i ···011·.···.·. i • PREPIRB SCUBI • :CHAllIIEL PROGHAII: .•.•••••••• .1: • ••••• 1'" I •••••••••• . •. •..* i : •••• Jq ••••••••• : ··................... • UPDATE LINE • COUNTER BY 1 • • ·..,,,........ i • 11851$1' PIiIIIr • BIt II • • • .ltTa. BYTE •• ........... ··........i .. • l!> • .* • IBS i GOOI D1 •• 1. S1'&81'IO I : •••• D3 ••••••••• : ·.................. : RECOG ··Ill······· ... i ·····D2·······.·· •-.-.-*-..-*-*-.-. *. LASt LIIIl • 141· • RBSET PUGS • • COITROLLUG • • CURRBII1' CHUIIIL. • PBOG!UII • : *. •. .* BS ·IIB • .I RBSB1'l • SISLOG ID i .. ·····AS·········· ... · . ........... .... .... ··...... ..... ··...... .1. .. . ... ·.··,••C,,·••••••••.• ................. ·····B3·········· i .* • • • 12 • : •••• 82 ••••••••• : *• •• 1lETURII PRO" •• 110 •• SCREEN IlRP •••••• CLBAR INs1'BUC1'IOI LIIIE .. .................. i •• ••• 64 ••• •• ••• •• •• 5VC 1 •• •• IIAI'I' •• ·.................. • • • • AS • .. .... ·.·............... . : •••• 13 ••••••••• : • • • • ··.......... .. 64 • i i ·····. 2·········· • ··.... ...... • 11 • ". SBT ON ALARI! • Bir IN SCREU CCII IF • III1CBssABY of 3) ~ • • .* •• Chart MB. $$BOCRTG - Write Screen Message (Part 2 of 3) (Refer to Chart 17) ... *. ·"1 • *****,R1!lKREIJCgS * . '*1'0 IUIA1: •• E~. * * :*'IIAa;. flAK" " i GOO II .* *. •A2• •••• *. .*. RESK'r ••• * lOb j ••••••• **. . ** •• • .... .... DO~AEX i ·................ FEtCH .SIIOC!!TII • • " : •••• FE'rCH USOCIl'U *. * ..• * "' .... *. .* .• i: ..... YES . *IIA • •• K~. i ····8]········· •• : All : : G\ *. X. ····02········· *. * • A4 •• PROTEC'1'ED "'. NO •• X.. LINI'! •••••• • ••••••••••• • YES ·I!C· • • .* RESEt • liARD COpy •• 110 • I'ROt'.t!CrIOII • FILE OPt;N •••••••••• X.bl1' OF III!SSlGI! • ."' • IIR1!A LINES • .*.i .* BQ ."'.i •• 102 * • *. •• 'R1::AD' II •• CH .. NNEL "'. PIiOGRi" • : ............... *. * ••• • .* .* NO ."' •••• lES ·.···.c. ···.·.··... i • OELETE ASTERISK"' " III fROlir OF • : IIESSAGE : ................. i D4 .*. "' • •* •• HARD "'. *. *. *. COpy OPEN *. * ••• • .* .• . YESX ." •••• NO i : •••• £4 ••••••••• : INDICATE LIIIE * 'DELErAIlLE' : ·.................. • : : x•••••••••• : 101 i : •••• P'" ••••••••• : ·................... * "INSER1' PIK/P!J) " MESSAGE ID "' i : •••• G" ••••••••• : * IIISEn PRINT • FLAG 1111'0 • ArTIUElUT.t! [lyrE • • • • • ................. i SUBSTllU'EE " ·····H~··*··*···· • IIL1NK S rOR • • • CHARAC"ERS • :LESS THAN 1'110': ................. . i ••••• J" •••••••••• " • : GE'r NUT IIESSAGII: LINE " : ·................." • "' •• •* *. K~ *. ...i: •• LAS" LIMP. *. ". NO •••••• ... .- -... - • YES : 102 ..... X .. ·!!II • ...... i : .... A4 : "' K2* " Charts 205 Chart MC. ** $$BOCRTG - Write Screen ffessage (Part 3 of 3) (Refer to Chart 17) •••• '1 ••••••••• • SCREEN 1/0 ...............• .... . * •• *.... • i ROUTIM!! * • .. : • .* 111 ••• •• NOATTENT • •••• 112 •• * •• *. • •• IITTEIITION *. 110 • *. PEIID.lNG •••••••••• X. ** . ••. ** • .* • i ·····84·········· * * * * • • • • ........... x: 3. •• c.. " ····01·.··.··.. • ............... *' III1ANCIi INTO SUPERVISOR (SIO) ... • • .* D2 • *. *. *. •• UIII'f •• EXCEPTION *. *. * •. * * .- .* *. ." .... .*.......* NO GE'r IIEIT *. *. .• .* US . . . . . . . . . . 1* • *.. * • NO ·................ PETCH SSIIOCBTE • •••• "••••••••• ... • • • .* NO.* . ... *. : BETU!!N : E.. ... *• SCT STRING •• END *. ... *.* • .• * •. * • YES • * •• .•. i F4 *• .* *• U~r~,~g: .:*~~~. i • ***1'2 •• • . . . . . . i • i *····EJ········· •• •* . *DISAStER *. *. FLAG •:.*. *.. * .• * * Gil . • .* ..... i NO .*.i •• *IIA • • • H~* * RESTK . "INTE'IV. * . *. NO *REQ. *.. •• FOR HC . . . . . . DISK •• *. * .•• .• ..i.. o YES *IIB • * 81* :* ••• • * i 84 •••••••• *: DEFIIiE IISG • UPE Ull TASK ~ 10 : * i ••••• J" •••••••••• .................. •* UNLOCK KEY80UD * ·IIA • A2· * • * DOS/VSE Logical Transients * • .. • i ..... * *• * OOCUll ................. : 206 * • ................. • * • •••• 05 •••••••••• • : SCI ERUI ... •• .* •••••••••••••••• *** i i -CALCULATE LIMI • lDuaESS - i ' : : •••• c~ •••••••••: *. ······D"··········. * &DVAIICE ........... x: * .. * • MO *.•••••• YES ............•.. :ADUICE .. .. 81 ... .•. : •• PROTBCTBD •• us . •• LIME ........ • • : i E2 " •••• Ii!» •••••••••• * • • : S 'fHG END i IOIlETlIN i PITCII UBOCIITII i ·····Co2·········· • • : PROVIDE ADDRESS BEGISTBBS ....................* · . ·....... .......... ................. *PROVIDE RETun • • 1IPORII&TIOI • • • • : SElBCH *••••• PROVIDE SUPERVISOR IIF " • ••••••••••••••••• YES i ·····cl· ........ . * • * SI!ARCH SCT EII'fn *.1. 81 10BOUT *. ····14 .•.•.••.. ............... ...............RETUBII • $$BOCRTH - write Hard-Copy Records (Part 1 of 3) (Refer to Chart 17) Chact MD. •: ····'1····.···· ...............* UBOCRTH .* til .•.x *. ....* ....** : **• *. *. * .• * * *. .* * .* .•.. NO ······Cl·······...· • • : SAVE ACTUAL ADDRESS POB REDISPLAY ................. .* ·.................. .. C2 .•.i *. * i ······Ul···.····.· . . ................. .... • ** • .... * ... = NIIAP- "'. 110 *.•• AROOND ADD II •••••• *. .. * •• *.. *BII • .oo YES :.CII : ~n~T~g~yJ~UEP!I:Ug i ••• *. • AROOIID lOR IIlLL BE Cl UPDATED SOON •• NBAP- oo. • •• A BOOND ADDB.. USX oo. TO BB UI'DATED.oo •••• •• ItO * * ................. *. . ·CII .. .* •• *. .. *..•...* • RBJlEPIlfE • • LINE STATOS • II' 'READ' IN :CHUNEL P~OGRAII: • • : CRECII ~p OVERLA Y !!ODE IS nURE!) *. .·aCTUAL *. ·····n2 •..i ·.•.·.. * CRTHOIIO ·BII .i Bl *. . * :x ........•. : INSERT IlATB liTO HA RDCOPX RECORD • • : *. XBS * .* .CONTINUATION • * •••• •• LIIIE •* *. .• FINIl ANIl EDIT DATI! • •• 1* : .*** : •••• 82 ••••••••• : X • : : i •• •• XBS ·.CONTINUATION LINE • . "' *.*. III : 82 .•.i DJ NO "'. OVt:RLU BODE .. • •• * • .. . •• !ESI •••••• ..... ··.... . . .. .• • 110 • Dl ic i *• .* *. * •••• *. i : •••• 82 ••••••••• : El •• •• INPUT OIlLY I'ROe •• NO INS'lRUC'lION • •• LINI! •• .- * .. * • YES * : I'IND I'A B'rIT LON-II> • : * * ................. • • i * * ** SET LINE POINTBR TO INSTRUCl'ION LIME ·····P2· ..i ·. ·· .•• • • • * * *• INSliRT PAIITITIOII-Ill INTO HARD COpy RECORD "' "' • • ................. ."'................* i •··G ,••.••••• i ·····62·········· • * RESBT • • • .. : • lNST~UCTION • *• LINE INPUT • INDICATOR * ........... INSERT CYCLE BIT INTO HARD COI'Y R£CORD • • • : ................. * /IF-SSAGB TEXT lITO HARD COPY RBCORD * ................. i .... ** ** *.... * : 8l Definitions: : i ·····H2·.··· .. ··. CR1'l! 110 :~~~!~.-.-.-*-~!: • WIIITE RECORD TO HARIl can FILE • • • * ................. i .... * *** ....•* • 83 ** RBSET PBorEcrIOII OF ClJRRElir LIME • .-*................* ..........."' :X ..•••.•••• : i ··.-*-*-.-*-*-.-.-. . ··Pl········ .. CB'lH120 .UPDATE • * • 111'* UPDATE ACTUAL • DISI( ADDB£SS * * ................. ... i • •••• p" •••••••••• **.. SET LIIE £'OINrn TO IIElr LIMB G3 *..**.END *. 01' *. 110 I'lL II •••••• .... * .• .• i ·····HJ········ ..* • * ."'.................. .....:Xx •••.•••••• . : INVERT CYCLI! BIT' * * .-. i *. *. YES • •* • • .*................ • i •• :x ..•......• : i ·····tt1·· .. ··....** ** Non ** IIIDICA'rE OVERLAY !!OOE :x .......... : : •••• p , ••••••••• : i : •••• 8" ••••••••• : ••• £] . . . . . . . .. * Ell • E" - - ... Gil •• *. .* ANOTHER *. US •• i.I.1i TO 8E .* .... *. RECORDED. * *. * •.• . * * NO ... i HII •• ." IHPUT •• • •• ALSO pROIi •• US. •• IIlSrBUCrIOI • x. LIIiF. •• *. *. * •. .• * •• * • 110 i • ••• * . *IIE "' ......i... •. 01 • * * * *BlOO actual address disk address of the next free record position in hard-copy file wrap-around address = disk address up to which hard-copy file was already printed by system utility PRINTLOG overlay mode parts ot the hard-copy file ~hich were not printed by, system uti1ity PRINTLOG are overwritten Charts ;207 $$BOCRTH - Write Hard-CoPY Records (Part 2 of 3) (Refer to Chart ~7) Chart tiE. ..... .·. .•. • 110 • • HII • i 81 •• .* -. •• ALRIADI •• las •• •••• *. IIARIID *. * •. * .* .* •• • 10 .i ·····C1.·.···.··. • CALCULA'l'1 • • CRI'l'ICAL • lDDRISS • • RUGI .C2 • * ·.................. 1>1 .•.i .C2 IF 'l'RIBB IS SP1CI LBI''l' FOR OILI 100 OR 1.155 IIICOIDS 8&FOII OVBILil 11001 IS BI'l'IBID. 'UIM 'l'HE CRI'l'ICAL AI>DBlSS RUGB IS I..rUID • •• .* *. •• CBI'l'IC1L *. IBS •• 101. BalGB •••••••••••••••••••• •• BI'l'BBBI> •• *. * .• * .* • 10 :.•...•.... x: 11 .•.i •••••• *. 1I00B *. * .. * .* . . ............... .... ·"F. . ·.... . i •• .* *. 1 0 . . O'IILU •• .* •• • ns ··12······· • • SB'1' • MARlIIG FL1G • • GJ •• X. · . ·.................. i ·····F1··.······. • SI'l' IlRAl' • • AROOID· • • aCTU1L AoDRBSS • G1 .•.i 10'rOK • : i ····F2········· FB'l'CH • U82~tTB : ............... ····G2········· •• •• .* OVIRLU *. . , I BS • fiTCH • •• 11001 JUST •••••••••• J(. I$BOCRTU • •• 11'1'1110 •• ..G). *..* .FJ 15501 a lIallllG THAT O'.UU 1l00B IIII.L BE 11'1'IRl!!D 5001 OR IIUB IN ERIOI IlSG • .GJ I1YALIDATI nIP-lIOUID ADoRISS II RARD-COP! Hill OBI RlCORo ••••••••••••••• * •• * • 10 : •••••••••• X: H1 .•.i •• •• . * RITURN *. •• J BS • •• '1'0 ISBOCR'l'Q •••••••••• lL. *. *. * •. * • . * .* ····H2········· FITCH 1180caTQ • • • ••••••••••••••• • 10 i ·................ • • · · · · J 1 · · . · · · •• • FITCH • ISBOCRTA • 208 DOS/VSE Logical Transients $$BOCRTH - Write Hard-Copy Records (Part 3 of 3) (Refer to Chart 17) Chart KF .. ····&1····.·.··. ··............... . • IIRITB •* 111 .•.i ·................ • ••••14 •••••••••• • •• • , i • 10 i • • • ··.... ...... .* * •• * .* • ······S,,··········. ................. · . *• •• OIBLOCKBD •• US •• BBCOIDS •••••• *. *. UPDU'B I1CBBIIBI'f R-ULUE BI 1 • • • • 112 • C1 •* *. *. .•.i •• -. .* .* •• 10 •• 11111 BLOCK •• •••••• S'fABTBD •• •• .* *. * •• * • YBS ··.......... • : .··...12··········. ·.................. i • IlRITB BurrBIl • TO IIC FILB • • : ................. ······Pl···........ ·.................. i UPDlTB COITROL UrOBIIA'fION '2 ...i •• •• • • e. •• • YBS • ••• e •••••••• x: •••• LEIGTH **.••.** I1DICA'rK .•.i I~i~~~~CT •• • : *. . CC •• 110 l[ IHCREII£II'l •••••• *. *•• *.* .* illS ······P4•••.•••.••. ·.................. i •• : •••• ••••••••••••••••••• • 10 *. Ell • • •••• , ) . . . . . . . . . . . .* *. •• lICOIBRCT •• • • • I1CRBIU':U 8ft-ULUB i IIRlTE20 : •••• 11 ••••••••• : • • • • : • B2 • :.......... x: IIOVB HC RBCORD TO BLOCK *. •• 110 •••••• .* *. *•• * .* i ·.................. • • : •• HH IIICREIIII:IIT ······0. ·········•. ·................. i CLIAB IIUPFU .•.i • IBS : •••• D1 ••••••••• : • : CII • • I1CBBIIEIIT CC-'lLUB • • :x ..•....... : .•. i G1 •* •• *. *. *. *•• *.* .* •• •• IES •• BLOCK rULL •••••• .... ·..... i ............... : G2 •• • •••• G) •••••••••• *. • •.•. .•.• i • •••• "2 •••••••••• ·................ • Bt;TUBlI I1DICATE I/O BRIOB • Gil • • • : •• X. : ••••••••••••••• : • 110 e • • £2 • • •••• ttl •••••••••• nTuall •* .. *... . i •• •• YBS • •••• I/O BRROR •••••••••••• l: i • NO : .•. i *. * . . * .* i ... *• •••• liD OF •• PILB 110 • •••••••••• 1. * •• * ••••• ·111 • • P2· ····\is•••••••••• IIE'rURI! • • ••••••••••••••• • • US ·······H. ·••··••·••.. ·................. i • • SET STnT ADDRISS • • ···.J4••··•••··. ··............... . i • BETUIIII • Charts .209 $$BOCRTI - Write on 3284/3286/3287/3288 Console Printer (Refer to Chart 17) Chart MG .• ··................. ····A1········. • JSBOCITI • ·................... · i ·····Bl······.· •• • • SA'S BBGISTSIS ··.......... • • • C2 • i ••• BEGINl i •• • •••• C2 •••••••••• ARt.: •• • IIOYI LIIE • •• THIIE •• 'SS • CO.TIITS • •• 1.. AI' 1I0RI •••••••••• X. lITO THI • •• RECOIDS •• I . PIII.TOUT AISA • SIGU •• Cl .•... ··.... . ... **. ... ** . ••••••••••••••••••• • 10 • Cl • i 01 •• LIIE TO BI •• PIUTED •• *. * .• * ······02··········. ·.................. i •• .* *. •• IISTIUCTIO ••• I IS • •••••••• .• • 10 .AYOID P8IITIIG • TIULUG • • IIL1IIIS • • 0' ···&2········.··· i S'C 1!1 PRIIIT Bl!CORD IIAIT .... ·..... ................. r2 .* • :. • • • '1 • IIHTUSTL •• • •• *. •• UIBICOf. •• IES • •• I/O IIROI •••••••••• 1 •• •• • *. a • • * .• ,J............ ... i ••••••••••••••••• NO • • ••••• Hl.......... • • • IISTOII. •• , : RIGISTBBS :1 ........•. ··•........111 ..• • H2 •• i i POIlT TO ISIT RICOID i liD IBIID IIPtl • •••••••••••••••• ······G2··········. ·.................. IBITUU .!. '11 •••••••••••• !lRITI! BRI08 • !lISS1GI II •••••••• 1 INSTR. LIII • • • • .X ••••• ···GII •••••••••••• CLUI I1STIUCTIO. • LUI liD I1PUT IIBI • ................. III 11011 .* •• HII . ··.......... **. . ** •. *. i OR • • *. *..* i • a. •• *. .* J2 .* . •• *. *..* .* *. * •. * • 115 *..* * •. * • .* .- •• ... i • ••• J] • • • • • • • • • •• H1BD COP! •• 10 •• 1115 CILL •• 10 • •• 'ILl OPIN •••••••••• X•• PIOII SSBOCITG •••••••••• , . *. *. • 110 • Cl • .11 •• 115.. 1115 •• •• rls • •• f~c~=~=Tlg ~: •••••• •••••••••••••••• ••••• ••••• ••• ••• RIPLY-C'I' NO.. ••••••••••••••••••• •* ... i •• .• 'ITCH SSBOCITG ••••••••••••••• .* •• • • .III •• *. liAS •• liS •• IIPLr-C'I' •••••• • *. *. US * •• * • ... .- .• • C2 • i i ····111········· ·................ • • 'ETCH SSBOCBTH • • i ····112········· ·................ • • PI!CH .,BOCITI • • .* •• DOS/VSE Logical Transients •• -. ISS 1115 •• 110 • •••• RIPLY-C'C' .* .... ··.......... · •. i • Hl • 210 III ··.... ...... i NO •. * .• * .* .* ··.......... i • r·t • $$BOCRTK - Command Entry Processor (Part 1 of 4) (Refer to Chart 19) Chart MH .• ..... ··.... . • .··13·······. ,,......... ·.... ................ • S5BOCRTK &J • i EIlABLB • • CHA.IIEL • • • INTERRUPTS •• • ............... .... i ·IIK· • : H,-.X, i .* •• •• •• B1 ••• •• n:as'f PASS CS'rENTU ..112••••••• *. *..* • •• NO • •••••••••• X. •• • SET CRT DEVICE BUSY • * •• * ••••••••••• • • : •••• 83 ••••••••• : • • • • YES i CITDSBL C1 ••• .* •• UTDRI •• .. .. • SAVE PIBlDDI! • • &liD RlGISTBIlS • OP CBAIIIIEL • • • SC8EIlULBR • .* * •. * • YBS . ..•• ••. ............. • nif~A~~& GO • ·..·.···B1··········.. ·.................. :1 .......... : . .. .... ................. FLAG • C-TRAIiStBIIT • •• ARIA BUSY •• ........... ·.12······· • .. • PBEPIIlE CIlT BElD CI,;II • SlIT USER • liP &liD DEVICI!. EMD POSTIIIG • IN CCB • ·............ .. i • • • • RILOlD IlIGISTERS • • ··........... i • ... • : .• Dl •• *. •• IPL ' . liS ' . III PROCISS •••••• *. *. * ..• .* .* i ..... ... ·BJ· • Bl· ·····1).·····..·· i ······P2··········. ·................... i INlTIlLIZB REGISTERS i • : • 110 i ••••• p1 •••••••••• .. .. • • i ···02·······. i PRUCII VIA REGISTER 1 ZERO CRT INPUT lBEI i i .·D1 ••••••• .. .. • • ······C)··········. ·.................. ·.................. i ·····C2·········· *• PROII •• 110 ... SCREE. BBP •••••• *. ··.................. .IOROUT IGIIOHI! ilL. .-*-.-.-*-*-.-*-• .lI:lICUTE RUD 110. ·.................. • DtPUD • i ·····Pl·········· • COIIPUTI • • IIUBBIR OP • • CHlRAI,;TBRS • • READ • ·................. ... i A3 • •• .* G) •• •. •• 10 •• UIISOLICITED •••••• ·.U'fIRRUPT •• *. .... .* • YIS ·······8)······.···.. ·................. i i • ••• ·81· •••• ••••• • SET PIK L • : T~~AaMU : • ADDRESS • ·.................. ... • CHICK POR • 'I1IULID CURSOR • :1 .......... : i .* J1 •• *. . •• BIITIlI •• USX •• P8011 •••••• ·.SlBOCRTI •• *. *..* .* • 110 J2 110 . ' ••••• ••• '. •• PRESSID . *... .** . i ...... . ... •• •• BORE •• *.••••••• 110 110 •• THill 1 •• ••• ••• CH1RACTBB •* •• RIID •• •• *..* •.• * • IES • YIS • ·IIK • • •• Jl •••• CAIICIL IUIY i BAIIL. •• A2· i ···K1·•.• ···••••·. .. ................. :X •••••••••• : .... ··...... x • Al • i ····1\2········· ............... i • : PITCH USOCBTP • : .'. CURSOP ••• Kl '. •• BORII: *. •1(4 • •' .• • ••• 'S••••••••• •• rHAIi j •• 10 •• CURSOR •• 110 • PITCH .. •• CHA8lCTERS •••••••••• X.. II I.PDT •••••••••• X. "BOCRTa .. •• READ •• •• LIIE •• • • . •.••.** .. .* •••• • • .•.....12'. · liS i ·IIJ • ••••••••••••••• liS i ..... .•. .IIJ • • 81· Cj).arts· 2 .... $$BOCRTK - Command Entry Process9r (Part 2 of 4) (Refer to Chart 19) Chart MJ. ..... .·. ··.......... ·1111 • • 113· · • . ·.................. i ···.·l2·········· • • • COUERr ro UPPER CASE CII1RlcrBRS .* •• RsrEHEICBS ro IIJBJ: IIHIl3, IIHK4 IIItG2 ........... . • • • •• J. IGNOIIE i B2 •• • •••• 83 •••••••••• •••• .IORour ilL. •• ERTS" •• NO .-.-.-.-.-.-.-.-. •• KEY lilT •••••••••• X. ERlSE lLL • •• •• I . OIPRorEaBO • •• •• • LIlES • * .. * • 'US . .···C]··. ••·. ··• i ··................... ··................... .•.i ·····0]········· ................ .SKIPBLU • *ATTEXIT ilL • SKIP BLUKS 112 . - • • 111- • • • • .. .. YSS • ULlNIIS •••••••• •• ENTI!BSD •• * •• * • E2 .• • • PETCR ll! PH1SI • • tlO .,.i •• •* 110.. OUY • ••••• ilL· *.*.*.*.- DEFIIIE EII'r i •• • *' OILY *. •• •• •• OOC02EX ••••••••••••••••• i ·····C2·········· • -*-.-*-*-*.*-*-* *. 1 •• CH1R1CTIR •• •• ENTBRED •• *. .* •.. * .. YES i KCOIIIIOII ..1'3 ••••••• .SET l-BYTI • • COIIII1.D • •••• K-COIIIIIlN0 . . . . . . . . . . . . X.. INDIClTOR •• •• ••• 1'2 •• •••• •. us **. ••.** • ••••••••••• • .. liD : .•.•..•... x: i CHI!CkKU G2···*. i •• CIID •• • ••• Gl ••••••••• •• IIEGIIIS •• US • FE'lCH • •• !11TH' K •••••••••• X. SSBOCRr. • •• IILANII' •• • • *..* ••••••••••••••• •. . * • 110 ... i •• CIID •• •• BEGIIIS •• 110 •• WITH 'D' •••••• •• *. H2 *. * •. * • .* •• YES •••••• *. J2 .•.i .* *. •• .* * •• * K2 *. •. •• .* • NO .•.i •• •• COIIIIANO •• IS 'D L' *. .* rBS 'D' ONLY .* •• *. •• *..• .* .* NO • •••• X. ..... iSYSTIIBO ... ··.... . '" . .... • YES : .......... 1:x 212 *. ·IIK • • i3. DOS/VSE Logical Transients ill ill • .•.i •• POIIER COIIIIANO *. *. •• .* •• liS •••••• ..... .i * •• * • 10 ... .IlK • • 1]· SYSTIIRIl i ................. • •••• B........... . .PETCH "BOCU2 • Chart MK .• $$BOCRTK - Command Entry Processor (Part 3 of 4) (Refer to Chart il9) *""*" •••• * REFERENCES " "TO IIKA.i: "" :""JAII. IIJK2 "IIH " " J2" """ " i EXITA • ". .* ,,:" *. A2 ". REi~~S'f *. *:"~? PRESSED •• *. * •.• -.. " .* * " C2 .* ... Bl .... * *. * .•• .* " NO F2 : i ". : •••• Cl ••••••••• : -. •• LTI NO •••••• INDICATE THAT CANCEL IS REQUIRED ACTIVATE AnBNtIOII ROUfUE " " " ................. * " :x ........•. : i ····*02·········· * * * * " . ................. * *• * ••• .•.i *. REQUIRED ." *. .* * ••• • YES • ." .". ". JBS *.•••• UTENTIOI TASK· .* .... ICTIYI! ." i ": a. NO i IGMOR!! US *. 5J" "" ~ * •• - "• " *118 " •" IS •• ." lTTENTIOIl ". 110 •• TASK •••••• AC1IYE ." .* Al *. * ..• i **""" IES .". " • B2 •• •• .". .. I~~~":·•• RBQ~fhD ••.:" i *. *. i SYSTIIRD " * i ·····D3······.· ..* * SY::iTIIPDl " " : INDICATE THA'r LTA IS REQUIRED " * ................. : :x .......... : EXITA 1 i E2 .*. i •• *ATTEIITIOII-. *. NO .* . TASK ". LTI • * •••• *. BOUND • * .... ...*. " " ". .* *. YES ....* .. • ••• *£.3 •••••••••• ** CLEAR ATTENTION BUFFER *** • * * ................. * F2 *.X. * Bt:\iI'R X *****F2'****····* ** : ATTACH ATn~~IOH i ·····F3·········· * ** * : * * ................. * * ................. USEIlT COIIIIAND AND STORE COUIIT • * " :x .......... : EXITA2 i ~··*··G2···*······ ** INDICATE "* PTA B8QUIRED *" * * ................. ..x ......................... .. •• *x•• ·IIJ * * 11.1* • * * IGNOIlB Charts 213 $$BOCRTK - Command Entry Processor (Part 4 of 4J (Refer to Chart 19) Chart ML .• ······lJ········· ................. ····11········· ·................ SCI~ft~I ~'O : : • BIIT BOU'1'I1B :, .......... . ··................... IO.OU~ i i l'rTElIl' ·····81······.··· • PROlIDE I/P TO • • SUPERYISOR • .* •• RBQPEIID • •••• 811 •••••••••• *. • • • • • • ••••••••••••••••••• i ··................. ·................ • • : • ** . .** .. i ····Cl···.····· PlrCII • $l80CBU • i ····CII········· • FErCH PHASI • i 1011'1'1 .* •• •• ••• • 110 ·····C1······.··· 8RllICH I1~0 SUPIRnSOR (SIOI 81 •• BBTUIIII TO •• US • lIBSET B&TUIII •• C1LL1.11G •••••••••• X. I.OICAtOIi •• PUlSE •• • · . ................. • • : • *. D1 ••• •• UlIl~ *. •• EXCEPtION *. .* * •• * • 10 ... .* • YES. •••••• i .* 81 *. • •••• 82 •••••••••• • • *. •• DIS1STEli •• YES .PROVIDE RE'1'UIiN • •• PL1G III CCII •••••••••• X. II'OIIlATIOI • *. **. •.. ** .* • • ••••••••••••••••••• • 110 ····E3·········.. ··............... ··...... .,. P3 •. • SlIP IlLA"ltS • . • FJ •• X. •••• 1········· ····'2········· ··.···' ................. ·................ i • RITual i • • • PITCH "80CRTE SIIIPIILIK X ••• •* *. •• CHAR1CTER •• = 8LaNK • • *. **. . ** .. • •••••PII••.•••••••• SIIIP8LJ1 • *.•••••••••• YES • X. .* • NO ····G3·········.. ··............... i • RETURN IDDRKSS .EXT CH1RaCTEli • ••••••••••••••••••• • Gil .* •• •• *. •• 110 IIIPUT •••••• 0' ..EIID *. .•.i .* ··.......... ..•• ······HII·.··· ................. *. .* * .• * • YES i • ,J • i • 214 DOS/VSE Logical Transients RETURII • Chart MM. $$BOCRT.[' - Deletion by K-Command (Refer to Chart 19) (Part ,It of 3) ··.......... ..... . • .. 1 • •• D~. • . .......... 1: A3 - ·····&1··········. · ·................ ·.................. ·.................. ·····Al·•.••··•.. • UBOCRTL i ·····'2·········· • * :DII>1T2 • · . ·.................. i ·.···S1 ....... ·.. • • • INITIALIZB AIID LOAD REGISTBRS ... .. Cl .. . *. *. 'K' .... * •.... * i •• *. * • • * • • • i ·····82·········· *-*-*-*-*-*-*-*-* • SCR • • • UPDaTE POSITI01 TO BIl TSSTeD .* liP. • SCAlI SCT • nT8IES TO • AUJUST RUG! i BrIlST B1 ...i •• • • • *• •• •• ISS •• 'K S' 0111.1 •••••• • • • ................. *. *. * •• * • ··.... ...... .* .* i NO • i 10 •• • GgT ,aLUB OF • SEGY1L2 •• -. OILY .* ······C2··········. ··.................. i •• •• .* .*. •• .UPDATE SEGVlJ.2 • .* * •• * • IBS C1 .•.i •• *. CO"I' *. * .. * • .* 111 • •• 10 .- •••••••••••••••••• I •• YES a3 .··01·••••••. ............... . ··...... . · . ······03··········. ·.................. ·.................. i i i ·····02·········· • SET orr 'K • *ONLY' INDICA'tOR. • GBT ULUE or : SEGYlL2 +2 • : • • • UPDATE POSITIOII TO BI TaSTED i ·.................. • 1I0VE SEGYAL 1 . UTO SI6UL2 ·····E2·········· • ••••••• liP. •.sca -*-.-*-*-.-.-4-. • SCAN SCT • .* ENTRIES TO ADJUST RUGB *. • • *. • ..1 · • •••• i : .* •• • • •• .* *. F3 ••• Ell •• 1. i . • • .* • ••• g .......... . PSTClI • SSSOCRT' • 110 i i UPDATg SEGUL2+2 * .• * • ······f2··········. ·.................. .... • • *. •• •• YES. •• BL1IIK rOLLOIIS •••••• ................. • • 11.•. •. i i : •••• .11 ••••••••• : • ··.........-. ·................ • • El •• 1. •••• • • • •• K E,SgG *. ** . .** .• DEPlULT • .................. • • • • •• Y I S . • • ••••••••• 1.UPDaTe PorlrllR • .* ••••••••••••••••••• • NO Hl. *.X. DOCQEI •• G2 ••• 10 •.•. sE~in~+ 2.• ·•· .. : *. · . ·.................. ··G3······. ............... .... i i •• . * SEG'AL2 *. •• .* * .. * • YES • ••• ·G ..•••••••••• • UPDaTg • • 1'OSITIOI • • TO BE tUrBD • • SET orr • • SIlCORD TIllS • • SlinCH • ·..... ··..···83··········.. ................. ·111· • • Jl •• 1. ······H2··········. i • • UDrCATE IISG • • IIUST BE DELETED. : 1M AU CASE : ................. . PI liST I I • A\IlLYZI! IEIT • 2 CHlIllCTSRS • • :1 .......... : .•. *. .* i ····J2········· ·................ PETCH UBOCRTQ • • .. •• •• .* Jl VALrD DIGITS *. *. *•• * .* .. *. *. .......... . 1:I 10 • •••••••• .* ..... · · ...... ··.... . ..... .* i • •. * • NO • *. •• .•.i •• .•• YES ..IILlIK rOLLOIIS •••••• i • • all • II • SII • ..... .. · • YES i ·111 • • 11· Charts 215 $$BOCRTL - Deletion hI K-Command (Part 2 of 3) (Refer to Chart 19) Chart MN. ··•........A1 ..• .·. *•••• • 811 • • Jj • ·······11··········.. ................. ·····11·········· ·................. .•.i ···•.83·········· i i • SA'I! • DIGI'fS 81 • • • • • • 1'1111 •• SIIITCR •• • • : 1115 •••••• 011 * •. * •• i • 10 • UPDUI POSI1'101 !'lg!,U 110'1 DIGITS TO SIGUL2 Cl .111 •• •• • • • *. •••••••••••• * •••• ··01······. ............... SI'! 01 • • SICOID 'tI1I1 • • SlInCH • .* 1115 •• ••••• *. ..... i ... ·111 • .•.i •• BLI.1Ii POLLOIIS *. i • • • : A3 • i • • • • • ·.................. ··.... ...... ······Cl··.·.•.•··. · . *. • • i •• •* *. •• •• S&COIID •• IIOYI SICOID DIGIT 'to SIG'IL2+2 . 115 * .. * D3 .•.i .- •• SIGilli!, COIIIC!' *. *. •. .- •• 10 •••••• .• •• •• .* * •• * • 110 • 12· DIGIT2 DOC" i ·····1,·········· • • UPDI'f1 POSXtIOI 'f0 BI 'fIStlD i ••• DIGI1'l •. •• P1 •••• : •••• P2••••••••• : •• BLUIt •• liS • GI'f tALUI • •• POLLOIIS ••••••••• • 1. OP SIG'IL2 • *. * *.•. . .** • .* • • ••••••••••••••••••• 110 .* G1 ... *. *. •• COBIII *. •• .• .III • • * • us 10 •••••• i UPDI1'I POSI'llO" • • • 1'IS'fBD • ·.................. ... 'f0 BB Jl •• .* -. BLIlIt POLLOll5 *. • • • i IIDlel'tl IIISSIGE IUIIBBI • • • ·................ .... . .. . ·...... ••..Gl········· ·............... . • *. i ................. • • pnC8 • SCIl SC'f • I11'BIIS 'f0 • IDJUS!' 8UGI i R~;~;; • • • •• ••: SIGUL2 UD SIG"L2+2 ~ • • • ·................. ..... .•. i ·1111 • • G2· . *.•••• II'S. 1. .- .-.-.-.-.-.-.-.-. DOCYIII • • • i •• •• • • • ······'3··········. DOCY2 i ·····G2·········· .SCI liP • : •••• ·····81 •••••• •••• • • • SBr POIl!'BI 01 PIBST DIGI'f • • .1 ..••••••••• • G3 •• 1. i •• •• I ·.................. ·.................. • • • ···.·13·········· • • • • • • • DOCQn ..... · ..... .•. ·..... *. . * .- i • 10 • Gl • i • 1111 • • 113 • PIISTI DOS/VSE Logical Transients $$BOCI~' • • Chart MP .• $$BOCiTL - Deletion by K-Command (Part 3 of 3) (Refer to Chart 19) ···.·12.·.·.···· ................ • IBIlIPUE • • lUG! • ······B2··.·······. ·................. .. .... . ·· .. .. i sca • GB1' IDIIUSS or • SC'l stlIlG 11111 • • • C:l •• 1. •••• I C2···.. SCII1 .* *. •:.c~gU~U' •• • •••• C)••••••••• : • ·:.~~~ ..... I1: •• *LIII *. . .. *,* ··................. i • ···112········· U'lUU nUl • • • • ••••••••••••••••• • 10 • • ~g • • .* D) .•.i •• •• BIGII OF •• stallS * • •• 10 •••••• . ··.... ...... ··..... ............ ................. *. *. .* * .•. *IBS .* i • C2 • ,;) i • GET IIIIIBBSS OF • • FIBS!' SCT II!'II. ·.•·Fl.····••.•• i ·................ •• BS'lUal • Charts 2117 $$BOCRTK - Deletion by Cursor (Refer to Chart 19) Chart HA. ..... ··.... . • I" • ·................ G02 ····12········. : UBOCR'lII ••• UULODT • •••• B3 •••••••••• •• • NO • IISERT BRROR •• IIESS1GB •••••••••• 1. IIESS1GE •• l R I 1 . · • **. ••. ** •• • • ••••••••••••••••••• IBS ·····C3·····.···· ·.................... ··.•..................• . . ····03········· ............. ·................ · i i ···.·C2······· •• • • • LOCILIZB CORSOR • • • • SBT BlIT COIOITIOIS • SET SBGUL2 • •• TO C'O," • • • PITCR SSBOCR!P i • • i ··02······· • • . ·.................. .... .... ... 1: .. .. • · i •• •• ·12·········· • GIIT 100RESS O' • :SCT SUING lIND : :G01 •2 J . •• :.C~:~Ug,~~ .:.~?. •• *. LIII *•• * • .* •• YES · . *· .................. i ·····G2·········· • • GET IlEIT SCT nTU • .. .•. .. .. .. i H2 • •• 110 •• IIIGI8 O. .... *. SCT STRING *. •• .* •• * •. * • 115 i : •••• J2 ••••••••• : .GET ADDRESS or. . :.IBST SCT UTRI: •• x •. : ••••••••••••••• : ...... i .... : AI\ : 218 • • • • ·.................. : •* *. •• CURSOR II •• • i • IIISBRT • RIISl'lCTIfB • LIII! 10llBiR • TO SEGULU2 i B2 ·····14•••••..••· DOS/VSE Logical Transients ·····B4•••••••••• ·.................. i • • • III0IC1TI OlLBTIOI BY CUIISOII • • • ·····c. •.···...·· i ·.................. • • • CLUR I1STBUCTIOI 1.111 BO"8R • • • i . •····•···.. ·.····0............. • • .ITCH SSBOCRTQ • • Chart NB .• ~ i$BOCRTN - Screen Management Mode (Part (Refer to Chart 19) of 3) ··.... ...... ·......... : a~ : • A• • .···.1···....·· ··................ • SSBOCHTS • ·····'2····· .. ··. I(COIIII DOCLU: ·................... • • ••••• x. GET CRT IlIl'U'f aREA • • • .* A3 ... •• i : •••• "11 ••••••••• : *. *. * .. * i ·····AS·········· YBBLl *. •• •• NO • •••• X•• OPERAND'N' .• .* .* •... ··.... ...... i • U:S COIIPASS • • • • ·.................. • PROVIDE • • SPECIFICATION • • COIIIIAIID • UPDATI COII1I1I» ADDIESS 1I1GlS'lEB • • • • .•................* • E1 • .* fll .•.i .. .•. .. B2 *. •• . ............. •• •• K NO • n:s •• EIID OF •• IU'fHOUT •••••• •••••• INPUT ·.OPERANDS •• *. *. . i •• .* * .. * • YES *. *.. * • .* DOCLI!I1 i *·B3······· •• •• .• · . ·.................. i i ·····BII·.········ • • • • • SET IND1CATOR. •• rOB 'K E, I' •• CLIlB ENTRl! ABEll BorfER ·····8~·········· GI'l MIlT .• • • • • ·.................. NO • : :x .......••.•. : i • •• ~~~R~II~~O ........... i CHECK ··Cl··· •••• • SE'f OPP • • IIIDIcaTOR • ••• • ............... * • ··C2··*···· RESET * V.-PASS • INDICATOR • • * * i ...·C3········· FETCH SSBOCRTO • • • ...............• i Stl'l.' 011 C~ IIl1n~E • • •• • IIIDICUOB FOil • •• SSBOCRTP •• ............... .... ···111···i ••••. D2 ·....·........... .. . .. ··...... ·................ • • SET EXIT COIIDlrIOIIS • • .•.i •• .* *. •• COIIIIAND •• •• BEGINS • WITH 'I( E' •• *. . u:s. ...... . ······03·.·.····... ·.................. • •• • 1I. * ..• .* • MO INITIALIZE REGISTERS i • • SEr IXIT COIlDI'fIOIIS • 10 YES ·...... ···.............. •• *·D.······· • • •• BLllI1I • ·HC· • : B3 ••• X. KCOIIIIOII : .. .•. .. *..* ...• .• .. .. ...... .. ....i * • •**••• G".• i .... i ··CII.·*·· •• • CHlB1CUR * "'I • • • E1 •• X. DOCLEl1 i ····El.·· •••••• • PETCH • • SSBOCR'fL • • • • ····Pl···...... FETCH SSBOCHTV ••••••••••••••• E2 .*.i •• .* *. ... COli II lND •• YES • *. • WITH BEGINS • *.•.... 'II S' •• *. ..... r2 .•.i .* i ·····83········.· * • GET NEXT CHARACTER •• .* *. •• COIIIIAIID •• •• •• • 110 .X...... •••• BEGINS •• • .IIITH 'K D' •• .• •. *... F3 .. .i •• • : *. .. .. BLANK .* ··.......... • A4 .... i • • .t G3 ••• *G2·*···.··· PETCH :UBOCRTO • * •• •• •• ...............* • .. ". *. •• ·..... ...... * . •• MO • •••••••••• X. • •• • S"Y! BIIOB LOCATION . • .X ••• • • ••••••••••••••••••••• ··.·;£5 .... REFERENCES '1'0 MBGIi: NCC.!, NCG 1 NCG4, NCJ 1 NCJ4, NDJ2 Docnx i • •• *.GIi ••••• * ••• * •• COfIIlA ····EII··· ••• •• • FETCH • SSBOCRTP • i: • lIO YES • • •• 115 •••••• •.. * *. . * • i ·.................. ·................ • : ··...... ·NC· • : C3 ••• X. • . · . ·.................. 8PT X ••• **ft3· ••• •••• •• • : GET MElT CHARACTER •• •• .* •. J3 ...i •• •. BLAIIK *. .... • .• • : i ····Sq········· FETCH SSIlOCRry • : ............... Gil • .* ••• 1I.. 80 *. .• • • ES :COI!PASS A~ • •. .* .. .* .... .... .....i •• ·co .. ' J5 .•.i: .* .* ··. 110 ·IIC • * .". COIiPASS •• •. *. ........ ..... x i G'I • KII . .. •• .* . . •• NO •• NEXT .* .• NEIT *. •• lIO • *. •• PARAIIETER •••••••••• X.. PABAIIETER •••••••• 'REF' •• •• 'DEt· •• .. .. ..*........x .. .•. IIIlT •• IBS 1'1RAIII'ft:B •• II1!1T IES •• PABAIIETEB •••••• •• 'ALII' •• ··.... ...... • i .•. II •• •. 115 • •• rES •••••• .* .. .... * .• • * YES x ..... :DELP1SS ... ·NC • • 11· .* K~ • 10 .. •• .i ··. ·IID • • A2· lLlIPASS •. •• lEU •• IBS •• I.>ABAIIET8R •••••• •• 'SIG' .* •. .* *. • .•10 . SIGP1SSX .... ···"".. .... :1l0CVEI ••••• ·ID • x :• Gil * : Charts 219 $$BOCRTN - Screen Management Mode (Part 2 of 3) (Reier to Chart ~9) Chart NC. ..... ·•. ·•.........• • IIB • • IIJ· i • • • J. GET IBIT CBARACTER ·11) • • 12· .* •• ·.................. • nOlO 1'UT • • 'DEL' J:S TISTID. • IGAII • •• *. •• •• .* *. .. *. . * •• • • *. .* *. C) •• .... .* • &9010 Tur • .'COI' IS TISTED • • IGAII • i .. ·18 • • 0 .. • *. •• .* • •• liS •••••• ..... ·.................. DOCPEI '.' *. .- : •••• 84 ••••••••• : XBS •••••• ... . · . · . .. .. ..... .•................• ..... ..• .•. .·. IES ·N8 • • H)· *. .- i i •• i *. •• NO i BI.III *. •• Bioi III • ·······C1•..•••••••.. ................. · B3 *. i 01 ... .UPDATE COIIIIAIiD • • II)DBBSS • • RBGISTBB • • • i ······81••...····.. i GET RUT CHARICTER conass i ••••• A.... ••• ••••• i CHlIlIlG • UPDATI COIIIIAIID • IDDBISS • • • RBGXSTBR • • • ..• .18 • • BS· .·····13··········. · . ·*· .•••••••••••••••••. . .·................ ....... ······A1••••••••·•. ·.................. DELPasS ..... • A3 • RPT .- 10 .111'•••• i ••• ••GBr c .. •••••••••• • lilT • • CBlBlCTla ·IB • • G.. • i DOC¥EI •• •• .* 0.. •. *. .• .* .. •• •• *. .•.i •• *.. * • *. •• ..• NO • • ••• X. •• •• *..* *. • .* *. *. *. • 110 .•.i •• *. . * • rES • •••••••••• J(. •• • IHDICATB AUTOIIA'l'IC DBLETION •• • • • • ••••••••••••••••• *. •• .- .• NO .* .... * .• * .* ..... i ·118 • • Gil • .... HII •• •. •• ••• *• DOCVBI· **. . ** •. . *. *. *. JES • .•........ 1.• •• IIDlcaTE COIVEISIOI 11008 ... . ••G:* .··Kl·······. ............. ........ : x•••••••••••••••••••••••• : .~ : DOS/VSE Logical Transients *. •• .... .•• * • *. .* .* • •• HO . •.... i ..... ... ·IIB • • Gil • ...k4.······. i • DOCVlI SET 01" • COIlVERSIOIl • IIODP. •• ........... ...... .... : x•••••••••••••••••••••••• : I : 11 : • • • ••••••••••••••••••• • us ·IIB • • RESE1' DEL=X • •• INDICATOR • JII . COIIES • •••• IiS •••••••••• •• 'J' .• .* i ..... DOCVEX i 220 •• YES. •••• J. .* • 10 • XES Aj *. i · N' : •• i • •••• 82 •••••••••• *. •• • • • 10 DELIES **. .** .. J 1 *. DOC'SI- HI.. 110 • •• •• 1. YIS BLllII ·MB • 'Y' •* •• •• •• ••G:. i .* .* GET lilT CHARACTER i 110 * . •• i .* ••• •• •• •• * •. * G.. •• XES. •••• X. .* •• i • • •• *. .•.i ••••• 1' . . . . . . . . . . . . • • i BLINI 110 YES •••••• ·· .. ................. .. ... .. . i •• •• *. * . •• .* .* • • GBT I£JT CHIRICTER G1 -. I.. YBS ',.......... ·..... ·................... .. ·.. .. . .... ..... • • .* •• 8LIII • 10 11 • i Chart ND. $$BOCBTN - Screen Management Mode (Part 3 of 3) (Refer to Chart 19) ..... ..... .·. ..• ·IIB • • JS· ·IB • • IS· ·.....""........... ·.................. ······12.··•..····. i AUPASS i SBGPlSS • UPDATB CO!l!llllD • • ADDRBSS • : BBGIS'lBB : .UPDAtB COIIII&lD • • "DDRBSS • • RBGISt'BR • ................. ······82····.·····. ·.................. ······8"·······.... .·................ ·····C2·········· ······C. •••••••.••. ·........•......... i i • AVOID THIT • • ' ALII' IS 'lBSTBD. • AGIIII • • AVOID t'Hl'l • .'SBG' IS 'lBS'lED. • AGIIl • i ** • i •• GET UI'l CHAR&CUR • • • ** •• ................. .. .•. .. GBt' IBU CHAUCTER i D2 •• *. *. •• BLAII *. .* *. *. •• * •• * B2 *. .* • 110 .•.i •• •• IES •••••• .* IBS •• ••• ••• .* *. Oil * •• * .* 10 • .• .. 1. .* *. * .• * .* .1....*. • 110 •• BII *. *.•• *. •*. •• * .• * • ...... 1.......... • • •• • IIIDICA'lB lL111I •• .* • .* . IBS. •••• 1. YES .X..... ••.•. ••••••••••••••••••••• *. .* •• .1.... *. Gil *. -. *. 10 .•.i •• .* .* •• ... •• .* *. •• •• DIGITS • .1........ ............ .........10.•. •• •• IIITHIN •• V1LID •• •• 811GB.· * •. .. *ns .* ••• •• JII •••••••••• •• 10 • .•.. 1. .* i ..... US • .··K2·······. • • i .•. • • • • • USSRT DIGITS lITO SEGflL1 FIELD • • • • • ................. ·H8 • • • •. • • i e. ..' • •• • • i • * •• * .•.i * •. * HII · X *. •• 'Y' *. .• •• .* • 10 H2 .. J2 .* BLIIIK 110 .* **. ••.*- .* •• • · .ISS ••• .* •• *. GBT IBlT CHABlC'lBR i lLlllBS •• i • • *. *'. BLAIK *. ... * •. * i G2 HO ··.....,.............. ................. i .* .* • •• •• .* • IBS GilT HBlt' CH1R1C'lBR *' e. i *. •• ······'2··········. ·.................. * •• IILal' • US • .•.i • • Gil • 1l0CVIIl ............. SBT OF' ALAR II INCICITOR • • :CHAIRUG ..... • ••••••••••••••••••• ••••• • 1.X ••••••••••••••••••••••••••••••••••••••••••••••••••• X ..· ·lIe • • 13· Charts 221 $$BOCR~O - Line Number Display (Part 1 of 2) (Refer to Chart 19) Chart HE. ..... ··.......... • ··.···A3··········. i ·····11.••••.•••. ·................ • SSBOCRTO • ··................... UTIlLIZI RIGIS!'BBS .•.i Cl • • •• 110 •• Dl *. ... •• e. * .. * .* *. .* e. * .• * • •• •. *. * . .* .* .* •• •* * i .* .X.............. ..•..**. • • • liS 13 .*. •• *. 81.111" *. * .• * • .* -. •• .* 110 *. •• .. .. .. .. .* .* F3 . XIS. • 110 •• .1.... •••••••• •••••• •••• X. ··.......... 110 'HOLD' *. i .* . •• •• .* .* * .• * • liS • 111 • Gl .• . * •• •• *. .•.i •• * .. * ·····G3·········· i * *. *. COII1I1 .* . . ·................. ·.................. .. ·.······H)·········· ................ i i ·····Hl· •• ••••••• • GET IEXT • • CH1RaC'lIR • ... Jl •• *. *. • • .... ·IF· • • HJ •• 1. • .1 ••••••••••• • •• *. •• BLllK *. . * .* .* • YIS. •••••• I • 110 ... ······J2··········. ·.................. COII=;~~ • • • CIT lDD!UlSS OP IIIY1LIO CHl81CTBB • • • •*. *. Ill •• *. '.. *. * •• * .* • US ··.... ...... i • 11 • 222 *. 10 • .-.... .* ···.112········· ............... PITCH atBOCITY .* 10.· • ••••• ••• . *. J) *. •• BLlll1 * ..• * . •• •• .* .* • YBS ·····13·········· ··................... ··.......... i i • : ... • • i i i .* GBT IIBIT CHAI1CTIR • i .* •• • .UPD1TE COlIlIlllO • • lDDRISS • • II!CIS!'IB BY ) • 10 • •••••••••••••••••• X. •• X • YES ·· ~ .X ••••••• : BII ••• •• DOCl'al * *. ..BS ••••••• •• DBL. IN •• lIO • sIr BUT ..COIIYIIS. 1I0DB ••••••••• • X. COIDIIIOIS *. **. .. .• * .* • YES i •• i •• BLlllt *. ... GET II E 11' CHAR1CTER • ·................. .• • •• C3 i .* GIl' UXT CH1I1C'lIR .•.i .* • COIIIll i •1 .* ·····03······.··· ··................... •• •• XIS •••••• ······11··········. .* •• * .• * .* YIS • •••••••• lj* • 110 • • *. •• • lIS SKIPTOI •• COIIYBIS •• OILBnOIl *. *. III IIBSS1GI &BBA ................. : i •• BL1IIK ·IIF • • .* •••••••• •••• •••••••• i ..... 110 .•.i .•.i H:~1~6g:il~B •• •••••••••••• •• • i •• * .. * • *. B3 :lI~3: ·····1"··········: .. :• • 110 US OILITIOIL •••••• •• I 1I0ICA'lOR •• •• SIT •• •• • • ••••• i :OPITlUII • .* •• *• 10. •• .* •• LIMB Gft III1T CHARlCTII * i ·····81 ......• ·.• • • . .......... x.: ·.................. • • . '" '•" .*'"•• * lJ • • : • SET 01 'HOLD' • • UDIC1TOB • DOS/VSE Logical Transients i • 111 • i ·................ ·................ • • ····CII···.····· FBTCH • SSIlOCRTI • • • ····CS········· FaTCH • SSBOCI'll' • $$BOCRTO - Line NumOer Display (Part 2 of 2) (Refer to Chart 19) Chart NF. ..... ·.E... • C1· · ····*·.3··········. ·.................. SIIIPrOE i • GET IlIlt CHARAC'UR .* •• •• *. *. .•.i •• e. BLII' *. .* •• •• 83 * •• * C3 .* • NO .•.i •• COIIIIA *. * •• * • • : •• IES .* •••••• *. •• .* .* . 10 • •••• X. IES ······D)··········. i ·.................. • • GET lilT CH1RACTER •* *..* E) .•.i •• *. *. * •• - . •. IES. * . *. 10 • ._ • ••• 1. BLAII.. e. • • .• • 10 ... .. i •* *. •* -. ,) ••. *. * .. - .* .* .• •. 1. • US ······G3··········. ·.................. ... i • • GET IIEJ'r CRlRlCtER • • i .* •• .* e. H) •• *. BLAI' *. * ..* .* .• • .12· ..··J3·······.. i ..... ·,E • ... i • 115 CLRP1SS . *. 10 • •••• 1. .* COIIIlSG ............. SET OF' 'HOLD'. IIDICATOR • ······'a·········· 0' . ·..................• ..... •.. A'· · i • 1I0lClTE • DBLBTIOI • LIllI lUIlBIIIS • • : OPU.UII X •• Il: • Charts 223 $$BOCRTP - Exit Interphase (Part 1 of 2) (Refer to Chart 19) Chart KG,. ··................. . ·········.. ·.···.1 ............. •••• &2 •••••••• • • $.BOCITP .- 82 .•.i •. * •. * 1010UT1 i • PIOUDI .* .* • • .................• • cn.lar. • PBOliUII • • ns : ·····.1"··········. .. •• •• IETOII FlOII •• 10 •• SCII!I !IP •••••• *. SC:~='xj'O : • • :X ••••••••••• ··C2····.··. .............. .. ••IISlr SCRIEI • • .BP I1DIC&rOB • ·.···.c. •••.·••·•·. ·······02·.········.. ................. ······0'··········. ................. i ·......••.......... • BlUCH VIA . .GISrBR 7 PIIOUDI : • suJ",JgoI : i i • • i 1010UT BUICH Ilro SUPBUISOR (SIO) • • : • • • • : :X •••••••••• : GO ·.·.................. · . ·.................. ... 10Blrai i ••••• !"•••••••••• i •••••• 2•• •••••••• • sIr O1'r • • IUDIBLE • • u.alll • • lIur POI • i • *F2LIII! .'. *. •• 10 •• •• IUII81IS TO III •••••• •• OILII'RD •• .. * •• * • .* •• •• .:" liS ······62··········. • • • i •* a2 ••• •• .:.*. :Iagn~*..•.:.!~~. *. .. .. .* • NG. tIIIITB IIESS&GI • ABU : ................. :x .......... : i 112 ••• •• *. .. .. •• UYlLIII • • • 0 •• CURSOR .* .... •• SBTtING •• YIlS i ..... :COIIIIONI • AI· * . .* • ..... I .. *NII • * 224 B"· *. .* * •• * • 10 ... •• ·Gs········· ... *Ia • · DOS/VSE Logical Transients RITO.. • • • ••••••••••••••• • i i .* . .* ····H"·········.. ··............... *-* ••• *•• -*-* .• -. SKIPI *. *. * . . * .* * •• * • 10 ····.J2.•··•···•• • : •• •• .* DlsasrlR*. •• IES • • •• 1'ITCIl •• PLIG XI CCB •••••••••• X. ISBOClrl • 10 .10Bourl .•.i u,xt' •• lIS • IXCIPt'IOI •••••• G" ·................. . :, .......... : SKIP *. I'll • i i • OILEt! LIIl! • IUIIBBRS III • IIISSIGI AB!A • IITIIIUPT • Chart HH. $$BOCRTP - Exit Interphase (Part 2 of 2) (Refer to Chart 19) ••••• ·.G • •• • 1(;1 • · i 11 ••• PIVDIISGI •• •* *. •• US~IUC'flO' •• .* 12 ••• •• *• .0 US •• 81'1~8I lBaa YlS *. LII. fO .- •••••••• I*.tO 81 CLI1IID.* •••••••••••••••••••••••••••••••••••••••••••• • BB CL!&IIO.. •• •• *..* *•• * *..* *. ,- i •••.•S2..... •...• • 10 • 110 •••• . ·.G. • • • 1.2 •• 1. i ·····111 ••.··•·••• us~LB~'Inl : • • : : .LUI lID I n n • • Ull Burrsl • /I COII.~: •• 00'. •• ...•............. •• .................,a. • 01 •• 1. • • .1 ••••••••••••••••.•••••••••••••••••••• IUt I ··.·.01 •••IUT ••••••••• •• i •• •• C1LLIIG PHASI •• **. ...** •• .X. • BlSIt BB'l'Oal IIIOICA'l'OR • • i •••••••••••••••• • 5110 C~=~OI UPUt LUI • • ••••••••••••••••• : • D1 • ••••• • • ••••! ........... . . • . . . . . . . . . . . . . . . . . . . . . . 00.00 00. • 10 ••• •••••• • • •••• '1rl~CH • SUOClta • ·····011•••.••.••. • i 8&Qt!I~.12 .......... us ..... 0 0 0 0 '10 • ................ . ·..... i ·.•.................• ••• COIDIUOIS ••• ••••••••••••••••• 11···.. 00 i : • SII~ .* *. •• IStOl1 to •• .................• .. .. • IIUUIG LI. . . ••••••••••••••••• . I'ffBUt : • • ,.. 10CUIS CII •• • •••• cs •••••••••• •••• .1010ur1 IG • •• InlLIO ., NO ••••••••••••••••• •• CUISOI ....... .1. UIIB IIISSIGI • •• •• • llBl •••• .I1SrBllCt. LIII • • lIS • • ·........... CLBAB IH'l11 lIlA Bu,r I i i ••••• C1 ••• ••••••• • IO'OUt1 • WRItl IIS'fI. • LIIIl tHIOUGH i •:.•••Sll...••.•.•. CLaaB: :!2!2!t!._._._=~: IIS'fIUC'l'IOI •• , ' •• , ..... . , ..... LIn Burrll • • IIII'fS SCBESI • • ................. • • • ••••••••••••••••• Sl............ COII=~;; • IOPOU'f 1 IG • •••• *••-*-*-•• *-• ................. ':.UI~BtSinnIG: • 1.111 • ······P2••••••··••. ·.................. i • • GU PHASB lUll •·••G2.··.····· • • i ·................ • • PB'l'CH PHASE • • Charts 225 $$BOCRTQ - Deletion of Message Lines (Part 1 of 2) (Refer to Chart 19) Chart NJ .• ......,.......... ··............... . • SSBOCITQ 81 .* .•.i •• • -. us •• BIITI! PlOII •• •••••• 11 liD seBIII •• •• PULL •• *. *•. * .* • 10 .. .•. .. i C1 •• •• BITRI DUB •• rES •• TO COIIIIIID •••••• *. *.. * •. * .* .....• ·.It .. .* . • E2· • 10 ....... .•. •x: i D1 ••• •• .* *. •• &UTOIIITIC •• IODBL... D2 •• . .* DOCQ02S *. .* Dj ••• "• : DOCIIEX *. 10 I ."Iun FRail •• 10 •• UTBI DUB ". NO • •••• DI~gn0 ••••••••••••• X.... .:6Ts~gff ••••••••••••• l ••• ~0 COIIIIIIID .......... . *..* * •. * • *..* *..* *.. * * •. * • YES liS ·······1,·. ········.. · .. i .. i ··E2······· ·................. • GET DBLETION • SEGIIE.T .. liS ·............ .RESET II-PA-SS .. • IlIDICATOR • • • .. :.......... 1: :1 .......... . ·····P1 ••i ••••·•·• :1 ........................ : .* • TRlISPBB • • IIESSIGI rYPES • • 11 COlrIIIUATIO •• • LIIIS ILSO • .... I SIGLIII F2 •• *. • 110 •• conBBSIO • • • ••••• .... IIODE •• ·.................. *. I *. .... .• .* • IES i · . ·................. . .... i ·····Gl •• •••••• •• • GET IUII8BB OF • • LOIIIS'f LI HE 'fa • BE DELETED • • .* G2 ••• •• *. DOCOIX • ••• *G3* ••••••••• • •• ". 10 • PROYIDE EXI'l ".18THY PBOII 1 ." •••••••• X. COIDITIOIIS *. **.. . . ** • .* YIS • • • * • ••••••••••••••••• ·11(· • • Pl •• 1. :.... CLIIIIUP .* •• i H1 ••• •• i ···H2·.····· . *. LIII •• YES • • RESET • •• DELBTA8LE •••••• ••••• X-PASS • •• IIIIlICATOB •• *. .* *. *. . * ........... .* • 110 i ..... .. • NII • • Ill • .•. i •* 1(1 INPRO •• *. · •• DBLETIOII •• lIO •• 81 CURSOR •••••• *. *. * ..• .* " YES ...... .·,,.. i ·1111 • 226 .* i ..... ..· LSTSEG • NII • • 81· DOS/VSE Logical Tr~nsients i ·................ • • • ••• 83· •• • ••• •• FE'fCH • SS80CRTO • • : ····D4······.·· i FETCH S$80CBTII • : ............... Chart NK. $$BOCRTQ - Deletion of Message Lines (Part 2 of 2) (Refer ~o Chart 19) ..... .·. .•. • MJ • • ttl • i AI· • •* *. •• COBREIIT •• US •.•. Ll=~pli' ••••... : .... ·..... .•. ··.......... ·.Ll:IIIT.· i * •. * • NO • •• J . • 111 • • ttl •• Z. i LS!SIG Bl •* •• lilY ... 1.. •• *. LUIS •• NO ALBEADY •••••• •• DILITID •• *. .* * •. * • us · . ·................. ..... . ·...... ···..................... i ·····Cl·········· • SHIPT CUBBEIT • LIIE IN • • • PRIVIODS OMI • . • • .1 ••••••••••• • 01 •• .1. . ·.UPDl'rll X ·····Dl· ••••••••• • GIT NEXT LUE • i •• . * 11 ••• 12 •• *. •. us •• 1.STIIOCTIOII •••••••••• •• 101.1 •• x.. Pl ... ·IIJ • •• *.. * *. · .* Gl • • • i • • ... CLBlIIUP •• *. . * GU MAlIK or PRlSI WIIICII • • ·.................. i ·IIJ • • 111 • ~~i gl~~n~~ ··................. i *. ····Gl········· • 10.. CONT. •• • 1 •••••• rOLLOIlS UPPER •• •• LIIIIT •• *. PErCH $$BOCR'lP ••••••••••••••• ·····P3·········· : : DOCWIl ..... .* • YES .•.i *..* *.• * ·W ····1".•··•···· i . D.· •• OPP1'!1I LIII •• NO •• LIIIIT •••••• •• IICIIDED •• *. DOCPIX •• .* DELBTIO. *. •• ns • 001 TO •••••••••• 1. •• COIIIIAIiD •• • x.. ..... i .* lilT... I) •• •• LIllI *. •• YES DILITID •••••••••• •• •• *..* *•. * .~ *..* * .. * .~ ... ••• .• .*III • .* PETCII PillS! • • YES HI .•.i .* •• It-CIID .• X.. *. •• OR CURSOR .........•.... .... .•. . *. * . •• .* .* US •••••• • NO •• 111 • i J1 •• .* 10.. IS • •••• •••• *. LUI •• PROTICTID .* .• .... ..... ·..... .•. X·. *. .* . • YIS • IIJ. .X ••••••••••• • Jl •• X. ·• IIPRO i · .* • IES.. •••••• ttl.. *. *•••• K2•••••••••• • LIllI •• N O . IITIIINAL •••••••••• X. •• PROTICTID.· ..•. ..... * • DELETE LIIIE • ••••• • :........•......: .!.. ··...... • Dl • Charts 221 $$BOCRTR - Read Processor Part (Refer to Chart 18) Chart PA. ..... *• . ••J!. ..... .... .• x: · • . SSBOCRTR ... *. *..* • · · .* ................. · 0 ·.* .•............... · . ·.................. ·····C,,·········· . i .* .CLEAR REGISTBR • •. • • • . ••• *••••••••••••• CLEAR INPUT AREII IIITH ZEROS *. •• i ...··0"·.···..... i i : •••• D2 ••••••••• : • INITIALIZB AND • • LOID RBGISTERS • i ••• •••• • • ··E1 SBT ON • ' SOPPRBSS ICL. • BIT' III • • CIlTCCIl • ............. .•.i ·.................. i ·····£2·········· ··••··E"·····..•.•. ·.................. • • • * * . .LOID REGISTER 5. • WITH VIRTUAL • 1/0 lRBl • • • lDDRESS • • 1I0VE START • FIELD OIlDER • • • INTO UPUT ARIA. SirE BEGIN ADDRBSS OF UIIPBOTBCTBD IIiPUT lREI III BEG. 6 i • • • • • • • • ................. ....*.. ·•...... . • ······.4·······.... i .-.-.-.-*-.-*-.-. • ·.................. • • • ................. NO ····.·G,•••.•••••.. ·.................. i • LOCK ItBlBOARD • • IF IPL IN • • PROGRESS • i ·.··.H1·········· • -*-*-*-.-*-*-*-. ................. .REIDRT PC. • ISSUB READ 011 • • CRr TO CBECIt • • CONDITIOII • . • .•................• .... *. *... . .. ..• i G2 ••• • . 1111 ILII B •• .* IS IT A •• READ-CCII • •••• GJ •• NO 1I0VE STUT PIBLD ORDER 10 PROTECT REIIUNUG INPUT AREl *•••• *•• •• JES • CALCUL1TB BID • •••••••••• X. ADDRESS O' IMP lRI!~ i ····.H2·········· • * • • • • • • .• .* IBS • TEST poa TIC • ••••••••••••••••• ....*** All 1I0DlT i • •••• 05 •••••••••• • SUB BBGII • • lDDRBSS OF • • OIPBOTBCTBD • * IIPUT lREl • • II REGISTBR 6 • ................. i ••• *. B5·········· • BBDUCB 1110 • *ADDR. 01' ilRITB • • DITA BI 1 • * BBC1USE OP ST • .1'LD oaDEa BITE. ................. F2 *.X. • LOOP X F1 •• ···*·P2·······*·· .TICCHII PB • •* *. •• IS THIS •• I BS • ·.CONTINUATION •••••••• •• RBID 011 •• I :* UST .OB TIC :* •• CRT •• * .... RBSTOBB RBGISTBRS 8 .. ID • ••. * C5·· •• • ••••• .TICCHI . PB. ...• • • I ····*Dl·.········ ···................... ·.................. •. i ·.................. .... : •••••••••• X: •• *··.• .-.-.-.-.-.-.-.-. . . .. • ISSUE GETDADR • • 1I1CRO TO GBT • : 1:~:T~t~lIi'g : • • • 85 * i i ·····C2·.········ • • •• •• 10 *. DA~A CIIAIIIIG •••••• YES ·····Cl •••••••••• • RESET BETURII • • :UDIC. BRANCH • • ill RBG. 1 • GO lDDBBSS OP IBXT CCII LO~D i i ·····8"·········· •* *• .LOAD REGISTER p • • WITH HEGIN • • • ADDRESS OF DATA III • • • IIiPUT AREA • A5 : ··.................. ... * • .*................• i ·····62·········· •• '. •• 10 •• . * •••••• HErURN FROII •• ·.$SBOCBTE •• .... i ·····'5········.· • * • S~VB RBGISTBR • : II AND • : ................. i B1 : i RBPEl't • LOAD • REGISTER 11 • • • WItH LEIIGTH OF • : INPUT ARU : • 14 • ·................... i ····*&2·········· :CONTRD •••• ** ••••••••• ...... .... • ...... ·PB • ·····A ,•••••••••. t of 3) (Part • • • • • ................. ··.... ...... i LOID ADDRESS OF DATA TO BE IIOVBD • • • ••.··GfI·.·i ••••••• • SlIP CCII IF • 1I0RE THU 80 • BITES ILBIIDI 1I0rED • • • • • ·................. ·.····8".····...... i ·····.5·········· i • /lOYE START FlBLD ORDBi • • FOR aBiD * BEHIID IIIITB DAT~ • • • • • • ................. i • •••• G5··.·· ••••• • IDD LBiGTH 01' • • STABT FIBLD • • oaDBR TO BID • * ADDRBSS OF • • • IIB1TB DUA •••• *•••••••••••• i ·····H5····*···.· .LOID LBIGTH 01' • * SCREBI 1111GB • • IIITHOUT • • IIUIiIIG LIIB • ·................ ·.................. ·.................. • • ·*·.H3······*.· .ETCH • $SBOCBTS • • • • UPDATB BID ADDRESS A. IIRITE DlTi • • • i i : ••• 'J 1••••••••• : • • : CILCULATB BUIIBBR OP BITIS READ • • : • III • ................. ... I{ 1 •• *. •• 1I0RE THAN •• NO • •• 3 CH1R1CTBRS •••••• •• RE1D •• *. * •• * .* • IBS : NOTRKADI ..... x .. ·PB • • A'· · 228 * IIOVE DATA liTO IRPUT lREl DOS/VSE Logical Transients *•• • • • : ................. ...... i i •* i • •••• J" ••••••• • • : ....• * * A!> • *•••• J5··.···•••• i *IDD 2 ~O L&IIG'fS. OF SCillIG • • • BBCADS! 01' • • lDDITIOIlL • • S'fPOBDla • ................. ··.......... i • 1'2 • $$BOCRTR - Read Processor Part 1 (Part 2 of 3) (Reier to Chart 18) Chart PB .. .·. •••• * ·PA • • Kl • 1I0~UADY i ••••• A I •••••••••• .ALARII pc. ····A2·········. ··.................. ··............... . *... . ·· .. .. *-*-*-*-*-*-*-*-* • ISSUE lLARI! • TIlS., FOR TIC • • • .. • " • i ·····B1 •.•.. •·•·· *-*-*-*-*-*-*-*-* .WRTWBIIG 111 •• X. •••• X rICCHK PC. 82 ................. *. .... *..* :x ..........• .* *-*-*-*-*-*-*-*-* • IIAIT FOR ATT • *. *. • ... •• .. C2 *. *...* .. *. ... US • •••••••••• X. 1'IlTCR $$BOCHTC ••••••••••••••• * .. : ............... BETURN i .... ·.....* •• i • • GET CCII POINTED ~O .. • - .. .. • •••••••••••••••••• ...... 02 . . . . . . . . . .. PC. ·.................. .. ... .. ····B3*········ * : Bl • • • .. . i • .. ··Bq······ 01'1' POST • ArnAl! ............... .SE~ • ** •• *C3 •• -*-.* ••• • NO ·····01· •...····• *-*-*-*-*-*-*-*-* READ IIHOLE INPUT ABBA NO .* * •. * i • • * •• IIEXT CCII = TIC ·.................. • BElDBT cn IIAI! FOR OPERATOR RESPOIISE ............... rUG IN CCB i IIAlTl i ·····Cl·········· • ATTIIAIT PB. UTERIIUPT •• TO *. •• YIlS • *.81l BROttill 01'1' •••••••••• 1. • WRITE WARNIIIG • • IIESSAGE 'RElD • IS IIAI'lIIIG' • • • ••• * .* . CHAIN ····14*.·.•.•.. .* Cit .. .i *. • • •••• cs •••••••••• • • *. •• lTrl!l!IOI •• NO • SE! I1DIClTOR • •• III~ERRUP~ •••••••••• 1.~O G.II~ CO.~80L • •• PENDIJIG ... .A1'~&8 UTS88un. *..* .. * •. * • ns ·······D5· . . ••••••••.. . ·................ .................... i i .. •••• 04 •••••••••• • RETURN • •• •• i *. * ..• • ·· .* .* NO .. ·.................. . . ............... i • ZERO OUT i • IIllllIMG LIME • BESET • .IIIDIClTOR &l'~IB. .. IIIrBiBUP~ • ·................." ·...····PSl········· ................ ••••• 1' I •••••••••• • •• •• : •••• 15 ••••••••• : •• IS RIlQUIlST •• us. •• lEY PRESSED •••••• x ••••••••••••• *. SVC 7 ilAIr i . Ill·. • ••••••••••••••••• .. • RETURII • i • • ··Gl ••••• •• RESE~ SOU 110 • !LUll BIT • ····*81···i •.••••• .IIBtVRIIG PC • • -*-*-.-*-*-*-*-* • lIRITE IIlSlInG • :'.Jnbt:~t •.: ... i Jl .* ... IS •• *. •• *. ClIICEL •• US PRESSED •••••• *. *. . * .* .* i ..... .... • 110 .1" • e &2 • Kl .•.i .* •• e. *. CORTBD •• EII'UR PRESSED *. * .. - -. •• .* .* 110 • •••••••••••••••••••• ..... .. · • YES i • PC • • G2· Charts 229 Chart PC .• $$BOCRTR - Read Processor Part 1 (Part 3 of 3) (Refer to Chart 18) ····A2·········.. ................. .. .."HAD BUIY lilA. ··...........•..... ····13·········. ·................ ····AII······ ••• • IBnE UIIIIIG • • IIES5AGE • • ISSUB IlLABI • ·.···IU·····•••·•. ··.···811······.···. · . ·.................. .·.......•......... .....C2··.···. ••• ·····C3·········· ................. ·..··e....••••.... ··•................. .. ·.·................. . ..........•.. i UlDRT ... ·B2· .. •••• .. • .. •.. ..•• • PBOVIDI • .. CnUBL • .. PBOGUII • ................... UTUIIG i • • • PIOVIDE cnl.EL PIOGBAII PC. *-*-*-*-.-*-*-*.* 155UI BBlD • ·•·. ·D2·.··.·. •·. i ·................ • • • • BlTURIi • • PC. ISSUE IlBITI Sir ALUII 'LlG. • ·····0....··••·•.• ·..............•... i ··.····D)········· ................ i • 5C:~B~Ii'0 ............... .... · ... BBTUBI .IOBOOT PC. *.*-.-.-*-*.*-.-* • IIIU'II lISSAGE • • lRBA • • · 111••·••••••. ··.••............. .. i : · .. • • • i • IOBOUT ·····B2··.······. : PROYIOB CRUUL PIIOGI&I i i • IOIOUT .. i lLlBlI • • • • IIETUII • • "2 •• 1. •••• IoaOUT I "2 ••• 1I0lT'lBIiT •• • •••• P)•••••••••• .* *. •• UTI.TIOII •• •• *. IITERRUPT **. ••.** .... ·..... .* • • • • 110 • PROYlOIl lIP • ••••••••• • 1. TO 5UPEB¥ ISOR • ••••••••••••••••••• • YES ·PB· • • K1 •• 1. ··.·G2········· ·................ • • PETCH uaOCBTK .••.•• ·.···.G)·,.·· . ·................ . ..... i IOREti! i • • •• •• S9C'7 IIAIT •* II) .•.i: •• •• ... -. .. .. .... ··...... .•. •• OIIT •• YBS •• EICEPTIOII •••••• *. .* i * .• • 110 • P2 • i. .* Jl ... *. •• DISASTER •• lCBS • •• PLAG III cca ••••••••• • 1. •. *..* .* • *.• * • NO •••·· ······K)···· ................... i • 230 RBTURN • DOS/VSE Logical Transients • •••J4 ••••••••• FIITCR ssaOCRTI ••••••••••••••• • • • $$BOCRTS - Read Processor Part 2 (Part 1 of 3) (Refer to Chart 18) Chart PD. * : ..... . ::g~: ··................. ····11 ••••••••• • S$BOCRTS Bl .*. •• • *. .. .. ••• * . . ............. **u.!**u* i .* .... ... ........ 1: .* ** ••••••••••••••• • YES i · . ··.................. i :1I0PIlOT ····*B3··"*···*·· .IIICRKII~IIT BY'lB • COURT BY 1 * • • • BECAUSB OF * •••••• • lDDITIOIiAL ST • FIELD ORD • • *. • * RITURN •• NO •• FRail SSBOCRTB •••••• *. *••• : 14 : lJ : • .PROTECT IIIPUT" ••••• •• I.1REl AT BIID 01' • * RB1D FIELD " i .* FII . . ....* ••••• .14 •••••••••• • SBT UP CRl'CCII • rOR IIRITB • • · . i ·····B'I···*······ • CLB1R • * IIiSTRUCTIOI • *LIIB IIlTH IBROS. .................• * i ·····C4*·····.··· *·Cl •••••• * • RESET " • IIIDICATOas • • BRlBCH V1:A • • RBGISTlIR 7 * " IIOVB IIBSS.lGB * 'BIITEB • RBSPOIISB' *IIITO IIISTBOCl'• 1:0M LIIiB ...........• • • • • • ................. * :x .......... : GO i i ··D"······· **01***.*·* SBT OM * 'SUPPRESS • ICL BIT' • • • IN caTCCIl • • • SET 'RBST * .KBIB .lND .lTT • • IDIIIT' lllD • *' SOUND AL.lRII'. • lilTS • • • ...........* ........... i .* .*15 • *. 11 •• CONTRElID "*.*.12.********* *. • • PH1SE 5 ". YES .L01D RBGISTI!II D. •• BNTBRBD rOR •••••••••• X*WITH lDORBSS or* •• COIIT.RE.lD.. *CONT. RE1D CCII * **. ...** * ••••••••••••••••••• 80 · . ·................. . .... ·.... . · . ·................. i i ••••• pl •••••••••• •• •• ·r2 •• ••• •• •• •• * CALCOLATB .RBII1Ill1:IIG BIrB "coun loa THIS : RElD CCII • L01D USBR cell • • lDDRBSS liTO * • RBGISTER D • • • : ................. i •• ••• £4 •• • •••• • •• *IOROOT Pl* *-*-*-*-*-*-*-*-*• ·................. • VR1:TB SCRBIUI * 1111GB * i " ••• "1' ......... "" • PI'. • .lTrUIT .-.-.-*-*-*-*-*-* " IIAIT FOR • ................. .lTTB.TIOII UTBIRUPl' • " * .. ·PB" • •. C3 •• X. " · . ·................... i D.lTCHlIlI 1 •• " •• G1*." ••••••• ••• •• G"·····,,.··* • LOCIt KEYB01RD • • IF IPL IS III • • PROGR8SS • "LOlD RBGISTER 1* • IIIT8 BYTB COURT" • OF RElD CCII .. " :x •.•..................... : i: i ·····81 .•..·•.·.· ·"···811 •• •• ••• ,,·. .RUDRT PI'. ................. ................. .. ... .. .. ... .. CORTRDI • UPDlTB Dl'U • • • ADDRESS OP' .INPUT &RBi IIITH. • BYTB COUIIT OF • RBAD cell " " *-*-.-*-*-*-*-*-* • " • ISSUB RElD IIODIFI8D COIIlIlliD i J1 i J'I •• *.. * .:.i,..... .: .* • NO .* K1 . *. *. •• DATA •• CHAINING *. •• •• •.•. .•.• .* · • * * •. * .* i ..... ... '*1'B .. " 15. .. .•. .. .. .. ..... .... ..... .·. 1t4 CONTROL •• IS elNCBL •• IES •• KEY PRBSSBD ." •••• *. i *•• * Aj .* • NO .* .* .... iN£XTCCW 1 : ·1'B • " lJ. *. i NO • rES ..... *. .... i •• ..IS REQU8ST ... YES •• KEf PRESSBD •••••• ." DATA FOR •• r~s •• IIHOLB INPUT •••••• •• AREI •• *. • • • : .* * •• * • NO i ·PB iRun ·PI! " • .lll. * .. 11" Charts 231 $$BOCRTS - Read Processor Part 2 (Part 2 of 3) Chart PE .• Cha~t~8) (Refer to ..... ... ..... • • It· i .* •• 11 ••• •• COI'raDI • •••• 12 •••••••••• *. • ** . •.. ** • 110 81 •• X. ······82··········. ·.................. i UIDII1 X ·····81··· ••• •••• • Sl yP; ADDIISS • • or BIID CC~ • • I I COIICCII • : (rULLIlOID) : .. .* •• *. *. * .• * .* • 10 i • L01D IIGISrlB • J 1111'8 BI1'B • coon' OP • COIITIIOID • BI1D CCII .•. ··s.······· c3 .•.i .* •• 11111' • • • • • i i • BISlr • • • SOUID' aiD • • '1lsr • • IlBISOlBD' • • 8Irs • ··.··as·····•• ••• • IIOva II&SS16& • .'1111'11 COIIIII.D' • • Ilro • usrlucrIO. • • LUI • • . ..... ........... •• . •• CHili TO •• liS ..BB BBO .. II OPP •••••• ·····C2•••••••••• ................. i ··Cl ••••••• SET 01 • INDICIIOR • • • 83 • CLIIi • IIsrlocrIOI • • .LIIB 1111'8 ZS&05* • CLIIB • usrlDcrIol • • .1.111 "IrK ZIIOS. . .......... x:X :CHUl[! • 1.010 IUIBER 0' • • 81TIS IIOYID • • I1TO IIGISIIB 5. ................. · . ·.................. COIUOL i: ·····15····· ••••• i 1I11! • • • • • • ·..•.•............. ................• • • ••••••••••••••••• . ··.......... ... i • LOlD BlGISrBI • D III'rH rHI • IDDBISS OP THI • lEU II1D CCII ·PD· • oJl!· ·..···1.··········. ·····13•••·••·•.• lurCClll • IS IT •• liS .LOlD lDDIESS or. •• COIIIID1TIOI •••••••••• X.COIT. IIID CCII • •• RllD •• .1110 RlGIS!!B ... • ..• • PD· • III· ·PD· It ... ..... •.• ..... .•. .PD • . i ................. ·PD· • 13· rIll 10 •••••• ..···C. •••••••••• .-.-.-.-.-.-.-.-. i: :.!~!.=~U~U~~.: i •• *. CCII •• i ··C5···· ••• .SBr BIr '01• • '18sr KIIB • .I.D ITr IDBIT' • • III» 'SOUID' • • BITS • pr• ... RIrlll .... ..... •• . ·····D2·········· . ·····*D3··········. ····D.···.•···· ............•.... .·................. ·................ •.d~~~ggJ) 113~T. • • 81 UPDITBD • ........... *. *. z I'IC *. .* .* • lIS • [SSUB ·'U1'1 ........... • ( •. ·PD· • G1· ··................... i ·····Dl· ••••• • ••• • SUB RBGISTERS • • 8 AID r • i • GIr CCII liB III • • rIC ponrs 10 • ··................... ··................... .....',.......... ·.................. i CLl1R BBGIS1'IR 0 .* • • ·..... *. i ·..... ·····r2·········· ··................... • • SlYI RIGISTBR 8 .•. •• p,. *-*-*.*-*-*---*-* ISSUI l181rl • .·.....•......•.... • • • • sualOolIlI • i: -. .* * .. * • YES .-.-.-.-.-.-.-.-. .............•... ·····85 •••• •••••• ·lrrll1Ir pp • • • • lIur POll Irr8.rIO. urlBIDPT • • • ................. .....G3.......... • • • • • • . ····.a2·········· ·.•................ ·.................. i • 100 VIRrDIL • .1/0 IDDBISS TO • • BlGISrEB 5 • • • • ··•.·.Jl·....·.·.·. ·.•................ ·····..J2··········.. ·.................. i • • POB II 1151'1 • • BBsrOBB BlGISrER 8 • • 81 • • • 1I0DIPIJ!D i • IIDtcarl · . .* GS .•.i •• • *. : •• ~~~.: ·UIRJiXIUD. : . *. *. .* * •. * • 10 .* .. i as •• .* *. •• IS CIICBL •• . • 1 ••• . ·............ i :~~~g Uns~i~"1: .·................ *-*-*-*-*-*-*-*-* • ISSUB IIlD • •• • SIIIOLArB. • sIr • RBSIUUAL. 10. lTTlllrIOI • coulr FOB .1......... TISK • EIIrBR. • RB1DI •. ·.................. ··.......... p,. ·····P5·········· ·IBlDlr • • YBS i i ••••• H I •••••••••• i i SST 01 •• BI~III~a:~fL • RIIQ PLAG i • ISSUB GETDIDR • • IIICRO • ..,•....... ·............ . G......... ............. ···a.·.·..·.. •• Jli&ni •• ·............ • • • ····.·G2··········. · .. ................. i ·····Gl·········· • LOAD VIRTDAL • 1,0 lIl1 • • • aDD ISS liTO .. • BIGISIBB 5 • • rOll IX I1Srl • • • lit ·1I1I~rrlll 110.. ISIIOC" •• •• ••• YIS •• 1 ••• ·.GIIIIII1'ID •• i • ISSOI GBTD1DR • • IIlCBO TO GIT • : l~i:T~t~BI,g : BITOBI BEGUUIS 8 UD r FIlCH SSBOCB'fB ·····DS·········· • AI! • i • • • • • i • • i i ·····12·········· ·····Bl··· •••• ••• • CLUR RIGISIBR • • 0 • · DITCUII i • SUB1'RlCr 8YTB • • caul'! or DAT1 • • lLU1DI 1I0VBD • PBOII • • BBGIS~rBR 3 • • lIS •• ICBI PReSSID •••••• *. *. i •• Jq ••••••• • PBOVXIII rUT. •• Rltn~cMITO •• .* lIS.. • •••••••• *. .* J5 .•.i •• IIiTII PRBSSBD *. .* * .•. 10 * ..... * • •• .* .* 10 • •••• X. ··.......... i • IS· .......... •• 1. i •·.···1C1 ••..••••••• .CLBlI SAYI ABIA. • I'OR snl CODlr • : (COITIDSY) : .•...•........... 232 DOS/VSE :IIlIIIUU ,. i ···'2·········. ·................ : sst~~i~T Logic~l : rransients i • ..... q ••••••••• PI1'CH • SSIlOCRTI • ·................. • • $$BOCRTS - Read Processor Part 2 (Part 3 of 3) (Refer to Chart 18) Chart PF. 2·········... ······A)········· ................. ·................ ··.····'............. ····A1········· SC=ftB~I ~,o : : • 111DaT :,.......... . 1010DT i : •••• a1 ••••••••• : ··82······· • IUD81' . BIUCH TO SUPIIYISO! (SIOl • • : ........... ···... .... ·.................. i ·····D1 •••• •••••• 11111' .* •• •• *. 11 .•.i .* .* .•. *10 F1 .•.i • I080ur PF • *-.-.-.-.-*-*.*-. ·.................. •• *. ._ .- * •• * • US i ·................ • • ·.................. CLBll IIPor lIU urH ZI80S • • • ••• ·G1· ••• ••••• PlrCH • $Saocarl • • • • ·····C)·········· ·................. • lion 51'181' • • FIELD OBDB8 • • r08 .. urE • .1111'0 IIIPor lIU. ··Dl••• • ••• • 5111' Hlr! • coullr F08 • • IRIrl IIHOLE • • SCUBG 111'0 • • CI.".CC.. • • ........... ···11·······. ·............ i : P~:~~:'I~~ : • SBr lOD81SS • .or SClaBl 1111GB. • Ilro CIrCCI • ••••••••••• X: •• i i ·.·.·112·········· . •• DISAsr.1 •• 10 • •• PLAG II cca •••••••• *. a. ······81··········. i *. OIIr •• 115. IXCIHION •••••• *. i ··112····.·· •...........• • SBr 1E1D • 1I0DJ:rUD • • COlIlIllD liTO • • CI'I'CCI • • •• •• • • • • ··.·AII••••••••• ............... IIlIT r08 OPIIlr08 81SPOISI • • • i sar orr posr FL1G II cca ·................ I''I'ORI ... • • • i .* CII •• • •••• CS •••••••••• *. • •• lrrslrxol •• 10 • PIOVIDS 'fll~r •• 111'189Upr ••••••••• • X. RsrURI IS •• •• • 1'0 ssaOCR~S *..* *.• * • • • • • • • • ••••••••••••••••• • 115 ..·... ······OS·········· . .. ··.····D4·.· . ... ................ ·................ i i • RUURI • •• •• . SIC 1 IIllr •• •• . ............. i ··ss······. sIr opr • • lB'fURI • • LIOICA'I'O/i • • i i • •••• P2 •••••••••• • ···P)······.. ·............ • • • .··a"·······. ............. nrllU' i ··C2······· • sir BTTI • • coulr POI • • .. HOLB UPOT • • 11111 lITO • • CI~CCI • ................. •• .. RITE ••••••• •••• X: i ·····C1 •••••••••• • • : • IIIUSIi ·............ • • ................. · i • SE1' SC81.1 • • 1II1GI ADD8ESS. • or UPU1' LIIE • • UTO carccil • • PIOYIDI • :SUPlIUSOI I/P : i • i SIT "II'll • • COlIlIllD IltTO • • C8TCCM • • •••• FS •••••••••• ·................ • RB'lURI • •..-.-.-.-.-.-.-.-. ···G)·.········ i .I0800r pre ·................. : P~:'~:~I~'O : ·······H)··········.. : "BUBII i ·.................. • IITUIII • Charts 233 $$BOCRTT - Read Processor Part 3 (Part 1 of 2) (Refer f 0 Chart 18) Chart PGa ..... ··.... . • ··.......... A2 • • ,......... ··..... ................. • SUOCBtT 81 .•. i :CO~rTBlRfGi~I8I: ................. • • • *. •• .* .* *.. • -us i ·.•................ :x .......... : . . ............. i ··01··· •••• • SIT • • SUPPIISS ICL • • 111'0 CI'fCC~ • · i IOIOUT .IIOYE DITI IIro • • USSR 1/0 UBI • : .····B3········.· .LOID REGISrEB C. • IIITH BEGII IDDR. : or I1Pur lI81 : . i .·................ CLIIR BIGISTER r • • • : • • ······12 ..... . · ••••••••••. . OPDATB DIU IDDRISS or I.PUT IRBI (RBGISUR II . ·....•............. i r2 .•. *. *. *. .* .* •* G2 *. 110 .. •• *. . - . ..... ·.................. .·. ... • *. . .* •* H2 .•. *. *. :1 ..•....... : .... ··...... *. •• .• i 12 • J2 .* *. •• 10DA'I'A * ..• .* .* • all • • •.•........ x: • A3 • .* i • ••••J ............ .rUB • LOlD ADDBESS • • or IEIT CC~ • • nro RBGlstER ... i • 03 • ·PH· • • • • • i SKIP1 *. *. *. * ..• • .* .0 i ·PH • • A1 • Logical Transients PH. • IIIITB SCIBEI IRAPI POI • • CLIIIIIG B1 •• 1. .- DO~'VSE i • CLEII FIlsr • .BYTB or cOlrec ... • PULLIIORD • IllS •• CHIli TO •• 115 • •• BB BIOIBI OPP •••••••• 234 .··a. ••·•·••. ............. :IIlULIII e• i I&S •••••• • "0 i * •. * • *. PLAG •• II CCII *. *. i ·PH • • BII • •• .* •• SKIP •• H3 .* i • • • •1( . . . . . . . . . .. • • rarCH .saocaTC •. .* .• * •. • 10 .. .i •• *. i ·PH • •• IS CCII •• 10 .• •• IIITH DATI •••••• 1. ·.CRIII!IIG •• *. *. * . . * .* .•. -10 : .... ...... .•. ... ·•.•··J1········•.. .-.-.-.-.-.-.-.-. . ................. ..... ·.................. ... · ··.......... ·..... ·.....11.•. •. ·..........•..... ..... .. · • 10 1 i •• • • • UIIT •• IES. IltCaPTIOI •••••• ·.····IiS········· ............... ....... .SUB BITE COUIT. • I I COITRDS' • • HlLrVORD • sup •• •• • lIS •• DISlsra. •• .1 •••••••••• PLIG II CC8 •• .. ••••••••••••••• .. · •• 10 Dlrl •• liS •• TO 81 IIO'ED.•••••• : ••••~I~!n •••••: PlrCR S'BOClrB 10100 i • ••• ·GJ·•••• • •••• ·PH • • 13· COITID •• • • *. as •• PS • ••• ,........... i i i .* :1 .......... : • 10 •• •• ·81·········· • REDUCE 10llBER • • or BITIS REID • :Bur'IR31~~=lss : * .. * •• • 100 HUIIBBR OP • .BITBS IIO'BD TO • .UPDATE .COllrIlDS'. •• IIOBI DlTl •• IBS. •• TO BI IIO'ED •••• 1. •• THlI IIr ••• * .. • -IES • • . .* •• i i •• *. •••• ·P3··.·.··· •• -. COOlT •• • • : i •• · . ·.................. •• * •.• •• IS 111 •• 10 •• DITI REID •••••• .•.i • IBS .. .. i Bl *. liS •• IIOBI THlI TIIO •••••• •• LIlES •• ·.................. G1 .•.i .* ..BITB • IISIDDIL COUNT • • TO GIl' 101lB&I • • OP BlrlS RIlD • .* .* ·.................. i • • 1I1IT POI • • IBSPOISI • .IS COIlrIlDS'.. 10 •• HALPIIORD '1'0 •••••• ..BB I1CRII •• • 100 COUNT or • • • DATI TO BE .ROVED TO RIG r • •• •••SUBTIlCT '1··••••• •••• • • • • : • 1 BUICR liTO SUPBlVISOR (SIOI i I • H2 •• 1. IIOVIDITI ·····B1··· •••• ••• .LOAD IEGISTBR D. • IIlTH LIIIGTB OP • I1PUT lilA • • ................. . .. ···.·····05·········· ................ ... ... • 03 •• 1. • • : i ·...... .. · ······D2··········. ·····D]·········· .·..................... ................. JaR' T&·~~~BI,i'~. • • : ................ .... . . i X ·····C5·········· · . i •• ... ·Cl.········· : RAg~s~BIO) : ro BBSTORK .. • • 101l8BI or • • BIUS IIOYID • ·····C2······•• •• • CILcuurl SUB. • or IIIPur lREI • • POI rHIS BElD • ·PH· · .... :..... :'.......... . ·······85·····•••·•.. ..............•... • • . ······82··········. ·· . ................. ................. i *. ·····C1· ••••••••• • BIISBT • : nngAT~h : • REGISTER 1 • GO IIOYE INsrlOCTIOI ·PH· • • 85 •• 1. •• IETUU •• 10 •• rlOIl .SSOCRTE •••••• *. • ·····13·········· • SUBTllcr BnE • i .* A) IITUn : Chart PH. $$BOCRTT - Read Processor Part 3 (Part 2 of 2) (Refer to Chart ~8) ..... ..... .·. .·. ·PG • • i •• 11 ·PG • • G2· K]. ••• •••• GOON : ••••• 2••••••••• : •• •• NO .LOAD BYTE COUIIT. •• NEXT CCM=l'IC •••••••••• X.01' CHIIIIED USEII. •• •• .CCII liTO REG. ]. ** . .** .. .. .. ••••••••••••••••• • YES ·······Bl.·········.. ................. ..... .·. · i • GET CCII IIHERE • • rIC POIIITS TO • i ··B2••••••• . i .RESTORE NUIIBER • .01' BYTIIS 1I09ED • ····.5········· .ZIRO OUT lIsrB • LIII liD • • 1IPUT UIII • • ............... ··...... ••• * • u... ······B"···.···.•.• ······B)··········. ·.................. i • SIVB ADDR or • • IIUD ceil (IN • •• eOIlTCCIlI •• ........... ·······A3·.········.. ................. CONTRD i i 1'1111 •• •• ·11!) •• • •••• ••• • 1I0Vl SfAllr • .PIELD ORIIBR POB. • I181TB 11'1'0 • upur AlII • • ·.................. ·.................. .LOAD NUIIHER or • : DATA BUD : • SUBTRACT 1I0VE • • LIIGT8 BY 1 • • rOB IIOVII IISTR • i ·PG • ···c2·······. ·............ i ·• l.,lILABLIL .• ·······ell.•.......•.. · . ·.................. ................. i i • GET ISITI! eOUIiT • rOil IIITA • • .IIOVI 01'1'11 liTO • • USER 1,0 IRII • ······02••••••••••. ··................... ······0)··········. ·······112··········.. ................. .•. ······0"··········. ·................... . . ·..... • It]· • SKIPI • • IIIOICll'E TO SET UP COIITIIDSV ·····C3·········· • • • i • SlYE REGISTERS • 8 liD r • • i • LOAD IIRlRG 1 nTH 1I09E • : L!IIGTH • • CLEAII REGISTEII 0 • • •* •• i ·.................. : I~UT~A~R"~ : ······G2··········. ·.................. .. . • • i SIVE BITE COO,T CO.tRDSV H1LPMOBO RESTORE REGISTB8S 8 A.D I' ..... .•. i B.. .* •• illS •• • .J2~~2!L •• • *. .•.i •• UBI *. i .PG • J) .•.i *. PULL .* .•.... i •• *. OITI •• .* •• 80 lIS •• TO BE 1I09EO ...... . *. *. * .. * .* • 80 ... •• .* • • • • ··01"······· ..... j .... • B'· UtlLIII sIr 011 • III0ICITOR • rOB cOllr • BEID • • • • . ·............ · i BESIT • • 'SOOID ALIBII' • • BIr • I1PUT •• 10 .* * •• * • YES BESIT COlT .UO PLla · · a s · . · · · ·• • ·PG· • E2· IIOVIDATI • • CALCULITI SIIE • • or INPur IRBA • ................. i • ·••···G. •••·••••••. .·................ • • •• ••• •• • .·8) BESET • • UPDATE • • UOICITOR POB • • con'BDS' • • • • ·................. • i ···1'5·······. ·............ i .STOIIE RESIDUIL • • BlrE COO IT IN • • • USEB CCB ·····G3·········· nEG : • : • • • SlIT lIilTI • • COIIIIIID 11%0 • CITCC. • • 1111 • ' :.•...•... •1: 1I0ADDI • • • • • • : ................. i • • • • • i ·····P3..i •·...··· • 100 IIUIIBER or • BYrES 1I09ED TO • 1I09B UIGTa : (IIEGZSrBB 1) • CILCULITII .RESIDUIL COBU rOB TaIS USIR • REID CCII e ·..... ·•••••1'............. YES ···15.·•••••. ·............ 1 ·....· .................. * •. * • i ·····E. •••••••••• ·.1. -. .LOAD IEGISTER 5. • IIlTH VIITUIL • • I/O AUI 10DR • ······H2••••••••••. ·.................. ·............ . 1I0DA1'I • ••••• 1'2 •••••••••• • ISSUB GB'rDIDIl • • IIlCIlO TO GET • i ·PG· • • 62 •• 1. 10 •• IS CONTIIDSV •• • ••• • ULFIIOIID TO BI •• •• IIICBBII •• • ···05·.····.. .SET LI.aTIl OP. • SCIIBEI J:IIIGB • • 11'1'0 CBTCCI • • BEsrORI 1I0VI. :UIIGTII (ADD II : i El i ··CS······· i • • : ................. i · . ·............ • sir 1001 or • • SCUll IIIASI • • IlrO CITCCM • i ··HS······· • SIT • '.ISTOIB • • 1tl$IB0ABD' BIT. .Il' lor IP1. II. • PIOGBISS • • ........... i ..... ... .P.G· • B~· laBour •.J~~~!2n •• • i 11 .* •• SUP •• -. *. . *. * •. * .* .* i ·................ .... ·. PLIG •• lIS. III CCM •••• I. •••• ••••• • • •• •• It .. rlTCB • SfBOCRrR • i ·..... ·••.... . B" • • .... • 10 i • III • ch:arts .235 Chart PJ .• $SBOCRTO - Update Wrap-Around Address (Refer to Chart 16) ··................. • ····11· ••• ••••• SSBOCHTO • B1 .•.i .* •• HC •• ···B2············ *. *. *. .* * .•. *110 ................. .* • i CI'I010 ••• C1 •• •••• •• OYEIIJ.U •• 110 •• IIODB JOsr •••••••••• •• IITEIlED •• *. *r3 •• * ..,~ .* i ••• • C) • i IXlr ••• C2 •• C) •• •• 1I11P- •• •••• • •••CII ••••••••• •• AIOOID •• 10 •• aVElLA! •• 110 • PErcH • ADD lESS •••••••••• IIODE •••••••••• SIBOCRTl • ..0PDlTI.G).. •• •• • • x.. X.. *..* * •. * ·US X. *..* * •• * .," i i SIT PLAG * • TO 'OVIILAID' • • ·81 .. ....··02······· ............ . . ............. ··01.·· •••• • ··.......... 1IIII'r1 CORRIUT BLOCK TO HC-PILE PILB •• IBS •• IS BLOCKBD •••••••••• X • * • SBT PLAG TO VALID • ····0.·········• ............... • • • •••••••••••••••• X. • • :X •••••••••••••••••••••••• : · .. ·..............•... i ·.···B1· •••• ••• •• • • CLEAR HAID COP! BUPPBR ... · • • .U OVEILU 11001: OlllLU 1I0DB IS BlrillD IIHIIEVIII THE IIIIAP-lBOU.D pour OF rHE liARD-COl'! FILE IS OVElllnTTBI. $IBOCITH DErBCTS OVBILlY 11001 UD CAOSIS nVlLIDATIOII OF THI IIUP-ABOOILD ADDIBSS III HBlOBI IICOID YXl .SBOCRTU. . ·.................. i ·····P1· •••• ••• •• • COPI • FLAG IIiTO • • • HElDER RECORD • .•.i .* . . *. G1 • •• • •••• G2 •••••••••• COPI irEIi , . OYERLAI 110 WRAP AROOND •• IIODB JUST •••••••••• X. AIIDRESS Ilro •• UTERED •• IIUDBB RBCORD * * • **. . ** .. •••••••••••••••••• • IES :x ..........•.....•.....•. : ··.Hl·•.········· ................. i CRTU40 • WRItB HEADER RECORD TO HC-FILB • • • • • .Gl IIUP-lIOOIID ADDIISS UPDATE: PBUTLOG 110115 THE IIUPAROUIn POIlT OP THB HUDCOP! rILl!! al I?BUUIG I'rS COITBM'fS OP TO THB IBII IIBAP-AIOOIID POIIIT. VIA SSBOCRTO I I UPDATBS THB II . . P-AROOIID ADDRBSS I I THB IlEADER RECOID. .H) POliCE IIRITUG OF CURREIT BLOCK: paR IILOCKID HlilD-COPI FILES A BLOCK IS 10'1 IIRITTBII O.LBS~ IT IS PULL. ~;S~~:Ec£g~lsDg:; ~hls.lT BIU'ORI PRIITLOG SUUS ~t~n·gL§TEU·llutt~B:II~~lrHB HUD-COPI PILB. paR THIS REASOI UBOCRTO IS CALLED BI PRiliTLOG UD BI TilE IJBJC7 ROD COIIIIUD PROCESSOR •. i ••• Jl ••••• ••••• •• BE-RUD CORBBII\' BLOCII PRall HC-PILE • ................. ....• * .... • i : 236 ••••••••••••••• C) : DOS/VSE Logical Transients PlrCH SIBOCRTa • • $$BOCttfV - COMMAND Error Message Writer (Refer to Chart 20) Chart PK. ...... ···.... 12 .. 10 ·····12·········. i ··................ ··.................. • ····1,·········. UBOCRn .* B1 .•.i •• • *. .* .* WlilTE SCRUM • • * .. * • rES • .··S2·······. ··............. RESIT liP I1DIC1TOR •• SET OPF iLlRII FLAG ······B"··········. ·................... • ........... •• • • • ······C2··········. ·................. • • • S8T CO.RSOR AT lIVlUJ) CHU1Crp BRlIICH YIA REGISTER 1 • • IOROUT i • • • TgBg~~~=YI{bR : ······0"··········. i i Pl. • illITE SCREEN PROUOB CH1IIIIL PROGR11I : • • • 10/l0U1'1 • • • ·.................. • , i • • i : •••• c........... : .. 02·········· ·· .. .·..·-.-.-.-.-.-.-.-. ·................. ·.................. ·····01 •••••••••• IOBOUT1 :x.......... . i i • • i •••C1 •••••••• • PK. .-*-*-*-*-*.*-.-. *. • .RETURN FROII •• 110 •• SCRIEI IRP •••••• *. • 10ROUT1 ·.................. • • .. • BRUCH 1111'0 SOPEBUSOR (510) • • • :1 .......... : GO . i ..... i ·····E1 •••••••••• • CALCULA'J'I 8/11 • • ADDRESS FOR • • CURSOR • • POSITIOIIIIG • ·.................. E2 ••• *. ** . . ** .. • . ··.. EXI'J'1 • •••• B) •••••••••• •• •• IIEOISPL1I •• NO • PROYIOE EIIT •• 1I00E ••••••••• • X. COIDITI0llS .• • • ••••••••••••••••••• rES · . ···............... •• F2········· ····P)········· · . ............... . ·.................. i ·····Pl ......... · • • • CLEAR IIISTRUC'J'IOI LIIE • • • FETCH UBOCR'J'1 • • • • FUCH SSBOCRTP • • • • • i * •• * • 110 G" ** . ... ** : •••• H2 ••••••••• : .* • • ..•••••••••••••••••• • rES .··.G5········· .•••••••••••••••. FarCH UBOCIT~ • • • NO •• RBDISPLU •• N O . • •• 1I00E •••••••••• X.SELECT IIESSlGE • *. •• ......... *.. NOREIJSP •••• . •• OIS1STl!II ... YES • •• rLiG 1M CCII •••••••••• X. • ••• •• H1 •• .•.i .... · . ·............ SE'J' ON AL1RII FLAG '* •• UNIT •• 1£5. •• EXCBPTIO. • ••••• i • • "" .. i F4 ··G1 ••••••• • SIC 7 11111' .. .•. .. .. .. .... i i • • ... . ·................ . . i • •••• £4 •••••••••• •• •• ······a"········· ................. i • 18TUIIII • · . ·.··..J2····.·····. ·.................. ·.................. ··...... i i ••••• J , •••••••••• • IIISBIT ERROR • IIESS1GE FOR • RBOISPLII • • • • • • LIISEBT UTO INSTRUCTION LINE BOFF£R • • • :X •••• ••••••••••••••.••..• : x • Al • *.*. Charts 237 $$BOCRTW - Display Warning Message (Reier to Chart 20) Chart Q1,. ••••••••••. ··................. .···.··.A2 ................ 10T'ULL ···.A1 ••••• •• •• • ISBOCRn .* Bl .•.i •• • *. .* .* ................. i • s u orr BIP • I1DICATOI • ·· • * •• * • !ES ··Cl ••••••• • i . .................. · :.......... 1: GO BUICH VIA BBGISUR 7 • • · . ·.................. " ... .. i ·····Bl·········· .CODIT I1~BlIUL • • PIO~BCTBD • • LIIBS • i .* e. •• ALL LIIBS •• 110 • •• PIO~BCTBD ••••• , •• *. *. .* .* * .. * • !BS i ····Gl··.···· •• •. 'BTCH • : SlBOCRT! : ............... • • SBT ALAI II UDICATOI • i PROtIDB CHAIIBL PROGRlII i • • SBT OP' ALllll 'LAG • • • . • ·····'2.·········2!:. ··................. . i :!~~~~I!.-.-.- • ·····G2••i ••·•••·· 2!: :!~!~!!!._._._ ................. IIlIT '01 OPBRATOI IBSPOIISB i ·................ ·.................. • • • • ••••C"............ • • • • •••••••••••••••••. rBS ·····03·. . ••. •••. • • • • • IIIITB SCIIBM *. * •• * i PIBPABATIOI '01 IISG. 'IIBSSAGB IIAITIIG' *. *..* ··.·.B2·····.···. • • • • ·····BS·········· •• lTTBN'l'lOIi •• liD • PIOVIDB TH1~ • •• PBIOIIG . . . . . . . . . . X. IIBOCRTII 1111.1. • •• ,. • GB~ COIITIOL • • ···02··.·.••. ·............ · . ·.................. • • • Cl • • • ······H2.········.. ·.................. • UTUR. • ·. .. ·.·····0"·········· . ... ....•........... i •• •• SVC 7 1I1IT •• •• ·····J2·········. i • IOIiOUTl QA. *-.-.-*-*-*-.-*-. • • DBLETB 'IIISSAGE • • ·.··K2••i •••••·• • • • lIAITING' • ................. ·................ • • 238 'BTCH $$BOCRTK DOS/VSE Logical Transients • • • :X.......... . .. ·................. ·· i IOIDOT ·····cs·······..• • l'RDfIDE lIP • • TD SUPBIYISOa • · . ................. i ·····DS·········· • • : BUICH lITO SUPBIVISOR (SIO) • • : . . ·. .. . ... ........... ·................ ... .... ,........... ··................. i i •• g ........ . ·····BS•• • ••••••• • SBT OP' • • UDICATOI '01 • GETTIIG • • COITIOL • • •• •• SVC 1 IIAII •• •• i i • IBTOIII .• ,. • •• *. ,s •. *. *. .* *..• • 10 .* i ,., • ••••••••••••••• * *. ...*.* *.. * • 10 i • •••• HS •••••••••• : . UIII •• !BS, IICBPIIDII •••••• GS ., • ••• GII......... •••• • 'BTCH • tBS •• DISASIBR •• • SlBOCR!'! .1 . . . . . . . , •• ,LAG II CCB •• i • GIT ADDRESS • : 0' 110 BUrrBl : : scl~B~I~'o IORDU~1 .* :!~!~~I!.-._._2!: ····AS········· i i ·.•··.··C2.···.····. .................• • ·................ : • • • ··B3·······. .............. .. ... • ISSUB ALl III 1l1IT POB OPEUTOI BESPOISB • SBT orr POS~ • 'LAG III CCB • • i • ····13········· ............... A'f1'IIlI'r . ··............. • ·····D1·········· • • ···B2····••·. i •. 10 •• IB~UII '1011 •• • • • • •• SCREEI EIP •• *. • • I10ICATE THAT. . . . , . SlBOCITIl HAS • • HAD COITIOL • aITun • ••••••••$ ••••• : Chart QB. $$BOCRTX - Verify Operator Commands (Part 1 of 2) (Refer to Chart 20) * , .... • a1 • ·····a3.•••.••••• ··................. ... • SlBOCIITX • •• •* *. ....•••••••••••••••••.... *. **.•..*-.* • 10 ··.......... ·····B3·········· ·................. .. .. i -. .- 'i .•. i III • • •• •• •• RETURI PROII •• 110 •• SCREEII UP •••••• *. 1) • ••••• 11i ••••• lS •• • PROtIDE· •••• • TO PITCH • YBS.. UIGB •• • SSBOCRTIt .1....... ••• IIODIPIBI) •• • • • • • ................. i Ill • i i • PROUDE THU • SSBOCRTI IILL • GET CONrROL • UTER 1'1''1'. • INTERRUPT ····al········· ...... ··.... . ··.......... *.... ··.......... .- * .. * • rES SYC 7 IIAI'I' • • •• •• · . ·................ .. .... . .. ·· .. i C5 • ·····BS·········· • • • plonDB ro PlrCH SSBocarL • • • • CS •• 1. · . ··............. ·····Cj·········· • • RBSBT BRP IIIDICATOR • • • • • • • .IOROUTI i • • ·. . ·....· .................. • : • • • ................. ·..... ·.................. $E! 811'1' cOlurrIols • • i QC. RElD OPEa1'10R'S II1PUT • • • ·····DS.········· i ·····E].·········· *-*-*-*-*-.-*-*-* • * • BLal.. I1STIUCTIOI LIIB ·· .. ................. X • SET OFF ALARII. • • FL:~iag:~gCK •• X ·····El·········· • CLElIi • • IIISTRUCTION • • .X. lHD 1IPU'I' • • • LIIiE BUPPER • • . AT'lPI!NDO :X •••••••••• x: • GO • • • ................. ···....03 .. .. •. X. .··03·······. ............. ··................... BRalCH VIA REGIST811 7 :!~~~~Z1._._._F. • • • • ·................. . .... . • i ····.·D1······.··· • • SET OPP INDICATOR FOR SETTING CONTROL i ·.···CS······.··· 011 •••• i i ··Cl··.···. ····BS········· P8TCH • pHlSIl : ................ 81 • BEQCllIC .•. i : •••• Pl ••••••••• : P2 •• • GET RAIGE OP • • DELETION PROII • • SEGY&L2 • .* . ·................ ·.................. · i i ·····Gl·········· • • • PROVIDE POR AUDIBLE ALIIIII 1'1 .•.i •• *. .* *. : •• ~~~ . : . K1!~Ei~~~~EI) *:.X ••••• ~~~.:. g:U1g;~R . : . •• .* •• IIiPOT •• *..* * . . .. * •• * * .•. *NO • NO . ····G2··.··.··. • PETCH • • SSBOCRTP • • • • i G3 ••• .* •• UP •• CUISENT .* *. Gli ••• •• *. TO) •• US •• UTn •• IBS *. CHARaCTERS •••••••••• 1 •• KEf PRESSED •••••• •• INPUt .* •• •• ··.... ...... *..* * .• * • 10 *..* *.. * • NO i • III • i DOCIIEI :!2!2~~~ •.••• -i~: ••• ................. • · * . •• Jl· •• •••• SET OPP P¥~T c~k AG ........... Kl ...i PROVIDE ro FETCH SlBOCRTII • • • i i • • •• * ..... ·.................. · .·...... ·..... ··.......... .... • IIRITE 'DSLETION. • REU.' AND • • K-COIIKII.ND • i i ••••• 84 •• • ••••••• • ·.··Hl··"······· 111 • • A) • i • C5 • ••• •• .* *. •• ATTENTIOl! •• •• *. INTERRUPT *. .- .• us •••••• .i.. · .. · .... . ... ··...... * •• • NO i • • OJ * AJ • Charts 239 $$BOCRTX - Verify operator Commands (part 2 of 2) (Refer to Chart 20) Chart QC. .····s.·.········ ·.....•............ IOROD~1 i • • • PBonDI CU.IBL PROGlIU • • • :1 .......... . ·····c,,·········· ·................... i • • • PRO'IDI 1/. ~o SDPIIIYISOR • • • .····D".·•••••••• i • • • : SUICR II~O SUPBRVISOR (5101 • • • : ................. ·..•..··1"····•.•..·•·.. ·.•...........•... . . i S'C 1 •• •• •• •• W'I~ • 11 .•.i .• •• *. • UII~ •• tiS. *.••e. IICBPrIOI •••••• •• *. .* * •• * • 110 ... .••. i G4 •• •• DlSIS~IR *. *.'UG •• IBS • II CCB •••••••••• X. *••. . . .* •* •••·GS········· pnCH .'SOCUB • • • •••••••••••••••• • 10 .···H"····.····.. ··.•............. i • 240 RB~U" • DOS/VSE Logical Transients $$BOCRTY - Handle Long ftessages (Part (Refer to Chart 20) Chart QD. ~ of 3) ··.... ...... • IS· ·····.2·········· .•• X: ·................ ·.................. lDVUC£ ·••••11·.··••••·. • $$BOCRTr • • • G£T RllGE 01' IIISS1GE LUIS CORUIT i ._ IS • • : ••• •• Ill. •• •• 10 •• BITBI 181 •••••• *. *. .* * .•. *18S ·•.... .....• .1Il i • 11· Bl .•.i .* •• RBTURI •• *. *. .* * .. * • rES ................. • • . . ............. i SBT 01' SCBBII BRP • • IIOIClTOR SCRBII UO PIINTIR • _C2 • • i • • • .IIRITI LIIIS 01 • .* ··cl ••••••• • ·····S5·······.·· ·...............•.. i ··.··82·········· :~5~:!t-•.•••• a~: -. 10 PROR •• • ••••• SCRBEI ERP •• .•.i ............ i-e ................................... . • •• DOCHBI Cl •• • •••• c,. •••••••••• : GO 1 •• e. .. . .. ...... .. .. ··•02 .. .* • .. .. *. • *..* • • 10 10 • ................. •• HIRIl COl'I •• l!BS • .ROYIO. •• PILI 0.11 •••••••••• 1. II'OIIlITIOI •• •• • POI SSBOCITa * Ill • • • • .LIIas II Bur,a••• • • •• &UTOIIATIC •• IBS • •• DILITIOI •••••••• •• IIOOB •• • CLUB IISTIOCTJ:OI LIIB .I1PU~ • • • • . ·····C5····· ..i!!_· •••••• i :!!!=!=~ • .............. _.• • •••••• eLlll Illllia • • LII! • 1. ······01··········. ·.................. i • • BBllCH VIl REGISTKR 7 i ·····02·····.· ••.·. ......... -......01' ................. .ISSUI COIITUUB • • BY 112~1I • • IIBSSAGI • ·................. ··.··E2·········· •.•_V!: ··................. .. ·.····B]······.·· ............... :G02 •••• • • i ·.···01· •••• ••• •• • .IOROO\,l : .••..•. •.• 1: i GO El ••• i •• .* *. •• $$BOCUII •• •• PlSSBO •• lLRB1DY •• *. IBS • ••••• • X. .* * .•. *10 i ••••• 1'1 •••••••• •• :!!~I.•.•.•.•. a!: ................. • • • OBPUB RBSSIGE TYPB ,. • • i ·····Gl •• • •••• • •• • I10IClTB THlT • • SSBOCRTII BAS • • BBII PISSBO • • lLRBlDY • ISSUB lLlRR •••·011.··i •••••• ·................ • • PBTCH ISBOCHH • • i :!~!~!I!.- • • .. aBSIT UTBRI1L • • PROTICTIOI 01' • • LUBS PlIITIO • • • • PErCH $SaOCITO • • ·····1'2i·········· •••. V!: ·................. :!~!~~I!.- • IIBITI WIllING. • IIISS1GE • ·····G2.·······.· i :!l!=!!!•••••. V!: ·.•................ ................. • • • linT '01 lrTBITXOI I1TUIOPT • • • · . ··.··H2·········· ·.................. ................. ... 1.i•••••••• ·.................. .. .j i ··.·.Hl •••••••••• • • • USSR!' PUITII liTO SCI' • • • :!~!~~l! ••••• -V!: • • • RIIO O.BUTOI RBS.OISB • • • i •••••oJ • PROUDB fOR • • 100IBLB lLBR. • • If RIOUIRBO ••••••• J2 •• •*. . : . 0:E8~:~IL .:.~~~ ••••••••••••••• •• KEt.. I' * .. * • 110 ...... ··.... .. • 11 •• 1. . i Bf;ljClICO ••• 12 •• .. .. ··.... ...... .• *. •• CURSOR •.• 10 • •• OR IlfEa •••••• ". IllY.· * •.• • IES i • AS • aBljClICO I ..···11· •• ••••••• • CLIII • • IIiSTIUCTIOI • • LIlli • u.ur • .LIIIS II BUP'EI. • • ...•............. ·••.••••...02 .•• i Charts 241 Chart QE .• - Handle Long Kessages (Part 2 of 3) (Refer to Chart 20) S$BOCRT~ •• •••••• • • ····a1· IIII~1I . . SS1GII • • • LIlliS • ............... SCIPI~ i ·····B1· •••••• • •• :!~!~!I-._._._i~: ..............•.. • SliT 011 1'11111' • • .~~I. • In II • BITliS .* C1 .•.i •• • *. •• aLai" CCII •• 10 •• II CHalllL •••••• •• plOGlall •• *. .* * .•. -us ·................ • • ••••• 2••••••••• IRITB • ... IIIIG • ·.···82.·•••••••• ISfIIllG i • • • • .1.PlB. .. ulnG LUI! aurPII • • • • ·.................. ·····C2••i •••••••• • 101l0UT1 or • • VRI~II Burral • • Oloro lalUIG • • LIlli • ·.................. ,. ··•.02.····.···. · . ··................. . ·.................. i ·····01···· •• •••• • pROVIOI POI • • aUOIBL. • aLU8 • • :1 .......... : 10SOUIO i • BITURI • • • • ·• .• ·.................. :1.......... . ······C)··.···.···. ·.................. ···•••·D).·••••••••... ................. •••• ·B)••• ••• •••• • Gat' lDDIBSS or • • SCIBII LIII 1 • • 8001F! 1'IUt'&I • • rUG II .~~I• • • Bltll • i • GIlT lJUT LII • • "RI~B ~o .* • • • . . ............. i ··P1 ••• • ••• sa~ OPP • .LUll • • • rL.G • •• ............. .•.i CI! •• • •••• C5 •••••••••• •••• • 1'10'1011 Taat' • •• Ut •• nol •• 10 .. lSaOC1'f1 Gat's • •• IIra.IOPT •••••••••• 1" COlrlOL ap~BI • •• •• • aT~II~101 • •• •• • I1~IIIIU.1' • * •• * ................. • IBS ·••.··.OS·••····••·.. ••• • ··.····0"····· . .... ............... .··............... '.. i i • II~URI • •• •• . *. .. .- .* • SIT OPP PRlIor .. • BIT or LUIS • • VBITorU • ................. ·................ i ····a1 ••••••••• : DOS/VSE Logical Transients i • IBTURII SVc7 lIaI~ •• ••. i *. ................. ···.··P3········· i 242 i .··B"······· . • ••• •.sJl.grl."g~~ ••••• • ··115·· Slit' .. orr 1I01Ca1'OI • • POB GII1'1'IIG • COlrlOL • • • • lIS ·····G1 ••••••• • ... IB'fUU B3 *. :!f!!!1-.-.-._ i~: : .* 10 • •• IlsrIUCt'IOI •••••• •• LIII •• ................. SCRB.I no pIIITBB ... ar:rlllI~ i i :!~!~!I!.-.-.-i!: • i IIIVIU •••• •• 1· ••••••••• • • • i ISUU ····a"········· UIr rOI • OPII.UOI • . .sPain • ............... • ............. ••••••••. ··.····rs· ............... i • IBrUII • $$BOCRTY - Handle Long Messages (Part 3 of 3) (Refer to Chart 20) Chart QF. ·····12·····*·*· ................ sC=~fihi'o : • • • : ·····*B2·····*····. ·.................. i IOIIOU'U • • • PROVIDE CHI.IIBL PROGRAII ····11········· ............... DUiliE IIESS1GE rIPE TEST •• •• • • • .* *. Bl .•.i •• • • • *. PUTI! *. *. . * .* •• YES ...... .* ··.......... i • 110 • :X ••••• •••••• ·· . . ................. IOROUT i ·····C2·········· Cl i · . ·.................. D1 i :: WilT .* •• •• *. P2 .•.i •• .* .•.i *. . * .* •• x • TBST02 i 11 ••• •• .* *. •• •• HE1DBR 10 • •• POLLOIIBD BI . . . . . . •• BLlllK •• *. .* * .• * • us ·····P1·········· i *. • .* •• • • GBT IIBSS1GB TIPE *. *..* * •• * .... . ··...... ... • 10 • Gil •• 1. * . . * .* * •. • *us i ····H2.·······. PITCH :UBOCRTI ······G4··········. ·................. PIIlVlIL •• • ••••••••••••••• • I • USER! IIBSS1GB • • TIPB IIIDIC1TOB • • 11'1'0 SC'f BU'S • i ·................ • • .* •• •• YBS ••••••••• X•• IIPORIIATIOI •••••• • •• IIBSS1GE •• •• ' ~.lSISrIB··.. 110 • ··.·Gl·· •• ••••• • •• PL1G II CCB . . . . ·. . . . . . X. BETUBa • *. PII .. .•. -.• ••••••••••••••••••• * •• * • 110 G2 *. • IBS Ullr •• IES. IICEPTIOR . . . . . . *. *. CHIR •• 110 • •• HEI1DKCIIIlL •••••• :: •• •*.' ••~ .* • .PIRST • • • ·····E2·········· •• SVC 7 •• • • • IBS i ·. .. ·................. . .. REt'URI! x · ••••••••••••••• • *. * . . * .* * .. * ·····D2·········· BRlliCH Ilro SUPERVISOR (SIO) ····C4····•..·· •• .* HBlDBI*. •• 1 0 . • .IISG •• ALPBlItUIiERIC . . . . . . . . . . X. • PROVIDE I/P • • TO SOPERVISOR • • • • .•.i Gfl • • • ·····HII·········· • • .. IIlSBBr 1STBRISK II PIOIIT OP • • . .. II£SSACiB • ...• ................ . :x .......... : P1UIL i ••••• J . . . . . . . . . . . . • IBDICITB THAT • .. LIIIII IS • • DEL£T18LI • :....~Ude....: ""........... ·.... ................ i : RKTURII : Charts 243 $$BOCRTZ - Channel Program Analyzer (Part 1 of 6) (Refer to Chart ~6) Chart QG. ··.......... • A) • ·.·.··A3····.·.·.·.. ·.................. i • ····A2 •••••••••• : ............... ISBOCRTZ • • : ···................... i ·····B2·.··.···.· • UI'IIALIZE • • PRASE POIII'lE8S • POllT TO IIEI'I CCII • • ··•••··B3··········.. ·................. i • STORE CSII-CCI • i BEGINZI i ·····C2·········· :!!~I!:=~.-.-.-a~: ................. .... ·..... ·.................. .CRECK rOR VALID. • OPE8&TIOI • • CODE • ·····C3·········· :!l:i~l!.-.-.-i~: ··................... • SKIP 111 rIC • ·OR. • • KII •• 1. . BEGIIZ2 I : •••• 02 ••••••••• : • SUE COIIIIUO • COBBIITL! • PROCESSED • • • . ·····03····...... i :!!~I:!!.-._._i~: ·................. • • CHECK rOB ULIO COOI'I~ • • i •.····E2· ••• • •• ••• :!!~I~~~~-.-.-a~: ·................. 38,39 IN CCII .• .. • TEST rOR BITS • :1 ........................ : x BEGINZ.. • •• F2 •• YES •••• COIIIIAID·· ... • •••• IS' lOP' •• *. i ..... .. .. .* * .•. 10 * .·. .•. .. .. ·OJ· .. .. AI • i 10PCIID G2 •• YES.. COIIIIAIiO ...... IS 'ALII· *. ..... i ·OJ .. *. .- •• •• . .. * •• * • NO • • A~. · ALRIICIID i •••••• :*••• .*. .*. *•• * * .. * i ..... ..... •'".A3·. :::~;~~: ~:: H3 ••••••••• : •• 84 •••• ..H5 •••• • - .. -.-.-.-.-.-.-.. • POST CRI..IBL • ... COIIIIANO ... 10 •• DATI. •• YES • CHECK FOB ••••••••• 1. AIID DBVICE ••••••••• 1 •• IS 'SIS' •••••••••• 1 •• CHAIIIIG •••••• .. PROTECTION" .. END IN CSI • •• •• •• •• • VIOLATION.. • •••• "'... ••••••••••••••••• ••••••••••••••••• • rES ... .QJ .. • 11· SEISECIID 244 DOS/VSE Logical Transients .. 110 i ·UR • BEGIIIZ5 ............ i ·Al* $$BOCRTZ - Channel Program Analyzer (Part 2 of 6) (Refer to Chart 16) Chart QH. ..... *QG • H5· * · * * i BEGINZ5 •* A1 .*. •• •* •• *. nC08aECr *. YES LENGTH .* •••• ·.SOPP8l!SS •• *. ..... . .... . ... i * .. * *NO : .* •• 83 .•.i •• Dl : -. *• YES •••••• *.READ COIIIIAID .* *. *. * •• * * .* .* 110 · . ·................. . .... ·· .... i ·····C3*·····*··· • posr I1COHBECr • • LENGTH 111 CSII • * • . • DJ •• 1. ••• * RBrERRNCES TO QHE1: QJG3. QJGII •• *.* ** . I RUDCIID BBGINZ6 ••• :.***02••• **** ••: . ..D3 * ••• * PROVIDE TO * I YES.* •• • PBTCH PHASE .1 •••••••••• READ COIIIIAID •• SSBOCRTR. •• •• • •••••••••••••••••... * *..* *.. * ** • ** .. 1. **E , •••• *.. SET ON • • INDICATOR * POR BROil EN • CCII CHAIN • • •••••••••••• • .*••••.•... .......... 112 •• •••• NO.. COlIlIlllD *. CIIAINING .* •• •• .1.......... **. . ..* . - • E 1 -QJ. • E1 •• 1. ·· . ................. .... ·· .... ..... · .. ·.................. .... ·..... ·····r1.···....··. l • GET ADDRESS OF • • IIEIT CCII • . • G1 •• X. •••• • ElIU~~.G 1.~........ .QJ • * • Gr • SA liE ADDRESS. • • 01' CURRENT CCII .1 ••••••• * • i •• .* E3 •• IISITECIID • •••• EII •••••••• !I'. *. • •• •• YES • •• IIRUE UTH •••••••••• 1* •• CR •• I * ** . .** .• YES ··...... ••• • * H5 • • ... * .* • • • ••••••••••••••••••• 110 .•.i • II S • • PROVIDE TO PErCIi PHISE SSBOCRTe .. i . EIITZ1 i J. i BIlTZ NO Fl·. *. .* . .i I'll •• •. .. .. •• IIRIrE •• YES. YES .- I1COIBECr •• IIITHOUT •••••• • ••• *. LENGr.H III •• CR •• •• CSII .* .... .... *. • SIIIULITI COIIIIIIID BEJECT *..* *.•• .* * ..• • . • NO ·OL· • : 1'2••• l . . CIIDREJCr l : •••• G3 ••••••••• : i .. .•. .. .. • 1fC).. • • • Gil •• COIII!AND CHillING ·.................. . . .··83·······. .*.. ... x••• *. i 110 *. ••• * * •.• * .• .. *• •• ....... ....• * * IES .. II - • * * • SET OFF CE+DE III CSII ...........* 6~D5. Qg~~~: •* •. 1: .... . • * * * •• •• .* *. * REFERENCES:*·* * ........... 1: i i HII •• :UITZ2 i : •••• HS ••••••••• : •. IIIIfE •• 110 • IIITHOUT .* •••••• CR •• *. II) • .• .... * YES *STORE THAT CCII * * ADDIlESS Ino • * " CSII :...........•...: • · . CHECK1 I *.***J 3***.***.** • INDICATE THU * * CCII CHIIN IS • • BROKEN OFF * * •••••••• * ••••••••• •* SKIP III! rIC ... .*~ •• * · .•.................* i .* • YES : ABENlJEIIT .QI{ • .l~. * "GET PHISI! ... IIB .. APPBOPB. TO • * COlIlIllIlJ COllE * *• .*................* i * .. * i :!l~~~l! •.•.•. ~~: . *. I l l ·• •• ERROR •• NO.. DORIIiG *. •• ••• INITIAL .* ·.SELJ::CTIOII.· *. ······Js··········. i ·····JII·*····* •• • •*.* 1(11 •• *. *. IIBITE IIITH *. •. Cft .* •••••••• lCES •• * .•. *110 .....* :JlEGINZ2 .. I "QG D2· * • : i ...·KS········· FETCH PHlSE * : ............... i .... ··......* • G1 * Charts 2~S $$BOCRTZ - Channel Program Analyzer (Part 3 of 6) (Refer to Chart 16) Chart QJ .• ..... ..... .. .·. • • G2· * 10PCIID i : •••• & 1••••••••• : lL811CIIIJ i ••• &2 ••••••• * PIOJIDI! T O . • I'Uigcn~SK 11 .•.i .* •• •• *. C~U::D i • • • • •• PIOYIDS I'D FUCH PHlSK SlBOCRTII • • • i •• D&TA CH&IIIMG *. UDlcarK HII • ······&3··········. .·................ SIMSKCI'ID ·..................:x....................... • : .·. *•••• ·UG • ·QG • ·UG • • F2· *.. * .* •• *. •• .* .* B3 ••• •• SBISI2 *. •• VALID •• BYTB COUllI' rss ...... *. *..* .* YBS .......... .* •• X.. *. * .. * • 10 • 110 Bli ••• •• DATA CB&IIIIG *. •• *..* * •• * • YIIS .* 110 . . . . .. ··........ i • GJ •... C1 •* .•.i •• 115 •• COIIIUID .. •••• CH&I.IIG *. *. * .. * i i •·.C3······· • •. •• .* .* . · •• USUT CCII •• • ADDIBSS UfO • CSII •• •• ·...•........ ................. .•.i ·····04•.•••··•••• • • IIIDICl'f1 • .ucola. LJ!ItGt'8 • • II CSII • •• • 10 ••••• CIi •••••••••• • 1 ••••••••••• i :'01'2 ·.D1 ••••••• S8f 011 • • UDICAfOR • • POR BIOIIIII • • CCII CHlIl • • ............. 11 i .*. •• .* *. •• I1lt'lAL •• •• •• SILIICfIOII *. .* •• .* DJ *. *. * .. * i •. .* ................. .* • • IJ i . •. -. US 110 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . I.. .... *..* i • CHICK 1'01 • VALID RY!B •. COUll! .* • IIi:S ..... .·. ·08 • · . ·........... . . ··...... .. i Pl. Fli ··F3······· IIITZ 1 • G] •• X. G3 X ••• •• .* *. •• COlIlIlllD •• •• *. CHAIMIIG *. *.. * .* - 110 : .......... 1:x ..... -08 • -.II!. - BlITZ DOS/VSE Logical Transients .* .. .i • • • •• .* *. •• I1COIIICT •• • SET OFF • .IItCOIR. LEIIGTH • • III CSII • • •••• .SIMSSl • • :!!!!~:!.-._._v~: LBNGT8 •• ·.SUl'PBBSS •• *. SKIP AU TIC ·····1"·········· ................. .* *. •• nCOBIBCt' •• •X : ........... :x 246 :!l~i~~!.-.-.-2~: •• •• • 10 * .. * • 110 • •• YIS.. DU" . . . . . . CHAIIIIG •• ns LEIGrB •••••• ·.SUPPBBSS •• *. .* * .• * • 10 .··G. ••••••·. . ..... ............ ... .....:x .......... : ... i IBS ...... • SI!! • .I1COll. LEISTH • • II CSII • i ·OB • Gt·• EXITZ1A x ·OB • • 11 • Burl ... $$BOCRTZ - Channel Program Analyzer (Part 4 of 6) (Refer to Chart 16) Chart QK,.. ..... .....* .. ······.3··········. ·UH • 13* • •·UK 1t3· * * * * i ·.···.1·········· * • • • : INSERT CCI ADDRESS IIITO CSII UIDJllIT ................. ................. i •* •• .* •• 111 . *. *. • FIRST cell ** . . ** .. •••• *82•••••••••• • PROVlDE PHaSB • lilliE I1'1'R01'II • • • TO COIIIIAIiD • •• * * ••••••••••••••••••• i ··Cl······· BESET • IBDlcaTOR • • FOR BIOUII • • CCI CHlIli • • ............. ····C2·········. ·............... i • • PETCH PHASE • • . ............. . i ··B3***·*·. • •.•••••••••• 10 • 1* • IES • * CHI!CI3 *. i • CLElI ADDIIISS • • FIELD POR • RBiT cel • • • • : SEt' opr DE+CII I I CSII • • .11 ····C]·········. ·............... i • • PETCIt SSBOCR'rA • • ................ ·................ • • CHECK CCII 'UG BUI 'rEST.USD • • i B.. ••• •• •• IES.. BIrS]8 •• 10 •••••• .ID 39 0' •••••••••••••••••••• •• CCII 11110 •• .11 *. * •. * • .* . ••·•••···.. ·.····C ............. • • CIIICI CCII BUI COUlt • • :.......... 1: ······01···..•.··•. i ·.................. • CLUB aDDRBSS • • FIELD POR • • IIEIT CCII' • tlstelt .* •• :Q~.. : i DII ••• •• . ''' ••• 1. •••• . PIOGCICI I • •••• 05 •••••••••• *. • • •• filS • llDlCAtl • •• Bltl COUIT •••••••••• K. 1'IOGI.I CHICI • •• 1110 •• • 11 CSII • . *.•..** ••••••••••••••••••• • 10 ..... ... i ·QH • i ·................ ····El········· • • PETCH SSBOCITa • • ••·•••••• ··.····111 ................ i • IITUBII • oJJ· CHBCll • Charts 247' $$BOCRTZ - Channel Program Analyzer (Part 5 of 6) (Refer to Chart 16) Chart QL. • • • ····.2···...··. ............... CHICK CCII OPIIATIOI COPB .......... ·..... ............... ) • • • • TBST POB !IC • • • 0 ······82···.······. ······B)··········. ·.................. .·................ ... ... .... .0.. .. .. i TISSTCIIP i TICSUP • 110'1 • .O.ERlTIOI CODI • • TO 11011 PIBLP • • JlO'B • • Ot'BlATIOI CODI • • TO 11011 FIBLD • i .* e2 i •• C) e. •• ILL LOll •• liS •• OIDEI 81TS •••••••• •• ZBIO •• •• *•• * !IS.. o ••••• D2 .•.i •• •. an .* *•. * B2 110 .•.i •• i ·····D"··········• ····D)·········•• ............... • •• .* • • • ••••••••••••••••• i •• 81GB OIDBI •• •• 8ITS OIB •• *. ** . ••.** *. • BBTU.. *. * •• * • . .* 000.. *. P2 .•.i .* .* 110 i ..... . *. *.. * • •• G:. ·QR • GIT IDDIISS • .0IlTID TO • • • OPCCII • · . ·.................. ... It..... ..... ... ··.····G,,········· ..•........•.... i • •••• 111 •••••••••• • 11091 • .OPIIUIOII COOl • • 'fO 1I0llFIELD • i •• e. o. .* IISS •• OP CODI •• X 1I0T PBPIIEO o •• • • .....•........... • •• OP •• IES X •• CODI • X'OO' .* .••..•.•.........•.•.•.•••...... *. •••••••• liS :!!~~!!._._._a~: •••••••••• 1. .IOTECTIOI • •• • CHICI • • •0 • 110 .* •• • • • • •c:".~ •• OTIC .* . .rBS .* •• *. i ItO ·QI • P" •• :rIC *. -. •• .* .* •• * •. * • 10 • P!j· CIIDBBJCT ······G2········· .................. i • 248 BITUBII • PIOGCRCK DOS/iSE Logical Transients i • III:TOali • Chart QM. SSBOCRTZ - Channel Program Analyzer (Part 6 of 6) (Refer to Chart 16) ····11·.······· ·............... . • • PIIOTECTIOII CHECK • • · . PROTCRK i ••• ··B1 •••••••••• · . ................. • GET VIRTUAL • DATI ADDRESS • OP CCII C1 .!. .* •• • • • ..... ··.... . • C2 • PROTCItCK i • •••• C2 •••••••••• *. • • •• •• liS • IIDICI'lI rHAT • •• PROCEDURI II •••••••••• '.CCII CHlIl /lUST. •• IRROR •• • BE IIROKII opp • **. . ** •• • ••••••••••••••••••• NO ······01••••••••••. ·.................. .··02·······. ........... .. : .... .. i i • IIOYI • .OPEIATIOII CODE • • TO 1I0RK PIIILD • • IIIDICUE "'RorECTto. • CRECK • 11 .•... i .* •• •• •• rIC • • ··.··· •.·* • ............... • * • IIlITU1111 • Charts 249 $$BOCRTl - Message Redisplay Part 1 (Part 1 of 2) (Reier to Chart 2~) Chart (U,. ·..... : ..... ····11.••••.... IIBOCITl :.... S~II1'l .* .. 1.:·•• ··...... i IItll ·.................. • DUIltS CCII i Bl ••• •• :=agf~! *. •••• PLaG *. . * • -. .* • All • •••• .. . .·····1)··········. .. .. ...1: :R~l: ·................ ·•.....·.1.. • ··.......... AJ : : . · .:.~~~ ... • • RB • ISSOB RBiD IIODIPIBD • • ••• SIT 01 • • BRROB BEIOU • • PLIG • ...........• •• i .IOBour i i .·B3······· • ·····14 •••·••·••• •-e-.-*-e-.-e-._* ·.................. * BEQU .84* .••. .:.*. ~U~~~D ·:.~? **.. . . .* .• • 115 10 Cl .!. : *-e-.-.-*-.-e-*-. ······C)·········· . i II BlTlO •• .* *. •• •• SICOID . I • •••• C2•••••••••• * • US BITRI II •••••••••• X. •• CHINIIL •• • ··a?E?!.. •• PRO VIOl CHINNEL l'ROGBAII • IOROUT .!lRITI 1'0 SCBBU. • 10 • 01 •• 1. •••• 1 10lBITI ••• 01 •• *. IRIOI B&1'UBI *. * .. * ···D3·······. ....·............ ·..... i *. .* *..* .•.. US .• • • SIT 01 ALAI!! PLIG • • • • • i i i ·.···11 •••••••••• • CLIIR IITRI • :Roo~fn n~IIR': *lOBOUT BB. • MUTE 1'0 SCRIU. :101' DOCUUITED): • SB1' OFP ADDIBL!!! iLlBI! • • • • ···E3·······. ·.•...·............ • • .1.. SIT OFF P~=TC~~IG ·..... ... ···F2·······. • •• . . ............. ........... .... ·· .. .. . ·····Gl·········· ·· .. ······G2·········· .. . ................. ................. ................. ··.... ...... ..·•-*-.-.-.-*-*-.-. ...·H2·········· ···.·8)··..··.··· ··................. .. ................. ··.... ·*..)3······· ...... · . :1 .......... : .... ·· .. •• 1'1· •• • ••• SIT OFF • AUDULI • ILIBII • • •• SET opr AUDIBLI ALIBI! i .* • ... • II •• *. •• A'fTBNTIOI •• us •• XBTElIBUl't •••••• *. *. .* .* * .. * • 10 • Gl •• 1. II~E •••• i ·····Gl •••••••••• PBOVIDI CCII COUIT • • i i • • .. PBOVIDB IIIBIIIIG IIESSIGB • • • • IJDICITE TRA1' • • SSBOCBrl GUS. • CO.TBOL U'TBB • • ITURTIOII • • INTElIRUl'T • i • i IJ • .10BOUT i liS • • WBITI! 1'0 SCIBB •• • • *• * • •• •• SYC 1 ~IIt * • • • • * ... ... i • Dl • i * SET OFf • • IIiDICATOR • .. fOR GETTING • .. CONTBOL • • * ••••••••• l • .250 ·IB • • Al· RBSI1' 11108 rUG • • .ITII BUOB 1 •••• .. CS·········· • PB&PIIB • IISTIUCTIOI • • i!1811~t • i ·.··.US·.······.· • : CLBAI &I1'IJ DOS/VSE Logical Transients A4 • • : 1=~3Tl~: ................D:. :.C~~U~blgl i i i • • .. ............... .... ·..... • • • Bl • • 11 • • •• *• :Ii~~~~ .:.~? . •*...• . • .* i • 115 ..... •.• .... . : ·..................: .... ·8B· • • Dl *.1. • Bl • • i * i • 10 • ••• i ···D2·······. ·............ ··.... . ..... .····B2·········· •-*_._._._*_._._e · ................. .................. .* . ··C4 ••••••• lB. ·.................. • • : ••••••••••••••• : ··...... .. •• •• ..... I.:·•• 8~ ·BB. • : i l • •• 1. • Bl • •• .• . . ............. ··.......... i: ··BS·.····· • • • SIT ILIBI! PLIG i • Gl • • • • $$BOCRT1 - Message Redisplay Part 1 (Part 2 of (Refer to Chart 21) Chart RB.. ~ ****. *RA * * B!)* *** BITER •* .* *. A1 .*.i *. *. EIITER •• ItEI PRESSED • *. *. * ••• * .* .* .....* US •*. * *. *. ENTER ONLY *. C!)* ** * :x ...•....... ·······83·····..··... ERBOR •• *. •• YES .* ••.••.......... .* ·.................. • PROVIDE lIP • • TO SOPERVISOR ... (01 • • .* • 110 .* Cl ••• i IOHOUT ...... · i·...... : *•• * •• : *RA i .*. SC~~8'1~'0 : i • Bl ·................ ·*··A3···.· •• •• MO *.•.• • C~ * .x. OIiLYEIiT X • •••• C2 ••• *. •• OILY SIX •• •• CHARACTERS • •• IIIPUT •• **. . ** .. • I ES *•••••••• j(*• ······C)··········. i *•••••• • SlIT DEPAULr • • • • PAGIIIG PA8AlIl!l:rnS • • 8RANCH nto SUPERfISOR • : (S101 : • ..•••••••••••••••••• ................. ····02·········. ·............... . ... ··................. • 110 01 .•.i .* •• 1I0lE •• *. * .. * .. . .. ·····D)·········· i i *. THAll •• IllS •• SIX CHARS •••••• •• IIiPUT •• .* • • i *••• * • 110 ... nTCR UBOCRTb SVC 7 WAIT •• •• • • •• •• ... *RA • • £1· ·..···El··········. i .* •• ·.................. • GET lMPIIT • • • LEIIGTH •• .*····r1..i ·····.··*• • • SltIP COIITROL CHARACTERS * * * *. INVCOII * .......• ·.................. *. .• x* .* • * .. " • YES ····PII••·•••.•. BETURN • •••••••••••••• • • • • SET ON •• ALARI! FLAG • i i: .··J2······· . i : ••• *J 1••••••••• : '* : •• FAILURt: III naOCR'1:! ... •• • Jl. INSTRUCTION • LINt: CONTEN1'S • • YES GET NEXT CHARACTER .•.i .··H3··.····. ............. ••: ·..................*..................... • : .• • •. * • NO ~1I0CI!SS • • • : •••• H 1••••••••• : : •• ;;8i~~:.~~: • *110. COUNT AliI: 'U' *. i ................. • ns.. .* ······G3··········. ·................. CONVERt PIRST • CHABlCTUS TO • UPPER CASE : i *. .••. i : •• •• DIS1ST&1I •• H O . •• FLAG IN CCII •••••••••• : •••• G1 ••••••••• : * .•.i UNIT •• EXCEPTIO! •••••• 11 • ................. • • *. £3 BESEr INDICATOR • •• ·................ i • ••• J 3 ••••••••• • •••••• .............. ..!.. : RETURN : ... ·RA • • A3· i: II. 1 ••• •• *. •• .• liND NO • •• OF INl'UT •••••••••• X. *. *. *. * .• * • ... \I'rEl CH~CK .* ····K2······.** n!'rCH :UBOCRT2 • • • • ••••••••••• **. • YES i .... ..... . : C:.! : Charts 251 Chart RC .. $$BOCRT2 - Message Redisplay (Refer to Chart 21) Par~ 2 (Part 1 of 2) ·..... .* •• A~ : : PUll ···. ·'2········.'" . ................. '" •• 80CRT2 .* .* *. .. AS '". 8LAIIK *. .•.i •• *. ~IISTS *. . * .* *. .* 10 •••••• ··•.... . '1·. .... i '" IllS i ·····1:12.········. .. .. .. : INlTIALIZIl PHASE i • •• 115......... ·........... .* ... • : • '" . ................. C2 ...i * *. *. • i ... *. . * • *REDISPLA Y *. 1£5 "ODE ...... . •• R£SIIT IILAIIK • I.DICATOR .. .* .* .* *. . .. *. * •.• .. NO *• cs * . •. IL' *. . .. .* IES •••••• .....i • .• * .. 110 . *BD • .. 11· . i : •••• D2 ••••••••• : ·.................. .. SKIP CONTROL CHAliICTRRS • • ..* •• .. *. .* *. *. *. . * * i ·····£2·········. * RE'EBEIICl!S TO RC'l: RD83. RDK1 RDG4 TRAIISLATE IIiPUT INTO UPPER CASE CHARACTIIRS ERll .. • • * * . • .* *• • * Rl!'IIBI!NCHS.. .•. .* f'2 •• ERI *. .. * . ' D· .. .. • ••••••••••••••••• ...... •••• * • r1 •* • • · * . . .. • .• * • n:s .* .* *: ADJUST CURSOR • ADDRESS • . i ............... 0 • DO •••• .* ........ • •••••••••••• *.* • * •• * . NO i END : •••• H2* •••••••• : * GET NEXT CHARACTER · .• . * ... *. •. ...i . •• .* .* .* 110 i • (;I!T NEXT CHlBACTIIR • BLANK .* .• • NO * •••• ...... i : •••• K2* ••••••• .... AS : *: •••••••••• * ••• * •• Transients * : .•................* . .1 •• ••• , ••••• • i ····Hl···.····· * ............... '~TCH SSBOCRT6 i I:t~ ••••• • YES •• .X •••••••••• " •• •••• • ••• •• •••• • • • • •••• .. .. .... .. *. 8LAIIK * • • INDICATE THAT. ••••• IILAIII\ IS • : PRESIIN'r : Logic~l * .... -. * • • •• 1. . . . : DOS/VSE *. *. •• .* .* 110 ··.......... • *. *. '" YES 252 *• i * •. * i .... • : * •••••••• *** ••••• J2 . : ..... Gs ••••••••• : * INDICATE THAT X. 110 PAR&IIETEB • : IS SPEClFIl!D : • •• ... • : 1'5 * :.*•• Gl**i •• * •••• : XES RE1'ERF.NC£S" TO RCR J:. RDC.i. RDES. •••• H 1••••• *.*. • FETCH • : U80CRTV : .... *. ONI.IV •• ONL! •••• *••• •* *. *.x. •••• i .. •• G2· • *. *. •• i * •• •••• * •••••••••• * ••* ·. ....,1.. * ··~S··*···* SliT KILT • IHDICATOR • • .. * . ·BD • • Cl* ! : DEeR .. 10 •••••• 1£5 YES.. IIID •••••••••••••••••••••••••••••••••• 01' IIl!'UT ..**. ........... x: i :****G 1••••• * •• .- i .* • UDICAT~. NO.. COIIIIAIID •• . . X.ERROR - BETORII .. X •••••••••• IIEGINS WITH .. .* ~gH2. R~~~~: ic nRORCAS i : •••• P1 ••••••••• : * . •• . ........... ....* . ·.................. ....... • LOG 'E' :X •••••••••• : '01.0 •* .*.i * . DS PI • $$BOCRT2 - Message Redisplay Part 2 (Part 2 of 2) (Ref~r to Chart 21) Chart RD ... ..... .•. • i LOG A1 •• •* ••• *. *. .-. .~ A.J • ······A. ·••••··•••.. .. ·................... ·.................... ·...... .... · ... ·.._................ .. .. ..... ·.................. .... ······c,S········.·. . ·.................. .·............... .... . · .. ...... · .. ... .. .*. .. i • • .. .. • 10 ClfllCl 1'011 A ULJ.ll IhllSlllIII i A....l'1 : ••••• 3*•••••••• : •• *.•• u.s llfllr •••••• .* .* •• JUlID OF .:.....: ··..... ...... • ~c • cs. • • • • GI$T IIl1.l1: CIiAllolC1'l$it • • • .,4 ••.i:. i ·· .. ................. i IIJ •• • •• B1*·· . . . . . . • • • G:t;1: l£lX CIlAiu.Ct'a C1 .•.i ··.... ...... • • • .• " .. •••••• D1 .•.i •* ... ..... ... 110 • ·BC· .. *. *••• .* .* ... O~ I~S •• .-.i •• 110 *.•• ro:s.. •* I •• ••• EII" f:I UIl'Ut' •• •• •• ••• I!;.! liO .-.i •• .liEU: *•. * .* ·Ie • • .* i 110 *. *. *•• * • ·BC· BIROIiCAS • • i PflUYIO~ .til" CIJ.OITIOIIS • • • :* ...C4i. .i . . . . . . .: • : 1>11% IIBI1: • POSIT1VI! : . • Dil •• ol • •••• ,,'-=0\18 I 04 .* •• ..lfll •• *. *. .* * •• * •• .* !Iv .t:4 • • • • • £j. . . . . . . . . . . • 1.tS ..l>IID 01' ll1t'U'l •••••••• .:.... ·.................. :6~l! •• i GEt' 1IX11: CIlAIIACT~ .•.i G1 • • • • • • lNOICA1'E TIlIl' • 110 f'lhST • PARAIIl>Xtli t"IS1'S IfllllCATE ::~s:~r .* • •• •• •• .* 110 .t *. •• .... :uo•.......t..!» . . . . . . . . . . •• • ... IllS *. .• • ..... ··.... . i • • .. • • • •••• X: l'DJ.CA.Tt f'OIlII Alill HEIlISHU .·.................. IIU .•.i •• *. *. ~lHU!6 * •• • i • • : G.£'J.' 1£4T CIIARAC'Ir.;Ct • .. •*li.... •• -. : .. .i .•.* 1J1 i •• I'AhAl\lST.t.Il •• Ito •• 810, i'll, OR A8 •••••• *. •• ··.... ...... .* .* *•• * • 1~;S • i :* •••Jl. . . . . . . . .: ·.................. ··.........• : INlilCA'U: • dG, i'll, Oh A!t : ~:t: • • J.IOICA·rB· • • • : 01111$C1'.l.01I i'A IIA II Elr;J; .. • : .................. .. i . ·····d". •···•··· . •• Pl!£SIIII~ lIiI • . • • .II ·Ill.: • ••a~• ":lIIO lLS * ••. "" • • • r':l>. .i'Olll"U.... • ••• .i. •• 1110'07 •• *. ..... ... -..- .* i • lIIu • ..1,; • • !fl· ·.·...ri,,·.········. BliilOai;AS i r • .;.. 't wlI .... : ";dAllACthA • ·..............•... : .... .... .... ...........................................,*. '-,. . i • : • 0'" : SL&.:~'A J ... -. · *& ••• .* .. .... .. •. *.iI10 •••• *. * ••• .• - i 1.::; : i • A ... .L.::..·,S •••••• • •• 8t:lT r.<AAti'j,"",lt ..... . 1<0 *. 1'iI *. :" .......... : ··••..GJ··········. ................. •* *. *. 'ALL' .* *. *•• * .* • • • : . •................ .... .-. ....." l'WP • • • • • , j• • • • • • • • • ,. .. 1IiDIO,;A1'.. 'rdA:!: .. .. 'u l>l>";\UI.. .. .* .*••...•.• 1.... isL ... " i • f'o'l'l •• fl;!).. IIl:;ll •• •• ••• l'AhAIlB1'l:iIl •• Ail t;dO.CAS • • .i'~. • P1· • • • • · ...,:· : *. •• .* • • • i • PAliAII£X~1l I.E' 111l1CA·'J< I?UTITlua; PAI!AllB1'lIli. ·lIe • • IU· ..... ..... ... . ·······'1····....··.. ·..··.i'l·····..··· .................. ·................... *. *. i •••••• -BC • • I • • • •• i .* lfEI't *. •• fES • •• •• *. PAIiAIU,:Xl!1\ .,. .* • • • • • • • *. .• *•• * i 1:01 .* •• DJ:Gl:tS (0 ••• 9) i OIiLID *. WIIlU *. 110 ·1'1· • Gl· •• •• .* II,U." *. •• * ••• • fA!) C2 • •*C:J81:;11' - • •• •• II:;S •• •• Pl ItA II I:OTl<1; •••••••• *. 'B' .* *. * •• *.* ·rES .. • •• .•.i •• •* *.•• IBS... •• •• &.AIII •••• 1. *. *. .* i *.• * .* • •• bliPl ·•··. ·"'4·········.. .................... .l • • : 11l1)1CAr.: "~rua" paIlAd!i:'!'l-.1J .... • .:1 : • • : ..... :::r • : ............... Chart RM. $$BOCRT6 - Message Redisplay Part 6 (Part 2 of 2j (Refer to Chart 21) ..· • RL • • •• *. · *. *. REDISPLI I IIODE • * .. * • .* * .* NO •••••• *. i: . ••• UU2 •• •* •• IIODE *..* * •. * • • * i : • • • • &4 • • • • • • • • • : ·.................. i ..... * ... IES • RESE'r IlYP1SS FLAG • • • ·Rt • • R.I· ... *. i ERROR .* 112 ERROR *. •• COUIIT •• IES •• SPECIFIED • *. *. .* .* • * .* C2 .L ... H3· i ERROR •• • •••• C.I •••••••••• *. • •• •• IES • •• REDISPLAy •••••••••• X. •• IIODE •• • *..* .. • REDEr ll1E RIDISPLAI INDICATORS • • • • ••••••••••••••••••. *. . * i ................. i .*IIL.... • • ..·..... ·.. ··.··.84 . .. • RILOCATE • : CCW'S lIID CCIl : * •••• * .. * .. NO i * •••• · A.I .* * . *. NO *.•••••••••• IES •• X.. RBDISPLA f .* .... *•• * *NO ·RL • • 1'~* CASE4l *. •• H!. ................... : RET2 •• *..* ·RL • : •••• 81 ••••••••• : TRANSFER LIIE COUNT A2 ••• •• RETURN •• SPECIFIED ..... IES i • i: PARPA AI·. *. •••• * • * i: .* .* .... . ·BL • • 03· 04· ... COl REFERENCBS TO RIIA4: RLB3. RLJ5 ..... * •••• NO ······C4.•·.....·.. i ·................... • : i : •••• 02 ••••••••• : .. • : REDEFINE REDISPLA I INDICATORS • • : ................. • : CLE1R IIESSiG!": • AREA 80F1'n : •· •• 04.··i ••..• · FETCH UDOCRT] ............... • : : x•••••••••••••••••••••••• : SAVIll i : •••• £2 ••••••••• : ·.................. ..... .. · .SAfE PARTITIOII • • PIBAIIETERS • i ·RL • • HS· LINECOO Charts 261' $$BCHKPT - Test Checkpoint Conditions (Refer to Chart 23) Chart SA. ··.......... .... ·..... •• 12 •• ··................. $$BCHKPT · •• •••12·········· • • IllTR1C'1': • • • .GET DEVI:CI • • .TIPE or CHiIIiEL. • .OUIUI EITIY. • . • .* •• . . ·.................. i .* •• B2 .•.i •• *. *. *. * ..• * ••• .* •. *. .·.··C••••••·•••• 01 .•.i • • • • • *. . ... i • •• •• lTT1CHED TO •••• 1. ·.1I1IIT1SK •• *.. * • Glt IIUII8EI or • : SI:~!:lk~::· : .LUBS. &10 IICL • ·.................. .. ... .. • 12 • •* *. . •• SUBT1SI[S •• us. *. ·····D".········· ·•.........• .* • lIS 11 .* i CHKPT090 i ·····E2·········· • SIT CIKPT-IO • • U CHKPT • • HElDER • • RECOID • E" *. i rl ••• •• lilY •• TI1CKS •• HILD *. * ..• .* •• i ·····P2·····.···· • • BllTIlCT: • • • GET tEIIPOI1Rl • • 800llDl8IES 01' • • CHIIP'1' P1ITITIOIi. . • C1LCULlTE 110. • • OP BltTEI'f • .RECORDS IIEEDED • • liD STOBB TO .• • HElDER IICOID • ·................. . .. IES. •••• 1. .................. • 10 :x .......... : .•. i CHKPTOIIO i •••• ·Gl·········· • • EI'1'11CT: • • • .GET DEVI:CE • • • TYPI or CHltPT • • • DEVICB •• G2 •• •••• • •••• G3 •••••••••• • SEt CHKPT • •• •• IES • IUD lDDIESS • •• GITVIS DO liB ••••••••• • 1. TO P1RTITIOI • •• •• • PHISIC1L EID • ·................. . .. HI .* •• .•.i •• **. .** •. • * •. - ••••••••••••••••••• i .... .* * •. * . . ••••••••••••••••• • YBS • 10 .-. i i .-. Jl •• J2 •• •••• •• USB I •• •• CHKPT •• 10. NO •• SPECIFIED *. •• DEYICK A •••• 1. X •••• *. lDDRESS •• *. T1PI •* *. V1LID •• •.•. .•.• ..... · • • tiS •• ... • Itl •• 1. •••• CHltPT060 X •.•..•.• •••• • 8!) • IES • •• ;g3EgfI:~nl·: .~?. *. .* *. .* i .. .. K2 ••• *. .• • tES i • A2 • • B2 • i • A" • *II! •• 262 * •• * IBS ..···8...i ·...·.•· .C1LCUL1TE )800 • .PRII'1'ER RECOIDS. • lEEDED lID • .STOIE TO HE1DES. • BlCOID • ................. :x .......... : CHKPTJ60 i • •••• JIi •••••••••• .STOII PllTITIOIi. • UPOIIII11'I011 • • II1CESS1RY POB • *REST. TO CHKPT • • HB1DER RECORD • ................. i •• •• CALCULA'l'E •• •• 110. OP 16K .DUIIP BBCORDS. ..... ..... · ··.....- ·..... ··.......... *..• .. .. iX .................................... : CHIIPT1!>0 ••• Kl •• • ·CH1IIIIL·. •: i .. .... i ••• Gil •• •• 3800- •• •• PUITER •• 110 •• urORlllTIOIi •••••• •• TO SAVI •• • H2 •• • •••• H) •••••••••• .* USBR •• • SBT CHKPT • •• CHKP'1' BHD- •• 110 • ERD lDDRESS • •• lDDRESS •••••••••• X. TO P1RTITIOI * •••• •• GIVEI •• • LOGICAL EID * . CBltPT320 NO .t *. CHKPT •• lES. •• DEVICE ••• • 1. ·.ASSIGIIED •• *. .* US ·····r"·········· i *. •• * •• * • : ........... 1: .* •• •• •• BI7:IIIT •• 10 •• IlrOBlllTIOII •••••• •• TO SlVI •• ·.................. • 10 CHKPT020 •• •• •.• •• • • i •• *. . * • UrllC7:: • PERllllllT ·BOU_DlRIIS • or CBKPT • PII7:ItIOI ................. CHltPT •• 10 • •• ISSUID rROII ••• • 1. ·.1I1IIT1SK •• *. i CHKH180 • YES .* •• • DOS/VSE Logical Transients CHKPTBRO i ·····BS···•••••• • • SET UP • • urOllllTIOI • • IEIDED rOI • • IIBSS1GE • :It ••.••.•... : .* *.. * • B!> • ................. .·................ .* J!l • Kl • C1··· •• .* 10 •• lStICHR. •• ••• ••• PIOCESSIIG •• ·SUPERVISOI.· ··.......... .* i i i *. • ••• ·B ••• • •••• • •• • C&LCUL11'E • .IUII8E8 or prIX • • BlCOIDS 110 • .S7:011 TO HElDER. • IECORD • -. ··.......... • •• • IES liS •• •••••••• T/P-DIVICE •• • SAn: POI.Tn • • TO CHKPT • • PA.""ETII LIST • III prIX •• 10 • •• !I~gRnnO~ ••••••• .. .. ................. ·.·.·B1· •• • ••• • •• ... i i •.••• 1··•.•.••• • • III • ····K"••••••••• ·................ "' • fETCH UBCHKP2 • • ..··cs··....... ·................ i • • rl7:CB UBIIISGl • • Chart SB. .. $$BCHKP2 - Build and Write Checkpoint Records (Refer to Chart 23) .. ·................. ····Al ............. .. • UBCHKP2 ........ .. ...... • i .* Bl .... ... .... ClllIPlOJO ·..... • B2 .. • i B2 .Oo. .IOBT *..* *..* : .•....... .• x:x i •• .. Cl·· ..... ••••• .. .. • COIIPLI!TE • .. CHKPT • • HBIDBR • : RECORD : .* C2 .•. •• ................. . .... . .! .. *.. * .. YES * •• * .. NO ................. *. i ·····C4..•..•.... • IOBT ·····Dl·········· *-*-*-*-*-*-*-*-* ................. • rORT • : .····D2·········· SII. • OB'rAIN EITEN'!' .. IIII'. 1''1011 .. JIBTABLE • AHEA AND 1I0V E • TO EXT. RECORD WRITE HEADBR • RECOIlD PART 1 : El ....i ·····D1··········* • • • • • E2 .* . . ··C5············ I ElCP WRIT!! TUILEB • LlBP.L : • OBTAIN EITENT • tNI'. PROII • SYSTBII ElCTEIiT * AREA AND "OYE .TO EXT. IU!COBD D4 CHKPERI • • • • : • • .. .................. ".X. . X SET UP IIPOBIIATION NEEDED POR IIESSAGE • • .. : ................. .•.x *. . * EXTENT *. •• NO.. • •••••• I * .•. *YES • : RECORD •• •• COIIPLETE • * *. .* * •. * * YES ·······D5·········· ... .. . . .. .. i •• IIAIt i ·····P2····.·.··· .-*-*-*-*-*-*-*-* "IORT • • GETYCE .. .. • .GET 'OLSER .. .. • • 01' SYSCAT .. . ................... . .. .. SB. • lIRITE l!ITEIT .. IIIP0811ATI0N • RECORD • • • ................. i OBTAIN AIID SET TAPE DENSITY · .* 62 ••• •• CHKP:.!160 *. *..* * .•. * .* .... i GJ .*. *. • IORT SB. .... · .... ........... x: ··.···83·········· . .. . .................. . .. ~ i ................. •• * . Oo. BACKSPACB *. * •• * .* . . YES • - •••• NO 'S... .. · .... i .. •.. * i ·...... ..... • C5 • • : 110 i *···Gs········· BETURI TO CU.LEB • : ............... B4 : • • PPIICHPT: • • "Oo BUILD ... • .PI'IX-HECORD· .. WRITE HEADBR .. RECORD PART 2 : .. ....i /lODIPY· .Oo •• CHIRNEL. YES •• •• PIIOGBA~ TO .1 •••••••••• EIID OF BEEL •• BACKSPACE" ... •• • *. *..* * .• . *YES :CRKP:.!16S ···**81·········· *-*-*-*-*-*-*-*-* •• ••••••••••••••••• : i ............... .. : tl~ GJ : • YES ... 1I0RE •• NO •• PI' IX ". NO •••••• EXTENTS •••••••••• ll •• INPORIIATIOIl •••••• •• TO SAVE •• •• TO SIVE •• • • .. PETCH SSBBIISGI .* •• .....P............ • .. • • .. * ••• .. : :X •••••...•• : i ··. ······Gl........ ·.................. ····E4·.·i ...... •• ................. • :CHKP21~0 i :.: •• r1 ••••••• :.: • : I08Tl : X •••••••••••••••••••••••• : ... 110 ... POR SYSCAT ...... . •• TO SAYE ... • .. • . SB. ······D4··· ...... ....... i CIII\P2110 ................. .* *. •• EXT EilTS ... *. i ·................. .... ·-....-.... ................. ·....... * .... *YES :CHK1'2040 . i ·····IIS·· .. ••••••• .SKt UP CCB liD .. • IJPDATI! IU!COBD • • COOIlTKIl • *-*-*-*-*-*-*-*-* • : . .. • i : · • CS •• 1 • *. .* DUIIP BECORDS G3 : ... EXTBIITS •• 110 • PROII JIB-TABLE •••••••••••••••••••• *. SB. • -*-*-*-*-*-*-*-* .WHITB PARTITIO/l. : roar : ** ••••••••••••• * i ·····84 .•........ •• CALLBD •• YES NO ... rROII SSBCHKP3 •••••••••• X... rlrORIIATION ...... . ... •• "TO BE SAVBD. 15 •••••••••• BII • CIIKP2170 ... .* EXTENT *. •• •• *. ..*.. : ... .. i···· ....... . .. 8S •• •• BICKSi'ACE •• 110 •• DONE •••••• ... *. .... .......i . .....i . ...... .... .• • .* ~tlS • .... i i *-*-*-*-*-*-*-*-* • .. • IiRITE 1'1'11 INP088ATIOII RECORD D4 : • • • ................. ....... ;;: ":.' .. : : • •• ··J3 •••••••••• .IORT SB. J 1 ... ... 3800 •• •• PRINTER •• 110 •• IIPORIIITION •••••• •• TO SAY E •• csOo B2 : ... i i • : ···*Kl········· PETCH UBCHKP3 ••••• ** •••••••• • : . .* Kl *. *. • YB:; •• IIORB *. 110 • ...... PI'IX RECORDS •••••• •• TO WRI'fE ... *. * .• - •.• .!.* ··.... .• 84 .. Charts 263 - Build and Write 3800 .Checkpoint Records (Refer to Chart 23) ~$BCHKP3 Chart'SC ... •••••••• ·•.····111· ...............• ·................ •••• A 1••••••••• • SSBCHKPJ • • ·····B. ••··•••··• • SB'I UP • .CHIUBL PBOGBAII. • • 110 OPDITB • RBCOBO IIUIIBIR • .................... . . ................. • • CII •• X• ······C1··········. ·.................. i IOR'l1 • LOCUI LOGICAL • BlCP i i ·····01 .......... . : : Ri~lnn : : • 3800 PRINTER • • • .I ...ORIIITIOIi • • ·................. . .. •• •• •• •• IRROR *..* •• • •••• 82•••••••••• *. • • •• YBS • S/!! UP POR • •••••••••• X.BACKSPICB CHKP!. •• • RICOROS • • •••••••••••••••••• *.. * • 10 .-.-.-.-.-.-.-.-. i i ·····P1 •••••••••• • IORT SC. ·····r2···.· ••••• • IORT2 SC. ................. ·.................. • IIIIITI 3800- • • paIIITIR npOR- • • RATIO I BBCOIiO • ... . .* •• •• •. ..... i "'1ca .- ····a1 ••••••••• SIBC alP 2 BECOROS • IOR'I2 • •• · . ·................. • • • SI'I UP IIBSSAGB I1PORIlITIOII • • ····H2.········ PUCI! • ISSIIISG1 • *. Ell .-.i •• •• *. •• BICIKSPICI *..* * •• * • 10 .....r)...........X.......... rl J. .. • • • i •• •••••••••••••••• • 264 • ·................ • CHKPJBR1 i • •••• G2·········· • IBS.. 1I0RI •• ••• ••• LOBS TO •• •• PROCBSS •• *. *-.-.-$-.-*-*-.-* • BACIKSPACB • ·····B3··•.•••••. IIAIT .* •• •••••••••••••••• • DOS/lS! Logical Transients .* IBS •••••••••• .* X.. *. as .-. •• • rls •• • ••••••••••••••••••• ··.......... • • •• *..* *.. * • IllS •• liD or RBIL •• *. .* *..* .• * • 10 :x .......•.......•.......• : • CII • i alTon '10 ·................ • • ····GII ••••••••• CALLRII *. •• II&CKSPICI •• 10 DOli •••••• i • 1I00Ir! CCIIS • • rOR BICkSPICI • • CHIt"T B8COBOS i i G1 I ···CII·.···....... . ................. ······011·········. .• .• .• •. ·............... . .. :TgNUoft~Un'~R: .•.i • ··......... •.•. .•••.•. x: 11 • i i ·····B1 •• • ••• •••• • INITIILIZB • • CHKPT RECORD • • INO IIOBKARBA • • POR )800 • • PlIIIITBB liP. • .* IOU' • • .* .... ·..... i •• CII·• $$BCHKPU - Test Checkpoint Conditions (Refer to Chart 23) Chart SD. ..... ··.... . • A2 • i ··................. ·····12·········· • GIT SPECIFIC • • IICOID LBIIG1'H • • or CHKP1' • • DE'ICB • ····A1 ••••••••• • SSSCHKPD · . .•............... ... S2 • • • • • • !IS .•. i i 01 •* •• *. *.• * .* 11 .•.i *. * •• * C811P0020 ................. .* • • ••••••••••••••••• ••••••••••••••••• • liS i i • • • • ····cS-·••••••• • • i • • PIITCII S$SIIISG1 i O. ••• .. •• JtlOO •• •• l'IIITII •• 10 •• I.rO.81%IO ••••••• •• 1'0 5111 •• *. ••. * .* • liS ·····B.·.··••···· i • caLCULUI • 3800 PII81'BI • U.08111TIOI • IBcoaos AID srOIB • • • • • • .......•......... :1 .......... : ••• • CHKPD200 ••• r1 •• r2 •• •• •• • •• USBR •• •• 111 •• IES. 110 •• SPlClrIIiD •• •• tlaCKS •••• 1.1.. •••• lDDRISS •• •• HBLD •• •• .aLIO •• • CHUD1II0 i ·................ • • *..* *•• * • liS • 10 CHlP0610 10 *•• * *..* *. . * i SST UP ISCSSSAI! U'Ol8ATIOI rOB IISS5AGB :1 .......... : • 10 :.....•.... 1: • • • • i .•.i •• SuStlSKS •• IES. ••. lTtaCHBD 1'0 •••• 1. ·.IIUI1'ASK •• ·................ C8IPDI10 10 •••••• • • GB'IICB: •• • .G&1' lOLSBI • • • • or srsCl1' • • E2 •• • •••• El •••••••••• •••• • SET CBKP1' • • •• USER •• 10 • liD 10DRESS • I •• CRIPT 110- •••••••••• 1. 1'0 Pll1'l1'lOIl ••••• •• aDDRBSS •• • LOGICaL liD • ·.GIVII.. • • . ···.·C.·········· ·.................. . ... l •••••••••••••••••••••••• : • *. .* * .• • *ns *. CHUD1110 i ·····Cl···.····.· • C1LCULl1'E 10. • • OP BLOCIS • .nIlDBD rOI DUIll>. • AID urOIB1TIOI • • BIICOIDS • **. ••.** .* •• •••••••••••••••••• • • • ••• CHIPD220 02 •• • •••• 03 •••••••••• •••• • SIT CHKP" EID • •• GBTVIS •• rES • aDDIBSS 1'0 • •• DOlI ••••••• ••• 1. PAI1'I1'.101 ••••• •• •• • PRUIcaL BID • • !IS i B. ••• •• •• '01 srSCAT •• SUBD •• CHI\l>D180 e. •• CRIPT •• 10 •• ISSUID .1011 •••••• ·.IIIIIT1SK •• • 85 • .* *. •• U1'BI1'S •• •• •• •• •• !IS .......•......... .* ··.......... S• • ·····85·········· .·...............•. (:HI(P06110 • •••• S3 •••••••••• CHIIPD110 i ·····C2·········· • GB1' IIUIISBR • or IICOIDS • • • PBI TUCK rOR • • DUIIP liD I1POR •• • RICOIDS • •• * •• * CHKPD120 •• **. .•. ** 10 •• . * lsrlCHI. -. •• •••••• PIOCISSIIG •• ·SUPIIIYISOR.· *. ••• •••• • • GE1'VCB: •• CHIIP1' •• 10 • •GEt' BLOCI•• DEVICE-PBl •••••••••• 1 . . SIll or •• •• • ·PB1-DB'ICB i C1 • i CBUD i ••···s1 •••••••••• • SUI 1'0111'11· • 1'0 CHKP1' • PlI1IIITII • LIST ··.......... ·................•. • ·.··rllrBTCH ••••• •• •• • S$BCBKPB • :1.................................... : C8nDOil0 i •••• ·G1 •••••••••• • • IItllCt: • • • • TBBPOI1B! • • • ·SOUIDlIlIS • • • • OP CHlPt • • • • palTITIOI • • • CHIPD290 i ·····G2·········· • CALCULatE • • 10BBIR or • • OU8P . .COlDS • • AID STOlE • • . 1'0 BEADER • ................. •................ · i i •• •••a1•••••••••• • 611' POUTII 1'0 • • CII&PT DT.PH • PI08 CRIPT • • • URlIltBl LIST. ·····H2·········· • GIT IICL rOll • • PAITITIOI 110 .• • POUTII 1'0 • .PIIOGI&IIIIII LUSS. ·...•.............. ·................. i cnPD060 ••• J1 •• •* •• J2 01'PP8 10 • •• OPII SIIGLI •••• 1. .110 OUTP01' •• *. * •. * *. .* • e. CHKP1' •• 10 • •• DIVICI-TIPI •••• 1. •• .aLID •• *. *.. * .* • liS i •* •• •• 10 •• l1rOl81TI01 •••••• •• 1'0 51'1 •• . • lIS C81[P0090 ••• 11 •• .. .i •* *. •• •• 111'811' *. •• CHUD.20 i ·····K2·········· .CALCULi1'1 111' • • • 1I.01IlltIOI.· • • .ICOID IUIISIR ••• X• • 110 STORE 1'0 • • H8&OII IICOID • ....• ................. •....• ·..... .... ·..... • • ·..... * •. * .* • rlls i i • • II!) • i • SII • • A2 • Charts 265 $$BCHKPE - Complete Test and Write Checkpoint Header (Refer to Chart 23) Chart SE .• ··.......... • 12 • ••• CBICPB]60 12 •• • •••• ,) •••••••••• • CHII.IL-·. • • • SH CUP'f-IO • • .\lOBUE IUU •• 10 •• '01 1111. • . . . . . . . . . X. II HIIDII • •• TISK •• • IICOIII) • ··................. • SlBCBItl'B • ** . . ** .• i 0' calUT CBlPIOOS .* •• i C1 ••• •• *. •• P'IlI: 10 •• 11'01111'1101 •••••• •• to SI'B •• *. .* * .• * • IBS .* •• C2 .. .i •• *. *. CHKPU80 .* ·...... · .... • • ·..... i *. . • 12 • I *. •••• • ••• ., * •. * i .* .* ··.··0'.··..··•.. ................. i i • •••• 0]· •••••••• • SIT UP CIOCHU.IL PROGBII liD • • • : • • • : ................. I/~Dg~~nn ::1 .••••••••. : i B3 ·····11 •••• • ••• •• • CILCULITI 10• • • 0' ~rBICItS 01 • • BLOCIS InDIO • • • '011 Dun • IECOIOS • G1 •• ••• spaCK • • • .* 1I0DIrl • PIOGKAII rOI IPS • • •* a1 • i .. • • i *. 83 •• 31100 ., •••• a" ••••••••• , . PBIITSI •• IBS • PitCH • *, I1'OIIlITIOI , . . . . . . . . . , . SS8CHltl'G • •• TO SIYI •• • • *. • • SElIt-ADDR. •• us •• 01 tOMIR ...... •• EIT.IT •• ·.tIIIIT.· *..* * ..• i ··.... ...... ••••••••••••••• • 10 • B:> • ·.....J1.····•.··•. ·.................. :CHKPI1"O i DOS/VSE Logical Transients i ··.·Jl·..··..·· CtlKPKSOO • .SIT SIBIl-IODR, • ..... TO LOVEI • • IUEII'f LIllI\' • 266 • ................. ·......... HII.DIR RBCORD , • 10 58. *-*-*.*-*.*-*.*-. I • illlTI CHItPf *1 . . . . . . . . . . . . . . . . . • * ., *..* • i .LIO ROUTIME : 12 : .•.i 10 ...... ·.··.G]······.··· 115 •• , ' , . 110 .* caUIIL CHKPI""O ·.UIILIBLI,· *..* *.• * .* i • •• .* BlOUGH *. •• *. *. • ........... 1:x • •• • : ·····P3·••••••••• ·....-............ • • • • • ................. .ca1Pl220 I/~pl~~nlB • • • liS i CaLCULi TE tOTIL SUCI IBIDBD rOI CHECIPOliT PILI PBOGIlIII liD *. •• •• RPS DIYICI *. 51'1' OP '81 CUIIBL i ,., ., .* ,. ................. .....',.......... • • • • • • • • 10 C81lpnOO ................. CRIPI080 ·.............•.. ····cs••••••••• 115 . . . . . . . . . . . . . . . , . . .. BS • • • • : ·................ • • • • • • .·................ * . •• •• 'BI PBV ICI . i 51'1' 01' .8CBSSIU II'O.IITIOI rOI IISSIG8 i C] .* •• IES ...... * •. * • 10 i •••••p1 •••••••••• • CILCULI'fB 110. • • or PPII-UrOI- • •• 1'1101 IBCOIDS • • liD S1'OBI 1'0 • • HUOEI IICOIID • .* • • • • ................. *. •• •• TIP DIVICI CHUBBI1 .STOIS PlIITI1'IO •• • UrOIlBl~rIO' • • IICISSI8! POI • .IS1'II1' I I CBItP1' • • HIIDIII IICOID • ................. : ·····B5······•••• i ···.·83·········· i • S!SUI • B!» • ·····B2.······ ••• • • IXTIlICt: • • • *GIl' DIYICE- • • • • TIPI '01 • • : ~au:niiiUBUf : .•....•.......... • ··.......... ••••••••••••••••••• • liS ·····B1 •••••••• •• • GET UD SI'E • • S!STEI lODE • : i CHI{P&2f10 ····11 ••••••••• 'ITCH SSBCIUIPl' • • 'lfCR SSBilIISG1 • • $$BCHKPF - Write Checkpoint Records (Refer to Chart 23) Chart SF .• ··.... ...... • C8KPP180 ··................. • ... *. i ··.... ...... • 'US •* • A) • *. . * • 10DBBSS ·····C]·········· *. i • • PPIXCHPT: • • • .BOILD PPIX • • • ·INPORIIA1'IOII • • • • RECORD •• ·................. . .. .* YES :CHKPP020 i ·····01·········· • OBTlIN EUINT • • IBPORIIA1'IOM • • raoll JIB 1'ABLI • • 1110 IIOV! TO • • BX1'IIT RBC. • ................. i ·····Ol···**····· *-*-*-*-*-*-.. -.-* i ·····D2·········· CHKPP090 • OBTlIN IXTEII1' • lilt'. FROII • SIS1'III Bl1'EMT • ARBA 1110 IIOVI .1'0 1I1'Ilit RIC. .1/0 ROUTINE • • • • • • • • .. .. •• •• IITBNT •• YBS •• RBCORO •••••• ·.COIIPLBTE •• *. * .. * .* • 110 F1 .•. •• * .• * • .* £) .. .i •• e. • YBS.. IIORE ". • ••••• PPIX RECORDS •• ..1'0 WBITE •• *. .* * .. • NO i ·····P)·········· .-lIr-*_*_*_*_._._* CHKPP220 -. IIORE •• •• •••• EITBIITS •• X •• 1'0 SAVE •• *. · :,.......... : i .• IBS.. .* • • " ................. ................. :1 ........................ : .•. S8. IIRUB PPIX IIiPOBIlUIOI RECORD .82 I 11 • . .......... 1: :C8KPP200 •• EXTBIITS •• 110 •• PROII JIB •••••••••••••••••••• •• 1'ABLE •• *. .* * ..• • JES ~g~TI'~ • i ••••••••••• X:x •• *. i *..• .* .•. •• ·:·····B3··········.: ·................. •• 110 •• IIFORIiATlOM •••••• •• 1'0 SlYE •• C1 ••• •• PPIX •• NO •• IMPORIIIUOIi •••••• •• 1'0 SAVE •• .* *. •• •• BlTEMT *. i II) .111 ····11 ••• •••••• UBCHKPt' • 81 &1 • .* .1/0 Boun .. B sa. .WRITE PlBTITIOIi. • OUIIP RECORDS • ·H2 • • ................. 110 :X •••••••••• : · . :CBKPP1QO i .····G1·········· • • : SET 1/0ROO1'INE 10DRESS • • : ................. :CHIIPP160 i .····H1·.········ .1/0 BOO1'IIIE SH. *-*-*-*-*-*-*-*-*• • IIRITB BITEII! • I.FORIIATION • RECORD .82 ................. . .* J1 .•.i •• • • ·····G)·········· ·.................. CHKPFlOO • • • • i SB! UP IIBCESSU'l INPORII&1'IOI FOR "ESSIG!! i ····u3········· • • • • ·................ • • PE1'CH SSBRIISG1 • • -. • YBS.. IIORB •• ••• ••• EITEIITS •• •• 1'0 SIVE •• *. * .. * • .* 110 .:.... . u: .... i Charts 267 $$BCHKPG - Write 3800 Printer Information Records (Refer t~ Chart 23) Chart SG. ····11···.·····.• ·•............... • SSBCHI[PG • i ·····Bl ••• •• ••• •• • 11 1'1'1 IL I&E • • IBCOID liD • • 1I0aK IIBI POI • • 3800 :1IPOII\&- • • '1'101 RBCOIDS • ................. ... ~ •...... x: i : CBUGO 30 ·····Cl·····••••• • LOCITB • LOGICIL 011'1' • ISSIGIIBD TO • 3800-1'111'1'11 • • • • ·.................. ·····Dl•.•••·.·•· i :CIUGOSO :• :3800 i~'n;H :: PUITER. • ·................. . .. • ·I1POIIll'fIOI· • ... i •• •• •* •• Bl •• .. .. BIIOI • •••• E2•••••••••• *. •• *..* •• • 10 ······Pl···.······ .: : i :CBUG060 ·.................. • SB'I' • I,gDtl~~ i ·····Gl.··.·.···· :!~.~~~I!:~._~~: • IIHIrE 3800- • • PIIITII IIFOI • • • IIECOIID .82 • ••• !I' ••••••••••••• .• IES.. .* ••• ••• Hl .•.i •• 1I0lE • •• • • ................. • IISIT •••••••••• ll. SEIK lDDRISS • I I D'I'PPH liS • • ·····1'2······.··· i • • • • SEt' 01' 'ECESSI8! IIPOIIlITIOI 1'01 IIISS&GI • • • • .·..•.....•........ 1:58111SGl .• ·•····G2········· ............. • . i PlrCH . • - . •• LUBS •• • TO PIIOCESS •• *. .* * .•. *10 i •.···Jl SSBCI••I·K•.PP··•.• CBUG080 ·................ • 268 PETCH • DOS/VSE Logicul Transients Chart SH. $$BCHKPG - 1/0 Subroutines for Writing Checkpoint Records on Disk (Refer to Chart 23) ····A ,........... ·....A2·········. ··............... . . ................. • 10 I!'II A • ···Sl••·•••••••·· ................. i EXCP • i ·................... • UPDATE .. SEEK ADDRESS .. WAIt •• •• UPDATE SEEK ADDRESS III • • • DTI!'PK AND .. • BLOCK ·IIUIIBER IN. ................. • LOCATE CCII • ·................ EXCP ·····.. ......D2·.········.... ... i :: RETURN TO CALLER • • WAIT :: ................. i •• ··£1 ••••• •••• • • • .. .. *• i ·····D1 •••.• ····• • • IN DTI!'PH i ··.C2······ ..···· i .. • • ······82··········. ..•···• ······C1·.· .. ·................. . .... '*• •.. IOCKD • : i ··..g2····.··.· ............... RETURN TO CALLER .. : Charts 269 Rout~ne $$BRMSG1 - Checkpoint Message (Refer to Chart 23) Chart SJ. ·· .. **** • AJ • * ••• i ••• 13 *. .* *. • • SUCCESsFUL •• IIsG1200 ··................. ····11 ••••••••• • BBIISGI •• • .... IIBSSAGE *. *. .* .* 110 •••••• • YES i ·····81· ........ . • SUE IIESSAG!! • RUIIDER AND • GE'l' ADDRBSS OF IIBSSAGE • • TEXT i ·····83*··.···· .. .UPDATB CHKPT-ID. • IN PARTITIOI • • COIIIIURICITIOIl • .REGIOII AIID IIOYB. • TO IIBSsAGB • • • • • • ................. ... ................. :x .......... : i .* Cl •• • •••• c2 •••••••••• * *. **.. ..•* • IISG1020 l!ICP: IIBlTE IIESSIGE ON SYSLOG *. 80 ................. i 01 ••• .* •• CUU •• .. ••••••••••••••.. .** •• TO RETRIEVE *. * .• * • .* i .... ... ..• •.. • ... .... ·····01.········· *. •• .* i ···C3·········*·· IIsG12_0 .. •• OTt' •• u:S • II0VE FILER""E • •• FILEIABE •••••••••• X. TO IIESS"GE ••••••••• x •• GIVE. •• ... TEXT. • ·................. . ... ... NO •••••• IES IIllr i E1 ·····El··· ••• • •• • • • EXTBICT: • • • • CUU Foa • • • • SPECIFIED • • • • LOGICAL • • •• UIHT •• •• ................. *. .•.i •• •• .* IIEsSAGE *. •• raOB .... ·.SSBCIIKlG •• •. US • * .•.....................•.....•..•.••........ .* • NO ·····P]·········· ISG10_0 i ·.·.·F1·········· • COllVER., • CUU liD • • • LOGICAL UBIT • • IRO IIOYB TO • • IIISSAGB • i • SEt CBKP'r .BErURII CODE 111 • RBGIsTER ZERO • OF PIRTITIOII • SUE ABBA ................. • • • • • ................. :x .......... : IISG1120 i G1 ••• i •• G)···.. .... *. •• .* *. •• •• BETual .. .. 10 CODE TO •••••••••••••••••••••••••••••••• •• COIVIRT •• • • YES .•.i • : . IM~~::~L .:.!~~ •• ERROR •• •••• * .• * • • •••• 112 •••••••••• .CONVEBT RETUBN. • : ••• ~ • • IIESSAGE • • • i FETCR SS8CIIK1G ••••••••••••••••• i • • ................. :x ....•............................... : .... ··...... • : AIID 10Vl TO IIISSAGE • : x • 13 • 270 DOS/VSE Logical Transients • •••••••••••••• * •.• • ·····a3········· ................ • • NO COR'BRT RETual COOl IISGU60 *... liS IIsG1280 ..... X:III~~gEhg~'fHD • PIIASE-ID TO .••··J1···.•.••·· IISGll_0 G,.. •••• *..* *. . * * •. * 111 •• •••• i ····Gs········· .... ..SUCCESSFUL 110 •• IIITBBIIlL •• NO • SIC 11 UTUU • •• IIESSAGE •••••••••• X•• CBIPr ERROB •••••••••• X. ro PIOBLIII • •• •• •• •• • PIOGIA! • • • IBS ·.····a"········· ............... i • • PITca S$80UIIP • • $$BCtlK3G - Checkpoint Erase-Gap Routine (Refer to Chart 23) Chart SK. ...... &1 •••••••••• : UBCHK3G .... ..... : .*****.*.*.*.*. : .*.i *. CHK JG 160 B1 ." TAPE *. • REPOSITIONING. NO "TABLE SPECIpIED ••••••• *. *. * .. * .* " B2 : i 112 • ". •• •• • . *. •• ANX CHK 3G 180 • •••• 83**.* •••••• SET UP * INpORII1TIOI • IIECBSS&RY " 1'OR IIESSiGE • * YES • ". ERRoa .* ••• ••••• 1* •• DETECTED ." • .* *..* * .• * " XES " i i CHK3GOQOC1···*. **··C2········· . •• .• lIlY DT1' *. ". 110 J[ • SVC 11 TO • ". SPECII'IED •••••••••• X" PROBLEII • •• •• "PROGR11I" *..* * .. * • IES • •••••••••••••••••.. NO ••••••••••••••• i ····Cl······ ..· ................. " * 1'IlTCR UBRIISG1 " • *.*. . •. 01 •• x. ······Dl·········· ..... ** . CHK 3G060 X • • EXTRACT: • .GET DEVICE . . . TYPE 01' • • SPBCII'IED DTp • • •• * • •• • " •• ••••••• ** •••••••• i CHK 3G080 ••• 81 .* •• •• *. *. T1PE DIlVICE *. *. .* *. NO ." •••• .* * . • ..*XES i CBlt3G100 .*. 1'1 •• •• DTp·. • •• TYPE VALID *. NO X ". OPEN AND ." •••• *. OUTPUT • * *. .... .* * XBS ···Gl •••i •••••••••. EICP PER1'OR!! BRASE GAP • ·······81· . ..·······.. . .. ................. i •• 1I1IT .. " :1 ..•..•.•.. : ... i J 1 •* .•• *. • " L1ST OTI' •• YES ". PROCESSED •••••• *. *. *. . * * .* NO ...." ** * ".... * i .* ...... i ••• * " " 82 • " 01 Charts 2711 ~ $$BRSTRT - Restore Problem Program (Part (Refer to Chart 23) of 2) ··.......... • ·.···A)·.·.······ i ··................. ····11.········ • SSBRsrar ·................ . .. • B3 •.. liD · .. i ... •I .* -. *. *. .* .* .* *. *. .. . .* NO.. •• * .. * • : ....••.•.• x: R5THT1,)O .* ••• .* .* •• •• i ·.................. .* YES :X •••••••••• : * ..• .* YES i ................. i .... •* ....•** * • ·*.*.. *!** * * C3 • * . .X ••••••••••••••••• • • RSfBTSbO •• *. .• i Gil ••• •• *. flPE *. YES REPOSIfION •••••••• .flBLE GIVEII* •. * •• * .* • 110 TRAILER LIBEL • 011 * .. HII .t •• : BSTilT100 .. . .·.·ltS········· •• DISD *. Y!!!S 1 * VERIFICATIOII •••••••••• X. .TIBL!!! GIVEII* * *. • .... .... • 110 RSTBTbOO i ••••• J4 •• • ••••••• * • • OBTAIN RSfRT- • • lDDRESS ll1D • : 1I0DIFI PSI! : •••••••••••••••• * *. ...... •• NO •••••• .* · ... .~ : .... BS : : u : * ••• 272 .* •• • •• 1'11 •••••••••• .POIIT SEEK IDDR • • IN USER DrFPH • • lPTEB CORRlllr • • CHECKPOIlT • *. *.*.*-*-*-.-*-*-* .. * SKIP .X.o • .* YES •• p1'u*. RECOKD •• FOUIiD • *. YES •••••• •• • liD *1/0 ROUfINES SII • .................* *. *. ·.···H3·········· *. REID p1'IXIliPORIIIIIOli RECORD ...i * •• * •• •• CHKPT •• DIVICE •• TIPE : as : .-.-*-.-.-.-.-.-* K1 • ·.................. ·........i . i: .• 0 i ••••• J 1 •••••••••• • 1/0 BOOTI MIS SII. • * • .* US •••• ····*Gl···*·····* * CALCULITB * • • LIST RECORD * ••••• LENGTH 1110 • • STORE TO CCIl • . YES •••••• NO * ... * • Ell *. •• .* .•.i .0 * •• PFIX•• NO •• I11FORIIATI011 •••••• .1'0 RESTORE •• *. * •• * P3 *. *. •• i 81 i •• • LAsr •• ••• ••• RECORD TO •• X •• Bg-· BBlD •• i ERROR *. • GIl' lDDRESS • OF CHKPT • • .PAR1IIBTZII LIST • • NO YES ·................. . .. G1 E] •• LIST •• RBCORD •• RBID i .* i i ·····P1···.··· •• • • • SBTLIIIIT: • • • .SET COBRECT. • • • PABTITIOII • • • .LOGIC1L IIiD • • •• •• •••• :~'~.!2~t!:~~-~~: YES * .. * • • 011 •• 1 • • ••• ·011·····.· ••• • RElD PARTITIO" • • DOIIP RECORDS • 10 •• CHKPT FROII •• •••• • BllL PABT1TIOII •• *. ····CS········· FITCH • $'BRII5G2 • ••••••••••••••••••• i : RSTaT2110 .* •• • • • lIS i 11 i ·................ .... . ·· .. .. ·····0]·········· · . ·.................. ·.................. ... .. ... .. .... ** . .** •• 10.. GITYIS •• ••• ••• 00111 AT •• •• CHKPT •• • ·SII • • Gl* ••••••••••• X: * •. * • • • • ..... C3 •• x. •••• I ••• RsnrlOO Cl •• • •••• CIl •••••••••• •• •• .1/0 ROUrIlIBS SII. •• CHIPT •• 10 .-.-.-.-.-.-.-.-. *. DBYIeE •••••••••• X.RBlD P1UITIOM • •• TAPE •• • DUIIl> BICOBDS • • UEA UD SET • .1/0 ROOTIIIE °lDR. *. SIT UP I1FORIIATIO. UCIS5Uf FOR 1185S1GB BS'fBt200 ................. •• i ..·· ................... • • • .X. • • * .• * • •• ··C1 •••••••• •• • BBrRIl'1 CCM • IIFOlIlIArIOII • • • FBOII PUT. SAVE. • ·.···II!i·········· RSTRTBRI •• ·...... • .* * .. .. ................. .•.i ...i • B!> • •• IIOBI •• US.. PFII •• •••••• •••••• •••••••• IIIFOBII1TIOI •• •• 81COBDS •• IBTRIIVI IIIFOR-. 1111'1011 PIS SID • PROII $JOBCTLB • FROII P1HITIOli • SUE lREA • 01 .......... • • PPIIRIST: • • •• PFII •• : : RB9~~~~BD : : i ···**61·········· • • • • • A3 • DOS/VSE Logical Transients i ····14.········ * * • • SVC 11 TO PROBLEII PROGRAII • ............... • FU'CB JSBRSTB2 • • • ............... Chart. SH,. $SBRSTRT - ~estore Problem Program (Part 2 of 2) (Refer to Chart 23) ·········. ·····A' ............... ·................ ··.····.5··.······ ................ ··................... ·····8)·········· ·····85.······.·· • • : UPIOOO : i ·····81···.··.·.· • • OBTUI CCB ADDRBSS • • ••••• 11•••••••••• • CKDIOOO • • i : IgBlaJI'I:D • IIODIPI • SEBl ADDRESS P8IOOO • i : • • ·.................. ·................. • • • GB'f DTFl'lI IDDRass • • • ••••••••••• X: i ···C1·.·········· ZICP RBID RECORD :CKIII001 i ···Cl············ EXCP REID RBCORD BICl> RBlD RlCORD • ................. ................. ................. ··... ...... ·................. ·······D3·.········ .. ..... ................. ·······1)5·········· .. .... ................. i ·····D1·········· •• YAIT •• i •• IIAlr ... i •• •• i i ·................ •• ••••• • • ····11·· RETURII • TO CALLER • .* •• •• •• Bl t. 110 RECORD *. FOUIID *..* •• 110 • •••••••••• X. •• • * •• * • IES i • • ·····Fl·········· ··.................. • • UPDlrB G) • NO •• ••• ••• • SEEK ADDRESS • ····14..••••••• RB'fURIl 'f0 CALLBR ••••••••••••••• IIAIT •• i • • • ·····115·········· • I1CRaASIl • 8LOCK IUlt81a • • ·.................. • III DTFPII liD • LOCA'l1 CCII • • ·.····P5········· ............... i • • aBTURI 'f0 CALLIII • • .•.i *• •• UPPIU •• ElTSI., •• Llltlt •• •• REACHED •• *. *.. * • .* YES .....* i ..· ·SL • 85- Charts 213 $$BRSTR2 - Tape Repositioning and DASD Verification Routine (Part 1 of 2) (Refer to Chart 23) Chart SN. ··.......... ··...... * ••• • aSTRO'OO ·................ UBRsrR2 i A3 ••• Rsrl0600 •• .* *. •• PIIYSICIL •• • •••• A1 •••••••••• • • AS • AJ • .* •• .* B1 *. ·....... * .. * · ...•. •••• *. *. . * ...... . ··.... ... IsrR0020 ..... ... ••• •• *. i * •. * • ISTR01ll0 01 ••• 01 •• ·....... •• .•.i *. .* * .. * .* .* •• •• i: *. *. * •• * .* i • 10 • IS'l'R0200 •* i P1 ••• •• •• Drp rIPB •• 'ALID *. *. * .• * .* 8S'IR01l80 .* ••• •• *•• * • ·................. . .. • • • .* • B3 • *. ··.... .. .... .....J1.......... J2 .. i ··................. ····Gs········· ••• • SET UP CCB • •••• • AIID RICORD. •• BlCKIflRD •• 115 • COUlTER FOB ••••••••• X•• IBPOSITIOIING •••••••••••••••••••• • RBPOSITIOIUG • •• •• . **.. ..*• 10 ISTR2000 i ••• ··12· ••• •••••• .BBPOSITION SPI1. *-.-*-.-*-*-e-.-. • IIPOSITIOI • ................. • TAPE POIIIIRD DIBBC'l'IOI • i .... ··...... • IIISSAGIS ~~~un~~~:···· ~~~~. SPES : •• : ••• • . 1: .····85·········· ··......... ................... ······JS········· ......•.......... i • SIT liS. COOl • IBCESSIII • ..X..PLUSUPOIIIITIOI • RITUII • 110 lDDIBSS • • II~ • II!) • BSTBO)OO ............... ISTIISGbOO • • •• 115 • ····ps········· BITUII TO • PIOBLla • PIOGB. • US ................. :1 .......... : .... ··...... 111 •* *. •• LOGICAL •• 10 • •• UIIT I •••• X. •• TIPI •• • • ·.···1)·········· ................. ISTR2S00 i .IIPOSI'l'IOM SPAs. *-.-e-*-*-*-*-.-• • REPOSITION TIP •• • BlCIIIIID • • DIBBC'l'IOI • l •••••••••••••••••••••••• : • 11 • 274 i *. I ••••••••••••••••••• · . ·.................. .REPOSITIOI 'l'AP •• • POIIIID • DIBECTIOI • • i i • I~ •• X. .-.-.-.-.-.-.-.-. *•• * i • BS. 8S'l'.0800 I ·····IS·········· .0BTlIl • .lSTI.T • ADD.ISS liD • • • STO.I TO PSI • 15'112000 i ·····Gl •••••••••• .RBPOSI'lIOI SP". i .. .. ··.......... .* * .• * • IBS i P] •. .····G1· •• ••••••• • • EXTRACT: •• • .GBr DIYICI • • • .TIPS OF DTp. • • LOGICIL UNIT• • • R~ • •• .ICORDS •• 10 •• SPICIPIID FO ••••••• ·POSI'lIOnIG· 10 •••••• • 115 ... ••• ALL A3 • *. •• .* *. ...•.........•.•. ..... ··.... . .* i os ··.............. i ···11 •••••••••••• SPICI FORUIID 'l'lPI SPICIPIED IUIIBIR OF • rILlS . •• ALL Drrs •• US. •• PROCISSID •••• X. *. • • •• •• •• II~raIIS II •• 10 •• fllIPI TIBLI •••••• •• PIOCISSID.· ··.......... • X 11 SIT UP POI a.lSSAGI •• 10 •••••• • 11 •• X. ••• • • IS'1'80700 • liS · .. •••• ·.................. •• UIIT A •• TIPB • liS ISTR0180 i .-.-.-.-.-.-.-.-. .* *• •• LOGICAL •• 10 •• RBPOSlrIOMUG.· •••• ·.UDICATID.· * .• * B!) •• 1. A~ • .* *. •• LOGICaL •• *. i • 15· ·····cs·· .IISSAGIS •••••••• 51. ................. ··.... ...... i ··.......... i: ISUOll60 i ···.·C1 •••••• •••• • • IlrlAcr: • • • .GB'r DBYIC.I • • • • TIPB OP • • • • LOGICIL • • •• UIIT •• i • rBS .* 1115 • AS • *. .* .* • 10 TAPI •• 10 •• BIPOSlrIOIIIG.· •••• ·.IIDICA'l'SD •• *. *. 15'1'80660 I ·····BS··.······· • • GITVCI: • • • .Glr fOLoal • • • • SIBlIL •• • • IUIIB.lII •• •• *.• * ·SP • • B1· i C1 • I[ B3 .* * •• * • us .* •• • •• ILL •• •• IITRIIS II •• liS •• IIIPO TIBLI •••••• •• PIOCISSID.· *. •• CALLID •• 10 •• PBOII •••••• ·.UBRsrRT •• *. •• ··.... ...... ·................. . .. .* • B1 •• X. •• ••• 10 DASD •• 10 •• RIPOSITIOIIIG •••••••••••••••••••••••••••••••••••• X•• flBIPICITIOI •••••• •• UDICATID.. •• I1DICATID.. ., • • 115 .•.i i AS DOS/VSE Logical Transients i • $$81I1SG2 • $$BRSTR2 - Tape Repositioning and DASD Verification Routine (Part 2 of 2) (Refer to Chart 23) Chart SP .. RS~B2000 ····A1··••••••• ·............... . .... ·5"· . • • REPOSITION FORIllID •••• AS ••••••••• I18POSI'lIOI • BACUAID • ·................ • • • • • B1 •• X. :.... .* i B1 ••• •• *. * . . * .* • i BS'U2080 • •• 82•••••••••••• *. •• STAIIDARD •• NO •• LABELED •••••••••• X •• FILE.· • ···SS•• •••••••••• SACKSPACB OIB BJ!COBD UD RIAD READ A RECORD ................. ••••••••••••••••• YES .•.•..••.•• x: i :Rsn2020 it ···C1 ••••••••• • •• READ ReCORD ................. .* •• •• •• C2 .•. •• TAPE IIARK READ *. •• •• *..* * •. * • IES •••••••••• .* •• X.. C3 .*. •• *. 1011•• YES STANDARD •••••• •• FILII •• *..* * •. * NO • NO ··.......... it . .* • 115.. ••• ••• •• D1 *. .•.i •• VOL LABEL READ *. . * • ..... i ... ·SI· • HS· .* •• .* •• •• •• .. .i •• *. •• .. .. .... ··...... ..•.•.•.. •• x: •• ~Al'E aARK READ •• •• 10 •••••.• i *. . * • YIS • JS· i • J2 • •. CS ···DS············ B&CISPACE RlCORD UDRIAD ................. NO .•.i 11 *. • •••• 82 •••••••••• •••• .IIISSAGIS 51. •• HDRl •• IES .-.-.-.-.-.-.-.-. •• LABIL ••••••••• • X. SIRIAL AIID • •• •• BB&D •••• *. . * .* •• •• :~~i~f;~1 cg~soI~: •• ••••••••••••••••• IS .. .i •• ~API *. aARK RIAD * .. * • NO • *. •• .* •• flS •••••• ..... .. i 10 ·51 • • 85· . f. •* Pl.. BSTR2060 i • •• P2•••••••••••• *. • • An BlADER •• IES •• LABEL •••••••• •• X •• RIAD •• • *. *.• * .* .* SpACI PORIIARD PILE 's .•.i •. •• CBIPT •• HIADIR •• IIICOID *. ••••••••••••••••• *•. * • 10 • • * . •• .* •• 10 •••••• liS :X ••••••• ••••••••••••••••• : . . ................. ·· .... :........................ 1: .•. .. .. ..... .... ·· .. .. ... .. .. ···J3········.··· RSTR2100 i ···G2····.·.····· RUD A RECOID I ••• •••• • G2 • .~ x •• •• •* B2 •• TAPE II.IIK READ *. *. •• .* * •• * i • ·SI • • HS· . NO • Jl •• 1. •••• BSrR21i10 x J2 ••• •• •• CHKP'f •• HEADER •• RECORD *. • • • ····ltl.·.....·· BB'lUBI TO CALLER ••••••••••••••• YES •••••• .* •• fES •••••••• •• 1 •• • * .. * * 110 . SUP CHIP! RECORDS ................. i ···G5············ . SUP CIlltP'l RlCOIDS ...............•. ... i···. • ••••• .* 8S •• *. ALL •• • IICOIDS •• 1 ••• •• P80CBSSID.· • 10.. *. .* • us ··.... .. ...... *. . * .. • oJ~ •• 1 • ····Js·········. ·............... i • • UtUI. TO CALLER • • i .... BSTRl160 K2 ••• •• • YES •• ALL •• .X.. • •• •• ••• BECORDS •• • ·.PROCESSED.· *..* *•. * • 110 :x ........................ : .... ··...... X • Gl • Charts 275 Chart SQ. $$BRMSG2 - Restart Message Routine ··................. • • ••• 1 •••• ••••• • SSBRIISG2 • IISG2060 ••• 12 •• • •••• 13 •••••••••• •••• .COlfBRT DTPTYPB. •• DTP TIPB •• UlS • UD IIOY! • GIVII •••••••••• , . DTP PILBIlliB . . . . . . . • •• x.. •• •• • 1'0 IIBSS1GI • **. .** .. .... ··......... . ••••••••••••••••••• • 10 i ·····B1 •••••••• • SUB •• IIISS1GI • • 10llBIR liD • • L01D IIISS1GI • • 1'IU lDDRISS • ···84•••••••••••• :IISG2080 i ···.·B2.········· • COIVIRT • • LOGIC1L 0111'1' • UO IIOVE • • • TO IIISS1GI • BlCP ·.................. ·.................. .. ... .. .. .. .. .. .!•• ·...... · .•. .•. i C1 . .IISG2120 •• •• OPIRUOR •• lIS • •• RBSPOISI •••••••• ·.BlPIC1'BD •• *. * •• * .* •• •• ••• *. •.. * i i • 01 •* •• RETORN •• *. COOS •• 10 •••••• 1'0 COlVERT *. *. *•• * .* •• .• • IES .* •• .• 02 •• •• COU TO •• BB1'RII'E *. • YIS *. * •. * *. .* • i •• 110 ...... • 110 01 5Y5LOG ·······C" .. ••••••••••.... ................. •• CUU TO COIIVERT 1I:~n~B ................. : . . 1. i C2 i :IISG2300 11111' •• B4 • i ••• n.. •• .* *. •• OPERATOR •• •• 10 ................... . IISG2500 .* D5 ••• •• *. 110 •• lITlallL • • • 0 •• RESPOIISB . . . . . . . . . . I.. IS" •• BIPEC1'BD •• •• ERaOI •• .• I., • IBS • IBS .... .. ..... ··.... . ·................ *... *. .* *..* * •• * i • ISS • IS· ...•.12.......... i i ·····B1 •••• •••••• • COIiVERT • • RETURI CODE • • AID IIOY! 1'0 • • IIISS1GI • •• BITR1CT ..... IISG2160 ••• i i 83 •••••••••• • • • • IISG25 .. 0 • •• 1 .... • ••••••••• BICP aUll OPllnOR RISPOISE . .. .................. ................. ·.................. ·................. •• coo poa •• • conERT CUD UO IIOYI TO IIESS1GB • • SPICIPIBO . . . . . . . . . . , . • LOGIC1L 01111'. • • .•.i •• RSTR IRROR •• *. *.. * ... i F3 Pl·. .* *. •• UTIRIilL •• .* .* NO ................... . *. • YIS ·· . . .................. i ·····G1 •••• •••••• • 110'£ IIlCRO NAilS. • 1'0 IIlISS1GE • : .......... x: · . ·.................. ··.!....... i ···**H , •••••••••• IISG2020 • lion • • TRlNSIBM'l NAill. • TO II11SS1GE • 1I0llBIIR •• FOR IISG •• 115(;20"0 i ·····G2······.··· • COIIYERT ·1110 • • eoVE SIZI • • VALOS '1'0 • • /lISSAGE • ·.................. ··.... ...... i • Bli • • BII • ~ 10 ...... .* * •• * • YES ·······P . . ····••··•·.... . ................. •• ................. :, .......... : ....., . .... •• ~Alt • * i ·····G3·········· • 11091 VOLDIII! ... • SERIAL !lUIIBn • • OR UPE SBRUL • • NOIIBIR 1'0 • ... IIBSSAGE • : •• G.. .•.i •• .* *. •• OPEBl1'0R •• •• .. .. .... ...... ··...... .... 10 RBSPONSE ...... •• V1LID •• i *.. * : • YES i Bli : ..•. II .. ••• •• ** ..'.. ** • 110 ·····JIi·····.··.· i • • • • SKI' UP VALUBS 1'0 IITURI 1'0 CALLER • • • • ·.................. FBTCH SSBRSrR2 • C1IICI!L • • • ••••••••••••••• • * •• * IISG21120 i ····115········· IISG252U •• CAIICEL •• Y E S . •• IIIDICIITED . . . . . . . . . . I. i ····K"···.····· ·................ DOS/VSE Logical Transients II!) : • BII • • • 276 i ····15··.·••••• PB:rCII • $S80UIll' • i •• .* *. •• •• SERIlL •• • • • • !1~~2ag:~ fh.a2~ £hg,~t. 0006A $$BOCRTY QD OCOOI $$BCHKP2 $$BCHKPF SB SF OD07D $$BOCRTS PD OD08! $$BOCRTS PD OC02I $$BCHI<;PT SA OD09D $$BOCRTR PA OC031 $$BCHKPT $$BCHKPE SA SE 0020E $$BOCRTB KD $$B~HKPT SA SD 0025E $$BOCRTB KD $$BCHKPO OD26E $$BOCRTB KD OCOSI $$BCHKPO SD 0028A $$BOCRTG MA OC06I $$BCHKPO SO 0029E $$BOCRTB KD OC071 $$BCHKPD SD 0030A OC08I $$BCHKPO SO $$BOCRTV $$BOCRT1 PK 'RA OC091 $$BCHKPE SE 0033A $$BOCRTE LD OC1DI $$BCHKPT $$BCHKPO SA SO 0034E $$BOCRTF LG 0035E $$BOCRTF LG OCllI $$BCHKPT $$BCHKPO SA SD OD36L $$BOCRTF LG OC12I $$BCHKPT $$BCHKPO SA SO 00371 $$BOCRT5 RJ 0038A $$BOCRTE LO OC131 $$BCHKP2 $$BCHKP3 SB SC 00390 $$BOCRT1 MG OC14I $$BCHKPT $$BCHKPO SA SD 0040A $$BOCRTL MG 0041D $$BOCRTL MG OC1S1 $$BCHKPT SA 0097A $$BOCRTl RA OC1'6L $$BCHKPG $$BCHKP3 SG SC OP701 LJBEOJ FP $$BCHf DMH4 DMJ4 GJG4 LHFl PKEJ tlFJl RLJ5 QMI4 E'rD2 ABE] GJCl DGH5 DDK3 KBJl KBG!> DCGJ "RB3 PDAl eNB] 13GEl CSC] PRB5 CQE3 KaHl 283 Label Phase FlfDfllTCH FOLD FORGETIT FORW FOOND FREERl FRBETRK FRET FULLiORD FW FIP FiPl $$BATTS2 SSBOCR'l2 SSSATTN] SSBOCRT3 SSSATTNF $SBEOJ SSBEOJ4 SSBOCRTE SSBATTNU SSBOCRT3 $SBOCRT2 S$BOCBT2 CVC2 RCE2 BPJ] REC2 AQD] DBGS DBE] LDB2 BCr] RFF2 ROP3 RDG] GETBtT GETCIID GETK GETPIBX'l GETPID GETPIK GETPIKl GETSIZE GO GO GO GO GO GO GO GO GO GO GO GO GOON GOON GOON 10 GOONll GOON 14 GOON]O GOON4 GOl Gal G02 G02 IJEDftPAR SSBATTNA SSBATTID SSBATTNC SSBATTID SSBAT'lNC S$BATTNC SSBATTNP SSBOCRTE SSBOCRTG SIBOCRTK SSBOCRTP SSBOCRTR $SBOCRTS SSBOCBTT SSBOCRTV S$BOCRTW SSBOCRTI $SBOCRTI SS80eRT4 SSBOCRTG SSBOCRTT SiBOCRTD $SBOCRTD SSBOCRTD SSBOCRTC SSBOCRTC S$BOCBTM SSBOCRTI SSBOCRTM $SSOCRTI EUJl lAD2 AltB3 AHG4 AMDl AGBS AGCS APHl LE12 8AEl 8ftFl NGE2 PADl PDDl PGDl PKEl Q1E1 QBEl QDEl RBEl 8BA2 PHl2 LBA2 LBB3 L1J2 K81)1 KJD2 NAP2 QDC] IAA4 QDD2 HALTIO BALT01 HARD WAIT HARDWAIT H1BDW1IT HERE HIRQUIIT $SBEOJ3A S$BEOJ 31 SSBBOJ SSBOCRTF iSBOCRTF S$BSYSWR $SBATTNS DEBS DEGS DAE2 LGJ2 LJD4 GGBl lYG4 IGNORE IGNORE IJBATTF2 IJBITTF4 IJBATTF5 IJBEJ335 IL IBCORRL INCRE! INIT INITDUftP INITIAL INITLOOP S$B1TTNC SSBOCBTK $$BATTP2 SSSITTFIi SSBATTP5 $SBEOJ 3 S$BOCRTB $SBOCRTB IJBSDUMP $SB1TTNT IJBSDUMP $$BAT7NU $SBEOJ3A AJJ4 ftJB3 GLBl CDBl CFBl DDC2 KEA2 KEA 1 EGD1 BACl ECCl BCC2 DEK3 284 Location DOS/VSE Logical Transients Location Label Phase INITOPR INITOPRl INITOPR2 INITPA!T INITPH INITOO 106 IRCROO ITERATE SSBATTNG S$BATTNG $SBATTNG $SBEOJ SSBCCHHR $SBEOJ7 $SBEOJ7 SSBOCRTQ S$BATTIA SSBATTNR SSBEOJ $SBOCRTB $iBOCRTE SSBATTNT S$BA'TTNT SSBOCRTM $SBATTNF SiBOCRTl IJBD"PIO IJBDPlPAR $SBEOJ $SB1TTF2 $SBATTF3 $SBATTU2 $SSATTIF $$B1TTNF $SSATTNF SSBOCRTV $$BAT'lFl $SBAT'lF4 S$SATTF5 $SBEOJ1 SSBOCRTK $SBOCRTG $$BOCRTP $SBOCRTR S$BOCRTG SSBOCRTK $SBOCRTP $SBOCRTR $$BOCRTS $$BOCRTT SSBOCRTV $SBOCRTW SiBOCRTY SSBOCRT1 $SBOCRT4 $$BOCRTP S,iBOCRTV SSBOCRTW SSBOCRTI SSBOCRTI $SBCHKP2 $$BCHKPJ S$BOCRTG S$BOCRTG $$BITTNZ $SBEOJ3A ICDl 111B4 DABl KED2 LIC2 BBC2 BAG4 N1B] APBS RBH2 F1F4 !SE4 DBC2 GLF2, GND3 CKH3 APG2 11'F2 APD2 PKA2 GIG] CnD) CFHII DNEl "LD1 P.lCD2 NGEIi PCG) MCBl "LBl NGC4 PCF2 PFBl PGB5 PKC4 QAC5 QFC2 'lSB3 'lHDl NGB4 PKB4 QAB5 QCB4 QFB2 SBCS SCC4 "BF4 "S14 BKH5 DEA2 JAIIIT· JCLFAIL $5BEOH4 $SBEOJ DGA4 DAC4 KCOMfi KCOfl.Ui KCOaltON KC08ftON SSBOCRTN $$BOCRTI $$BOCRTK $SBOCRTN NBA2 KeA 3 ftJFl NBDl 111'105 INPRO IISOPN INSRTAEB IITERB INTV INTV INVALID INVALIDl INVALOOT INVALl I NVCOlt INVLSTS INVP INVPG INVPHASE INVPBISE INVPHASE INVSIN IIVSINl INVSIB2 10 IOERR IOERR 10ERR IOREG05 IOKETN IORETRN IOBETRN 10RETRN IOROUT 10ROUT IOROOT IOBOUT IOROOT 10BOUT IOROUT IOBOUT IOBOUT IOROUT IOROUT IOROUTl IOROUTl IOROUTl IOROUTl IOROUTl IORTl lOR'll 101 ASBl lSF2 ASF3 DBBl GJE2 DIICl D1IE2 NKK 1 Label Phase KEYWORD $$BATTN7 CNC2 LAB!!Ii LABKYl LABMV2 LABKY) LAKBVl LISTPUB LBLPR LEN] LIMIT LINE LINECOD LINE2 LISTIO LISTIO LOAD LOADERRl LOADERR2 LOAD IT LOADPHAS LOADPHAS L01DPHAS L01DPHAS LOADPHAS LOADB3 LOADUPDT LOG LOG LOGGING LOGIO LOGIO LOGIOW LOOP I,OOP LOOPS] LOOPl LOOPl LOOP2A LOOP3 LPIERR LSTSEG LTADUfliP LUBCHECK LOBLOOP JJBSYSWR $$BSYSWR $$BSYSWR $$BSYSWR $$BSISWR $$BEOJ]A IJBSDUMP iJBATTNV S$BOCRT] $$BOCRTB $$BOCRT6 $$BOCRTB $$BATTF2 $iBATTF4 $$BATTF2 $$BATTN7 )$BAT'XSl $$BAT'XNA $$BATTF2 $SBATTFJ $$BATTF4 $$BATTF5 $$BATTU2 $$BAT'XNT $$BATTN7 $$BATTNC $iBOCRT2 IJBEOJ $:tiBATTF2 .$$BATTF4 $$BATTF4 $$BATTF4 $$BOCRTR S$B1TTNF $$BATTNE $$BATTNF $$BATTNF $iBATTNV $$BATTF5 IJBSDUMP $$BCCHHR $$BATTP4 GGCl GGHl GGC2 GGD2 GGGl DEB3 EFDl BFE2 BFA5 KDD] BLHS KEEl GMC2 CEB] GLH] CPK3 CSH2 ABGl GLHl GNG2 CDE2 CFD2 CKB4 BAJl CPJ2 AJB5 RDAl FQG2 GMD3 CECl CEBl CEFl PAF2 APC3 AND] AQC3 AQE1 BHB4 CFC] NIB1 EDB2 GJC2 CED] ftACFAIL "ACFAIL MACRiT 11l.CRET lll.INLINE MAINLINE MAINLINE MAINLN PlAINOO MAIN05 !UIN07 PllIN10 PlITCH MAIFMD "ICB PlICRl MISMATCH 8ISKATCli 80VALUE MOVEDATA $$BATTSl $$BATTSl $$BATTF2 $SBATTF3 $$BOCRTR $$BOCRTS $$BOCRTT $$BOCRTK $$BEOJ7 $$BEOJ7 $SBEOJ7 $$BEOJ7 $$BATTN7 IJBSDUPIP $$BEOJ4 $$BEOJ4 $$BATTF4 $$BATTFS $$Bll'1'51 $$BOCBTT CTE2 CUE2 GLK2 GHE3 PAG] PEI2 PGB4 HHJJ DMB1 D8Gl DMK2 DME4 CQD2 EGE4 DFG4 DFJ4 CDF] CFJ3 CUB] PGE2 ~$BOCRTQ Location Label Phase KOYESUB 110VESOBl !!IOYETtC KSG MSGOUT3 KSG02 MSGl KSGl MSG1020 MSG1040 I1SG1120 MSG1140 MSG1200 MSG1240 MSG1260 MSG1280 MSG2 MSG2 MSG2 MSG2020 MSG2040 MSG2060 MSG20ijO MSG2120 HSG2160 MSG2]OO !SG2420 MSG2500 rlSG2520 "S.G2540 MSG3 MSG3 MVCftSG6 MVERDI HVREPIAIN IJBEOJ IJBEOJ $SBOCR'l1 $iBAT'rNB $$BATTNA $SBATTS2 $$B1TTNB $JBOCR'lF $$BRJI\SGl $$BRPlSGl $$BRMSGl $$BRP.lSG 1 $$BRfIlSGl $$BRPIlSGl $$BRPtSGl $$BRMSGl $$BATTNB $JBOCRTE $$BOCRTF $$BRMSG2 $$BRftSG2 $$BRMSG2 $$BRMSG2 $$BRMSG2 $$BRPIlSG2 $$BRMSG2 $$BR"SG2 $SBRMSG2 $$BRMSG2 $$BR"5G2 $$BOCRTE $$BOCRTF $$BATTNV $$BATTBC $SBATTS1 FPF5 FPGS KCC4 lEBl ACC) CVJ2 lEGl LJDJ SJDl SJFl SJG 1 SJJ 1 SJA] SJC) SJG5 SJH] • AEC] LEJ4 LJB5 SQHl SQG2 SQA2 SQB2 SQC2 SQE] SQB4 SQJ4 SQDS SQBS SQES LEH] LJA4 BGF2 AHDl CUEl RDSCAN NEWC8D NEWL NEWLINE NEWLIIE 1 NEWlUN MEWYOL NEXT HEXTCCW1 NEXTDIB REXTDIB NEXTENT NEXTENTRY NEXTLINE NEITPH NEITO BEX'l2 BEXTl NEXT4 HOlDD NOADDl NOAP ROAP NOAP BOAP NOATTENT MOATTERT MOCRT ROCURS MOD1T $$BATTBA $$BOCRTD $$BOCRTC $$BOCRTD $SBOCRTD IJBSDOMP $$BATTBC $$BATTR7 $$BOCRTS $$BE054 IJBD"PPA IJBSDUMP $$BCCHHB SiBOCRTI $$BCCHBR $SBATTSl $$BAT'tS 1 S$BATTSl $$BA'lTSl $$BOCRTT $$BOCRTT $$BEOJ $$BEOJ 3A IJBEOJ IJBSDUMP SSBOCRTG $$BOCRTR $$BEOJ 4 $$BOCRTP $$BOCRTR ADC] LBEl KGJl LAD2 LABJ EGD4 AHB4 CRE2 PEA] DGF4 EQD4 EGC2 GJJ2 MGG2 GJG2 CTD] CTFJ eTGJ CTH] PGGJ PHG] DAE 1 DEEl FPG4 ":AE2 MeB2 PCP] DFBl SHCS PAD5 Location Appendix C: Label List 285 Label Phase NODATA NODEL NOETSS NOFIPA 1I0FOBftS NOHOLD NOKCOfUf MOLOG NOLTI NOLTADUftP 10ltOVE MOPlOYE 1I0PlOYB NOMV NOOPBND NOPAHT NOPCKD NOPOWEB NOPROT MOPUB2 1I0P2 NORAS NOREID NOREDSP NOREQ BORflAL HORft&L 1 RORflOltP BOSOUND BOSV1DftP NOSYSTSK NOTFID NOTFHD NOTFHD HOTFHD NOTFHD NO'IFULL NOTFOLL NOTIC NOTOK NOTPRT MOTREADY ROTXT BODHITCR NOVOLIDl ROWIHTE R01211 NYSERR M310RP $SBOCRTT $$BOCRTQ IJBSDUMP $$BOCRT6 $$BATTF] ISBOeRTA $$BATTRC IJBEOJ IJBSDUftP $SBATTS2 $SBOCBTC $$BOCRTD $$BOCRTT $$B1TTN1 iSBEOH4 SSBOCRTZ $$8EOH4 ISBOCRTS IJBDPJPPA $SBOCRTZ $SBEOJ4 SSBOCRTl SSBOCRTV $SBEOJ3A $SBATTHV SSBATTNV IJBSDUftP S$BOeRTI IJBSDUftP SIBOCRTA S$BATTF2 'SBITTF] SSBATTl4 .SBITTFS SSBITTU2 SSBOCBTW IJBDftPIC $$BOCBTC SIBOCRTH IJBSDOftP SSBOCRTR $SBOCRTT ISBOCBTI $$BEOJ1 SSBOCRTl $$BITTU2 SSBATTNA IJBSDUPIP PHE4 NJD2 ECDl RLC4 GRGl DHE2 KC12 AJE5 FPA5 EDG2 CVB] KGJl L1B4 PGD3 CHES DGG1 QJ11 DGF1 PDA4 EQG2 QJD1 DFAl BFA1 PKH2 DED5 BFBI BFD2 ECGl OEEl EBBl KAA3 GLE2 GHC3 CDJl CPJ 1 CKH2 01A2 raJl KHA5 ftEF2 EJB1 PBAl PGA2 KCE2 DND4 B1D1 CKC2 lCBS EftD1 OAtLDG OILl 0lLl0 OAL12 OAL2A 0lL3 OAL4 01L6 OAL'1 OAL8 OD1SD OFBI OIEIIT OIEXIr ONELIME OtfEt'ST SSBACLOS SSBACLOS SSBACLOS SSBICLOS S$BICLOS SSBACLOS $SBICLOS SSBICLOS S$BACLOS SSBICLOS IJBD!PIC IJBDftPIC IJBDPlPIC IJBD!PIO S$BOCRTB SSBOCBTC DKB4 DJH1 DKBl DKC1 DJF2 DJG2 DJH2 DJB3 DJB4 DJC3 PGC2 PGC5 FFG5 PBD2 KEB4 KIJI 286 Location $$BBOJ4 DOS/VSE Logical Transients Label Phase ONLIST ONLIST ONLYD ORLlENT OPENERD OPftESS OPftESS OPMESS OPPIESS OPRSHT OPRTHUft ORRDY OUTC1Lt OOTSTIT $SBEOJ IJBEOJ $SBOCR'l2 SiBOCR'll IJBDPt:PIC $$BATTF2 $SBATTFJ $$BATTF4 $$B1TTFS S$BATTNC $$BOCR'rO $i8AT'rNC $iBSDRUP $$BATTNR PAGEPOOL PARAftOO PARCKRTN PARIHV PAR! PIRPA PAR'll PAR'll PAUSE PIOSE2 PAVAIL PAV1IL PCaOUT' PCBOUT2 PDEND PDIB PDOPIP PDO!PB PFBLTflSG PFCLEIRr PFDDRCOU PFEOPB PFBSliT PFESYNTX PFFETCH PFFORliS PFGETOPR PFKEYDPC PFLPI PlLPI PFLUBAD PFftE PFNKSCOU PFNKIVAL PFNOL PFNOLfiSG PFNXTOPR PFN10PR PFNl211 PFOPR PFOPRFCP PFOPRFLD PFOPRINV PFPRftftVC PFPUBCNT PFRCOMBS PFSTltEND PFSTRPRft PFSUNI'f PFUNIT PFWOFCOU IJBSDUMP $$BATTNZ $$BATTNQ IJBSDUMP $SBOCB'l2 $$BOCBT6 S$BOCB'll IJBSDUMP $SBATTHC S$BITTNC $SBOCRTC $iBOCR'll $SBATTHT $$BATTNT IJBSDUI!P IJBDltPPA $SBATTHV IJBSDUtlP $SBAT'll1 S$B1TTH8 $SBArTFl $SB1TTN8 $SSlr'll1 $SBAr'lF1 $,SBITTFO $$BAT'lN8 $$BATTN8 SSBATTl1 S$BITTlO S$BITTN8 $SB1TTFO $$BATTFO $$BATTF1 S$B1TTN8 $'BATTlO SSBI'l'TN8 S$BATTN8 $SBATTRS SSBlTTl1 $SBATTNS SSB1TTN8 SSBITTN8 $SBATTF1 $SBATTN8 $SB1TTFO S$BATTFl $$B1TTN8 $SB1'l'TB8 $$B1TTFO SSBITTFO $$B1TTP1 Location DCAjl FBFl 9CG3 RSC2 FGG5 GLB4 GNB4 CDB4 CFB5 AGE2 NE14 ABEl GHJ2 AWB5 EftD2 BKD] AVDI loams flCIS Rftl2 RFAl EftBl &JBl AJKl KKD2 QFJ4 BBJ5 BBKS ELG4 RQD] BHBI EBBl ceD4 C1B2 CCJl CAFl CCE2 CCB3 GKFS ClEl CBBl CCDl GIFl CAFl GKH2 GKJl CCG] CAR2 GKRI CAKl CACI C8B2 CCJl CAD2 CAG1 CABI CCC4 CBGl GKC4 CCB1 ClK5 CBD1 GKG2 GKB2 CC83 Label Phase PF10PR PF20PR PGREGS PN1VAIL PN1V1IL PNDUMP POWCHKl POWER PPOCTTTT PREPOMSG PREPVMSG ,PREPVMSG PRESENT PRINT PRINT PBINTEND PRINTEND PRINTERR PRIN/lEBR PBINTERB PRINTO PRINTO PRINTl PRINTl PRINT1 PROCEDORT PBOCKEY PROCltSG PBOGCHCK PROGCHCK PROTCHCK PROTCHK PROTCHKl PROTCHK2 PRTEND PRTPI PRTPA PRTPSW 1 PRTPSW2 PH'll PRTYLOP PHYSET PRTIOS PHTI1S PRTY20 PRTY21 PRTY10 PRTYS2 PRTY56 PRTI51 $$BATTN8 $SB1T'lNB IJBSDUMP $$BOCBTC $$BOCRTY IJBSDOMP iSB1T'1FO $$BE084 $$B1TTNS $$B1TTF4 '$Bl'1'TF2 $$BATTF5 $$BATTNC IJBDMPIC IJBDMPIO $$8ATTF2 SiB1TTF] $$B1TTF4 $$81'1'TF5 i,s8ATTU2 IJBD8PIC IJ.BDPlPIO $$BEOJ IJBDftPIO IJBEOJ iSBATTNS iJB1TTN1 SSBATTS2 $$BOCRTA $SBOCBTZ $$BOCRTZ SSBOCBTZ $$BOCRTZ SSBOCBTZ IJBEOJ IJBSDUl!P IJBSDUKP IJBEOJ IJBEOJ iSBATTN2 $$BATTN2 $$BATTN2 $$BATTN2 i$BATTN2 $$BATTN2 $$BATTN2 $$BATTN2 $$B1TTN2 $$B1TTN2 $$B1TTN2 $$B1TTN2 SSBATTN2 $$BOCRTP SSBAT-rS 1 SSBATTF4 SSB1TTP5 S$BATTU2 5SBATTOl iiBATTN9 PRTI5~ PRTt59 PRVDltSGI PUBFOUND PUBLOOP POBLOOP POBLOOP POBLTftSG PDCLEART PUDDNCUO PUESft'1' POPOLD POGETOPR PUGOPR PUKEYDPC PUKRYWRD $$Bl~TUl i$BA'lTUl $SB1TTN9 $SBATTN9 $SBATTN9 $$BATTOl $SB1TTN9 Location CAH3 CAJ3 ENDl KKH5 QFG4 EKF2 GKK2 DGEl lIF5 CDC2 GLGl CFC2 A8D4 FF13 FBBS GLE5 GNFS CDG3 CPD3 CKJ2 PPD5 FBFS DCD4 PCB2 PR84 lIDS CNB4 CVB2 KBFl QKD5 QMC2 QKBl QKE2 QKG1 FRG2 EKA3 EKC3 FQCl FQFl BLBl BPlGl BKA1 BLD1 BLP1 BL12 BLD2 BLA] BK81 BPlD1 BftG2 B"B4 BltCS H812 CSC4 CDP2 CFH2 CKC4 CJF2 CGB2 CJG5 CJC4 CGG3 CHBl CGF1 CJ!3 CHJ2 Label Phase PUNKSCUO PUBOCHK PUNULftSG PUN10PR PUOPR POOPRPLD POPRMftVC PORCOftBS POS'1'RPRM POT DATA POTftSG POTKSG POTMSGl POTR1IN PUWOUCOO PU10PR PU20PR PU20PR PV1LID $$B1TTUl $$B1T'1'N9 S$B1TTN9 $SBATTN9 $$Bl'1''1N9 $SB1T'1N9 $$B1TTN9 $SB1T'1Ol $$BATTN9 IJBD"PIC $SBATTNT IJBDKPIC IJBDMPIC $$BATTN9 $$B1T'1'Ul $$BATTN9 $SBATTN9 $$BATTN9 IJBDftP1R CJES CGH] CGJ3 CHC2 CGD2 CGBl CHGl CJBl CHDl FHBl BBB!> FFBl PFE] CGC4 CJFS CGEl CGE4 CGFl EUB1 QEI QUEUE $SBOCRTL $$BEOJ3A "M.J2 DEH2 RASSI RASWAIT RASWAIT RDSPLAY BElCHED BE1D READCKD BEADCRD BBADDIR READKl READRT BEADRT REAL310 BECOG RECOV2 REDSP REPEAT REPEAT REPE1TO REPEAT2 REQC1BC REQCANCO REOPEND REOPEND REQPR REOU RESCOD! RESE! RESET RESET RESETSW BESET1 RESEIT RESTK REST REGS RErERR RETERR RETERR RETI RETOK RETRY BETRI BETRY $iBCCHHR $SBCCHHR $SBEOJ4 $SBOCRTB SSBOCRT3 $$B1T'lNT $$BOCRTC SiBOCRT4 $$BATTU2 SSBOCRTS $SBOCRTR $SBOCBTS S$BEOJ $SBOCRTG SiBOCRTF $$BOCRT4 $$BOCRTR SSBOCRTY $SBOCRTC $SBOCRTC $SBOCR'lX SSBOCRTI $$BOCRTK $$BOCRTP $$BOCRTK $iBOCRTl $SBEOJ $SBOCRTB $iBOCRTG IJBDftPIO SSBATTNT $SBOCRTG S$8EOJ4 SiBOCRTG IJBDPlPIO $$B1TTP4 $$B1TTF5 S$B1TTU2 SSBlrTF5 IJBDftPIC SSBATTF2 $SB1TTl] SiB1TTF4 GJBl GJE4 DFJ2 KEll RED4 BABl KIIDS QHD2 CKF2 PEBl PCB2 PPB2 DBDS Location Appendix C: Label List ~UE2 LGH4 RHi2 PAA4 QEC] KGGl KHD4 QBF2 QDK] MLB4 MHE2 MKP2 RAB5 DBH2 KDFI MB13 FeE2 BAD] 'U.C4 DHJ5 PlAB.l FBE2 CDJ] CPP] CKK3 CPJS lPHS GLJ3 GIIK3 CDB3 281 Location Label Phase RETRY RBTIlY RETURN RETURN REl'l REI'2 RrCHECK ILCCB ILCCB RST80400 R5'1'10460 R5T80480 RS1'80600 IS1'B0660 IS1.'RO'100 15TR0800 ISI'B2000 R5T82000 RS'1'R2000 ISTB2020 RSI'82060 RS'1'82080 151'82100 8SI'82140 R51'R2160 RSI'82500 RSI'WRNG RSI'XECB R1'ST81' RURREIL .SBATTFS SSBOCRI'S $SBATTRS SSBIl'T02 SSBOCRI'6 $SBOCRT6 $$BIOH4 SIBEOJ· IJBEOJ $'BCCBHR SSBOCRTH $SBRSTR2 SSBOCRTY SSBISTII' $SBRSTRT ISBRSTIT SSBRSTRT SSBRSTRT SSBRSTIT SIBRSTBI' SIBRSTRT S$BR5TR2 IIBBSTR2 SSBRSI'B2 ISBRSTR2 S$BRSTR2 SSBRSTR2 ISBRSTR2 SSBRSTB2 $$BRSTR2 SSBBSTR2 SSBBSTR2 SSBRSTR2 I$BRSTR2 $$BRSI'12 SIBRSI'R2 SSBBSTR2 S$BISI'-82 .$SBISTI2 SSBRSTR2 SSBRSTB2 SJBRSTB2 SJBRSTR2 S$BOCRTY SJBEOJ4 SSBATTNA SiBEOJ]l PRE2 GJF4 MBH3 51G5 OEBl SLB5 SLH1 SLC3 SLDl StC4 SLG4 SLJ4 SLHS SHC1 SRD1 SHEl SNPl SRJ2 SH13 SIC] SRP3 SMA5 SHB5 S1ID5 SME5 SRG3 SRK2 SPll SPCl SP12 SPB2 SPG2 SPJ2 SPK2 SMK3 QEB2 DPB3 ICB4 DEJ3 SlYER] SlYID 5CANBL 1 SC1NBL2 SC1NOPN SC1Ml SCIP SCR SCRPRI' scal SDDUftP SDEOY SDUftPR SDOftP8 SE1RCH SE1BCH SEARCH SElRCH S$BATTNT S$BOCRT6 S,sBATTHA SSBATTNA $IBATTHA $$BAI'TNT S$BOCRT4 SSBOCRTL SSBOCRT! SSBOCRTL IJBSDUftP IJBDftPIO IJBSDUPJP IJ BSDOltP $SBATTN7 $SBOCRTB S$BOCRTC SSBOCRI'D BIF3 RftE2 ADDl ADEl IDB3 BBBl RHG2 ftPB2 QEDl ItPC2 IK82 FCDl ECll ECEl CQC2 KFBl KJB3 LCB2 RftSP05~ IPI' RSI'ftSG600 RSI'PRT RS1.'RTEll B5TRT1S0 RSI'IIT200 RSTRT240 RSTRT300 RS'I'RTS60 RSI'BT600 RS'I'RT700 151'B0020 RS1.'B0140 151'B0180 151'10200 RS~ROlOO 288 DOS/VSE Logical Transients CFF4 PE14 lXC1 CIJ5 ILCS lItA3 DGBl DCK2 Label Phase SEARCH SECPl SEEIPftOR SEGLlft SEGPASS SEIDeSG SEIDftSG SEMSECftD SEHSEl SEHSE2 SETCOIIRG 5ETEXT SETFLAG SETID SETP SETOPOO SETVAL SHIFT SIZE SKIP SKIP SKIPBLRK SKIPBLNl SKIPLOAD SKIPRI'Y SKIP TOE SKIPTST SKIPl SKIP1 SRCHLOOP ST1RT STAIT START!: ST1RTIO STARTIO STARTUP ST1RTl STAT05 STAT10 ST1T12 STAT15 STAT35 STAT40 STCCN7 5TDUltP STEXCD STIO STIO STLHGTH STORECCW STOREl STORES STRGEND STRGEND STRGEND STRTIO STRTIO SOBLOOP SUBTASK 50PDUftP SOPV SVADI!fP SVADOftP SVAST SVC26 SWAUTOCL S$BOCRTG $SBOCBT2 IJBSDUftP $$BOCRTQ SSBOCRTN SSBOCRTE S$BOCRTF $.iBOCRTZ S$BOCRTZ $SBOCRTZ S$BOCIT! S$BATTHB S,iBOCRTA SSBITTHD IJBDltPIO $$B1TTNY IJBDI!fPAI IJBDltP1R SSB1TTHP SSBOCITP SiBOCRTT S$BOCITK SSBOCRTK $$BAI'T15 $$B1TTND S$BOCRTO S$BOCRTC S$BOCRTP SSBOCRTT SSBEOJ3A SSB1TTHT SSBSDRUP SSBOCRTE SSBOCRTG IJBDftPIO S$BOCRT] SSBOCRTl SSBEOJ7 SSBEOJ7 $SBEOJ7 SSBEOJ7 $$BEOJ7 $$BEOJ7 $iBATTHO SSB1TTNV $SBATTNB SSBOCITE S$BOCRTF S$B1TTF3 SSBOCRTA IJBDr.tPIO IJBDPlPAI S:liBOCRTC $SBOCRTD SSBOCRTG SSBOCRTE SiBOCR'll $SBATTNC SSBEOH4 IJBSDUMP $$BATTND IJBSDUltP IJB5DUltP $$BITTNV $SBOCRTZ $$BEOJ4 Location PlCB4 RDJ4 EHE4 NJFl NOA4 LEB] LJBl QJAl QJG] QJB4 KAA4 AFBS KBG1 AKC2 FADS BJJ] RUGl EVKl APBl MGH2 PGHl PUFl ItLF4 CFD4 AKB2 MFAl KKJ2 MGK2 PGK] DEB4 BABl GHB2 LDDl PlAD3 pCE4 REA4 BABl DLel DLC2 DLF2 DLJ2 DLE5 DLK2 BCH~ BGB] AFB1 LFEl LKE2 GNJI KBR2 FAE5 EYDl KJCl LCC2 ~CC4 LFBl LKB2 AHB2 DG12 EFBl AKDl BGB2 BJA] BFB4 QftH5 DPB4 Label Phase SWTCHOFF SYSTftPDl SYSTftBD SYSVR· IJBD!PAR IIBOCRTK iSBOCRTK $SBSYSWR EVG2 ftKD3 IlKA3 GGB4 'fABl 'lAPEDBV TAPIDEV TAPEIO TAPEOO TAR TASK TBIT TDISK '.rEA '.rEND TEND1 TER! TBRIICANC TEST TEST TES'llP TESTBRS! TESre!D TESTCNT TEStERS TESTIO TESTIO TESTLPI TESTKAX TESfNOSD TBST02 TEST02 TFOr.. TICCHECK TICCHK TICEHROR TICDT TICSKIP Tfl TftPABl Tot TPBAL TPTYPE TPTJPE TPTYPEl TPTYPBl THC TRC THEAL TRKFBl TRSFR TRSFR1 TBSFR2 TRSFB3 TRYNXT TSAIIB TSTADDR TS!BJF TSTBUFF TSTBUFP TS'1'BIDDR TSTJBP TW01DUftP TWOiDS TIPIONE $SBATTNV $SBEOJ IJBEOJ IJBDMPIC $$BEOJ7 IJBSDUftP $$BEOJ3A IJ8SDUftP IJBDnPIO IJBDftPAB IJBDMPAR IJBDttPAB IJBEOJ $SBEOJ $$BOCRTC I$BOCRTY IJBEOJ SSBATTS1 $SBOCRTZ S$BOCBTZ liBOCRTI SSBOCB'lI SSBOCRTl $IBATTFS IJBSDU8P $iBOCBTZ $SBOCRTC SIBOCRTY IJBDftPIC iSBOCRTI S$BOCBTR SSBOCRTA SSBOCRTA $$BOCRTZ SSBEOJ 3A $SBATTNA SSBATTNV $SBlfTN2 $$BEOJ IJBEOJ $iBEOJ IJBEOJ IJBDftPIR IJBDftPPI IJBDftPIR $$BEOJ4 SIBOCRTD SIBOCHTD ilBOCHTD SIBOCRTD $SBAfTS1 IJBD!PAR IJBDIIP1R IJBEOJ iSBATTF2 $$BATTF5 IJBDBPAR $$BEOJ IJBSDUIIP IJBDftP1R $SBATTN7 BFE3 DCJ2 FRD2 FHC2 DIIA3 EAG2 DECS BHHl FCBl ETC2 ESG4 EVC4 FPJ5 DAD4 KKBt QFBl FPC4 CTa3 QLB2 QKD4 KBA2 LFH'LKH2 CFE2 EGH2 OK84 KKG3 QFEl FGD5 KAG4 PBB2 IIGS KCA4 QLB] DEB2 IlC2 BEG3 BNBl DCG2 FRB2 DCH2 FBC2 EWDl RBJ4 ETJ2 DBD4 LADl LAEl LAFl LAF3 CSD2 EVC2 ESB2 PRJl GLA3 CrF2 ETB2 DCD2 ELBl EVBl CQB2 Location I Location Label Phase Ul UNAV UNRECO'l UN1 UPD UPDATE UPDATBR UPDATE1 UPD!l SiBOCR'r3 $$BlTTNG $SBOCRTF $$BOCBTX SiBOCRTB SiBOCRT3 IJBSDUllP $$BOCRTQ SSBOCRT3 VALBBOO VALCUUOO VALIDATE VAL80D05 VALNODOO VERlftSG VLOOP VOLU"E62 VRBLl VTA"HOOK $$B1T'lNY $$BATTNY IJBDKPAR $$BAT'lNY $$BATTNY $iBATTU2 IJBSDUKP $SBATTNO SSBOCRTN $iBATTNH BJB5 BJEl ESC4 BJPl BJC] CKFS WAIT1 WAITl WAITl WARN WBITEB WBITECftD WRITE" WBITEO WBITE20 WRITS WRTIBSTL WRTWRNG WTE WTE1 $$BEOJ $$BOCRTR IJBEOJ SSBOCRTB SiBOCRTS S$BOCBTZ SiBOCRTS S$BOCRTl S$BOCRTH SiBOCBT4 S$BOCRTI S$BOCRTR $$BOCRTl S:iBOCRTl DCE4 PBCl PRJ4 KDH4 PFBl QHE4 PFBl RAC2 MFE2 'IRB] "GF] PCB] llAGl lUAl XFB XPR1 $SBOCRTC S$BOCRTC KGD3 YESFOLD $$BITTU2 CKB2 Appendix c: Label List 'IFF3 ASJ5 LJll QDeS KFC2 "REEl EKG2 "KDl 'IEG3 ~"B3 AOB2 NBA4 ATB4 KHC2 289 290 DOS/VSE Logical Transien~s DUMP command processor detail chart 104 general chart 24 text 116 DUMP macro 33 dumps 24, 33, 31 r---lI • A I L---J ALLOC command processo~ detail chart 88 general chart 21 text 16 ALLOCR command processor detail chart 88 general chart 21 text 16 ALTER command processor detail chart 100 general ch~rt 23 text ~6 attention interrupts 16 attention routines 16 r---1I tEl L---J lNDSD command processQr detail chart 113 general chart 21 text 17 error message cross reference r---, r---,. I F I B L---J I 277 I L---J B (logical) transients BATCH command p~ocessor detail chart 92 general chart 21 text 116 _ buffer load phases 37 1~ r---,. flowchart symbol~, explanation of forms co~trol buffer (FCB) loading 76 37 r---l I H , L---J hard-copy control flags 52 hard-copy file, format of 53 I C I L---J r---'1 cancel codes and messages 35 CANCEL command processor detail chart 83 general chart 20 text 16 cathode ray tube (CRT) 40 checkpoint/restart routines 63, 66 CHKPT macro 63 CRT (cathode ray tube) area (CRTTRNS) 40 functions 40 logical interrelationship 40 message format 49 routines 40 JDUMP macro r---, r---, t I I L---J IGNORE command processor detail chart 85 general chart 20 text 17 r---'t J I L---J 33 I D I I L I L---J L---J Display operator console support 40 DOC (Display Operator Console) 40 DSPLY command processor detail chart ~02 general chart 23 text 16 label list 281 LFCB command processor detail chart 114, 116 general chart 26 text 17 LFCB macro processor Index 291 detail chart 181 general chart 39 LOG command processor detail chart 85 general chart 20 text 17 logical ($$B) transients area 11 attention routines 16 checkpoint/restart routines CRT routines 40 terminator ro~tines 31 LUCB command processor detail chart 120, 122 general chart 27 text 11 r---lI M I J L---~ MAP command processor detail chart 86, 87 general chart 20 text 11 MODE command proc~ssor detail chart 96-99, 108, 109 general chart 22, 25 text ~7 MSG command processor detail chart 81 general chart 20 text 17 r---lI I N I L---J NEWVOL command processor detail chart 84 general chart 20 text ~7 NOLOG command processor detail chart 85 general chart. 20 text 17 r---iI I P I L---J PAUSE co.mand processor detail chart 85 general' chart 20 text 117 PDUl1P macro 34 phases (see also SVA phases) $$BACLOS ·detail chart 142 general chart 32 $$BATTFO detail chart 180 general chart 39 text 37 $$BATTFl 292 DOS/VS Logical Transients 63 detail chart general chart 17 text $$BATTF2 d~tail chart general chart 37 text $$BATTF3 detail chart general· chart text 37 $$BATTF4 detail chart general chart text 17 $$BATTF5 detail chart general chart text 17 $$BATTNA detail chart general chart text 16 $$BATTNB detail chart general chart 16, 1,1 text $$BATTNC detail chart general chart 16, 11 text $$BATTND detail chart g,eneral chart text 17 $$BATTNE detail chart general chart text 16 $$BATTNF detail chart general chact text ~7 $$BATTNG detflil chart general chact text 16, 17 $$BATTNH detail chart general chart text 16 $$BATTNI detail chart general chart text 11 $$BATTNK general cbart text 17 $$BATTNO detail chart general chart text 17 $$BATTNQ detail chart general chart text 11 $$BATTNR detail chart 6 26 ~ ~ 181 39 183 39 1~ 7 26 119 26 17 19 811 20 83 20 86 20 88 21 90 2l 92 21 94 19 87 20 20 95 21 96 22 91 general chart text il7 $$BATTNS detail chart general chart :17 text $$BATTNT detail chart general chart 16, 17 text $$BATTNU detail chart general chart text 116 $$BATTNV detail chart general chart 116 text $$BATTNY detail chart general char-t. text, ~7 $$BATTNZ detail chart general chart t.ext 17 $$BATTN2 detail chart general chart 17 text $$BATTN3 detail chart general chart 17 text $$BATTN7 detail chart general chart 117 text $$BATTN8 detail chart general chart 17 text $$BATTN9 'detail chart general chart 17 text $$BATTSI1 detail chart general chart 17 text $$BATTS2 detail char:t general chart 117 text $$BATTUl detail chart general chart text 17 $$BATTU2 detail chart general chart 117 text $$BCCHHR detail chart text 38 22 98 22 100 23 1102 23 104 24 1108 25 109 25 1110 21 1113 211 124 28 114 26 120 27 130 28 '133 28 \ 122 27 123 27 179 $$B~HKPD detail chart general chart 265 66 text 71 $$BCHKPE detail chart general chart 711 text $$BCHKPF detail chart general ~hart text 72 $$BCHKPG detail chart general chart text 72 $$BCHKPT detail chart general chart text 67 $$BCHKP2 detail chart general chart text 69 $$BCHKP3 detail chart general chart 70 text $$BCHK3G detail chart general chart text 73 $$BEOJ detail chart general chart 31 text $$BEOJ3 detail chart general chart text 31 $$BEOJ3,A detail chart general chart 311 text $$BEOJ4 detail chart general char,t 311 text $$BEOJ7 detail chart general chart text 31 $$BOCRTA .det,ail chart general chart 48 text $$BOCRTB detail chart general-chart text 48 $$BOCRTC detail chart general 'chart text 48 $$BOCRTD d.etail chart general chart 49 text $$BOCRTE detail chart general chart 266 66 267 66 268 66 262 66 26~ 66 264 66 271 66 134 32 137 32 138 32 139 ,32 il44 32 184 41 1~7 47 190 ,42 194 42 197 47 ,Index 293 text 50 $$BOCBTF detail chart· 'general chart 50 text $$BOCRTG detail chart general chart 51 text $$BOCRTH detail chart . general chart 51 text $$BOCRTI detai.l chart general chart 55 text $$BOCRTK detail chart general chart 55 text $$BOCRTL detail chart general chart 55. text $$BOCRTM detail chart general chart 55 text $$BOCRTN detail chart general chart 56 text $$BOCRTO detail chart general cbart 56 text $$BOCRTP detail chart general chart 56 text $$BOCRTQ detail chart general chart 57 text $$BOCRTB detail chart general chart 57 text $$BOCRTS detail chart general chart 57 text $$BOCRTT. detail chart general chart 58 text $$BOCBTU detail chart general chart 58 text $$BOCRTV detail chart general chart 58 text $$BOCRTW 294 200 47 204 42 207 42 210 42 21 ~ 44 2~5 44 218 44 219 44 222 44 224 44 226 44 228 43 231 43 234 43 236 4~ 237 45 DOS/VS Logical Transients 238 detail ch-ar:t 45 general chart 59 text $$BOCBTX 239 detail chart 45 general chart text 59 $$BOCRTY 241 detail chart 45 general chart 59 text $$BOCRTZ 244 detail chart 41 general chart 60 text $$BOCBTl 250 detail chart 46 general chart 60 text $$BOCRT2 252 detai~ chart 46 general chart 60 text $$BOCRT3 254 detail chart 46 general chart 61 text $$BOCBT4 257 detai.l chart 46 general chart 6:1 text $$BOCRT5 258 detail chart 46 general chart 61 text $$BOCBT6 detai~ chart 260 46 general chi,irt text 62 $$BPCLOS 32 general chart text 38 $$BRMSGl detail chart 270 general, chart 66 text 73 $$BR-MSG2 detail chart 276 66 gene.ral chart 75 text $$BRSTRT detail chart 272 general chart 66 text 73 $$BRSTR2 detail chart 274 general chart 66 text 74 $$BSYSWR detail chart 178 text 38 printer buffer load phases PBTY cO$mand processor 1110 detail chart general chart 21 text 17 37 r---, IJBDftPPA detail chart general chart IJBEOJ detail chart general chart IJBSDUMP . detail chart general chart SVC (supervisor call system dump 33 I R I L---.J Restart routines 65 r---, I S I L---.J screen control table (SeT) entry SETDF command processor detail chart 12~ general chart 28 text 11 SETMOD command processor general chart 20 text 11 SIZE command proces~or detail chart 90 general chart 21 text 17 special service programs 37 START command processor detail chart 92 general chart 21 text 17 supervisor call interrupt (SVC) supervisor calls ~2 cancel codes 35 SVA phases 11 $IJBDUMP 33, 24 IJBDMPAR detail chart 162 general cha~t 33 IJBDMPIC detail chart 110 general chart 33 IJBDMPIO deta~l chart 161 general chart 33 160 33 115 33 141 33 interrupt) 12 49 r---, I T I L---.J terminator routines 31 TRBIL command processor detail chart 110 general chart 21 text 11 r---, I U , L---.J ~2 universal character set bufter (UCB) loading of 31 ... ---, I V I L---.J VOLUME com.and processor detail chart 95 general chart 21 text 11 3800 printer files automatic close of 38 Index 295 SY33-8553-4 c o en ....... < en m r o CQ ~. IBM International Busin.s Machines Corporation Data Processing Division 1133 W.tchester Avenue, Whitt Plains, N. V. 10604 IbM World Tractt Americas/Far East Corporation Town of Mount Pleasant, Route 9, North Tarrytown, N. V., U.S.A. 10591 IBM World Trad, Europe/Middle East/Africa Corporation 310 Hamilton Avenue, White Plains, N. V., U.S.A. 10601 READER'S COMMENT FORM DOS/VSE Logical Transients and Dump Phases Logic SY33-8553-4 This sheet is for comments and suggestions about this manual. We would appreciate your views, favorable or unfavorable, in order to aid us in improving this publication .. This form will be sent directly to the author's department. Please include your name and address if you wish a reply. Contact your IBM branch office for answers to technical questions about the system or when requesting additional pUblications. Thank you.· How did you use this manual? Name As a reference source Address As a classroom tex t As a self-study text What is your occupation? Your comments* and suggestions: • We would especially appreciate your comments on any of the following topics: Clarity of the text Organization of the text Accuracy Cross-references Index Tables Illustrations Examples Appcar~IIl":l.' Pnntmg Paper Bmding' YOUR COMMENTS, PLEASE ••. This manual is part of a library that serves as a reference source for system analysts, , programmers and operators' of IBM systems. Your answers to the questions on the back of this form, together with your comments, Will help us produce better publications for your use. Each reply will be carefully reviewed by the persons responsible for writing and publishing this material. IBM may use or distribute any of the information you supply in any way it believes appropriate without incurring any obligation whatever. You may, of course, continue to use the information you supply. () C -I l> r o Z C) -I I Vi r Z nl Please note: Requests for copies of publications and for assistance in utilizing your IBM system should be directed to your IBM representative or to the IBM sales office serving your locality. Fold Fold ................................................................................... ................. .... . . . . . ........... :. FIRST CLASS PERMIT NO. 1359 WHITE PLAINS. N Y. BUSINESS REPLY MAIL NO POSTAGE STAMP NECESSARY IF MAILED IN THE UNITED STATES POSTAGE WILL BE PAID BY ... I BM Corporation 1133 Westchester Avenue White Plains, N.Y. 10604 Attent ion: Department 813 BP .............................................................................................................................................................. Fold IBM International Business Mlchines Corporlllion Dllla Processing Division 1133 Westchester Aver"•• White PI.nl, N. V. 10604 IBM World Tr_ Ameri,c./Far E.n Corporation Town of Mount PIe...,,~ Rout. 9, North Tlrrytown, N. V., U.S.A. 10591 IBM World Trade EuropelMiddleE.n/Africe Corporation 360 .... milton Aven"•• White Pleinl, N. V., U.S.A. 10601 FOld
Source Exif Data:
File Type : PDF File Type Extension : pdf MIME Type : application/pdf PDF Version : 1.3 Linearized : No XMP Toolkit : Adobe XMP Core 4.2.1-c043 52.372728, 2009/01/18-15:56:37 Create Date : 2012:06:06 11:11:49-08:00 Modify Date : 2012:06:06 11:35:53-07:00 Metadata Date : 2012:06:06 11:35:53-07:00 Producer : Adobe Acrobat 9.51 Paper Capture Plug-in Format : application/pdf Document ID : uuid:8cf98d40-2a77-4aa6-8b70-90476b64cb0e Instance ID : uuid:ccd18bca-4d55-4528-a757-3cf8145eb06b Page Layout : SinglePage Page Mode : UseOutlines Page Count : 298EXIF Metadata provided by EXIF.tools