Skip to main content

Full text of "ibm :: 370 :: DOS VSE :: SY33-8553-4 DOS VSE Logical Transients and Dump Phases PLM Feb79"

See other formats


SY33-8553-4 

File No. S370/S4300:36 



DOSA^pE Logical Transients 
and Dlfmp Phases 
Systems Logic 



Program Numbers 5745SCCKR 

5745-SC-AIT 
5745-SC-DOC 



Summary of Amendments 

Edition SY33-8553-4 documents: 

• New processor support 

• New device support 

3278 Model 2A Display Console 

8809 Magnetic Tape Unit 

PBTI printers (3289 Model 4, and 3203-5) 

328U/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 tne 8809 Magnetic Tape Unit by means of new SETMOD 
command 

The logic of the Checkpoint/Restart routines is now 

included, in this publication. In the library of DOS/VS, 

the logic of these routines is documented in the 
LIOCS Volume 1 Logic manual. 



Eifth Edition (February, 1979) 

This is a major revision ot, and obsoletes, SY33-85b3— 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 antil othecvise indicated. 

Changes and additions to the text or illustrations are indicated by 
a vertical line to the left o£ the change. Changes are continually 
Bade to the information herein; before using this publication in 
coanection with the operation of IBM systems, consult the latest IBM 
System/370 Bibliography, GC20-0001, for the editions that are 
applicable and current. 

Requests foe copxes 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, D-7030 Boeblingen, Germany. IBM may use or distribute 
any of the information you supply in any iray it believes appropriate 
without incurring any obligation whatever. Xou may, of course, 
continue to use the information you supply. 

© Copyright International Business Machines Corporation 197J, ^975, 
1977, 1979 



PREFACE 



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- 

For overall system control logic 
description, this PLM is to be used with 
the following PLMs: 

• DOS^VSE Sup ervisor Loaic, SY 33- 8 5 51. 

• DOS/VSE Error Re cove ry and Recording 
Transients Logic, SY33-8552- 



• DOS/VSE Linkage Editor Logic, 
SY33-8556. 

• DOS/VSE Librar ian Logic, SY33-8557. 

Prerequisite to the effective use of the 
PLMs are the following publications: 

• MM SYs tem/37Q Principl es of Operation, 
GA22-7000,. 

• Introduction to DOS/VSE, GC33-5370- 

• DOS/VS E System Management Guide, 
GC33-537U 

• DOS/VS E Data Management Concepts 
GC24-5138. 



DOS/VSE Serviceability Aids Logic, 
SY33-8554, 



Guide to the DOS/VSE Assembler, 
GC33-4024. 



DOS/ygE Initial Program Load and Job 
Control Logic, SY 33- 8 5 55, 



Titles and abstracts of other related 
publications are listed in the IBM 
System/370 Bibliography, GC20-0001,, 



In this publication, system and component names as listed below 
should be read as indicated: 



System/component 
name 

DOS/VS 
ECPS:DOS/VS 
DOS/VS POHER/VS-E 
DOS/VS VSAM-E 



To be read as 

DOS/VSE (see Note below) 

ECPS:VSE 

VSE/POHER 

VSE/VSAM 



Note: Unless that name explicitly refers to DOS/VS Release 34 
or an earlier DOS/VS release- 



CONTENTS 



INTRODUCTION - . ., ^ . ^ ......... ^ -,..,.,,..-,...-,.;. 1 1 

Logical Transients ......................... ^ >.. 11 

Non-CfiT Transients .................. -^,. ....... 11 

CRT Transients ........................>..... 11 

Grouping of B-Transients ....................... ,- ., ,, .11 

Dump Phases. . . ......,>...*...,... ...--... ^ . . . ..11 

LOGICAL TRANSIENT SUPERVISOR CALLS ..... .. ,. ... - .. .-,.--.. 12 

ATTENTION ROUTINES ............................... 16 

TERMINATOR ROUTINES,. ............................ 31 

VARIOUS SPECIAL SERVICE PROGRAMS -.,.,..... .. ...,...--.,. .37 

Loading Print Control Buffers. .. ..... .,,.,...-- . . - . .37 

$$BSySWR ,.,,...... .,.....,..-,..,-.. .38 

$$BCCilHR -..-.....-..,....., .....--. ,38 

$$BPCLOS - Automatic Close for 3800 Printer Files. . . ,, . . . . ^38 



DISPLAY OPERATOR CONSOLE SUPPORT ,. ., 
CRT Transient Logical Interreiati 
Differences Between CRT Support a 



onship.. ...... 

nd 1052 Support 



$$BOCRTA - 
$$BOCRTB - 
$$BOCRTC - 
$$BOCRTD - 
$$BOCRTE - 
$$BOCRTF - 
$$BOCHTG - 
$$BOCRTH - 
$$BOCRTI - 
$$BOCRTK - 
$$BOCRTL - 
$$BOCRTM - 
$$BOCRTN - 
$$BOCRTO - 
$$BOCRTP - 
$$BOCfiTQ - 
$$BOCRTR - 
$$BOCRTS - 
$$BOCRTT - 
$$BOCRTU - 
$$BOCRTV - 
$$BOCRTW - 
$$BOCRTX - 
Deletion. 
$$BOCRTy - 
$$BOCfiTZ - 
$$B0CRT1 - 
$$B0CRT2 - 
$$B0CRT3 - 
$$B0CfiT4 - 
$$B0CRT5 - 
$$B0CRT6 - 



CRT Root Phase. > - * 
Hard-Copy Disk ERP. . 
Write Processor (Part 
Write Processor (Part 
CRT ERP (Part 1 of 2) 
CRT ERP (Part 2 of 2) 
Write Screen Message. 
Write Hard-Copy Record 
Write on 3284/3286/328 
Command Entry Processi 
Deletion by K-Command 
Deletion by Cursor. .- 
Screen Management Mode 
Line Number Display . 
Exit Interface. . .. . 
Deletion of Message Li 
Read Processor (Part 1 
Read Processor (Part 2 
Read Processor (Part 3 
Update Hard-Copy File 
Command £rror Message 
Warning During Non-Aut 
Verification of Operat 



1 of 2) 

2 of 2) 



7/3288 SYSLOG Printer 
ng<. ....... .. . . 



,- ,. - .40 

,. ., ., -40 

. . . .40 

. . . .48 

- . .. -.48 
,. . . .48 
. . , -49 
. . - .50 

- , . .50 
. . - .51 
. - - ,51 
. , . ,55 

- ... -55 
. .. .. .55 



...--.-..-.,,.. .55 

Specification. ..-.--..- 56 

..,...,..,,..... ,,56 



,...-,.......-... . . .56 

nes ................ . . - 57 

of 3), ............ .57 

of 3). ............... .57 

of 3),. . ......... . . . ,58 

Wrap-Around Address ...... .58 

Writer. ............. ,. .58 

omatic Deletion Mode. .-.,..- 59 
or Commands during Message 

........... ^ >>.,.- ^ ,59 



Handling of Messages Longer than Eight Lines.l .... .59 

Channel Program Analyz 

Message Redisplay (Par 

Message Redisplay 

Message Redisplay 

Message Redisplay 

Message Redisplay 

Message Redisplay 



(Par 
(Par 
(Par 
(Par 

(Par 



er. - . - 
t 1 of 6) 
of 6) 



60 
60 
60 



of 6) ..... , 61 



of 6) 



61 



of 6) ........... .61 

of 6) .... , ...... .62 



CHECKPOINT/RESTART ROUTINES. . . . ..... , ............ .63 

Checkpoint ............................ .63 

CHKPT Macro. ........................... .63 

Checkpoint Routines (see Chart 23) ............... .64 

Restart. .............................. .65 

Restart Routines (see Chart 2^).. ............ .... .65 



$$BCHKPT 
$$BCHKP2 
$$BCHKP3 
$$BCHKPD 
$$BCHKPE 
$$BCHKPF 
$$BCHKPG 
$$BCHK3G 
$$6BIISG1 
$$BRSTRr 
$$BESTR2 
$$BRHSG2 



- Tape Checkpoint Phase \l ............. . .. .. . , w67 

.69 
.70 
.71 
^71 
.12 
.72 
.73 
.73 
.73 
./74 
.75 



rape Checkpoint Phase 

Tape Checkpoint Phase 

Disk Checkpoint Phase 

Disk Checkpoint Phase 

Disk Checkpoint Phase 

Disk Checkpoint Phase 

Tape and Disk Checkpoint, Last Phase. 

Checkpoint Message Writer . . . » ,. . 

Restore Checkpointed Partition. . . . 

Tape and DASO Verification. .... . 

Restart Message Writer. . .... . <> 



EXPLANATION OF FLOWCHART SYMBOLS . . ,..,.-....... . . . . .76 

CHARTS , . .77 

APPENDIX A: ERROR MESSAGE CROSS REFERENCE ...........*.. 211 

APPENDIX B: TOTAL MESSAGE CROSS-REFERENCE LIST- «.-....... 280 

APPENDIX C: LABEL LIST- ............ . . . . . . . . . . 281 

INDEX. ...„..-.>........-...-....-.-. - . . 291 



FIGURES 



Figure 1. Layout of the Logical Transient Acea containing the 

AtteatioD Koutines ...»...««.«..«....... 16 

Figure 2. Layout o£ Connunication Areas in $$BAirN8 and $$BATTN9 . 29 

Figure 3.. Layout of Parameter Address Tables in $$BATTN8 and 

$$BATTN9 - ^ ,.----.....-. ,. . . \ ,, . ., ,- .. - .- 30 

Figure 4. Layout of Parameter Value Tables in $$BATTN8 and 

$$BATTN9 ,.-»--«.. - . , . . ^ - - . . , - - - - ^ * 30 

Figure 5, Error Code Byte in $$BATrM8 and $$BATrK9 --,,,,., 30 

Figure 6. Cancel Codes and Hessages . . » . < . ,. . < . . . . ^ . 35 

Figure T. Layout of the LFCB Macro Information Area,- -.,-,.- 37 

Figure 8.. Layout of LFCB Macro Communication Area. ....... .. ,. 38 

Figure 9». CRT Message Format * . .. . . .. -. .. - . . . .. .... . . 49 

Figure HO- Screen Control Table (SCT) Entry -....-.„.*-.. 49 

Figure ill. Hard Copy . Control Flags, .,•-...,,.....,.,.,,.- 52 

Figure 12- Hard-Copy File Format. ,-...,,,.. ^ ---,-,--.... 53 

Figure 13. Information Field Generated by CHKPT Macro ,.,..,.. 64 

Figure 14. Checkpoint Header and Save Record Format . . - . .... .68 

Figure 15- Format of Extent Information Record.. . - - . . . . . , .70 

Figure 16. Format of PFIX Information Record. ............ 70 

Figure 17, Format of 3800-Printer Information Record.. . , - - . . , 70 



CHAETS 



General Charts 



Chart 01. 

Chart 02. 

Chart 03,- 

Chairt 04,. 

Chart 05.. 

Chart 06, 

Chart 07. 

Chart 08. 

Chart 09.. 

Chart 10- 

Chart 11. 

Chart 12,. 

Chart 13. 

Chart 14.. 

Chart 15. 

Chart 16.. 

Chart 17. 

Chart 18. 

Chart 19.. 

Chart 20. 

Chart 21. 

Chart 22,. 

Chart 23., 



Overview of Supervisor Entry into Attention Transients i18 

Logical Transient Attention fioutines (Part 1 of 10) . . 19 

Logical Transient Attention fioutines (Part 2 of 10) . - 20 

Logical Transient Attention Routines (Part 3 of 10) .. - 21 

Logical Transient Attention fioutines (Part 4 of 10) . - 22 

Logical Transient Attention fioutines (Part 5 of 10) , , 23 

Logical Transient Attention fioutines (Part 6 of 10) - » 24 

Logical Transient Attention fioutines (Part 7 of 10) - » 25 

Logical Transient Attention fioutines (Part 8 of 10) - - 26 

Logical Transient Attention Routines (Part 9 of 10) . . 27 

Logical Transient Attention fioutines (Part 10 of 10)- - 28 

Terminator Routines (Part 1 of 3) - - - - , ... ^ ... 32 

Terminator Routines (Part 2 of 2) . ,, ,. .. - ,- ,. ...... 33 

Terminator Routines (Part 3 of 3) . - .- ........... 34 

LrCB Macro Processor ............ ... .- . ., 39 

CRT fioot Phases ...,.,.......-. ......... 41 

CRT Write Processor Phases ...-.-...,...-.„,.. 42 

CfiT Read Processor Phases . . . ...,.« ..a. ....... 43 

CRT Screen Management Phases (Part il of 2) - ...-.- 44 

CRT Screen Management Phases (Part 2 of 2) ........ 45 

CfiT fiedisplay Phases .....„.,.«„..,.... 46 

CfiT EfiP Phases . .... . .. . , . .. . - . ... .^ ..... 47 

Checkpoint/Restart Routines ................ 66 



Detailed Charts 



Chart AA.. $$BATTNA - Attention Root Phase ,. » . ^ . .......... ,77 

Chart AB- $$BATTNA - Control Routine -.,-.,....,,...«. 78 

Chart AC. $$BATTNA - Error Message Routines . ......-.-.- 79 

Chart AD. $$BATTNA - General Scan Routines ..,..,,>....... 80 

Chart AE. $$BATTNB - MSG Command Processor ,..,..--,...,- 81 

Chart AF. $$BATTNB - Set Operator Communications and 

Exit Linkage ....-,.......-......-<...,.., 82 

Chart AG., $$BATTNC - CANCEL Command Processor (Part 1 of 2) ..... 83 

Chart AH. $$BATTNC - CANCEL Command Processor (Part 2 of 2) 

and NEW VOL Command Processor ,........*.....-,. 84 

Chart AJ. $$BATTNC - PAUSE, LOG, NOLOG, and IGNORE Command 

Processor ......,.-....-.....,.,.»..,. ^ 85 

Chart AK- $$BATTND - MAP Command Processor (/370-Mode) . - . - - . 86 

Chart AL.. $$BATTNI - MAP Command Processor (ECPS: VSE-Mode) . ^ . . 87 

Chart AM. $$BATTNE - ALLOC/ALLOCfi Command Processor (Part 1 of 2) . 88 

Chart AN. $$BATTNE - ALLOC/ALLOCfi Command Processor (Part 2 of 2) - 89 

Chart AP. $$BATTNE - SIZE Command Processor (Part 1 of 2) ...... - 90 

Chart AQ,. $$BATTNf - SIZE Command Processor (Part 2 of 2) ..... 91 

Chart AR, $$BATTNG - BATCH and STABT Command Processor 

(Part 1 of 2) . . - . ,. ,. .. . ...-,.,..,... ^ , - 92 

Chart AS. $$BATTNG - BATCH and START Command Processor 

(Part 2 of 2) . .....'.,...-.,.. 93 

Chart AT- $$BATTNH - Command Scanner ,..........,.». ^ , 94 

Chart AO. $$BATTNO - VOLUME Command Processor ,.,,.-.....,. 95 

Chart AV.. $$BATTNQ - MODE Command Parameter Processor .,....-,.. 96 

Chart AW.. $$BATTNR - MODE Command Status Report Processor - . . ,. . 97 

Chart AX. $$BATTNS - MODE Command Validity Checker (Part 1 of 2),. . 98 

Chart AY. $$BATTNS - MODE Command Validity Checker (Part 2 of 2) . . 99 

Chart BA,. $$BATTNT - ALTER Command Processor (Part 1 of 2)- - ,- ,. .100 

Chart BB« $$BATTNT - ALTER Command Processor (Part 2 of 2), ... -101 

Chart BC„ $$BATTNa - DSPLY Command Processor (Part 1 of 2) 102 

Chart BD. $$BATTNO - DSPLY Command Processor (Part 2 of 2) « - . .. .103 

Chart BE. $$BATTNV - DUMP Command Scan Routine (Part 1 of 4) • ., . ,.104 



Chart BF,. 
Chart BG- 
Chart BH, 
Chart BJ- 
Chart BK.. 

Chart BL. 

Chart BM. 

Chart BN,, 

Chart BP.- 

Chart CA. 

Chart CB. 

Chart CC. 

Chart CD. 

Chart CE. 

Chart CF. 
Chart CG, 
Chart CH- 
Chart CJ,, 
Chart CK- 
Chart CL- 
Chart CM. 
Chart CN. 
Chart CP. 
Chart CQ« 
Chart CE- 
Chart CS- 
Chart CT- 
Chart CO., 
Chart CV. 
Chart DA- 

Chart DB- 

Chart DC. 

Chart DD. 
Chart DE,. 
Chart DF.. 
Chart DG.. 
Chart DH.. 
Chart DJ.. 
Chart DK, 
Chart DL 
Chart DM 
Chart DN 
Chart EA 
Chart EB 
Chart EC 
Chart ED 
Chart EF 
Chart EG 
Chart EH 
Chart EJ 
Chart EK 
Chart EL 
Chart EM 
Chart EN 
Chart EP 
Chart EQ 
Chart EB 
Chart ES 
Chart ET 
Chart EU 
Chart EV 
Chart EW 



$$BATTNV - DUMP Command Scan Routine (Part 2 of H) 
$$BATTNV - DUMP Command Scan fioutine (Part 3 of 4) 
SSBATTNV - DUMP Command Scan Routine (Part H of 4) 
$$BATTNY - CE MODE Command Processor .,.,... 
$$BATTNZ - 115/12^/135/138 or 4300 MODE 
Command Processor ...-. 



105 
106 
107 

108 



(Part 
(Part 
(Part 

of 2) 
of 2) 



1 (Part 1 of 2) ,. 

1 (Part 2 of 2) - 

2 ...-..- - 



$$BATTN2 - PRTY and TPBAL Command Processor 
$$BATTN2 - PRTY and TPBAL Command Processor 
$$BATTN2 - PRTY and TPBAL Command Processor 
$$BATTN3 - ENDSD Command Processor ..... 
$$BATTN8 - LFCB Command Processor 1 (Part 1 
$$BATTN8 - LFCB Command Processor 1 (Part 2 
$$BATTF1 - LFCB 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) . 

$$BATTF5 - FCB Load Execution for PRTl - . ... 

$$BATTN9 - LUCB Command Processor 

$$BATTN9 - LOCB Command Processor 

$$BATTU1 - LUCB Command Processor 

$$BATTU2 - UCB Load Function . . 

$$BATTN7 - SETDF Root Phase (Part 

$$BATTN7 - SETDF Root Phase (Part 

$$BATTN7 - SETDF Root Phase (Part 

$$BATTN7 - SETDF Root Phase (Part 

$$BATTN7 - SETDF Root Phase (Part 

$$BATTN7 - SETDF Root Phase (Part 

$$BATTS1 - SETDF Update Phase (Part 1 of 3) . . ,. 

$$BATTS1 - SETDF Update Phase (Part 2 of 3) , . - 

$$BATTS1 - SETDF Update Phase (Part 3 of 3) , .. . 

$$BATTS2 - SETDF Error Phase - . . . . . - - J . 

$$BEOJ - Terminate Task and Initialize Partition 
(Part 1 of 3) - . - * .. .- ..,.-...-...- 
$$B£OJ - Terminate Task and Initialize Partition 
(Part 2 of 3) ... ,. ..,...,...,..., ,. . 
$$BEOJ - Terminate Task and Initialize Partition 
(Part 3 of 3) ,.-...... . . . . ;^ . . , . .. . 

$$BE0J3 - Decide Next Step in Termination Handling 
$$BE0J3A - Quiesce I/O for T/P Devices ..... . 

$$BE0J4 - Clean up Non-TP I/O Devices (Part 1 of 3) 
$$BE0J4 - Clean up Non-TP I/O Devices (Part 2 
$$BE0J4 - Clean up Non-TP I/O Devices (Part 3 
$$BACLOS - VSAM Automatic Close (Part 1 of 2) - . - 
$$BACLOS - VSAM Automatic Close (Part 2 of 2) .. . . 

$$BE0J7 - Tape and Disk PUB2 Processor (£>art 1 of 3) 
$$BE0J7 - Tape and Disk Pu62 Processor (Part 2 of 3) 
$$BE0J7 - Tape and Disk PUB2 Processor (Part 3 of 3) 



of 3) 
of 3) 



109 
110 
111 
of 3) 112 
. . .113 
, . .114 
. . .115 
. . .116 



of 6) , 

of 6) . 

of 6) - 

of 6) - 

of 6) «. 

of 6) - 



of 3) 
of 3) 



IJBSDUMP - Dump Monitor 
IJBSDUMP - Dump Monitor 
IJBSDUMP - Dump Monitor 
IJBSDUMP - Dump Monitor 
IJBSDUMP - Dump Monitor 
IJBSDUMP - Dump Monitor 
IJBSDUMP - Dump Monitor 
IJBSDUMP - Dump Monitor 
IJBSDUMP - Dump Monitor 
Dump Monitor 
Dump Monitor 
Dump Monitor 
Dump Monitor 



IJBSDUMP 
IJBSDUMP 
IJBSDUMP 
IJBSDUMP 
IJBDMPPA 
IJBDMPPA 
IJBDMPAR 
IJBDMPAR 
IJBDMPAR 
IJBDMPAR 
IJBDMPAR 



Part 
Part 
Part 
Part 
Part 
Part 
Part 



of 
of 



13) 
13) 



of 13) 

of 13) 

of 13) 

of 13) 

of 



13) .......... 

Part 8 of 13) .....,--. 
Part 9of 13) ...... ^ .. ,. 

Part 10 of 13) ,.....-.- . 

Part 11 of 13) ^ ...,..* . 

Part 12 of 13) . . .. . ,. . ., . . 

Part 13 of 13) .....,-. . 
Dump Supervisor Control Blocks (Part 1 of 2) - 
Dump Supervisor Control Blocks (Part 1 of 2) „ 
Storage Dump Routine (Part 1 of 5) 
Storage Dump Routine (Part 
Storage Dump Routine (Part 
Storage Dump Routine (Part 
Storage Dump Routine (Part 



2 


of 5) 


3 


of 5) 


4 


of 5) 


5 


of 5) 



117 

118 
119 

,120 
121 
122 
123 
124 
125 
126 
127 
128 
129 
130 
131 
132 
133 

134 

135 

136 
137 

138 
139 
140 
141 
142 
143 
144 
145 
146 
147 
148 
149 
150 
151 
152 
153 
154 
155 
156 
157 
158 
159 
160 
161 
162 
163 
164 
165 
166 



Chart FA.. 
Chart fB.. 
Chart FC- 
Chart FF, 
Chart FG. 
Chart Ffl. 
Chart FJ. 
Chart FK. 
Chart FP. 
Chart FQ, 
Chart Ffi. 
Chart GG. 

Chart GJ- 
Chart GK, 
Chart GL, 
Chart GM. 
Chart GN,. 
Chart KA. 
Chart KB, 
Chart KC, 
Chart KD- 
Chart KE, 
Chart KF- 
Chart KG. 
Chart KH.. 
Chart KJ, 
Chart KK. 
Chart LA, 
Chart LB.. 
Chart LC, 
Chart LD, 
Chart LE. 
Chart LF. 
Chart LG- 
Chart LH. 
Chart LJ. 
Chart LK, 
Chart MA. 
Chart MB. 
Chart MC. 
Chart MD. 
Chart ME. 
Chart MF. 
I Chart MG. 
Chart MH, 
Chart MJ, 
Chart MK. 
Chart ML. 
Chart MM. 
Chart MN. 
Chart MP 
Chart NA: 
Chart NB. 
Chart NC 
Chart ND, 
Chart NE. 
Chart NF= 
Chart NG. 
Chart NH. 
Chart NJ 
Chart NK, 
Chart PA 
Chart PB 
Chart PC 
Chart PD 
Chart PE 
Chart PF 



IJBDMPIO 

IJBDMPI6 

UBDMPIO 

IJBDMPIC 

IJBDMPIC 

IJBDMPIC 

IJBDMPIC 

IJBDMPIC 

IJBEOJ - 

IJBEOJ - 

IJBEOJ - 

$$BSYSWS 

Move LaJDe 

$$BCCHHii 

$$BATTFO 

$$BATTF2 

$$BATTF2 

$$BATTF3 

$$BOCiiTA 

$$BOCBTA 

$$BOCfiTA 

$$BOCi(TB 

$$BOCfiTB 

$$BOCitTB 

$$BOCiiTC 

$$BOCBTC 

$$BOC£TC 

$$BOCfiTC 

$$BOCETD 

SSBOCSTD 

$$BOCBTD 

$$BOC&TE 

$$BOCfiTE 

$$BOCBTE 

$$BOCBTF 

$$BOCSTF 

$$BOCBTF 

$$BOCBTF 

SSBOCBTG 

$$BOCBTG 

$$BOCBTG 

$$BOCfiTH 

$$BOCaTH 

$$BOCBTH 

$$BOCfiTI 

$$BOCSTK 

$$BOCBTK 

$$BOCETK 

$$BOCRTK 

$$BOCfiTL 

$$BOCRTL 

$$BOCBTL 

$$BOCBTM 

$$BOCiiTN 

$$BOCaTN 

$$flOCfiTN 

$$BOCETO 

$$BOCaTO 

$$BOCfiTP 

SSBOCRTP 

$$BOCRTQ 

$$BOCBTQ 

$$BOCRTR 

$$BOCRTE 

$$BOCfiTfi 

$$BOCRTS 

$$BOCRTS 

$$BOCRTS 



Of 
Of 
of 
of 
of 
of 



- System Dump I/O fioutine (Part tl of 3) 

- System Dump I/O fioutine (Part 2 of 3) 

- System Dump I/O fioutine (Part 3 of 3) 

- DUMP Command I/O itoutine (Part 1 of 5) 

- DUMP Command I/O Routine (Part 2 of 5) 

- DUMP command i/0 iioatine (Part 3 of 5) 

- DUMP Command I/O Routine (Part 4 of 5) 

- DUMP Command i/0 koutine (Part 5 of 5) 
Cancel Message Writer (Part 1 of 3) 
Cancel Message Writer (Part 2 of 3) 
Cancel Message Writer (Part 3 of 3) 

- Set up a Write on SYSfeES Operation; 
1 Cylinder Address to COMREG ..... 

- Core Image Directory Scan .... 

- FCB Load Initiation ,. . . .. . ,. .. 

- LFCB Macro Execution for PET1 ^ . 

- LFCB Macro Execution Subroutines - 

- LFCB Macro Execution for 3203 and 520 

- CiiT Boot Phase (Part 1 of 3) . . - 

- CRT Root Phase (Part 2 of 3) , . . 

- CRT Root Phase (Part 3 of 3) - . - 

- Hard-Copy Disk EBP (Part 1 of 3) .. 

- Hard-Copy Disk ERP (Part 2 of 3) .. 

- Hard-Copy Disk EBP (Part 3 of 3) , 

- Write Processor part 1 (Part 1 of 4 

- Write Processor Part 1 (Part 

- Write Processor Part 1 (Part 

- Write Processor Part 1 (Part 

- Write Processor Part 2 (Part 

- Write Processor part 2 (Part 

- Write Processor Part 2 (Part 

- CRT EBP Part 1 (Part 1 of 3) 
(Part 2 of 3) 
(Part 3 of 3) 
(Part 1 of i\) 
(Part 2 of 4) 
(Part 3 of 4) 
(Part 4 of 4) 

- Write Screen Message (Part 1 of 3) 

- Write Screen Message (Part 2 of 3) 

- Write Screen Message (Part 3 of 3) 

- Write Hard-Copy fiecords (Part 1 of 3) 

- Write Hard-Copy Records (Part 2 of 3) 

- Write Hard-Copy Records (Part 3 of 3) 

- Write on 3284/3286/3287/3288 Console Pri 

- Command Entry Processor (Part 1 of 4) 

- Coiumand Entry Processor (Part 2 of 4) 

- Command Entry Processor (Part 3 of 4) 

- Command Entry Processor (Part 4 of 4) 

- Deletion by K-Command (Part 1 of 3) 

- Deletion iiy K-Command (Part 2 of 3) 

- Deletion by K-Command (Part 3 of 3) 

- Deletion by Cursor >.....«. . . . 

- Screen Management Mode (Part 1 of 3) 

- Screen Management Mode (Part 2 of 3) 

- Screen Management Mode (Part 3 of 3) 

- Line Number Display (Part 1 of 2) 

- Line Number Display (Part 2 of 2) 

- Exit Interphase (Part 1 of 2) ,- . .. 

- Exit Interphase (Part 2 of 2) .. . - 

- Deletion of Message Lines (Part 1 of 2) 

- Deletion of Message Lines (Part 2 of 2) 

- Bead Processor Part 1 (Part 1 of 3) 

- Read Processor Part 1 

- Bead Processor Part 1 

- Bead Processor Part 2 

- Bead Processor Part 2 

- Bead Processor Part 2 



CBT EBP Part 1 
CfiT EBP Part 1 
CBT ERP Part 
CfiT EBP Part 
CBT EBP Part 
CBT EBP Part 



ntej 



-167 
,- 1 68 
.169 
-170 
-171 
-172 
-173 
-174 
,175 
.176 
.177 



(Pari 2 of 3) 

(Part 3 of 3) 

(Part 1 of 3) 

(Part 2 of 3) 

(Part 3 of 3) 



,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 
-z11 
-212 
-213 
.214 
.215 
,216 
,217 
-218 
-219 
.220 
.221 
.222 
-223 
,224 
.,225 
-226 
-227 
-228 
.229 
-230 
-231 
.232 
-233 



Chart PG- 
Chart PH- 
Chart PJ- 
Chart PK., 
Chart QA. 
Chart QB. 
Chart QC- 
Chart QD- 
Chart QE, 
Chart QF. 
Chart QG,. 
Chart QH. 
Chart QJ- 
Chart QK. 
Chart QL,, 
Chart QM. 
Chart £A.- 
Chart RB- 
Chart EC. 
Chart ED. 
Chart EE- 
Chart EF- 
Chart EG, 
Chart EH. 
Chart EJ. 
CHart EK. 
Chart EL.. 
Chart EM. 
Chart SA. 
Chart SB- 
Chart SC. 
Chart SD. 
Chart SE,. 
Chart SF. 
Chart SG. 
Chart SH- 

Chart SJ. 
Chart SK. 
Chart SL* 
Chart SM- 
Chart SN, 

Chart SP, 

Chart SU- 



$$BOCfiTT 

$$BOCETT 

$$B0CRTIJ 

$$BOCETV 

$$BOCRTW 

$$BOCETX 

$$BOCfiTX 

$$BOCfiTY 

$$BOCETy 

$$BOCfiTy 

$$B0CfiT2 

$$BOCETZ 

$$BOCETZ 

$$BOCfiTZ 

$$BOCETZ 

$$BOCETZ 

$$BOCfiTl 

$$B0CET1 

$$B0CET2 

$$B0CET2 

$$B0CRT3 

$$B0CET3 

$$B0CET3 

$$B0CET4 

$$B0CET5 

$$B0CfiT5 

$$B0CfiT6 

$$B0CfiT6 

$$BCHKPT 

$$BCHKP2 

$$BCHKP3 

$$BCHKPD 

$$BCHKPiS 

$$BCHKPF 

$$BCflKPG 

$$BCHKPG 

on Disk . 

$$BRMSGr 

$$BCHK3G 

$$BESTET 

$$BfiSTRT 

$$BRSTR2 

Routine ( 

$$BRSTE2 

Eoutine ( 

$$BEMSG2 



Read Processor Part 3 (Part 1 of 2) 
Read Processor Part 3 (Part 2 of 2) 
Update Urap-Around Address ,.««>•. 
COMMAND Error Message Writer <.,..,. ,. 
Display Warning Message . ^ . . ,. ^ . 
Verify Operator Cojnmands (Part 1 of 2) 
Verify Operator Commands (Part 2 of 2) 
Handle Long Messages (Part 1 of 3) . . 
Handle Long Messages (Part 2 of 3) .. - 
Handle Long Messages (Part 3 of 3) - - 



Part 
Part 
Part 
Part 
Part 
Part 
Part 
Part 
Part 
Part 
Part 
Part 
Part 



of 

of 



6) 
6) 

of 6) 

of 

of 



- Channel Program Analyzer 

- Channel Program Analyzer 

- Channel Program Analyzer 

- Channel Program Analyzer 

- Cuannel Program Analyzer 

- Channel Program Analyzer 

- Message Redisplay Part 1 

- Message Redisplay Part 

- Message Redisplay Part 

- Message Redisplay Part 

- Message Redisplay Part 

- Message Redisplay Part 

- Message Redisplay Part 

- Message Redisplay Part 

- Message Redisplay Part 

- Message Eedisplay Part 

- Message Redisplay Part 

- Message Eedisplay Part 

- Test Checkpoint Conditions *-,..-.. 

- Build and Write Checkpoint Eecords ,. - . 

- Build and Write 3800 Checkpoint Eecords- 

- Test Checkpoint Conditions .*,... ... 

- Complete Test and Write Checkpoint Header 

- Write Checkpoint Eecords , ,. - , ..... 

- Write 3800 Printer Information Eecords . 

- I/O Subroutines for Writing Checkpoint Eecor 



6) 
6) 
of 6) 
of 2) 
of 2) 
of 2) 
of 2) 
of 3) 
of 3) 
of 3) 



Part 1 of 2) 

Part 2 of 2) 

1 of 2) 

2 of 



Part 

Part 



2) 



- Cheokpoint Message 'Routine .. *. ..... .. 

- Checkpoint Erase-Gap Routine ....... 

- Restore Problem Program (Part 1 of 2) . . 

- Restore Problem Program (Part 2 of 2) . - 

- Tape Repositioning and DASD Verification 
Part 1 of 2) . , ........ . .. . . . - . 

- Tape Repositioning and DASD Verification 
Part 2 of 2) . . . . . , ,- , ,. ,. .. . . . . 

- Restart Message Routine,. ..... ...... 



.234 
-235 
.236 
.237 
.238 
.239 
-240 
.241 
.242 
-243 
-244 
-245 
.246 
.247 
-248 
.249 
.250 
.251 
.252 
-253 
.254 
.255 
.256 
,257 
.258 
-259 
,260 
,261 
.262 
.263 
-26a 
.265 
,266 
.267 
.268 
ds 
.269 
-270 
-271 
-272 
-273 



- .274 



275 
276 



10 



INTEODUCTION 



This manual describes (a) the logical 
transient programs and (b) the dump phases 
that are executed in the SVA.. 



LOGICAL TRANSIENTS 



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 Logical Transient Area (LTA) , when 
required,- The CBT transients, $$BOCBTn, are 
an exception- They are required for 
display operator console support and are 
loaded into the CBT Transient Area 
(CRTTRNS) when required by the CBT system 
task- 



NON-CBT TEANSIENTS 



An SVC 2 instruction loads a B-transient 
phase into the LTA (1/792 bytes) and 
executes it. A prefix of $$B to the name of 
a phase identifies it as a B-transient. The 
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 fetched. 

Register 1 is loaded with the address of 
the transient phase name before the SVC 2 
is issued- The fetch or load routine, then, 
has access to the name for searching the 
directories for the desired transient- 
Refer to section 'Logical Transient 
Supervisor Calls' for a more detailed 
explanation- 



CRT TRANSIENTS 



CRT transient routines provide support for 
the display operator consoles- They reside 



in the core image library and are fetched 
into the CBT Transient Area by an SVC 48a 
This happens each time the supervisor 
encounters a request for a display console- 
Since these requests may be for different 
services, the support is provided by 30 
different transient phases.- Each CBT phase 
name begins with the characters $$BOCfiT. 
Each phase fits in the CRT Transient Area 
which is 1156 bytes long. 



GfiOOPING OF B-TBANSIENTS 



A number of B-transients are not described 
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 

Terminator routines (see also Dum p 
Phased, below) 



Various special service programs 
Display operator console support 
Checicpoint/Bestart routines 



DUMP PHASES 



The terminator routines consist of two 
groups: B-transients, which are executed in 
the LTA, and the dump phases ($IJBDUflP) , 
which are executed in the SVA,- The LTA is 
not used or locked during execution of a 
system dump or a PDUHP macro; it is locked, 
however, durxng execution of the DUMP 
command- When 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 tne error in the failing task. 



Logical Transient Supervisor Calls 11 



LOGICAL TEAMSIENT SUPERVISOfi CALLS 



SVC is detected by microprogramming, vtlcb. 
loads the SVC new PSW from real storage 
location 96- Certain SVCs are involved in 
processing B-transient operations- This 
section describes those supervisor calls 
which are directly used in logical 
transients. The Supervisor Logic PLM listed 
in the Preface contains a list of all SVCs 
used in the system, 

SVC 0: Execute the channel program (EXCP) , 
The address of the user's command control 
block (CCB/IORB) must be supplied in 
general register 1 before this SVC is 
issued. If POWER/VS is active and the I/O 
operation for the device needs to be 
emulated, control is given to the SVC 
appendage in the POWER/VS nucleus code. 



SVC 2: Fetches a B-t 
B-transient program 
equals $$6) from the 
library or a private 
the; B-transient area 
to the fi-transient a 
8 bytes. The directo 
may be found in stor 
image library direct 
core image library d 
assigned) . 



ransient. Loads a 
(phase name prefix 
system core image 
core image library to 
and control is passed 
t its load address plus 
ry entry for the pnase 
age, in the system core 
ory, or in the private 
irectory (if a PCIL is 



The storage address of the B.-transient 
phase najne,.' or the" address of a parameter 
list must iae supplied in general register 1 
before this SVC is issued. 

An address in general register is 
ignored. The B-transient is loaded at tne 
beginning address of the B-transient area. 
General register 15 is loaded with this 
address and may be used by B-transients as 
a base register. Return may oe either to 
the interrupted program or to the nighest 
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 an SVC 2. Another 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 for 
one of these routines, the terminator in 
the supervisor is entered and the 
SVA-resident dump routine $IJBDUMP is 
initialized. 



SVC 3: Provides an interface between the 
supervisor and $iBE0J4. SVC 3 waits for 
termination of I/O requests that belong to 
the partition or task which is being 
canceled or has reached end-of-job. 

SVC 4: Loads a phase from the system core 
image library or a private core image 
library (PCIL) and returns to task 
selection. The directory entry for the 
phase may be found in storage, in the 
system core image library directory, or in 
the private core image library directory 
(if a PCIL is supported and assigned),, A 
directory entry found in the SDL is not 
loaded if it is active and its phase itself 
is SVA-resident. 

The storage address of the phase name or 
the address of a parameter list must be 
supplied in general register 1 before tnis 
SVC is issued,, Tne user may override the 
link-edited load aadress iay supplying a 
load address in general register 0- Upon 
return to the user, general register 1 
contains the phase entry address adjusted 
for any changes in the phase's load 
address, and general register points to 
the active incore directory entry if one 
was supplied, or found by a local or system 
directory list search. 

SVC 6: Cancels a program (task) or 
partition. This is usually achieved by the 
requesting program, task, or subtask 
issuing a CANCEL or CANCEL ALL macro- 

If a subtask issues CANCEL, only that 
subtask is terminated. If a maintask issues 
CANCEL, or a subtask issues CANCEL ALL, 
then the entire partition is canceled, the 
maintask being always the last to be 
terminated. 

CANCEL macro issued by maintask without 
subtasks: the issuing task is terminated 
normally, 

* Cancel code X'23' is posted to the 
issuer's PIB, 

* Message • (issuer) CANCELED DUE TO 
PROGRAM HbQUEST*. 

CANCEL macro issued by subtasic: the issuing 
subtask is terminated normally. 

* Cancel code X'23' is postea to the 
issuer's PIB, 

•• Message • (issuer) CANCELED DUE TO 
PROGRAM REQUEST'. 



12 DOS/VS Logical Transients 



CANCEL macro issued by maintasJc Kith 
subtasks attacued: the maxntasJc is 
terminated normally; attached subtasKs are 
terminated abnormally,, 

• Cancel code X'lD* is posted to each 
subtasic PIB, 

• Cancel code X»17' is posted to the 
maintasJc PIB, 

• Message • (subtasJc) CANCELED DUE TO 
MAIN TASK TERMINATION'- 

• Message • (issuer) CANCELED DUE TO 
PiiOGEAM REQUEST'- 

• A dump is generated at the start of the 
termination of the maintasK if the DUMP 
option is active (DUMP=YES) .- 

CANCEL ALL macro issued by a subtasJc: the 
issuing subtask is terminated normally; 
other subtasks and the maintask are 
terminated abnormally. 

• Cancel code X'23' is posted to the 
issuing subtask PIB^ 

• Cancel code X*1C' is posted to each of 
the other subtasks PIBs and to the 
maintask PIB- 

• Message » (issuer) CANCELED DUE TO 
PiiOGfiAM 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 routines have 
been established through the STXIT (AB) 
macro, these routines are entered for all 
tasks tuat 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 that AB routine. 

SVC 7: Waits for the completioa 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 
dispatcned immediately after the SVC7 call. 

If the traffic bit or event bit has not 



been posted, the following action is taKen: 

«• If a system task was interrupted, the 
system task is deactivated,- 

• The PIB flag of the interrupted program 
is set to I/o-boiind (not ready to run) 
and its PSW is set up to reissue SVC 7. 



SVC 8: Supplies the supervisory support to 
temporarily return from a logical transient 
to the problem program. This SVC may be 
issued only from the logical transient area 
(LTA) and does not free this area- The 
entry address to the problem program must 
be specified m general register 14. The 
task selection exit loads the problem 
program registers- General registers and 
1 are passed to the problem program. 

To return to the logical transient, the 
problem program issues an SVC 9. 

SVC 9: Supplies the supervisory support to 
return to the logical transient after an 
SVC 8 has been issued. An SVC 9 may be 
issued only by the problem program. The 
task selection exit loads the logical 
transient registers- General registers 
and 1 are passed to the logical transient 
programs. 

SVC 1 1 : ieturns from a B-transient 
releasing the B-transient area, SVC 11 is 
invalid if issued by other than a 
B-transient, The logical transient area is 
released for use by other programs or 
tasks.. Return is to the highest priority 
program ready to run. 

SVC ill is also used to return from the 
SVA-resident terminator routine (SIJBDUMP) 
to the supervisor. The terminator routine 
in the supervisor will release the 
SVA-resident terminator routine.- 

SVC 14; This is the normal end of job 
(EOJ) , Cancel code X'10' is posted to the 
PIB for the program issuing the SVC 14, The 
next time the canceled program is selected 
on general exit, a branch is made to the 
terminator routines. 

SVC 22: Seizes the system and provides a 
release from such a seizure in a 
multiprogramming system. This SVC may be 
issued only by joo control and logical 
transient programs- The PSW protection 
field must be zero, otherwise the issuing 
program is canceled^ 

The first SVC 22 issued seizes the system. 
Until the next SVC 22 is issued, 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 Transient Supervisor Calls 13 



If the low-order byte of general register 
is zero, the system masJc is set to disable 
all interruptions; if non-zero, the system 
mask is set to enable all interruptions.. 

If general register is negative, the user 
protection icey is set in tiie user's PSIS* 

SVC 23; Retrieves the load address for a 
specified phase from the directory entry 
for the phase. The program issuing an SVC 
23 is canceled if the PSH protection key 
does not equal 0- (Only job control and 
B-transient programs can issue an SVC 23^) 

The user must specify the storage address 
of the phase name in general register 1 and 
tiie address where the load address is to be 
stored in general register 0. The main 
fetch subroutine scans the System Directory 
List, the system core image library and the 
private core image library (if supported 
and assigned) for a directory entry for the 
phase. The load address is retrieved and 
stored at the address specified by general 
register 0* The high-order byte of the 
storage area is not changed. 

If the phase is relocatable tlie load 
address returned is the relocated load 
address. 

SVC 26: Validate address limits,. The 
program issuing an SVC 26 is canceled if 
the PSW protection key does not equal 0. 
(Only job control and B-transient programs 
can issue an SVC 26,) 

The upper address must be specified in 
general register 2, and the lower address 
must be specified in general register 1. 

If an SWC 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 other routine, if either address is 
outside the requestor's partition, the task 
is canceled (ERR 25).. 

S VC 36: Frees a track or block that is held 
by the task issuing the FfiEE,. An attempt 
to free a track not owned by the requestor 
results in cancelation of that task. 

Exits on a successful FREE are to task 
selection, or to the DETACH routine if the 
FREE was issued by that routine.. 



S VC 39: Performs normal ' 
subtask. DETACH may be i 
subtask being terminated 
task. If DETACH is issue 
program, the cancel code 
end-of-job) is set in th 
the terminator is entere 
the termination process, 
by an EOJ transient rout 



termination of a 
ssued by either the 

or by the main 
d by a problem 

XMO" (normal 
e subtask PIfi and 
d« At the end of 

DETACH is issued 
ine, setting the 



subtask 's PIB inactive (byte = X'80'), 
and posting its ECB for termination. 

SVC 48; 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 IPL time to 
activate the CRT hooks in the supervisor 
and to load the CiiT root phase $$BOCRTA 
into the CRT transient area (CRTTENS) . 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^ 
dispatcher- 

SVC 54; This supervisor call is only valid 
in 370-mode- In ECPS: VSE-mode the same 
function is provided by PFREE, 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. 



Hhen the r 
terminator 
real parti 
upper addr 
address in 
upper bein 
the area) 
to the SVC 
and 3. 



eguest is issued by the 

(the page frames belonging to a 
tion are freed) , the lower and 
esses (lower address being any 

the first page of the area, 
g any address in the last page of 
of tne real partition are passed 

54 routine in the registers 2 



A zero value in register 2 indicates that 
the request is issued by SDAID. In this 
case the lower and upper limit of the area 
to be released are .obtained from the 
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, by updating the corresponding Page 
Frame Table entries (PFTE) . The PFIX 
counter is reset and the partition PFIX 
counter in the Storage flanagement Control 
Block (SHCB) is decreased by one,. 

In the PFTE the page frame is indicated as 
unused. The address bits of tne PFTE are 
cleared, the storage key of the page frame 
is stored in bits 8-fll, 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 by the terminator, the 
number of active virtual partitions (entry 
in SYSCON) is increased by one, and the 
translation mode bit in PIBDATFL is set. 



14 DOS/VS Logical Transients 



If SVC 54 is issued by SDAID, the counter 
in the SNCfi (which shows the number o£ page 
frames 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 
are in the wait state, and if more than the 
minimum number of page frames is available 
in the page selection queue (PSQ) . 

SVC 59: 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 PSH is not 0. 

The following parameters are passed to this 
routine: 

R3: Address located in tne first page of 
the area to be invalidated 

E4: Address located in the last page of the 
area to be invalidated.- 

37Q-mo de o nl y: If the area to be 
invalidated belongs to the active part of 
the partition (virtual partition: the TfiAM 
bit is set; real partiton: the TEAM bit is 
reset) , the corresponding page table 
entries (PTE) are set to X»00STK4«, 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* 80STK0' , where STK has the same meaning 
^aS above,. Each PTE within the area defined 



by E3 and B4 is initialized 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: 



The piage frame is marked as unused 
4 in S370FLG is set) and the PFIX 
counter is set to zero. 



(bxt 



• The page frame is removed from the page 
selection queue and enqueued at the top 
of the invalid page frame queue. 

• If a page is found to be 1 LXed, the 
system enters the hard wait state 
(debug mode only) - 

The key of the storage block in this page 
frame is set to zero- 

ECPS: VS E-fflode onix: Each page within the 
area defined dj R3 and E4 is invalidated as 
follows: 

• 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 iS addressable, the 
corresponding page frame table entry is 
removed from the page selection queue, 
and the page is disconnected by 
resetting the reference, change, and 
PDS bit>. 



Logical Transient Supervisor Calls 15 



ATTENTION fiOOTINES 



This group of B-transients consists of 
phases vhose names start with $$fiATI« 

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 $$ABERfiZ is fetched 
into the Physical Transient Area- 

On a display console, the operator may 
enter attention commands without pressing 
the request key first (see below).. 

If the operator pressed the request key 
twice in quick succession because he wants 
an emergency cancel, $$ABE£fiZ processes the 
interrupt and the logical attention 
transients are not activated. 




I 



Control Section i JBATB40 

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 this area is 
not yet overlaid by another phase. 

$$BATTNA — 



.J 



Logical Transient Area 



ROOT 
SEGMENT 



OVERLAY 
AREA 



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 is returned to the supervisor, 
unless attention is pending. 

To service the attention request, $$BATTNA 
reads input statement information and loads 
$$BATTNfl, which ^selects the appropriate 
command processor. 

On a display • console, the operator may 
enter attention commands without pressing 
the request key first- $$BATTNA moves the 
command from the attention buffer in the 
CRT save area CBTSAV to the I/O buffer in 
$$iiATTNA- It then loads $$BATTNH which 
selects tne 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- 



Figure 1- Layout of the Logical Transient 
Area containing the Attention 
Routines 

Commands accepted by the attention routines 
are: 

• ALLOC: Permits the operator to allocate 
the virtual address area among 
foreground and background programs 

($$BATTNE) . 

• ALLOCR: Permits the operator to 
allocate the r eal address area among 
foreground and background programs 
($$BATTNE) . 

• ALTER: Periaits 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 of the 
specif iea 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) , 



16 DOS/VS Logical Transients 



ENDSD: Terminates SDAXD routines 
($$BATTN3).. 

IGNORE: Used to ignore control 
statements that contain errors.. Causes 
control to be returned immediately to 
$$BATTNA to read next command 
(SSBATTNC) - 

LFCB: Permits the operator to change 
the contents of the FCB (forms control 
buffer) of a printer ($$BATTN8, F\, F4, 
F5) , 

LOG: Permits logging of job control 
statements for all partitions on 
SYSLOG^ The appropriate switch is set 
in each partition communications region 
($$BATTNC) i 

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 
utilization ($$BATTND, $$BATT1II) . An 
example is given in DQS/ V SE S yst em 
CoEirol Statements.. 

MODE: Provides control over the 
recording mode for recoverable machine 
checks and allows setting various £MSR 
options for recording of device errors 
(SSBATTNQ, R, S, Y, Z) . 

MSG: Causes control to be given to a 
foreground program operator 
communications routine previously 
activated by a STXIT macro ($$BATTNB) . 

NEHVOL: Reactivates job control in the 
specified partition, which was waiting 
for a volume to be mounted ($$bATTNC) , 



NOLOG: Suppresses logging of job 
control statements on SYSLOG, The 
appropriate 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 
specified partition ($$BATTNC)„ 

PRTY: Allows the operator to display or 
change the priorities of the partitions 
in the system, which were set when the 
system was generated ($$BATTH2) . 

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 
t$$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 whether or not the 
volumes are in use ($$BATTNO) . 



Attention Routines 17 



Chart 01- Overview of Supervisor Entry into Attention Transients 



(Allowable \ 
Supervisor I 
Interrupt y 



External Interrupt- 
I/O Interrupt— 



Supervisor Call 1 

Program Check 1 

Ij^achine Check 1 








^ 



YES 



See Supervisor 

Logic PLM, listed 

in the Preface 



9 




6 



(See Chapter ^i 
Display Operator j 
Console Support / 




YES 



$$ABERRZ 

See Supervisor Logic PLM 



The message 'REQUEST 
CANCEL' is issued and 
according to the operator' 
reply the appropriate 
partition is canceled 



/^rancivtoAREXlA 
V in Supervisor^ 




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 



When the Atterrtion task is 
selected, this Physical Attention 
phase is fetched in the Physical 
Transient Area. 
Assume that no intervention 
is required 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 il of 10) 



03,04,06 




$$BATTNA, $$BATTNH 



Charts AA- AD, AT 



The first control section of $$BATTN A 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 
communications routine. When the routine 
is busy, the complement of the address is 
set in the option table. A bit is set in the 
PIB 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 com- 
mand to the buffer in $$BATTNA, display the com- 
mand and load $$BATTNH. 

• $$B ATTNH scans the command, loads the phase 
required to process the command and branches to the 
correct routine within the phase by means of a branch 
vector table. 

• If the command is not a valid DOS/VS command _ 
and ACF/VTAM and/or POWER/VS are active, and 
exit is taken on the ACF/VTAM and/or POWER/VS 
interface since the command could be a valid 
ACF/VTAM or POWER/VS command. 

• Exit via DTCH AT if no more commands are found or if 
an external interrupt was processed and there is no 
attention interrupt pending. 



DTCH AT -^ 



• Deactivate attention routine and exit from B-Transients.- 
CONTROL 

• 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. 



Command 


Phase Name 


Exit to Chart: 


ALLOC 


$$SATTNE 


04 


ALLOCR 


$$BATTNE 


04 


ALTER 


$$BATTNT 


06 


BATCH 


$$BATTNG 


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 


$$BATTNZ 


08 


MSG 


$$BATTNB 


03 


NEWVOL 


$$BATTNC 


03 


NO LOG 


$$BATTNC 


03 


PAUSE 


$$BATTNC 


03 


PRTY 


$$BATTN2 


04 


SETDF 


$$BATTN7 


11 


SET MOD 


$$BATTNK 


03 


SIZE 


$$BATTNF 


04 


START 


$$BATTNG 


04 


TPBAL 


$$BATTN2 


04 


VOLUME 


$$BATTNO 


04 



See DOS/VS 
ACF/VTAM or 
POWER/VS 
Logic manuals 



( SVC II j 



Attention Routines il9 



Chart 03. Logical Transient Atteiition iioutlnes (Part 2 of 10) 



$$BATTNB 



$$BATTNC 



MSG PROCESSOR 



Charts AE, AF 



This pnase 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. 



$$BATTNC 



CANCEL PROCESSOR 



Charts AG, AH 



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: 

• 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. 




$^BATTNI 



MAP PROCESSOR (ECPS:VSE mode) 



Chart A L 



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. 



PAUSE/LOG/NOLOG/IGNORE PROCESSORS 



Chart AJ 



This routine sets switches 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 

NOLOG (off) at COMREG + 56 in each partition communication region. 

• IGNORE - Return control immediately to CONTROL in $$BATTNA 
to read the next command. 



$$BATTNC 



NEW VOL 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. 



(J 

$$BATTNA 
DTCHAT 



$$BATTND 



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 program areas (EG, F1, 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 re- 
gion, 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. 



$$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 nruxle 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 ISOnD 

PUBSCAN - Scan PUB table for matching entry. 



If cuu is not found, issue message 1P40D - 
If cuu is not a 8809, issue message 1 P41 D - 



MODESCAN - If mode operand is omitted, insert default value 60 in PUB 
entry. 

- If mode is invalid, issue message 1 P42D — 

- Insert mode in PUB entry. 

- Add X'03' to mode byte to produce correct CCW op code. 

- Write message 1P43I. 

- Return 



$$BATTNA 
CONTROL 



$$BATTNA 
DTCHAT 



$$BATTNA 
CONTROL 



20 DOS/VS Logical Transients 



Chart 04. Logical Transient Attention Routines (Part 3 o£ 10) 



^ 



$$BATTNE 



pj 



ALLOCANDALLOCR PROCESSOR 



Charts AM, AN 



This phase performs the following functions: 

• Checks t he 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 in- 
dicating the reason why the allocation could not take place. 



$$BATTNF 



SIZE PROCESSOR 



Charts AP, AQ 



This phase performs the following functions: 

• 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. 



m 



$$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'B3' 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. 







^ 



$$BATTN2 



PRTY AND TPBAL PROCESSOR 



Charts BL-BN 



PRTY - Displays the present dispatching order of the partitions (no 
operand given) or changes the priority sequence of the partitions. 
The order of operands indicates the new priority sequence, in 
ascending order. 

TPBAL - 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. 



$$BATTN3 



$$BATTNA 
CONTROL 







ENDSD COMMAND PROCESSOR 



Chart BP 



This routine terminates SOAID 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 DTCH AT 
in $$BATTNA. 



S$BATTIMO 



VOLUME PROCESSOR 



Chart AU 



This routine checks the parameters 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 Ob.. Logical Transient Attention Routines (Part 4 of 10) 



$$BATTNQ 




MODE COMMAND PARAMETER PROCESSOR 



Chart AV 



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. 



• 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 1 2, respectively. 

• Maximum length of command is 27 bytes. 

When scanning of parameter is completed, $$BATTNQ loads $$BATTNS. 



$$BATTNS 



MODE COMMAND VALIDITY CHECKER 

Charts AX, AY 



This phase checks for valid combinations of 
parameters. Error messages report invalid 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: 

1. Mode changes 

2. Error count threshold 

3. Time threshold 



$$BATTNR 



MODE COMMAND STATUS REPORT 
PROCESSOR Chart AW 



This phase formulates and prints system status 
reports on SYSLOG. It gets information from 
RASTAB and the TAS Linkage Area. 
After processing the status report, it returns 
to CONTROL in $$BATTNA. 




02 



$$BATTNA 
CONTROL 



22 DOS/VS Logical Transients 



Cbart 06, Logical Transient Attention Routines (Part 5 of 10) 



$$BATTNT 




ALTER COMMAND PARAMETER PROCESSOR 



Charts BA, 88 



This phase checks the parameters of the ALTER command: 

• A valid address 

Addresses that are not 6 characters long, or do not represent 
a hexadecimal address cause message 1 141 D 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. 

• Anaddress within the supervisor area or SVA 

If the address is within the supervisor area, or in the SVA message 
1I42D 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 1I45D to be issued. 

The response to this message is either a new set of data or the END/ENTER 
key, which results in a branch to $$BATTNA. 



• When virtual storage has been successfully altered, control is returned to 
$$BATTNA. 



$$8ATTNA 
CONTROL 




02 




02 



$$BATTNU 




$$BATTNA 
DTCHAT 



DSPLY COMMAND PROCESSOR 



Charts BC.BD 



This phase checks the parameter of the DSPLY command: 

• A valid address 

An address that is not 6 characters long, or does not represent 
a hexadecimal address causes message 1 141 D to be issued. The 
same message is issued if the address points to an invalid address 
space, (see Note). 

If the reply to 1141 D 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. 



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 1 1481 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. 

When the display is complete, control is returned to $$BATTNA. 



Note: 

Invalid address space is the address 

of a location 

• 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. 




02 



$$BATTNA 
DTCHAT 




02 



$$8ATTNA 
CONTROL 



Attention Routines 23 



Chart 07- Logical Transient Attention Routines (Part 6 of 10) 



$$BATTNV 




DUMP COMMAND ANALYZER 



Charts BE - BH 



• Checks the operands of the DUMP command for validity. 
If invalid, message 1 143D 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 1 146D 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 



• If the operands are correct, phase SIJBDUMP in the SVA 
is called via an SVC2 hook in the supervisor. 



$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 
addresses. 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 preallo- 
cated file named DOSDMPF must be available for the dump 
output. Module IJBDMPIC performs the I/O operation for 
the DUMP command. 



$$BATTNA 
CONTROL 



( SVC 1 1 j 



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 



chart 08- Logical Transient Attention Routines (Part 7 of 10) 



$$BATTNZ 




115/125/135/138 or 4300 MODE 
COMMAND PROCESSOR 



Chart BK 



This phase checks the MODE 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 IR or CR, set the appropriate 

switches and return to $$BATTNA; 

Otherwise, exit to $$BATTNQ. 



If the CPU was either a Model 1 1 5, 1 25 or 4300 
and a MODE command with parameters 
other than CE, IR or CR was issued, return 
to $$BATTNA with message 'COMMAND 
IGNORED'. 



If an invalid command was issued, exit to the error 
routine in $$BATTNA. 



If the request is to set the recording mode (to 
recording or quiet), the mode is set, and an exit 
is taken to $$B ATTN A. 



If an invalid command was issued, exit 
to the error routine in $$BATTNA. — 



If the parameter is CE, exit to $$B ATTN Y, if it is I R or 
CR, set the appropriate switches and return to $$BATTN A. 
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 1 15 or 125, return to 
$$BATTNA with message 'COMMAND 
IGNORED' if the device for which the 
MODE command was issued is not 
hardware recorded 



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. 



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 $$BATTN A. 



$$BATTNQ 



$$BATTNA 
CONTROL 



Attention Routines 25 



Chart 09- Logical Transient Attention Routines (Part 8 of 10) 



$$BATTF4 



S$BATTN8 




LFCB COMMAND PROCESSOR 1 



Chart CA, CB 



This phase skans the operands of the LFCB command. 
The functions are: 

• Checic the operands for correct syntax and save infor- 
mation about the specified operands in tables 
FPRMADRTand FPRMVALT. <For layout of these 
tables, see Figures 3 and 4.) 

• If an error is found, set the appropriate error indica- 
tor in the first halfbyte of FPRMECOD (see Figure 5) 
and load phase $$BATTF1. 

• Translate the (syntactically correct) cuu specifi- 
cation into the proper hexadecimal value. 

• Store the specified phase name, the value specified 
for FORMS and LPt, and the NULMSG indicator 

in FINAREA. (For a layout of this area, see Figure 2.) 

• After all operands have been scanned, load $$BATTF1. 



$$BATTFi' 



LFCB COMMAND PROCESSOR 2 



Chart CC 



This phase completes the necessary operations in prepara- 
tion 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 1 B1 2D 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. 

• Otherwise load $$BATTF4. 



FCB LOAD EXECUTION PHASE 
FOR 3203 AND 5203 



Charts CD, CE 



This phase overlays root phase $$BATTNA. 
The functions 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 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 channel 1 position of the new 
FCB load, print the verf ication 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 B1 51 and execute a_F ETCH for $$BATTNA. 

• 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 IB 161 
and execute a FETCH for $$BATTNA. 

If the FCB load operation is completed successfully, 
execute a FETCH for $$BATTNA. 



$$BATTF5 



$$BATTNA 



FCBLOAD EXECUTION PHASE FOR PRT1 



Chart CF 



This phase overlays root phase $$BATTNA. 
The functions are: 

• 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 FORMS=xxxx was specified in the command, issue 
message 1 B14A to inform the operator abbut 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 1B15I and execute a FETCH for $$BATTNA. 

• The length of the specified FCB phase is net 192 
incorrect, or the contents of that.phase do not 
conform to the FCB load conventibns — issue 
message 1B16I and execute a FETCH for 
$$BATTNA. _ 

• LPI=n was specified and the specified value does 
not agree with the line spacing code in the FCB 
load — issue message 1B17I and executea FETCH 
for $$BATTNA. 

If the FCB load is completed sucessfully, execute a 
FETCH FOR $$BATTNA. 



$$BATTNA 



B 



26 DOS/VS Logical Transients 



Chart 10- Logical Transient Attention Routines (Part 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 . 

— $$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 . 



$$BATTU1 



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 found, build message 1 B 1 2D 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 of this 
area to INFAREA at the ertJ 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 I ibrary , 
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 1 8A 
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 channel 1 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 

IB 151 and execute a FETCH for $$BATTNA. 



The specified UCB phase does not have the device specific 
length — issue message IB 161 and execute a FETCH for 
$$BATTNA. 



If the UCB load operation is completed successfully, execute a 
FETCH for$$BATTNA. 



02 
$$BATTNA 



Attention Routines 27 



Chart 11. Logical Transient Attention Routines (Part 10 of 10) 



$$BATTN7 




SETDF COMMAND 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 



Charts CS-CU 



This phase updates the PUB2 for the 3800 printer and lists 
the PUB 2 defaults. 

The functions, if requested, are: 



Find the correct PUB 

Check for 3800 printer device type 

Invoke the EXTRACT and MODCTB macros to update 

the PUB2 

List the PUB2 defaults, if specified 

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) 



$$BATTS2 



SETDF COMMAND ERROR PHASE 



Chart CV 



This phase processes and outputs the messages produced 
by the SETDF command. 

The functions are: 

• Prepare the message for output 

• « Output the message 



$$BATTNA 



28 rOS/VS Logicai Transients 



FINFAfiEA 



Byt 


es| Contents 


0- 


7 1 specified phase name 


8- 


filiform number, if specified, 
|or blank 


12 


|not used 


13 


1 number of lines per inch, 
|if specified, or blank 


11 ti- 


i5|hex value of specified 
1 unit address 


ll 6- 


191 address of PUB 


20- 


22 {specified cuu as printable 
1 characters 


23 


|not used 


24 


1 Information byte 
|bit - not used 
Ibit 1 - FOLD was specified 
Ibit 2 - NOCHK was specified 
|bit 3 - NULMSG was specified 
Ibit 4 - FOfiMS=xxxx was specified 
Ibit 5 - LPI=n was specified 
Ibits 6 and 7 - not used 


25 


IX'OO' (used to clear table 
jFPEMADET) 



r • 


UINFAKEA 


|Byt 


.esl Contents 


1 0- 


71 specified phase name 


1 8- 


fl3| train number, if specified, 
1 or blank 

1 
1 
i 

1 
1 


114- 


151 hex value of specified 
1 unit address 


|16- 


■191 address of PUB 


|20- 


221 specified cuu as printable 
1 characters 


123 


|not used 


(24 


1 Informations byte 

1 bit - not used 

1 bit 1 - FOLD was specified 

Ibit 2 - NOCHK was specified 

Ibit 3 - NULMSG was specified 

Ibit; 4 - TfiAIN=xxxxxx was specified 

|bit 5 - LPI=n was specified 

Ibits 6 and 7 - not used 


125 


IX'OO" (usea to clear table 
lUPHMADET) 



L : J 



J 



Note: This area (FINFAfiEA in $$BATTN8 aad UINFAitEA in $$BATTN9) is used to build an 
information record. This record is built by phases $$BATTK8 and *$BaTTF1 for an LFCB 
command and by phases $$BATTN9 and $$BATTU1 for an LUCB command. Phases $$BATTF1 and 
$$BATTU1, respectively, move this record to INFAiEA before they call the appropriate load 
execution phase ($$BATTF4 or $$BATTF5 for an LFCB oimmand, $$BATTU2 for an LUCB command) . 

Figure 2. Layout of Communication Areas in $$BATTN8 and $$BATTN9 



Attention iioutines 29 



Byt 


esj Contents 






0- 


3 1 address o 


f keyword 




4- 


5|length of 


keyword 




6- 


7| sequence 


numJDer of 


operand 


1 
8 


Inot used 






9> 


1 delimiter 






10- 


13|address o 


f keyword 


value 


14- 


151 length of 


keyword \ 


/alue 


16- 


171 sequence j 


Qumber of 


operand 


18 


Inot used 






19 


1 delimiter 







Note: Tills table is called FPhMADivT in 
$$BATTN8 and UPiiMADhT in $$BATTN9- 

Figure 3.. Layout of Parameter Address 

Tables in $$BATTN8 and $*BATTN9 



Code 


1 
Meaning | 


(in hex) 


1 i 


FO (Operand is invalid, | 


70 


1 

Length of positional operand or | 




of keyword if incorrect or the | 




cielimiter or the operand or the | 




key«#ord is erroneous, | 


30 


Keyword value has wrong length | 




or the value's delimiter is | 




erroneous- | 


10 


Keyword is specified more than | 




once* 1 


07 


No PUB entry was found for the | 




specified channel and unit | 




address. ( 


03 


Specified Uevipe has no fCB (fori 




an LFCB command or macro) or no | 




UCB (tor an LUCb command) , | 


01 


Specified device is down- | 



j BytesI Contents 
, + 



I 0- 9 1 specified keyword 
, + 



1 10-19 (specified keyword value 



Note: This error coae byte is called 
FPIiMECOD in $JBATTN8 and UPhMECOD in 

$4vBATTN9, 

Figure 5- Error Coae Bytes in $$BATTM8 and 
5$BATTN9 



Note: This table is called FPEMVALT in 
$$BATTN8 and UPfiMVALT in $$BATTN9- 

Figure 4. Layout of Parameter Value Tafiles 
in $$BATTN8 and BATTN9 



30 DOS/VS Logical Transients 



TEhUlUkTOk iiOUTINES 



A program is terminated under its own 
control by issuing an EOJ, liUti9, or CANCEL 
macro or through operator action or a 
program error or certain I/O failures. When 
a program is terminated, the tollowing 
actions are taken: 

1. All I/O operations that the program has 
requested are allowed to quiesce.- 

2- DASD extents used by this program rpr 
DASD file protection are dequeued. This 
feature is a system generation option. 



3, 



If the program is terminated normallyr 
SJOijCTLA is called. 



H. l£ the program is terminated 

abnormally, an error message is printed 
and a dump is issuea on SYSLST if tne 
dump option was specified- 

5- If the terminating task is a suctask, 
it is detached from the system's task 
selection mecnanism. 

For a list of cancel codes see Figure 
6. 



Terminator Routines 31 



Chart 12- Terminator Routines (Part 1 of 3) 

if teleprocessing 

( $$BE0J4 )-• 



Called by Supervisor if teleprocessing 
not supported 



CLEAN UP NON-TP I/O DEVICES 



Charts DF-DH 



If IPL is not complete, fetch $$BEOJ. 

If partition has 3800 extended buffering DTFs to close, fetch 

$$BPCLOS. 

If RAS Is active, wait until RAS is finished. Reset user exits. 

If ATTN routine is canceled, release resources owned 

(SVC 64), deactivate ATTN routine, reset cancel flags, and 

exit (SVC 11). 

Reset XECB exits occupied by terminating task. 

For maintasks, if the partition has open ACBs to close, fetch 

$$BACLOS. 

Dequeue outstanding I/O (SVC 3). 

Zero MICR DTF table address, if available. 

For subtasks, if nornnal termination, issue SVC 64 and 

DETACH, else fetch $$BEOJ. 

If POWER/VS is In this partition, fetch $$BPOWIN. 

For POWER-controlled partitions, reset all spool requests. 

If Job Accounting is supported, update the Job Accounting 

partition table. 

If a job control open failure occurred, override the cancel 

code with X'35' and unassign the LUB entry. 

Clear trackhold entries. 




NO 



TAPE AND DISK PUB2 PROCESSOR 



Charts DL- DN 



For opened tape units assigned to this partition, RMSR 
records are created and the PUB2 entries are updated. 
For opened 3330, 3340, 3350, and FBA 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 SYSR EC. 



( SVC 2 $$BEOJ j 



TERMINATE TASK AND 
INITIALIZE PARTITION 



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 GETVIS area (SVC 62). 

Load $J06CTLA into the partition. 

Initialize the PSW for the partition. 



C SVC 11 N- 

Return from 1 
B-Transient/ 



-f $$BPL0S Y 



C SVC 11 N 
Return from i- 
B-Transient J 

($iBACLOs\_ 
ChartsDJ, OK /" 

-/ DETACH y 
■/ $$BPOWIN \ 



Called by the Supervisor 
Teleprocessing is supported 



C$$BEOJ 3 ) 
y 



DECIDE NEXT TERMINATION STEP 



Chart DD 



If IPL Is not complete, fetch $$BEOJ. 

If OLTEP is terminating, fetch SSBTOLTP. 

I n all other cases fetch $$BE0J3A. 



CSVC2 \ /" SVC 2 ^ 

$$BE0J3A^ I $$BT0LTP*/ 



Documented in OLTEP 
publication 



HALT I/O ON T/P DEVICES 



Chart t)E 



T/P 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 



CSVC2 \ 
$$BEOJ4 y 



^r HardWait^ 



C SVC 39 \ 
DETACH J 



32 DOS/VS Logical Transients 



Chart 13, TerminatDr Routines (Part 2 of 3) 



(DUMP/JDUMpN /^Any ABENdN ^ CANCEL ^ 
Macro J V Condition J VCommand/IVIacro/ 



SUPERVISOR " 



TERMINATOR IN SUPERVISOR (called by SVC 2 and SVC 6) 



Prepares parameter list for system dump (Cancel code and save 
areas address(es)) 



$IJBDUMP (INSVA) 
— See Note below 



SYSTEM DUMP PROCESSOR 



Charts EA - EH, ES ■ 
and FA 



EW, 
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 CANCEL 
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, floating- 
point registers, and control registers). 
If OPTION DUMP is active, the supervisor is dumped. 
If OPTION PARTDUMP is active, the following supervisor con- 
trol blocks are dumped: COMREG, SYSCOM, PUB, PUBOWNER, 
PUB2, LUB. JOB, Extent Block, DIB, DIB extensions, SYSFIL 
buffers, PIB. In addition, the LTA 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 1 1 j 



IJBEOJ 



CANCEL MESSAGE WRITER 



Charts FP - FR 



Writes CANCEL messages for abnormal task termination. 

Gives status of the problem program area at the time of cancel- 
lation by printing the user's PSW (message 0S07I). 



Note: 




$IJBDUMP contains the follow 


ng routines: 


IJBSDUMP (Charts EA-EP): 


— System dump monitor 




- PDUMP monitor 




— DUMP command monitor 


IJBDMPPA (Charts EQ-ER): 


Dumps supervisor control b locks 


IJBDMPAR (Charts ES- EW): 


Prepares an area of storage for output 




and validates addresses 


IJBDMPIO (Charts FA -FC): 


Performs I/O for system dump and 




PDUMP macro 


IJBDMPIC (Charts FF-FK): 


Performs I/O for DUMP command 


IJBEOJ (Charts FP-FR): 


Writes termination messages on 




SYSLOG and SYSLST 



Terminator Routines 33 



Chart 14. Terminator Routines (Part 3 of 3) 



(PDUMP A 
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 



PDUMP PROCESSOR 



Charts EA - EB, ES - EW, 
and FA - FC 



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: 

— General registers 0-1 5 

— Floating-point 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 1 1 j 



Returns to supervisor which returns to problem program after 
SVC 2 of PDUMP 



34 DOS/VS Logical Transients 



Cancel 


Message 


Descriptive Part of Message 


Code (hex) 


Code 


or Condition 


OF 


0P80I 


Invalid read from or write to system 
file on FBA 


10 


■•••.■••"» 


Normal EOJ 


11 


OV07I 


No channel program translation for 
unsupported device 


12 


0V06I 


program translation 


13 


0V05I 


CCa with count greater than 32K 


14 


0V04I 


Page pool too small 


15 


0V02I 


Page fault in disabled program 


16 


OVOII 


Page fault in MICfi stacker select or 
P.F,. appendage routine 


17 


0S02I 


Program request (same as 23 iaut causes 
dump because subtasics were attached when 
maxntask issued CANCEL macro) 


18 


1 ....... 


Eliminates cancel message when maintask 
issues DUMP macro with subtasks attached 


19 


0P74I 


I/O operator option 


1A 


0P73I 


I/O error 


IB 


0P82I 


Channel failure 


1C 


0S14I 


CANCEL ALL macro 


ID 


0S12I 


Main task termination 


IE 


0S13I 


Unknown ENQ requestor 


IF 


0P81I 


CPU failure 


20 


0S03I 


Program check 


21 


0S04I 


Illegal SVC 


22 


0S05I 


Phase not found 


23 


0S02I 


Program request 


24 


0S01I 


Operator intervention 


25 


0P77I 


Invalid address 


26* 


0P71I 


SySxxx not assigned (unassigned LUB code) 


27 


0P70I 


Undefined logical unit 



U i 



Figure 6i Cancel Codes and Messages (Part 1 of 2) 



Terminator fioutines 35 



Cancel 


1 Message 


1 Descriptive part of Message | 


Code (hex) 


1 Code 


1 or Condition | 


2A 


1 0V10I 


1 I/O error on page data set | 


2B 


1 0P84I 


1 I/O error during fetcii from private core | 
1 image liDrary | 


2C 


1 0V09I 


! Illegal parameter passed by P. F- | 
1 appendage routine | 


2D 


[ 

1 0P88I 


1 Program cannot be executea/restarted due | 
1 to tailing storage block J 


2E 


0S16I 


1 Invalid resource request (possible aeadlock) | 


2r 


0V03I 


More than 255 PFIX reciuests for 1 page | 


30 


0P/72i 


Reading past /& statement (on SYSRDR or | 
SYSIPT) 1 


31 


0P75I 


I/O error queue overflow (error queue | 
overflow) J 


32 


0P76I 


Invalid DASD address | 


33 


0P79I 


Invalid first CCW | 


34 




Reserved J 


35 


0P85I 


Joi) control open failure J 


36 


0V08I 


Page fault in I/O appengage routine | 


37 




Reserved 1 


38 


0V11I 


Wrong privately translated CCW | 


39 1 




Reserved I 


40 


5J95I 


Invalid termination of VTAM j 


41 1 


5J96I 1 


Invalid VTAM conaition code | 


42 j 


0P86I 1 


Violated DASD xile protection | 




0P83A** 1 


Supervisor catalog failure | 




0P87A** 


1 

IPL failure | 


all others 


0P78I 1 


Unrecogized cancel code xx | 



* If the CCB is not available, the logical unit is SYSxxx.. 

♦* Tne cancel code is not significant in case of a supervisor 
catalog or IPL failure, because the system is placed in the 
wait state without any further processing by the Terminator. 

Note: In addition to recognizing the cancel codes above, the Terminator 
also recognizes the same codes with the X'80' t)it on (cancel 
occurred in LTA).. 



Figure 6- Cancel Codes and Messages (Part 2 of 2) 



36 DOS/VSE Logical Transients 



VABIOUS SPECIAL SERVICE PROGRAMS 



L2ading. Print Control Buffers 



The print control buffers of a printer can 
be loaded as follows: 

• Automatically during IPL. SSBUFLDu 
together with $$BUFLD1 and $$b\iFLL2 are 
provided to load the FCB and UCB of a 
pertinent printer with the standard 
control information* (See DOS/VSE 
initial Program Load and Job Control 
Loaic- ) 

• Dynamically by issuing the LFCB or LUCB 
attention commands (See tne section 
Attention Routin es) . 

• As a separate job step by executing the 
SYSBUFLD program- (See DOS/VSE Initial 
£r og:r am Load and Job Con t r oi Lo^i c, ) 

• Dynamically by issuxng the LFCB macro 
in a problem program- (This macro can 
only be used to load the FCB of a 
printer) . 



$$BATTFO is executed 
issued in a problem 
This phase performs 
"unctions for the re 
operation and calls 
printer) or $$BATTF3 
printer) . The phases 
return control to th 
issued tlie LFCB macr 
the result of the lo 
problem program by m 
in register 15, Thes 



when an LFCB macro is 
program (see Chart 15),, 
the necessary checKing 
quested FCB load 
$$BATTF2 (for a PRTI 
(for a 3203 or 5203 
$$BATTF2 and $$BATTF3 
e problem program that 
o. The phases indicate 
ad operation to the 
eans of a return code 
e return codes are: 



keturti 
code 



Meaning 



00 I The FCB load operation has been 
completed successfully. 

OU I The assigned printer is of class 

PRTI and the LPI operand specified 
in the macro does not agree with 
the FCB image, 

08 I No LUB is available for the 
specified logical unit. 

OC IThe speciried logical unit has not 
been assigned or is currently 
unassigned. 

10 IThe specified logical unit has 

been assigned to a device without 
an FCB. 

14 IThe printer assigned to the 

specified logical unit is down. 

18 IThe specified FCB image has not 
been found. 

IC IThe specified FCB image is invalid 
for the printer assigned to tue 
specixied logical unit- 



r 

1 Bytes 


Contents 


1 0-7 


1 _ _ _ _ _ 

1 Specified phase name 


1 — 

1 8-10 

1 


l_ __ — — _ — 

I XXX of SYSxxx specified in tne 
[macro 


1 — — 
111 


l_ _ _ _ — _ _ _ _ 

{FORMS indicator: X'FI* = 
|FOiMS=xxx was specified 


112-15 


1 — — ~ ~ — " 

IForm number specified in the macro 


116 
1 


1 — ~ — ~ ~ ~ — 

J LPI value specified in the macro or 
IX'FO* 


1 — — 

117 
i 


1 _ - - - — - - 

jNOLMSG indicator: X'FI' = NULMSG 
1 was specified 



Figure 7. Layout of the LfCB Macro 
Information Area 



Various Special Service Programs 37 



1 Bytes 


1 Contents I 


1 0-7 


1 ~ ~ — 1 

Specified p^ase name 1 


1 8-11 


_ - _ — _ J 

Form number, if specified, or blank | 


1 12 


— _ _ _ - ~ - -j 

Not used J 


1 13 


1 ~ ~ ~ ~ — ~ — - -j 
Number of lines per inch, if | 
specified, or blank | 


1 14-15 


_ _ _ _ _| 

Logical unit class and number | 


1 16-19 


_ _ — 1 

Address of PUB | 


120-23 


Address of user register 15 save | 
area | 


124 


— _ — _ — 1 

Information byte | 
Bits 0-2: Not used | 
Bit 3 : NULMSG was specified i 
Bit 4 : FORMS=xxxx was specified | 
Bit 5 : LPI=n was specified j 
Bits 6-7: Not used ( 


125 1 


Not used 1 



figure d- Layout of LFCB Macro 
Communication Area 



$$BSYSWB 



4$BSySWR is used by MAINT, IPL, $LNK£DT, 
COEGZ and $LIBSTAT to turn on a bit in tiie 
communications region, which allows 
programs to write on DASD devices that are 
DASD file protected- In addition, tne 
transient moves the address of the label 
information area to the communication 
region.. 



$$tiCCHHE 



i$BCCHHfi is used by IPL to scan the core 
image directory for all modules whose names 
aegin with $$RAST. It builds an in-core 
directory (load list) for the RAS phases. 
This directory is located in the RAS table 
in the supervisor- The directory 
facilitates the fetching function of the 
RAS modules into the RAS transient area 
(ETA) . 



IMilCLOS - Automatic Close for 3800 Printer 
Files 



The objective of this routine is to perform 
close processing for any 3800 printer files 
opened in extended buffering moae and left 
unclosed by the user program; tiiis ensures 
that all buxrered data is printed. 

Entry: From SSBiOJU when a main task 
terminates; from 4i$BCL0SE and $$BCL0S2 when 
close processing initiated by $$BPCLOS is 
complete- 
Exits: To $$BCLOSE to close a 3800 printer 
file lert unclosed by a user program; to 
$$B£0J4 when all 3800 printer files have 
been closed- 
Method: This module uses the chain of 
DTFXWAs (DTF extension work areas) to 
identify 3800 printer files opened in 
extended buffering mode and left unclosed 
Dy the user program- 

The DTJrXWA chain is anchored in the anchor 
table extension (ATX). The ATX is created 
when the 3800 open routine IJDPR3 issues 
CDLOAD for the non-executable module 
IJDANCHX. When the IJDANCHX module is 
loaded, it becomes the ATX itself.- Thus, 
tne ATX is pointed to by the entry in the 
anchor table for module IJDANCHX- 

$$BPLCOS selects the first DTFXWA on the 
chain, builds a close parameter list using 
the DTF pointer in th.e DTfXWA, and 
initiates close processing for the tile by 
transferring control to $$BCLOSE,. Before 
invoking $$BCLOSE, $$BPCLOS marks the 
DTiXHA as having been already selected for 
close processing- Thus, if close fails and 
the DTFXWA is left on tte chain, it will 
have been marked as already processed; 

After completing their processing, the 
close routines will fetch $$BBCLOS 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 processed, 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 the 3800 printer 
files habe been processed, $$BPCLOS returns 
control to $$B£0J4» 



38 DOS/VSE Logical Transients 



Chart il5^ LFCB Maciro Processor 



f $$BATTFO j 



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 0. {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 — 
1 5 and return to the problem program 

• If the device is a PRT1 printer, fetch SSBATTF2. 

• Otherwise, fetch $$BATTF3. 



f $$BATTF2 j 



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 requiredoperator action. 

• When the required operator actions is finished, skip the forms to 
the channel 1 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 0. 

• Return control to the problem program that issued the LFCB 



f $$BATTF3 j 



i 



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 channel 1 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 1 5 to 0. 

• Return control to the problem program that issued the LFCB 
macro. 






Return to 
Problem Program 



D 



Various Special Service Programs 39 



DISPLAY OPEEATOE CONSOLE SUPPORT 



CfiT transient routines provide support for 
the display operator consoles 125D (DOC) 
and 327/7, and 3278 Model 2A,, CfiT 
transients reside in the core image liijrary 
and are fetched into the CJiT transient area 
(CETTBNS) each time the supervisor 
encounters a reguest for a 125D or 
3277/3278- Since these requests may 
require different services, CfiT support is 
aivided into 30 transient phases. Each 
phase fits into the CfiT transient area 
(CRTTfiNS) which is 1156 bytes long.- 



ggj Transient Logical Interrelationship 



Each time the CRT support is activated, 
control is first transferred to phase 
$$BOCfiTA (see Chart 16), Since this phase 
is also the last phase executed before the 
CfiT support is deactivated, $$BOCfiTA is 
always in the CRT transient area (CRTTRNS) , 
even when the CRT support is not active.. 

The CRT transient phases perform the 
following functions: 

• Channel Program Processing. The channel 
programs for a printer-Keyboard console 
I/O request (refe|:red to as SYSLOG 
channel programs, 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. K-command processing and/or 
automatic screen management durxng 
any I/O, This is handled by phases 
$$BOCfiTK through $$BOCfiTQ, $$BOCRTV 
through $$BOCRTY (see Charts 19 and 
20) . 

b. fiedisplay of messages recorded on 
the hara-copy disk file. This is 
handled by phases $$B0CRT1 through 
$$B0CHT6 (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 



included throughout the screen 
management phases, 

The hard-copy file phase $$BOCfiTH, the 
redisplay phases $$B0CRT3 and $$B0CRT5, 
and phase $$BOCfiTU must write to (or 
read from) the disk on which the 
hard-copy file resides,. Disk errors 
that cannot fie handled by the 
supervisor-resident ERP routine are 
processed by $$BOCfiTB (see Chart 22). 

Errors that appear during screen I/O 
operations are handled by phase 
$$BOCRTE, which in turn may fetch 
$$BOCfiTf (see Chart 22)- 

A summary of tne CRT transient phases is 
given in Charts 16 through 22., It is 
followed by a detailed description of each 
phase in alphabetical order. 



Differences Between CRT Support a n d 10 52 
Support 



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-supplied CCW chain xs ignored, 
that is, the CCW is handled as if the 
PCI bit had been generated off. 

• An SVC given for a display operator 
console always causes the associated 
data to be displayed on a new line, 
even if the preceding SVC has ended 
with a 'Write without carriage return' 
command. (Tnis applies only to read 
and write operations.) 

• When a Read command is encountered 
whose Skip-Data bit is generated on, 
the user is ailowea to enter all bis 
data. iiowever, the data is not 
aisplayed in the message area. 

• Ix an incorrect length is detected for 
a read operation, the Incorrect-Length 
bit in the CSI* is set on only if the 
byte count is not exhausted and tne SLI 
(Suppress Length Indicator) bit in the 
associated CCW is zero. 



40 DOS/VSE Logical Transients 



chart 16, CRT Root Phases 



From Charts: 



I ^ I 17 C Start I/O ^ 



$$BOCRTA 



CRT ROOT PHASE 



Charts KA-KC 



This phase is always fetched as the first and last CRT phase: 
One entry fronn 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 aiTaiizing 

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 



Chart PJ 



This phase performs one or more of the following functions: 
• Forces writing of the hard-copy file buffer, calls 

$$BOCRTA. 



Sets new wrap-around address in header record, calls 
$$BOCRTA 



Invalidates wrap-around address in header record, calls 
$$BOCRTB. 




19 



$$BOCRTZ 



CI/0 Interrupt A 
Handler y 



$$BOCRTK 




22 



$$BOCRTB 



CHANNEL PROGRAM ANALYZER 



Charts QG-QM 



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 
which is not the first CCW in the chain; 



$$BOCRTE if the nect CCW to be processed is 
a Sense CCW. 



$$BOCRTE 



$$BOCRTC 
$$BOCRTR 

1 



$$BOCRTG 



Display Operator Console Support 41 



Chart 17. CRT Write Processor Phases 



^ 



$$BOCRTC 



From Charts: 
16 
18 
22 



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 

buffer, inserts the relevant information in the screen 

control table (SCT) entries, and analyzes the message 

header. 

If the screen message area is full, $$BOCRTQ is 

fetched. 



$$BOCRTA is called if command-chaining is indi- 
cated in the current CCW: 



If the current CCW is not chained, $$BOCRTG is 
fetched 



Control is transferred to $$BOCRTD if the data 
exceeds one screen line. 



$$BOCRTD 



JVi 



$$BOCRTQ 



^ 



$$BOCRTA 



$$BOCRTG 



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 



Control is returned to $$BOCRTC if no chaining 
is encouritered. 

$$BOCTRO is fetched if no line is currently 
available. > 




22 
$$BOCRTE 



$$BOCRTA $$BOCRTK 



[7) 

$$BOCTRQ 



^ 



From Charts: 
20 
22 



$$BOCRTH 



From Charts: 
16 
22 



WRITE SCREEN MESSAGE 



Charts MA-MC 



This phase writes the screen image buffer to the 

Kreen after the data has been completely 

transferred to the buffer. 

$$BOCRTE is fetched if a screen I/O error occurs 

If no hard-copy support and no console printer, 

$$BOCRTA is fetched. 

Attention requests are handled by $$BOCRTK. 

If no console printer is supported, $$BOCRTH 

is fetched. 

Otherwise, $$BOCRTI is fetched. 



$$BOCRTI 




WRITE ON CONSOLE PRINTER 



Chart MG 



Writes internal protected lines on console printer. 
If no hard-copy support, fetches $$BOCRTA or 
$$BOCRTQ (if calledfrom $$BOCRTY). 
Otherwise, $$BOCRTH is fetched. 



WRITE HARD-COPY RECORDS 



Charts MD-MF 



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, $$BOCRTB is 
fetched 



$$BOCRTQ is called if a message exceeds the avail- 
able message area. 



$$BOCRTU is called if overlay mode is entered to 
invalidate wrap-around address 






$$BOCRTA 



{7) qpiiT] 

$$BORTU $$BOCRTQ $$BOCRTB 



42 D0S/V5E Logical Transients 



Chart 18, CRT Bead Processor Phases 



^ 



$$BOCRTR 



From Charts: 
16 
22 



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. 



If a Read CCW is preceded by an erroneous Write CCW, 
$$BOCRTC is called. 



On screen I/O errors, $$BOCRTE is fetched.- 



$$BOCRTS 




[T] [T] [^ 

$$BOCRTE $$BOCRTC $$BOCRTK 



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. 
Acommand is handled by $$BOCRTK. 



Control is returned to $$BOCRTR if the Read CCW 

Is canceled. 

On screen I/O errors, $$BOCRTE is fetched. 



$$BOCRTT 




^ y 



22 

$$BOCRTE 



$$BOCRTK 



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. 



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. 



$$BOCRTC 




22 

$$BOCRTE 



Display Operator Console Support 43 



Chart 19. CRT Screen Management Phases (Part 1 of 2) 



* From Charts: 



$$BOCRTK 




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 $$B0CRT2. 



$$BOCRTL through $$BOCRTP are called to handle screen 
management commands. 



$$BOCRTL 



$$BOCRTM 



DELETION BY K-COMMAND 



MM-MP 



This phase handles K-commands with 
the subparameter E except K e, N. 
If a command is in error, 
$$BOCRTV is fetched. 



DELETfON BY CURSOR Chart N A 



This phase determines from the 
cursor address the range of 
message lines to be deleted. 
On invalid cursor operation, 
^BOCRTP is fetched. 



$$BOCRTV 



* From Charts: 

17 

20 

22 
$$BOC RTQ 



DELETION OF MESSAGE LINES 



Charts N J, NK 



This phase deletes message lines. 

Control is given to $$BOCRTP on exit from a 

deletion command. — '■ '■ - 



Exit isto the calling phase if message lines have 

benn deleted. 

$$BOCRTW 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, 
$$BOCRT0 is fetched. 



\T) \T) {Z} 

$$B0CRT2 $$BOCRTE $$B0CRTA 



$$BOCRTN 



$$BOCRTO 



SCREEN MANAGEMENT MODE 

Charts NB-ND 



This phase processes the 
specification K-command. 
If a command is in error, 
$$BOCRTV is fetched. 



KD 



LINE NUMBER DISPLAY 



Charts 



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: 

20 

21 

22 
$$BOCRTP 



i 

$$BOCRTW 



1 

$$BOCRTX 



EXIT INTERFACE 



Charts NG, NH 



This phase establishes the interface between the 
xreen management phases and the supervisor. 
If a K-command had been entered because the message 
area was full, control is given to the phase whose 
name Ps passed in CRTNAM1. 

On screen I/O errors, $$BOCRTE is fetched. 

"Otherwise control is given to $$BOCRTA. 



$$BOCRTA $$BOCRTE 



44 DOS/\SE Logical Transients 



Chart 20. CUT Screen Management Phases (Part 2 of 2) 



$$BOCRTV 




^ 



$$BOCRTW 



COMMAND ERROR MESSAGE WRITER 



Chart PK 



This phase displays error messages related to invalid 

K— and D— commands. 

On screen I/O errors. $$BOCRTE is called. 



$$B0CRT1 is fetched when the system is in redisplay 
mode. 



Otherwise, exit is to $$BOCRTP. 



$$BQCRTP 



$$B0CRT1 



^ 



From Charts: 
19 
22 



$$BOCRTX 



VERIFY OPERATOR COMMANDS 



Charts OB, DC 



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 CANCEL, $$BOCRTP is fetched.- 

Control is given to $$BOCRTK if the operator changes 

the parameters or command. ■ 



$$BOCRTM is called if the operator sets the cursor .- 
If deletion may be performed, exit is to $$BOCRTL. 




From Charts: 
19 
22 



DISPLAY WARNING MESSAGE 



Chart QA 



This phase displays the message '0D05A MESSAGE 
WAITING' if a message cannot be displayed beca'.ise 
the screen is full. 

On screen I/O errors, $$BOCRTE is called. 
$$BOCRTK is fetched to analyze the operator's action. 
If the message to be displayed exceeds the message 
area, $$BOCRTY is called. 



^ 



$$BOCRTY 



HANDLE LONG MESSAGES 



Charts QD-QF 



^ 



19 
$$BOCRTQ 



This phase handles messages that are longer than 

the message area. 

On screen I/O errors, $$BOCRTE is called. 

$$BOCRTQ 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. 



19 



$$BOCRTL 



$$BOCRTM ' $$BOCRTP 



$$BOCRTE SSBOCRTI 



$$BOCRTH 




19 



^ 



19 
$$BOCRTK 



Display Operator Console Support 45 



Chart 21, CRT Redisplay Phases 



$$B0CRT1 



G> 



^' 



rom Charts: 
20 
22 



MESSAGES REDISPLAY (Part 1) 



Charts RA, RB 



This phase allows new display commands to be entered when 
the system is in redisplay mode. 

$$B0CRT6 is called if the operator pressed only EIMTE R. 

On screen I/O errors, exit is to $$BOCRTE. 



If a D-command is entered, $$B0CRT2 is fetched. 




$$B0CRT2 



$$BOCRTE 



MESSAGE REDISPLAY (Part 2) 



Charts RC, RD 



This phase examines the parameters of the redisplay 
command on first entry to redisplay. 

If the command contains a syntax error, $$B0CRTV is fetched.- 
Otherwise, exit is to $$B0CRT6. 



$$B0CRT6 



^ 



$$BOCRTV 



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, SSBOCRTV is fetched. 
$$B0CRT5 is fetched on first entry to redisplay, while 
$$B0CRT3 is called if only the hard-copy disk CCWs and the 
CCB have to be relocated. 



$$B0CRT3 



$$B0CRT5 



MESSAGES REDISPLAY (Part 3) 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, $$B0CRTB is called. 



$$B0CRT4 is fetched to write to the screen. 



$$BOCRTB 



$$BOCRTV 



MESSAGES REDISPLAY (Part 5) 



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. 

$$B0CRT6 is called on entry to redisplay mode. 

Exit is to $$BOCRTP if the hard-copy file is closed. 
$$B0CRT4 is fetched on exit from redisplay mode. 




J|>$B0CRT4 



MESSAGE REDISPLAY (Part 4) 



Chart RH 



This phase displays eight message lines read from the 
hard— copy file. 

$$B0CRTP is called on exit from redisplay. 

On screen I/O errors, $$BOCRTE is fetched. 

Otherwise, exit is to $$B0CRT1t 




\t) [7} 



$$B0CRTE 



$$B0CRTP 



46 DOS/VSE Logical Transisnts 



Chart 22. CRT ERP Phases 



$$BOCRTB 




From Charts: 
17 
21 



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. 

$$BOCRTQ is called if no line is currently 

available to display the message. 



$$BOCRTE 






From Charts: 

16 19 

17 20 

18 21 



$$BOCRTQ $$60CRTG 



CRT ERP (Parti) 



Charts LD-LF 



This phase analyzes irregularities detected during 
xreen 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 fulfilled. — 



$$BOCRTA is called if a sense command is 
command- or data-chained. 



Exit is to $$BOCRTC for a sense command without 
chai ni ng. 



$$BOCRTF is fetched to handle all errors except 
intervention required. 



$$BOCRTF 



CRT ERP (Part 2) 



Charts LG-LK 



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. 

$$BOCRTE is called if a unit check condition occurs 
■during the retries. 

After operation check, command reject, and on 
programming errors, exit is to $$BOCRTH, provided the 
hard-copy file is open. 



If the hard-copy file is not open, exit is to $$BOCRTA. 
The hard wait state is entered when no recovery is 
possible from any channel errors. 



^ [5] 

$$BOCRTC $$BOCRTA 



( Hard Wait j 



I I7-21J 

$$BOCRTG 
$$BOCRTR 
$$BOCRTS 
$$BOCRTT 
$$BOCRTK 
$$BOCRTP 
$$BOCRTV 
$$BOCRTW 
$$BOCRTA $$BOCRTH $$BOCRTY 
$$B0CRT1 
$$B0CRT4 



y ^ 



Display Operator Console Support 47 



$$BOCRTA - CRT Root Phase 



$$bOCJiTB - Hard-Cot>Y Disk ,ERf 



Any request for a display operator console 
(125D or 3277/3278) is passed directly rrom 
the Start-I/0 routine in the supervisor to 
this phase to initiate the CRT transient 
routines- The CRT routines handle all 
requests on the display operator consoles.. 



Entry: From the 
supervisor when 
is encountered; 
$$BOCRTE, $$BOCR 
execution of the 
completed; from 
and $$bOCRTE whe 
contains command 
$$BOCRTK after a 
been handled; fr 
PRINTLOG utility 
phase $$BOCfiTP a 
command has been 
$$BOCRTF when an 
error has occurr 
is not open- 



Start-I/0 routine in the 
a 125D or 3277/3278 request 
from phases $S30CRTG, 
TH, and $$BOCRTZ when 

channel program has been 
phases $$BOCRTC, $$B0C2TD, 
n the channel program 

chaining; from phase 
n attention interrupt has 
om phase SSBOCfiTU after the 

has been completed; from 
fter a screen management 

completed; from phase 

irrecoverable screen I/O 
ed and the hard-copy fxle 



Exit: To phase $$BOCRTZ to analyze the 
channel program; to phase $$60CfiTU to 
update the wrap-around pointer of the 
hard-^copy file; to phase $$BOCRTK to handle 
an attention request. 

Method: On entry from the Start-I/0 
routine, the CRT device is flagged »busy« 
in its PUB, The CRT tasK is activated and 
the SYSLOG-requesting CCB/IORB in 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 from the CAW and stored in a 
save area that can be referenced by other 
phases. If the CCW specifies wrap-around 
updating, phase $$BOCRTU is fetched.. All 
other CCWs are passed to phase $$B0CRT2 for 
further analyzing. User CCWs are checked 
whether or not they start on a doubleword 
boundary before being passed to $$BOCfiTZ.. 

On entry from the I/O interrupt handler, 
$$BOCRTA determines whether more commands 
are to be executed for the current channel 
program. If so, $$BOCRTZ is fetched after 
the new CCH address has been saved in 
CRTSAV, 

If the channel program has been completed 
or if it is discontinued, tne channel queue 
entry is restored to reflect the user 
status. In addition, the CSH 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 CfiT task has i3een deactivated, 
control is returned to the I/O interrupt 
handler. 



Hard-copy disk I/O errors, which are not 
nandled by the supervisor-resident disk ERP 
routine, are processed by this phase, 
$$BOCRTB tries to repair the error and 
controls any subsequent messages. In 
addition, hard-copy overflow conditions are 
indicated to the operator. 

Entry: From the CRT transients that access 
the hard-copy disk file (SSBOCkTH, 
$$B0CRT3, and ii$B0CRT5) and .from SSiJOCRTi^ 
when the message area was full. 

Exit: To phase $$BGCRTG to display 
messages; to phase $$BOCfiT0 if no line is 
currently avaiiaole, 

Method: If less than two tracks are 
available for recording on the hard-copy 
file, phase SSBOCitTil sets a warning flag 
(see Figure 11) and, if subsequently the 
beginning of the rile is overlaid, also the 
overflow flag. Since both indicators give 
rise to a warning message, they aire set off 
together by $$BOCfiTB in orier to avoid 
repeated display of the warning message. 
Phase $$BOCjaTH does not ca.Tl $$BOCRTB but 
$$BOCRTA if the warning flag has already 
i-ieen set previously by phase $$B0CR1'H- 

If 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 is disastrous, CSta 
and sense information passed via the disk 
CCB/IORB and the field HCSNS in the save 
area CRTSAV are displayed in a second 
message line. Further recording on the 
hard-copy file is then prevented by setting 
off the open indicator (see Figure 11) , 

SSBOCRTB may issue the following messages: 

Oi;20£ HARD COPY FILE SHOULD BE PRINTED 

0D25E HARD COPY FILE IN OVERLAY HODE 

0D26E IRitECOVEiiABLE I/O ERROit, HC DISCONTINUED 

CSW=XXXXXXX SNS=X 
0D29E INCORRECT LENGTH DURING I/O FOB HARD 

COPY 



iliOCRTC - Write Processor (Part 1 of 2) 



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 information 
in the screen control table (SCT) entries. 
The format of an SCT entry is shown in 
Figure 10, 

Entry; From phase *$BOCfiTZ for Write, NOP, 
and Alarm CCWs; from phase $$BOCRTT for 



48 DOS/VSE Logical Transients 



fiead CCWs; from $$BOCiiTR if phase $$BOCfiTA 
ha3 indicated tuat a CCW chain is to be 
discontinued; from phase $$BOCfiTQ when the 
message area was full; from phase $$BOC£T£ 
and $$BOCBTD if the last CCW in a chain has 
been processed and the message type must be 
evaluated. 

Exit: To phase $$BOCfiTA when the current 
ecu indicates command chaining: to phase 
$$BOCRTG when the current CCW is not 
chained; to $$BOC£:TD when the data in a 
single CCW or in data-chained CCWs exceeds 
the space available in one screen line; to 
$$BOCRTQ when the screen message area is 
full. 

Method: Data of fiead CCWs that are 
contained in the channel program passed to 
$$BOCBTC has already been entered in the 
screen entry area. However, since the data 
is part of the message it must be moved to 
the screen message area buffer like the 
write data. If a Read command had been cut 
off, that is, the operator pressed ENTER 
before the byte count had been exhausted, 
such CCWs are indicated by the read 
processor phases, which store the relevant 
information in the save area CRTSAV. The 
address of the last Read CCW wit^ data is 
stored in CONTCCW and the byte count is 
stored in CONTRDSV, Residual count and CCW 
address are stored into the requestor's 
CCB/IORB. If a Read CCW has the SKIP flag 
set on, no data is moved into the message 
area. 



A message header 
the whole messag 
into the screen 
message that is 
program via an S 
begins with a CC 
preceded by the 
identifier (BG, 
is followed by a 
9 for the messag 



analysis is performed when 
e text has been inserted 
image buffers. Each SYSLOG 
issued after IPL by a 
VC interrupt aiid that 
W other than a Sense CCW is 
appropriate partition 
n, etc). This identifier 

message iieader (see Figure 
e format) . 



If the message begins with a Sense CCW, 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 always be 
indicated by a blanic, which is resolved as 
undefined. 



BG 
F1 

F2 



Fn 



-b xyyy 



iJ text 



where: 



X - hexadecimal 

y = alpnanumeric 

Z = alphanumeric except A, D, 

E, i 
A = action 
D = decision 
E = eventual action 
I = information 



Messages which do not fit this format are| 
consiaered as undefined. 

C : 1 



Figure 9. CLT Message Foroat 



Byte - Line Status; 



Bit 


0: 1 


Bit 


1: 1 


Bit 


2: 1 


Bit 


3: 1 


Bit 


H: 1 


Bit 


5: 1 


Bit 


6: R 


Bit 


7: 1 



= A-type message 
= JB-type message 
= D-type message 
= I-type message 
= Continuation Line 
- Free Line 

Reserved 

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 - Reserved 
Byte 3 - Line Numiser 



(X'OI* - X»08' 
for l-iSD) 
(X«01« - XM4» 
for 3277/3278) 



Each message he.s a corresponding SCT entry. 
The format of an SCT entry is shown in 
Figure 10. The line status information in 
byte is required for screen management. 



Figure 10. Screen Control Table (SCT) Entry 



$$BOCRTD - write Processor (Part 2 of 2) 



This phase handles the line overflow caused 
by successive Write without carriage return 
CCWs, by data-cnained CCWs, or by single 
CCWs with a byte count greater than the 
capacity of a single line. 



Display Operator Console Support 49 



Entry: From phase $$BOCBTC, which Has 
detected the line overflow; from phase 
SSBOCETQ when the message area was full- 
Exit: To phase $$BOCJRTA when the channel 
program is continued ; to phase $$BOCBTC if 
no chaining has been encountered: to phase 
$$BOCETQ if no line is currently available.. 

Method: For the 125D, each line of the 
message area offers 33 bytes for the 
message text; for the 3277/3278;, each line 
offers 76 bytes for the message text. Since 
this is much less than tie 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 is 
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 continiled in 
position four (for 125D) or five (for 
3277/3278) of the next line. Apart from 
this separation method, $$BOCBTD follows 
very closely the method of $$BOCfiTC, 



$$BQCiiTE - CRT E^P (Part 1 of 2) 



This phase analyzes irregularities detected 
during screen I/O operations and processes 
Sense comihands appearing within SYSLOG 
channel programs. 

Entry: From $$BOCRTZ for processing of 
regular Sense CCWs; from any other phase in 
which a screen I/O error occurred- 

Exit: To phase $$BOCBTA on a Sense command 
with command or data chaining; to phase 
$$BOCBTC on a Sense command without 
chaining; to phase $$BOCfiTF for handling of 
any error except 'intervention required'; 
to any other phase when an intervention 
required condition has been fuilfilled- 



Mgthod: Sense co 
programs are exe 
the channel prog 
is broken off,, 
(disabled) with 
Only one retry i 
during the Sense 
routine is also 
errors. 



mmands from SYSLOG channel 
cuted as they occur within 
ram. CCH chaining, however. 
The I/O routine works 
SIO and TIO instructions, 
s performed on any error 

operation. The I/O 
used to analyze screen I/O 



If intervention is required for the SYSLOG 
printer, message 0D33A is displayed in the 
instruction line (for the 125D) , For the 
3277/3278, the message 0D38A is moved to 
low core. The Post flag and the Disaster 



flag in the CBTCCB are set orf and the 
phase waits for the 'ready* interrupt. If 
these interrupt conditioiiS are error-free, 
the calling phase is fetched again. The 
name of this phase is taken from CfiTNAM2 in 
CRTTAB. Before tJxe phase is fetched, its 
registers are reloaded from the save area 
located at the end of $$BOCfiTE, where they 
were stored on entry to phase $$BOCfiTE,. 

$$BOCi(TE may issue the following message: 

0D33A INTEfiViNTION REQUIitED FOi SYSLOG 
PBINTEB 



$$BOCBTF - CfiT EBP (Part 2 of 2) 



This phase handles screen I/O errors except 
•intervention required' . 

Entry: From phase $$BOCiLTE. 

Exit: To phase $$BOCfiTE if a unit checK 
condition occurs during the retries; to 
$$BOCfiTH after operation check, command 
reject, and on programming errors (program 
check or protection check) , provided the 
hard-copy file is open (otherwise exit to 
SSBOCRTA) . 

The hard wait state is entered when no 
recovery is possible from channel chaining 
checks or channel interface checks. In that 
case, the code X'OOOOOCCC is entered in 
general register 11 and in bytes through 
3 in low real storage.. 

Meth od : The method is similar to the one 
used by phase $$BOChTE.. Three retries are 
carried out in the following cases: on 
channel errors, on equipment check, and on 
undetermined errors (that is, the unused 
sense bits are on) .. The retry counter is 
passed between phases $$£OCfiTE and 4>$B0CBTF 
in field DOCEIND in the save area CETSAV. 

An equipment checJc may occur only for the 
SYSLOG printer. The hard-copy open flag is 
reset if recovery fails. Each message is 
displayed in the instruction line, because 
it is possible that $$BOCETG cannot clear 
the entire message area, for instance, if 
an extremely long message is currently 
displayed. 

If there is no recovery from operation 
check and undetermined sense indications, 
command reject, protection check, or 
program check, all the interphase 
conditions (indicated in DOCxIND in CETSAV) 
are reset to the initial status. Thus, for 
example, a redisplay may be terminated,. 



50 DOS/VSE Logical Transients 



$$BOCiiTF iaay issue the following messages: 

0D34E EQUIPMENT CHECK ON SYSLOG PfclNTEE 
0D35E IRSECOVEEABLE SCfiEEN I/O ERROR 
0D36E UNDETEEMINED SCfiEEN I/O EfifiOA.. SNS=X 



$$BOCRTG - hrite Screen Message 



This phase writes the screen image bafier 
to the screen after the data of the SYSLOG 
channel program has been completely 
transferred to the Jjuffer- 

Entry: From phases $$BOCRTB, $$BOCiiTC, 
$$BOCRTE, and $$BOCRTF. The pnase may also 
be fetched when an attention request is 
encountered and after an attention reguest 
condition has been fulfilled. 

Exit: To phase $$BOCRTH for writing the 
hard-copy file; to piiase $$BOCRTI for 
writing on the console printer; to phase 
$$BOCfeTE on screen I/O errors; to phase 
$$BOCRTK when an attention request is 
encountered; to JSBOCiiTA when the hard-copy 
file IS not open or does not exist. 

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-copy file. 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*. 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 checked whether 
phase $$BOCETB has indicated that 
intervention is required for the hard-copy 
disk device. If so, message 0D26A 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 



are set ofr. If the hard-copy file is not 
ojjen, tne line protection is reset (see 
Figure 10) . Otherwise, the address of the 
first line to be printed on the hard-copy 
file, the numiaer of lines to be printed, 
and the relevant SCT entry address are 
passed to phase SSBOCitTH in general 
registers 6, 2, and 13, respectively- 

$$BOCitTG may issue the following message: 
0D28A INTERVENTION EEQD FOR HARD COPY DISK 
DEVICE 



$$BOCRTH - Wri te Hard-C opy Records 



This phase writes on the hard-copy disk 
file the new lines that have been displayed 
on the screeni 

Entry: From phase $$BOCfiTG; from phase 
$$BOCBTI if a console printer is supported; 
from phase $$BOCRTF after irrecoverable 
screen I/O errors; from phase $$BOCfiTY when 
messages that exceed the message area 
capacity are to be handled.. 

Exit: To phase JSBOCiiTA; to phase $$BOCRTB 
on hard-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 
$$BOCETU when overlay mode is entered in 
order to invalidate the wrap-around address 
in the header record- 
Method: Starting with the message line in 
the screen image buffer pointed to by 
register 6 (and for as many lines as 
indicated in register 2) a hard-copy record 
is built in the nard-copy file buffer (for 
record format see Figure (12).- Whenever the 
buffer is full, it is written to the actual 
disk address (ACTDSKA) of the hard-copy 
file by an SVC15-SVC7 sequence, then the 
actual disk address is updated- Incorrect 
length or irrecoverable I/O errors 
indicated in the CCB/IORB are passed to 
phase $$BOCRTB for recovery (see Figure 11, 
bits 6 and 7) . 

A test for remaining free space in the 
hard-copy file is then performed.. 

If there is only space left for two 
records, an indicator (see Figure 11, bit 
2) is set which causes a warning nessage to 
be issued by phase $$BOCfiTB. 

If there is no more space left, i.-e- the 
wrap-around point is reached (ACTDSKA = 
HRAPSKA) , overlay mode is entered (see 
Figure 11, bit 1) and $$BOCRTU is called to 
invalidate the current wrap-around address 
in the header record. 



Display Operator Console Support 51 



If overlay mode is active (see figure 11, 
bit 1) , the wrap-around point (WRAPSKA) is 
made equal to the actual disk address^ 

If the physical end of the hard-copy file 



extent xs reacned (ACTDSKA = LASTSKA) , then 
the actual aisK aaaress is reset to tne 
start of the message area (ACTDSKA = 
STRTSKA) and the cycle bit is inverted (see 
Figure 12) « 



iCRTFLGHC Hard Copy Control Flags: 

CRTHOPN - Bit 0: 1 =Hard-copy file is open 

CRTHCOVB - Bit 1: 1 =hard-copy file is in overlay moae- This bit is teset 

together with bit 2 by $$i30CiiTB after the 
correspondxng messages have been issued, 

CRTHCHKN - bit 2: 1 =Warning message should be issued 

CfiTIPL - Bit 3: 1 =IPL switch 

HFtOPEN - Bit 4: 1 =Hard-copy file must be created 

HFEQUNO - Bit 5: 1 =:Hard-^copy file not in use 

HCERR - Bit 6: 1 =Hard-copy fxle has irrecoverable error 

HCINCL - Bit 7: 1 =Incorrect length during recording 



Figure 11, Hard-Copy Control Flags 



52 DOS/VSE Logical Transients 



CRSTSAV 


Hard-Copy File 




FRSTSKA 
STRTSKA 
LASTSKA , , 
WRAPSKA 
ACTSSKA 




header-record 




^ 








screen image buffer 
save area 


■* 










1 

1 1 

1 

L. 
1 






p— ^,«— n 






cycle 






_01 

01 

^1 

01 

^1_ 

m ~_ 

_01 s 

m 

oi_|_ 

01 
00 
00 








i ; 








^' 






^' 


V ^-^ 



flag 



wrap-around address 
I L -J 



Flag: 



X'OO' 


not set 


X'OV 


: valid 


X'02' 


invalid 



Wrap-around address : 

forCKD: CCHHR 
for FBA : BBBBR 



6 J j^ 59(82) 




header record 



FBA device 



\ 



CKD device 



•Figures for 125D (3277/3278) 





y^ 

^ 




^ 




~ 


ogical record 
ogical record 
ogical record 






.^ ^ 












j control info 




y 




\ 
\ 

\ 


RDF 


1 1 

RDF 


CIDF 



X-S 



1 2 



Control interval 



■^V 



57(80)58(81)59(82)' 



message line 



date 



logical record 



byte : bit - 4 : message type 

same as byte of SCI entry (see Fig. 10) 
bit 5,6 : reserved 
bit 7 : cycle bit 

byte 1 : bit - 3 : partition indication 

AR=0; BG=1 ; F1 =7; F2=6; F3=S;... 
bit 4 : reserved 
bit 5 * 7 : number of partitions in system 



VSAM control information 



date 



mmddyy 



Address 


Description 


CKD format 


FBA format 


FRSTSKA 


Start of har^-copy file 


CCHH 


BBBB 


LASTSKA 


End of hard-copy file 


CCHHR 


BBBBR 


STRTSKA 


Start of message area 


CCHHR 


BBBBR 


WRAPSKA 


Wrap-around address 


CCHHR 


BBBBR 


ACTDSKA 


Actual address 


CCHHR 


BBBBR 



Figure 12., Hard-Copy File Format (Part 1 of 2> 



Display Operator Console Support 53 



Notes: 

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. 

The 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 

125D 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 EOF- 
record with a zero data length. Minimum size is 10 tracks. 

For hard-copy files residing on FBA devices a number of logical records is blocked in a VSAM-format control inter- 
val. 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- Hard-Copy File Format (Part 2 of 2) 



5M DOS/VSE Logical Transients 



$$BOCRTI - «rite on 3284/3286/3287/3288 
SYSLOG Printer 



This phase writes all lines from the 
message area to the console printer if the 
appropriate support is generated. 

Intrj: From $$BOC.RTG or $$BOCfiTy after the 
message area is written to the screen. 

Exit; To $$BOCRTA if no hard-copy support 
and call from $$BOCRTG; to $$BOCfiTQ if no 
hard-copy support and call from $$BOCBTY; 
to $$BOCRTH if hard-copy support exists. 



M et hod; The message 
internal protected 1 
protected lines are 
area of the console 
are scanned for trai 
byte count for the p 
reduced accordingly, 
operation (SVC15, ph 
not successful, a me 
the instruction line 
answered by the oper 
following ways; igno 
current line, or ret 
current line, or can 
support. 



area is scanned for 
ines. All internal 
moved into the output 
printer.- The contents 
ling blanKs and the 
rint operation is 

When the print 
ysical addressing) is 
ssage is displayed in 
, whicii must be 
ator in one of the 
re printing of the 
ry printing of the 
eel the printer 



$ $BO CRTK - Command Entry, .frocessinq 



This phase analyzes operator commands. 

Entry; From phase $$BOCJtiTA and $$BOC£TG to 
handle an attention request; from phase 
$$BOCRTW during non-automatic line 
delection; from phases $$iiOCRTR and 
$$BOCfiTS when operator commands have been 
encountered in the input area. 

Exit; To phases $$BOCfiIL through $$BOCRTP 
and $$B0CRT2 on screen management commands; 
to phase $$BOCRTA on system commands; to 
phase $$BOCiiTE on screen I/O errors; to any 
phase which was interrupted previously by 
an operator request. 

Method; The input area is read and the data 
checked. The exit taken depends on the 
result of the test. 



are unique in DOS/VSE, A check is made for 
•K» only, 'K' followed by blank (s) , and for 
'K' accompanied by subparameters; * E* , *S', 
and 'D'. The full command is converted to 
uppercase characters. 



$$BOCRTL - Deletion by K-Command 



This phase handles K-commands with the 
subparameter E except K E,N. 

Entry; From phase $$BOCRTK; from phase 
$$BOC£TX during message deletion in 
conversational mode. 

Exit: To phase $$BOCiiTQ; to phase $$i30CRTV 
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; 



E 

t,SEG 

E,n where 



1^n<8 (for 1250) , or 
1<n<20 (for 3277/3278) 
K £,m,n where 1<ffl,n<8, and m<n 
(for 125D) , or 
1<m,n^20, and m<n 
(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,t!,n.- K E,n is equivalent 
to K E,m,n. 

If the line numbers specified in the 
command do not point exactly to the 
beginning or end of tne message, the 
specified deletion range is reduced in 
order to include only the beginning of a 
message to be deleted. 

The fxnal value of the line range to be 
deleted is passed to phase SSBOCRTy in 
field SEGVAL2, fcihich is contained in the 
save area CRTSAV, 



PL-essing the CANCEL key has no effect at 
all as the exit interface routine $$BOCRTP 
is fetched. The cursor in the message area 
indicates a deletion request. System 
commands (and the Bequest key) are passed 
to the Attention routine.. 

Valid redisplay commands must begin with 
•D' followed by one or more blanks only or 
ny several blanks and an 'L'. K-commands 



$$BOCtTM - Deletion b^ C urso r 



This phase determines from tiie cursor 
address the corresponding range of message 
lines that must be deleted. 

Entry: From phase $$BOCRTK. 



Display Operator Console Support 55 



Exit; To phase $$BOCBTP on invalid cursor 
operation; to phase $$BOCRTQ on valid 
cursor operation. 

Method; The address, of the cursor is 
compared with the addresses o± the 
different screen lines- If the cursor 
address lies beyond the message area, the 
error message 0D02I is set up, which is 
later displayed by $$BOCfiTP- The message is 
not set up if the cursor is set to the 
first position o± the input area^ 

If the cursor address can ae assigned a 
message line address, it is checiced 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 $$BOCBTQ in field SEGVAL2, whicn 
is contained in the save area CETSAV- 

This phase may set up the following 
message; 

0D02A ILLEGAL CURSOR ORATION 



$$ BOC RTN - Screen Ma nage ment Mode 
Specification 



This phase processes the specification 
K-command, 



DOCNIND Bit 0; = DEL=N 

1 = DEL=y 

Bit 1; = CON=N 

1 = eoN=y 

Bit 2: = ALM=N 

1 = ALM=Y 

Bit 4: = PfiT=N 

1 = PfiT=y 

SEGVALH-1 = SEG value 



$$BOCRTO - Lin e Number Display 



This phase processes the display K-command- 

Entry; Prom phase $$BOCfiTK, from phase 
4i$B0CRTQ for display/deletion of line 
numbers^ 

Exit: 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 $$fiOC£TV in 
case of error^ 

Method; In general, this phase is fetched 
for processing of the commands 

K D 



Entry; From phase $$BOCRTK. 

Exit; To phase $$BOCRTP; to phase $$BOCiiTV 
in case of error. 

M eth od; The commands processed must be of 
the form 

K S,&Ef 

K S,parm where parm is at least one of the 
parameters: 



DEL= 



,CON= 



, ALM=j SEG=n (where l<n<8 
N for 125D, 

il<n<20 for 
3277/3278) 



K D,N 

K D,N,HOLD, 

In all cases, the line numbers are inserted 
into the appropriate buffer locations, but 
K D,N,HOLD causes a flag to be set (J)OCO08J 
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 fetched, is indicated ny 
flag DOCO01. This is the special case, not 
included in phase $$BOCRTL, where the 
subparameter *L* xs operated on, DOC00 4 
indicates that the paase is fetched during 
processing of a deletion command in 
conversational mode. 



PfiT= 



DOC002 indicates that the line numbers must 
be deleted. This takes place during message 
deletion in conversational mode. 



The command K S,PET,REF results in the 
current DEL,CON,ALM,SEG,PRT parameter 
values displayed in the instruction line 
(by phase $$BOCETP) . 

The command K S,parm updates the screen 
management parameters. These parameters 
are represented in CRTSAV by the fields 



$$BOCRTP - Exit Interface 



This phase establishes the interface 
isetween the screen management phases and 
the supervisor. 



56 DOS/VSE Logical Transients 



Entry: From phases $$BOCRTO, $$BOCRTM, 
$$BOCfiTN, $$BOCRTV, $$B0CRT4, $$B0CfiT5; 
from phases $$60CiiTE and $$BOCRTF after 
recovery from screen I/O errors; from phase 
$$BOC£TK uhen a command is canceled; from 
phase $$BOChTQ after line deletion by 
command; from $$BOCRTX vhen a deletion 
request has been canceled during 
conversational mode. 

Exit: To phase $$BOCETA when the next 
Attention interrupt should he handled hy 
the supervisor; to any interrupted phase 
whose name is passed in CRTNAUI as 
indicated in CRTQPD (in the table CRTTAB) ; 
to phase $$BOCRTE on screen I/O errors. 

Method: The line numbers are deleted, if 
the HOLD parameter is not active:* The 
instruction line and entry area are 
blanked. When entry was from phase 
$$BOCfiTV, only the entry area is hlanJced, 
while the message area is displayed, that 
is, the error message from phase $$BOCRTV 
remains on the screen.- 



$$BOC£TQ - Deletion of Message Lines 



This phase deletes message lines. 

Entrj^: From phases $$bOCRTB through 
$$BOCfiTD during channel program 
interpretation; from phase $$BOCiiTX during 
deletion in conversational mode; from 
$$BOCiiTL for deletion of messages by 
K-command; from $$BOCRTM for deletion of 
messages according to cursor positioning; 
from $$BOCbTY during processing ox 
extremely long messages. 

Exit: To the calling phase; to phase 
$$BOCRTP on exit from a deletion command; 
to phase $$BOCETW during non-automatic 
deletion mode (DEL=N) and durxng handling 
of messages that exceed the screen 
capacity; to phase $$BOCfiTO for 
displaying/erasing line numbers during 
message deletion in conversational mode. 

Method: 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 the 
specified range are checked to determine 
whether they belong to the message (s) to be 
deleted. 

A-, D-, and E-type messages within the 
specified range are not deleted- Messages 
of this type are deleted only when directly 
pointed to by a command or by 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 



through n. The screen image buffer may also 
contain lines protected against deletion, 
that is, if they have neither joggh 
displayed on the screen nor recorded on the 
hard-copy file* 



$$BOCitTR - Bead Processor (Part 1 of 3) 



This phase is the root phase of the read 
processor and analyzes the read commands or 
reads an operator command. 

Entry: From phase $$BOCRTA; from phase 
$$BOCRTS when an operator command is to be 
read; from phase $$BOCRTT when processing 
of the Read CCW is to be continued; from 
phase $$BOCRTE and $$BOCfiTF after 
successful recovery of a screen I/O error. 

Exit: To phase $$BOCRTS; to phase $$BOCRTK 
for handling of operator commands; to phase 
$$BOCBTC if a Read CC« is preceded by an 
erroneous Write CCW; to phase $$BOCRTE on 
screen I/O errors,. 

Method: On first entry into the phase, the 
input area is read to determine whether an 
operator command is dealt with or a SYSLOG 
channel program is to be interpreted. If 
the phase is fetched again by phase 
$$BOCfiTT, a Read channel program is 
processed and the data may not fit in the 
entry area. 

If a Read CCW is preceded by the CCfc 
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 
while a SYS LOG Read CCfc is handled, he can 
do so by pressing the REQUEST key, but the 
message 'BEAD IS MAITING' 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 issue the following messages: 

0D05D READ IS WAITING. CANCEL OR CONTINUE 



$$BOCBTS - Bead Processor (Part 2 ox 3) 



This phase allows the operator to enter 
data corresponding to a Read CCii, 

Ent ry : From phase $$BOCBTR; from phases 
SSBOCRTE and $$BOCRTF after successful 
recovery of a scree:u I/O error- 



Display Operator Console Support 57 



Exit: To ptiase $$BOCfiTT; to phase $$BOCRTK 
when a command has been entered; to phase 
$$BOCiTE on screen I/O errors; to phase 
$$60CBTR if the £ead CCH is canceled. 



Meth od; The mess 

•"entee command* 
instruction line 
area is started, 
data to be enter 
corresponding SY 
However, if the 
command may be e 



age 'ENTER RESPONSE* or 
is displayed in the 
and a read of the input 
The latter allows as much 
ed as specified in a 
SLOG channel program^ 
Request key is pressed, a 
ntered instead of data. 



Pressing the Cancel Jcey, whetJ?.er 
accompanied by entered data or not, allows 
the data to be reentered. 

$$BOCfiTS may issue the following messages: 

0D08A ENTER COMMAND 

0D07D ENTER RESPONSE 

$$BOCRTT - Read Pr oces sor (Part 3 of 3) 



Moves the data (corresponding to the SYSLOG 
channel program) into the requestor's input 
area. 

Entry; From phase $$BOCETS; from phases 
$$BOCRTE and $$BOCRTF after successful 
recovery of a screen I/O error. 

Exit: To phase $$BOCRTR for continuation of 
the read channel program; to phase $$BOCRTC 
when the SYSLOG Read CCHs are handled; to 
phase $$BOCRTE if an error has occurred 
during screen I/O, 

Method: The read byte count is reduced by 
the residual count of the previous read 
operation in phase $$BOCfiTS. 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 requestor's input area, the screen 
entry area is cleared, and control is given 
to $$BOCRTC. 

If the byte count exceeds the entry area 
length, the read operation may have to be 
repeated. The data is moved to the 
requestor's input area and phase $$BOCRTR 
is fetched again- The data is not moved if 
the corresponding CCW has the sJcip flag set 
on. 

The fact that a byte count exceeds the 
amount of data entered and that the entry 
area is not yet exhausted indicates that 
the read channel program has been finished. 



$$B OCB T0 - Update Hard -Copy File 
grap-Around A ddres s 



This phase updates the wrap-around address 
in the header record, or invalidates the 
wrap-around address in the header record, 
or forces writing of the current hard-copy 
buffer;- 

Entrx: The Prmtlog utility or IJBJC7 
issues an SVCO instruction accompanied by a 
special CCH. Tiiis activates $$BOCfiTA, which 
fetches $$BOCRTU. 

$$BOCRTH fetches $$BOCRTO if overlay mode 
is entered. 

Exit: If overlay mode is active to 
$$BOCBTB, else to $$BOCRTA., 

Method; For the update function, the 
wrap-around address WRAPSKA is written to 
the header record (see Figure 12). For the 
invalidate function, the header record is 
invalidated (see Figure 12) . For the force 
I/O function, the current hard-copy bufter 
is written to the hard-copy file- 



$$BOCRTV - Command Error Message Writ er 



This phase displays error messages related 
to invalid K- and D-commands- 

Entry; From phase $$BOCRTL, $$BOCRTN, 
$$BOCRTO, $$B0CRT2, and $$B0CRT6; from 
phases $$BOCRTE and $$BOCRTF after recovery 
from screen I/O errors. 

Exi t: To phase $$BOCRTP; to phase $$B0CRT1 
when the system is in redisplay mode; to 
phase $$BOCRTE in case of screen I/O 
errors- 
Method: The cursor is set to the position 
passed in field CRTPOSil in CRTSAV by the 
different phases. This indicates to the 
operator the invalia character or 
parameter- Lines 1 through the instruction 
line of the screen are displayed. 

$$BOCRTV may issue the following messages: 

OD01A CONTROL COMMAND ERROR 

ODOUA DELETION REQUEST INCONSISTENT. 

INVALIL RANGE 
0D30A INVALID DISPLAY COMMAND 



58 DOS/VSE Logical Transients 



$$BOCRTW - Karnina fi]i£.ing. Non- Automatic 
Deletion Mode 



This phase displays message OD05A: 

1- When the system operatfes in the 

non-automatic deletion mode {DEL=N) and 
a message is issued bat cannot be 
displayed because the screen is full,, 

2, When a message is issued but cannot be 
displayed because the screen is full 
with non-deletable messages, 

Entrx: irom phase $$BOCfiTQ; from phases 
$$BOCETE and $$BOCRTF after recovery from 
screen errors. 

Exit: To phase $$BOCfiTK to analyze the 
operator's action; to phase $$BOCiiTy fehen a 
message should be displayed that exceeds 
the message area capacity; to phase 
$$BOCfiTE on screen I/O errors. 

Method: 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 
iiard-copy file, phase $$BOCfiTY is tetched- 
Otherwise, 'MESSAGE WAITING* is displayed 
in the warning line and control is passed 
to phase $$BOCRTK upon the response of the 
operator. The message area is displayed to 
show the operator that it is completely 
full. 

$$BOCitTW issues the following message: 

0D05A MESSAGE WAITING 



$$BQCgTX - Verification of Operator 
Commands during M es sage D ele tion 



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. 

Entry: From phase $$BOCfiTO (display numbers 
preceding the lines) ; from phases $$BOCHTE 
and $$BOCRTF after recovery from screen I/O 
errors^ 

Exit: To phase $$BOCETP if the operator 
cancels the deletion; to phase $$BOCRTL if 
the operator does not change the deletion 
parameters; to phase $$BOCfiTM if the 
operator sets the cursor; to pnase $$BOCETK 
if the operator changes the deletion 
parameters or enters a command other than a 
deletion command. 

Metho d; The range of deletion passed in 
field~SEGVAL2 in CETSAV is displayed in a 



corresponaing aeletion command in the entry 
area together witii the message 'DELETION 
ixEQUESTED' , which is disiplayea in the 
instruction line. The system waits for tne 
operator response. The answer is read and 
analyzed. If only tne Request Key is 
pressed, the answer is considered invalid. 
If the answer modifies the deletion range 
or the type of command, then control is 
passed 'to $$BOCi(TK. 

$$BOCRTX issues the following message: 

0D03A DELETION REQUESTED 



$$BOCRTY - Handling of Messages L onge r than 

li3.k:t Lings 



This phase nandles messages that are longer 
than eight lines. The support is for both 

DEL=N and DEL=y, 

Entry: From pnase $$BOCETW; from phases 
$:fBOCRTE and s>$BOCRTF on successful 
recovery from screen I/O errors. 

Exit: To phase $$BOCRTH when the hard-copy 
file is open; to phase $$BOCfiTI if a 
coasole printer is supported; to phase 
$$BOCRTQ when the hard-copy file is not 
open; to phase $$BOCfiTE on any screen 
error. 

Method: The message buffer 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 print-line control flag 
in the Attribute Byte in CRTSAV. After the 
lines have been displayed and printed, the 
print flag in the corresponding Attribute 
Bytes is reset. If the system is in 
non-automatic aeletion mode (D£L=N) , the 
message 'MESSAGE TOO LONG CONTINUE BY 
ENTER' is displayea and the system waits 
for the operator response. Any response 
other than pressing ENTEfi is ignored,. 
Depending on whether or not the hard-copy 
file is open, phase $$BOCRTH is fetched 
(file is open) or the internal 
line-protection flag (see Figure 10) is 
reset and phase $$BOCRTQ is given control- 
If a console printer is supported, $$BOCRTI 
is fetched. 

When DEL=Y is active, the message 'CONTINUE 
BY ENTER' is displayed in the instruction 
line, the message 'MESSAGE TOO LONG' is 
displayed in the warning line, and the 
operator's response is waited for. Then the 
procedure follows the method for DEL=N 
above, but the number of lines to be 
printed is taken from the value of the SEG 
parameter. 



Display Operator Console Support 59 



$$BOC&TY may issue the following message: 

0P06A MESSAGE TOO LONG 

CONTINUE BY ENTEfi (in warning line) 



$$riQCitTZ - Chann el Program Analyzer 



After tne various checks have been 
completed, phase $$BOCETZ fetches the 
proper processing phase to handle all CCWs 
that are considered valid by $$BOCfiTZi If 
phase $$BOCJiTZ finds that a CCW chain is to 
be discontinued, it also passes tfte address 
of the first invalid CCW in the chain to 
the processing phases. 



This phase diagnoses and checks any 
user-supplied CCW or CCW chain for 
validity. The status of the diagnostic run 
is reflected 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 encountered. 



$$B0CfcT1 - Message Bedi s play (Part J[ of 6) 



This phase allows new display commands to 
be entered when the system is in redisplay 
mode. 



Entr y; From phase $$60CfiTA to analyze the 
channel program. 

Exit; To phase $$BOCBTA if the next CCW to 
be processed is in error, to phase $$BOCi(TC 
if the next CCW to be processed is a Wrxte, 
NOP, or Alarm CCW; to phase $$BOCBTE 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 $$BOCiiTfi if the 
next CCW to he processed is a liead 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. 

Method: On entry from phase $$BOCfiTA, 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 performed; 

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).. 

4. Check for valid or protected I/O area 
address (omitted if the CCW is not a 
user-supplied CCW, if it is a NOP or 
Audible Alarm CCW, or if the Skip bit 
is set to 1) - 

The current status of the checks performed 
is registered in a CSW that is returned to 
the user. This CSW will contain the correct 
resxdual count, the correct status 
information, and the correct CCW address + 
8. However, before the CSW is returned to 
the user, it may be modified by the 
processing phases if these phases detect an 
error or if an interrupt condition occurs 
during processing.. 



Entry: From phase $$B0CET4; from phases 
$$B0CttTE and $$BOCi(TF after recovery from 
screen I/O errors; from phase $$BOCRTV 
after a redisplay command error. 

Exit; To phase $$B0CfiT6 if only the ENTEfi 
Key is pressed; to phase $$B0CfiT2 if a 
D-command is entered; to phase $$B0CilTE on 
any screen I/O error- 
Method: Any pending request indicated in 
CicTFLG2 in C&TTAB or a second entry in the 
channel queue causes 'MESSAGE WAITING' to 
be displayed in the warning line.. The phase 
waits for an Attention interrupt provided 
such an interrupt is not already pending. 
The entry area is read and the input 
checked.. A CANCEL encountered in the input 
area causes the process just described to 
be repeated,. 

Pressing the Request key is an invalid 
operation during redisplay and causes the 
message 'REQUEST IGNORED' to be issued. 
The message 'INVALID DISPLAY COMMAND' 
appears if any data that does not begin 
with a 'D' has been entered. 

$$B0CRT1 may issue the following messages: 

0D30A INVALID DISPLAY COMMAND 

0D97A REQUEST IGNORED 

0D05A MESSAGE WAITING 



$$B0CRT2 - Message Redisplay (Part 2 of 6) 



This phase examines the parameters of the 
redisplay command on first entry to 
redisplay. 

Entry: From phase $$BOCflTK on entry to 
redisplay; from phase $$B0CRT1 during 
redisplay. 



60 DOS/VSE Logical Transients 



Exit : To phase $$BOCRTV when tiie command 
contains a syntax error; otherwise, to 
phase $$B0CfeT6. 

Method; The whole command is transformed 
into uppercase characters. The command is 
scanned and an indicator is set foi: each 
parameter which is essential for redisplay 
(for instance, partition parameter or 
forward or backward parameter). 

If the syntax of the command is violated, 
exit is to phase $$BOCfiTV. This happens in 
the following cases: 

• First character is no 'D', 

• Second character, if any, is not blank- 

• Second character is clank but the next 
non-blank character is neither 'L' nor 

• E» , 

• An 'E' is immediately followed by a 
non-blank character. 

• An 'L' is not immediately followed by a 
blank or a comma. 

• One of the parameters 'ALL*, 'BG', 
•AE', 'Fl*, *.., 'B', *F\ is not 

followed by a comma or blank. 

• A parameter that follows one of the 
preceding parameters is neitner 'fi' nor 
a decimal digit, or is a decimal number 
with more than three digits. 



Entry: From pJiase $$B0CET3 to display the 
screen during refdisplay; from phases 
$$BOCiiTE and $$BOCETF after recovery from 
screen I/O errors; from phase $$B0CitT5 on 
exit from redisplay. 

Exit: To phase $$i30CfiTP on exit from 
redisplay; to phase $$B0CfiTl; to phase 
$$b0CBTE on any screen I/O error- 
Method: When redisplay should be finished 
according to the current command, the 
screen is restored as it was before the 
redisplay mode was entered. 

•**« END OF FILE ***» or • *** BEGIN OF FILE 
***• is indicated on the .screen when the 
disk address ACTDSKA (where the next record 
is to be written by phase $$BOC£TH) Jaas 
been reached by redisplaying forward or 
backwara 'NO aORh MESSAGES ON tiC FILE' 
appears xf attention routine messages or 
all messages are redisplayed and no more 
messages are available. 

In any case, tue instruction line is 
written to indicate to the operator: 

• That the system is in redisplay mode. 

• Tae direction of redisplay (forward or 
backward-) 

• The numbier of lines between the current 
image and the (curren-tly) last record 
on the file.. 

If the partition is specified in the 
redisplay commana, it is also indicated- 



$$B0CRT3 - Message Redisplay (Part 3 of 6) 



iiB0CRT5 - Message Red i spl ay (Part 5 of 6) 



This phase reads from the hard-copy file 
according to the parameters specified in 
the current redisplay command. 

Entry: From phase $$B0CRT6. 

Exit: To phase $$B0CRT4 to write to the 
screen; to phase $$B0CRTB on a disk error. 

Met hod; Using the current redisplay command 
parameters, which are passed in flags and 
counters, the disk channel program is 
updated to read the hard-copy records to be 
displayed next. 



$$B0CRT4 - Message Redis£lax (Part 4 of 6) | 



This phase displays eight message lines 
read from tae hard-copy file. 



This phase saves the current screen image 
on entry to redisplay mode and restores the 
screen image on exit from redisplay mode. 

Entry- From phase $$B0CRT6. 

Exit; To phase $$B0CRT6 on entry to 
redisplay mode; to phase $$BOCfiTP if tne 
hard-copy file is not open; to phase 
$$B0CRT4 on ^xit from redisplay mode; to 
phase $$BOCkTB on hard-copy disk errors. 



Method: Th 
and CCB/IO 
screen ima 
from) reco 
1 through 
screen ima 
(see Figur 
I/O error 
redisplay 
be lost- 



e hard-copy d 
kb are reloca 
ge area is sa 
rds 1 through 
20 (for tne 3 
ge buffer in 
e 12). If an 
occurs, phase 
and the curre 



isk channel program 
tea- The current 
ved in (or restored 

8 (for the 125D) or 
277/3278) of tne 
the iiard-copy file 
irrecoverable disk 
SSBOCiiTB rinishes 
nt screen image may 



Display Operator Console Support 61 



$$B0CfiT5 may issue the following message: 

0D37I EC FILE NOT OPEMED, REDISPLAY NOT 
POSSIBLE 



$$B0CBT6 - Message Redisplay (Part 6 of 6) 



This phase checks the current redisplay 
command parameters for logical consistency. 

Entry; From phase $$B0CfiT2 on entry to 
redisplay; from phase $$B0CRT5 after saving 
the current screen image; from phase 
$$B0CB:T1 if only ENTER has been pressed 
during redisplay- 



Exit: To phase $$B0CfiT7 if any logical 
error in the command is detected; to phase 
$$B0CRT3 if phase $$B0CRT6 is fetched—only 
for relocating the hard-:;opy disk CC«s and 
CCB/IOKB; to phase $$B0CRT5 on the first 
entry to redisplay. 

Method ; The partition parameter is the only 
essential subparameter allowed on entry to 
redisplay. If the partition parameter is 
specified in the first redisplay command, 
the line counter used during redisplay is 
set to zero and phase $$B0CRT5 is fetched. 
The same is true if 'ALL* is specified 
explicitly or applied by default- 



62 DOS/VSE Logical Transients 



CHECKPOIMT/RESTART ROUTINES 



Checkpoint is a record of the status of a 
problem program taken at desired intervals. 
R est art is the resumption in the execution 
of the program from one of the checked 
points, rather than from the beginning, if 
processing terminates for any reason before 
the normal end-of- job- 



Hhen a problem p 
for an extended 
should be made f 
information peri 
This information 
the job and the 
scatus, register 
are written. Thu 
checkpoint posit 
processing is te 
before the norma 
processing termi 
such as a power 



CHECKPOINT 



rogram is expected to run 
period of time, provision 
or taking checkpoint 
odicaily during the run,, 
describes the status of 
system (storage, I/O 
s) at the time the records 
s, restarting at the last 
ion is possible if 
rminated for any reason 
1 end-of-job. For example, 
nates if a malfunction, 
failure, occurs- 



A CHKPT macro must be issued to write a 
checkpoint- The CHKPT macro expansion 
fetches the checkpoint transient program 
$$BCHKPT to write a checkpoint on a 
specified tape unit, or $$BCHKPD to write 
the checkpoint^^Ntt^ ^ disk.. Any number of 
checkpoints (up to decimal 9999) can be 
taken on the same unit. A number in the 
checkpoint header label identifies a 
particular checkpoint. 



If the checkpoin 
magnetic tape fi 
(defined by the 
the labels must 
OPEN macro or by 
before the first 
the checkpoint i 
user must define 
MOUNTED=£'INGLE, 
the file before 
A CISIZE paramet 
is ignored by th 
routines. 



t is taken on a separate 
le with standard labels 
user with a DTFPH macro) , 
either be checked by an 
passed by an MTC command 

checkpoint is taken. If 
s taken on t disk file, the 

(by a DTFPH macro with 
TYPEFLE=OU?'PUT) and open 
a CHKPT macro is issued, 
er defined with the DTFPH 
e checkpoint/restart 



Checkpoint does no t save the following: 

• The SVA and the system GETVIS area- If 
a checkpointed program uses phases in 
the SVA or occupies space in the system 
GETVIS area, the user must make sure 
that the same locations are occupied at 
restart time- 



• The floating-point registers. 

• Any linkages to the checkpointed 
program set up by the STXIT or SETPFA 
macros. 

• Any XECBs defined by the checkpointed 
program. 

• Any timer values set by the SETIME 
macro. 

• The program mask in the checkpointed 
program's PSW. 

If reguired, this information must be 
defined at restart time by a user restart 
routine. 

Note: A checkpoint must not be taken if any 
gating mechanism is in use by the 
checkpointed program (for example, 
USE/RELEASE) . 



CHKPT Macro 



The CHKPT macro instruction has the 
following format: 



Name 



Operation Operands 



[name] CHKPT 



SYSnnn, trest-addr | (r1) } 
[ ,end-addressl , (r2) ] 
[ ,tpointer | , (r3) ] 
[ ,dpointer | , (r4) ] 
[ , filename 1 , (r5) ] 



For an explanation of the operands, see 
DOS^SE Macro Reference, GC2U-51U0,. 

The checkpoint macro generates a 28- or 
32-byte field with the format shown in 
Figure 13 when the fifth and/or sixth 
operands are specified- If these operands 
are omitted, bytes 14-19 do not appear, and 
a 22-byte field is generated. 

The macro then generates a calling seguence 
that places the address of this field in 
register and the address of the tape or 
disk checkpoint logical transient name in 
register 1, and issues an SVC 2 to fetch 
the transient phase. 



Checkpoint/Restart Routines 63 



£ii§£K£oiili i21itise§ (see Chart 23) 



The CHKPT macro determines the checkpoint 
device type and fetches the appropriate 
routine. If the checkpoint device is a 
tape, phases $$BCHKPT, $$BCHKP2, and 
$$BCHKP3 are fetched.- If the checkpoint 
device is a disk, phases $$BCHKPD, 
$$BCHKPE, $$BCHKPF, and $$BCHKPG are 
fetched. The phases check the conditions 
necessary to take a checkpoint and write 
the checkpoint records on the specified 
device- 

1o write an error (or the 'successful*) 
message, the common phase $$BR{1SG1 is 
called. If the checkpoint was successful 
and a tape reposition table is specified, 
$$BCHK3G is fetched to perform an 'erase 
gap on open tape output files'. Control is 
then returned to the problem program. 



Bytes 



0-3 
(0-3) 



4-7 
(4-7) 



8-1, I 
(8-B) 



12 
(C) 

13 

14-21 
(E-15) 



14-15 

(E-F) 

16-19 
(10-13) 



20-27 
(14- IB) 

20-23 
(14-17) 



24-31 
(18-1F 



Contents 



A four-byte address or X'FF' 
followed by a three-byte 
register number to specify 
a restart address, 

A four-byte address or X'FF' 
followed by a three-byte 
register number to specify a 
high byte address. This field 
is zeros if the end address is 
not specified, 

A four-byte address or X'FF' 
followed by a three-byte 
register number to specify 
tape reposition status infor- 
mation. This field is zeros 
if 'tpointer' is not specified. 

X'01' 



The system unit number from 
sysxxx- 

C'$$BCaKPT' if CHKPT device 
is a tape and 'dpointer' 
is omitted. 

X'OOOO' 



A four-byte address or X'FF' 
followed by a three-byte 
register nusiber to specify 
DASD verification information. 
This field is zeros if 
•dpointer' is not specified. 

C'$$BCHKPT' if the filename 
parameter is not specified. 

A four-byte address of the 
user-specified DTFPH for the 
disk checkpoint file, or X'FF' 
followed by a three-byte 
register number (where the 
register must contain the four- 
byte address of the DTFPH 
table) . 

C'$$BCHKPD' if the filename 
parameter is specified^ 



Numbers in parentheses are displacements^ 
in hexadecimal notation- 



Figure 13, Information Field Generated by 
CHKPT Macro 



64 DOS/VSE Logical transients 



RESTART 



Control statements necessary to restart a 
job from a checkpoint are: 

1. JOB statement specifying the same job 
name as the checkpointed job« 

2. ASSUN statements for assigning I/O 
devices to symbolic unit names. 

3. DL6L and EXTENT statements of the 
checkpoint file if the file is located 
on disk and if user labels are used. 

4. RSTRT statement specifying the unit: 
that contains the checkpoint, and the 
checkpoint ID number taken from the 
message that was printed when the 
checkpoint was taken. 

The format of the RSTRT statement follows: 

// RSTRT SySxxx,nnnn,£ filename] 

SYSxxx Symbolic unit name of the device 
on which the checkpoint records 
are stored^ This unit must have 
been previously assigned.^ 

nnnn Identification of the checkpoint 
record to be used for restarting. 
This serial number is four 
characters. It corresponds to the 
checkpoint identification used 
when the checkpoint was taken. 

filename Symbolic name of the disk 

checkpoint file to be used for 
resi^.artiug. It: must be identical 
to the filename of the DTFPH to 



describe the disk checkpoint file 
and the fifth parameter of the 
CUKPT macro instruction,. This 
operand applies only when a disk 
is specified as the checkpoint 
device. 



fiSStaEt £2ii tines (§ee C ha rt 23) 



The job control phase $JOBCTLK checks the 
RSTRT statement for syntactical correctness 
and buildG a parameter list. Control is 
then passed to tne'job control phase 
$JOBCTLB which determines the restart 
device, locates the checkpoint, reads the 
header, save, 3800-printer, and Extent 
records, checks the RSTRT partition whether 
the required functions are supported and 
whether the partition allocations match 
those at checkpoint time, restores required 
parts of the partition communication 
region, and clears the partition. 

Job control then fetches phase $$BRSTRT 
which restores PFIX information and the 
problem program area. 

If DASD verification and/or tape 
repositioning is required, $|iBRSTR2 is 
fetched. 

If no error condition occurs, control is 
passed to the restored program. $$BRI1SG2 is 
fetched to write an error message and 
cancel the program or to write an 
information message and continue fetching 
$$BRSTR2 or cancel the program, depending 
ou the operator's reponse. 



Checkpoint/Restart Routines 65 



Chart 23, Checkpoint/Restart Routines 



/entry FROftA 
\CHKPT macro/ 



SSBCHKPT Chart SA 



1. Test if checkpoint 
can be taken 



YES 
2. Build CHKPT 
header record 




DISK 



$$BCHKPD Chart SD 



1. Test if checkpoint 
can be taken 



NO 



$$BCHKP2 Chart SB 



1. Write CHKPT header 
record 

2. 3800-Printer infor- 
formation to save 



YES 




3. Build an'd write 
extent records if 
applicable 

4. Build and write 
PFIX records if 
applicable 

5. Write core dump 
records 



iRMSGI Chart SJ 



1. Write message 
on SYSLOG 




YES 

2. Set CHKPT -ID in 
partition commu- 
nication region 
and partition 
save area 



$$BCHK3G Chart SK 



Erase gap on unclo- 
sed output files if 
required 



$$BCHKP3 Chart SC 



Build and write 3800 
information records 



NO 




ERROR 



YES 





YES 
2. Build CHKPT 
header record 



$$BCHKPE Chart SE 



1. Complete test if 
checkpoint can 
be be taken. 



2. Complete and write 
header record 

3. 3800-Printer infor- 
mation to save 




$$BCHKPG Chart SG 



Build and write 
3800 information 
records 



I 'YES 



-*^ pre 




ERROR 



NO 



$$BCHKPF Chart SF 



1. Build and write 
extent records 
if applicable 

2. Build and write 
PFIX records if 
applicable 



SVC 1 1 to 
problem progra 



m) 



66 DOS/VSE Logical Transients 



(ENTRY FROmN 
SJOBCTLK J 



$J0BCTLB 



1. Locate CHKPT 
on specified file 

2. Read CHKPT 
header record 

3. Check if RSTRT 
possible 

4. Restore 3800 
information if 
applicable 

5. Restore 
extent infor- 
mation if appli- 
cable 




YES 
6. Write message 
on SYSLOG 

and 



7. Set up required 
partition for 
restart 



(Cancel A 
SVC 6 y 



J RSTRT Ch.SL,SIVI 



Restore PFIX 
information if 
applicable 
Restore core 
dump records 



Error 
detected 




NO 

3. Tape repositioning 
or DASD verifica- 
tion required 



<r 



4. Set up user-speci- 
fied restart 
address 



Un 



$$BRSTR2 Ch.SN, SP 



1. Reposition required 
tapes 

2. Get required 
DASD information 



3. Set up user-speci- 
fied restart 
address 



$$BRMSG2 Chart SO 



1 . Write message on 
SYSLOG 




YES 



(Cancel A 

(SVC 6) J 



SVC 1 1 to 
problem progra 



im y 



iiBCHKPT - Ta^pe Ch ec kpoint Phase J. 

This phase detecmines if the checkpoint can 
be taken and starts building the checkpoint 
header and save record- 

Entry; From a ChKPT macro expansion when 
the unit on which the checkpoint is taken 
is a magnetic tape device. 

Exits: To $$BCHKP2 to complete the 
checkpoint, or to ISBRMSGI to print an 
error message indicating the error 
contlition- 

MetLiod ; The CHKPT macro provides phase 

$$BCHKPT with the address (in register 0) 

of the checkpoint parameter list (see 
Figure i13)- 

This phase determines if 

- the checkpoint is issued by a maintask 

- no subtasks are attached to this 
maintask 

- no I/O is pending on a TP-device 

- no tracks/blocks are held 

- the checkpoint device is a tape 

- the user-specified end address is 
valid- 

If the end address is not supplied by the 
user, the partition logical end address 



will be used (PPEND from the partition 
communication region) - 

If the GETVIS flag in the partition 
communication region is on, the 
user-specified or logical end address is 
ignored and the whole partition will be 
saved- 

The phase then calculates 

the number of fl6K partition dump 
records- 

the number of PFIX information records 
(if PFIXing has taken place)- 

the number of extent information 
records (if DASD file protection is 
supported and an entry in the JIB table 
or system extent area exists). 

the number of 3800-printer information 
records (if the 3800 printer is 
supported and assigned) - 

The calculated values are stored in the 
checkpoint header and save record area in 
the common workarea of the tape checkpoint 
phases - 

$$BCaKPT also retrieves and stores (in the 
header and save record area) any necessary 
partition communication region information, 
the updated checkpoint-ID, and the 
partition allocations. 

Tiae layout of the header and save record is 
shown in Figure 14. 



Checkpoint/Restart Routines 67 



r 1 

1 TAPE i DISK I 1 
1 Bytes i Bytes 1 CONTENTS j 


1 0-11 10-11 i /// CHKPT // (Checkpoint header record-id), | 
1 (0-B) 1 (0-B) 1 i 

1 12-13 1 12-13 J Number of program dump records (in binary format) | 
r (C-D) 1 (C-D) 1 ( 

j 14-15 1 14-15 1 Disk: Not used | 
1 (E-F) 1 (E-F) 1 Tape: Number of checkpoint records following the header record (in| 

1 j ( PFIX information records, the program dump records, the save and | 
1 1 i the trailer record- This field is used by MTMOD to skip a CHKPT J 
1 1 1 file located in a user data file and by Restart to skip a CHKPT j 
i 1 1 file while scanning a tape for a requested CHKPT. | 

i 16-19 j 16-17 i Tape: Checkpoint identification number in unpacked decimal f ormat- | 
j (10-13) j (10-11) a Disk: Checkpoint identification number in binary format- ( 

i i 18-19 j Only for checkpoints on FBA-devices: | 
1 1 (12-13) 1 Byte 0: Number of blocks needed for information records | 
i i 1 Byte 1: Number of blocks needed for program dump records { 


i For tape checkpoints the above is the header and trailer record layout.. The following | 
j information is stored in the save record- ( 
i For disk checkpoints this is one record (header record). j 


i 0-3 1 20-23 i Highest storage address checkpointed | 
1 (0-3) i (14-17) 1 i 

1 4-67 1 24-87 J Values of general registers from the partition save area (9-15, | 
1 (4-43) 1 (18-57) 1 0-8) i 

1 68-87 i 88-107 1 Partition communication region bytes 12-31 | 
J (44-57) 1 (58-6B) i | 

1 88-97 J 108-117 i Partition communication region bytes 36-45 | 
i (58-61) i (6C-75) J 1 

1 98-99 1 (118-1.19 i Partition communication region bytes 56-57 | 
1 (62-63) 1 (76-77) i 1 

i 100-101 i 120-121 1 Partition communication region bytes 92-93 | 
1 (64-65) 1 (78-79) | { 

i 102 i 122 i Partition communication region byte 78 1 
1 (66) J (7A) 1 i 

1 103 i 123 1 Partition communication region byte 98 bit and byte 134 bit 7 { 
1 (67) 1 (7B) 1 i 

i 104 1 124 1 Byt6 12 of the partition PIB 1 
1 (68) i (7C) ( 1 



Figure 14, Checkpoint Header and Save Record Format (Part 1 of 2) 



68 EOS/VSE Logical Transients 



105 
(69) 



106-107 
<6A-6B) 

108-127 
(6C-7F) 

,128-147 
(80-93) 

148-149 
(94-95) 

150-151 
(96-97) 

1152-153 

.(98-99) 

154-151 
(9A-9F) 



125 
(7D) 



126-127 
(7E-7F) 

128-147 
(80-93) 

148-167 
(94-A7) 

168-169 
(A8-A9) 

170-171 
(AA-AB) 

fl72-173 

(AC-AD) 

174-179 

(AE-B3) 



Checkpoint configuration flag: 
X'01« Real (runmode of CHKPT 

part.) 
X'02' GETVIS flag on 
XI 04' PFIX records saved 
X'08' DASD file protect option 



XM0« CHKPT device FBA 

X«20' CHKPT device tape 

X«40' ECPS:VSE-Mode 

X«80' 370-Mode 



Length of job label area saved from the partition save area 



Temporary partition boundaries 



Permanent partition boundaries 



Number of PFIX information records 



Number of extent information records 



Number of 3800-printer information records 



Volume serial number of SYSCAT 



Figure 14. Checkpoint Header and Save Record Format (Part 2 of 2) 



ilBCHKP2 - Ta£e Checkpoint Phase 2 



This phase completes and builds the 
checkpoint records and writes them on the 
specified tape- 

Entry: From $$BCHKPT to start writing the 
checkpoint and from $$BCHKP3 to continue 
the checkpoint after 3800-printer 
information records have been written- 

Exit; To $$BCHKP3 to build and write 3800 
printer information records, to $$BRHSG1 to 
write an error (or the 'successful') 
message. 

Method: The information needed to continue 
the checkpoint is passed to $$BCHKP2 in the 
common workarea located in the second part 
of the logical transient area and pointed 
to by a register loaded in $$BCHKPr- 

To complete the header and save record, the 
number of checkpoint records following che 
header is calculated and stored, and (if 
tequired) the volume serial number of the 
device assigned to SYSCAT is retrieved and 
stored. 



The phase then 

writes the header and save record on 
the checkpoint tape (for format see 
Figure 14). 

calls $$BCHKP3 if 3800-printer 
information records are to be written 
(for format see Figure 17) . 



builds and writes extent i 
records if DASD file prote 
supported- For disk device 
programmer units, extent i 
saved from the JIB and the 
extent area^ and for SYSCA 
information is saved from 
extent area. (For the form 
information records, see F 



nf ormation 
ction is 
a assigned to 
nformation is 

system 
T extent 
the system 
at of extent 
igure 15) - 



builds and writes PFIX information 
records. The PFIX information is 
retrieved by using the PFIXCHPT macro 
which returns the PFIX information in ; 
supplied workarea (for format see 
Figure 16). 

writes program dump records- 
writes the trailer record (same as the 
header record) - 



Checkpoint/Restart Routines 69 



Bytes 



0-2 
(0-2) 

3 
(3) 



4-5 
(4-5) 



6-7 
(6-7) 

8 
(8) 

9 
(9) 



10-11 
(A-B) 



12-13 

(C-D) 

10-13 
(A-D) 

14-17 
(E-11) 



Contents 



'XTN' (extent record-id) 



Flag Byte: 

X'00« extents from JIB table 
X»01' extents from system 

extent area 
X'02« SYSCAT extents saved 

Number of extent entries 
in this record (max. 20); 
each entry is 12 bytes long 
and is formatted as follows: 

cuu of logical unit 



PUB device type code 



Extent type-id: 

a) if extent is from JIB table: 
X«20« 2311, 2314 or 2319 
XMO* 3330, 3340 or 3350 

b) if extent is from system 
extent area: 

X*40« Short form used 
X»00' Long form used 

Lover and upper extent for 
2311, 2314 or 2319; 
Lower extent for 3330, 
3340 or 3350 

Not used for 2311, 2314 or 2319; 
Upper extent for 3330, 
3340 or 3350 

Upper extent from system 
extent area 

Not used if extent is from 
JIB table; 

Lower extent from system 
extent area 



Figure 15. Format of Extent 

Information Record 



Records are written without repositioning 
the user-specified tape. The following 
record lengths (in bytes) are used: 



Header record 

Save record 

3800-printer, extent, 
and PFIX information 
records 

Program dump records 



20 
160 

each 256 
16K 



Last program dump record 
(multiple of 2K) 2 to 16K 



Trailer record 



20 



If end-of-reel is encountered while 
checkpoint records are being written, the 
tape is backspaced to where it was 
initially positioned, and the header record 
is scratched. Alternate tapes assigned for 
the checkpoint file are not checked. 

TJhen $$BRMSG1 is called to write an error 
message and to return control to the user 
program. Header and trailer records are 
written in user mode, while the save 
record, extent records, and program storage 
dump records are written in data conversion 
mode. The density remains the same for all 
records. 

When a checkpoint has successfully been 

taken, $$BRMSG1 is called to write the 

•successful' message and to return to the 
user program.. 



I Bytes 



Contents 



J , 



•PFIX' (PFIX record-idj 



Information as retrieved 
via PFIXCHPT macro ■ 



I 0-3 

I (0-3) 

I 

I 4-256 

I (4-100) 

Figure 16. Format of PFIX Information 
Record 



Bytes 



0-3 
(0-3) 

4-5 
(4-5) 

6-7 
(6-7) 

8-76 
(8-4A) 



Contents 



•PRT • (3800-printer record-id) 



Logical unit number 



Reserved 



Information as retrieved 
via QSETPRT macro 



Figure 17. Format of 3800-Printer 
Information Record 



M&£SK£3 - Tape Ctiieck£oint Phase 3 



This phase builds 3800-printer information 
records and writes them on the specified 
tape checkpoint file. 



70 DOS/VSE Logical Transients 



Entry: From $$BCHKP2-. 

Exit: To $$BCHKP2 or, in case of errors, to 
$$BRHSG1. 

Method: The information required to build 
and write the 3800-printer inforiaation 
records is passed to $$BCHKP3 in the common 
workarea of the checkpoint phases pointed 
to by a register loaded in $$BGHKPT- 

This phase detects the logical units to 
which a 3800 printer is assigned, sets up 
t:he workareas and I/O areas, and retrieves 
^he 3800-printer information using the 
QSETPRT macro- 

Xf no error is returned by the macro, the 
3800-printer information record is written 
on the checkpoint tape, one for each 
printer assigned- (For the format of the 
3800-printer information record see Figure 
17)- If the whole partition LUB table is 
scanned, phase $$BCHKP2 is fetched to 
coatinue the checkpoint. 



$1B.CHKPD - Disk Check£oint Phase 1 



This phase determines if the checkpoint can 
be taken and starts building the checkpoint 
header record, 

Entr^: From the CHKPT macro expansion if a 
disk device is used as the checkpoint unit. 

Exits: To $$BCHKPE if the checkpoint is to 
continue; to $$BRMSG1 to write a diagnostic 
message on SYSLOG and to re»-urn control to 
the problem program if a checkpoint cannot 
be taken. 

Method ; The CHKPT macro provides phase 
$$BCHKPD with the address (in register 0) 
of the checkpoint parameter list (see 
Figure 13) .. 

This phase determines if 

the checkpoint is issued from a 
maintask 

no subtasks are attached to this 
maintask 

no tracks/blocks are held 

the DTFPH is open, mounted single, and 
an output file 

the checkpoint device is valid 

the user-specified end address is 
valid- 



If the end address is omitted, the 
partition logical end address will be used 
(PPEND from the partition communication 
region) - 

If the GETVis flag in the partition 
communication region is on, the 
user-specified or logical end address is 
ignored and the whole partition will be 
saved. 

The phase then calculates 

the number of 2K program dump records 
for 2314, 3330, 3350, and FBA devices, 
or of IK program dump records for 2311 
or 3340 devices- 

the number of blocks needed for 
information records and program dump 
records for FBA devices, 

the number of extent information 
records (if DASD file protection is 
supported and an entry in the JIB table 
or system extent area exists) , 

the number of 3800-printer information 
records (if the 3800 printer is 
supported and assigned) - 

The calculated values are stored in the 
checkpoint header record area (see Figure 
14) in the common workarea and I/O area cf 
the disk checkpoint phases- 

$$BCHKPD also saves the registers from the 
problem program save area, the temporary 
partition boundaries, and the volume serial 
number of SYSGAT, which is necessary if 
extent information is to be saved (provided 
VSAM is supported^ SYSCAT is assigned, and 
extents are found in the system extent 
area) - 



;bCHKPE - Disk Checkpoint Phase 2 



This phase continues checking the required 
checkpoint conditions and building the 
checkpoint header rtjcord, and writes the 
checkpoint header record on the checkpoint 
file. 

IHiEi: ^^om $$BCHKPD. 

Exit: To $$BCHKPF if the checkpoint is to 
continue; to $$BCHKPG if the checkpoint is 
to continue and 3800-printer information is 
to be saved; to $$BRMSG1 if a checkpoint 
cannot be taken. The message writer is 
called to write a diagnostic message on 
SYSLOG, and to. return control to the 
problem program- 



Checkpoint/Bestart Routines 71 



Method: Ttie iaforniation needed to continue 
the checkpoint is passed to $$BCHKPE in the 
common workacea located in the second part 
of the logical transient area and pointed 
to by a register loaded in $$BCaKPD« 

This phase 

calculates the number of PFIX 
information records needed (if PFIXing 
is supported and has taken place) « 

determines if enough space has been 
allocated for this checkpoint. If 
checkpoints are already in the 
specified file and the remaining spiace 
does not suffice to contain the current 
checkpoint, the file is used from the 
beginning and the existing 
checkpoint (s) is (are) owerwritten by 
the current record- 
checks that no I/O request is pending 
on a teleprocessing device belonging to 
the checkpoint partition- 
completes the checkpoint header record 
by moving the required partition 
communication region information, 
setting the checkpoint-id, and saving 
the permanent partition allocations. 

initializes the channel programs for 
the specified checkpoint device^ 

writes the header record on the 
checkpoint file. 



$$BCHKPF - Disk Check2oint Phase 3 



This phase builds and writes checkpoint 
records on the checkpoint disk file.. 

Entri: Prom $$BCHKPE or from $JfBCHKPG if 
3800-printer information records are 
written- 

Exit ; To $$BRMS61, the message writer, 
which writes a message on SYSLOG indicating 
that a successful checkpoint was taken. 

Method; The information needed to build and 
write the checkpoint records is passed to 
$$BCHKPF in the common workarea of the 
checkpoint phases located in the second 
part of the logical transient area and 
pointed to by a register loaded in 
$$BCHKPE. 

The phase 

builds and writes extent information 
records if DASD file protection is 
supported. For disk devices assigned to 



programmer units, extent information i^ 
saved from the JIB table, and for disk 
devices assigned to SYSCAT, extent 
information is saved from the system 
extent area. (For the format Of extent 
information records, see Figure 15.) 

builds and writes PFIX information 
records. The PFIX information is 
retrieved by using the PFIXCHPT macro 
which returns the PFIX information in a 
supplied workarea (for format, see 
Figure ^6) . 

writes program dump records on the 
checkpoint file.. 

The records are written with the following 
lengths (in bytes) : 

Header record 180 

3800-printer, extent, and 

PFIX information records each 256 

Program dump records on 
2314^ 2319, 3330, 3350, 
and FBA devices 2K 

Program dump records on 

23111 and 3340 devices IK 

The block numoer needed to write an 
information or program dump record on an 
FBA device is calculated by $$BCHKPD and 
depends on the block size of the device. 



5$BCHKPG - Disk Check£oint Phase 4 



This phase biilds 3800-printer information 
records and writes them on the disk 
checkpoint file. 

Ent£i: From $$BCHKPE. 

Exit: To $$BCHKPF to continue the 
checkpoint, or to $$BfiHSG1 to write an 
error message on SYSLOG. 

J!§^ll2S: The information necessary to build 
and write the 3800-printer information 
records is passed to $$BCHKPG in the common 
workarea of the checkpoint phases pointed 
to by a register loaded in $$BCHKP£. 

This phase detects the logical units to 
which a. 3800 printer is assigned, sets up 
the workareas and I/O areas, and retrieves 
the 3800-printer information using the 
QSETPfiT macro. 

If no error xs returned from the macro, the 
3800-printer information record is written 
on the checkpoint file, one for each 



72 DOS/VSE Logical Transients 



printer assigned. (For the format of the 
3800-printer information record, see Figure 
17), If the whole partition LUB table is 
scanned, phase $$BCHKPF is fetched to 
continue the checkpoint- 



$$BCHK3G - Tape and Disk Checkpoint, Last 
Phase 



Objecti ve : To perform an erase-gap command 
for output files that are not closed from 
the tape repositioning table for logical 
files- 

Entrx: From $$BRMSG1 if a successful 
checkpoint was taken.. 

Exit: To the user via an SVC 11; to 
*$BRMSG1 to write a warning message if 
errors in the user-supplied reposition 
table are detected- 
Method: The addresses of the checkpoint 
parameter list and the partition save area 
are supplied in registers by $$BRMSGi. 
If a tape reposition table for logical 
files is specified, that table is scanned, 
and for each specified output tape an erase 
gap command is performed- Any entry which 
is not of the expected type (DTFMT) or not 
for a tape device is ignored and message 
0C18I ERRORS DETECTED IN REPOSITIONING 
TABLE is issued.. When the end of the table 
is reached and no error was found, control 
is given to the user issuing an SVC 11, If 
errors are detected, $$BRMSG1 is called to 
write a message. 



iiBRMSGl - Checkpoint Message Writer 



This phase builds and writes checkpoint 
messages and returns control to the user, 
or fetches the erase-gap routine $$BCHK3G- 

Entr^: From phase $$BCHKPT, $$BeHKP2^ 
$$6CHKP3, $$BCHKPD, $^BCHKPE, $$BCHKPF, 
$$BCHKPG or $$BCHK3G, with registers 2 to 6 
loaded with information necessary to get 
and complete the message text- 
Exit: Depends on the kind of message 
written- 

• For an internal error message a dump is 
issued and the job is canceled.. 

• For an error message, register zero is 
cleared and given to the user via the 
partition save area. The user is given 
control via SVC ill.. 



• For the ■successful* message, the 
checkpoint cumber is updated^ in the 
partition communication region and 
stored in register zero within the 
partition save area (in unpacked 
decimal format), if a logical 
reposition table is specified for the 
current checkpoint, control is given to 
$$BCHK3G; otherwise control is given to 
the user via SVC 11- 

Method: The specified message number is 
used to gat the address of the 
corresponding message text, and to 
calculate the values necessary to convert 
and complete the message text.. The message 
is written on SYSLOG using physical lOCS- 

$$BRI1SG1 may issue the following messages: 

OCOOI CHKPT MO- xxxx kAS TAKEN ON 

SYSxxx=cuu 
0C02I CHKPT LOGICAL UNIT NOT TAPE 

SYSXXX=CUU CHECKPOINT IbNORED 
0C03I I/O REQUEST PENDING ON TP DEVICE 

CHECKPOINT IGNORED 
0C04I INVALID END ADDRESS SPECIFIED 

CHECKPOINT IGNORED 
0C05I CHKPT DTFPH IS NOT OPEN 

FILE=filename CHECKPOINT IGNORED 
0C06I CHKPT DTFPH MOUNTED=ALL 

FILE=filename CHECKPOINT IGNORED 
0C07i CHKPT DTFPH NOT OUTPUT 

FILE=filename CHECKPOINT IGNORED 
0C08I CHKPT UNIT NOT A VALID DISK 

SYSXXX=CUU ChECKCOINT IGNORED 
0C09I INSUFF- SPACE ALLOCATION 

FILE=filename CtiECKJPOINT IGNORED 
0C10I SUBTASK ISSUED CHKPT 

CHECKPOINT IGNORED 
0C11I SUBTASKS ATTACHED 

CHECKPOINT IGNORED 
0C1 21 TRACKS HELD 

CHECKPOINT IGNORED 
0C13I INSUFF.. SPACE FOR CHKPT ON 

SYSXXX=CUU CHECKPOINT IGNORED 
0C1UI CHKPT DEVICE NOT ASSIGNED SYSxxx 

CHECKPOINT IGNORED 
0C15I CHKPT LOGICAL UNIT INVALID SYSxxX 

CHECKPOINT IGNORED 
0C16I QSETPRT FAILED RC=X' oonnXxrr ' 

SYSXXX=CUU CHECKPOINT IGNORED 
0C17I INTERNAL CHKPT ERROR IN $$BCHKxX 

macroname FAILED RC=X'nn« 

CHECKPOINT IGNORED 
0C18I ERRORS DETECTED IN REPOSITIONING 

TABLE 
0C19I CHKPT DEVICE NOT READY SYSxxx=CUU 

CHECKPOINT IGNORED 



$$BjRSTRT - Res tore Checkpointed Partition 



This phase restores PFIX information saved 
at checkpoint time and the problem program 
area.. 



Checkpoint/Restart Routines 73 



Entrx: From $JOBCTLB, 

Exit; To $$BRSTR2 if a tape repositioning 
and/or a DASD verification table is 
specified in the checkpoint parameter list; 
to the problem program via SVC 11; to 
$$BRMSG2 if an error is detected., 

Method: The values necessary to continue 
with restart are supplied in the first 200 
bytes of the cleared partition by $JOBCTLB- 

$$BRSrRT 

saves the information passed from 
$JOBCTLB, 

corrects the partition logical end 
address if the checkpoint partition was 
running in real mode and GETVIS is 
indicated. 

reads and (if applicable) restores PFIX 
information using the PFIXREST macro. 

reads the program dump records into the 
partition, 

positions the checkpoint tape after the 
trailer label (if tape checkpoint), 

updates the checkpoint DTFPH (if disk 
checkpoint) . 

The checkpoint parameter list is then 
retrieved from the restored problem program 
to check if a tape reposition or DASD 
verfication table is specified- If 
specified, phase $$BRSTR2 is called. If 
not, the restart address is retrieved from 
the checkpoint parameter list, stored into 
the PSH, and control is given to the 
problem program issuing an SVC 11. 



$$BfiSTR2 - Tape and DASD Verification 



Thij phase repositions tapes as specified 
in the user-supplied tape reposition table 
and/or verifies DASD devices as specified 
in the user-supplied DASD verification 
table, both pointed to by an address in the 
checkpoint parameter list.. 

Entry; From $$BRSTRT or $$BRMSG2 if an 
information message was written and the 
operator response was retry or ignore. 

Exit: To $$BRMSG2 to write an error or 
information message, or to the problem 
program via SVC 11. 

Method: Pointers to the information needed 
to handle the tape reposition and DASD 
verfication table are supplied in registers 
loaded by $$BRSTRT, 



Tape repositioning: 

• Logical repositioning, if specified: 
The entries in the logical reposition 
table are checked and a message is 
issued if the DTF type is incorrect 
(not DTFMT) , the device is not 
assigned, and the assigned device is 
not a tape. If the DTF is not 
specified for output or is not open, 
the entry is ignored. 

The number of records specified by the 
DTF are read. If a V0L1 label is found, 
the volume serial number and the volume 
sequence number are printed on SYSLOG 
so that the operator can determine if 
the correct reel is mounted, or mount a 
new tape, or cancel the job, or 
continue. Standard Labels and tape 
marks are bypassed and do not decrement 
the record count. 

If a backward direction is indicated in 
the DTF, it must be a non-^standard or 
unlabeled tape; if it is not, the entry 
is ignored. If the file was open at 
the time the checkpoint was taken, the 
ustr mur.t position the tape to a point 
past th*! tapemark following the last 
record, but before any non-standard 
trailer labels. This phase then moves 
the tape backwards over the tapemark 
(and any noise record) , and positions 
the tape the prescribed number of 
records from the end of the file. 



Physical reposition 
After the logical r 
processed, **BRSTR2 
reposition entries- 
defined logical uni 
it is assigned to a 
a message is issued 
is spaced forward b 
number of files (ta 
the specified numbe 



ing: 

eposition table is 

checks for physical 
If any, the 
t is checked whether 

tape unit. If not, 
; otherwise the tape 
y the specified 
pemarks) and tnen by 
r of records. 



• Logical and physical repositioning: 

If any checkpoint records are detected, 
they are skipped without incrementing 
the record count. If an unexpected 
tapemark is read an error message is 
issued, 

DASD verification: 

After tape reposition is processed or is 
omitted, the DASD verification table is 
handled. The logical unit specified in the 
table is checked whether it is assigned to 
a DASD device. If it is^ the V0L1 label is 
read and the volume serial number is 
written on SYSLOG for verification.. The 
operator can cancel the job, mount a new 
pack and retry, or ignore the message and 
continue. After the verification table is 
processed, the restart address is stored in 



74 DOS/VSE Logical Transients 



the PSH and cootroi is given to the problem 
progcam issuing au SVC !11« 

I ' 

$$BRMSG2 - R estart Message Writer 



This phase builds and writes messages on 
SlfSLOG* For information messages the 
operator response is analyzed to continue 
the orogram. 

Entry: From phase $$BRSTRT and $$BRSTR2 
with a register containing the message 
number and pointers to information 
necessary to complete the message text. 

Exit: For error messages the program is 
canceled. For internal error messages a 
dump is issued and the program is canceled. 
For information messages the operator 
response is checked for validity and the 
program is canceled, or control is given 
back to $$BRSTR2, 

Method: The given message number is used to 
find the corresponding message text and to 
calculate the values necessary to convert 
and complete the message text. The message 
is written on SYSLOG using physical IOCS, 
If a response is expected the answer is 
compared with a table entry for that 
message^ If the response is not valid, the 



operator is notified to repeat his answer. 
If it is valid, the program continues. 



$$BRHSG2 may issue the following messages: 

0R09I INTERNAL RSTRT ERROR IN $$BRSTRx 

SETLIMIT FAILED RC=X«XX» SIZE=yyyyK 
0?^13I INTERNAL RSTRT ERROR IN $$BRSTRx 

EXPECTED RECORD NOT FOUND 
OEir>I INTERNAL RSTRT ERROR IN $$BfiSTRx 

macroname FAILED RC=X*nn' 
OR20A RIC TAPE REPO: SER xxxxxx SEQ xxxx 

SYSxxx=cuu 
0821A IC TAPE REPO: TAPE MARK IN DATA 

SYSXXX=CUU 

0R22A IC TAPE REPO: DEVICE NOT A TAPE 

SYSxxx=cuu 
0fi23A IC Tape REPO: DTFTYPE X«nn« INVALID 

filename 
0E24A IC TAPE/DASD: UNIT NOT ASSIGNED 

SYSXXX 
0E25A RIC DASD VERI: SER XXXXXX ASSIGNED 

SYSxxx=cuu 
0E26A RIC DASD VERI: VOL. SER. NO- INVALID 

SYSxxx=cuu 
0E27A IC DASD VERI: DEVICE NOT A DISK 

SYSxxx=cuu 
0E28A RIC DASD VERI: DEVICE NOT READY 

SYSxxx=cuu 
0R29A IC DASD VERI: LOG. UNIT INVALID 



0I39A 



SYSxxx 

INVALID RESPONSE 



Checkpoint/Restart Routines 75 



EXPIANATION OF FLOWCHART SYMBOLS 



■A1- 



Process 
*B2 



C1- 

Label 1 



BW 



Subroutine 



■D1- 



Preparation 





-El 

Predefined 
Process 





■F1- 



fInput/Outputi 




r — ^ 

I Terminal ] 

© 




|BD 
D4 

Filinp 



DESCRIPTION 

A group of program instructions that per- 
form a processing function of the program. 
The label, if any, is shown above the block. 
*B2 

If any additional explanation is required, 
its location on the chart is identified by an 
asterisk and the block I D. 

Description of a subroutine. The starting 
label of the routine appears above the stripe. 
If the subroutine is documented in detail on 
another flowchart, the ID of this flowchart 
is also shown. 



An instruction, or group of instructions, 
that changes portions of a routine or initia- 
lizes a routine for given conditions. 



A group of operations not detailed in the 
flowcharts in this manual, such as user's 
routines. 



Any function of an input/output device or 
program, usually branching to an I/O routine 
to perform the function stated in the block. 



Points where the program branches to alter- 
nate processing, based upon variable condi- 
tions such as program switch settings and 
test results. 



The beginning, end or point of interruption 
in a program. 



On-page connector. An entry from or an exit 
to another function on the same flowchart. 
The number in the connector identifies the 
corresponding entry or exit on the chart. 



Off-page connector, an entry from, or an 
exit to, a given point on another flowchart. 
The characters in the connector identify the 
chart and block. The corresponding label, if 
any, is placed outside the connector. For mul- 
tiple entries and exits, an asterisk appears in 
the connector and the characters are listed 
nearby. 



EXAMPLE 



BB-D4, INITLI 
BC-B2, 0PENX4 
BL-JL, ENDPRN 




r — N 

( End of Job J 



Print 



76 DOS/VSE Logical Transients 



CHARTS 



Chart AA, $$BATTNA - AttentioQ Root Phase 
(Refer to Chart 02) 



• « 

* $SBATTIIA • 

* * 



•••*B1******«** 



• *•* 

* • 
» B2 • 

• * 



* • 
» Bl * 

* • 



• ESTkBLISH < 


k .* EXTEBNAL 


* 




.* CBT *. NO 


*»DD8ESS»BItITT < 


> *. IMTEBBUPT 




*.... 


•. ACTIVE .♦ 


• • • 


• > 


> *.SHITCH ON. 


« 


, 


•- •• 




* 1 


I *. .« 






*. .* 




••***••**••••*••« 


*. .* 




X 


*, ,* 


X 




* NO 




*«*«» 


« XES 


«**•• 




•••* 




•AB * 




•AB * 




• AB * 




* B3* 




♦ Bl* 




* E3 *.X. 




• • 




• « 




• • . 




* 




* 




•••» X 




EXTINT 






i 


THl'ABI .*. 






X 




•••**C1********* 


► C2 *. 






••***C3«**««**««« 
• HOVE CORNAND • 




• miTKLIZB 


► •• SVSLOG 


« 


10 


* F80B CBT SAVE • 




• AND SAVE < 


> *. EQUAL 

> *. CONSOLE . 




• • .. . 


•ABEA TO BUFPE8 • 




* RESISTBBS 


• 


, 


• IN SSBATTHA • 






► •• .» 






• • 




„••...*..„*.«. 


* YES 




I 
• *•• 

• • 

• 85 • 


•**••*««•*•**«•*• 





« • 

* OTCHAT • 

« « 

««««««•*«•««♦«• 



BTCBAT X 



«•«♦*•««*««««*•*« 



**C5***>>** 

• BESBI BED • 
CANCEL AND 

FETCH LI A 
FLAGS IN 

• ATTN PIB • 



GETCBD 


.». 




02 ». 




* * 


NO •• 


COMMANU 


. ..*• 


AVAILABLE 


« 




^ 


•. .* 


X 


• • .• 


♦ ♦•♦• 


• »ES 


•AB • 


, 


♦ B1» 




« * 


X 


♦ 


**** 


COMIBOL 


• • 



.* IS BUFFEB *, 


(ES 


EHPTl .• 




*. .* 


* 


*. .* 




♦. •• 


X 


• NO 


»*••• 




• AB * 


, 


* Bl* 




* * 




* 


, 


CONTROL 


X 




****B3********** 




EXCPBG AC* 




-*-*-«-*-*-«—*-* 




DISPLAX THE • 




COIHIANB * 





*•**•*****•«****• 



••••»U!>******^*^« 

« 4 

• SVC 22 • 

• DISABLE * 

• INTEB8UPIS * 

« 4 

«•«•*•*••••«••••« 



•♦B5»*»***» 
•UEACTIVATE ♦ 

> ATTEH'IION 
TASK ('da* IN 

• PIB BITE 0) 



• SVC 11 • 

• EXIT faoa • 

• Ll'A • 



Charts 77 



Chart AB- $$BATTNA - Control Routine 
<Refer to Chart 02) 



* « 

• COHTBOl « 

t » 



****^ -BEFBRRNCISS 

• * -TO »BB1: 

rgoL X 



«*«•***««♦*«* 



* RBSET THE * 
*OPEB*ND NUHBE5 * 

• IM LOC. OPMnilB » 

• TO ZERO • 

* * 



*♦«* 

X 
»tt**i)1* ********* 
•8DSTMT »C« 
*.*-*-«-«-«->*-*-* 

• CLEAB I/O • 
•BUFFER AND EXCF* 

♦ FOB INPUT * 
*^#^**^*m* ******* 



EXTINT X 

m****^i********** 

* PtIT THE BG * 
» STORAGE KEX * 

• HEX ■ 10* INTO • 

♦ A REGISTER • 

♦ *C't • 
******** **w****** 



* ESTABLISH 

* LINKAGE TO 

* nSBB BOOTINB 



♦•D3**»»»** 
♦RESET ATTN • 
»PIB SN AFTEB » 

TESTING IT ♦ 
•FOH FETCH LCA* 
* * 

*********** 



THE REGISTER 
P0INT4 IS USED 
IN THE STEXCD 
SOBROUTINE 



FETCH 


* 


MO 


TA S« ON 


* 


*• •• . 


• * 






**. ••' 




X 


» YES 




***** 
*A» * 
* B5* 


X 




* * 


***m* 






*AA * 




DTCHAT 



**f\******* 



t********** 



********««***«* 



•***H1 **«•**•*• 

* BRANCH TO 
» CHKSTT IK 

• $*BATTNH 

*************** 



78 DOS/VSE Logical Transients 



Chart AC- $$BATTNA - Error Message Routines 
(Refer to Chart 02) 



• « 

» FHRRTN • 



iillRRTN 

*••••{} 1 ••»*«*»•■ 

• PUT MESSAGE 

INTO THE 

OUTPUT 

BUFFER 

•F2 



..X* 



•••• 



« 

• POT LEMGTH OF 

• HBSSAGE INTO 

• sysLOG ecu 



• POT OPERkHD • 

• NUMBER INTO • 

• MESSAGE • 

• • 



«*««««*•*««*•*•■ 



**««A 2* ******** 
• « 

» E»CPRC. • 



**** 

**F * 

• Fl *.X 



«*»* 
KXCPMG X 

*««**B2* ****** 



***««*•******« 



• TRAFFIC 

BIT POSriiD 
*. IN CCB . 



****02******>** 



*«**•*•*••**•*• 



****A ]•******** 
t < 

• nSGOUT « 



****BJ********* 

DETEROINB 
MESSAGE 
LENGTH 

•**••**»*•**•*• 



SET UP 
FOR WRITE 
OPER.VriON 

*•*•**•••*•***« 



****£2********* 
» RETURN TO • 

• ADDRESS IN • 

• LINK REGISTER • 



***•«*««•*****«* 



****E3********* 

• RETURN TO « 

• CALLER * 

*•****•***««*•• 



••••Ad********* 
« • 

* RDSTHT • 

* * 
••»••*•****•*•* 

• ••• 

* « 

* Bii *... 

* * . 

• •** . 
STMT Z 

***»*B<I********** 



*•*•*•«*•••*»«•«* 



• SKT UP REG. \ * 

• IIITH THE • 

• SISLOa CCR • 

• ADDRESS • 

••**••••••••••••• 



-•-•-*-•-»-•- 



**tt5******* 

• * 

• SET UP TO • 
*MOVE PROPER BS6* 

• TO BUFFUR • 

• • 
«•••*•*••»• 



.* UNIT •• 

. eXZEPTION . 

•.POSTED II.* 

•. CCB .* 



X 


*F2 


***** 


THE MESSAGE IS MOVEl/ 


*AB * 


TO t'HE OUTPUT BUFF £8 


* B1* 


BIT EXECUTING THE 


* • 


MO»E INSTRUCTION 


« 


THAT FOLLOHS THE 


CONTROL 


BAL to THE ERHRTN. 



* TEST FOR ALL * 

* BLANKS TO SET * 
•CONDITION CODE • 

* • 
•*•*•*•*••*•*•**• 



» RETURN TO • 

• ADDRESS IN * 

* LINK KEG • 

•*«•*•••••••••* 



Charts 79 



Chact AD, $$BATTNA - General Scan Routines 
(Refec to Chart 02) 



••**( I********* 

• SC&NIt2 • 

• HMD SCailRJ • 

• '• 



•••••B1**«« «•«•** 

• * 

* RESTOBB • 

* POIITEB AND • 
*BBSIDUaL CODMT * 

• • 



* PRBVioas *. M 

SCAN SIOP = .». 
>. COHH* .* 



• ••• 
* • 
» D1 •.X 



«*««*01**** «*•*** 



••*•••«•««•*•>••• 



BJ • 





• THIS H • 


NO 




* 


COMTmOkTIOM 
*. CUAB .* 

*. •• 


».... 






•• .* 


X 






• YES 


• •«♦ 

• * 

• B3 • 

• • 

• **» 






X 








• *• 








PI *. 








.» ». 




•*»*f2*******<* 




* PBECEDIM6 * 


NO 


• BBANCH TO 


• 


COHHA 


*....... 


X* MTSEBB IN 




*• .* 




* «»BATTNA 



**•*••*••***«•* 



* 

BEAU * 
NEXT « 
IHPUf • 

* 



• •*« 



NDSCAR X 



•*•••••••*••*••• 



* COHPUTE 
« AND SAVE 
•8BSI0UAL COUNT 

• 



««*««B3* ******** 

• OETEBHINB 

• AND SAVE 

• POINTER 

« 



•«««*p3**»*****i 

• 

« UPDATE 

• 0P8KAMD 

• NOBBEB 



****»Q3********* 

* COBPABE LAST 
» OELINITER 

* mTH COHHA 

* 



• BETUBN • 

> TO CALLER » 

> * 



• * 

* D1 * 

« * 



80 DOS/VSE Logical Transients 



Chart AE- $$BATTNB - MSG Command Processor 
(Refer to Chart 03) 



> • 

• ssB&rrHc • 

* « 



•SCAHBZ ID* 

♦ GIST FIBSX • 

* OPEMHD • 

« • 





.* SCM 


• 





. sioppeo »T 






*. A BLANK .* 




•• •• 






*. .* 






* IliS 





« « 

• Ci * 



flSG2 X 

««»**C J********* « 
« UET P£K IN » 

• BBG eOXIII4 fU • 
« L£X SOdBIM * 

• BOUtT TO • 

• COBttiSCi.- PIS « 



• fSIAtlLISil * 
•LXHKAGB to OSati* 

* oc Booriifi » 



* SBANCa 10 < 

* comsoi. IN • 

* tSBATTHA « 



• « 

» « 



• « 

• POXMT PAST • 
*PIB OF aiGDESI • 

• PABTXTIOII * 

• • 



» SOIBX ♦ 

» TO MBIT ♦ 

• LUtIBB PXB * 

• * 



» « 

• C3 • 

« • 



«***K1* ••*••••• 
^ BBAMCtl TO * 

• livsiiBfi xa * 

• itBkTIUh * 



• K1 « 



Charts 81 



Chart AF.. $$BATTNB - Set Operator Comnuoications and Exit Linkage 
(Refer to Chart 03) 



• • 

• STBXCO * 



STEZCD 

•••••B I********** 

• ACCESS THE • 

• PIB TABLE »T • 

• THE CORBBCT • 
•PROBLEM PBOGBAH* 

• PIB • 



••»**C1 •••••••••• 

* LOAD THE SAVE • 

• AREA ADDBESS • 
•OF THE COBBECT • 
•PBOBLEd PBOGBAH* 
•INTO A BBGISTBR^ 
•••••••••«••••••• 



• ••••{))•••••••••• 

•DIVIDE THE PBO-» 

• GBAH KEY BI 2 * 
•AND ADD RESULT • 
•TO START OF OC • 
•EXIT TBI •D2^ 
••••••••*•••••••• 



••••*E 1*^^*^^*^** 

• PUT THE • 

• DOUBLEHOBD * 

• OPTION TABLE • 

• ENTBT INTO • 

• PAIR OF REGS • 
••••*•*•••••••••• 



F1 •• 

.* USER •. 

.* ADOR * 

.HAS POSITIVE 

•. SIGN .* 

•• *P2 .» 

•• •• 

• NO 



•••••Q1* **•«•»•• 

* CLEAR THE 

• I/O BUFFER 

* FDR MESSAGE 

• USE 

• 
•••••••*••*••••• 



* LOAD I/O • 

* BUFFEB HITH • 

* MESSAGE FOR • 

* NO ROUTINE • 

* LINKAGE ICttOI * 
*••••*•*••••••••• 



» SET UP THE 

• CCH COUNT 

• FIELD HITH 

* LENGTH OF THE 

* MESSAGE 
•*•***•**•••*•• 



>U2 
THE OC EXIT TABLE KEFEBRED 
TO IN THIS PHASE is COH- 
MOMLI CALLED THE OC OPTION 
TABLE. THE ADDRESS OF 
THIS TABLE IS FOUND IN 
THE COMMUNICATION REGION 
AT DECIMAL DIPLACEMENT lOX 



• •• 

B3 •. 
.•COMPLE-*. 

NEHT OF 
USEB ADDR 
. FOUND . 

•• •m .• 

•• •• 
• YES 



• LOAD I/O • 

• BUFFER NIIH * 

• MESSAGE-PROC- • 
•ESSING ROUTINE • 

• ACTIVE, 1C50I • 
*•••••«•••••••••• 



• SET UP CCN • 

• COUNT FIELD • 

• HITH THE • 

• LENGTH OF • 

• THE MESSAGE • 
••••••••••••*•••• 



.•SYSLOG • 
EQUALS A 
CONSOLE 
. OR CRT 





•••• 

• • 

• B5 • 

• • 
•••• 


SET EXT 


k 
• •• 

BS *. 

« 

OC 
PENDING 



REGISTERS HILL BE 
BEOBOEBBD FROM 9-B 
TO 0-15. 



•*Ci*»***** 



•*••••«*••• 



.• PARTITION *. 

FBICil 

*. BOUMO .* 



•F^ 
THE POSSIBLE VALUES ARE— 

1. POSITIVE ADDRESS 

(BOUTINE PRESENT, NOT ACTIVE) 

2. COMPLEMENT OF ADDRESS 
(ROUTINE PBBSISNT, ACTIVE) 

J. ZERO (BOUTINE NOT PRESENT) 



• 

• POINT HEG1 

• TO SYSLOG 

• CCB 

• 
••**•••••••••••* 



**••• 
•AC • 
• B2* 

• • 

EXCPBU 



••••p«**^****** 

• RETURN TO • 

• ADDRESS IN * 

• LINK REGISTER * 
*•••••••••••••• 



•«**«P5****»»**»« 



•••«••••••••••••• 



•*««G3««« •*«•«« 

• RETURN to * 

• ADDRESS IN • 
> LINK BEG • 



82 DOS/VSE Logical Transients 



Chart AG. $$BATTNC - CANCEL Command Processor (Part 1 of 2) 
(Refer to Chart 03) 



* . * 

• »»6iITIiC « 

* • 



t * 

* CAMCiil. • 



VSCAIH2 AD* 

« SET KIKSI ♦ 

• OPBBAND « 

• * 



*B2 
aS£ SIAKIIKG 
AODUeSS OF iLB 
TABU PLOS A 
DISPLACEItSliT 
IkBI TALUS) no 



FIRST 

OFEBAND 

K)0(IO 



•CI 

A HEi 'au* 

IHOICATBS Tȣ 
Ait2A IS SOT 
ZES ACTIVE OK aSt^QitiO. 



* POT BG KH, • 

» xMO' mio • 

* UEG POIlli;'* » 

* * 



«*•«•£ 1*«««*«**** 

*CNLBTII AG* 

♦-•-*-»-•-•-*-•-« 
* SET C4IICE1. * 
» C(»E I» PIH • 

« * 



* bBANCa TO • 
» UTOiAT X» • 

• SSbATTSA < 
**««*«*♦««»«>»«« 



* • 

» Fb • 



«««««p 2* ********* 
« * 

* LOAD \'ie. * 

* TABLf • 

* AliUHESS * 

* * 
*•**•**•«»•*«••«* 



■J********** 



* Giil tROl>tKa * 

* PoOGhAa * 

* SiSK • 



*A j**«**««** 

* 

« 
*«*•«*****•• 



JSLaTH 

**«**B J********** 

* POIMI * 

* TO Pia OF * 

* PAST, to BB * 

* CANCiiLED *b/ * 
» • 
«***«***«♦*«*«*«* 



.* PIB *. 

BUTHi ♦. iES 

OBTACdEO .*.... 

*C2 .* 



** ***AI|********** 

* GE-r PIK • 

* IH EHiGISIEil • 

* «0i.HX4 FUii • 

* USE BK CNi^Xa * 

* « 
«•«*«****••«*•*•• 



*•**{) l|«******«* 

• EXI'j: TO AUDli > 

* Xt tHK. 'iSG * 



.* PAiir. IN • 
► . SIOPPBl) 

*. SIAfE .* 



****D14«** «*«*«* 

• BtANCU 10 * 

• EKRKtII * 

• IN iiek'tliUli « 



****A!> ******** 

> GEXtIK 

* 
******* 



* poim TO • 

* •a.&nsst * 

* PARTIIlui PIB • 

« * 

««*«**«««««**««•* 



.* TiilS *. 

.* PABT. *. 

*I0 BE CAltCEi.hU. 



**«««i)5***«*4 



»«*«:»«« **«««««*« * 



CAIiC£L *. lES 
AUIEAUl .*.... 

ISSUED .* 



»•** 

* * . 

* FJ *.X. 

* * . 
**** 

X 
****«Fi********** 

* (10¥B CAMCEl. • 

* CODE i'O * 
» OlBHBCr PIfl *. 

* CiSCEl, CODE * 
*B«rE * HJ * 
«**«***«***«**«« V 



***** 
♦AH * 
• A^* 



Irti. CANCEL COUEd 
A«B SSr fOtI OfEKAIUH 
lid'hRKESriOi CANCSL. 



**««*^4 ****»*«« 4 
« 

* iiSaEl- 

* if- ACTiyt 

* INOlCAloil 

* 

*« *******««««*** 



*««««{lt4** *«-****** 



****«****«« 



.* EIlD 


OF *. 


HO 


Loor 


*•.. • 


*- .* 


. 


*. .* 




*. -* 


1 


• JES 


•*»• 


•*•* 


* « 


• 




• cs* 


Fa *.i 




« « 


* 




»**« 


•««* 






i 




****Fb***>****< 




bB&MCU I'U 


* 


HVSEJtii 


V 


IK *%lilLtttth 


• 



-*-*-*-♦ 



m** ************ 4 



****J J*** ****** 
» SiA-JCii 10 < 

» . EKRSrN * 

* i.i liBAi'l'MA > 

*************** 



'**i!^***»**** 

BKi^aCB 10 
COlll'auL li 



Charts 83 



Chart AH- $$BATTNC - CANCEL Command Processor (Part 2 of 2) and NEWVOL Command Processor 
(Refer to Chart 03) 



***** 

•AG * 
• E3* 



♦ POST CANCEl. « 


•• AMJ » 


III fflOGHEiS. * 


..X*. SUjiTUSK^ 


♦ AMD PiTCH EOJ* 


•.AJTACaiiD .* 


» IK PIB * 


♦ - .♦ 


*********** 


*. .* 




*♦•* » JES 




• ***** 




• *2 * » . 




♦ * oZ *.i. 




***** * 




**** 


.*. 


suaLOOi' I 


»1 *. 


*****ii^** ****** 


.♦ • . 


* 


.* TASK •• 


* POXSl' i.0 ntXi' 


III 'jrih .* 


* flB, STAHTlili; 

» FSon MAIS 


• . UAIC .* 


*. .* 


* TASK Pit! 


♦ . -* 


*************** 



.» TASK *. SO 

*. COPTBl-OCK .♦... 
♦ . 80DSD .* 



•*D1* •***•* 

* * 



******** 



**** 

* * 

* Ai » 

* • 

oa«D]{ 



**k^******* 

* * 

* 

♦ BJiADf I'ASK 

« * 

X 

**** 

* * 

* A.i * 

* * 
**** 



.» IdlS * 
SUBJCASK 

ALUBAIII 
.CANCELiD 



*****f^********** 

• S£r SOai-ASK * 

• CANCil. CUUL m » 
»flS. POST CMCL ». 

• IS PHOG ♦ fETCti* 
*aoJ aiiADY lASK » 
***************** 



****i}j********* 
» Bill' I'O 1 

• ADOUcISS lla < 

» l.lJIKiIfiii » 



«**«A4*«* ****** 

• * 

• Ht-lHOi. * 

• * 
*************** 



it&KVOi. 1 

*****^ll*** *-**«*«* 
*SCAtiH^ AD* 

*-*-•—•-*-*-*-♦-* 

* * 

* GliX Ol-iilijiSiU • 

* • 
***************** 



«*«**i£4*** ******* 



««*«*«*«*««**4 



• r.li'J.lClr Ati 

* 
**«*«*********« 



» usa Ki.1 ro * 

• tiU'l AUDh Uif • 
*C0.1rf£G ?0i 'i'dXS* 

• fASiil'IJII * 



.* tAai'iTiJii ' 

». i< Alii sit fOK 

*. loLoat .* 



►♦»*jj****»' 

oSA^Ca IQ 
»*bAfrHA 



**J4*«*«*** 
* * 

>TUn» kAITIKu 

► SOUMl- 131 £ lit 

•coakto Off » 

******■-:«*** 



*****iJb ********** 

• UiJI Dli »:1B • 

• kM'O * 

* BG KeX * 

* * 
***************** 



»*il5******* 
i'Ubi ili«l?FiC» 

tilr ojr CLo i<dt- 

• fii^ JOdCual'tiOi. * 

m t'j.lll'iiiON IS 

*JAilJ.i«» l'U«* 

*********** 



«*J^**«»«** 
* « 

* 
*********** 



♦***KS ********* 
» cilAMl.:! XO * 
* KiVUMl ili • 

» t*i.'Al'iaA » 



84 DOS/VSE Logical Transients 



Chart AJ. SSBATTNC - PAUSE, LOG, NOLOG, and IGNOEE Command Processor 
(Refer to Chart 03) 



•••*itt ********* 

* * 

» P4USE • 

* * 



•••*A5**«****** 

* « 

• LOG » 

*************** 



PAUSE 
**« 
*SC«NR2 



-*-*-•-*-*-* 

G8r * 

OPERAND * 

**************** 



.* LAST *. 

» CHARACTER * 

IS AN EQUAL 
*. SIGN .* 



****C2******»** 

• BRANCH TO * 

• NVSERR » 

• IN $$BATTHA < 

•*»*»******«»»* 



*•** 

* * 

* C» * 

* * 
**•* 



.* LAST *. 

NO .* CHARACTER *. 
...*. IS A 

*. BLANK .* 



**BS******* 
♦SET UP FOB • 

• EXECUTE * 
* INSI8 TO TURN • 

• ON JCILSH • 
* FOB LOG • 



*•*• 

* ♦ 

* Fb • 



•«***U1 *««»*••••» 

• * 

• GET ADDB OF * 

• PIB TABLE * 

• GET BG KB» » 

• * 



****D5********* 

• « 

• NOLOG • 

• • 



**es******* 
•set up fob * 

• EXECUTE • 
« INSTR TO lURM 

• OFF JCTL SH * 
• FOR LOG » 

• «** 



**f 3*«»*(** 
*TURH ON Bit* 
*FOR PAUSE IN 
* JOB CONl'SOL 
* SNITCH At 
» COBREG+56 • 



**F(|******* 

*TURN ON BIT* 

*FOB PAUSB-AT-* 

* EOJ IN JOB * 

CONTROL SNITCH* 

* CO«RBGt59 * 

*********** 



««*«*f^**« **«•«** 
« USE EXECUTE * 

* INSTB TO TURN * 

* OFF/ON SNIICH • 

• IN ALL PART * 

• COHH REGIONS • 
««****«*****«**** 



* C2 ' 

• a 
**** 



**f**Q|********** 

♦GETPIR AG* 

*-*-*-*-•-*-*-*-* 

* GET PROBLEM « 
» PROGRAH KEJ * 

* * 
***************** 



****Q3********* 

• BRANCH TO • 

• CONTROL * 

• IN S$BAItNA * 

*************** 



****S5*«******* 
» BRANCH TO * 

• CONTROL * 

• IN StBATTNA * 

********««**««* 






*****H1 ***«*•**«* 

* USE KEl TO * 

* GET AUOBBSS * 

* OF COHH. * 
*REGION FOR THIS* 

* PARTITION • 
«*********$«***** 



****Hl»* ******** 

* • 

* IGNORE * 
> * 

*************** 



PAUSE2 X 

pmtittK 1****** 
*SCANR3 



***************** 



• IGNORE gRROB * 

* CONDITION IN • 

* CONTROL STHNt • 

• * 
*••*•***********• 



****Kl|********* 

• BRANCH TO < 
» CONTROL IN « 

• StBATTNA * 

**««*«****«**** 



Charts 85 



Chart AK., $$BATTND - MAP Command Processor (/370-Mode) 
(Refer to Chart 03) 






««*«*i) \****r***** 



:»♦«•*««*««♦*****» 



•aSSOOT AC» 

•-♦-•-•-•-•-•-♦-« 

• UOl'PUT ♦ 
•HBADlSR LI8£ «EJ* 

* • 



SET UP • 

SDfUIVISOlJ « 

DATA * 



♦ b2 * 



**«««*«4> ««*«««««* 



»««««»««« 



**«•*«*****•»•*<* 



» ALl. ♦. 

f AJiTIi'lOrJlj . 

•.PBOCiSShU* 



•aSGOOT AC» 

» ODTFOX • 

• iBifiOOS ♦ 



• * 

♦ WIHI « 

• lO H£iT • 
» i-A*rlTlUN ♦ 

* « 



• * 

• sja." UP • 

• j'Aitrii'ioir » 

• SiZi i, LiailS • 

• * 

m* ********* ****** 



*****ii-i********* 
* 

• GBT 

• PkRTITIOl 

• FIIOIITI 

•************»**i 



**** 

* * 

* e2 » 



*-*-*~*-*~*-*-*-* 
* ourtux Lasr • 



* • 
» SBI OP • 

* ARB OUTPOT • 

• S«l LIIB • 

• • 



*****i^^* ******** 
* 

* SET OP 

* AID OUTPUT 

* VIS Line 
* 
**************** 



• SET OP 

• AMD OOTPDT 

• SP LIES 

« 



****j^********* 

• BIABCR TO • 

• COITBOl IN • 

• SBBITIEI • 



86 DOS/VSE Logical Transients 



Chart AL,. $$BATTNI - MAP Command Processor (ECPS :VSE-Mode) 
(Refer to Chart 03) 



» • 

» « 



'•••Bl******' 



^«***««« 



*«*«4t****«*4'^ 



*«* «*C 1**** *«**^* 
*nS60U'f AC» 

•—♦-•—♦-•—»-*-*-• 

• ourpuT • 

• 1.IKE ♦EJ • 



ssT at- 

iDSKXlfXiSfc 



• • 

• SiSl' UP ♦ 

• SOPiaVISOK • 

• Ilkth * 

• * 



» ALL 

PASTIX'iOa 
».PSOCESSa 



(••••Li********** 
•BSbOUt AC* 

•-•-«-•-•-•-•-*-« 

• OOtPUI * 

• I'UKVXOUS • 

• LIKE *£J * 
********•«•*«**•« 



*****F !*****«•*«* 

* * 

* POINT * 

* TO H2XT * 

* PAlUrilXUk * 

* * 
«******•*****••** 



*««*«f^** ***•*««* 



*••*••*****«•*«•* 



***»«^ !•«•««•«••• 

• « 

• SET OP * 

• PA film OH • 

• siw; A LiaxTs • 

• * 
*«*****«****•***• 



► ****(, ^*****»»* 

► AKD OUTtni 
• HclAL STOhAtili 



•*»**ai* ••*••*•»• 

• SKT » 

• fAKTXTXOII • 

• FiJjOiJITI • 

• « 
*******«**•***•*« 



• **rt^******** 

dgiiiICa I'U 

CUM til JL L« 

J$i-AXT«A 



Charts 87 



Chart AH. $$BATTNE - ALLOC/ALLOCR Commaad Processor (Part 1 o£ 2) 
(Refer to Chart 04) 



* • 

> S»B«TTH8 * 

• * 



• IMIT. P«8TII* * 

• 0SIN6 VPtBTAB * 
»(POH ALLOC) OR • 



»«¥««*««•«««»«**• 



••••*C1 ********** 

• S«»E NO. • 

♦ OF PkHTITIONS « 

• POIHI TO * 

* APL LIST * 

* • 
*«•«***«««******* 



• **• 
GETPID 

*****0 I********** 
*SCANB2 AD* 



•«•*****«•(«*«**«« 



.IS 0BLINIVE8*. NO 



*. LENGTH OK 



«••«*)) 1*** ••*•*«* 



••••**»*•»«*••*«• 



*«** 

• * 

• B3 • 



GBTK X 

*SCAMR} AO 

•-*-•-*-*-*-*-•- 



•«*•««•«••««••«• 



X ..*. LENGTH >7 



NO .* DELlnlTEH *. 
...♦. COHHA OB .« 
*. A BLANK .* 



****H2********* 
BRANCH TO * 
NVSEBR IN « 
t»BATTNA • 

***«***•*«•«««* 



«**««G3********** 



«****««*«**«**««« 



-«-*-«-*-«-* 



*•*♦•»*»•*••••« 



* CHUCK 6 » 

* CONVERT VALUE • 

* TO BINARX * 

«•***•«***•*****« 



• ••• 

• « 

• BO * 

• • 
*«** 



«****U5««***«*«*« 
* « 

« • 

I* ADO ONE • 

« « 

••*•*••*•••**•••• 



**** 

• • 

• H2 • 



****D<t ********** 



'«*****«*«**«*** 



*. .* 




*. .» 




X 


* ItES 




♦ NO 




*••*• 
*AN * 
* B1* 

* * 
* 












• *• 




X 






ti : 




>«**«p 4* **««**«** 




.* * 




POINT TO 


• 




.* IS LAST 


*, 


NbXT ENIRIf 


• 




•CHARACTER A 


K»* 


IN PABTITION 


• 




*, 


« 


TABLE 


• 




*. .* 






* 




*. .* 






«* 




• «ES 




. 







• 

POINT TO * 

NEXT APL • 

ENTRY * 

* 
***«*«•**«***««* 



END *. tBS 
OF APL .*.... 
LIST .* 



* NO **•* 
. * * 

* H2 * 
X * * 

*••• *•** 

• • 

♦ D1 » 

* * 
• •** 



«*** 

* * 

* Bl » 



88 DOS/VSE Logical Transients 



Chart AN. $$BATTN£ - ALLOC/ALLOCR Cofflmand Processor (Part 2 of 2) 
(Refer to Chart 04) 



* Eo* 



• • 

• CHKPABT « 

> « 



• • 
« CHKCMV « 

* • 



• • 

• INDICATE • 

• (REG 5) • 



*****g3***»**«*** 



»•***••««••«•*••* 



••••*l)5«*«****«*« 



»••»•«••••••••••« 



••*«#C1 ********** 



•••«*CJ*****«»*** 



*•**«***««•*««•*« 



• * 

• ISSUE * 

• ALLOCATE • 

• HACRO • 

• « 



*••••[! 2***«*****« 
« • 

* STORE • 

* PAHTITIOH * 

* ID IN API. • 

* * 



*•** I 

* * • 

* D3 *.X. 

* * • 
• •** t 

LOOVI .*. 



>••••«••••••*••*• 



«***«B1********** 



««*«i*** ••**••*•« 



«***E2********* 
> BETOBN • 

r TO CALLBB • 



*«*»*E3*«*******« 

• IMCBBHBIIT • 

• PARTITION • 

• COUNTER * 

*«***«**********4 



*«**p 2* ******** 

• EXIT TO * 
.X* CONTROL IN « 

• »*BAITNA • 

*•«•»***•*•*•*• 



* BBANCR TO « 

* NTSERR IN * 

* SSEAITNA * 

*«*•*«**•««•*«* 



END or SCAN .*. 



*««*«G 1********** 

* * 

* TRANSLATE • 

* DETBRN CODE * 

* TO EBCD • 

* * 



••«**G3*******«** 

* • 

* POINT TO • 

* NEXT ENTRf IN • 

* PARTITION TABLES* 

* • 
•«*«***•••••«•••* 



>***«Ub********** 



»*«««»*««•*•*«««« 



««***H1 •••***«*•* 

* • 

* HOVE * 

* HETURN CODE * 

* TO RESSAGE « 

* * 



• «*• 

• * 

* DJ * 

« • 

♦ »»* 



****IIS********* 

• RETURN * 

• CO CALLER • 

• • 



*•*««*•**«***«**• 



» EXIT TO • 
* CONTROL IN ♦ 
» StBATTNA ♦ 



Charts 89 



Chart AP- $$BATTNF - SIZE Command Processor (Part 1 of 2) 
(Refer to Chart 04) 



•••*A I********* 

* « 

* SUBATTNP * 

* * 



*«*******«•««*** 



•••••CI********** 
•SCAII82 ID* 

*-*-•-•-•-•-•-•-• 

* GET PARTITION * 

* lOENTlrlER * 

* * 
•*****•*•***•*•*• 



• SET UP AUD * 
*ISSUB setLIHIT • 

• HACBO * 

*«**«****«****«•* 



INVSIM^ X 

«****02********** 

• SET PABAHBTliB • 

* POINTER TO * 

. ..X* 'OPEBAIIO *. 

» Hissma* * 



•«***«•*•*******« 



*•••••«•*••»•**** 



.*. 


mvsxiii X 


PI *. 


•••••P2********«* 


.* *. 


•INCREASE LENSTB* 


■0 .* PART. ID *. 


• OF LAST • 


...*. CORRECT .* 


..X* PARAMETER TO * 


*. .* 


* GET DELIMITER * 


*. •• 


* * 


X *. .* 




***• * YES 


, 


* * 


***• 


* G2 » 


»A0 • 

* ?1 *.X. 


* * 


**•« . 


• * 




• **• 


> •• 


INVSITN X 


G1 *. 


*«**«G2********** 


• * *. 


» • 


BLNK .• CHECK *. OTHR 


* HOVE LAST * 


...*. DELiniTBR .* 


• PABABBTEH * 


• . .* 


* INTO BESSA6E • 


*. .* 


* * 


X *. .* 


*••••*••*••***••• 


*•*• * « 




* - • , 


, 


* D2 * 




* • 




•*** 




SBTSIZE X 


X 


*****H1 ***•***•»* 


•****H2********** 


*SCAHR2 AD* 


• * 


*-•-•-*.*-*-•-*-* 


♦ HOVE HSSGE • 


* GET SIZE * 


• lPO<tD INTO • 


* VALUE * 


• 80FFE'? • 


*••*******•**•*•* 


*•««•»*•***•••••• 



****03********* 

* RETURN TO * 

* CONTROL IN * 

* SSBAriHA * 

****•*•****•*** 



• * 

• SBTDP • 
» * 

**••••••••••••• 



m**»Bn»*«m*»»t* 



*••*••**•*****■ 



****CI|********* 



*•*•••••••••••• 



ISSDE 

SEILMIT 

MACRO 

• ••••••••••••••< 



• •••^((••••••••^ 



••••••••••••••» 



INVAL1 X 

•CONVBBI RBIUBN • 

• CODB TO * 

..X* PRINTABLE • 

. « CHABACIBRS * 

*****•••••••••••• 

*••* 

* * 

* BS • 

* • 
**** 



* NOVS PART. ID * 

* AMU COavBBIBO • 

* RBtUai CODB * 

* INTO asSGB • 

* • 
•••«••••*•*•••••• 



•••**D5******«*** 

• • 

• aOVB BSSGB * 

• 1P03D • 

• INTO BUFFER * 

• • 
••••••••••••••••• 



HBITB 

BBSSAGE 

•JJ 



•*•*•••• 



••»****•*•**••• 



• •••Glt*^*^***^* 

• RETURN * 

• TO CALLER « 

• • 
***•***«••••••• 



*JJ 
VIA ATTDOINT 
FUNCTION 



SIZE 

VALUE 

FOUND 



*****K1** 
♦CHKBYTE 

•-*-*-*-* 


AQ* 

-•.•.*.• 


♦ CHECK 
•CONVERT 


AND * 
K-BYTES* 

* 



liRITE * 

MESSAGE * 

*JJ * 

**•••***•***•**• 



••••K2********* 

• RETURN TO * 

• CONTBOl IN • 

• («BATTNA • 

***»**•«*•****« 



90 DOS/VSE Logical Transients 



Chart AQ* SSBATTNF - SIZE Command Processor (Part 2 of 2) 
(Refer to Chart 04) 



* • 

» A2 » 

* « 



» * 

• CHKBITB * 



»«*« 4^2* ********* 
■> * 

>NOVg CONVEBTED • 

• NUMBER OF • 
» K-BITBS • 

• TO SLPL * 
*•«*•*****•«***«• 



*«*&3*«« «*«*** 
« 
CHKPABT • 

,» 
***«*«******«* 



****B2*** ****** 
» BETURll * 

« TO CALLER • 

» • 



ii«***U3* **•••«•«* 



*«****•**•••** 



• SET LOOP • 

• COUHTBBS * 

• TO LAST * 

• CHARACTEB OF * 

• OPEBAMD • 



.*OPBRAND*. 
.* EQUAL TO ». H 
.*.CD8RENT PBTAB.*. 
*. ENTRX .* 



• * 

• STORE LOOP • 

• COIINTEB IHTO * 
» SLPL • 

• • 
••*••***•****«**« 



«•••»*•*«••••*««* 



••*«E3********* 

• RETURN • 

• TO CALLER * 

• * 



*«**• 
*AP • 
* G2* 
* * 
* 
INVSYN 



***«*m •«**««•*«* 



««***«*********«* 



nOVBD . 

. .* 

♦ . .* 

* KES 



* ••••J 1* »••«•«•«* 
> PACK ANU • 

* CONVERT VALUE * 

* TO BINARY, * 

* ROUND IT * 

* IF ODD « 



* DOES IT 

FIT INTO A 
v.HALFHOBD . 



*»*»«K2****«***«« 



Charts 91 



Chart AK. $$BATTNG - BATCH and START Command Processor (Part 1 of 2) 
(Refer to Chart OH) 



» $»B»rTNG » 

* 4 



BRANCH TO * 

NVSERR * 

IN *tI)«TTII« * 



STtBT 

BATCH X 

•IMITOPB »S« 

«-*-«-«-*-■«-*-*-* 

* GET OPEBAHD * 

• ANU CHECK * 
» AREA * 

91* *************** 



SECOND PART OF PIJB TABLE 
PLUS DISPLACBHEHT 
CALCULATE!) IM POINT « BY 
INITOPR SUBROUTINE. 



*****f^t\********** 
*ASSGIILOG AS* 

* ASSISB SXSLOG * 

* TO FOREGROUND * 

* PARTITION • 

»*•**»*»*»»*«♦♦♦• 



*****fH********** 

• CALCULATE • 

• ADDRESS OF * 

• CORHUNICAIION * 

• REGION FOB • 
» PARTITION *EJ • 



**QU******* 

•TURN ON BIT* 

• FOB "BATCH » 

' COHHAMD JUST * 

ISSUED'. BIT 7* 

IN C0nBBG*59* 

*********** 



*****^n********** 

* * 

* INSERT 'NO * 

* NAME' IN COBB • 
*BEGION JOB NANE* 

* * 



*****jH********** 

* * 

* aOVE ADDRESS * 

♦ OF PABTIIION • 
*SAVE AREA INTO * 

• THE PIB • 
***************** 



•♦••»C5*********i 

* SET UP TO 
« DISABLE 

* INTEBEUPTS 

* ON SVC 22 
* 
**************** 



***** Oi*********i 

• * * 

• • SVC 22 * 

• * SEIZE THE • 

• * SISTEH • 

• * * 
**************** 



'TURN ON tiXT* 
U IN LAST * 
BITE OF PIB 
FUR 'ajF IN * 

• FG' * 
*********** 



**fS******* 
» TURN ON • 
• 'FETCH EOJ' 
AND 'CANCEL' 
> IN PBOGB 
* « 

*********** 



**Q^******* 

* SET PIb * 

•FLAG TO X'81'* 

*AaO SET CANCEL * 

* CODE IN PIB « 

» FOR EOJ * 

*********** 



**t*«H5********* 

* * • 

* * SVC 22 * 

* *BBLEASE THE* 

* • SYSIEH * 

* * « 
**************** 



****JS********* 
* BRANCH TO • 

» UICHAT * 
> IN «»BAITNA • 

*************** 



**** 

* * 

* C5 • 

* « 



92 DOS/VSE Logical Transients 



Chart AS- $$BArTNG ♦ BATCH and START Command Processor (Part 2 of 2) 
(Refer to Chart 04) 



»***A1* ******** 

« 

INlTOPa • 

« 

»****««*«*«**«* 



»«<*as********* 
• assghlog • 

» * 



IHITOPE X 

•SCANK2 AU 



*»****««««*****«« 



••b2******** 



*************** 



'LOAD AODBBSSeS • 

• or LUB TABLE • 

• AHD OF • 

• PIU2 TABLE * 

***************** 



**«««(;b«***«***** 
« SIST SISTEH * 

* CLASS INDEX • 

* IFICL) FaOH • 

* PIB2 TABLE • 

* * 
***************** 



*****Q^********** 

* CALCULATE • 

* SISIEH CLASS * 

* LUB TABLE • 

* ADDRESSES • 

* • 
***************** 



*****Q2* ********* 

t POIMT TO * 

• HIGHEST HAIN * 

• TASK PIB * 

• * 
*«*«*«******«**«* 



• BOVB SXSLOG • 

• AHD SISBES * 
« ASSIGNHBIIIS « 

* TO DESIGNATED • 

* PABI UF TABLE * 
***************** 



.* THIS 

PARTITION 
*. SPECIFIED. 



>*»**U2*>*****< 

• POINT TO 

» NEXT LOWES 

* PIB 

* 
*************** 



.* DDKS *• 

. X*. PARTITION . 

*. EXIST .» 



**** 
* 
G1 * 



*•** 

* 3b * *•* 

**** 

X 
CKPIBFLG .*. 



Gt 



.* IS «. YES .« 
. PARTITION .* X*. 

*. ACTIVE .» « 



****g^********* 

• BBTUBN TO » 

• AUDBESS IN * 

• LINK BBGISIBB * 

•«•*»•*•••««*•« 



POINTING 

TO AB PIB 

NOH 



'***HJ********** 

INCSENENT * 

COUNT IH * 

SISCON OF * 

HO. Of ACTI»8 * 

»IRT. PA9T. * 

**************** 



****Hn********** 



***************** 



**** 

* * 

* JS • 



*****j*^********** 

• SET UP I'U * 

• ISSUE BSG • 

• 1P10D ABEA • 

• AVAILABLE • 

• • 
***************** 



***fK1********* 

• IIRANCH TO » 

• NVSE8R * 

• IN JJBATTNA * 

*************** 



>**«KJ**<****** 

BEruaN • 

TO CALLER * 

*************** 



**fm******* 

* BESIABI • 

PABIITION 

AND RESET 

STOPPbD 

» SalTCH • 

*********** 



•>**K &****•***> 

• bBANCU TO • 

• DICHAT IN • 
> «»BAITNA • 

*************** 



Charts 93 



Chart AT. $$BATTNH - Command Scanner 
(Refer to Chart 02) 



« 
StBATTNH * 



* NOTE VEBB TO « 

* COHPiRB AREk • 

* ANU TO Dunny * 

*eNT81I IM TABLE * 

* * 



• • 

• CUANUE * 

• SUPPIX OF • 

• HAP PROCESSOR • 

• * 



CHKSTT1 X 

••••*U1 **•«•*••»* 

* INITIALIZE • 
•REGISTERS WITH • 

* BUFFER LBHQTH • 

* AND POINTER • 

* • 



* * 

* • 

* SAVE POINTERS * 

* • 

* * 



-*-•-•-*-* 



«*»•*•**•••«*«•** 



•••••03*********» 

• HOVE Duanx « 

• ENTRY UP • 

• TO EXCLUDE • 

• HP COHHANDS * 

« • 



BTLOOP X 

**»**e3**«»««**« 

• COMPARE 

• INPUT VERB 
..X* NITU NEXT 

• TABLE ENTRX 



*»***Di«********* 



* REGISTERS 



■•-•-•-*-* 



«*••••••**••••«•• 



HAS 
II VTAH 
COBHAHO 



* K2* 
> * 



••••*CS********** 

• G£T VOMER * 

• BP, SET UP * 

• NOBBAL BETURM • 

• ADDRESS • 

• • 



* POHBR/VS * 

* BBkNCH TO • 

* POWER BMTRt « 

* ADDRESS • 



****ES<******** 

* BKADCU TO • 

* DTCHAT II * 

* «»BtrrBA * 



*. LENGTH >6 



.* *. 




*««*GU******** 


.* IS THIS •. 


lES 


» BRANCH TO 


. DUBNX ENTRK .» 




* DTCBAT IN 


*. • • 




* tSBATTNA 


*. .♦ 






*- -• 


X 




• NO 


» ♦ 
» BD • 

• * 
• *** 




X 






««**H3********** 






SET UP » 






LOAD OPERATION ♦ 






4 







•***J3*»***»» 
BRANCH TO 
LOADIT IN 
StBArTNA 



BBANCH TO 
NVSERS IK 
«iBATTNA 



94 DOS/VSE Logical Transients 



Chart AU,. $$BATTMO - VOLUME Command Processor 
(Refer to Chart 04) 



* t$B«TTMO * 



-»-•-•-•- 



• GET DBVICB 

• kDOBBSS 

• PA>«HBTB8 



• * 
» SEt VOLID • 

* FROM GETTCB * 

• IN OUTPUT • 

* • 



* « 

* SET fOLID* • 

* *IIO«B* III • 

* OUTP0T • 

* « 



« 4 

• SBI *OLIU> • 
I* »OOIIII* * 

• 1* OUTPUT • 

• • 



•••••BS«****«*»«» 



**»••»••••••••••• 



IBS .* PABH * 

...•.PRESENT (ALL 

•.DEVICES) .* 



LENGTH ' *. 
TOO LONG 
. (COHHENT).* 



• • 6BNI0BU • * 

• «GET AN I08B* * 

• 'FOB CONSOLE* • 
I/O 



• • 



* • 



••••*••*•««••*••• 



••**«{> 1 ••«»••*••• 



«««*jj 2* ********* 

CHECK AND * 

*CONVeBT DEVICE * 

AOUBBSS TO * 

HEX FORMAT * 

« « 



.X* 



.* ONNEB *. 
Its .* IN PUB • 
...*. OMNER TABLE 



.» PnB2 *. 
.* INDICATES *. NO 
*.OPEN DATA SET.*... 
• .ON VOLUME.* 



*****Dlt«********* 



* IN OOTPOT • 

* • 
•*•***•«••**«•«** 



***»*Eit******»**» 



***••***•••*••«•• 



««**•;]•**•*»•*«* 



*••*•••«•«•«••*•» 

»*•• 



«***««««•«*****•* 



• Gt * 

* • 
*••* 



END OF 


• , 


YES 




PUB TABLE 


*' 


*... . 




*. .• 




^ 


• *•* 


». •• 




X 


• 


• NO 




*•«• 


• M2 






* * 


* 


. 




• G<t • 


*»** 



.« MAS *. 
.* BEQUEST * 
*.FOR ONLY 0MB 
*. DEVICE .» 



• PBIHI A LINE • 
.X IP ONE IS 

• LEFT • 

**«*•******•**«»• 



• EXIT TO • 

• UTCHAT IN • 

• SfBATINA • 

•«*««***««««•*• 



.•FILLED •. 
.* A FULL •. YES 
LINE OF ...... 

*. OUTPUT .• 



********** 



***H<t* •****•••••• 

PKINt A LINE 

• TO CONSOLE • 

(SYSLOG) 

*************** 



*****ji********** 

* * 

* GO rO NEXT * 
.* OUTPUT ENTRY • 

* ON THIS LINE * 

* 4 
***************** 



*****l/^ }********* 

*TRANSLATE DE«. 
*ADDR IN PUB TO 

* PRINTABLE HEX 

* IN OUTPUT 

* BUFFER 
**************** 



*****^2* ********* 

* * * * 

* •GETVCE FOR • • 
n* * VOLUME ID • • 



• *** 

* * 
» A3 • 

• * 



Charts 95 



Chart AV- $$BATTNQ - MODE Command Parameter Processor 
(Refer to Chart 05) 



« « 



• * 

• Bi • 

• * 
• ••* 



* 

• RESET 

• INDICATOR 
» BITE 

• IN SSBHTTNA 



PIRCKBTN 

•SCANS! AU 



• •***•***««**«*«' 



•*««F1 «•«»*«««« 



*»«*•**••*••«•« 



BRANCH IF 
IPA8AH£TEB IS 

HiR, ecc, R, 



Q. ^H, 



*****B }•*****•*** 
« • 

» POST 'E* OB • 

• '!• IN • 
*INDICATOB BYTE • 

• • 



•SCANR3 AO* 

* GET THRESHOLD * 

* VALUE » 

« '• 



D3 *. 
VALID 



• *«• 

4t * 

• Jl * 

• • 

• •*• 



****E2********* 

• LOAD « 

• tSBAITNB • 

• * 



•••♦ 




• * 


• • . 




* B3 * 


• Jl «.x. 




* « 


• * 




*«** 


••»* 






X 










» 


» 




• UNABLE 


• 




• 'STATUS* 


« 





«•«««*♦****«•«««« 



• BRANCH TO • 
» NVSER8 • 

• IN tSBATTNA • 



*****f 3****«««»*« 



•*•*«*•••••***«•• 



«1 •• 






««««*G2** ******** 


G3 *. 








» ♦ 






• POST • 


.* » 








SEE 


* 


(ES 


• C0B8ESP0N0INS * 


.* LAST 


*, 




NO 


NOTE »C2 




*••••• 


..X* BIT IN *.... 


. ...X*. PABANETER 




« 






• 




•IMUICATOR BYTE • 


*. 


* 




, 


♦. .• 






♦ * 


*. .* 








*. •• 






*»******•*•*****« 


*. .* 






X 


* NO 








• YES 






**•* 
« • 

• 01 * 

* * 


X 














**«• 


HI *. 








X 








* * 








****H3******«** 




•E' 


* 


lES 




♦ LOAD 




* 




08 <T' 




*. . . . 




* «$BATTNS 




* 





«««»«««**«««**« 



96 DOS/VSE Logical Transients 



Chart AW. SSBATTNR - NODE Comoancl Status Report Pcocessor 
(Refer to Chart 05) 



» * 

• SSBAT'tNB * 

* • 



• CLEtB 
» OOTPUI 

• BUrPBB 



IISIMBJ ^t^ 



• •***C1*********' 



IB 

BliCOBDING 

MODS 






• COBVBIT.tHD • 



*****B1*«****«*«* 



*••**•••••••*•*•* 



•••««D2********** 
*INSaTABa AH* 

*SBI UP TO OSt>LI* 

* BHB CTBS hito * 

* THBESH VALUBS * 



1H5-J- 
*. OB 1<l§ 



• ir AVAIUBLB • 



COIVBBT ABO 

SIT UP TUB 

tHBBSROLD 



«««««>B5****** 
•IXCPBQ 


• ••• 
AC* 




• 


OISPLAI 


• 


• 


BBSSA6B 


« 


* 




• 



***«iCS********* 

• • 

• BBX TO CALLBB • 

• , • 



•INSBTABB AM* 

*SET UP TO DSPLI* 

* BSR CTBS AND * 

* THRESH VALUES * 

•••••••**•••••••• 



•••*»ai*********i 



• •••t'2*******«* 

SET UP TO 

DISPLAX 
BUr DEL • 



• ••••(;2********** 



SET UP TO 
DISPLAY 
ECC.B.C 



••••*••• 



HI *. 
.* *. 

.* CPU«1il5, *. 

*. OR lite .* 

*• •* 
*. .* 

• KES 

. i 

• SET UP TO 

• DISPLAY 

• ECC.B.n 



.* IN *. NO 
*. RECORDING .*... 
*. RODE .* 



•••*••«• 



*DISPLAI BUFFER * 

« • 



*IRSBTAEB AN* 

•SET UP TO DSVLI* 

* ERR CTRS AND • 

• THRRSa VALUES * 



*. QUIET NODE 



SET DP TO 
DISPLAI 

ECC.Q.C 



••4 


>««Jb******* 


>•• 




SET UP 10 






DISPLAt 






KCCU.CtH 








>•• 



****K2********* 

• BRANCH TO * 

• CONTROL • 
> IN SBBATTRA * 



Charts 97 



Chart AX- $$BATTNS - MODE Coma and Validity Ciiecker (Part 1 of 2) 
(Refer to Chart 05) 



* * 

* »»BATTMS' • 
» « 



4i***B1* ********* 

* 

ENTEH * 

SIIPBRVISOR * 

STATE • 

* 

**************** 



» SET UP * 

• BETORN * 
» POIMTS * 

* * 
***************** 









• BJ* 








* * 








* 




X 






CKECCHQ 


C3 ». 

* * 






.* 


HODE 


« 


IBS 


*. 


scc.n.Q 






*. 




* 


• 




*. .♦ 




X 




• MO 




***** 
•AY * 
• B»* 



REFBBENCKS 

TO AXD5: 

AyC), AYH2 

***** 



PBOCeOOBX 



***** 

• A« * 

• B2» 



.* CPU= 


145, • 


. YES 


Mkb-i 


.*. . . . 


• . OR 1<»b .* 




♦ . .* 




*, .* 






f NO 






t 




****j 1********** 






FORCE a BIT 




IN INDICATOR 




BYTE 








************** 


•* 




X 





E8R0R COONT 

* 
*************** 



«*«**ti2* ********* 
« * 

< CHANGE HIB TO * 
*BeCOBOING HODE * 

* IN CTL REG 1<» • 

* * 
***************** 



«**««J2********** 
» CHANGE ECC TO • 
•8EC0BCING HOOe * 

• VIA DIAGNOSE * 

• INSTRUCTIONS * 

• * 
***************** 



>***K2********* 
BBARCH TO * 
CONTROL « 
IN StBATTHA • 
>«************* 



***** 
•AY * 
• 85* 



* 


NO 




***** 
•AT • 

* G2* 

* * 

* 


X 








CKECCCTH .*. 








H3 


*, 






.* 


* 






.* BODE 


* 


YES 


*. ECC.C 


TH 




.*... . 






****K3********* 

* BRANCH TO * 

* NYSEBB * 

* IN SSBATTNA * 

*************** 



*****E5***««***** 

* SET UP NEH • 

* EHBOB COUNT • 

* LIBIT m * 

* BUS TABLE • 

* • 
*••***•*«•*•••••• 



»***«S5********«* 

* * 

* SET UP MEN • 
*' IIBE LIHIC III • 

* BBS TABLE • 

* « 
***«**•*•**•***«• 



****H5********* 

• UBAHCB TO * 

• CONT80L * 

• IN $«BATTNA « 



98 DOS/VSE Logical Transients 



Chart kY $$BATTNS - MODE Coamand Validity Checker (Part 2 of 2) 
(Refer to Chart 05) 



Foa HtR,R 

• »•»» 
*kX * 

• K1» 



*hi * 

* F1* 



FOH ECC.a.B 

*AI * 
» BJ» 



FOR ECC.H.U 

*»I * 

» CI* 

* * 



FOR ECC.C.R 
» Fi» 



• POST HIR in • 

*RBCOgDItla NODE • 

« RESET HIR • 

» EBROS COUHT • 

« « 



* CHkllGK HIR * 

* TO RECORDIMG • 

* MODE IH * 

* CTL REG in • 



•AX * 

» Db* 



*««««{j 2* ********* 



»•*«•****«««• 



«««««C2* ********* 

* * 

* CHARGE HIR * 

* TO UOIET MODE * 

* IH CTL REG Mt * 
« * 
«*««««***«««***«« 



««**02********** 

CHARGE ECC * 

TO UUIET HOUE * 



««*••«*•*••««« 



.*.«-«.«.*.«.*. 



***************** 



«****C3»********* 

* POST ECC HAIM • 
*RECORDIN(i RODE * 

* RESET ECC « 

* BHHOB COOHT * 

* * 
***************** 



•****03******««*» 

* CHARGE KCC to • 
•RECORDING ROOB * 

* VIA DIAGNOSE * 

* IHSTRUCIIOHS * 
« « 
««***•••«•**«*•** 



*****Bi»********** 



•*««**«••«**«•»*• 



• «»**Clt********** 
« CHANGE ECC IN * 

• QOIEI RODS * 

• ONLY BAIM IF * 

• CPU » U5 • 

• « 
***************** 



«-*-«••-•-«-»-•• 

* TEST IF HiR * 

* IR QUIET BODE • 

* * 



*****C&*****«**** 
VPOST ECC CONTBl.* 

• IN RECOSDIHG • 
« BODE RESET * 
*ECC ERROR COUNT* 

* « 
****««••••••««••• 



**«**DS****«***** 

• CHANGE BCC • 

* CONTROL IN * 
•RECORDING RODE • 

* VIA DIAGNOSE • 

• • 



FOB ECC.C.U 

• ***li 

♦ IX * 

* GJ* 



FOB BCC.C.TH 
• *•** 
•AX * 



*•*•;(»•***•«••* 

* * 

* HIRQUIEI • 

* • 
•••••••**«**••* 



*«**«e2******«** 

« 

• POST BCC 
« CONTROL IR 
» UUIET RODE 

**************** 



*MIRQUIET Alt* 

•-»-«-•-•-•-»-*-• 



••*•*«*••**•*••*« 



HIR 

IR gaiET 

. BODE 



»**«*H2* ********* 

* CHANGE ECC • 

* CONTROL IN * 

* UUIET BODE * 

* VIA DIAGNOSIS * 

* • 
***************** 



*****}i^* ********* 

* * 

* POST ECC * 

* CONTROL IN * 
*IHBESHOLD BODE * 

* * 
***************** 



***«tl5********* 
» BRANCH TO * 

• NVSERB • 

* IN StBATTNA * 

«*•*«*«**«*•«•* 



***** 
*AX * 

• D5* 



****»J3********«* 

* CHANGE BCC * 

* CONTROL TO * 
*THRESHOLO RODE * 

* VIA DIAGNOSE * 

* * 



Charts 99 



Chart BA- $$BATTNT - ALTER Command Processor (Part 1 of 2) 
(Refer to Chart 06) 



► A3 * 



****^} ********* 

* * 

* $»BATTNT • 

t * 

*************** 



IJBATTUO 
START X 

*****Q-\****m** 



************** 



*****Q-}******m** 

* *IMITI»LIZB * 

• *PC EXIT B» * 
» •STXIT HACRO* 

SVC16 * 



* * 
******** 



It******* 



.*. 

A2 *. 

.* START *. 

.* ACDR ♦. 

•.EXCEEDS VIRX..< 

*. KNE OP .• 

*.PA8T .♦ 

♦. .♦ 

• NO 



*f^2******* 
* CIBAS » 

' SMITCH FOR 
P80GB. CHECK 

►EXIT ROOTINE 

*********** 



»»»»»C2****»*»*** 

* USE A DDHFIIt * 

* INSTRUCTION ♦ 

* FOR THE STA9T * 

* ADDH * 

* »C5 * 
**m* ************* 



**** 
READ 

***B3* 
SDSTHT 



***** 
*BB • 
» h2* 



********* 



READ DATA TO 

BE ENTERED 

INTO CORE 



(*******«* 



****D I********** 
SCANR2 AD* 
-*.*.*.*.*-*.*-* 

SC»!I FOR • 
OPERAND * 

* 
******«•****«•** 



.* ADDR *. 
• WITHIN 
SUPERVISOR 



****«F1 ********** 



******** 



**** 

*aB ♦ 

* E2 *.X 



**** 
RESETSW X 

*****[)3********** 

* * 

* SET UP ERROR * 

* BSG FOR • 

* SSBATTNA * 

* *li5 * 
***************** 



*****E3********* 

* SET TO SCAN 

* THE LESSER 
*0F 32 BYTES OH 
*NaRR£B OF CHAR 

* ENTERED 
**************** 



SAVEH3 

*****f 3*4 

*SCANHEJ( 



*************** 



.PBOGH. CHECK 



.* DUE TO 

*. INVAL. £N0 

*. AODR 



*****Cif ********** 

* * 

* SET UP * 

* SISIEU RBBOR * 

* RSSGB * 

* * 
***************** 



> ISSUE riESSAGE* 

**************** 



•***E1* ******** 

BRANCH 10 * 

CONTROL IN ♦ 

XSBATTNA • 

*************** 



t***fH********* 
BRANCH TO » 
DTCHAT IN * 
*$UATTNA * 

It************** 



INVALID1 

*****QH********** 

* MOITB nSG * 
••IrtSD INVALID * 

...X* ENTRY' TO * 

♦ OUTPUT * 



****** 



IS INVALID. A PROGB. 
CHECK OCCURS AND THE 
PC EXIT ROUTINE GETS 
CONTHOl, KHICH R8TDHNS 
TO LABEL •DUIIBI> 



ERRROUT X 

*****\i2*******'> 

* SET HP 

* WSSGE lltlU 
..X* 'INVALIU 

* ADDRESS' 

*************** 



L0ADR3 X 

*****j ]******** 
♦SCANHEX B 



************* 



ISSUE flSSSAGE* 

«***»*»«***«** 



*«*K2********* 

BRANCH TO * 

CONTROL » 

IN $$BATTNA • 

************** 



H3 *. 

.» END *. 

» ADDS. *. YES 

BXCEEDS VIST. .*.... 

►. END OF .♦ 

•.PART..* 

*. .* X 

• NO *** 



**J3******* 

* CLJiAH » 
• SNITCH FOR 

PBOGR. CHECK 
•EXIT ROUTINE 

* * 
*********** 



«***K3«**«****** 

USE A Dunnx * 

INSTRUCTION * 

FOR THE END * 

ADOR. * 

*K<1 * 

**************** 



«***J4********* 
BRANCH TO » 
NVSERR IN * 
SiBATTNA • 

*************** 



•Kt 
IF 

IS i.n«ni.xu. It rnuun. 
CHECK OCCURS AND THE 
PC EXIT RnuTINE GETS 
CONTROL, WHICH 
RETURNS TO LABEL 
•DUHI1I1' 



*Kb 
1II«:>D 
INVALID 
ENTRY 



* A« • 

* < 

«*** 



100 DOS/VSE Logical Transients 



Chart BB. $$BATTNT - ALTER Command Processor (Part 2 of 2) 
(Refer to Chart 6) 



***** 

*Bk * 



**»**HEFERENCES 
• ^*T0 BB»2: 
*^ **BA*3, BAE2 



***•*£ 1 ********»« 
« SET UP BSfi • 

* •1I»71' XX • 
♦BYTES CAN ONLY • 
» BE ALTERED' • 

* « 
*******««***««**« 



**************** 
**** 



X 


INVALID X 


CI ♦. 


***»*C2********** 


.* *. 


• MOVE HSG ♦ 


.* START *. «liS 


I ••1II12D IHTALIO * 


*. ADDH ALSO .*... 


* RESPONSE' * 


*. IN SVA .* 


* TO OUTPUT * 


*. •• 


* * 


*. .* 


***************** 


* MO 




»**• 


**** I 


* * .REFBREHCES 


•BA * 


* • •.X.TO BBDl: 


* G« ••X. 


« * .BASa, BAH3 


* * 


.**•* 


***• 


ALTER1 X 


. CCwLNG X 


*****[) t ********** 


***D 2* ********* 


• CALCULATE * 


PUTnSG BB 


* MOBBEa OF • 


*-*.«-*-*.*.*.*. 


• BYTES TO BE » 


PRINT ERROR HSG 


• ALIEBED « 


* ANU READ REPLY* 


***************** 


***************** 



****A 3* ******** 

* « 
> SCAKUBX « 

* • 
*************** 

**** 



.* CHABACTER *. NO 



****AS********* 

* « 

* POIHSG * 

* • 
****•*•*•****»* 



0-9 OR A-P 



****B4********* 

> BRANCH TO * 
' EBRRIN IN * 

> t$BATTNA * 
*************** 



PUTHSG X 

***D5**** 
EXCPBG 



>••***** 



*****C3********** 



>********«**«**** 



* ALL 

CHARACTERS 
*. SCAM 



*****E3****»**« 

• CONVERT 

• IMPOr TO 

» PACKED FORH 

*************** 



***************** 



READ REPLY 



******** 



****D<«******** 

* BRANCH TO 

* DTCHAT IN 

* JSBATTNA 



****E<t*******> 

* RETURM 10 

* CALLER 

************** 



ANY REPLY .* 



****jj5*******«» 

* * 

* RETURN to • 

* CALLER • 

*************** 



* SVC 22 * 

* SEIZE THE * 

* SYSTEM • 

* * 
***************** 



• PC ROOT 

* *F5 

*************** 



*****G 1********** 

* * 

* ALTER CORE TO * 

* END-OF-EMTRY • 
•OR EMD-OF-CORE * 

* * 
***************** 



.* CAUSED BY 
.DUHHY IHSTB. 
*NEAR LABEL. 
♦.DUMMY.* 



*****H 1********** 

* • 
» SVC 22 • 

* RELEASE THE • 

* SYSTEM * 

* * 
***************** 



.* CAUSED BY 

.DUMMY INSTR. 

*NEAR LABEL. 

*DUMMY1.* 



****j ^******* 

* BRANCH TO 

* CONTROL IN 

* SSBATTNA 

************* 



1IU2D ADDRESS 
WITHIN SUPERVlSOa 
OB SVA 



**jl|*****«t 

'SET INDICATOR* 

FOR ANY P.C. 
► HAPPENED • 



*SfiT INDICATOR* 
* FOR INVALID 
* ADDRESS • 

*********** 



SET INTERRUPT 

ADDRESS TO 
LABEL DUHHY1 



«****Kt>*****«***« 

* * SVC17 • « 

* * BRANCH • • 
X* TO INTiiHRUPT* • 

* * ADDRESS * • 
» * * « 
***************** 



Charts 101 



Chart BC, $$BATTNU - DSPLY Commant' Processor (Part 1 of 2) 
(Refer to Chart 6) 



* * 



ueATum 

BEUIM X 



**»***««*«**««« 



INITIALIZE • 

PC EXIT BY » 

SXXII MACRO • 

SVC 16 * 



•*••*»**»**•*«**• 



* * 

♦ C0NVB8T • 
» ADORBSS TO * 

• PACKED FORB • 

* * 



.EXCEEDS VIRT.. 

*. ERO OF .* 

•.PABT .* 



* CIBAB 
SWITCH FOR 

PC BUT 
SUBROUTINE 

* 
*********** 



*****ij^********** 

• BSE A DUflHK • 

• mSTHUCTIO* » 

• FOR THE START • 

• ADD8 • 

• *K1 • 
***************** 





**** 

* * 
» AH « 

* * 
**** 


**** 

* * 

* Ab • 

* « 


* 


X 
-*. 

A* •. 

.♦P80GR. *. 
CHECK ODE «. IBS 
TO IHVAL. ...... 

.BNU ADOB .* 


DSPUXI i 

*****A5********** 

* CALCULATE * 

* NUHBEB or * 
...X« BtlBS TO BE • 

» DISPLAYBO • 



*»«**BU********«* 

* SET UP HSSGE * 

* 1S41A 'SISTEM • 

* ERROR, PBOG. • 

* CHECK III LTA> * 

* * 



* ISSUE NESSAGE* 



*«**0>t*******«* 

• BRANCH TO • 

• CONTROL IN * 

• $$BATTNA • 
*************** 



***************** 



«SBT UP HESSAGE • 
» •1I4UI XX * 

* BITES CAK * 

* OILI B£ • 

* DISPLAIED' • 



**«C5****»«****** 
EXCPRG AC 

ISSUE MESSAGE 

* * 

**** * 

* • . 
» 05 '.X. 

* * - 
**** , 

DSPLI X 

*«**«05********** 
« * « « 

• * S»C ^2 • » 

• * SEIZE THE * » 

• ♦ SISTER • • 



****f1 ********* 

* BRANCH TO * 

• MVSBRR IN * 
» JJBATTNA • 

*************** 



**** 
SROUT 1 
t****(i2********** 
t * 

' SET OP • 

► HSSGE IIUIU * 
» 'INVALID * 
» ADDRESS* * 
■>**»*********•*** 



• ISSUE NESSAGE* 

**************** 



***j 2* ******** 
BBANCH TO • 
CONTROL IN • 
tSBATTNA * 

************** 



*****f j********** 

* CALCULATE • 

* END ADDR= • 

* START ADD8 ♦ 

* ♦lb * 
***************** 



G3 *. 

.* END *. 

.* ADDR *. IBS 

'.EXCEEDS VIRT .*.... 

*. END OF .* 

•.PART .» 

• . .* X 

* NO *• 



**\ii******* 
» CLEAR • 

SWITCH FOR 
PC EXIT 

SUBROUTINE 
t * 

*********** 



*****j J********** 

* USE A DOHHI * 

* INSTRUCTION * 

* FOB TUB END * 

* ADDS • 

* »Ki * 
***************** 



*****g5**«*«***** 

* • 

* HOVE DATA * 

* TO WORK • 

* AREA • 
« « 
***************** 



*****fi********** 

* * * * 

* • S»C U2 » * 

* •RELEASE THE* • 

* • SISTEB • » 

* • • • 
*************i**** 



••••&&••*••••••* 



***************** 



STCCK7 X 

•••H5»*^^»*^*^»^* 
EXCPRG AC 

PRINT DATA 
• ON SISLOG * 

***************** 



****J^********* 

* BRANCH TO • 

* CONTROL IN • 

* (SBATTNA • 

*************** 



*. 



OCCURS AND THE PC EXIT 
ROUTINE GETS CONTROL 
VHICH BETURNS TO LABEL 
•DSDUHHI' 



OCCURS InD THE PC EXIT 
ROUTINE GETS CONTROL 
WHICH RETURNS TO LABEL 
•OSDUBHIl' 



. CHECK 
.» 

**'»ES 

X 

t*t* 



**** 

* m 

* Db • 

* * 



102 DOS/VSE Logical Transients 



Chart BD. $$BATTNU - DSPLY Command Processor (Part 2 of 2) 
(Refer to Chart 06) 



► BSPCBOOI » 

t PBOGB. CHECK « 
>lilClT SUBSOUTIHE* 



». 



.*. 

B2 * 

• • P.C. 

.* CAUSED BY *. 

.DUBHY-INSia. . 

•KEAH LABEL.* 

• DSDUBIIY* 

♦ • -* 

» NO 



.• P.C. *. 
.* CAUSED BY 
. DUMRY-IMSla. 
*II£AEI LABEL. 



' INDICATOB 
F08 ANY P.C. 
> HAPPENED 

« 4 



*«***£2*** ******* 

* * 

* SET INTESBUPT • 

* ADDRESS TO * 
'LABEL DSDUnnH 1 * 
» * 
>**««*«*«******** 



DSPCB0UT1 

**D3******* 

• SET * 

♦ INDICATOR 

* FOR INVALID 

* ADDRESS 

• « 
«*«*«««*«*« 



* • SVC 17 • * 

* * BRANCH TO * * 
» • INTEB8UPT * » 

* • ADDR. » * 

*«***« *««*«**«*«« 



Charts 103 



Chart BE. $$BATTNV - DUHP Cooiiiiaad Scan Routine (Part 1 of 4) 
(Refec to Chart 07) 



* • 

* tSBATTNV « 

* * 



• • 

• Point TO BG ♦ 

• COMRBCi 6 • 
» SISCOH • 

« • 



* SCAH FIBST • 

* PARiHBTBB OF » 

* DHRP COHHINI) • 



• ANI *. NU 

PASABSTSR .». .. 
•.SPECIFIED.* 



ERM 



.* LENGTH OF *. 
.FIRST PARAN. . 
•. ' •• 



• SET Bits TO • 
K* DOHP ALL • 

• PARfiriOliS • 

• * 



X 






.*. 






F1 ». 






.* *. 






.* *. KES 






*. DELINITER .*.... 






*.=,.• 






*. .* 






». .« X 






• NO ••••* 






•UH * 






• Bt» 






• • 






, « 






X PUONP 






.•- 


TOL .*. 




Gl *. 


G3 *. 




.* *. 


.* ». 




.» •• NO 


.» •. 


•0 I 


*. LENGTH .* 


...X*. LEVGIH .* 




*. =6 •• 


♦. "I .• 


•. .* 


*. .» 


^ ^ 


*. .* 


tt, ,« 


X 


• KES 


• XES 


••••• 

•BF • 

• 81* 

• ♦ 

• 


X 


X 


NORNAL 


.». 


• •. 




HI *. 


HI *. 




.* *. 


.* ♦. 




.* PARAH ■ *. HO 


NO .* *. 




•. BUPFKR .*....X 


......*. PABAN .* 






• . ■ S .* 


*•• ••' '. 


*. .* 




•• .• X 


*. .* 




• IBS ••••• 


* IBS 




• UG • 






• BS» 






• • 






• 






EBB 


. 




X 






• • 




• SET BIT TO • 


« SET BITS to • 




* DUHP SOAID « 


• DUMP S(PVS * * 




• BUFFER • 


*ALL PARttTIONS * 






• * 




. 


••••••••«•« *»*•• 


!x 


It 


.•......•...•.*.. 



104 OOS/VSE Logical Transients 



Chart BF- SSBATTMV - DUMP Command Scan Routine (Pact 2 of 4) 
(Refer to Chart 07) 



•BE • 
• G3» 



• • 

• SKT bXtS 10 * 
.X* DOHP SIA AND • 

• • 



••••• 
•BG • 
• Bb» 



•••••B 1»**«*« •••• 



•••••••••«••••«•* 



♦ SET an FOB • 

.1* FABTITIOII TO * 

» BE OOaPED * 



«es • 
• fli* 



•an » 

* B5» 



Charts 105 



Chart BG, $$BATTNV - DUMP Command Scan fioutine (Part 3 of 4) 
(Refer to Chart 07) 



REFESENCKS 
TO BSB1: 
BBJ1, BFB5 



• *. 

OELIH 



*«****«****«*«•«* 



XO .* LENGTH 



*«*««**««««« 



•••••C3********** 

• CILL SIJBDU8P » 

• FHISE IN SVk * 
*TH!ta STC2 HOOK * 

• FOR SSBPDORF * 

• * 



«***1)3*«******« 

* BRANCH TO « 

• CONTROL IN 4 
' SSBATTNl * 



REFER F.HCBS 
TO B&8S: 
BB01, BEH1 
BFD3, BFE2 
BHG1, BHUI 

• •*«• 

* * 



«»***BS********** 

• * 

* POT INVALID • 
..X*OPBB*NO BESSAGC* 
. • IN SS8AITN1 * 
. * BOFFliil * 

• B5 • ♦ . 

* » C5 •.X. 



* HBITB DBSSIGB • 

* ON CONSOLE • 

* • 



****D&***««**** 

• BBINCH to • 

• CONTROL IN • 

• «SBtTX«i • 



**** 

> 4 

• B5 » 



PINDPUB X 
•CHKAOB 



* CHECK AND * 
♦CON»ERT DEVICE • 

♦ ADDS • 



H»CllSGb 

« PUT INVALID * 

• DUBP FILE • 

. ..X» HSG IM » 

( <S*bATTNA BUFFER* 



X 

• *** 
* « 
» C5 « 



. FBA OR . 
♦PRIMTER* 



.* OUHP •• 
.SDAID BUFFER . 
•ON PRINTER.* 



UEVOK X 

• SAVE PUB 

♦ DEVICE TYPE 

• AMD IHDEX TO 

♦ PUB ENTRY 

m 



» Ai • 

* • 



106 DOS/VSE Logical Transients 



Chart BH,, $$BATTNV - DUMP Command Scan Routine (Part U of 4) 
(Refer to Chart 07j 



• * 

* CUKkOB • 



LoaP3 

HO .• 



•••••CI *•*••*«*«* 
«CHKADR BH« 
•-•-«-•-•-•-•-•-• 
*CHBCK & CONVERT* 

* ADDRESS * 

• • 
«««««•**«•••«•*«• 



•••*•••**••*••*** 



-•-•-•-•-•- 



»•••«•••«•••••••• 



DISH *. 
= VALID HEX . 
♦ DIGIT (»-F)» 



••••*C<I********«' 



• **•«*••***•••••' 



•••••^((••••••••** 

• * 

• COHVBHI • 

* ADB TO PACKED * 

♦ HEX • 

* • 
••*«•••*•«**••«•• 



•••••F5***»^*^^^« 



••••••••••••«•••• 



* BEGIH 


« 


HO . 


ADD8 < END 




*..X. 


*. ADDBESS 






*. .* 




, 


*. •• 




X 


* XES 




• •*•• 

• BG • 

• Bb* 



• •••G !(»••*•••*• 

> • 
» RETDRH » 

> « 
«•••«•**•••••«• 



Charts 107 



Chart BJ.. $$BATTNY - CE MODE Command Processor 
(Refer to Chart 08) 



* « 

* SStBATTKY • 



* * 

* POINT ro • 

♦8BC0RDINS FILE » 

* TABLE * 

* * 



» b2 » 



* SKI1> CE P«R»n • 



VALCUUOO K 

»SCiN»3 AD* 

• GET CCJU • 

• PABAMKTER » 

• * 



»««*«C 2* ********* 



*************** 



*«*«!; 2* ******** 

UfiANCH TO 

CONTROL 

IN SSBATIRA 

*************** 



*«*««G1****«***** 
• PEEPAMli TO » 



*********** 



• **H1***>* ****** 

SEARCH PUB * 

FOR THIS * 

DEVICE * 



VALUBOO X 

*****BS*********« 
*SCANB3 AD* 



***************** 



VALNOOOO 

*«***C3********** 
*SCANR3 AO* 
«-*-*-«-*-*-«-«** 
•GET I, D, OH II • 
* PA&ANKTER * 



*****^j*»******** 

* * 

* SA»E * 

* COBREStONDING * 

* DEVICE MODE * 

* * 
***************** 



«***«D5********** 
« * 

* CONVERT 10 • 

* BINARI AMD • 

* SAVE VALUE • 

***************** 



*****g^********** 
vSCAHBi AD* 

* GET BIT * 

* CABAHETEB • 

* * 
***************** 



* BRANCH TO * 

* NVSERB • 

* IN ASBATTNA • 

•*••*•**•****•« 



•****G 3* ********* 



* MASK TO X'FF' 

* 
*************** 



*****fi^********** 

* ue BYTE AND * 

* BIT VALUE TO * 

* SET BITE/UIT * 

* HASK * 

* « 
***************** 



****J 2* ******** 
* BRANCH TO * 
» NVSERR * 



*****f^^* ********* 

* * 

* POINT TO * 

* PUB2 ?oa * 

* THIS DEVICE * 

* * 
***************** 



SETUPOO X 

*****ji**»******* 

* SET IN PUB2 * 

* BYTE/BIT HASK • 

* NRH DEV MODE * 

* AND LIBIT * 

« * 

***************** 



****H ^********* 

* BRANCH TO « 

* CONTBOL « 

* IN XSBATTNA * 

*************** 



108 DOS/VSE Logical Transients 



Chart BK- ^SBATTNZ - 115/125/135/138 or 4300 MODE Command Processor 
(Refer to Chart 8) 



* • 

* • 
*••*•*•••••*••• 



•***A }*••**••••• 

GET COHl'BOL • 

IR SUPEBVISOR • 

STtTE • 

* 
*•«••*•••**••••• 



• ••••^-{•••••••••: 



• •••••••••••••**i 



SHS ACTIVE 



»0 .* CPa=13b, *. 



••*• 

• • 

• UJ • 



•••••02********** 



••••*•••••*«•*••• 



****E2********* 
> BBARCH TO * 

• »SB»ITNX • 

* • 
*«•«••••«•••«•• 



PIBIHOO .•. 
D3 « 
, • 
lis .* HO08 



• E3 '.X 

• * 
*•** 

X 
•••**£3**«»»**^* 

« 

• POINT ro 

•RBCOBDING FILE 

• TABLE 

• 
«••«•«•«•••*««•• 



• •** 

• • 

• H2 * 

• * 

• •«« 



•••••^••••••**«» 

• SETUP • 

• STATUS • 

• MESSAGE • 

•••••••*•»••*••*• 



• ••••U ^••••••c*** 

•EXCPBG AC* 

*-•-•-•-•-•-•-*-• 

• DISPLAY • 

• STATOS * 

• MESSAGE • 

••••••«•*•••••*•• 



G3 • 
HOUE 



• •*• 

• * 
» H2 • 

• • 

• ••• 

X 

•••««H2*^«*****^* 

• • 

• SET OP AHD • 

• ISSUE MESSAGE *X 

• • 

• • 
•••**•*••*••••*•• 



YES .* MODEL *. 
...... 115/125 

•.OR 4300^.* 



• POST • 
•BECORDIRS RODE • 

• IR CB 1» • 

• • 
•••••••••••*•*••• 



• POST • 

* UUIBT BODE • 

* IR CB 14 • 

• • 
«*«•••••••«•««••• 





••••{'■■••••••••« 


lES 


* BBARCH TO • 




* CORTROL • 




• IR iSBATTHA • 




••*•••••••••••• 


YES 













•••••Ull^ •••••«•«• 

* * 

* BESET IB • 

* IR BECORDIRG • 

* FILE TABLE * 

* • 
••«••••••••*••••• 



•••••{^^^•••••••••^ 

• • 
« POST IR. • 

• IR BECOBOIRG • 

• FILE TABLE • 

• • 
«•**•••«••••••••« 



••••J2*^****«** 

• BRANCH TO * 

• CONTROL IR • 

• itCBATTRA • 

«•••••••••••««* 



*•••« J 3 ••«*•«••*• 



•••••*•****«*•«•• 



• •••jil«****^*^^ 

• BRARCH TO * 

• CORTROL • 

• IR *SBATTRA * 

••••••••••••••• 



•***K J •••***•** 

• BBARCH TO • 

• SSBATTHQ « 

• • 
••«•••«••••••«• 



Charts 109 



Chart BL, $$BATTN2 - PfiTY and TPBAL Command Processor (Part 1 of 3) 
(Refer to Chart 04) 





• *2 • 


* AJ * 




« * 


« « 




**** 
*x 


**** 




P8TJ20 i 


'. PBTtSO i 




•••♦«A2****»*»»** 


*****A3********** 


****At* *«*****■* 


* « 


* PBTKOS » 


* * 


» ClAEB » 


•-*-*-»-»-»i»-*-» 


* »»BATTN2 » 


* BUFFER+i • 


» BE-INIT 'X... 


♦ • 


* * 


• POINTERS * 


***•********«*» 


♦ * 


* ■ * . 




**4i**«4' *«*«***«** 


.NO • 
' • ,* *,RliFti«ENCES 
; »iTO BLAJ: 
I »»»*;BI1C5, BNE2 
X 
.*. 


PBTY X 


X 


•••*«B1«**«»*»»*» 


*»*»*B 2** **»**•«• 


B3 ♦. 


*SC»HH2 AD* 




.* «. ****BM********* 


*-*-»-•-*.»-•-*-» 


♦ BETPRTJ * 


.* TPBAL *. NO * BBARCH TO 


* GET OPERAND • 


* IN PBIYPID • 


*. ACTIVE .* X* COITBOL III 


* « 




*. .* • SSBAITMA 


* • 


* •' 


*. .» »»»»♦♦»»•»♦»««• 



•*ci******* 



TO PRTJ15 

•»*•«*♦*♦** 



PRTY05 X 

♦ SEX • 
» HPABT * 
» AND * 

• HKET • 

* * 



****E1********« 

• BRANCH TO * 

• EXITADORESS • 



PBIY15 


.*• 

n *. 

» • 




tES .» 


IS 


*, 




THERE AN 


, 


« 


OPERAND 

♦ . .* 


* 


X 


*. .* 




*«««• 


* NO 




*Bfl * 






• *1* 






* • 






* 






PBTYSET 


Gl' '*. 

* IS * 




NO .* 


DELIHITEB 




....*. 


A BLANK 





LOAD • 

NPABT IN * 

HRKBG2 « 

« 
**************** 



• SET • 
• EXITADORESS « 
• TO PBTtiO » 



»***»C2********** 



•*«****««*** 



paTy2i 

«**«»D2** ******** 
•CONVERT PIK IN ♦ 

* PBTYFLD TO • 

• PART HAHR IN * 

* BUFFEEI * 

• * 
«««*««*«********* 



*****E2»*******» 

* HOYE 

* DELIHITER 

* TO BUFFEB 

* 
«••*«*•***«*•**« 



.* ALL *. 

PIKS 
*.PBOCIiSSED. * 



**•*•«*•******** 



****H2********* 

• BBAHCH 10 • 

• EXITADORESS • 

• * 
**»*•**»•****** 



•**••****** 



• BRANCH TO * 

• NVSEBR IN * 

• $$BATTNA * 

••••••*•••*•••* 



*•** 

* « 

* A2 * 



**C3**»**»* 

* SET « 

• EXITADDBESS * 

• TO CONTROL • 



*m***m*.m*** 



*****D3********* 
» BO»E 
* 'TPBAL' 
» TO BUFFER 



•«*•«*«********* 



110 DOS/VSE Logical Transients 



Chart BM. $$BATTN2 - PRTY and TPBAL Commana Processor (Part 2 of 3) 
(Refer to Chart 04) 



•BJ. » 
* F1» 



•••• 






•••• t 

part52 .». 

B1 < 



•**»«4it«** ••••••• 

• Si.t OP tOU • 

• loot SlkHTLte • 

• »ltU LAST • 

•Pkutttioas * \ • 

• • 



•••• 



•••••••••••••*•»> 



.rjis .• MKriixcHi •. 

X...*. AUtBADI 

*. DKFUKD .* 



• ••••£ 1***«*««*** 

• STCBE PIK * 

• Alio UBUaaLtEB • 

• III CBTTFUI • 

• * 

• * 



m * 

• U8T * 

• CDKBerr • 

• PIK « 

• « 



POUBH •. 

la cms 

.PAMIITIO*.* 



••••••«••••••••*« 



•bJu • 

« • 



.X*. Di!I.XHXTIiil 



.* MBTiriuii •.no 

*.B( tOBBB .* 



•••••***•«*••**•* 



• « 

• GST OPBBAUD • 

• « 



.• ktL •. HO 

. SkkTlTXOU .*... 

*. DliPIKBD •• 



•••• 

* V 

• * 
• *•« 



* a 

• H3 « 



• «•• It j********* 

• BBtaca TO • 

• MVSBBB £1 * 

• SSBATTIA * 



Charts lit 



Chart BN, $$BArTN2 - PKTY and TPBAL Command Processor (Part 3 of 3) 
(Refer to Chart 04) 



• * 
« TPBAL • 

• * 



* GET OPBBANO * 



■0 .• IkLUB *. 

[..*. =NuiiBiiR or . 

•PHBIITIOHS-* 



« 

STORK » 

V4L0B IM * 

SYSCOH * 

* 



••***H I ••*«••*•* 



******««**«*«««« 



****j )***••»••*• 



REgoesT 

TPBAL 
RBSHT 



• ilBANCH « 
.X» TO NVSEBR • 

• IN SSBATTNA * 



• GET TPBAL 

* VALUE PROH 
!• SYSCOM 



*••••*•••••••••* 



•**E3******«***** 



»BL • 
• A3* 



•••*•*••«•«*•*«*« 



> BRAMCH TO « 

• CORTROL III * 

* S»BATTMA • 



112 DOS/VSE Logical Transients 



Chart BP.. $$BATTN3 - ENDSD Commaad Processor 
(Refer to Chart 04) 



• * 



> « 

• SSBkTTO • 

* • 



* • 

* OSIMG CTLXST * 

* BUILD PSBLIST * 

* AS FOLtOHS • 

* • 



• HC 32,5 • 

*INTCPT BY SDAID* 

• to PBIBT ITS • 

• COBS HBAP BUF • 



••**»B3*****«***« 

• * 
•PS« tODBESS OF • 

• EkCH SIStBH * 

• SIfB tRBk • 

• • 



• J3 • 

* • 
• *«« 



«****C3********** 
•FSB XDDBBSS OF • 

• EkCa BXISTIMG • 

• SISTBH CkSK • 

• SATE ARBt • 

• • 



• • • • 

• • SBtZB THE * • 
• SISTER ♦ • 

• ♦ • • 
■> - » » 



• • 

• FSB kOOBESS • 

• IK lift • 

• SAVE ABEi • 

• • 



•••*•£ 1* »••••••«• 



•••••«••*•••••**• 



••***E3*«««**«**» 
•FSB aODBBSS III • 

• B&CH TASK OR • 

• SDBTASK • 

• SkVB ABEt * 

• • 



• BESTOBE * 
» CONTBOL * 

• 8E6ISTEBS * 

• 8 TO 11 • 



••**«F3»*««****** 
« « 

• USIHG PBBIISI • 
•SEROVe PBR BIT * 

• IB AIL PSB*S • 

• • 



• • 

• REMOVE FEB * 
*BIT III FROGRAn • 

• REH FSB * 

• * 



•»***G3*«*****«** 



>*•*»•««•«**•*•«* 



•••**|]1»****««**» 

• BUILD CtLIST » 

• HITH PUB ADUR « 

• OF BACH * 
•TASK OR SUBTASK* 
« * 



•••**H3»»*»*»»*»^ 

* FREE REAL • 

• STORAGE • 

♦ ALLOCATED TO • 

♦ SDAID • 

* * 

* * . 

• J3 •.!. 



.*. 



****K3*******«* 
BRANCH TO * 
DTCHtl IN * 
SSBATINA • 



• * 

• SVC 11 * 

««««*«••**«*«•« 



Charts 113 



Chart CA. $$BATTN8 - LFCB Command Processor 1 (Part 1 of 2) 
(Refer to Chart 09) 



» • 

» tSBATTHS • 



•••»•*•**•*•*•• 


**«* 




* * 




♦ B2 ♦ 




« * 




• •«• 


(•FOPBPID X 


PFCLEART X 


»»***B1**«******* 


««**«ft 2* ********* 


• » 


« • 


• INITIALIZE * 


• CLBA8 ADOHESS * 


• OPEBANO * 


* AMI) VALOE • 


• FIELD LOOP ♦ 


• TABLES * 


• * 


« * 




«•••«•*•••*••**** 


• •*• * 


■ 


♦ • . 


, 


• CI •.I. 


. 


• ♦ . 




«*•* . 


, 


pmxtoPR X 


X 


**C1******* 


••**«C2********** 


• • 


*PFUETOPB CB* 


• IMCHEASB « 


•-•-•-»-»-*-*-*-• 


• OPERAND NB8 * 


• GET OPERAND * 


• BY ONE • 


*ANU PUT IT INTO* 


• * 


• liOBK TABLE * 


••••*•••*•• 






«*** 




*CB * 




• G3 V.X. 




• • . 




*•*• X 


«, 


PFOPR .*. 


D1 •. 


D2 ». 


.* *. 


.» *. 


.* OPEBAND *. NO 


.* 0PE8AHU *. 


*. NUHBEa ...... 


*. «TH .* 


♦. GT 5 .* 


•.KBYVALUe .* 



• » 
*INSEST INVALID * 

• END CONHA IN • 

• OPERAND FIELD • 

• • 
•••••*•••*••••••• 

*••• 

'REFEREMCISS 
TO CAF1; 
CBF2. CBH2 

• ••• 
PPEOPR X 

•*F|****a** 

* • 

* SET APPBOPB * 
..X* ERROR CODE * 

• IN FPRflECOD * 

* * 
•*••••••*•• 



•*•*• * 

• •** 

PFOPRFCP 

* * 

* PREPARE * 

* LOADING OF • 

* MBATTF1 * 

« * 



****H1****«**** 

• BBANCH TO • 

• SSBATTF1 * 

• * 
**•*•••••»***•• 



* PROCESS 
X* FOBBS= 

• OPEKAND 

* 
**•******•••*••* 



• PROCESS 

• LPI = 

> OPERAND 

* 



»*»• 
« * 

* F1 * 

• « 
*•** 



PROCESS 

OPERAND 1 

X'COU* 

****«****«**«*« 



* PROCESS * 
X* OPERAND 2 * 

* PBASENAHE * 

* * 
***************** 



..X* KS * 

* * 
**** 
NULHSG 
*••*•)( 3*** ******* 

• * 

• PROCESS * 
X* OPBBAND *. 

* NULHSG * 

* * 
»««*•****•******* 



• »«* 

* * 

* H * 

* * 
***« 



-*. 






PFSTMENO .*. 






du *. 










Kb *. 






• 










* * 






ERROR 


'♦ 


NO 




« 


OPERAND 


* 


YES 


IN 




*. .. . 


. ...X* 




OELlniTEB 




*... . 


OPERAND 


I* 






« 




m 


, 


> * 








*• • * 






*. •* 










*. .* 




X 


* YES 










* NO 




*«*« 
« * 
• CI* 


X 










X 




» • 


***• 










*«** 




**** 


* * 










* * 






* F1 * 










* G1 ♦ 






* * 
















***♦ 










**** 







114 DOS/VSE Logical Transients 



Chart CB. $$BATTN8 - LFCB Command Processor 1 (Part 2 of 2) 
(Refer to Chart 09) 



I" PFGETOPR 



PFNIOPB X 

**««>*B 2* ********* 
*SCANe3 «D* 
*-*-*-*-«-*-*-«** 
. ..X* SCAM NEXT * 
VOPERAMD HtTHOOT* 
•LEADING BLANKS * 



* SCAN HEXT • 

• OPERAND WITH » 
•LEADING BLANKS * 



STORE OPERAND 

ADDRESSES AND 

DELiniTER 



*«««**««*« 



.*LENGTH *. 
.*0F OPERAND » 
. ♦ DELIfllTER 



.•LENGTH ». 

*0F OPERAND *. YES. 

* OELINIIEB .'..X. 



*****F1**«******* 

* * 

* REDUCE LENGTH • 

* OP PABAHETRK • 
» TO 10 • 

* • 
•••**•••«*«*••**« 



*«••* 
*CA » 
» F1* 



• HOVE OPERAND « 

• OR PART OF IT » 

• TO FPRHVALT * 

« * 

*•••••••**•***«*• 



••G3»«»***« 

* RELOAD • 
P0INT4 MITH 

ADDR OF 
PFeOPR 

• • 
***•**••**« 



»CA • 
• D2* 



• *II1*****«* 

• * 
INCREASE 

F.RROB EXIT 
AOOBBSS 

• BY « « 



END OF 
KEY ?ALOB 
. TABLE . 



**H3***»*** 

• INCREASE • 

<iBKBa« TO 

ADOR OF 

FKIVALAM 

> • 

•»*•*•*••** 



***** 
*CA * 
* F1* 



Charts 115 



Chart CC, $$BATTFI - LFCB Command Processor 2 
(Refer to Chart 09J 



*«**A1 ********* 
* * 

» JSBATTF1 * 

ft * 

*************** 



* ESTABLISn * 
*AODBesSABILIl'ir * 

* FOB COHBEG * 

* * 
***************** 



•*»**B2*** ******* 

* PBEPABB FOB * 

* LOADING * 

* »»B«TTF5 * 

« * 

***************** 

**** 



CI *. 








«****C2*** ****** 


.* *. 








• HOVE 


.* tJBATTHB * 




(ES 




* INFOBHATION 


*. FOUND SYHTAX 


* 






* FBOR FINFABBA 


*. EBBOR .* 




, 




* TO mFABEA 


*• •* 








* 


*. -♦ 




X 




*•**•**•»•****** 


♦ HO 




**•• 




, 






« 


* 










* BJ 


* 










* 


* 










***« 








X 










• LOOK UP 








****02********* 


•r POB TABLE FOB 








♦ BBAIICH TO 


» SPECIFIED 








* JJBATTF* 08 


* X'CUU' 








* *iBATTP5 


* 








**««*••« 


*««*«** 



***************** 



*•** 
* 
* BJ 



PFBSinrx X 

•****II3«**»***« 

* INITIALIZE 

* BUILDING nse 

* FOB SINTAZ 

* EBBOB 

* 
**************** 



* P<<BPABE HO»B * 
*0F APPBOPBIAIB *. 

* HESSAGB TEXT * 

* * 
***************** 



* PBEPABB NOVB * 
.X*OF APPBOPBIArG • 

* MESSAGE TEXT • 

* * 
***«****««**•***« 

**»* I 



• BOILD HESSAGE * 
.X*AIID PBEPABE FOR* 

*IIBSSAGE OUTPUT * 

* • 
•*•****«••**•*«•* 



.* PUB TABLE *. NO *SI!T APPBOPBIATB* 

>. ENTBY FOUND .* X* EBBOB CODE * 

*. .* X * IN FPBHECOD • 

««*•****••******« 



»***»f 2********** 

* INITIALIZE * 
« BUILDING nSG * 

* FOB SEHANIIC * 

* EBBOR * 

* « 
***************** 



.* *. »ES 

*. 3211 .*.... 

*. .* . 


*. .* 


^ 


*. -* 


X 


* NO 


**** 




* * 


; 


* B2 * 

• • 


. 


**** 


NJ211 X 

*****J1 ********** 




* * 




* PBEPABE FOB * 

* LOADING * 

* $»BATTF<» * 




***************** 





DEVICE 

HITHOUT 

FCB 



* PBEPABE HOfB * 
.X*OF APFBOPBIAIE *. . 

* HESSAGE TEXT * 

* * 
*****«***«»««««** 



* PBEPABE aOVE * 

. X*OF APPBOPBIATB *..Z 

* HESSAGE TEXT * 

« • 

•***•****•*••••«• 



• PBEPABB HO?B * 
.X*OF APPBOPBIATB *. 

• HESSAGE TEXT * 

• * 

4(*** ************* 



• •»*EII«***«**«» 
BBAMCH TO * 
SSBITTNA * 

« 
**•****••*•**«* 



116 DOS/VSE Logical Transients 



Chart CD. $$BATTF4 - FCB Load Execution for 3203 and 5203 (Part 1 of 2) 
(Refer to Chart 09) 



* * 

* SSBATTFt * 

* * 



» B2 * 



• B3 * 



* ISITIAIIZK » 

• PHASE AND * 

• RELOCATE CCHS * 

* * 



.♦ LEIIGTH •• HO 
». OF PHASE .*.... 
». CORBECr . • 



LSTIO CE 

LOAD FCB 



*****«****««**«** 



.* FOBHS ». 

08 LPI 

♦.SPECIFIED.* 



OOSKIP 

***Bb*** ********* 
LISIIO CB 



«*«*««****«****«« 



* •COBBEG AMD * » 

* * SYSIH TO * * 

* • GET ADD8 • * 

* • OF SYSOSE * * 

* * LUB * • 
•*••******•****** 



* STOBE ADDBESS * 
•OF VEHIFICATIOM* 
*HESSAGE IN CCH * 

• • 
***«•«**«*«*****« 



*«C3******* 

♦ DEACTIVATE * 
• OSEB BBBOR 

SOallME IN 

t CCB 

* * 
«*««****«*« 



• CU ♦.!. 

* * 



SEND nSG TO 
• OPEBATOR • 

BEAD REPLY 
*»««***»*••«**•** 



* * 

* COHPOTE PUB * 

* DISPIACEBBNT * 
» OF PRIMTER * 

* « 
***************** 



«««**D2*****^**** 
« * 

♦ STOBE DEVICE ♦ 

• SPECIFIC FCB * 

* LENGTH IN CCU ♦ 

* • 
«***«******«**•** 



.♦ DID *. NO 
►. I/O ER80R .*.., 
*. OCCUB .* 



PRINT VBRIFICA- 
• TION HSG • 
SKIP TO CHAN 1 
***************** 



LOAOPHAS X 

««*£ 2* ♦♦*♦♦*♦**** 
LOAD NEH 
* (REQUESTED) * 
FCB IBAGB 
• INTO * 
STORAGE 
***************** 



*****ZH********** 

* * 

* PREPARE * 

* MESSAGE TO * 

* OPERATOR * 

* • 
****«*»•***««**** 



*****Bb********** 

* * 

* BESTOBB * 
*P8EVI00S SISUSE* 

* LUB VALUE * 

* • 
*•••*•****•**•••• 



**»*»f1 •*»•**«•** 

* * 
» PREPARE * 

* MESSAGE TO » 

* OPEBATOR * 

* * 
***«*****«*«***«* 



PRINT 
BEQUEST 
PENDING 



* RESTOHE 

* PREVIOUS 

* SYSOSE VALUE 

* 
*************** 



****F5 ********* 

• FETCH * 
' *«BATTNA * 

* * 
«**«»**«******* 



***Q-\************ 

♦LOAD DIRECTORY * 

ENTRY OF 

' FCB PHASE • 

**************** 



t****Q2********** 

* SAVE SYSUSE * 
»LUB VALUE HAVE » 
» LUB POINT TO • 

* PRINTER PUB * 

* * 
*««**»***«««**«** 



♦ *♦* 
PRINTEBR X 

***S J***** ******* 
LOGIOH CE 



***************** 



**an******* 

* * 

NOP 

INSTRUCTION 
lOERR 

*********** 



.* PHASE IN ♦. YES 
♦. CORE IMAGE ...... 

*. LIBRARY .* 



»***«**«***« 



»****H3^^^**^**** 

* * * * 

* * WAIT FOR ♦ • 

* ♦ I/O • » 

* *COHPLETION » ♦ 

* * « * 
*****«*«**««**«*• 



PREPARE 

MESSAGE TO 

OPERATOa 



^««***** 



ACTIVATE 
USER ERROR 
ROUTINE IN 
• CCB 



****J3**«****«* 
» FETCH • 

♦ tCBATTNA • 

• 4 
*************** 



Charts 117 



Chart CE. $$BATTF4 - FCB Load Execution for 3203 and 5203 (Part 2 of 2) 
(Refer to Chart 09) 



• * 

• I.06IOH * 

* * 



* * 

• HOP I/O • 
» COnPLETION • 

* IMSTBUCTIOK « 

• * 



POT umT • 
OP sxsioc • 

MTO CCB • 

• 



* 

• sToaE ecu 

• ADDRESS IN 

• CCB 

* 



* • 

* • 

* • SVC 



• * 

• LOGIC • 

» * 

*************** 



****IJ********* 

* « 

* LSTIO » 

* « 



• STOBB CCfl 

• ADDBESS IN 

• CCB 

• 
**************** 



•****Ci********** 

• * 

• PUT UNIT • 

• OF SISUSB * 

• INTO CCB • 

• « 
***************** 



•****•*•«««*••**• 



LOU 

STILL 

COB SECT 



•***F3********** 



•••*•••*••••••** 



*****Elt***«****** 



*•*•••»«*•***•*** 



»*»»fH**»******» 



**************** 



I/O 

nPLBi 



****fmt******** 

* BEIOBN TO * 

* CALLER * 

* * 



118 DOS/VSE Logical Transients 



Chart CF. $$BATTF5 - FCB Load Execution for PRT1 
(Refer to Chart 09) 



* « 

• SSBIITTFS • 



• ••* 

* • 

* B« • 

* • 



• B5 • 

• • 
• ••• 



**•**••*«•*••*•• 



.• LENGTH OF *. NO 

P81SB .*.... 
». COBBECT .• 



.TIILOE AGREES*. 
. HITB FCB 
*. 10»D .• 



• IS •. IBS 

C1BBI16B ON .* 

*. LINE 1 .* 



• • 

• PRBPABB * 

• NESS&GB TO • 

• OPBBkTOB • 

• • 



•••••D1»«*»»*«*** 



•••*•••«*•••••**• 



• « * • 

• •COHBEG AND * • 

• SrsIR TO GET* * 

• * kODB OF * * 

• *SISUSE LAB * * 



•••**F1 •••*•*••*• 

• • 

• COBPDTE PUB * 

• OISPLICEHENT * 

• OF PBINTEB * 

• • 



* SIOHE iDDBESS • 
*0F VBHIFICATION* 
*MESSAGE IN CCU * 



• LOAD NEB * 
(BEQOBSTEO) 
» FCB IFIAGE • 



* PBEPIBB * 

* NESSAGB TO * 

* OPEBATOB • 

* « 

• ••* 



P8INTBBR 

LOGIOH CE 



I**************** 



E2 *. 






••«**£]••*•«••*•• 


.* *. 






• * * • 


.* 1PI=«N *. 


rES 




• * IIAIT FOR • ♦ 


•. SPECIFIED .• 


• • • 




* • I/O * * 


*. .* 


, 




• * OPERATION • * 


*. .* 






• • • * 


*. .* 


X 




•*•*«*••••*«•«••• 


* NO 


««*« 




• ••• 


• 


« 




* * . 


* 63 


• 




* F2 *.X. 


• 


« 




* * . 


• •*• 




**T* 








BOFF X 




BBTBRR 


•••••F2********** 






X 


* « 






****F3********* 


*IEST SPECIFIED • 






• FETCH * 


• FCB PHASE FOB • 






* SSBAITNA • 


*COBaECT LOADING* 






• • 



LISTIO CE ' 

LOAD AOX 

• FCB. SKIP 10 ♦ 

CHANNEL \ 



PBBPARB * 

TO LOAD • 

FCB • 

* 



• «B<)******* 

• ACTIVATE • 

* OSEB EBBOl * 

* ROUTINE III • 

* CCB » 
» * 

• ••« I 

* * . 

* F« ♦.X. 

* ♦ • 

• *•* . 
RETBI X 

• ••Fll************ 
LISTIO CE 

LOAD BEQOESIED 



SBHO BSG TO 
* OPEBATOB * 
BBAD BEPLI 



**««•*»**•*•***** 



••****•*•*****• 



tEQI 
FC; 



B 



«****BS********** 

* * 
» PBBPABB • 

.* NBSSAGB TO * 
« OPEBATOB • 

• • 



DOSKIP X 

LSCIO CE 



•«••«•••*••••••«• 



LOAD 

• DIRBCTOBY • 

ENTBY OF 

* FCB PHASE • 



EBBOR 

IN FCB 

PHASE 



• •Git******* 
*DBACTITATE * 

* USES ERBOI * 
• BODIINB IN 

* CCB • 
• • 

••••••••••• 



* PHASE IN 

CORE IHAGB 
*. LIBRARY . 



PRINT 
REQUEST 
PENDING 



DID *. NO 
I/O B^ROB .*... 
. OCCUR .* 



***H5************ 
LSTIO CE 
•-•-•-•-•-•-•-•-• 
PRINT VBBIPICA- 
• TION nSG-SKIP* 
TO CBAN t 
••••••••••••••••• 



• PREPARE ♦ 

• (lESSAGE TO • 

• OPERATOR • 

• • 
•••«*•••••«•«••«« 



•••••J2*^^^*^*^** 

* SAVE sisose • 

* LUB VALUE • 
•HAVE LUB POINT * 
•TO PRINTER PUB • 

* * 
«••«••••**•*•«•*« 



• RESTORE * 

* PREVIOUS *X 

* SISUSfi VALUE * 

• * 
*•****•••••••**•• 



* BESTORB • 
•PBBVIOUS SISUSB* 

* LUB VALUE * 

* • 
««««•«•••«•«•«••• 



READ FORMS 
CONTROL ADOB * 
REG AND OLD FCB 

»•«•*••**•••••« 



..X* B3 • 

* • 
*•«• 

•••••KJ««* •««•••• 

• • 

* COUNT * 
.X* AUXIIIAHI FCB * 

• FOB ALIGNKBNT * 

* • 
•«•«•*••••«*•«•«• 



NOP * 
INSTRUCTION * 
lOERR • 

• • 

•*•«•*••••* 



****k5********* 

• FETCH * 

• »*BATTNA • 

• • 
••*«*«•••••••*• 



• ••• 
« • 
* BU * 

« « 

• ••• 



• ••» 

• • 

• FU • 

« « 

• •** 



Charts 119 



Chart CG, $$BATTN9 - LUCB Command Processor fl (Part 1 of 2) 
(Refer to Chart 10) 



* • 

• XSB&TTH9 • 



• IRITIALIZB 

• OPEgtND 

• FIEtD LOOP 

• 

• *** 



• • 

INCREtSli 

OPEBAKD MO 

BY ONE 

« • 



• B* » 
» * 



• CLEAB ADDSESS * 

* AND VALUE • 

• TABLES » 

* « 



•PU6BTOP8 CH* 

* UET OPEKARU * 

* AND PUT IT • 
*IMTO HOBKTABLE 



»••«•••*••**«**•* 


«**» 








•CM ♦ 








« HJ •.! 








• • 








*•** X 






PU0P8 .*. 






D2 «. 






.* * 






.« OPEBAND 


♦ , 




*. HITH KEK 




« 


*. VA 


.08 


« 





PBOCBSS 
OPEBAND 
TBAIN' 



BBBOB IR *. 
KBIHOBD 
»ALDK .* 



* NO 
» , 
« *.X. 



• • 

» IHSEBT • 

• INVALID END * 
» COHBA • 

• * 



BEFBRBNCBS 



• ♦.I 



POGOPB X 

••F1******* 

• SET * 

• APPBOPBIATE 
..X* EBBOR CODE 

• IM UPBHECOD 

* * 



* * 

* PREPAKE • 

* LOADING OF * 
» S*BATTU1 • 

* * 



* B8ANCU TO * 

* $«BATTU1 • 

* • 



» PBOCBSS • 

t* OPEBAND *. 

* X'COO* • 

* » 



PROCESS * 
OPEBAND • 
PHASBNAKE • 

• 

* » 

* * 



• PBOCESS • 
K* OPERAND *. 

• FOLD • 

• « 



* PBOCESS 
I* OPEBAND 

* ROCHK 



• PBOCESS 
(* OPEBAND 

* NDLHSG 

« 



• ••• 

* * 

* 61 * 
« • 

• ••• 



.* 

* . .* X 

♦ NO *••• 

. « • 

» CI • 

X ♦ ♦ 

* G1 » 

* • 
• •*• 



» ri * 
* • 



» YES 


**•* 




* * 


, 


• E* * 


X 


« * 


**** 


««*• 


* * 




• F1 » 




* * 




• •«• 





120 DOS/VSE Logical Transients 



Chart CH.. $$BATTN9 - LUCB Command Processor 
(Refer to Chart 10) 



1 (Part 2 of 2) 



* * 

» POGSTOPB • 

• « 



•SCkNB2 »D* 

»-»- »-♦- »-•-•-•-• 

* SCAM NBXT • 
•PkHkHETEB KITH * 

* LEtDING BLANK * 



PUNIOPR X 

• SCtliBS *0* 

» SCk* NEXT * 

• PkBH BITHOOr * 

• LKtBINU BLINK • 



• STOBB OVBBkND • 

• kDDBESS AND • 

• DBLIHIIEB • 

• • 



• • 

• BEOUCB LENGTH • 

• OF OPERAND * 

• TO 10 • 

• * 



•HOVE OPERAND OH* 

* PARI OP IT TO • 

* OPRHVALT • 

* • 



**H1******* 
» - • 

INCREASE 
ERROR EXIT 
ADDR BI 
* * 



.•LENGTH •. 
OP 0PE9 * I 
0ELIHIIE8 



F2 *. 
.•LENGTH •. 

OF OPE<l * 
DELInlTBR 



.* DEtlBITEB 


• 


YES. 




. OPEN PARBN 




• ..X. 




«. 


« 






•. •• 








•• -* 




X 




• HO 




»•••• 
•CG • 
• F1» 

• • 
• 




X 




POGOPB 




H2' '». 






**H3**«**** 


. • •- 






* RELOAD • 


.• 


• 


NO 


» POINT* MTH • 


. DELIHITER 




........ 


.X* ADDR or 


•. • = • 


» 




• POEOPR • 


*. •• 






* • 


•. .* 








• YES 









•••• 

• • 

• E2 * 



*•••« 
•CG • 
• D2« 



END OF 
KEY «ALOE 
. TABLE . 



••K2*^^**^« 

• INCREASE < 
MSdRGt TO 

ADDB Of 
UKYVALAD 

• « 
•••••••••«« 



• ••• 

• • 

• C2 • 



• •••• 
•CG • 

• ri» 



Charts 121 



Chart CJ. $$6ATTU1 - LUCB Coffloiand Processor 2 
(Refer to Chart 10) 



••••1 t********* 

* * 

• »»B«TTU1 • 

• « 



• ESTABLISH 
•AODReSSABILITT 

• rOR C0H8BG 

• 



•• DID •• 
.* StbATtnS * 
*. FliD SIMTtX 
*. BRBOR .4 



• miTIALIZE • 

• BUILDING • 
.1* MESSAGES FOR * 

• SYKTAI BniOB • 

• « 



LOOK UP 

PUB TABLE 

FOB X'CUU* 



•SBT APPBOPBIATE* 

• BBBOR CODE IB • 

• UPBBECOD • 



• IRITIALISB • 

• BUILDING • 

• BBSSIGB FOB * 
•SBHABfIC BBBOB • 



**««*g2********** 

• • 

• PRBPABE nove • 

•OF APPBOPRIATE • 

• BBSSAGE TEBT • 



* PBBPABE ROVE 
•OF APPBOPRIATB 

• RESSAUli TEXT 



• ••• 
» • 
• FZ •• 



• BUILt HBSSAGB • 

• AH» PBEPABE • 
•HBSSAGB OUTPUT • 

« • 

•••••*••••••••••« 



• BRANCH TO • 

• XBATTNA * 

• ■ « 
••••••••••••••• 



.* IS ERROR •. IBS 
•DEVICE HITHOUI.*.... 
*. UCB .* 



• PRBPABB BOVB 
.B*OF APPBOPRIATB 

• RBSSAGB TEXT 



• PREPARE HOVE * 
.X*OF APPBOPRIATB •. 

• BBSSAGB TEXT • 



• PBEPABE BOVB 
.X^OF APPROPRIATE 

• HBSSAGB TBXT 



•••••H ^»m»*m»m»»» 

• HOVE • 

• IMFOBHATinH • 

• FSOn RINFARBA • 

• TO IRFABEA • 



122 DOS/VSE Logical Transients 



Chart CK,. $$BATTU2 - UCB Load Function 
(Refer to Chart 10) 



* « 

» SSBIl'XTU2 • 

* « 



* « 

* B2 • 



t*«**B1 ********** 



*«****«***««****4 



YESFOLD .*. 



*. 3211 



SHI UP 
THE FOLD 

ecu 

* « 



•LOAD gEQUESIED • 
UCB PHISE 
* mrO OCB * 



*****ci ********** 



««*«*«4i «*««**•*«* 



* PHEPtfte * 

* LOaDIHG UCB * 

* HITH THE * 

* PoiD ecu * 

*•«**•*********«« 



kHI P1IHI *. KES. 
REUUEST .*.... 

. peSdimg .* 



>««**D1*4t« *««***« 

* •C0HSE6 »ND * * 
» SYSIR TO GET* • 

* •ADDRESS OF * * 

* *STSDSB LUB • * 

* * • * 
*•***•***»•****** 



«**»*[) It********** 
» S*VE SYSUSE * 

• LOB HkLUE • 

• H»VB LUB • 
» POUT TO LUB • 

• • 
«•***•«•«*•*««•** 



*••«*£ 1 ********** 

• * 

• COMPUTE PUB * 

• DISPLiCSniiNT • 

• OF PRINTER • 

« * 

**««********•*•** 



•*e2******* 

* • 

• SET UP THE 
• CHECK OB 

• UNBLOCK CCH 

* « 
«****•*•**« 



***E>t«*****«***** 
LISTIO CB 

*-*-•-«-•-*-*-••• 
SKIP 10 
* CHAMNEL 1 • 
LOAD UCB 

*»***•*«*«***«*** 



«LO*0 DXRECTOSt 

ENTRY OF UCB 

• PHASE « 

>*«*••***«**«*«•* 



.* PHASE *. 

.* IN C03E *. 

*.INAaE IIBBAflY. 



.* LENGTH OF *. YES 
.X*. PHASE .*.... 
*. CORRECT .* 



*****Gll* «*•*****• 

* • 

* PBEPABE • 

* HESSAGB TO ♦ 
» OPERATOR * 

* « 
*««*****•*•*«««** 



**«**a5«********* 

• PBEPABE 10 * 

• PRINT • 
» VERIFICAIIOII • 

* HESSAGB * 

* .*■ 
«•*«•******>»***« 



«*tl1****«*« 

k « 

SET UP 

THE UNFOLD 

ecu 

* * 

*********** 



«**««H2********** 

* « 

• PBEPAae « 

• MESSAGE TO » 
» OPEBATOH * 

* « 
*«*******«***«*•< 



* PREPARE « 

* HBSSAGE TO » 

* OPERATOR » 

* « 
***************** 



*-*-•-»-*-*-*-*-* 
SEND nSG TO 
» OPBRATOH * 

READ REPLY 

**************** 



PBINT VEBIFICA- 
IION HSS SKIP* 
TO CHAN 1 
*************** 



*•** 
* 
* D2 



P8XNTER8 X 

***J2************ 
LOGIOH ce 
*-*-***-*-*■-*-*-* 
PRINT HSSSAGE 
• ON SYSLOG • 

***************** 



* BESTORB * 
•PBEVIOUS SYSUSE* 
> LUB VALUE * 
« * 

**«**««******«*** 



•COMPLETION 

«***»****«*• 



•***K3********* 
t FETCH • 

• *»BATTNA • 

» 4 

*************** 



**«**Kil********** 

* * 

* PREPARE * 
.* HESSAGE TO * 

* OPEBATOa • 

* * 
***************** 



****KS********* 

• FETCH * 

• »»BATINA * 

• * 
*************** 



Charts 123 



Chart CL, $$BATTN7 - SETDF Root Phase (Part 1 of 6) 
(Refer to Chart 11) 



*«*«A2* ******** 
II « 

» »»B»ITN7 ♦ 
» * 

*>**«*«********* 



********** 



**(;2******* 

* PREPARE • 
• £BBOB CODE • 

• INVALID OB NO 
•UNIT SPECIF. * 

* • 
*****«*«*«* 



.* FIRST *. 
■> PABAHETEB *. <ES 
LENGTH > .*.... 



««P2******* 
* LO*D • 

• EBROB CODE 
NO PtBAHETER 

► SPECIFtED 

« 4 

*********** 



DEVABDI? .*. 






E3 ». 






.* * 






.» FI8ST 


* 


NO 


*. PARAHETER 




*. . . . 


».LEIIGTa=5 


* 




*. .* 






*. .* 




i 


• KES 




***** 

♦en * 
• B2* 



*m***tii* ********* 



»««*«:«««» 



124 DOS/VSE Logical Transients 



Chart CM. 



$$BArTN7 - 
(Refer to 



SETDF Root 
Chart 11) 



Phase (Part 2 of 6) 



***** 

*CL • 

• £3* 



DV3800 .*. 






COUADOB .*. 




B2 *. 






83 *. 




.* FIBST *. 






.* FIBST *. 




.* PABkHBTBS 


*, 


MO 


.* PiRAdETEB ». 


IBS 


*. LENGTH = 3 




*. . .. 


....X*. LEHGTH = 2 .* 


•• 


* 




*. .* 


' 


*. •* 






*. .» 




*. .* 






*. .* 


X 


* YES 






* HO 


••**• 
*CP • 
* K3* 

* * 


X 






; 


• 


• •• 






x 




C2 ♦. 






*****C3*********< 




• • *. 










HO .* FIRST 


* 




*S«VE PRmUBlB 




...*. PABtHBTeR 




» 


* FORK COU 




*. =3aoo . 


* 








• • .♦ 










X *. .* 











*****««******«* 

«**« * 

«Cl • 

* J3 *.X. 

* * . 
**•* 

CHKIIBIT X 

**E3******* 

* PBEPtRE * 

• SBBOB COOB 

. ..X* NO PiRkHETER 

* SPECIFIED 

* • 
*********** 



.* *. YES 

. DBLlnlTER .*. 
*. = 'BL«IIK» .* 



**G3**«**** 

* PREPABE « 
• ERROR CODE • 

• INVALID OR NO * 
•UNIT SPECIF. * 

* * 
*********** 



«. DBLIRITER 



»*J3*»****« 

* PREPARE * 
' ERROR CODE 

NO PARAHETE8 
t SPECIFIED 

* • 
•*•***«***« 



***** 
*CP * 
* K3* 



Charts 125 



Chart CN- $$BATTIl7 - SETDF Root Piiase (Part 3 of 6) 
{Refer to Chart 11) 



•CH * 
• J J* 



» BJ » 



••••»e2* ♦♦*•♦*♦»♦ 

« « 

• GET P»SI • 

• DeLIfllTER TO » 

• KEIHOROS * 

• « 



• ••• . 

•ce » 



Knntomo X 

*«**«C2** ******** 

* SCAKB3 * 

*-*-•-*-*-*-«-*-« 

* SCAR FOR • 

* KEXHORDS * 

* « 
«*«**«*«*«*•*«*** 



PROCKEl 

**BI|******* 
• PREPARE 

* ERROR CODE 
...X* oaPLICATED 

* KEIRORO 



»***•••«**• 



*****C3********** 
» * 

• mCREHEHI TO * 

• NEXT TABLE • 

• ENTRY * 

• • 
»••*••••»•«»**•«• 



.* KEXHORD *. YES 
ALREADY .*.... 
•.PROCESSED.* 



***** 
*CP * 
* Kl* 



NO .* KEYWORDS * 




. NO 


• 


END OF * 


...*. SPBCIPIEB 


• 


. . . .* 


KEYWORD TABLE 


• *• • * 






• 


. « 


. *. •• 








*. .* 


X *. .* 








*. .* 


*•••* * YES 








• YES 


•CP • 










• Hi* 








, 


* * 








X 


• 

X 








•*•*• 

♦ CP * 

• Hi* 


*****E2»*»******* 






« * 


« 


« 






* 


* STORK KEYUORO 


* 








• ADDRESS ARU 


* 








• LENGTH 


* 









••*••***••••*•••• 



«*P2******* 

• « 

* PREPARE TO • 
•SEARCH KEYWORD 

• TABLE ♦ 

* * 
••«»*»•«**« 



••Q2******* 

* PREPARE • 
* ERROR CODE * 

•INVALID KEYWORD* 
*0R PARAHBTER • 

* • 
***** 



•••«*Dl|*****««*«* 

* « 

* INDICATE * 

* KKYNOBD TO * 

* BI UPDATED * 

* • 
•**•«***«******** 



KEYWORD 

WITH 
OPERAND 



****Fi) •**•*•««•« 



**•••**•**** 



«•«•*•*•«•••••••* 



• «**• 
•CP • 

* a2» 



••*** 

*CP * 

* B2* 



126 DOS/VSE Logical Transients 



Chart CP. $$BATTN7 - SETDF Root Phase (Part 4 of 6) 
(Refer to Chart 11) 



« « 

• BJ * 

* « 



**B2******« 

• l>REP&<<B * 
• eiBOB CODE • 

•INVALID OPBBAMO* 
•OB UBLlnlTER • 

* m 



.* KBKMORD •. NO 
. HITH 1 OR II .*.... 
*. OPUBIND .• 



• •♦ 


X 


• YES 


***** 


• 


♦CO • 



NO .* DBIIHITER *. 



• •*• 

* • 

* KJ « 

* * 

• *«• 



• ••**l)2********* 



•••••***•******• 



•••**B2******«*** 

* SCtBR3 • 

• SCHIi BEIT • 
*OPEB*MO BITHOOT* 
*LEtOI«G BLANKS • 



•••••f 2********** 

• • 

• STOBE OPEBBKD • 

• tOOBESS ABO • 

• LEBGTU • 

• • 



• *•• 

* * 

• KJ * 



*****Dil*»******« 
* 

• nOVB BUSST'I 
.1* INTO KETNOBD 

• TABLE 
m 
«***•••*«••**•*• 



E3 •. 

« * 






• ••••El|********«« 

• * 


BUBST - N 
*. .*' 


• 


NO 
» 


• BOVE BOBST'N • 
...X* INTO KBTUOBD • 

• TABLE * 

• « 


• - .♦ 








» YES 








Z 

• *** 








* * 








* K3 » 






X 



• ••*«F1>********** 



»**•**•*•*•••«••• 



.X... 

X 
*••• 



RBrEBENCBS, , 

TO CPH2:, • • 1 

CNE5. con; ♦ •* 

•••• 

CHECKEBO . 

H2 



.* OELlnlTBS 



• •«• 

• • 

• H2 • 

• • 

• **« 



>•«*««*«*•* 



**»*K2********* 

• * 

* SBBATTSI • 



«*H3******* 

• PBBPABE • 
• EBBOB CODE • 

.X*INfALIO OPEBAHD* 
•OB DELIBITEB • 

• • 
••»••**•••• 



J3 *. 






.* *. 


• • 




.• DELIBITEB *. lES 


• GET RBXT • 




•• *"•' .♦»...... 


.X^ KBYHORD • 


• • • 


*. .* 


• * 




•. .• 


* * 


^ 


♦. .* 


*•*•••«•••**•*••• 


X 


• NO 




••••• 


»•*• •BBFE8ENCES 




*C» • 


• * -TO CPKJ: CHCt, 


CND2 


• C2* 


• • •.X.CLg2, CLP2CN03, 


CNH2 


• • 


• • -CLbI; CHBJCQB2; 
•***. •CBC2^ CBH3C8D3 


CQG2 


* 






L0ADBBK1 I*-"*-" 






••R3^^*^*** 






* • 


****Klt* •**••••• 




• PBEPABE FOR • 


• • 




..X* ERROR PHISR * 


.X* SSBATTS2 • 




• • 


• * 




* • 






•**•«*••••• 






*••• 

• 






K3 • 

• 






• **« 







Charts 127 



Chart CQ- $$BATTN7 - SETDF Root Pfaase (Part 5 of 6) 
(Refer to Chart 11) 



»CP * 
* B3* 



TTPifOMB .*. 








B2 ». 








• • *. 








.* OFBRAMD 


• , 




IBS 


*. LBMGIH >« 




♦ 




•• . 


• ' 






• • .♦ 








*. .* 






X 


• NO 






***** 


*«•« 






*cp • 


• • 








• K3* 


• c/ •.X 








« * 


* • 








• 


• **• 










SEARCH X 








**C2******« 








• 


* 






• PIBBkBB TO 


« 






• SBABCH VALI- 




• 




• OITY 1 


r«BLB 


« 







*•••••••**• 



.* CHABtCTSB *. IBS 
. BATCH III .*.... 
*. TABLB .* 



DJ *. 

.• ALL *. 

.•CHABACTBRS *. 

.1*. IN OPBBARD . 

•.fBSIFIBO .* 



••*»•[)«**•••••«•• 

• • 

• IBCBBHBBT • 
I* TO RBZI • 

• CBABICTBB • 

• • 
••**«••••••«•««•• 



»****B2********** 
« • 

• mCREREMT • 
» to BBII • 

• TABLE BNTRI « 

• • 



BUD OF 
VALIDITI 
. It BLR 



* HOfB OFEBABD * 

* TBLOE INTO • 

* KETBORD TABLB • 

* • 
*•••••«*••••*•••* 



**»*P3********* 



■••»•••*••*•••• 



**e2******* 

•LOAD K8S0B * 
•CODE IHfALID 
• OPBBABD OB 
• UBLIBITER 

• • 

•«•••••*••• 



*•*•* 
*CP • 
• H2* 



*»♦*» 
•CP • 



128 DOS/VSE Logical Transients 



Chart CR, $$BArTN7 - SETDF Root Phase (Part 6 of 6) 
(Re£er to Chart 11) 



* • 

• HEXCOII * 



••B2******* 



•••••••*•*• 



**C2******* 



••«••*•***• 



•.CHkRACIEHS 



•. 10 .•CHAKICIBRS'*. HO 
.* I*. DIOII 0-9 .*... 



• ••*• 



**B2******* 

• • 
INCBBREIIT 

TO RBXT 
CHABICTBR 

• « 



**a2******« 

• EOIRT * 

BRCK TO 

BBGIBBING 

OF CDO 



• **«*|12********** 

• PACK CUU « 
» TO 2 BITE » 

• HEX cnu * 



****J2******«** 

* • 
> RBTUBN • 

* • 



Charts 129 



Chart CS^ $$BATTSil - SETDF Update Phase (Part 1 of 3) 
(Refer to Chart 11) 



« « 

> StBkTTSI * 

• * 

*************** 



.* 3800 ». 
.» SPECIFIED *. NO 
••AS DEflCEITPE.*... 



*****C\********** 



«••*•***••»*•**** 



»****01 ********** 

* 

GET HEX * 

CaU F08 * 

PUBDTE • 

* 

**************** 



•***«**«*«****«* 



****Q-i* ******** 

• » 

► StBATTN? * 

* * 
*************** 



DEVICE 
TYPE= 
3800 



•*D2******* 
« 
IHCREBENT 

I'O NEXT 
PUB ENTRY 



EHD *. NO 
OF PUB .*. .. 

ENTBIBS .* 



•♦F2******* 
* PSEPADB * 

• EBSOR 

* CODE INTALtD 

• Oa KO UHIT 

» SPECIFIED * 
*********** 



.* HAS • 
AT LEAST 

ONE 3800 
. FOUND 



PUB COU=' 

SPECIFIED 

CUU 



*«DJ******* 

k * 

INCREflENT 

TO NEXT 

PUB ENTRI 

* * 

*********** 



END 
OF PUB 
ENTRIES 



**j/^******* 
*LOAD EHSOH * 
► CODE 

UNKNOMN 
» DEVICE 
* ADDRESS « 



PUBFOUHD 

*«C4******* 
• P8BPA8B 

* E8R0B CODE 
...X* DEVICE MOT 

* A 3800 



*********** 



***************** 



****fH********* 

* * 

* SSRATTN7 • 

» * 

*************** 



**H 2******* 

* * 
PDEPARE 

FOR ERROR 

PHASE 

* « 
*********** 



***** 
SEKEHENCBS 
TO CSH2: 
CTE2, CnE2 



*************** 



130 DOS/VSE Logical Transients 



Chart CT. $$BATTS1 - SETDF Update Phase (Part 2 of 3) 
(Refer to Chart 11) 



• * 

* PUBUPOTB • 

* • 



• * 

• B3 * 

• * 
• ••• 



* FBEPkBB • 
• ERROB CODX • 
•SETDF F&ILEO • 

• * 



• •••«B<I*******«** 



••••••»***•*«**•* 



>****C1********** 



*****Cit********** 



»•••**«•*•*••«••* 



•******••••»••••• 



* m 

* ISSUE EXTRACT * 

* BiCRO TO • 

* COPT PUB2 * 

* * 



m « 

• BOVB PCB • 
I* ViLUB IBTO * 

• THE PDB2 * 

• « 



• GET DEVICE • 
(• HUHBER FOR • 

• SETDF FAILORB * 

• • 



«*«**Eit*****««««4 

• « 

• HOVE CHIRS * 
I* VALUE IMTO * 

« THE P0B2 4 
« « 



*****F1 ••***••••* 



**••••••*«••*•*«» 



*****F<t********** 

• • 

• HOVE HODIFY • 
X* VALUE INTO * 

• THE P0B2 * 

• * 



* « 

* HOVE FLASH • 
t* VALUE INTO • 

* THE PaB2 • 

* • 



• •*«*){ t**«««***** 



«•*•*«•**«•*••••« 



• * 

* HOVE FOBHS * 
IC* VALUE INTO • 

• THE P0B2 • 

* « 



••***J 1»»»»»**»»» 



•cu • 

* B1» 



***************** 



Charts 131 



Chart CU, *$BATTS1 - SETDF Update Phase (P^rt 3 of 3) 
(«5fer to Chart 11) 



**B 1***»*»» 
* * 

• PHBPARE 

ERROR CODR 
»SETDF FAILBU 

*********** 



*iii********* 



**************** 



************* 



*****Q J ********** 

* * 

* issue hodctb » 

* hacso to * 

* update pub2 * 

* * 
***************** 



¥********** 



*****tm******** 



***************** 



****tF1 ********* 



*************** 



GET DEVICE * 

NUBBER FOR * 

SETDF FAILOHE * 

* 
f*****^ ********* 



***** 
*CS * 
* H2* 



.* 380O *. 

•* SPECIFIED 
». FOR DEVICE 
*. TlfPE 



****Q2* ******** 

* 4 

« BETUHH • 



****H2********** 

COHVEBT PUB/! * 

HEX CUU TO * 

PRINTABLE CUU * 



* BOVE PUB2 

* DEFAULTS TO 

* OUTPUT AREA 

* 
*************** 



* BOVE LIST * 

* OUTPUT IMTO * 

* BUFFER * 

* * 
***************** 



**S3******* 

PREPARE TO 

OUTPUT LIST 

MESSAGE 

* * 

*********** 



»**H3******** 
$«BATT(tA 

************* 



132 DOS/VSE Logical Transients 



Chart CV. $$BArTS2 - SETDF .''Irror Phase 
(Refer to Chart 11 



*«**A 2* ******** 

* * 
» *iBirTS2 » 

* « 
*************** 



* PBEP&TE 

» TO SEARCH 

* E8R0R TABLIi 



•*B3******* 
fe 

PREPIBE 

to OUTPUT 

HESStGE 



*CaDE BATCH 

III EBEI08 
». TABLE . 



***t*ci********* 
* 
$»BATTNA • 

* 
*************** 



************* 



'***E2********** 

INCREMENT * 

TO NEXT * 

TABLE ENTBJ * 

* 
»•*****«*«****«* 



END 
or E8H0B 
. TAtlLE 



♦*G2******* 
«LOAC ERSOa * 
» TABLE TO » 

FOBCE INVALID * 
> MESSAGE « 
* CODE * 
*********** 



• MESSAGE *. NO 

WITH .*... 

». FILL-IN .* 



•»******•«•• 



Charts i133 



Chart DA^ $$BEOJ - Terminate Task and Initialize Partition (Part 1 of 3) 
(fefer to Chart 12) 



k * 

* tSBKOJ * 
» * 



* * 
« B3 * 



• RESET IIOCS * 
•OPBN mOICHTOR * 
» AND PCH • 

• CONDENSE * 

• INDICATOR » 



*****oi*** •*••••« 



«*«•***«**««****« 



• « 

• LOAD PIB • 
. X*FBOH BG COHBEG < 

• INTO RA • 

• * 



.*TBR8INAT0R *. XES 
>. ROUTINE .*.... 
♦.CANCELLED.* 






**•**»•**«••****• 



* HOVE CANCEL * 
.1* CODE - X'80" *. 

* INTO HESSIGB * 

* • 



*•*•*•••*••«*•••« 



•••**D5*****«**** 
•HSSOUT DC* 

.X'OUIPUT HBSSAGB • 

• 0P91I • 

• • 



•**»*f 1********»» 

• • 

• POINT TO PIB * 
•OF TBRHIIIATIMG • 

♦ TASK * 

* • 



* 

• B3 



«CONVBBI CANCEL * 

X» CODE INTO • 

• HESSAGE * 

« * 



*****gl|***«**«i*«* 

• • 
« RELEASE ALL • 

I* BESOORCES *. 
*0«NED (SVC 6I») * 

• • 



* DETACH • 

• (SVC 39) * 



•*»**H1********** 

• LOCK CE ♦ 

• APPENDAGE * 
•ROUTINE AND CE • 
•APPENDAGE EXIT • 

• • 
••*••••**•«••**** 



•«*•*••••****•** 



*»*«*G2** *••*•*• 
« 

* HOVE CANCEL 

* CODE INTO 

* LOM CORE 
• 
••••*•***•••••** 



****H2********* 
• HABOHAIT • 
» •FDO' « 

¥ * 



»DB • 
• B1* 



•ACTIVATE SYSBES* 

• DASD FILE * 
•PROTECT AND SET* 
•CANCEL BIT OFF • 

• IN PIB * 
•*«***•*««««««••• 



••***K1******** 
• 

• BPSLOAD 

• CLEAN UP 

• SPS TABLE 
• 
*•••*•••*•*•••• 



134 DOS/VSE Logical Transients 



Chart DB.- $$BEOJ - Terminate Task and Initialize Partition (Part 2 of 3) 
(Refer to Chart 12) 



» At • 

**** 



EXTBACT 

PARTITION 

bOUNOARIES 



*RESEI JCL OPEN • 

• INl;ICAr08 * 

♦ -jcsm- * 



mOXCATE 

£NU OF 

TEBHINITUH 

eOUIIKES 



INDICATE 

•HO FUEEVIS 

DONE* 

• * 



f SUNNING 

IN VISTUAt 
*. RODE 



*****B<t*********« 



• BBIUBN • 

• VIA SVC 11 » 

t « 



*****C1 *•**••**** 



•*C2»*****»*** 



****««**«««•*««« 



«**»•***• 



*««4t«[}l*««« ****»« 



•****••**•« 



***D 2* ********* 



*«*««««***««*««** 



«**»*CU********** 



**«*««**«** 



a£AL370 X 

*«***D5********** 

* POINT R^ * 

* TO PBEGIN • 

* AND Bi TO « 

* PBNDLOG • 



**««*B1*«« ******* 

* * 

* POINT 811 * 

* TO PABTITION * 
» C0H8EG • 

* 4 
***************** 



***«*g 2* ******** 



***«*E'4* ********* 

* * 

* HOVE PEBBII * 
*AliD SXSTEN HASK* 

* IN PSN • 
» » 
*»*«*•«***«*****» 



«****p )****«*«**« 



***pit***«****** 



»»***F5********** 



**«**•»•»* 



*«**«****»*«*«*«* 



««G1******* 



«**««G2********** 

* * 

* ♦ 

* F8EEVIS ALL • 



««***«*«««* 



»*********«**« 



*«*****«****«**« 



«*«««H2********** 



**«HU*******«** 



**H5******» 



>********««**« 



**«*«*««»*« 



«»»»*j 2* •*•****«* 
m * 

» RELEASE ALL * 

• BES0U3CES * 

• 0»NED (SVC 6l») * 



*t******^**** 



*«*«*KU********** 

* ♦ 

* STORE NEK * 

* SAVE AREA • 

* ADDS * 

* * 



AS * 

«*** 



*«*««J5««*««****« 

* ♦ 

* PEEVIS ALL • 



Charts 135 



Cliart DC. $$BEOJ - Terniaate Task and Initialize Partition (Part 3 of 3) 
(Re£er to Chart 12) 



* ' a 

* HSSOUT * 

* • 



**«**B l*********: 



*•••«•**•••••••*: 



••••*C1****»«**** 



•*•••••**•*•*•••• 



* 

• HOVB HESSASB 

• TEXT TO 
« LGLINE 

• 



*••*•£ 1**»***«*** 



••••*•••****«»•«• 



TASK'kTTH . 
. BOUXIHB .* 



• ~ • 

• BESBT CATIL • 

• tND SUPVB * 

• SHITCH IH • 

• JCStl2 • 







* * 
•••• 


i 

DISKBTT .*. 

.* *• 
YES .* EKO 
...*. OP BZTEIT 



*****B3«******** 
• 

• RBLOCATB 

• kOOB OP 

• 1ST ecu 
• 



• ••*4ll***«»««»* 



•••***••••««••• 



**«**B<I********** 

* • 

* LOIO CCB • 

* IDDB IB * 

* BEGISTEB 1 • 

* • 



****D3****«**** 
> BBTOBil « 

* TO C&LLEB * 

t • 



••••••*•••«««*««• 



•••••Ob********* 
* SVC 103 

••••••••••••*••• 



•••»«e2******«*** 



•*«•••*••••«•••*• 



P2 ». 

.• IS *. 
.* SYSLST *. IBS 
. k PBINTBB .*.... 



•••••F3«*****«^^* 

• PICK UP CC» ♦ 

• ADOB OP • 
.1* PRINIB8 CCM *. 



•*••••««••*•*•••• 



• ••• 

* • 

* K2 • 

* • 

• •** 



•••**H ^••••••••* 



••••*•••*••«•••• 



TPTlfPB .*. 




FGUST .*. 


G2 ♦. 




G3 •. 


• • ♦. 




.•IS * 


.• 


*. MO 


.* SYSLST 










♦ 


*, 


*. .♦ 




• • •* 


*. .♦ 




*. .» 


• IBS 




• NO 


• •«• 




, 


• * . 






• U2 ».X. 




, 


• • . ■ 






• ••« X 




X 


TPTKPE1 .*. 




DKIYPB .*. 


H2 *. 




H3 *. 


.» IS *. 




• •IS * 


.* SYSLST 


*. NO 


.* SISLST 








*. 


• 




♦ . .♦ 




*. .♦ 


*. .* 




*. .* 


♦ YKS 




• NO 



••••••••••••••••• 



••••f !!•••••••«• 

• BBTOaH TO • 

• CtLLBB * 

• • 
•«••••••«•«•••• 



• • 

• RELOCATE • 
(* CCM ADOB *. 

• IH CCB • 

• , » 
••*•••**•**«••••• 



•-•-•-•-•-•-•-•-• 
(• • 

• SBHSB • 

« • 

*•••••*•••••••••• 



.* SYSLST *. 

EXTENT 

*. PILLED .* 



•••••••••*••••*** 



• •••K ^••••••••« 

• BETORN • 

• TO CALLER * 

• * 
*•••••••••••*•« 



• PICK DP • 

• ADDR OP •« 

• TAPB-CCN • 

• • 
••••••••••••••••• 

• ••• I 

• • . 

• K2 '.X. 

• * . 

• ••« 
CCB X 

•••••K2^********* 

• • 

• BELOCATB * 

• ecu AODR •. 

• IN CCB * 

• • 
•••«•««•«•*«•««•• 



J3 *. 

.* IS •• 
• SYSLST * 
AN PBA DISK 



• •** 
» • 

* A3 • 

• * 

• ••• 



•••••••*«•••*•••• 



•••••Ji)*«*«**^^^^ 

• • 

• * 

• HOOIPY CCH • 

• • 

• • 
•*•••••••••«••••• 

I *••• 

* * 
..X* K2 ♦ 

• • 
• ••• 



• •••((((••••••••^ 

* BETUBN TO * 

* CALLBB « 

* « 

•*••••••*•*•••* 



••••J5****«**** 

• RBTUBN TO • 

• CALL8B * 

• • 
••«••••••••«••• 



136 DOS/VSE Logical Transients 



Chart DD- $$BE0J3 - Decide Next Step in Termination Handling 
(Refer to Chart 12) 



• SSBE0J3 • 

> • 



k * 

SET UP 

TO PBtCH 

SSSOJ 

* • 



IJBEJ33!i X 

• POINT RRG V • 

• At BG COHBEG • 

• BBG 8 tT BG « 

• COHBEG • 

• eXTENSIOIl • 



• • 

• • 
• ••• 



SUPPORTED 



•••••E2********** 



•»***l{3*»»*****«* 



>••**•••••••*•••« 



•••* *•*•••••*••*• 



* sk»E ID m * 

» BEG 7 FOR • 

* SSBECJJk * 

* « 



•«*»*G2******«*** 

• • 
•CkLC PIB ENTBI • 

• OF FIBTITION • 

• OMIIING LIA • 

• • 



• Duap » 

HkCBO IN IB 
'. ROUTINE .* 



**J2******* 



• TBRHINATOB 
• BIT * 



**J3»*«**** 

* SET UP TO » 
FETCH SSBTOLTP* 

• • SEE OLTBP « 
PIH * 

• * 



* • 
SET UP 

TO FETCH 
SSBEOJit 

• • 



**««K2******«** 
» SVC 11 » 
' BETDBN TO * 
• SUPEBVISOH * 



(•**K3********* 

FUTCU NEXT « 

PHASE « 



Charts 137 



Chart DE. $$BE0J3A - Quiesce I/O for T/P Devices 
(Refer to Chart 12) 






♦ -jisr Jt ♦ 

» smcoti » 

« « 

****** ***^****m*it 



• * 

• LOAU Hr;G b ♦ 

» mm ADDatSi, • 

• OP WBOWKjifi » 

• UULi! • 



« * 

* STOBi l-XK 1» * 
»CLi i!lS'faUCTiOi<* 

* * 



lliiSATi X 

*****A^******^* 

* Aoa I iO Al 

* {i(0 ;>!' iUli 



«*4>*««*«*«4tifr««*«« 



« 4 

•Si'OBi, BAiH tiK « 
» Of 'laSK IM • 

*CLI INSMUCtiO.i' 



r**a %********** 

POIW lifiG b ♦ 

AT PHOPia ♦ 

LUa XASLi ♦ 

(SirSTBH i-uk) • 

^«*«« *********** 



• con WIS flK ♦ 

• VAiUE 10 • 

• coHRtaeou uiMi * 

*PUtlOll KliK lABLc: « 

• XII HEG U * 
***************** 



*****^ \*****^**** 

* * 

* Ol" RtG Jz • 

* w rn ■• 



• Gff 3i-4t(l;il»t, * 

• lAiiii la a<* • 

* siji h; ^ • 

* .iliiOa 1 • 

***************** 






***** i^S********* 

* * SKC J • 

♦ ♦OXjABLii Xiii* 

• ♦JiiViC£ A-^J • 

* • 4AXr fOH ♦ 

• •coAi'j.ai'Xuji ♦ 



• iSGXSXcia 4 < 

♦ fo i»oxnr I'j < 



*****i^i****^**** t 

* Aul) i; Xu • 

* HliUXSTia o » 

* XO l-OXaX xa « 
>a£XX /rJS OriNl^li < 
» TaBl-i. • 



• ♦ SJiXii Tat. • • 
» • iiSXBlS • • 

• ♦JXbAil.S i/0» • 

• ♦XMXt.iKUfXS * • 

• • • • 
***************** 

**** * 

• • , 

• • . 
**** i 



*.lllii'Alll UcViC!^.*. .i. 



♦- .* 

"»".10 



• iO Xiila * 

+ * 

***************** 



*****i^^** ******** 

* SEX UP CCr • 

• AlJi)aESb in * 
•StGXSlBH I AJ!> ♦ 

♦ COli «DD«u.ib ♦ 

• la COc • 



ISS .* DL«XC£ OK 



«*«**£; j*««*» «• 4 



**************** ^ 



*****fj********** 

* sax OP siscoA * 

* POiaXia. ti£i * 



*****\^ti*** ******* 

* uHT * 

* CCa yOlBtzit * 

* CJ-iAo ♦ 

* UXl>o OHuhu * 

* •iitm * 
***************** 



. * CCB • . 

iM Xlllb 

•.iTAhxX'lioa.* 



««««*tiit**« *«•*•** 






IfUtiPUAXc ^ 

« POINT XO » 

* M^XI ctliiNMtL * 

* Utl£U£ KbXiti * 

• OPOAIE fl-tXP • 

• • 
***************** 



*lfOl»I dt-ti J AX 

> CdANw AUUlt 

> li£'X CUiittiiCX 
* CUAKU j::ili'ill 



.» «liwOr,SX 


♦ . 


«U 


. i^Oa XuXii 




•••• • 


♦. XAiV .♦ 


, 


•• .♦ 




, 


•• •♦ 




A 


• Kits 




«•«• 






• • 



**iii>**** ****** 
UA^X X/u • * 



i ^XjAti,t 
v:i.A^:^ . 



***** a i******t ** 

* ton viHroAi. 

.* PAk'XIXIUK 

* tyOakaAHHS 

* 
**************** 



*»***bi}*** ******* 

* * * * 

* * SKI. ^b * * 

* • aAX.X I/O • • 

* • * * 

* * * * 
***************** 



* AOIB uaiL 4 

• PAiiTXTXoa 4 

• aoUHDAiiXEj ' 

* 4 
**************** 4 



* CaAMNiiL wilbUii 4 

♦ iJMIiiX i-oxax 4 
« ANU < 

• nSGXSXiH O 4 



• • diiLcA^a * * 

• * SiSlfca * ♦ 

• »l!JiAsl.i. I/O • • 

• *III'Xi:.ilKUll'S • • 

• * * * 
***************** 



• iiX u» • 

• l-O fttct. • 

• **Bi.OJft ♦ 

« « 

***************** 



* ***!in********* 

* iiatOti't * 

*************** 



138 DOS/VSE Logical Transients 



Chart DF,. $$BE0J4 - Clean up Non-TP I/O Devices (Part 1 of 3) 
(Refer to Chart 12) 



• * 

* A3 • 

* « 
• •** 



» • 

> »$BEOJIt • 

* * 



kTIEMTIOII .*.... 
T»SK •• 



* * SVC 6lt * • 

* •BBLBASE ALL* * 
.1* • RESOURCES • *. 

* • OHMEO « • 

« • * * 



«BESEXII DH* 

BESEt USBB • 
» EXITS • 

• • 



. x» 



SDPEBVISOR 



• • 

• LOAD UK • 

* FBOB SISCOH * 

♦ IBTO KA » 



««««B 2* ******** 

* S»C 2 FETCH • 

* tSBEOJ * 

* « 
»••*•***•••**«* 



•*«**C2********** 
m * 

* LOAD PID FBOB • 
X* BG-COHREG * 

* IMTO RA * 

* * 
«**•*«*******♦«** 



HSTXBCB X 

••'***B1********** 

• BESET XBCB * 

• EHTBIKS * 

• OCCUPIED BY * 

• lERBItlATIMG • 

• TASK * 



• CLEAB LIOCS * 
» BYTE IN * 

• COBBEG * 

• • 
***************** 



»«**•«•••••*•«•«* 



•••••B5«********* 

* • 

* HAKB ATI* • 

* INACTIVE • 

* IB PIB TABLE « 

* » 



*****CS****«***** 

* BESET CABCBL * 
« CODE, TASK • 

* CABCbL rLAGS. • 

* AND ATTN • 
» SBITCHES » 



****DS********* 

* SVC 11 • 

* RETOBI • 

* • 



SUAUTOCL .*. 



* HAINTASK *. YES .* VSAH *. NO 

TEBNINATING .* X*.AUTOH. CLOSE .*... 

*. .* *. DISABLED .* 



«**»F2*** ****** 
* SVC 2 FETCH * 
« *»BPCLOS • 

« « 



• SVC 3 DEUUBUE * 
*ALL OUTSTAMDIRG* 

• I/OS * 

• * 



••••*P5»«**«*»«*« 



•*••••*•«••*••••« 



«*««*G1* ********* 

* * 

* CLEAN UP CRT * 

* BOFFER FOR * 

* PARTITION * 

* * 



.» DTP'S FOR *. YES .* TASK 

*.HICB SUPPOBT .* X*. USING HICB 

*. .* X *. DEVICES . 



*****|1U«********* 



, * 


*. UPDATE .* 






,♦ 


*. .* 






*. .* 


*. -* 






* NO 


* YES 






X 
















* • 


X 




* »J * 


BASUAII .*. 






* « 


J2 *. 






**** 


.* *. 








YES .* RAS *. 


HO 






...*. ACTIVE 


*..X 






*. . * 








*. .* 








*• .* 


X 




» 


« « 

* A3 * 

* * 






«4 


** 



>«*•****•*«*•••*• 



*****•**•***••*•• 



*DG * 
* A1* 



*V«**GS««««*«*«** 



••*«•*•••*•«••••• 



****HS********* 

* SVC 2 * 

* ttBACLOS * 

* « 



Charts 139 



Chart DG- $$BE0J4 - Clean up Non-TP I/O Devices (Part 2 of 3) 
(Refer to Chart 12) 



KH * 



****B 2* ******** 
» FETCH • 
« iSBBOJ • 

» * « 
«***********««* 



•rOB HHITING 
THE CANCKL 
HESSAGE 



**««*C1* ********* 

* CHANGE • 

* 'PHASNAII* TO * 
» *$BE0J7 * 

* (INITIALIZED * 

* lIlTH JtBEOJ) • 
***************** 



D1 *. •***«ij2********* 

.* IS *. * 

. * ESEP TASK *. IBS * BESET EHEP 

ENDING .* X* ONNEBSHIP 

». .* * FLAG IN SFTAB 

*. .* * 

*. .* *«««•«******«««« 

• NO 

l'. '. 

Ix '. 

X 

fl .*. 

El *. 
.* IS *. »«»»E2********* 

. * POHEB *. KES » SVC 2 FRTCH 
. PAKTITION ..........X* StBPOHIN 

*TE88IN*TXNG* * 

*, .* ««•*»•«•«•*«*«* 

*. .* 

• MO 



* LOCK CHANNEL * 

* APPENDAGE * 
I* EXIT IN PI8 * 

* TABLE * 

* • 
»•*****«*•******* 



**««B3**«***«*«* 

* SVC 6<t * • 
•RELEASE ALL* * 

* RESOUBCBS * • 

* ONNEO • * 

* * • 
***•*•*•*******« 



****CJ***»***** 
» SVC J9 « 
• DETACH • 

•> * 

*•**•*****«**•* 



.* PARTITION *. ItES 
*. SPOOLED By .*.... 
*. POHEB .* 



**************** 



.* JOB *. NO 
*. ACCOUNTING .*... 
*. SUPPORT .* 



*»«**H1 ********** 

• * 

• BEHOVE PIK • 
•F80H ACCOUNTING* 

• TABLE * 
« * 
«•*****«****«***« 



CAKCiiLCO X 

• HOVE CANCEL • 

• CODE TO ACCT. * 

• TABLE IF 1ST • 

• TIHE THROUGH * 

• CANCEL * 
***************** 



••***B<t********** 

* « 

* POINT TO * 

* FIBSI STSLST * 

* DIB * 

* • 
***••*******•*•** 



AGAIN 



.* IS LUB 
*. UNASSIGNEO 
•OB IGNORED. 



* FU • 

« * 
• ••* 



• *•• 

* * 

• F<» '.X 



• •«• 
NEXTDIB X 

• * 

• POINT TO * 

• FIRST STSPCH • 

• DIB • 

• * 



*****BS******^*^* 



******«««»*»«*«•* 



UNASSIGM 
THIS LUb 

Evxax 

****«*♦*«**•« 



SISPCH 

ALREADT 

CHECKED 



«*** 

• * . 

• H« '.X. 



.•POINTERS. 
.•TO TRACK - *. N 
•. HOLD TABLE .*. 
*. AVAILABLE.* 



****H5********* 

• SVC 2 FETCH * 

• 'PHASEMAH* * 

• • • 

•**«******««*«« 



*«$BBOJ OB SSBE0J7, 
DEPENDING ON RESULT 
OF •RFCHBCK' 



140 DOS/VSE Logical Transients 



Chart DH, $$BE0J4 - Clean up Non-TP I/O Devices (Part 3 of 3) 
(Refer to Chart 12) 



• « 

* > 



••***A I*** ••• «•** 



*•*•*•••**•*•*«•• 



• tOLta fiD lO • 

• PtSl'IIlOHS * 

• SISLDB AMD M * 

• ro POBT«B • 



*•*•«•« 



»•••«** 



*»»»*i3**» **•»♦*• 



•«***« «•*******« < 



* * 

* CLE&fi ccnaof « 

* * 



» * 



• * 
«S1'XX PC. CLftAU • 
•PC liBli £IITBt • 

• • 



IBS 


.• 


BUD OP *. 


• -•• 


, 


tOB BBACtiEO .* 






•• 

*. .* 






*. •• 


••*•• 




• MO 


•JXS * 






• H5» 




, 


• • 






• 




, 


FETCH 




4 



* B 


I •a. 


• 


• . 


«* 


'• 1 


0EI.IH2 


-•• 




£1 *. 




■ • •- 


.» 


niiAB 


*. INDIX POOND 



NOiiOLO 

«IliCBEll£HX BB 10* 

*»Btt POB nitm • 

..1* h»D IMCBEASE *. 

* POB IHSHLX * 

* « 



••♦•*D J** *••♦*•* 



♦«*«««••*«****«* 







*••* 




* HO 






* « 










• J5 • 










• • 










•*«* 






PSA X 






X 


•**«*DI| *****•*•«« 


m*** *Db********* * 


* « 


« 




« 


• 0UXI.D • 


• ST XI 


X> CJ.i!AM • 


* FilA 


ecu * 


♦IT 


TABlJl i.H'^ltt • 



♦♦««««*««*** 



««**«P1« •«••••••* 

• POIMT B2 TO ♦ 

• COB BENT ABO « 
« Bb ID BBR * 

• THTAB EllntI • 
« « 



*•«****•*«•*«**« 



«*««*f j**«**«*** « 



•*#**«*«*«*4i*«««« 



**«* *•• 



• THAna CAac&j. • 

• CLJiAH TXJ.atH • 

• tBTjiX * 



•♦♦♦♦y5*»** 



• poiirr 82 lo • 

I* HEX* lalAB • 

* tHTUt • 

♦ • 



*. BAXA'ifiJK 



• • 

• ZEBO • 

• 1-h-OODNTEB • 

« • 

X 

• « 

• A3 • 



• * 

• El • 



•**»*dS»*«* 



• • .* 

• •*• ■ 

kSSext '. 

X 

• . JSIOJIJI • 
Z lO CAiLBB ; 



Charts 141 



Chart DJ. $$BACLOS - VSAM Automatic Close (Part 1 of 2) 
(Refer to Chart 12) 



* tBiCLOS 



S* 



**** 

* B2 • 

> « 



» B3 ♦ 

* * 



• •*• 

• * 
« B« * 

* « 



• * 

• UELOCkTE * 

• ADDRUSS • 

• COHSTANTS » 

• • 



*«*««(;1 **«***«**« 



*****«*««****«*«« 



*«*«*l>1**»»***«*« 



****«**«««***««** 



• *••• 
»0K * 

• B1» 



RETURN *. NO 
CODE IN .*... 
R15 .* 



* * 

* TBAHSLATE • 

* ERROR CODE * 

* i?08 BESSIGB • 

* * 
*mmt*m** ********* 



******** 



***************** 



****Qn********* 
» s»c 2 • 

* SSBBOJit « 

* * 
*************** 



**** 

* * 

• Bit * 

» • 



««*»«£2**«******* 



»•***£ j********** 



***************** 



***************** 



• 




*«** , 


* 




• UK * . 


♦ 




♦ J2 •.X. 

• * - 






0&L2A X 


«***l*p 1*««*«*«« 


«* 


«*«4t«p2*********« 


* 


* 


* « 


* LOAD NEXT 


m 


• RESiiT ACLOS AND* 


•SEGKKNT PTK *HD* 


♦ ACTIV FLAG * 


* ENTHH NUHBBH 


* 


* « 



***************** 



***************** 



*****(;■{********** 



OALi X 

*****(i2********** 
VULLLOG OK* 



**************** 



***************** 



* HI *.X. 

* ♦ . 
»•** X 



*********** 



**** 
* Bi * 



♦ Bl » 

* * 
**** 



142 DOS/VSE Logical Transients 



Chart DK, $$BACLOS - VSAM Automatic Close (Part 2 of 2) 
(Refer to Chart 12) 



***** 

*DJ • 
* U/* 



***• 
* 
* B2 



****tlt******»** 

> • 

* • 

••»•**•••«•**•* 



*«*******«**«**«* 



•***B2*** *•*«**• 



OALLDG X 

***B(|«******«**** 
HBITE 
• RESSISE • 
«227I OH 
* SISL06 • 
*•***•••*•*•*«*«« 



* LOUD ACB PTR » 

* * 

* * 
***************** 



AHBL 

AODBESS 

VAtlO 



ACB *. NO 
ADDRESS .*....X. 
VALID .* 



*****(] 2* ********* 

* * * * 

* * s»c b^ * * 

* • BELBASE • • 

* • ALL • * 

* * * * 
***************** 



»***E2******* 



•**f1* ********* 



********* 



****F2********* 
» SVC 2 * 

• SSliCLOSE • 
t * 

*************** 



***pi|*****»***»«* 
SKIP TO 
• CHAMIIBL 1 • 
SISISI 



***************** 



**«*J2******** 



**** 

* « 

* B2 * 



***G4 *••***•*•••* 
PRINT 
• HESSASE • 
«227I ON 
* SYSLST • 

****«•«****»*»*** 



****H1********** 



***«H4********* 

* BETOBN VIA • 

* LINK RES • 

* t 
•**••*••••*•*** 



Charts lUJ 



Chart DL. $$BE0J7 - Tape and Disk P0B2 Processor (Part 1 of 3) 
(Refer to Chart 12) 



* * 

► STkTOO * 



• •BE»D (SVCOl* • 

• *SRR08 StATS* • 

• * AND MIT » • 

• •(S»C7) FOR • • 

• COHPL OP I/O* • 
***************** 



SIATOS 

*•*••(; I********** 

• STIIT20 DL* 

* kCCUHULATE * 

• BYTE BYTES- * 

* BKkO COUNTBB * 

******««*«««**««* 



4t**«*D }********** 
•St»T25 DL* 
»-*-*-*-*-*-*-*-* 

• HCCUNOLkTE • 

• BYTE D»TA • 

• CHECK COUNTEB * 
*«**•«***«***«*«* 



«••*•£ I********** 

•STAT25 DL* 

•-•-•-•-*-•-*-*-* 

• ACCUMULATE • 

• BYTE SEEKS * 

• COUNTEB * 
***************** 



*****f 1********** 
•STATJO DL* 
*-•-*-»-•-•-•-*-* 

• ACCUnULAIE * 

• BITE SEEK * 

• BftBOS COUNTEH * 
**«****•*•••**••« 



* ACCUHULATB * 

* BYTE OVBBRUN • 

* A COUNTEB • 

***••«**•***••*«• 



* ACCUMULATE * 

* bYTE OVEBRUN * 

* a COUNTEB * 

***************** 



**** 

* * 

• B2 • 



**************** 4 



• »«*«I)2********** 

• GET OS DEVICE • 
♦TYPE CODE NITH * 

• GBTVCE (S»C 99) « 

• * 
***************** 



■'«*»E2********** 

• BEQUEST • • 

• ISVCII<t) • * 
«SYSBEC SBC * • 

• NAIT ISVC7I • 



.* J330 IN •. NO 
• .COMPATIBILITY.*. .. 
*. MODE .* 



•***«U2********** 
» C0NVB9T • 

• MODULE ID « 

• FBOM * 

• 1/a TO 3/6 • 





*B5 




tftS LOGIC FLOV POI 




SrAt20 
STAT25 


*B5 • 


* 


STAT30 


*•««**«•***••«« 


IS lOEiTICAL. 



••••Ci(*****«***« 



ADD COOKTEBS • 



*•••••**•••••••• 



••**«B<I********** 

• • 

• STOBE COOMBB * 

• AMD POUT * 

• TO NEIT * 

• • 
***************** 



* SET TO 

* BECOBD 

* COaNTEI!> 

**************** 



****-sn********* 

* REYUKN TO * 

* CALLER • 

* « 
•••**••••*•••** 



*****H2*******«* 
* 

* PUT 

* MODULE IE 

* IN PUB2 

**************** 



••♦» J 2* ••*♦**♦* 

MOVE COUNTESS 

TO PUB2 

ENTRY 

*************** 



t******** 



144 DOS/VSE Logical Transients 



Chart DM. $$BE0J7 - Tape and Disk PUB2 Processor (Part 2 of 3) 
(Refer to Chart 12) 



» « 

• S$BE0J7 • 



ItklNOU 

♦ SET » 
•tOOBESSABILITI * 

• AND INHIBI'C • 
•FILE PHOTECTION* 

* * 



••*•••**»•***•*« 



SUPERVISOR 



»»m»^B^**^*^**** 



*•*******<•***«** 



**«««f )««•«««***« 



• Bt • 

« • 

• •** 



• « 

• kSSGH SYSUSE * 
» PUB ARD PUT • 

• IN CCB » 

» * 



GET ID OF 

PtBTITIOM 

OtmlEU LTA 



• SET MASK FOB * 




* TEST AT • 




• --IIAIII05- • 




• • 








• ••» I 




* • • 




» G1 *.X. 




* * . 




• *** X 




HAINOS .». 




G1 ♦. 




.• DOES ♦. 




.•ACTIVE TASK*. 




•. Olill THIS .«. 


• • • 


*. PUB •• 


, 


*. •* 




*. •* 


X 


• YES 


♦ **v 




* • 




» Ett • 




* « 




***• 






*****||t ••*««*•••• 




• * 




• HAP TO P80PEB • 




• PUB2 BNIBY • 





• G2 • 



(i2 *. 
.* *. 

• .HO 
3510 ...... 



DO *. 


•••••DS**«»«***** 


• • *. 


•STAtOO 0L» 


.* TAPE •. YES 


•-•-•-•-•-•-•-•-« 


*. DEVICE .*.... 


• 6BI DISK • 


*. ,* , 


• STATISTICS • 


*. .• 


• * 


♦. .* X 




• NO *•••• 




EKBaBNCEs"**. • *»; * 
MU», DHK3? • ••X. * • 






(lilNtO X 






•••**E4********** 

• • 
•UPDATE TO 18X1 • 










..X» POB 'X...... 






* • 
. * * 






•*«* 




• • 




* El • 




• • 




•*•* , 







•••••pit********** 

• • 

• UPDATE TO • 
•ASSOCIATED POB • 
•OHNESSHIP EITBY* 

• * 
••••••*••••••«••• 



Gl» 



». 



*. END OF POBS .*. 

♦. •• 

*. .• 

'•'yes 



•••• 

• • 

• G1 * 

• * 
• ••* 



•«*••••••••••*••• 



••••••••••••••••• 



•••*»j )•»•*»••••• 



••J2*^^***^ 



•««*•«•*•*••«••«• 



••*»•*•*•*« 



••«••••••••••••*• 



• 02 • 

• • 
• •«• 



• ••*KII«******** 

• SVC 2 - PETCa * 

• S*BEOJ * 

• • 
•«*•••••••••••• 



• ••• 

* • 

* • 
«*•• 



Charts 145 



Chart DN- $$BE0J7 - Tape and Disk PUB2 Processor (Part 3 of 3) 
(Refer to Chart 12) 



• INlr EXIT li * 
» PUB2 TO C'RD* • 
*«!ID CLEAR PUBZ * 

* URSOL BIT • 



• • 

• NO BECORDIH'i • 

• UPDATE TO • 

• iEXT PUB • 

• • 



EBB08 

COUHT 





» 'EXCP (S»CO»» 

• •SEHSE I/O ♦• 
» •WAIT JSVC?)* 
» * FOB • 

• •COHPtETIOE » 



• CLBAB 

• STATISTICS 

• AMU FLAGS 

• III P0II2 



• BE » 
» E«» 



••••• 
»DH * 
* E<»* 



BUILD 
TAPE 
BSCOBD 



•••««G3«»»»***«« 

• »EEQ IS»CH«»» 

• •SISREC BEC • 

• *IIAIT ( 

• •FOB RE 

• • CORPLETE 
*«•«**••• ' 



146 DOS/¥SE Logical Transients 



Chart EA. IJBSDUMP - Dump Monitor (Part 1 of 13) 
(Refer to Chart 13) 



« 
IJBSUUMP • 

* 



«««««ij 2* ********* 
« * 

•GEl ADDRESS Of • 
*COBHEG, SISCOB,* 
»A8 PIB, DUNPCA * 
* * 



*€?*•*•*••*•• 



**«*****«**«****« 



«»*««D2**«**** 



«**«««****«***««« 



POINT xo pia 

FOR CURRENr 

tASK 

**»««****««**« 



lES 


* 


AtTENTION • 


. . . ♦ 




TASK 




* 


CALLINS .* 


X 




'*. •** 


»**♦» 




• MO 


»fij * 




, 


* »1* 






« « 




X 






*»••• 


UUflPCS 




»EB • 
* B1* 

* • 

« 

PDUnPR 



Charts 147 



Chart EB. IJBSDUMP - Dump Monitor (Part 2 of 13) 
(Reier to Chart 13) 



RligUEST * 

iUDBESS * 

VALIDATION * 

« 



.•ADDBBSS*. 

PAIR OH *. HO 
HOBD .*... 
.BOUNDARI .* 



••••E2********* 

SVC 11 • 

RETUSN TO • 

SUPERVISOR • 



**««*F2'* ********* 

* * 
> END ADDR * 

.X* = END OP CORB * 

* ADOS * 

***************** 



»**«*«««««** 



«**«««»«««4(4 



*-«-*-*-*-*-*-*-* 

* *• 

* SPACE A LINE * 

»****««**««««*««« 



tt*«**«**««***4 



XDUNPENO 

***** 
*KL * 
* Et» 



148 DOS/VSE Logical Transients 



Chart EC. IJBSDUMP - Dump Monitor (Part 3 of 13) 
(Refer to Chart 13) 



• P2* 



* * 

* »J • 

* * 
• ••* 



HO .• VS8/ICCF • *. 
....*. PABTITIOR . 
«TE8HIHATING* 



.» IIAIN *. 

TASK 

»TEBIim»TIMG» 



OUHP 

08 JDUHP 

(lACRO 



IIOETSS 
TES .»■ 

X 

« C3 • 

* « 



SDOHPR X 

•IJBEOJ Fl>* 

*-♦-«-»-»-•-•-•-• 

• ISSOE HESSAGE * 

• FOB CANCEL • 

• COIIDITIOM • 



*PBOV0KE CANCEL * 

» OF ALL TASKS • 

X» OF VSB/ICCF • 

• FABTITIOB • 

* * 



«**«*C 2* ******** 

* RESTOUe DUDF 
(* OPTION IN 

* JCL FLAG 

* 
**************** 



VTAH 
USEB 
TASK 



»»**Blt»******** 
» SVC11 « 

* REIU8N TO * 

* SUPEBVISOB * 

•*•••***•*•••*• 



INITOOHP .«. 




C3 «. 




.* *. 




YES .* • 




...*. OPTION NODOaP. 


*X... 


*. .* 




*. .* 


^ 


♦. •* 




* MO 


***• 




* * 




* C3 * 




* * 




**•* 



• on * 

* • 
*••* 



.*. I 

D3 *. •••**D<t********** 

.* ». • SET SN TO » 

.* *. MO * PgOVOKE DUMP * 

► . OPTION .* -X* OF SOPERVISOR • 

•.PARTDURP .* • AND SISTEH » 

*. •• * GET*IS » 

*. .* «••••••*•*••••••• 

• »ES • 

xjf i 



*LTADaBP INItIA-* 
*LIZE SXSLST FOB* 
• DOIIP • 

********«•••«**«• 



OPTION 
. NODUHP 

». 

*• •* 



*ED * 
* B2* 

« * 

LtADUHP 



ii*«[(2********* 

sven * 

8KT0BN TO » 
SUPEBVISOB « 

»«««**«««**««* 



• AJ • 

» « 

«*«* 



Charts 149 



Ciart ED, IJBSDUMP - Damp Monitor (Part 4 of 13) 
(Refer to Chart 13) 



>•-•-*-•- 



• SPACE t LINB • 



•PBXHl TITLE FOR» 
« LT» BEGISTEKS • 

» • 



.*-*-«-* 



«****«**«*****«** 



SfACe A LINIi • 



NOLIADUHF X 

♦PRINT EP» 



«*»**«***««**•**« 



» PBINT C9'S, » 
•UPB'S AND FPfi'S* 

• • 



♦PRINT SUPERVI- ♦ 
♦ SOB COMTROl ♦ 
♦BLOCKS AND AUOR^ 



♦ IBS 

Ilblpr 



150 DOS/VSE Logical Transients 



Cliart EF- IJBSDUMP - Dump Monitor (Part 5 of 13) 
(Refer to Chart 13) 



• * 
« « 



DUHPPkBT I 

•OUflPtH EP* 

• DUHP CtKCELEO • 

• PABTiriOM • 

• • 



SOPDUNP X 

♦PRINT 

*-•-♦-*-♦-*-• 
• SPACE A LIN 



***************** 



***************** 



LBLPR X 

*****]) y********** 

•PBINI EP* 
*-*-*-*-*-*-*-*-* 
• SPACE A LINE • 



.*FAILUBR IN 
SVk 




MO 
•..X 




♦. .• 








». .» 

* «gs 

X 




X 
••••• 

• BH • 

• B1» 

• • 
• 


• KG • 

• B2» 

« * 




NOSVAOHP 


* 






SVtDBP 









•••***»**«***«*•* 



EITBACr 

PABTITION 

BOUNDABIKS 

*************** 



***************** 



•PRINT PABTITION* 



***************** 



.* VIRTUAL *. IBS 

». PABTITION .• 

• . .* 

•. .» 
*. .* 
• »0 


• AEDB = * 
..X» END OF • 

•PABTITION ADDS • 

• * . 


X 

. *. 
J1 ♦. 

.♦ ♦. 
.•GETVIS ABEA*. NO 

*. INITIALIZED .» 

*. .* 
*. . * 
♦ . . * 
» JES 


* * r 

• END OF DUMP • X 
..X» ADUB = GBI»IS •.... 

• ABEA ADDB • 

• • 


X 

•*«**K1*** »•*•*•* 

* END OH DU1P • 

* ADDS = EKD OP • 

* DSED GEIVIS * 

* AREA ADDR « 

* * 
***************** 




Ix 





Charts 151 



Chart EG. IJBSDaMP - Dump Monitor (Part 6 of 13) 
(Refer to phart 13) 



»EF « 

» Ct* 



>•**«•*•**•»« 



••***45***** 



•**•»•*«•«•*•«••• 



• • 

* HIN liSDR = * 

* eukse »uDg • 

• IN SV« * 



»•••*(; 3«*******«* 



**«**•«**•«*****« 



.• PHiSU III * 
.SVt FOB THIS 
•. EMTRY .♦ 



.•PHASE ADDS 
. > FAILURE 
*. ADOR 



•***62********* 

SAVE THIS SOI 
ENtBt AS 
RIN ADDB 



H2 

.» 
*PHASE ADDB 



•**«*J2**«*«*«**« 

* * 

* SAVE THIS SDL • 
.• EMT8X AS HAX * 

* ADDB * 
«. * 



•««*««*««««*«*««« 



••*••••*•*•*•*••• 



****lf3******««« 



**«•*«««««**««* 



• RAX ADDB = • 

• BEGm or THIS • 

• PHASE * 

• * 



* * 
•Bin ADDB - THIS* 

* PHASB ADOBESS • 

* IB S»A • 

* • 



•••••Jl|****«**«** 
« • 

•HAX ADOB = END • 

• OF THIS PHASE • 

• III SVA • 

• • 
«•••••**•*••*•••• 



•-•-•->•-•-•-•-•-• 

• *. 

• SPACE A LIHB • 

• • 
*••••••••••*«•••• 



PABI Of SVA • 

« • 

••••••••••••*•*•• 



152 DOS/VSE Logical Transients 



Chart EH. IJBSDUMP - Dump Monitor (Part 7 of 13) 
(Refer to Chart 13) 



**»*»HBFK8B1IC!!S 

♦ ♦TO EHBl: 

• ••EFC«, EGJ5 



». OPTION DOBP .». 



.* SYStBR *. NO 
GETVIS .•..!. 
*IRIII4LIZB0* 



•El » 
» B<l« 



•PRINT EP« 

«-•-*-»-•-•-♦-•-» 
• SPACE A LINE * 



•••••••**«•••»••• 



• •*« 

* « 

• « 

• •** 



♦PRINT BP^ 

♦PRINT TITLE FOB^ 

♦ SISTER GETVIS ♦ 

♦ ARE* ♦ 



♦ PREPARE TO ♦ 

♦ PBOCESS NEXT ♦ 

♦ b12-BTTE ABBA ♦ 

« • 



♦ DUMP ANCHOR ♦ 

♦ TABLE AND BIT ♦ 

♦ PATTERN ♦ 



♦ • 
♦POINT TO BEGIN « 

♦ OP SYSTEM ♦ 

♦ GETVIS ABRA ♦ 

♦ * 

•••• * 

♦ ♦ . 

♦ HI ♦.X. 

♦ ♦ . 

• ••• 



♦ 512-BltTE ♦ 

♦ AREA ♦ 

♦ ALLOCATED • 

♦ • 



• ••• 

• * 

• HI ♦ 

• * 

• •** 



.♦. 



*****gs*««***«»** 
.♦ ♦. ♦ouhpar bp^ 

.♦ ant arba ♦. ibs •-•_•.•-•-•_•-•_» 

♦ .left to dohp .♦ i* dump the ♦ 

♦. .♦ ♦ abba(s) lgfi ♦ 

♦. .♦ • ♦ 

*, •* «««««•«««««*««*«• 

♦ MO 

Ix I 

X 

♦ EL ♦ 

♦ tH* 

♦ • 

DUHPEND 



.♦ ANI ♦ 
.♦ PREVIOOS 
*. AREA 

♦.TO PRINT 



EURPIT X 

*•»••)( I********** 
♦DORPAR EP* 

♦ DOnP THE USED ♦ 
♦!>12-B«TE AREAS ♦ 

♦ JUST CHECKED ♦ 



.X... 

X 

» • 
« E<t ♦ 



*»***J2^^*^^^«^^^ 



•*•«»«*•«*•**««•« 



Charts 153 



Chart EJ- IJBSDUMP - Dump Monitor (Part 8 of 13) 
(Refer to Chart 13) 



• G2» 



••••♦BBFE8EHCKS 

• 'TO EJ».1: 

* ••EKP2, EKH2 



* INITIALIZE 

* PIBTS OP 

* UDRPCA 

• 



N0TP8T X 

•PRIIIT EP* 



»****•*••*•**•*** 



•*•••«••«••••*•*• 



-•-•-*-•-•-*-*-• 



««**«•*»«*«**•*«• 



•••••••••*•*•*•*• 



•***•**•••*•••* 



* « 

• OUHP SVA * 

» * 






***** 
»EL ♦ 
» B1* 



•-•-•-•-•-•-*-•- 



«***••****•****** 



***«*G1*»** ***••« 
*DUnPAS EP* 
•-•-•-*-•-*-•-•-• 

• DUHP » 

• SUPERVISOR * 

• * 
*•**•*•••••*•***> 



154 DOS/VSE Logical Transients 



Chart EK. IJBSDUMP - Dump Monitor {Part 9 of 13) 
(Refer to Chart 13) 



* BEUUEST • 
« ADDRESS •> 

* VALIDAIION « 

* • 



SDAID 
BUFFEB TO 
. ODNP 



»«**•*•••***•••** 



» URIIK » 

* tAalltlOR NOT * 

* tVAILABLK OM * 

* COHSOLB • 

* * 



* HBITE SDAIO • 

* BUFFER Tlllli » 

* AND ADD3ESS • 



PR'fPA X 

•EXTRACT El>» 

•-»-•-♦-♦-♦-»-•-* 

• EXTRACT * 

♦ PARTITIOK'S » 

* BOONOAHIES • 



•HBITE THE SAHE • 

• HESSAGB ON * 

• OUTPUT DEVICE • 



SDAID 
BOFFEn 
ACTI»S 



*«*«****«*«*««*** 



-*-»-»-•-*-•- 



-•-*-•-»-*- 



»««*«««««*«**« 4 



««***»*•*««••««•* 



AHI *. 
PABTITIUN . 
. TO DUMP .* 



* * • 
» .X 

svADunv 

UPDATED X 

•••«»G2*»**«««»«« 

• POINT TO NEXT • 

* PiB AMD BUILD « 

• PIK OF NEXT 'X 

* PABTITIOS * 
m « 



• ALL 

PARTITIONS 
». TESTED . 



CURRENT 
PARTITION 
. TO UUHP . 



* AU • 

* • 



Charts 155 



Chart EL, IJBSDUMP - Dump Monitor (Part 10 of 13) 
(Refer to Chart 13) 



***** 

*EJ * 
♦ Di» 



TMOADUHP .*. 



***************** 



•• ULL •. 

.« ktlBk TO *. 

DUMP IN 

•SUPERVISOR.* 



•DUHPAB UP 

*-*-*-*-*.*.*.*. 
.X*DUnP BEQOBSTEO 
* kRKk 

* 
«*•**»*****«*•** 



SEFEHENCKS 
TO ELEI»: 
EBK2, EHC1 
EHGU, EHEt 
ilieS. EPR4 
***** 



DUHPBIIO X 

»***«E«****«***** 
*PRIIIT EP* 



***************** 



EUHPSUP 

*«*«*f I ********** 
•DUnPAR EP* 



DUBPeHDI X 

«««**F'*********** 
•P«I»T EP» 



***************** 



*•»»****•*******« 



>***Glt********* 

STC11 • 

RBTDRN TO « 

SUPERVISOR < 

*************** 



156 DOS/VSE Logical Transients 



Chart EM.. IJBSDOMP - Damp Monitor (Part 11 of 13) 
(Refer to Chart 13) 



♦♦♦••befbheiices 

• ITO EHBI: 

♦ ••ELC1, BLF1 



• BBGPtR • 



•• S/370 • 

*.BEAL STOBAGB 

•• TO OUHP .« 



VLOOP 

•***«g3*«»»*«»«** 

• POIVT TO REIT • 

• PIE AMD BOILO * 
...X* KBI or NEXT • 
I * PARTIIIOI * 

• * 



«-•-•-•••-•-•-•-• 



•••«**••••••••••• 



• POIHT TO HEX! * 

• PIB ADD BUILD * 

• KBl OF NEXT * 

• PARTITION • 

• • 



• ALL 

PARTITIONS 
*. TESTED . 



OSVA 

•PBIIIT BP* 



•***•*««•••***••« 



-•—«-«-*-•-« 



•«•••••**••««•••* 



• ALL *. IBS 

PARTITIONS .*.... 
». TESTED .* 



PAUBPOOL 
•PA8IM* 



-•-•-«-• 



.X* bURP PAST OB 
* ALL OF THE 
» PAGE pool 



* GET PARTITION • 

* BOUNDARIES * 

« • 



*PBINT TITLE FOR* 

• S»A • 

* • 



05 ». 
.* HHOLB •. 

ARBA *. HO 
IR THIS .*... 
.PARTITION.* 
*. .* 
*. .* 



•EXTRACT BP* 

«-••>*-•-*-•-*-*-* 

* GET PARTITION * 

* BOONDABIBS * 

* * 
**•••••«••*•*«*•* 



.* AREA *. 

TO DUHP *. 

IN THIS 
•PARTITION.* 



*****B<t********** 
•DUBPAB EP* 

»-•-«-*-»-*-•-•-» 

* DUHP SIA * 

* STORAGE AREA * 

* * 
***************** 



*****jl^********** 
•OUHPAR BP* 

*-*-*-•-*-*-»-•-• 

* DUHP BND OP • 
*BBaUBSIBD ABBA • 

• • 
***************** 



HO .* AREA TO *. 
...•.DUHP IN THIS .* 
*. PARTITION.* 



*****n********** 

• ISSUE A * 

• HESSAGE IF • 

• PARTITION NOT * 
» ACTIVE * 

• * 
***************** 



***** 
*BL * 
• Bi|* 



• **•• 
•El * 

• B** 



•••••G1********** 

* * 
*ISSUE A HESSAGE* 

* IF PARTITION * 

* NOT ACTIVE * 

* * 
*««**•*******«*** 



-*-*•*-*-* 



•«««*****«***•*«• 



*-*-•- 
. ..*UUHP PARTITION * 

* HEGISTEBS AND * 

• STORAGE * 

*««***•********«* 



****ll &******•** 

• RBtUBN * 

• TO CALLBB * 

• * 
**«*«**•******• 



•****j 1********** 
*RBGPAR EN* 

*-•-«-*-*-*-*-*-* 
.*DUnP PARTITION * 

* REGISTERS AND * 

* STORAGE * 

***************** 



Charts 157 



Chart EN. IJBSDUMP - Dump Monitor {Part 12 of 13) 
(Reifer to Chart 13) 



***«A I********* 

» • 

» P8BGS • 

> • 



* * 

* BJ • 

* * 



•coaviiuri bm* 



•**•«•«*••«»•••** 



*coiirKirr eh* 

•-•- « - « - > ■ ♦->-♦-« 

• DDliP GPB'S * 

• 0-7 • 

• • 



•-•-•-•-•-•-•-•-♦ 

• IlOBP SPB'S • 

• 8 - lb • 

• • 



***«*C j****« *««* « 



•***•**•«••*««««* 



♦COKVBKI E«« 

♦-♦—»-•—♦—♦-♦-•-• 
» DOS? COIIXBOl. • 
• *36S 0-7 • 



* UUItP COMTBOl. * 

• UBttb d - 15 ♦ 






* a£IUHH « 

* 4 



•***S3*******«* 
« a 

• CONfBBf 4 

• 4 



««*««m«******«** 



* ODAP FPK'S « 



« SBT HUHBKii OF » 

• ajjius ro •• 

• COM rear lo a ♦ 

• * 



• • 

• CO»»i;HIl • 

» « 



• • 

• UH^ACk AHU • 
.1* l-BAIISi.&XiS UMi; • 

• UOUD UF [>A1'A * 

« * 



***»K3*««*«**** 
» RblUilll • 

• TO CALLS B « 

* 4 



««»**K4«*«'**«*«4>* 
♦tBiHT Bt* 

.* tUXUT COKBisMT * 

* OOae uiMb • 

• • 



158 DOS/VSE Logical Transients 



Chart EP. IJBSDUMP - Dump Monitor (Part 13 of 13) 
(Reter to Chart 13) 



» PBINt 



B1 *. 

• * *. 
• • *. II 

•.DOflP COBBHNU .». 



.X*. AN( PHOBLEn .* X* 



.* DUBP ». 
.* CANCELLED «. YES 
. BY OPEMTOe ...... 



»«««***««**«*« 



♦ EL ♦ 

• E«» 



••••C3»»*»*»**« 
* RETUHN 
» TO CALLER 

* 



**•*****«»«••*•»* 



••♦C»***»*»*»» 

3»C2 • 

BETUBN 10 • 

SOPKiVISOR * 



• *«• 

* « 

• BJ • 

« « 

• *•« 



EXTBACT 



• DUHPAH 



• « 

• EXTRACT * 
» PARTITION • 

• BOUNOARIBS • 



* DUBP AREA * 

* DELiniTBU Bt • 

* REGS 5 ANQ B * 

****««««*•«**«♦** 



>«*«f 2********* 

RETURN 

TO CALLER 



Charts 159 



Chart EQ. IJBDMPPA - Dump Supervisor Control Blocks (Part 1 of 2) 



* * 

* * 



••**A I********* 
f « 

» IJBORPPt • 

» • 



DO RFC 8 X 

••»**B1********** 
•PRHEAD E8* 



-***-*-«-*- 



PRINT COHEIBG 

HBkOEB • 
AND ADR • 



*DUnPiR BR* 

• DDHP * 

• COR REG • 

• * 



****!) 1********** 

PRHEtD BR* 

-•-*-*-•-*-•-•-• 

PBIHT SJtSCON * 

HBADBg * 

AND ADB * 

*•**•••*••«••**• 



•••****•••*••*«* 



*****F1 «**««*«*** 
*PRHEAD EB* 
*-*-*-*-*-•-*-*-* 

• PRINT PUB • 
*HEAOER AND ADR * 

* • 
**««••*••••••*••• 



« OOHP PUB • 

• • 

***************** 



* PRINT PUB * 

* OHNKR HBAOEil » 

* AND ADR * 

*»••*••*»••«*«*** 



*****(;2****«*<*** 
*DUHPAB ES* 
«-•-*-•-*-*-*••-» 

• DUMP PDU * 

* OMNER * 
« « 
••»•••*•••*•••«*• 



•***•*•**•*•••••• 



»-»-•-»- 



•**•••*•***••«•** 



K0PUB2 

«««««G 2* ********* 
•PRUEAO EB* 
*-*-*-*-*-*-•-*-* 



««««««****««««««* 



* DUMP LUB • 

* * 



•**«*»******•«**• 



HO .* BXIEMX 

,..*. BLOCK 

*. EXISTS 



• PRINT EXTENT * 

• BLOCK HEADIHS * 

• AND ADR * 

***•*********«••* 



•****C3********** 
*DOHPAR BB* 
•-*.*-*-*-•-*-*.* 

* DUBP * 

* EXTENT * 

* BLOCK * 
*•*••*•***•****** 



POIB 

••••«|)3*****«««* 
*PaBBAD ER 

* -•-*-•-«■.*-«.*- 

* PBINT DIB 

* HBADING 

* AND ADR 
***•***••*«*•*** 



*-*-*-*-*-*-*-•-* 



***************** 



•••*«P3********* 



«*•*•**••*•**«•• 



* PRINT BUFFER * 

* BBADIHG * 

* AND ADR * 



-•-*-•-•-* 







* HAS *. 




* 


DIB AN *. NO 


..X* 




EXTENSION .*.. 


I 


* 


.* 
*. .* 
*. .* 


»*** 




* YES 


* * 






• GJ * 






* * 






**** 




i 


*«***HJ*««*****»« 


*P8HEAD SB* 



••*•••******••*** 



* POINT TO 

• NEXT DIB 

• BNT8K 

* . 
*•***•*••******* 



ALL 

DIB'S 

TESTED 



**** 

* • 

* G3 • 

* « 
• *** 



* PRINT PIB * 

* HEADING * 
« AMD ADR * 

***>*•*********** 



***************** 



*PBHBAD BR* 

*-*-••*-•-»-•-•-• 

* PBIMT LIA * 

* HEADING • 

* AND ADB * 

**•••*•**•*«*••*« 



-*.-*- 

* PRINT DIB EX- * 
*1'ENSI0N HEADING* 

• AND ADR * 

***************** 



* DUBP LTA • 

* * 
***«****«**«***•« 



****Jb********* 

• BEIUBN * 
> rO CALLKN * 

* m 
•******«*««*•*« 



««*«**««**«****«« 



• *** 

¥ m 

• A<t * 

* * 
**** 



tUHP JIB « 

« 
*****«****«**• 



160 DOS/VSE Logical Transients 



Chart ES. XJBDHPPA - Dump Supecvisoc Control Bioclcs (Part 2 o£ 2) 



• PRHEiU * 



.♦ 2K •. 

BLOCK .* 
*. OUTPUT .• 



*. (BS 

OPTION .*.... 
DUHP .* 



• **« 

* * 

• • 

• •*• 



••••BJ********* 

* IBTUBI • 
.l* TO CtLLCB * 

* • 




.*. 
D1 *. 

.* *. 

.* PIBIII *. 

*.ID TO BK PUT . 

*IM HEIDIIIG.* 

•• .* 

*• .* 

• IBS 



PUT PABTH 
ID IB 

HEBDIMG 



•PRIBT SH* 

• PIIBT CONTROL * 

• BLOCK HKkDIMG * 

• AMD lOR • 



****G1********* 

• BBTURM * 

• TO CALLER * 



,m •. 

9 .• LESS *. 

.•.(Hkl a HOBPS .* 

*. TO DUBP .* 

*• •* 

*. .* 

IBS 



PBBPIBB TO 

DUBP 1 

PABTItL LIIB 



CUVfBBT 
B NORDS 

(OB LESS) or 

DATA 



«PIIRT SB* 

* PRIRI A LIRE * 

* or CORTROL * 

* BLOCK • 



• A"* • 

• • 
• ••• 



• •••Git********* 

* HEIURH * 

• TO CALLEB * 

» • 

«••••«.«••«•««•• 



****G5********* 
» • 

• PBIMT * 

• • 
•••«««••••••«•» 





* PRINT LINE *X 

* ON SISLST • 

* • 
•••»*•••**••••••• 

It 


. . • •• 
• 


« 

>• 
J 

• * 


BLOCK .* 
OUTPUT .* 
*> •* 
*• ■* 
* IliS 


***J3********* 

RETURN TO * 
LOCAL CALLER *X.. 

♦ 


X 
T8C .*. 

J« *. 

.* *. 

NO .* AIT •. 

.....*. P80BLEH .* 

*. .* 

*. .♦ 


X 

**JS********** 

9 BHPIC rp* 

-•-*-•-*-*-*-» 
WRITE 2K * 
BLOCK ON • 
SISUBP • 



•••«•««««•«««*«•« 



• •••Kit********* 

* RETURN TO * 
•EXTERNAL CALLER* 

* * 
••••••••••••••• 



Charts 161 



Chart ES, IJBDMPAR - Storage Dump Routine (Part 1 of 5) 
(Refer to Chart 13) 



****A 2* ******** 
» « 

• IJBDHPAR * 

» * 

«***«*******«** 



««** 



flliriiRBNCliS 
TO ESB2: 
EUSl. KVfit 



* ROUND EieSIN * 
**DCRESS TO »a»T* 

LOHEB PAGE *. 

• BOONOARr * 

» * 

*m ******** ******* 



.1* 



.* ADD« « 

.1*. VALIDAIIOK 

♦.BEgUESIED." 



* ♦ 
*I'SECABE to UUHP* 

. X*TUE MHOLE ASEA *. 
« AT ONCE * 

* * 
**********^^^m*m* 



* YES 

t 'rkfeOences 

».X.TO ESC2: 



****C 2* ******** 

RETURII 4 

TO CAtLEB « 

4 



..*.BCPS:VS8 MODE.* 



* • 
ISTEAOB 



.» PAGE IH *. YES 

*. VALID ADDRESS.* 

*. SPACE .* 



.* PRE»IOUS ». 

PAGE 

*. INVALID .* 



♦ PRIMT 'IN^ALHi 

• ADDR SPACE' 
« MESSAGE 

*************** 



»**#«£)5««»« «*««** 



********* 



* B1* 

* * 

* 

PYALIU 



*****Q^*** 



**** 

• * 

• B2 • 

• * 
**** 



362 DOS/VSE Logical Transients 



Chact ET- IJBDMPAR - Storage Dump Routine (Part 2 of 5) 
(Befei to Chart 13) 



TSIEtDDB .«. 










B2 •. 






•••••{I3^««»***««* 


.•I1IV»II0». 
.•ADDS SPACE 
..I*. BESSAGB 




IBS 
•■.... 


•PBINI^ ....!"! 


_ 


..x» 


......... 


*.T0 PBim . 


• ' 




• 


SPACE A LIIB * 


•. .* 






• 


• 


• *. .• 






••*•••*••»••««*«• 


**•• • NO 










* ••**• 










• B2 • * . 










» • C2 '.X. 










«••«« • . 










*«»• X 










TEA .*. 








.*. 


C2 •. 








C3 •. 


.* *. 








.* *. 


.•START ADOB 


• a 


IBS 




•END ADDB IB*. IBS 


• .IN SUPBBVISOB. 


...... 


..x^' 


SOPEBVISOB .* 



•••••Bi|»****^**** 
•PBIMT £«• 

•-•-*•«-•-•-•-«-• 
X*PBI«T •INVALID *. 
* ADDK SPACE' * 
» BBSSAGE • 
••••••••*••*••••• 



•••*«C <*•*••***••* 

• PBEPABB TO • 

•DOBP UP TO END • 

Z* OF BBQOBSTED • 



-•-•-•-•-•-•-•-• 
[• • 

• SPACE A LINB • 

* « 
*•••••«•••••*•••« 



•••••C5^*****«*** 



•••••*••••*•••••• 



••*••••••••••«••• 



m»***D2********** 



•••*••**••*•••••• 



ALL * 


lES 


PABTITIONS 


« 


... 


. TESTED .• 




, 


*. .* 






♦ . .* 




X 


• NO 




••••* 

• BO • 








• B1^ 








• • 








• 


X 






•*F 2* •••••*•*• 






• 




BXTBACI 


• 




PARTITION'S 


9 




BOUND 


tRIBS 


* 





•••••({^•••••••••* 

• PREPARE TO • 
•DDHP UP TO THE 

• END OF THIS 

• PARTITION • 

• • 
••••**•*•••*••**• 



•X. 



«•••«••*««««*«••« 



.« NEXT *. 
NO .• ADDB TO •. 
,..*.DUBP IR THIS . 
••PARTITION. • 



.•END OF *. 
■• AREA TO • 
.DUHP IN THIS 
•.PARTITION.' 



••••*K1 •*•••••*«• 
» • 

•PREPARE TO DUHP^ 

• UP TO GETVIS •! 

• AREA • 
« « 
•*••••••«*••«*•«• 



MO 


• RBAli 


. . . • 


PARTITIO* 




*. 


a 


•. .• 


X 


• . .• 


««••« 


• IBS 


• EO • 




• B1» 


, 


• • 




• 


^ 


PVALIO 


X 




.•. 




K2 *. 




• • *. 


NO 


• PARTITION 


.•••....• 


GBIVIS AREA 




». IN USE . 



•••••U3******»*«* 

* PBEPABB TO • 
•DUMP UP TO THE 

• BID OF 

• SOPEBVISOB 

* « 
••••••••••••*•••• 



• .< 



.•GETVIS AREA*. YES 
. FILLS UP .*..! 
•.PABTITIOB.^ 



GJ •. 

.•BID OF •. 

.• AREA TO *. 

•.DBBP IN VALID. 

• ADDR SPACE.* 



• . 



.» 



,• 



•••••H3^*«**^««*^ 

• PRBPABB TO • 

• ISSUE BESSAGB • 

• FOR INVALID • 

• ADDB SPACE • 

• * 
••*••••••••**«*•* 



•••••J3^^^^^*««* 

• PREPARE TO 

• DUMP UP TO 

• INVALID 

• ADDR SPACE 

••••••••«•*•*•*• 



.* BEGIN *. 
.•OF AREA TO •. IBS 
•.DUHP IN VALID.*..! 
•ADDR SPACE.* 



* HHOLB 




*, 


10 


ABBA 






*.... 


•. OUHPBD 




* 


, 


•. ■ 


« 




, 


•• .• 






X 


• IJIS 












• • 


, 






• C2» 


X 








•••»• 






*••• 


•BS • 








• C2^ 








• • 








• 








EXIT 









XPVALID 

• •••• 

• ED * 

• B1* 



Charts 163 



Chart EU- IJBDMPAR - Storage Dump Routine (Part 3 of 5) 
(Refef to Chart 13) 



•****RBFBREHCBS 

• »T0 BUBI: 

• ••BSD5, etE2 
* • BTJ2, ETK3 



FIRST LINE 



.« FIRST * 

XXBS .* LINE OM A 

..*. 32-BYTE 

•.BOONOART 



* • 
•BME LINE ADDS * 

* OH A 32-BXTE • 

* BOONOARI • 

* • 



•COHPOTE HOHBER * 

• OF CHARACTERS ♦ 

• TO CLEAR IN • 

• FIRST LINE * 

• • 



*HRITE 2K BLOCK *. 
•COHTAIRIHG THE * 
* HESSAGES * 



««•••**»•»•«••*•• 



•****C3********** 
•PRINT BV» 

•WRITE 2K BLOCK • 
• IN TAPB/OISK/ • 



••***D3*»***«c«»* 



•*•***•> 



••*••*** 



IBS .* NEXT PASS *. 
...•. INVALIDATED . 
•AODR SPACE. • 



*•*•* 

• ES • 

* B2* 



•»***H I********** 



•*•*•••**»»«*»•• 



• « 
•DURP UP TO END • 

t*OF PAGE on END * 

• or PARTITION • 

• • 
•••••*••••***•*•• 



• COMPUTE * 
•NUriBER OF NORDS* 

• TO Duap • 

• • 



•**•* 
•E¥ • 
• Bl» 



164 DOS/VSE Logical Transients 



Chart EV. IJBDMPAR - storage Dump Routine (Part 4 of 5) 
(Refer to Chart 13) 



*****ci ******** 



•CONVERT «0U8 OP* 

* DATA III LINE *> 

• TO HEX • 



******** 



******** 



*CONVERT 8 HOBDS 

* OB LESS TO 

* PRINTABLE HEX 

• 
******** 



* KBPLACE * 

* NON-PRINTABLE * 

* CHARACTERS BY * 

* BLANKS * 

» * 

***************** 



»PBINT THE LINii * 



«*(*«•*«•*«****** 



.* PREVIOUS 
. LINE HAS 
*EUUAL LINE. 



»«**Clt ********** 



«««***«•««****«** 



^ 




* C2* 






• * 






* 


.*. 

EH *. 




EXIT 






.* *. 






.* PAGE OR * 




[ES 


*. PARTITION 


* 




♦.COSPLEIE .* 






*. .* 






*. .* 




X 


* HO 




***** 
*ES * 
* B2* 

• * 

* 

TSIADDB 


X 






***»*FI4********** 




* 


* 




•SUBTRACT a FHOH* 




» BOBD COONT TO 


* 




* UOHP 


* 





**** 

* « 
» B1 * 

* « 
**** 



FIRST LINE 



*«***«** 



**«««***«*******« 



«*«**j |****««***« 

* PUT 'SANE' IN * 

* THE LINK AND * 

* CLEAR REST OP * 

* LINE * 

* * 
*****•***•••***** 



********* 



*«**«*«««««««**«» 



Charts 165 



Chart EW, IJBDMPAR - Storage Dump Routine (Part 5 of 5) 
(Refer to Chart 13) 



* • 

• PRIHT * 

* * 



, • BLOCK •• 
. ODTPUT OR . 
DnnP COHHAND* 



*IJBCRPIC FF» 

t-*-*-*-*-*-*-*-* 

. X*MRIIIi BLOCK OS * 

•LINE ON OUTPUT • 

• DEVICE • 





; 




•*»**C1********** 


*IJBDRPIO 


FA* 


»-»-»-•-«-•-•-•-• 


• NRITE LIME 


CM » 


* SKSLST 


• 


• 


* 


•*«***«* 


X.. 


»»•*• 



•***02********* 

• BETURN * 
» TO CtLLBB * 

• * 



• ES • 
» C2* 



166 DOS/VSE Logical Transients 



Chart FA. IJBDMPIO - System Dump I/O fioutine (Part J of 3) 
(Refer to Chart 13) 



••»A2*******»* 
« 
IJBDdPIO ♦ 



• FB » 

* B5» 



• Cb • 



CLOSE HEQ .» 


... 


*. -** 




*. .* 


X 


* NO 


***»» 




•FB « 




* B2» 




* * 




* 




CLOSEfi 


X 




**]i2* ********* 




* 




HEFRESH I/O • 




FIELDS • 




IN DUMPCA * 





* * 

* AVOID HEsrOEE • 

* OF 3800 CB AI *X 

* DUHP END • 

* « 
***************** 



ifmm*****m***** 



SYSTEH 

DUMP FOH 

. FOMEH . 

•.PABTN.* 



• SEPBI • 

• SET CU to • 

• SIANOABO SET • 

• • 
***************** 



*****f2* ********* 

* * 

* EXTRACT PUB * 
K» DEVICE TXPE » 

* FOB SYStST • 
***************** 



***Ei********** 

MRITE PURER • 

rBRBINATIOII ' 

nSG, BEAD * 

SYSLST » 

ASSIGNBEHt < 

*************** 



*PUT PROPER CCS • 
..X* AOOB IN CCH * 
. * (GENIORB) * 

I ***************** 



F3 *. 


*****fH********** 


*«***FS«*«*«**»** 




* 




* 


* 


REPLII= *. YES 


* SET IHTALID 




• PUT 


riHB STAMP • 


NO OH .• 


..X* SYSLST RETURN 




• IN 


TITLE AND * 


ENTER .» 


* CODB 




•FORCE PAGE SKIP* 


.* 


* 




* 


* 


*. .* 


*************** 


*« 


***************** 


* NO 


X 

***** 






X 

***** 


i 


*FB • 






*FB ♦ 


. *• 


* E2* 






• 8i» 


GJ *. 








* * 


*. 


* 






* 


VALID *. 


RESTREGS 






PRINT 



• **>*1j3********** 
» * 

• ASSIGN * 
» SYSLST * 
« FOR POUER * 

• PARTITION * 
»«******«*******« 



**w**j 2* ********* 

• * 

• gSETPRT * 

• (COPY 3800 * 

• CU STATUS) * 

• * 
***************** 



* C5 • 

* 4 
**** 



Charts 167 



chact FB^ IJBDMPIO - System Dump I/O Routine (Part 2 of 3) 
(Refer to Chart 13) 



*F» * 
♦ C2* 

• * 



REPE8RNCES***»» 
TO PBBb: * • 
P4B2, FIIP5» •• 



CLOSER .*. 

B2 ». 

• • *. 

MO •• » 

...*. SISLSI=>3B00 
•- .* 

*. .* 

*. .• 
• ItES 



••**«C2******«*** 



••***•**««•••*•*• 



•***» rRBFEBBHCES 

• • ».xrTO PBE2: 

• • .rhtt, FCD1 

• ••• , 
BBSTREGS X 

****»E2********** 

• • 

• • 

• RESTOBE BB6S • 

4t * 

• • 



****F2********* 

• BETURB * 

• TO CALI.BB • 

t « 



PAGE POLL .• 



• PUT JOBNAHE. • 

• D»TB, SIBB. * 
•CPUXO ABO PAGE * 
*NDBBBB IB IITLB* 

• • 



• PBIBT TIILB * 



• SPACE k LIBB * 

* • 



PBIBIO X 

••••• f 5«**«*»»**« 
•PBIBI1 PC* 

....* PBIHI CUBBBBT • 

* OUBP LIBS • 

• • 



• « 

• «RITER « 

• * 



•»«**II3******«*« 



**•••«•••**•••*• 



•••J3*«*»****« 
BAIT 



• *«*K 3«**«**«*« 

• RETURB * 

• 10 CALLBB ' * 

• • 



168 DOS/VSE Logical Transients 



Chart FC, IJBDMPIO - System Dump I/O Routine (Part 3 of 3) 
(Refer to Chart 13) 



**«*A2********* 
» PBI*T1 « 



B2 


«. 






,• 


*. 










* 


MO 


SKSLST'FBl 




• 



••••*B<I********** 



X*. SYSLST'OISK 



••«*••*•*••*••*•• 



>*C2********** 



*•••••••«•***•*•• 



D2 *. 

.• *. 

• • 

BXTBNT PULL 

'. •• 

•• •* 

• • .• 

» no 



uuttss 

m m 

•»••»■••••**••••« 



.* ». 


res 


•. BXTBNT FOIL .* 




*. •• 




• • .• 




♦ . .• 


X 


• BO 


•••• 




* * 


. 


* 01 » 


, 


» * 


• 


•«*• 


X 




•••••OK********** 




* « 




• BUILD • 




• SBEK/SBtRCH • 

• kBGbHBBtS * 







*••••*•••*•*••••* 



X. 

ST4BTI0 i 

*****B4******«*** 
*ilBITBB FB* 
*-«-*-*-■•-*-*->«-• 
....* HBITB LINE ON * 
» SXSLST • 
• « 



*****p 3* «*»* ««!•*• 



»****f||»****C»*»* 



***«*f 5«««^9««««« 



*»•**«•••••••••*• 



••*••**»*•••••»*• 



**«*«***««•*»***• 



• • 

• D1* 

t * 



****62********* 

• BET08N * 

• TO CtlLBR « 

l> • 



Charts il69 



Chart FF- IJBDMPIC - DOMP Command I/O Routine (Part I of 5) 
(Refer to Chart 13) 



* * 

• * 



* • 

• IJBDHPIC • 



* 


HO •»••» 


, 


•PH • 


, 


• B1* 




• • 




• 


X 


PUTDtIk 


.* 




01 


• . 


• 






*. KES 


CLOSE 


BEQ .*.... 



• * 
CLOSES 



*H EIDER r%* 

•1»0T DUBP COHII.,* 
VO&TB. TIRE k*D • 



••••*g1*****«**** 



•HBIIBB FK* 

(* SKIP TO NEK • 

• PAGE • 

* • 



*HS*U8B FK* 

*PUT DOHP COB«.,» 
•D»£. IIBB tBD • 



«*«**CS********** 



*«***••**«••••••• 



PBINTO X 

«««*«DS********** 
*VBItBB FK* 

•-•-«-*-*-•-•-•-• 
•PBIBI IIILB OB • 
« LISIIBG • 

* • 



*HRIIEB FK* 
« SPICE 1 LIME • 



*•*•*«•***•**••*• 



••***•••••***••*« 



*»*»*f2********** 

* INCLUDE THE • 

• 2K BOFFEB • 
.1* m FIXLIST • 

• FOB lOBB « 

* • 



.•NESStGES TO*. 

*. BE HBITTEN . 

*. OUT .* 



««**«(; t******* 



•»*•••*•«****•*** 



*. -• 




• XES 












G3 *. 




.* *. 




• *. YES 


NO 


BOPFEfl EBPTJ .»... 


• • • ■ 


♦ , . ♦ 




*. .* 




♦ . .* 




* HO 




( 




»»»»» 




»FH * 




» 81* 




« * 




* 




POTDAT* 





•******•••*•*•••• 



•HBITBB FK* 

• HBITB CilRBEBt * 

• DUBP LINE ON * 

• PBIBIEB * 







.*. 


X 

OKBXIT .*. 


GO *. 


G5 *. 


.* *. 


.* *• 


.* BESSkGE *. 


YES .* DUBP CHD *. 


♦. 4L8EADY .•X.. 


*. CANCELED 8i .*X... 


*. PBIBTBD .• 


*.OPEBAI0B .* 


*. .» 


*. .* 


*■ .* 


*. •• • 


• KES 


• NO * 




•«•« * • 




•FJ » . * • 




♦ Hi '.X. * • 








•••• . REFEBBNCES 




REIOK X TO FFGb: 




***»»US*«««**«*»*FGHb, FHD2 




• •FHEH, FHK1 


• SET DUBP » 


• SET BETUBN * 


♦CANCELED BETUBN* 


• CODE=0 * 


• CODB • 


« • 



**«•«*««*«««****• 



• «**«*«**«***««•« 



••***•**•«*«*•••* 



***«JS********* 

• BETUBN * 

• TO CALLEB • 

• * 



• Ai * 

* « 



170 DOS/VSE Logical Transients 



Chart FG. IJBDMPIC - DUMP Comntand I/O Routine (Part 2 of 5) 
(Refer to Chart 13) 



* PUT rilDEX TO * 

* OUXPUT PUB IN • 

* BG SYSONP LUB « 

* FOR DORP • 

* COBflAND * 



ItPE OB 
PBINTEB 
OUTPUT 



ODASD X 

•***»C2********** 

• OPKN »TOC IND ♦ 

• BEAO FORMAT I • 

• LABEL FOB * 
*DOS0nPF ♦ CLOSE* 

• VTOC « 



•BBITBR FK» 
•-•-•-•-•-•-•-»-♦ 
*HBITE 'INVALID *X. 
• DUBP FILE* « 
» MESSAGE • 



• *** . 
BE X 
*»«**lj1**««»***** 

* SET INVALID » 

• OUHP FILE • 
*RETUKII CODE AND* 

• RESTORE BBSS • 

* * 
••*•**•****••«*•• 



• TAPE •. 
ASSIGNED TO . 
*. A PAB'IN .* 



• G5 • 

* • 
• •*• 



•KHITBR PK* 
*-•-*-*-*-*-*-*-* 

• WBITE 'TAPa * 
•ASSIGNED* RSS 6* 

• READ BESPOHSB * 
**«•*«**«*•*****• 



• C5 • 

* « 



* SATE FILE • 

* EXTENT • 

* LIHITS • 

* • 
«•••«•••*••••••*• 

* • • 

* * . 

TPUL X 

•HIITBB rX* 
»•«-«-*•»-••••«-• 

* BEAD • 
« POINIEB • 

* BECOBD * 



.•POINTBS*. 
.* TO NEXT *. ■ 
. FBEE BECOBO .*. 
• .m EXTENT.* 



««*«f )*«««***** 

* BBTORN * 
» TO CALLER • 

• • 
••***•*••***«•• 



«****P2** ******** 

* SAVE DEVICE • 
•CHARACTERISTICS* 

* AND FILE * 

* EXTENT LIRIIS * 

* * 
m ******* ********* 



*****fi******t*** 
« • 

• SET RODE * 

• FOR 7-TRIl AND * 

• 8B09 TAPES * 

• * 
***************** 



•HBIYBB PK* 

•-•-•-•-•-•-•-•-• 

* BBHBXTE • 

* POI NXEB • 

* BECOBO • 
**•*••••*•****••• 



OPKNENO X 








«****S5*< 






• 








« SAVE 


AND 






* EDIT 


IIHB 


•X 




* or TBI 


UAI 




, 










********4 


***••*•* 










>••• 






• 


* 






* 


«•>• 






• 


• 



*****^n********** 

* * 

* SBI2E • 

* SYSTBB *X 

* (SVC 22) • 

***************** 



***** 
*FF • 

• US* 

* • 

OKEXIX 



Charts 171 



Chart FH. IJBDMEIC - DUMP Comnand I/O Routine (Part 3 of 5) 
(Refer to Chart 13) 



*****REFEBRIICI!S 

• •TO FHB1: 

• ••FFC1, FFGJ 



i 

PUTDATH .*. 



.♦. TiPBIO 

CI *. •»»»«C2*********« 

.* •. *HKITliB FK» 

.« «, X£s «.*-*.*.«.*-*.«.« 

*. TAPE OUTPUT .* X*«iaiIE 2K BLOUK • 

*. .» • OH T»PE ♦ 

*. .* * • 



DISKS 
YES .« 



•HRITEB . FK* 

*<IRITE 2K BLOCK • 

* ON FBA * 

* • 



<i«***F-)*««««***«* 



*««**«***««**«*»* 



« BOVE DiXik MOT • 
• HBITTEN THIS 



•*••***•*••***•** 



.»2K OF DAT* •. 
. LEFT TO BE ." 
•. WBITTBN .• 



TAPE FOIL 



• WO 

. 'FF * 
..X» G5 * 



EXTiiNI FDLL .* 



CLOSED 

•KSITEB FK» 

...X* URITB-'FILE • 
* FDLL' RBSSAGB • 



**************«*4 



***«*; 3«««*«««*«« 



•••*•*••*•***••«« 



• *••• 
»FJ • 

* B1» 
* * 

* 
CLOSER 



*HBIIER FK* 

•MRITE 2K BLOCK * 
* OH DISK • 

« * 



••**»BI«***«*«**«« 
•UPDCCHHR FK* 
«-•-•-*-•-«-*-*-• 

• POINT TO MBIT • 

• RECORD • 

• • 
*•••****••*•*•**• 



***** 
*FF * 
* G5* 



MOT FULL 

*****J 1********** 

* POINT BEHIND * 

* DATA HOVED TO * 

* BEGIN OF * 
« BUFFER * 

* • 
***************** 



*****K1 ********** 
•LENGTH TO HOVB * 

* NEXT TIHE = * 

* LENGTH HOVBO * 

* THIS TINE ♦ 8 * 

* * 
*•*****•*•••*•**• 



172 DOS/VSE Logical Transients 



Chart FJ- IJBDMPIC - DUMP Command I/O Routine <Part 4 of 5) 
(Refer to Chart 13) 



CUISX 

•MRITEB FK« 



•♦•••BKFeBBHCBS 
» 'TO FJB1: 
♦ ••FP01, FHF3 



************ **m* 



DISK OUTPUT 



**************** 



***************** 



.*. CFB* 

D1 *. »***«02********** 

.* *. *MBIXEB FK» 

» *. KES »_•-«■»■».«_♦-•-» 

FBI OUTPUT .* X'HBITe 2K BLOCK • 

». .* *CONTAIIIING EOF • 

AT EMD 



MO 



•«**•*«***••*••*• 



*«***03********** 

* COHPUIE • 

• NUHBBR OF * 
♦TRACKS LEFT III * 



•*•*****•**•«*«•* 



.CTiPE X 

•*•«•£ I********** 

*IIBITKB FK* 

* HSITE TAPE • 

* n* BK * 

* • 



***««E 2* ********* 
*UBITEB FK* 
«-*-«-•-«-«-*-«-« 

* WBITE ANOIHEB * 
*2K BLK H. ONLK * 

* EOF IM IT • 
•**•**•*«**«*•*«* 



• HEAD * 

• POINTEB * 

• EECOBU * 

««****«*«*******« 



***************** 



*****f 2********** 
•MBITE8 FK* 
•-•-•-•-*-*-*-*-• 

• BEAD * 
» POINTER * 

• BECORD * 
•••*****«**«***** 



*BEilBITE POINTEB* 
*BEC. TO BEFLECT* 

* CUBB. ounp * 

***************** 



•****G I********** 
•HBITEB FK* 

• BACKSPACE * 

* BECORO * 

***************** 



•BEHBITE POINTER*. 
*BEC. TO BEFLECT* 
* CUBE. DOHP * 
***************** 



CONV X 

****«G 3* •**«*«**« 

* COMVEBT NO. * 

* OP TRACKS/ * 
. ..X*BLOCKS LEFT TO * 

* DECIHAL » 

* * 
***•*•****«»***** 



CPBIHT 1 
*****HJ*" 
*WRITER 



.*•*****• 



* ilRITE 'DOaP * 

* COBPLETE' • 

* HESSASE * 

***************** 



*****j 3********** 

* RESTORE * 
*COHTEIITS OP lUB* 

* ENTBT FOE 8G • 
*syS0HP FOR DDBP* 

* COMMAND * 
***************** 



««*«*K 3 ********** 

* BELBASE * 
*SYSTEH FOB DUMP* 

* COHMAMU IF IT * 

* HAS SEIZED * 

* • 
***************** 



Charts 173 



Chart FK. IJBDMPIC - DUMP Command I/O Routine (Part 5 of 5) 
(Refer to Chart (13) 



t * 

► UPDCCHB * 

» * 



*. TRACK FULL 



m****Q2********** 



«««««****«*«**««« 



• • 

• POIHT TO MKXI • 
(• THkCK I« *. 

« CYLINOEB « 

• • 



• • 

• POIHT TO HEXT • 

• CTLIIDBB III * 

• EXTEIIT • 

• » 



* RETURN • 

» TO CHLLBB * 

» * 



• * 

• HBITEB * 

• * 



* • 

* EXCP * 

* * 
« « 



«tIT 



* • 

* * 

* CLBtB BOFFEB • 

* * 



• REiatii * 

» TO C&LLEE * 

* * 



9 • 

> HEtDEB * 

* • 



• PUT UUBP • 

* COHHAHU, UAIB • 



«**•*•**«•••••*«• 



*****cs*** •«••••• 



••*••••••••*•*••• 



****!) 5********* 

* • 

• BBTUBN • 



174 BOS/VSE Logical Transients 



Chart FP. IJBEOJ - Cancel Message Writer (Part 1 of 3) 
(Refer to Chart 13) 



•••• 
* * 
» i» ♦ 



•**••*•*•*•**•* 



*****B1*** ******* 



•«*••••*******•«* 



**««*Ct ********** 



««««****•••**«««• 



• «««*£) 1 ********** 



***************** 



*•*««£ 1 ••»*****«* 



*•*•••*•»»*•**•*• 



«*F1******* 

* « 
SET LTA 

IMOICATOS 
TO ZERO 

• • 
«**»««*««*« 



*t***A2********** 



»«««**«****«**»** 



• BOVB SXaBOlIC • 
.(•UMIT IkflS lltO • 

* as6 0P71I • 



CHCLTESI .*. 



«-•-*-•-*-*.*-*.* 

.1* OUTPUT P80GR. *. 

•CHECK N£SSAe8S • 

* • 

**•***«•*•»*«**«* 



*. ILLEGAL STC .*. 



•*m*»**«** 



•****•****« 



*****j i*«*««***»* 

* * 

* HOVE nessAGE • 

* ososr TO * 

* OUTPUT A8EA * 

***************** 



•**•***••*•*•«*** 



. X* OUTPUT PHASE ». 

* NOT FOUID * 

* MESSAGE * 

*********««**«**« 



«***f2********** 

HOVE CANCEL * 
HKSSAGE TO * 
OUTPUT AREA • 

* 
«***«**«****«*** 



.•SUPERVISOR • 
•.CATALOGED OR 
*.IPL JUST .• 
*.RADE .* 



CAaSE2 

*****G3********** 

• FIHU THE • 

• APPROPRIATE * 

. ..X* MESSAGE TEXT *. 
•FOR THE CANCEL • 

• CODE • 
*»•***•*••«*•*«•* 



»i»*««y 2* ******* 

• BOVE 0P8JI 

• 10 MESSAGE 



*«****»*»»•» 



*F0 * 

• 32 *.; 



•••••J2^»*******^ 
•MOVE CONDITION • 

• CODE FROM • 

• LTl SAVE AREA •X. 
•IN OUTPUT AREA • 

« * 

*«««*«***««***«*« 



.•CANCEL *. 
.* COUE= *. NO 
. DEVICE NOT ...... 

•.ASSIGNED .• 



*****B<t **•••**••* 



*•*****•***«•*•*• 

• »*• I 

* * • 

* CO *.x. 



••*• 
TESTAP X 

••••*C4*******«*' 

• ADDRESS 

• PlBTiriON 

• COMRBG 

• 
*•****«••*••*••* 



.* HAS *. 
.* ATTENTION *. IBS 
►. ROUTINE .*.... 
*. CANCELED .* 



* RBPLACB 'JOB* • 

* HI 'LIA* III • 
OUTPUT ABBA *. 

* 'LGUIIB' • 

* • 
•*•*••••«»•«*«•*• 



■ X* 



NOAP X 

*****G1(*** ******* 

* MOVE JOBNAHB * 
*FBOH COMRES TO • 

• OUTPUT AREA • 

• •NAME* * 

* * 
***************** 



HOVESUB 

«*«»*p5»«»*««**** 

* BEPLACg 'JOB* • 

* al 'SUB' IN • 
. ..X* OUTPUT ABBA • 

* 'LGLINB* • 



****•«**•**«*««** 



H0VBSUB1 X 

***»«(i^«*«*«»*«** 

• BOVB TASK • 

• NAME TO * 

• OUTPUT ABBA * 

• •NABB* • 

• * 
•*•*•*•*••••••••* 



*****Hlt******^^^* 

* * 

* MOVE MESSAGE * 
*T0 OUTPUT AREA * 

* 'CAUSE* * 

* « 



• •••*jit***«****** 
*LOGGBBR FB* 
*-*-•-*-•-*-*-*-* 

* PRINT HF.SSAGE • 

* ON SISLOG • 

• AND SYSLST • 
**•***«******•*«• 



***»«•**•«•«**••« 



***»***••••**•*•» 







**** 








* 


* 








* JS 


♦ 








* 


• 








• ••• 




«****Kl(******** 


► • 






X 


*PRTPSll FU* 




H 










• 


SBTUIN 


* PRINT THE PSN 






• 


BB lit 


* HHEBB BBROR 






m 




• OCCURRED 






n 















Charts 175 



Chart FQ- IJBEOJ - Cancel Message Writer (Part 2 of 3) 
(Refer to Chart 13) 



» * 

» PRTPSH • 



* * 

• VBOQCHK ♦ 
« « 



t * 

• SVC£gB • 

* t 



****m*****«*«* 



•«••*•*••*••**• 



• POINT 10 • 

• Suva AREA OF • 

• THE FAILING * 

• TASK • 

• • 



•»»»*B2****«****« 

* HOVE SKELETON • 

• OF HSG 0S03I • 
*T0 OUTPUT AREA * 



««***«*« 



««***B3*****»«»«» 

* HOVE SKELETON * 
« OF HSG US04I * 

* TO OUTPUT ♦ 
» AREA * 

* » 



• BOTE • 
SKELETON OF • 



••*••••«••••«•«*• 



PBIPSH1 X 

* HAKE THE * 

* APPB0P8IATE • 

* PSN PRINTABLE • 



• « 

• HOVE HESSAGE * 

• 0S07I TO • 

• OUTPUT AREA * 

• • 



• HODIFt TO • 
**PROBLEH PBOGR.* 

• PSH' OR • 

• 'IIA PSN' • 

• * 



PRTPSH2 X 

*ONLIST FR« 

• PRINT HESSAGE • 

• ON SYSLST • 

• • 



* • 
» POINT TO * 

* SAVE AREA OF • 

• THE PARTITION • 

• « 



♦CONDITION CODE.* 
«AMD INTERUPIIOR* 
•CODE OF CAUSING* 
* INSIR^ * 



»«**«1)2********** 
» HAKE IT • 
« PRINTABLE AND • 

* MOVE IT INTO * 

* OUTPUT AREA * 
< * 



«*«*»lj2********** 
» HOVE TEXT OF * 

* INTERRUPTION * 

* REASON TO * 

* OUTPUT AREA • 



••»*«f 2********** 
« • 

• « 

• MODIFY ecu's • 

• * 



.X. 



LOGGING X 

«»*««G2********** 
*LOGGEB FB* 

* P8INT HESSAGE * 

* ON SYSLOG AND * 

* SYSLST • 



***««II2********** 



•****C3********** 

• GET ADDR AND * 

• SVC CODE OF • 

• CAUSING • 

• INSTRUCTION * 

• • 



*****D3******«*«* 
« RAKE IT * 

• PRINTABLE * 

• AND HOVE II • 

• INTO OUTPUT « 

• AREA * 



*«***li3»**«****«« 

• * 

• • 

• nODIFY CCM'S » 

• * 



•••••C4********** 



•*••••••*•«•••••• 



«**»*D4********** 



•••*•«*••••*••••• 



• HODIFY ecu's • 

• * 
« • 



««*«44i«**« *»*«««« 



*FP • 
* 3b* 



*«***J2********** 



*>>^« «•**** «**«««* 



176 DOS/VSE Logical Transients 



Cfaairt fR,. IJBEOJ - Cancel Message Writer (Part 3 of 3) 
(Refer to Chart il3) 



> • 


-• IS •. 
.« SISLSX •.IKS 


• •' 

• PICK OP ecu • 


» " • 


"•. """'^^ 


• ecu • 



•• ••• ••«•• ••••• 



•••*•••«•••••••«• 



.i. 



•••••««•••••*•••• 



X 



•••••0 1* •••••••*• 






oca AUM 
!■ CCE 



••••••••••*•••••« 



«*«»*B5****«***«* 



•••••*•••••••••«• 



•••• 
* * . 



C2 



•. 



CJ 



IS 



•• SISLSI •. IBS 

*. SISIST k .* I*. * CKD DISK .*.... 

•. MPB •• •- .* 

•- •• ♦. •• 

•. •• *. .• 

• IBS • ao 

Ix '. 

X 
TkBBDtlt X . .*. 

•••••02********** . Oi •. 

• • . .• IS •- 

• PICK DP ton • . i£s .* srsui *. 

• OP nPB COI • ......*. k» FBI DISK .* 

• • *. .• 

• • •. .* 
••*•••••••••••••• *. .• 

• «o 
**** . . 

• • . 

• B2 *.i. 

• • . 

•••• , . 

BLCCB X 

• • 

• BBL0C4TE CC3I • 
« ADOM IK CCB • 

• • 

• * 



•4. 



a 

iitt .*. 
Pi •. 

.* *. 

.* raaia. •. tas 



J. 

ei •. 
.* *. 

> .* IBSaiB. *. 
.•.TASK 'is JOB .« 



••••••*•«•••••••« 



X 



•••««p^********«» 
VPBIBT etf 

• -•-•-•-•-•-•-«-« 
•ODTPOr BESSIGB • 

• OB Sf SLSV • 

• • 



UXSKBTT 

,• 
(BS .* 



• ••••••«•••»••*•* 



•••••II2********** 



• ••••*«••«•«*•••• 



» HBTOBB to • 

• CALLBil • 

• ' « 



•••**j>l|***«««***« 

• HODIPC tXk • 

• • 

. * * 

..!• B2 • 

« • 

• PBXBf • 



•••••rit********** 

• • 

• lOkl) CCB • 

• BOCB IB • 

• «B«iISTBB 1 • 

• • 



• MiTOb* TO « 

• GkULtM « 

• • 



••**«BJ********* 

BBUCAIB 

*DDB. OF 

1ST CCB 



• src • 



• SVC lUJ • 



*• ••••••*• •••»••• 



•*•••( t********** 



»•••••«••••«••••* 



• BBIUilB to • 

• CBUBB • 

• « 



.1.. 

• ; « 

• *2 « 

• :: « 
•••• 



Charts 1177 



Chart GG. $$BSySBR - Set up a Write on SYSRES Operation; Move Label Cylinder Address to 
COMREG 



• « 

* tSBSISHB * 



TBST 
.ZBBO P.OB 
• .SYSIia.* 



• LOAD DISK 

• BDDB IBIO 

• BO AND STOBB ' 

• IN SEEK car 



• LOAD DISK 

• ADDR * 2 

• INTO BO 

• IND STOBB IN 

• SEtBCH CCN 



•••**EI ••**•***** 
« LO&O lODB • 

• OF SEABCH CCH • 

• INTO BO * 

• AND STOBB IN • 

• TIC CCB * 



«****F 1 •*•»•••••• 

• SET UP BEAD * 

* CCH NITH iDDB * 
*0F BOFFBB ABBA • 
•BND STORE SEEK • 
*CCH ADOB IN CCB* 



SET DP 
TO BBTRt 
10 TIHES 



* LOAD CCB 

* A DOB ESS IN 

* REGISTKB 1 

• 



****j )••••< 



• * • 



TENTH •. 
BBTRI 

.* 

♦ •- • • 
• NO 


IBS 


X 

BEIBI * 

EOF .*' 
• * 

*. .* 
• HO 


• l 


• .1 


....r 



•••• 
• D2 ».X 



• ••• 
LABIIV3 

»***«02********* 

• LOAD ADOB 

• OF COHREG 

• INTO B2 

• AND ISSUE 

• S»C 33 *D3 



• 03 
BLOCKS BB6INNIN6 AT 
LABHV3 BBPBESBHT 
AN EXPANSION OF THB 
STSIB HACBO. 



• LOAD ADDBBSS • 

• OF COHBBG • 

• INTO BB6 « • 

• • 



•••••C«*********> 

• SET REG 3 

• TO LOGICAL 

• IRANSIBNT 

• KBT fALDB 
* 



••DH******* 

• SET X«80' » 
*IN FLAG BASK * 

* POSITION • 
• OF PIB • 

• * 
••••••••••• 



». 



E2 

.* HAS 

HIGHEST 

PABTITION 

.BEEN PRO-. 

».CESSD.* 

*. .* 

• YES 



••••F2********* 

• SfC 11 ♦ 

• EXIT TO • 

• PBOBLEB PBOG * 



••***F3********** 

• • 

• GET AND SAVE * 

• REIT KEX FOR • 

• EXBCUTION • 

• • 



••••«G]******«**» 

• GET PABTITION « 

• COHBEG AND * 

• HOVE LABEL * 

• DISK ADDBBSS • 

• TO COHREG • 



• ••* 

• • 

• D2 * 

• • 

• •** 



•• cohpLetb 



•«»**K2********** 

* * « • 

• • SVC 7 • • 
.X» • HAIT * • 

» * • • 



• *»• 

* * 

• B2 • 

« « 



178 DOS/VSE Logical Transients 



Chart GJ- $$BCCHHR - Core Image Directory Scan 



•**»A1«*«****** 

• * 

• S^BCCUHB * 

• * 
*************** 



* * 

* * 



« « 

• GEI ADDRESS * 
» or HAS • 

• LOAOLIST * 

• * 



FB»-S«SaES .♦.. 



FIBSI 
CALL TO 
HODOLE 



LUUCHECK X 

*«*«*C2** ******** 

* IHSERT DEVICE * 

* AUDBESS OF * 
♦SJSBES. SYSREC,* 

* SYSLOS * 

* * 
***************** 



.FBAPHASE X 

*«***C3********** 

* CONVEST PHASE * 

* REL. BLK. WO. • 

* INTO ABSOLUTE * 

* FBA BLK-NO. » 



********* 



******* 



«*CI<******* 



«*««««*»*** 



* J2 • 

• * 

*•** 



**«**Dtt********** 
» • * • 

* * CALL RAS * * 

* * (S»C 33) • • 

* * • ♦ 

* * * • 

»««««4i 4c* *•**«**«« 



* SET I =H0. * 

* OF BAS • 
*LOA0LIST SLOTS • 

* * 
*****«**«****»*«• 



* COHVERI PHASE * 

* TIB IltO * 

* CC.HH.R * 

* * 



.* HIS 
.IKS .* STILL 
....*. ACIHE 



«**»*f 2********** 



*«**«•*«*«*•***«* 



RHSPOST X 

* POST RAS • 

• ACTIVE III » 
•EACH PABTITIOH * 

• COHBEG * 

*****«••••* 



* GET SCXL-DI8 • 

* PHASE BNTRI * 

* FOR SSRASTZX • 

* * 
•«•*•**••**•«•*•* 



* Gl *.X. 

* » • 

*«*• 
BXITt X 

*«*«»GII«***»*»*«» 

* « • * 

* • EXIT * • 

* * (SVC 11) * • 

* * * • 

* * * « 
***•••**•••••«••• 



*«•••***••*•*»»*• 



***« 

* J2 • 

« * 

• *** 



**** 

* * 

* B4 • 

* • 
• *** 



****H<t********* 

* * 

• BEIOBN • 
> • 

**«******«***i«« 



Charts 179 



Chart GK. $$BAfTFO - FCB Load 
(Refer ?:o Chart 15) 



Initiation 



» * 

• SSBATTFO • 

t * 



•**»*B1********** 

* ESTABLISH • 
*AODHESStBILITY • 

* F08 PHASE * 

•connuNicATioNS * 

* ASEAS • 



* DETEBHINE • 

* LOGICAL UNIT * 

* CLASS ♦ 

* • 



*****B<t********** 

• • 

• CALCOLATE POB • 

• ADDRESS AND * 

• STORE IT IK • 

• INFAHEA * 



* • 

* HOVE PHASE » 

* NAME TO • 

* INFABBA • 

* • 
***************** 



♦♦***C2********** 
« « 

« ESTABLISH « 
•ADUBESSABILITX « 
» FOB COHBBG • 
« « 



DEVICK 

WITH 

FCB 



• nOVE FORHS MO » 

• TO IHFABBA • 

• SET FORHS * 

• INDICATOR • 

• • 



•»*«»l)2******««** 
•FIND AND STORE * 

• USEE) REG 15 * 

• SAVE A!(EA • 

* ADDRESS * 

* * 



•«***g2*«******** 

• » 

• OBTBRRINB LOB * 

• ADDRESS OF * 

• SPECIFIED ♦ 

• SYSIXX • 



• fi * 

* * 
• •*• 



•HOVE LPI VALUE * 

* TO INFARBA • 

* SET LPI • 

* INDICATOR * 

* * 



.vpROGBAHHEtt *. IBS 
f. LOGICAL ...... 

♦. ONII .♦ 



PFSUNIl' X 

*****G2*** ******* 

• OBTERHINE • 

• CORRECT LUB • 

• DISPl/2 VALUE • 

• FOR SISLST * 

• OR SISLOG * 
m*** ************ ^t 



*****QJ********** 

* OBTEBHINE * 

* CORRECT LOB * 

* OISPL/2 VALUE * 
*FOR PROGBAHHBB • 

* LOGICAL UNIT * 
***************** 



*****flt********** 



•••*•••*»***••*«* 



****Qlt********* 

* FETCH * 

* JJBATTP3 * 

* • 
***•*•••***•**« 



***••••*••«•• 



****S5********* 

• FETCH » 

• SSBATIF2 • 

• • 
*************** 



*****J y********w 



**************** 



***************** 





• JJ * 

* • 




**** 






I 




.*. 

J2 *. 

* *. 


.PFHE X 

*****j J*** ******* 

* * 


LUB *. NO 
ASSIGNED .*.... 

*. .* 


* INSERT PROPEB • 

* RETURN COOK • 
*I» OSES BEG 15 * 

* * 


*. .* 


*«*•»******•****• 


• ItES 





•***JU********* 

* RETURN * 
» TO USBR * 

* * 
••*««**•******* 



.* PRINTER A *. tiS 
SPOOLED .*.... 
*. DEVICE .* 



**KJ******* 
*SET SWITCH * 
> IN INFARBA 

TO INUICATB 
» PRINTER 
* SPOOLED * 



180 JOS/VSE Logical Transients 



Chart GL- $$BArTF2 - LFCB Macro Execution for PRT1 
(Refer to Chart 15) 






» » 

• J»B«TTP2 * 

t * 



♦TEST SPSCIFIKD 
* PHASE FOR 
♦COBBECI CODING 

* 



* imxIULIZB • 

• PHASE AND • 

• BEIOCATB ecus * 

* * 



*•••«•* 



.* SBBOR 
. IN CODE OF 
*.FCB PHASE. 



DOSKIV 

***BS*** 
LISIIO 

. ..X SKIP ID 
I * CHANNEL 1 



«»•*««•»•*•••»«•• 



* CONtfEHT CUU • 

* AS IM PUB TO • 

* FBINTABLE • 

* CHABACTEBS • 

* * 



.* PRINTER •. IBS 
. SPOOLED BT .*.... 
•.POVEB/VS -• 



•••CH************ 
LOGIO GH 

SEND HSG TO 
» OPERATOR ♦ 
BEAD REPLY 



•**0 I ******•*•*•* 
LOAD 
• DIKECIOBK * 
ENTRY OF 
* FCB PHASE » 



BEAD FOSRS 
• CONTROL AODR • 
EtEG AND OLD FCB 



LISIIO aa 

PRINT VEBIFICt- 
« HON HSG SKIP* 
TO CBAN 1 



.* PHASE IN 
'. CORE IMAGE 
*. LIBRARY . 



NOTFNO 

»«E2******* 
*SEI ElilURN « 

• CODE X> 18' 
. ..X* INTO USEB 

* REG IS 

* < 



* « 

* COUNT AOX • 

* FCB FOR • 

* ALIGNHENT * 

* * 
***************** 



****»BI«**«******* 

* * 
« PBBPARB • 

* HBSSAGE TO * 

* OPERATOR • 



PBINIEHD X 

***E5«*********** 
LOGIO GH 

PBIIZ END 
• BBSSAGE ON • 
SYS LOG 



.*. INVPHASE 

Ft *. »*f2******* 

.* *. 'SET BBTORN • 

» PHASE *. NO • CODE X'1C> • 

LENGTH .* X* INTO DSEB 

• . COBBECT •• X • REG 15 * 



,« 



••••*•***•* 



♦ *»• 
« • 

* F2 * 

* « 



• **• 

• * 

• C« * 
« « 

• ••• 

« * 

• G» • 

• • 



**F5******* 
•SET BSIUBN • 

• CODE X»00' 
• INTO USEB 

• BBG IS 

* • 



* GET COBBECT * 

* START ADDRESS • 
♦OF VERIFICATION* 

* HBSSAGE * 

* * 



***G3************ 
LISTIO GH 

LOAD ADX. FCB 

• AND SKIP TO • 

CHANNEL 1 



• *«Gi|************ 
LISIIO GH 

PASS SPECIAL 
* BBCOBD HUH • 
LFCB INFO 



•***S5********* 

• BBTUBH TO * 

• USBB • 

• « 



LOADPHAS I 

LOAD NEH 
* (BEQOBSTED) 



*****««•***«*«*** 



* ACTIVATE • 

USEB EBBOB 

ROUTINE IN 

CCB 

t * 



••J2******* 
♦SET BETORN • 
• CODE X'OM» 
INTO USEB 
» REG 15 
♦ « 



LISTIO GH 

»-♦-♦.-*-♦-♦-♦-«-* 
LOAD FCB 



«««♦♦♦♦♦♦♦♦♦♦*♦♦* 



.« DOBS ♦. 

• SPECIFIED 

LPI VALUB 

*. AG»BF . 



♦♦♦♦K2****^»^** 

* BETUBM TO 4 

• USER • 

♦ 4 
♦♦♦•♦♦♦•♦♦♦•♦♦• 



♦ ♦♦♦ 

• ♦ 

• Bl ♦ 

• ♦ 

♦ ♦♦♦ 



Charts (181 



Chart GM. $$BATTF2 - LFCB Hacxo Execution Subroutines 
(Refer to Chart 15) 



• « 

« LJSTIO • 



• « 

• LOGIO * 



• POT USER « 

• DNII INTO • 

• CCB • 

• * 



. * PBIHTBR 
. SP00L8D BI 
*.POHEB/«S . 



• BETDRR TO * 

• CtLLBI • 

• • 



• * 

* STOBE CCI * 

• ADDRESS IM • 
» CCB • 

* * 



PUT DNIT 
OF SISL06 
IITO CCB 



••*««g2******«*** 

• • • • 

• * * • 

• • S»C • • 

• • • • 

• • • • 



«««*«F2********** 

• • • * 

• • H»IT POB • » 

• • I/O • « 

• *CONPLETIOII • « 

• • * * 



**»*Q2********* 

• BETORB TO « 

* CALLER • 

» • 



182 DOS/VSE Logical Transients 



Chart GN- $$BATTF3 - LFCB Macro Execution for 3203 and 5203 
(Refer to Chart 15) 



* • 

» »»B*TTF3 « 



•••««B1********** 



**««***««**«**«** 



* « 

* COMVEBT CUU * 

* AS IM PUB TO • 
» PRINTkBLE * 

* CHkRACTBaS • 



* * 

* * 

* RELOCATE ecus » 

* * 

* * 



•••B2************ 

«I.OA0 DIRECTOBI * 
BMTBI OF 
« FCB PHASE • 



' PHASE III 

COBE INAGE 
». LIBRARY . 



• • 

• nOVB PORB MO * 

• TO MESSAGE • 

• AREA • 

• • 



****«B 1«««*««««** 

* « 
•HOVE LPI »ALUE • 

• TO RESSAGB • 

• AREA » 

* * 



LENGTH OF 

PHASE 

. COBBECT . 



«***«B2********* 

« 

• GET ADDRESS 

•OP VBBIFICATIOM 

« HESSAGB 



*»**»P2********«* 
« * 

« STORE DEVICE * 

• SPECIFIC FCB * 

• LENGTH III ecu » 
« • 



• FCB IHAGB 

***m* *********** 



MOTFND 

**C3***«*** 
*SET RBTUB* 
» CODE »• 18* 
. ..1* INTO USER 
♦ REG 15 



*•••«•«••** 



INVPHASE 

••D3******* 
•SET BETURI • 
» CODE X" «C« • 
...A* INTO USER 
X • REG 1& * 



•••**•«•••• 



«««« 
HACRBT 



*••• 






**** 


« • 






* * 


• B* * 






» Bb • 


» • 






• • 


•••• 






• ««« 


X 






X 


OPHESS .*. 


OOSKIP 


.♦. 


B<» ». 






m *. 


• • •. 






• IS •. 


.•FOBHS=XtXX ». NO 




,•' 


PRINIBB •. IBS 


•• SPECIFIED .*.... 


•• . .X* 


«, 


SFOOLBD .*.... 


*. .• 




• • • 


». •• 






*. •• 


• • .* 






*. .» 


* (BS 






• NO 


***• 








• * . 








» c« *.x. 








• * . 








•••• 








BAL X 






X I 


**»C<I*****«****** 




**>c&****>******* . 


LOGIO GH 




LISIIO GB 


«-•-•-•-•-•-•-«-• 






SBND NSG TO 






SKIP TO 


• OPEBATOB * 


* 




CHANNEL 1 • 


■BAD SBPLY 










••••••*«*••••*••• 


• 






!x*«.*«*»*..r 


• 





• RETDBN TO « 

• USEB 4 

• « 



* * 

* FJ «... 

* * . 

• •** 

X 

•DEACTIVATE • 

• DSBB ERBOR • 

* ROUTINE IN 

• CCB • 

* • 

•••«••••••• 



•••••E<l^**«*«*^*' 
• 

• PREPARE 

• HBSSAGE TO 

• OPEBATOB 
« 
•••••••*••«••••• 



•••^^•••••* 
LISIIO GB 
•-•-«-•-•••-•—•• 
PRINT 
• fBBIPICATIOl • 
BSSSAGB 
•••••••*••••••«•• 



.• PBIMTBB •. XES 


.» 


NO 


*. SPOOLED BT ...... 


*. 


CHANNEL 


•.PONEB/VS .• 




FOUND 



PBINTBND X 

***fi9*»9*»»m»»m» 
losio ea 

•*•-•••-•-«-«—•—• 

PRINT END 
• HBSSAGE ON • 
SXSLOe 

••••••«•••••••••• 



••GS*^*^*** 
•SBZ BEIURN * 
> COOK X*00' 
IHTO USEB 

f Bse 15 

* « 

*********** 



• RBTU8N TO • 

• 0S8B • 



•««••••••«•••*••« 



•••J 2* ••***••«*** 

LisTio sn 

•*«-•-«-*-•-*-«-• 
ALIGN FORMS 
• TO LINE 1 • 

>•••••••*••••*«•• 



**ji»****** 

• • 
NOP 

INSTBUCTION 
lOEBR 

* * 
*********** 



««*J <!•«•••••••••• 

LISZIO GH 

•-•-*-•-•- •-•- •-• 
PASS SPECIAL 
• BBCORD NIIH L 
FCB INFO 
•••••«••••*•*•••• 



••K2^^*^**« 

• ACTIVATE » 
USEB ERROR 
ROUTINE IN 

CCB 

• 4 
••••••••*•• 



LISIIO GH 

«••-•-*-•-*-•-*•• 

LOAD REQUESTED 

• FCB IHAGB I 

RTO FCB 

•••*•*••*•••*•••« 



• • 

• F3 * 

• * 
**** 



Charts 183 



Chart KA- $$BOCRTA - CBT Root Phase (Part H of 3) 
(Refer to Chart 16) 



• * 



» « 

• SSBOCBTk * 

« « 



«*«*C2******«*** 

* 

SAVE CHJLIIMEL * 

SCHEEULE8 • 

BEGISIEBS • 

* 



SAVE • 

lOS • 

BkSE • 

RBG • 

« 



««**E2******>*** 

INDICATE * 

CBT BOSX * 

AID SET • 

DEVICE • 

BOSX • 



***«»F2********** 

* * 

• SAVE « 

* OBIGIHAL * 

• BEgiD * 



«*»*G2********** 

• 

POT CHT » 

BEQID • 

TO CHANQ • 



««***H2********** 

• GET * 

• AODBESS * 

• OF CBT • 

• BLOCK » 

• * 



*»*»«J2******«**« 

• PUT PIK * 

• TO CBT • 

• BLOCK AMD • 

• SAVE TIK • 

• IN CBTSAV • 
mmm* ************* 



***************** 



****B3********* 



••«*•«•••••••*• 



••••«C3****«***** 

• • 

• SAVE TASK • 
*BEQUESIOR-I0 EN* 

• CBTSAV • 
« • 



*****D}*******m** 



••**»«•**••••*••• 



*****fi*** ******* 

* * 
•SET TIK AND PIO* 
•AND SAVE PIK IN*. 

* CBTSAV * 

* « 
***************** 



• GET ecu * 
I* ADDRESS * 

• FBOa CAN * 

• • 
••••«•••••••••••* 



•••••B«********** 
« « 

» POT CCi • 

• ADDBBSS * 

• TO NEXICCN * 

• • 
«*•••••••••«••••« 



•••••Clt^********* 

• • 

• CLEAB SBVEBAL * 
•BITS IN CITCSM * 

• AND III CBTCCB * 

• * 
•••••••••*••••••• 



*****JiH********** 

* * 

* SET OP PIOPBB * 

* LOB DISPL. * 

* IN CBTCCB * 

* • 
••*•••••••••••••• 



.* IS TBIS 
A POTB 
•. BEQUEST 



•••••Fl>*^*^****** 

• • 

• SAVE POTB * 

• INDICATOB IN • 

• CBTCCB * 



••••*B5****^^**** 

• • 

• CISAB • 

• ATTSanON • 

• BOFFBI • 



••••• 
•KB • 
* A2* 



•»*•••••< 



•••••••• 



.* IS FIRST «. XES^ 
COHBAND .*.... 
•. A TIC .* 



•••••||ll«**^«***»* 



***************** 



• SKt IIP CSN * 
.X* ACCUBDIMG TO • 

• PBOSBAB CHECK • 

• • 
••««»•••••••••••« 



•••••IJS^*«****«*« 

• • 

• • 

• CLEAB CBINEXT * 

• • 

• • 
«•«»••*«*•«•«•••• 



**Ji******* JH *. 

* SET • .• ». 

INITIALIZATION* t^S .* *. 

FLAG. CLEAR *l *IHITIALIZAIION.* 



••••• 
•KB • 
• DJ* 



«***«K %*****»** 

* HAKE 

* INTERRUPTED 

* TASK 

* DISPATCHABLE 
• 

*••*••*• 



• NESSASB •. 

FROB SYSTED .* 
». TASK .* 



» SELECT BUTE 



*•**•»*•*•• 



* RETURN • 

• VIA REG6 * 

> « 

•*••«••***••••* 



>••••«•• 



SET OP * 
SXSCOH * 
POINTER * 

••••••*••••••*•• 



184 DOS/VSE Logical Transients 



Chart KB, $$BOCRTA - CRT Root Phase (Part 2 of 3) 
(Refer to Chart 16) 



•K» * 
• 85* 



• AS • 

* * 



• RESET HSITE • 

• MXTHQOT CAB8. • 

• BETUBM SWITCH * 

• « 



SET OH DBIIE • 

VITHOUI • 

C4BBIAGB • 

BETUBN • 

INDICAIOB • 



.* CCH CHAIH *. 
. TO BE DIS- . 
• .COmiNUBD.* 



* * 

• G1 • 

> • 
• *•• 



• « 

• GET NEXT CCM * 

• A0D8ESS PBOH • 

• NEITCCil • 

• « 



«***«C5********* 



««•««*«**< 



•ItC • 



STUBECCN X 

•••»*£2********** 



••*•••••*•*•***•* 



• SET CS» TO • 


MO .• IS ecu OH 


m 


* BBFLECT 'X... 


*. UOOBLEHOBD 




• PROGBAH CHECK * 


•.BOUMDARK . 


* 


* * 


•• .* 




••«••*«•«•**•••«« 


*• .* 
• IBS 




•••* l 






* • . 






• 61 '.X. 






• * . 






• »•• 






SBTPLAG X 







•••••G1*** ***•••• 

• • 
•BESET CBT-rLAG • 

• AND ERSOH • 
•INDtCATOB BITS • 

• • 



• CLEAR CRTMEXT 

* 
* 



•••*J1********* 

• FETCH • 

• SSBOCRTG * 

• « 



«**«*e2********** 

* * 

• CLEAR CRTNEXT • 

* « 

• * 



IS THIS 

A TIC 
COHflAHO 



*m ************** 



*****gi********* 



**************** 



ATIBNTIOR 
. PENDING . 



*****QJ********* 

* INDICATE 

* tSBOCBTA MAS 

• INTBRBOPTED 

• PHASE 

» 
**************** 



• FETCH • 

• (SBOCRTK * 

• « 
*************** 



IS THIS 

A TIC 
COMRAND 



* « 

• POINT TO ♦ 

* CONTINUATION • 

• CCN • 

« • 
************ 





• HO ♦»••• 






»KC * 


• *** 




• At* 


* * 




• * * 


• J3 •... 




• 


* * . 




X TICHT 


**** . 




*. FETCMO X 


J2 


♦ , 


*****ji********** 


• 


*, 


* * 


BAP 


AROUND*. YES 


* PROVIDE FOR * 


UPDI 


ITIHG .• 


.X* PROPER CSN • 




.* 


* « 


*, 


.» 


• • 


• 


.♦ 


***************** 



CRTEOJBT 

»****fH********** 

* GET AODBBSS * 

* OF CHANNEL • 
...X* QUEUE AND • 

•CHANNEL BUCKET • 



*•*•»•«*•**•****• 



•••••G ■••••••••••• 

•DESTROY DEVICE • 

• AND CHANNEL • 

• AODBBSS IN • 

• BUCKET • 

• * 
•*••••••••»•»•••• 



••&&•*•••*••• 
FETCH • 
««BOCBTZ • 

« 
*•«•••«•••••• 



•••••Jl|^***^^**** 

• SET UP PROPER • 

* STATUS BYTES * 



•••••••*•*••«••** 



.» NBITE • 
HITHOUr 
CABBIAGB 
. RETURN 



****l!ii********* 

• FETCH « 

• tSBOCRTU • 

• « 
*«•«*****««***« 



• •*••£■••*••**•••• 



•**•••««••••••••• 



Charts 185 



Chart KC- $$BOCRTA - CRT Root Phase (Part 3 of 3) 
(Refer to Chart 16) 



mi 

BSBOR 
FOUND 



« « 

» SEr UP ST»TUS • 
•BITES AS SIOS£D* 
• IH CBTCCB • 

« * 



EBB08 DUE *. 
TO UNIT .« 
. CHECK .• 



«»***02********* 

* SET ON DUHRK 

* SENSR 

* INCICtTOR 

* 



NOUNITCH X 

**»»*E2********** 

• BESIORK * 
« CHAHNEL-QUEUB * 

• ENTBY TO • 

* BEFLECT USE8 • 

* ENTBT » 



«*X)*«*«*** 



*•**•*«*«*« 



» SET UP * 

» INTERBUPT » 

• INFOBHATIOM * 

• m LOW CORE • 

» « 



«****C3********** 

* * 

• PROVIDE » 

• EXIT * 

♦ INTERFACE « 

* « 
***************** 



****03********** 

* 

DETACH • 

CBI • 

TASK • 

* 

**************** 



****E3********* 

♦ EXIT TO • 

♦ I/O INTERRUPT • 

♦ HANDLER * 

*************** 



.* ecu ON ». 

PBOPEB 

•.BOUNDABI .* 



»**««BI|********* 



•*•*•*•**•«*•*•• 



TIC 


*. IBS 




AFTBB TIC 


* 




«. .* 






*. •• 


X 


• NO 


*•*•« 




*KB * 


, 


* P1« 


X 


• * 


*•••* 


« 


*KB • 


PBOGCHCK 


• E2* 







186 DOS/VSE Logical Transients 



Chart KD, $$BOCRTB - Hard-Copy Disk ERP (Part 1 of 3) 
(Refer to Chart 22) 



* * 

* SSB0C8TB * 

* • 



* * 

« SET OFF • 

• DISASTER FLAG • 

» IM CCS * 

« « 



KABNXIIS *. lES 
AMD/OB .*.... 

. OTEBLAY .* 
*.FLAG .* 



« CLEAR 

(• HESSAGB 

• ABBA 

* 



» GET FIBST • 

* PBOTBCtEO • 

• SCRBBil LINE * 



•*F1**«**** 

• « 
SET OFF 

PROIECIIOII 
FLAG 

* • 



•»«*»G1 **••*••••• 
•OPD KF» 

• GET VEXT *. 

• PBOTBCTSD • 

• SCRBBR LINE • 



REFERENCES 
TO KDn2: 
KEB2, KBH1 



• *** 

* « 

* H2 • 

* * 



.X. 



* * 
« SET SYSLOG 10 * 

«* IN FRONT OF • 

* MESSAGE • 

* « 



««*«*J2******«*** 
« * 

• HOKE HESSAGii * 
« INTO SCREEN « 

• BUFFER • 
« * 



*««*K2********* 

• FETCH * 

• tSBOCBTG * 

• • 



LINE 

•ONELINE KE* 

...I* GET A FREE * 
* HESSAGB LINE • 



••*•*••***«*•«••« 



• SET ON LINE 

• PROTECTION, 
♦INDICATE E-T»PB 

• MESSAGE 



«»«**F3«*****«*« 

* INSERT 

* PABTIIION AND 

* TASK ID 

* 



REDISPLAI ...... 




*. HOPE .* 




•• .» 




». .» X 




• NO •«*»• 




• ItE • 




* AJ« 




* * 




. • 




X KOSPLAX 




.». HARN .♦. 


H3 *. 


HU *. 


.* *. 


.» *. 


* HARD COPY *. NO 


.* BARD COPY *. NO 


OTBRLAT BODE .* 


.X*. WARNING FLAG .*.... 


*. •* 


•• SET •• 


• • .* 


». •• 


•. .* 


•. •• X 


• YES 


• YES •••*• 




•KB • 


, 


• A1» 




♦ • 


^ 


» 


, 


INCOBRL 


X 


X 


**«J3****«****« 


••***jll*«*«**»*«« 



•RESET HARD COPX^ 

• NARNING AND • 

• OTEBLAY FLAGS • 

• • 



•»***K3*****»***» 



•••••**•••••*•••• 



•GET AOOBBSS OF • 

* APPROPSXAIB • 

* MESSAGE • 

* « 
•••••*•••••••*••• 



Charts i187 



Chart KE- $$BOCfiTB - Hard-Copy Disk EfiP (Part 2 ot 3) 
(Refer to Chart 22) 



***** 

•KO • 
• H«* 



***** 
•KO • 
* GJ* 



*****B 1********** 

• RBSET FLAG * 

• IH0ICATIN6 * 

• OHBECOVBRkBLE * 

• EBB08 * 

• * 
*************i*** 



****** 2********** 



***************** 



**B2******* 

• BESET ♦ 
UABS COPT 
OfEli AND 

EBBOB FLAGS 

* 4 
***•*•*•*•* 



***** 

•KO * 
• H2* 



BESET 
REDISPLAT 
nOOE FLAS 

r * 

•••*•**••** 



.• *. IBS 

*.IRTERVEMTIOI .*.... 
• .BEUaiBED .* 



**D1******* 


* • 


* BESET HA80 • 


* COPY OPEN • 


* mOICATOB * 


• • 


••**• 


I***** 


**•* 




* * 




• El *.X 




* « 




**** 




LIIB2 X 


•*••*£ I********** 


*ONELIIIE 


KB* 



*-*-*-*-•-*-*-•-« 

• GET A SECOND • 

• MESSAGE LINE • 

• • 
***************** 



*****F 1********** 

* • 

* INDICATE * 

* PROTECTION ON • 

* AND CONTINUE * 

* * 
**•***•*******•*• 



****G 1********** 

NOTE HESSAGE * 

IN FIBST • 

LINE * 



*****H 1********** 

* * 
*PBOVI0E SECOND • 
*LINE NITU SENSE* 

* INFO. AND CSH • 

* • 
***************** 



*»** 

• * 

• D2 *.X 



«*D2******* 

* * 
*SET ON FLAGS * 

* FOB SSbOCBTG * 
* AND -H * 

* • 
•**••*•••** 



**E2******* 



*********** 



***** 
*KD » 
* K2* 



••**Aii********* 

* GET FBSe * 

* SCBBEN • 

* LINE * 

•*•***•******** 



* PBOVIDB FOB • 

* SBABCH • 

* ABGOMENT • 

* * 
*••••*•**•*•••••• 



-*-*-*-•-•-•-*-* 

GET FBBB SCI • 

GNTRI • 

* 
**************** 



*****DI|********** 

* DEFINE * 

* BESPECTITE * 

* SCREEN LINE • 

* ADDBBSS • 

* • 
***************** 



****gll********* 
« * 

• BETORN * 
> • 

*************** 



188 DOS/VSE Logical Transients 



Chart KF., 3>$B0CRTB - Hard-Copy Disk ERP (Part 3 of 3) 
(Refer to Chart 22) 



• SEARCH SCT • 

• STRING • 

• « 



• PROVIDE • 

• kDDBBSSIMG • 

• REGISTERS * 

• 4 
• ••* * 



• CI •. 

« ♦ 



.•APPROVBIATB*. NO 
•• SCT EHTBT -•... 
*. FOUND .• 



»*«*1I2****«**** 

• UPDATE « 

• STRING • 

• • 



m****C2********** 



>••*••***•«* 



t • 

• RETURN * 

» • 



STRING END 



HESSAGE 
EXCEEDS 
SCREEN 



•INDICATE SCREEN* 
.X* FULL AND ONE *. 

• LINE PROVIDED * 

• • 



««**«g4«** «**««*• 

* « 

♦ CLEAR FIRST • 
.X*SCREEN LINE AND* 

• SCT ENTRlf • 

• « 



i**««F 1**«««*«««* 



•*«•••*•••*••*•<* 



F2 «. 
.•SECOND •. 
U .* LINE 

.«. NEEDED AND 
». FULL 
•SCREEN.* 



• CLEAR SECOND • 
.(•SCREEN LINE AND* 

• SCT EHTRI • 

• * 



• »«»FI»***^***** 

* * 

• BETORH • 
t • 

••*••*«**••«»*• 



•***G 1******»*« 

• FETCH » 

• StBOCRTQ • 

• • 
***««***«**«**« 



****G1*«^****^* 
> 
• RETURN 

*******«4t*****« 



Charts 189 



Chact KG. $$BOCRTC - Write Processor Part 1 (Part 1 of 4) 
(Refer to Chart 17) 



• * 



• • 

• S«BOCRTC * 

• « 



• ••* 

* • 

* B2 • 

* • 



.DUCtiEX X 

»****B2********** 
»SKlPISt KK» 

• HEUEF. LINE • 

• STATUS IF » 

• •KEIII)*SKIP' • 



•DOCCEX^ 

•SEARCH KJ* 

• GET FIRST • 

• LIME OP • 
•CUKRENT RSSSkUE* 



• GET FREE • 

• (lESSAGE AREA * 

• LIME » 



* • 

• SET OM LIME * 
• PROTECTIOM » 

• FLAG • 

* • 



• INDICATE * 
» CONTINUATIOM » 

• LIME IF • 

• NECESSARY • 

• • 



* « 
>*GET ADDRESS OF * 

• FIRST CCM TO • 

* BE PROCESSED • 

• * 



«*««*B1 •*•«•«•««' 



••*••••••**•••*• 



•RELOAD CURRENT * 

• SCREE* BUFFER * 

• ADDRESS AND • 

• SCT POINTER • 

• • 



« * 

*RESET ALARM/NOP* 

• AND READ-CCW * 

• INDICATOR * 

• • 



DEFINE 

HESSAGB 

TYPE 



****E2********* 

* FETCH • 

* SS60CRTG * 

* • 



• • 

• GET CCM DATA * 

• ADDRESS AMD • 

• BYTE COUNT « 

• * 



.* ANY DATA «. 

TO BE 

*TRAMSF£BRRO* 



• • 

• JJ « 

• * 



* FETCH « 

• SSBOCRID * 

» • 



BliFBaENCF.S *. .* 

TO KGJ1: *. .* X 

KNH&, KJB2 • YES »•♦•• 

•••* . «KJ * 

» * . • A2« 

* • •.X. • • 



• YES •••• 
* * 
» Hi • 

X • • 

•••• »•*• 

• * 

• Ai • 

• * 





•«***U3*»»**»**** 




• TRANSFER DATA • 




• INTO SCREEN • 




•BUFFER. UPDATE • 
• ADDRESSES * 




♦ • 






REFERENCES 


••*• '. 


TO KGJ3; 


* • . 


«HF5, KJG2 


• J3 *.X. 


«•••• 


» • . 


* • 


• •*• X 


* •• NOBOKE ••• 


• • 


J3 •• 


* 


.• ♦. 


^ 


.• CHAINED *. MO 




.!♦. ecu •••... 




*. .* 




•• .* 




•. •• X 




» YES •••• 




• • 




• B2 • 




X • • 




«•**« *••• 




• KH ♦ 




• AJ» 



190 DOS/VSE Logical Transients 



Chart KH. $$BOCRTC - Write Processor Part 1 (Part 2 of 4) 
(Refer to Chart 17) 



• AS • 

« « 



* • 
« » 

* GET IIEXI ecu • 

* * 



* I.. • • J. r ur \.t^m » 
•IITO iOBK AB£A • 



**•«*«««««*«••«•* 



• >*•• 

• C2* 



»*«***«****««**« 



• *•« 
* 
«5 • 



••••»D2******»»** 



*««««*«*•*•**«**« 



**«B 3* ********* 



***************** 



**«* 

* « 

* D« * 

* • 
«••* 



**«**p1« ***«•«*« 



******«««*«*«**** 



• »** 
8ZPEAT2 X 

*****0l)******** 



«***«♦*«**«««**** 



DOCABX X 

****•£«*••**•**** 
•SKIPISI KK* 
•-*-•-*-*-*-•-«-• 

• BEOBF. LIIE • 

• STATUS IF * 

• 'BEAD*SKIP< * 



• •«*Fl|****«**«* 

* FETCH * 

* *$BOCBTA * 

* * 
*••••**••**•••• 



.* LAST 


*. MO 


*. •BEAD* CCH 


••. ••• 


*. 


« , 






•• ••' 


X 


• IBS 


• •••• 


«•«• 


• KG * 


•KJ * 


• 03* 


* k2 ••X. 


• • 


* * . 


« 


•••• 


XFBI 


BBAOCRO X 




••••*05*«***»»«** 


* 


• 


• SBT RBAO-CCII 


• 


* IHDICIIOB 


. ■• 



•*»•*•**••••••••• 



.• LAST BEAD •. NO 
>. CCM IM .*... 

*CHAIIilBL fCa* 



« G1* 

* • 

BEPEATO 



•••«*S5****»««*«* 
« « 

* SIOBB • 

* BBSIOUAL • 

* COailT * 

* • 
**««**««««••*«*«* 



•••««HS*»*** 

* « 
« IHOICATE • 
« IBCOBBECI • 

* LBIGTil IF KEU. *' 

* * 
«*«*««*«««*•««•«« 



*•*«• 

♦ KG • 

• J1» 



Charts 191 



Chart KJ. $$BOCfiTC - Write Processor Part 1 (Part 3 of 4) 
(Refer to Chart 17) 



A2 *. 






.* • 






.» 


*. YBS 


• SEARCH set • 


. READ CCH 


•*.••• 


• BNTBi • 


», 


• 


» • 


*. .* 


^ 


•»*••••♦*•»•*•♦ 


• • .* 


X 




• NO 


••••• 
♦KH • 
• D5» 

• * 
* 




X 


BEADCBO 




-•• 


SBABCH X 


82 ». 




****«B3* ***•*•*•* 


.* *. 




• • 


,* 


• • tes 


• PBOVIUE • 


.WHITE K/O ca ...... 


• ADDRESS • 


• . 


• 


• REGISTERS • 


• • .♦ 




• • 


*. .* 


X 




* NO 


••••• 






*KS • 


«««* * 




• J1» 


• • . 


, 


• « 


• CI ".X. 




• 


* • . 


X 


NENL 


*••• X 


• •. 


STRGSNO .*. 


C2 •• 




a *. 


.* *. 




• • ». 


.« 


«. 


.♦ RIGHT SCT ». 


TIC ecu 


.* 


•. SNTRt FOOND .* 



* CALCULATE • 
X* APPBOPSIATE • 

* Ltai ADDBBSS • 

* • 



GOONit X 

•••»»02********** 

• SAVE CORRENI * 

• SCBEEM BOFFEB • 

• AODEBSS AND • 

• SCT POIMTEB * 

• « 



• •Ii2******* 



• •••D3***>*****' 



••••••••*»••*•• 



> • 

> RBTUKI * 



INDICATOR 

* m 



STRING END 



«*G2**«**** 



»••*•••*•** 



.* MESSAGE 


», 


IBS 


•. TIPE 


.* 




•OEFIHIIION 


• 


, 


*. .» 






*. .* 




X 


• NO 




♦KG • 
• B2» 

• • 
• 




D0CGBX1 


DOCQtfX X 






•••**G3***»****** 





••••• 
•KG • 
• J 3* 



**•*«****•*«♦*•«* 



•***H3********* 

• FETCH * 

• StBOCRIQ • 

• * 



192 DOS/VSE Logical Transients 



Chart KK. $$BOCRTC - Hcite Processor Part 1 (Part 4 of 4) 
(Refer to Chart 17) 



* DBFIHB * 

* RBSSkOB * 
» IIPB » 



.•RESStSE*. 
.* HITH *. IBS 
*. RBUUEST FOR .*.... 
*. REPLY .* . 



* • 

* Hi • 

• *•• 

PAKtlL 



.* *. «BS • IRDICkTB • 

*. PROGRkHHBB .* X* IRFOBHITION * 

*. URIt .• • StkTOS * 



SKIP 
PIRTITIUR ID 



IKITIALIIB 
RB6ISTBRS 



.• FIRST •. 

.X*. CHtSACTER . 

•HBXaOBCIHkL* 



.* HBtORB *. IBS 
.X*. FOLLOHBD BI .*.... 
*. BUIB .* 
*. •* 



.* VALID *. 
.X*. TXPR 

•.IIDXCIIOB.* 
*. .* 



• OBt TIPB XRD • 
I* PBOVIDX • 

* IRDICXIOB * 



••••H2********* 

• 8BLBXSE « 

• LIRE * 



IBS .* 


* 
1 

• 




NO 


• 


. *• 

*. .* 
X *. .* 

•*•• • 10 

• * 




* 


*• .* 

*. .* 
• IBS 


•••*K1********* I 
* BBTURM * '. 


K2**'*. 

.* * 
,* 
. PHOGBAHHES 



• * 

• XRSBRI TIPB • 

• XBUICXTQB IH • 

• SCT BRTRX • 



• * 

• IRSBRT XSIBBISM 
.* IH FRONT OF • 

• BBSSXGB • 



Charts 193 



Chart LA- $$BOCRTD - Write Processor Part 2 (Part 1 of 3) 
(Refer to Chart 17) 



* « 

* SSBOCBTD • 

* « 



. * BEIU8N *. IBS 
FBOD .*.... 
*.ISBOCBTQ .• 



••***A3*****«*«** 



***•»•«**••*••*«• 



t * 



•••***•****•«•*•• 



• * 

• * 

*GET CCH ADDRESS* 



*««*B2* ********* 



««*««**«««*«**«*• 



.* «SBOCBTQ *. KKS 

BETUBN .* 

*.INDIC»TOB.* 



•«***•*•*••«•*•** 


*- •* 


, 


* HO 


••** 


**»* 


* * . 


*L8 * 


* D1 *.X. 


• El *.X. 


* * 


* * • 


••*• 


*•*• X 


TBSPB X 


NEHLXME .*. 


•****01**«******* 


D2 *. 


« * 


,« 


• » 


.* HEW LIRE 


•COT OFF MESSAGE* 


*. 8EQ0IBED 


• * 


», 


• * 


*. 




*- .* 



«**« I 


«*«« I 


* * . 


*LB • 


• B3 *.I. 


• Ei *.X. 


• • . 


* * • 


»*•• 


*••• X 


XEHLIHE1 X 


HOHOVE .*. 


•«***B3********** 


B» *. 


* SET OH * 


-♦ ♦. 


* »»BOCBTQ * 


.* *. 


• BETUBM * 


..X*.CCII CBIIIIIIIG .* 


* IHDICAMR * 


*. .* 


* 0« * 


*. .♦ 


******•*•«***•*«» 


• *. .* 




*•»» » XES 




* * • 




* B« * 




* * 




• *»♦ 


i 


i 


***«*C3*******«** 


»*«**CI( ********** 


*S£ARCH LC* 


* * 


*-*.*.*-*-«.«.*-« 


* * 


* SEARCH FOR A * 


* GST IIEXT ecu • 


* FREE SCBEBIl * 


* * 


* LINE * 


* * 


4t****«*««4i******* 





*««*D^***«**««* 
» FETCH * 
* *»B0CB3C • 
» * 

«*««*****«***** 



TBSFBl 

**«**£ ^******«««* 

* CALCULATE * 

* NUHBEB OF * 

* BYTES to BE * 

* TBANSFBBBRD * 

* « 
*•**«•*••*»**•*** 

**•» 



ENOUGH 
SPACE IN 
. COBBBNI 
*.LINE .* 



**E2******* 

» SET ON * 

SSBOCRTQ 

BETURN 

INDICATOH 

* 08 • 

***••*****• 



***«*F2******* 
•SEARCH 

*-*-*-*-*-*-•- 
• SEABCR FOB A 
« FBEE LIKE 



»**»*|| I********** 
» * 

* TRANSFER DATA * 

* IHIO CUBBENI * 

* LINE * 

* * 
»****•***«*****«* 



***4*J I********* 

« 

* UPDATE 

* ecu BITE 

* COUNT 

* 
**************** 



«■**«******«* 



•*G2******* 

* BESET • 

«»BOCRTQ 



r****«****« 



*****U2*******»** 

* * 
*ADJUST STARTING* 

* POSITION IN • 

* MEN LINE * 

* * 
***************** 



*«**«{) 3********* 

* RESET 

* $«BOCBTQ 

* RETUBN 

* INDICATOR 

* CM 
**************** 



*****e3*********« 

* * 

*ADJDST STARTING* 

* POSITION OF * 

* NEH LINE * 

* * 
***************** 



**** 




*LB * 




* G4 * 


t. 


* « 




**** 




TRSFB3 





* DATA * 


IBS 




CHAIRING IN 


♦ • . - • 




*.LASX ecu .* 


, 




*. .* 






*. •♦ 


X 




• NO 


***** 






*LB * 


**** 


, 


* At* 


*LB • 




* * 


♦ D2 ••X 



.* BORE THAN *. NO 
..X*. ONE LINE TO .♦... 
*.BE XFRD. .* 



F4 *. *****F^****««**«* 

.* *. * • 

.*IASI CCH = *. NO * ANALYZE EXIT • 

.WRITE N/0 CR .* X* CONDITIONS • 

*. .* * * 

*. .* * * 

*. .* ***************** 



**** 

* * 

* F3 * 

* * 
*•** 



• *** 

* * 

* PI * 

* * 
**** 



* D1 * 

* * 
**** 



*««**Qf|* ********* 



****G5********* 

• FETCH * 

• ttBOCBIA « 

• * 
*************** 



***************** 



BEFEBENCES* 
TO LAHU:* 
LBA4, LBD2* 



********** 



**«* 

* * 

* F3 * 

* * 
**** 



*.LAST RBAD-CCM.* 



***** 
• LB • 
» A1* 



194 DOS/VSE Logical Transients 



Chart LB. $$BOCRTD - Hrite Processor Part 2 (Part 2 of 3) 
(Refer ^.o Chart 17) 



♦ LA • 



• ***« 

• Jtt* 



• • 

• STOBE * 
..X* BESIDUtL • 
. • COOKT • 

• • 



• INDICATE • 

• INCORRECT • 

• LENGTH IF * 

• REQUIRED * 



*2 *. 
.* *. 
.♦ * 

«.USITE V/O CR 



• Li * 

* Hit* 





01 •. 








» • 






«• 




• 




*, 


SKIP FLAG 




* 


«, 


•• .• 
•• .• 

• HO 


« 




**«• 






• LA 


• , 






• Hit *.X. 






« 


* 






••«* 






lEHCHD 


X 






•••**B1 •••***•••* 


• 






• 


« 


GET DATA 




* 


«. 


ADDRESS 




* 



••••C2********** 



**•••*••••••**•• 



* SEI OH * 
.X* ALABH/NOP AND • 

•SENSE IHDICAtOg^ 

• • 



i»**««C 3* •*•*•••*• 

• SAVE CURBEHT * 

• SCREEN BUFFER • 

• ADDRESS AND • 

• SCT POINTEB • 

• • 
«****«*•*««•««*»« 



•••••Bit***^****** 

• • 

• BOTE BXtBS • 

• 1...,7 OF ecu • 
•INtO ftORK ABBA * 

• • 
••**••***••••««•• 



*•***•**«**«*••«* 



•••*• 

• LA • 

• D2* 



ALARM ecu 



««E3***««** 



•••*••••••• 



• •••• 
•LA • 

• Bit* 



• *. XES 

LAST •REAO< .*.... 
*. CCH .* 
*. .* 



• NO *•** 

* * 

* «1 * 

* * 
***• 



.*.SKIP FLAG SET.* 



•••••G>t^**^***^** 

• • 

• GET DATA * 

• ADDRESS AND • 

• BXIE COUNT • 

• • 
**•*•*••«•••«••** 



**••• 

• LA • 

• FJ» 



Charts 195 



Chart LC* $$BOCfiTD - Write Processor Part 2 (Part 3 of 3) 
(Refer to Chart 17) 



» GET fHEE LINE • 

m** ************ 



► PROVIDE • 
» ADDBBSS • 
• 8EGISTERS * 

t • 

ti*** ****** ******* 



*****Q2********** 



***************** 



* CAtCUL«TE * 
.X* IPPBOP. LINE * 

* ADDBESS * 

* • 
***************** 



*****Qi********** 

* IMDICAIE * 
•PROTECTION AND * 

* CONTINOATION * 

* « 



•***E3********* 

* • 

• BETUBN * 

*************** 



**f2******* 



*********** 



•«*«*Q2********** 



***************** 



****H2********* 

► rsTCH * 

' tSBOCBTQ * 

» « 



196 DOS/VSE Logical Transients 



Chart LB.. $$BOCRTE - CRT ERP Part 1 (Part 1 of 3) 
(Refer to Chart 22) 



•IE • 
• G2* 



• •*• 

> * 



****k I********* 

• 4 

• SSBOCRTE 4 

• 4 



**C1***«*** 

t « 

RESET 

OBK SENSE 

INDICATOR 

• « 



**D1**»*»** 

* RESET • 
RETURN FROM * 

SJBOCBTF • 
INDICATOR • 

• * 



*«*•»•••»•*****•* 



.* HARD 
..X*. CHANNEL 
*. ERROR 



•• UNIT CHECK 



*»***A3»«****»*** 



•«******«*•*•«**• 



»***B3********** 



*»*«»**«•»••*»••• 



•****A4***«****** 



*••«••*•***•••••* 



• **»«Blt*********» 



**««*♦*«****««««* 



• YES ♦»•» 

* * 

* K3 * 

* * 

• *«* 



.• ONN *. 

SENSE *. NO 
NECESSARY .*... 



«»****4***«****** 



**D3***»»*» 

* * 

• BES2T * 
» SENSE • 

* INDICATOR * 

* * 



* J5 » 

* * 



* • 
•SA»K REGISTERS • 

* OF FAILING • 

* PHASE • 

* * 
***************** 



*****Q ]********* 



***************** 



*»***H1 •*•••••«** 



*•••*»•*«»***• 



*****j )***»*«»*•• 



*••*«•»****«***•* 



*.NORHAL SENSE 



• SA»E CURRENT • 

• CSK SIATOS » 

• BYTES * 

• * 
***************** 



*****f2********** 



%************** 



*****Q2*»******** 
*STBTIO LP» 
♦-»-»-«-•-»-•-»-• 

* GET SENSE « 

* INFORRATION • 

* * 
***************** 



.X* REDEFINE CON * 

* * 

* * 
***************** 



**** 

* * 

• C3 » 



t****Q^********** 



***************** 



• INDICATE THAI • 

• SENSE MAS • 

• PROCESSED • 

V * 

***************** 



****as********* 

• FETCH • 
> «SBOCBIC • 

» « 

*************** 



H2 *. 




**)S3******.* 








.* *. 




* * 






.» *. 


«0 


•RESET ERROR- • 






•- ERROR ON •• 




* OK-SENSE • 






•. SENSE .* 




♦ INDICATOR • 






*• .* 




* * 




• *•• 


*. .* 




*********** 




* * 


♦ YES 


*LE • 
* 42* 






* Jb * 

* * 
**** 


i 


• • 
• 








.». 




X 




X 


J2 *. 




••**«j 3 *«*»•««*»* 


*****] ^********** 


*****j^********** 


.* *. 




* * 


• * 


* » 


YES .* *. 




• INDICATE I/O • 


* * 


* PICK UP SENSE • 


...*. FIRST TIME .* 




* RHROR FOR ♦... 


• . • . . X* CLEAR ( 


:htnext * 

!LU * 


* INFORMATION * 


*- . * 


» SiBOCRTA * 


» FIl 


• « 


*. .* 




« * 


* * 


* * 


*. .* 




***************** 


••»*«*••«••»»♦»•* 




* SO 






, 




**** 




**** 


***• 






• LE » 




* * 


* * 






• K3 *.X. 




» K3 «... 


• K<t *.X 




X 


• • . 




♦ * 


* * 




• •**• 


»*♦» 




**»• 


**** 




• LE • 


DOCFtXI X 




OOCFBX 


DOCAEX 




* B2* 


*****fll2********** 




X 


X 


* • 


* * 




****/, i* ******** 


****fm********* 


* 


• INDICATE • 




* FETCH • 


• FETCH » 




• HARD Bill * 




. .X* tSBOCRTF * 


« $SUO( 


ZHtk * 





*************** 



*********** 



Charts 197 



Chart LE. $$BOCRTE - CRT ERP Part 1 (Part 2 of 3) 
(Refer to Chart 22) 



•****t2********** 



«•«•••**•****«•* 4 





*w«* 




*LD • 

♦ Ji ••X. 




• ••• JC 


COCFEX 

• FETCH • 

• tSBOCHTF •I... 


.» 

B2 
.* 
NO •• 
*.INIEBTE 



«*••••*••••«*•« 



•.B8QUISR0 .* 



* RESET * 

* OIStSTEB Alio • 

• POST FLtG • 
» IH CCB • 

• • 



• BO»B • 

• MESSAGE CODE * 

• IBTO LOB • 

• COBE • 

« * 



*GBT AODBBSS OF * 
.X» IHTEBVEHTIOII * 

* MESSAGE * 

* * 



« * 

•RESET DISASTKB • 

* AND POST FUG * 

• m CCB ♦ 

« * 



• * 

• SEND MESSAGE * 



••*«*F2********* 



«**«*««*«**«*•«* 



****A3********* 

* • 
*SEND ERBOB RSG * 

• « 



♦LD * 
* A2* 



*••*••*•*•***•*•* 



»«***(;3********« 
* 

• CLBAB 

• INSIBUCTIOH 

• LINE 
* 



****D3********4 
GET StSLOG ID 



• HOVE EBBOR • 

• MESSAGE TO * 

• INSTBUCTIOB • 

• LIME * 

• • 



••*«*P3***««***»« 
*SATB LAST FOUB • 

• CRABACXERS OF * 

* LAST MESSAGE * 

* Line « 

• • 



*«***G3****««***« 
•IRSB8T CONTROL • 

• CHABACTEB II • 

• FRONT OF IM- * 
•SIROCTION LIIB • 

• • 

• ••• 



• INDICATE 

• RETURN 

• FROM ERP 



••••*J2******«*** 

• • 

• RELOAD • 

• REGISTERS OF « 

• CALLING PHASE * 

• * 



****K2********* 

• FETCH PHASE * 

• * 



• ••• 
HSG3 X 

««**»il3***»***««* 
*STRTIO IF* 



•DISPLAX MESSAGE* 

* • 

•••*•*••******•*• 



.*. FIRST TINE 



HSG2 

* RESTORE LAST * 
«« CHARACTERS OF* 

...X* LAST MESSAGE * 

* LIIB * 

» * 

•«•*•*«*•*••***•* 



• • 

• RETURN • 

» * 

*«•*•••*•••*••• 



• «•• 

* « 

* Hi * 

* • 
**«* 



**••« 
*LD » 
* K2* 



198 DOS/VSE Logical Transients 



Chart LF. $$BOCRTE - CRT ERP Part 1 (Part 3 of 3) 
(Refer to Chart 22) 



****A1* ******** 
* 

* I/O ROUTINE 
* 



* SkVB ECSU HMD • 

* CSK ST&fUS » 

* BYTES * 
« * 

***************** 



STBTIO X 

**Q}******* 

BMABLE, THEN* 
DISABLE FOB I/O 



*********** 



**** 

* * . 

* C3 *.K. 



SET OhIi 

SENSE 

INDICATOR 



.*PS0GB*I1 OR *. lES. 

*. PROTECTION .*..!. 

*. CHECK .* 



*****Q1********** 

* * 

* RESET I/O * 
« EBHOH * 

* INDICATOR • 

***************** 



***************** 



ti**** ^-i********** 



* SIO 

* 
**************** 



***************** 



****Jf^********* 

* * 

* RETURN * 
» * 

*************** 



*. CSW STORED 



. X*. ATTENTION 



*****H2** ******** 



* TIO • 

* * 

* * 
***************** 



************ 



**««»j 2* ********* 
r « 

« PROVIDE • 
► RETURU * 
» ADDRESS • 



*. DEVICE END 



***************** 



««*««K J ***••**«*< 

* 4 

* 4 
. X* LPSU 1 

* 4 

***************** 



Charts 199 



Chart LS. $$BOCRTF - CRT ERP Part 2 (Part 1 of 4) 
(Be£er to Chart 22) 



• « 

• SSBOCBCP * 

• * 



•***«B3«***««*««« 



****•*••••••••*•« 



•«*«*C3**««****** 



•«*••*•••••••«••• 



•*»**DJ*****««*** 



»«•«*«**««*••«««• 



• LH • 
» E2* 

• * 



• » 

• J2 * 

• • 
• ••• 



»««««««***•«««* 



«»«««e2********* 



•••»•*«•**••**»« 



.« RETRY 


*. KO 


*. COUNT EQUll 


.*... . 


*. ZERO 


« 


*. .* 




*. .* 


it 


• YES 


•••*« 


*••* 


•LH * 


* * . 


* B2* 


• J2 '.X. 


• • 


• * . 


• 


• ••• 


BQCHKI 


HARUMtlT 




••••J2»******«» 


« 


• 


• HARD NtlT 


• 


• 


• 


«•«•«••••*•**•* 



HARD 

CHAMN8L 

ERROR 



*. UNIT CHECK 



.* OPERATION *. TES • PROHIBIT • 

', EXCEPT. OR .* X* rURTHER SENSE *. 

• • COHBAIIO .* • BY SYSTEM • » 

• REJECT.* • * 



• * 
* 
UHRECOV 



OUIPHEBI 


...... 


CHECK 


• 


• • 




•• .• 


X 


• NO 


••*•• 




•LH • 


, 


• A5^ 


X 


* « 


••*•* 


• 


• LH • 


BQCHK 


• A1» 




• • 





200 DOS/VSE Logical Transients 



Chart LH. $$BOCRTF - CRT ERP Part 2 (Part 2 of 4) 
(Refer to Chart 22) 






•••••k 1*****«**» 



••••«•*••«•••«*•* 



• BKTKY *. NO 
COUNT BUUM. .*... 
*. ZBRO .* 



B2********** 



**•«***•■ 



I******** 



• B2 • 

* « 
• ••• 



*••* 


• ••♦♦ 


* « 

* * 


« • 


• ••• 


* 


i 

• * 


£UCHK i 

« • 


•SET OH PHISe • 

RKTORN • 
• laoiCHOB • 


« OPUATE BBIBI • 

• COUBT • 

• • 



••«••••••*• 



••BO******* 

• * 

» SBT OFF • 
OISISIBR fLkli 
» IN CCB • 

* • 
******••**• 



•••****••**•••••• 



• BBIBI *. N 
COUNT BUUAL .*. 
*. ZBBO .* 



•*** 

• ' • 

• B2* 

• • 
***• 



* * 

* LOAD ERBOB * 

* NESSAGB * 

* ADDSESS * 

* « 
*••**•*••••*•*•*• 



«**»»(;2********** 
*ST8TiO LK* 

•-•-«-•-•-•-•-•-* 

• BBTBY t/O * 

• Oi>EBATION * 

• • 
•••••*••••*•*•*** 



•****CI»********** 

• * 

• RBLOAO * 

• BE6ISTBRS OF * 

• CALLING PBASE « 

• « 



****«CS* ***•***•• 



****••*«*«*»•••*• 



•••••0 f ••*•••«•** 
« * 

• INSERT SENSE • 
•BTTB INTO ERROR* 

• RBSSAGB * 

• m 
•••*»*•*•*•**«•«* 



EBBOR 

DURING 

RETRY 



.* IS * 
.* CALLING 
PHASE 
*.SSBOCaTE 



•*•* 

* * 

* F1 * 

* • 
•«*• 



»»»»mg^****•**•*» 



•*••*••**••***•«• 



HARD 

CHANNBL 

ERROR 



***** 
•LJ • 
• F5* 



«•£«***«*** 

» SET * 
(CBOCRTF 

RETOBN 
INDICATOR 

• • 

••****••••* 



• PI *.X. 

• * . 
*••» 

EIIT1 X 

•****F |»«***«**«4 
•SENDRSG LJ* 
*-*-•-«••-•-*-*-* 

• SEND ERROR « 

• HBSSAGE • 

• « 
••*•••••••**•*••« 



». YES * SET ON BRTURN • 

JNIT CHECK .* A* TO StBOCRTB • 

.* * INDICATOR • 

*. .* • * 

*. .* *••*••••«•*■••••• 



**•*••••••«*••* 



• • 

• RESET CONSOLE • 

• PRINTBB * 

• CONTROL FLAG • 

• * 
•••*•*•*»*****••* 



«***(;3««»*«**** 
» PBTCH • 
• StBOCRTB • 

» • 

••••*••*****«•« 



Charts 201 



Chart LJ. $$BOCRTF - CRT ERP Part 2 {Part 3 of 4) 
(Refer to Chart 22) 



*****BKFE8EHCES 

• ^'TO LJ«1: 

* ••IGHI, IHF2 



*••••***••*•*»•** 



**tlt******* 
• « 

• SET OFF • 
DISASTBg FLAG 

• IR CCB • 



SEMDHSG LJ* 

-•-♦-»-»-•-•-*-» 

SEND EBROR * 

(lESSlGE • 



•***D1 **•*«**•*• 



•••«**•*•«•••••• 



••«*t3**«**«*** 
» DISPLkl « 

* ERROR « 

• MESSAGE * 



»****C3********** 



««*«♦*«*«*»**»**« 



****E2********* 

• FETCH 

• ftBOCRTk 

* 



• «**|i1***«**«*** 



•***«*•••••*••*« 



«***G1 ********* 
» FETCH • 

• SSBOCRTH * 

• * 



* CLEAR * 

* INSTRUCTION * 

* LINE * 

* * 



*****e3********«* 

* INSERT SISLOG * 



*••*••••*•«*•••«• 



•****F3*»»»***»*« 

• BOVE • 

* RESSAGE TO * 

* INSTRUC'CIOR * 

• LINE * 
« * 



»»***G3***«****** 



***************** 



*SAVE LAST FOUR * 

* CHARACTERS OF * 

* LAST MESSAGE « 

* LINE * 

* * 
***«*«******«***« 



*«**«J3«**«****«» 
*IISERT CONTROL * 

* CRARACTEHS III * 

* FRONT OF IN- *. 
*STRUCTIOII LIRE * 
« * 



flSG3 

•****A<t********** 
•SIRTIO LK* 
*-•-•-«-*-*-*-•-* 

..f * 

• SCREEN X/0 • 

• * 
***************** 



HARONAIT 

X 

•«**oii***«*«*** 

* • 

* HARD WAIT * 

* « 
*•«**•••*****•• 



*********•*•*»•*• 



*****C5*********<* 

* BESTOBE LAST • 
•FOUR CHABACTBBS* 
*0F LAST MESSAGE* 

* LINE * 

* • 
**•*«**«*****«••« 



*****05********** 

* INDICATE TEAT • 

* $»b0CBTF GETS • 

* CONTROL AFT SB * 

* ATTENTION • 

* INTEBBUPIiON • 
**••***«»*•»•••*• 



*»*»«jj5***»*»»i 



*********»***«i 



.* DISASTER • 

. FLAG IN CCB . 

*. .♦ 


IBS 


*. .* 




*. •* 
* NO 


«**•• 




•LH * 
» F3* 

• • 




« 


DOCBBX 



• « 

* BETUHN « 



202 DOS/VSE Logical Transients 



Chart LK, $$BOCRTF - CRT ERP Part 2 (Part 4 of 4) 
(Refer to Chart 22) 



• SCREEN I/O * 

• 80DTIIIE * 

« « 



* * 

» 14 » 

X 

* * 

* SIVB BCSli tllO • 

* CSV STkTOS • 

* BITES * 

* * 



**B2****«** 
« « 

« EtitBLB 
• THEN DIS&BLE 
• FOB I/O 



* SET CNN SBMSB • 

• INDICATOB, « 



»«**««***«*«*«««« 



***»*02********** 
« * 

• BESET I/O • 

• EBBOR » 
» INDICtTOB • 

• • 



••** 




• • . 




• c« *.x. 




* • . 




• •»» X 




CHK3 .». 




C* •• 




• * •• 




.* PBOSRAB * 


IBSX 


*. CHECK 


• • •• • 



.*. UNIT CHECK 



• SIO • 

« 4 

« « 



*••••••*••••••••• 



BDSX 



•••••••••**••••*• 



*. CSV STORED .* X«. tTTENTlOII 



NO 



* BBIORH • 



.X 

tlO X 

»»*»«h2********** 

t TIO • 



*«**«H3********** 



•**••«•*••«•*•••« 



J2 * 
BOSI 



• PBOVIDB • 

• BBiaBN • 

• tODBBSS * 



•«*••*•••••**«••« 



*. DEVICE BHD 



* « 

* LOiD PSU • 

* * 

* • 



**«**KI|«*»*****»« 



•••••*••••••*•••* 



Charts 203 



Chart HA. $$B0CfiT6 - Write Screen Message (Part 1 of 3) 
(Refer to Chart 17) 



•HC • 



• • 



•••• 

• « 

• AS • 



• • 

• SSBOCRTG » 



••CI******* 



••«•*««•••• 



• ••••I) '!•*••••• •• 

• 

* BRANCH VIA 

* REGISTER 7 

* 

*•••••*•••••*•*• 
Ix 

.X 

••El******* 

* • 

• RESET » 

• INDICATOR FOR 

• StBOCaiN * 

• * 
••••••••»•* 



•••••f {•••••*«*i 



NilSSAGB ID 

*•••*«*••»*•«•• 



* SEARCH FOR • 

* 1ST PROTECTED * 

* MESSAGE * 

•«•♦•••***•*•«•«• 



• ••* 
RESTK X 

**H1******* 

• • 
•SET OFF ALARM* 

* AMD UNLOCK • 
* KEYBOARD * 

* * 
**••*«•«*•* 



•••••A2********** 
.« SET OH ALARM * 
* BIT IN SCREEN « 
..X* ecu IF • 
. • NECESSARY • 
. * ♦ 

. ••••••••••*•••••• 



••**^B2********** 



**•••••*•*••••••» 



•••••C2*^**^***** 

• INDICATE LINE • 
••OELEIABLE* IF • 

• 'READ' IN * 
« CHANNEL PROG. * 

• • 
•»*••****•**•***• 



• ••••I)2**»****«** 
*AUVAMCB MC* 

• -•-•-•-»■-•-»-•-• 

• GET FIRST » 

• SCREEN LINE • 

• » 
*•**•••••••**••*• 



•••«•( 3«**^****** 

• • 

• CLEAR • 

• INSTBOCTION • 

• LIMB • 

• • 
*•**•***•*••*•••* 



•••*«B3***^**«»»* 
« • 

• INSERT • 

• INTERVENTION * 

• SEQ. MESSAGE • 

• • 
••*•••••*••••*••• 



•••••CJ********* 



*»•*•*•*••****•* 



STARTIO X 

•«***D3********** 



•«••*••••*•*••••* 



***••*•• 

• • 
•SET OFF/RBSTORg* 
•CONSOLE PRINTER* 

* CONTROL FLAG * 



• •••• 

• MB • 

• A*^ 



.• LINE •. 
•BELONGS TO *. NO 
CURRENT .*... 
• . TASK .• 



•••••Q2*«^*^^**** 

« FLAG LINE • 

* DELETABLE IF * 

* no REPLY « 

* REQUIRED • 

w * 

••••••••*••*••••• 



•••H2********** 



*•••••*•••«•*•«•• 



LAST LINE *. 



•*•*•••• 



*•••*••• 



••••*•*• 



•••••••• 



•••••G3^*^******^ 
•lOROOT MC* 

«->•-•*«-•-*-«-•-• 

• HRITE BUFFER • 

• ONTO SCREEN • 

• • 
•••«•«••*••*••••• 



.* INTERV. *. 

•.REQUIREO FOR . 

*. HC DISK .* 



SET OFF 

POST FLAG 

IN CCB 

k • 

*•••*•*•••• 



•••**A<t********** 



**•*•**•••**•••*• 



*****AS********** 

• • 

• * 

• GET NEAT LIMB • 

• • 
« « 
*•••••*•••»•••••• 



••BO******* 






B5 *. 


• • 






• * 


• SET OFF • 


NO 


• 




* INDICATOR • 


.. .* 




LAST LIME 


* FOR GETTING * 


, 


• 




» CONTROL • 


, 




*. •• 




X 




*• >• 




•*•* 




• IBS 


*•«• * 


* • 






* * . 


• HI * 




, 


• C«'*.X. 


• • 




X 


* * . 


••*• 




*•*•* 


**•* , 






♦MB * 


>ET1 X 






• A2* 


•••**C4********** 






• • 


• • 






• 


• BESET FLAGS • 






GOON 



CONTROLLING 

•CURRENT CHANNEL* 

* PROGRAM • 

•••••*••«•»•••••• 



**0<l******* 

• • 
RESET 

INTENT. REQ 
INDICATOR 

• • 
••*••«••••« 



•••••EK»**^«^*^** 
•SEARCH MC* 
•-•-•-•-•-•-•-•-* 
*SBARCU FOB 1ST * 

* PROTECTED • 

* MESSAGE * 
****••••*•*•**•*• 



•••••fil****^^^^*^ 

• • 

• SAVE THAT • 

• ADDRESS FOR • 

• HARD COPY * 

• • 
«*••••••••••••••• 



* ••••(;((•••«•••••• 

* • 

* RESET LINE * 

* COUNTER * 

* TO ZERO * 

* • 
***•••••******••• 



*•*•• 
•MB • 
• ■A2^ 



• ••••J !(•••••••••• 



•••••••••••*••••• 



REFERENCES* « * 



• INTERV. • 

tlEQ. FO^ HC 
•. IISK .• 



• ••••{^•••••••••* 

• INDICATE THAT • 

• SSBOCRTG GETS • 

• CONTROL AFTER * 

• ATTENTION • 

• INTERRUPT. * 
«**••*•••••••*•«• 



• •{[^(••••••* 

• • 

RESET PHINT * 
BIT IM • 

ATIR. BYTE • 
V • 

•••••••*••* 



• *•• 

* * 

• Ai • 



204 DOS/VSE Logical Transients 



Chart MB, $$BOCRTG - Write Screen Message (Part 2 of 3) 
(Refer to Chart 17) 



•••-RKfeBEIJCliS 
*T0 811*2; 



*«* • 
• E2» 



RESKr 

* BBSBt * 

» PRorKcrioK • 

. ..X*llir OP HiiSSkGK » 
« ARK* LINES * 



.* PSOTBCTED 


• 


HO 


LINK 




*- • . . 




m 




• . .* 




^ 


*• .* 




X 


• IBS 




• K2» 



***«B2********* 

• FEICH ♦ 

• »«IIOCRTU • 



•»»»B3»»*****»* 

* FETCH « 

• $«BOCeT* * 

k « 



.» 'RtlAD* IK *. 1 

CHAHNBL .*.... 

*. PKOeR*(l .* 



»«***CI4»********* 
» * 

•DELETE »STBRISK* 

* III FSONT OP • 

* HESSAGE « 
« * 



«*»«*pu* *••*****• 



•««***»***««****« 



« * 

« INSERT PRINT • 

• FLAG INTO • 

• AIIBIBUTE * 

• OKIE * 



* SUBSTITUTE • 

* BLANKS FOR * 

* CHARACTERS » 
•LESS TRIM X'<tO'» 

•*«••*••**«*««••• 



>*Jl|**:»^^**««* 



»•«••••*«••« 



* YES 
I 102 



Charts 205 



Chart MC, $$BOCRTG - Write Screen Message (Part 3 of 3) 
(Refer to Chart 17) 



• SCREEN I/O 

• BOUTIME 



••** X 




loaouT .*. 


NOATTENT 


Bl *. 


«*»«*U2******«*** 


• ♦ *. 


• • 


.* »TTEMTIOH «. NO 


♦ PBOVIDE • 


•• PENDING .*.... 


. ...X* SUPEBVISOR • 


*. .* 


♦ 1/F » 



•••**ci ••«*«•*•«* 



•****•••***•«»••* 



• FETCH 

• SSBOCHTK 

*' 



|(*« ****** «*«*««*4< 



***»C2********** 

* 

bBANCH INTO * 

SUPEBVISOR * 

(SIO) « 

**************** 



****ei********* 

• FETCH * 

• S$BOCBTE * 



****A4*******»* 

• SEARCH • 
» SCT ENT8K • 

• « 
*************** 



* PBOVIDE » 

* ADDRESS * 

* BEGISTBRS * 

* * 
*•«••**********•* 



***»Bb******«** 

« * 

• ADVANCE * 

* « 
«•«**••*•••*••• 



»*«*Dit********** 



**************** 



SCT 

STRING 

END 



«*«******««**«*** 



****05********« 

* * 

* BETUBN • 

* • 
****«***«*****• 



*»**f 2********* 
t * 

» BETU.tN • 

It * 

***«***«**«***« 



•• INTERV. *. NO 
*. REQ. FOR HC .*.... 
«. DISK .» 



UOCAKX 
X 

***«*HI4***«****** 



***«***«*«* 



*»***J «*****•*« 



*«**•***«*****»« 



206 DOS/VSE Logical Transients 



Chart MD. $$B0C8TH - Write Hard-Copy Records (Part 1 of 3) 
(Refer to Chart 17) 



* • 

• »»BOCBTH * 

* * 



*mm**ci**<^*****>r* 



*««******«««***«* 



* INS£RT DATB * 

(* imo HABD- * 

» copy BEC09B • 

« « 



.* INPUT *. 

► ONII FBOa * 
INSTBUCrlON 

► . LINE .« 



* * 

* SET LIME • 
» POINTBB TO * 

* IHSTRUCTION • 

* LIIIE * 
***************** 



RESET 
INSTIIUCTION 
LINE INPUT 
• INOICATOB * 



*««**U1**** ****** 

* MOVE * 

* BRSSAGE TEXT * 

• IBTO HtBD * 

• COPY BBCOBD * 
« * 
«*****«***«**«*«« 



^***«B 2** ******** 

* * 

• SAVE ACTUAL * 
' AO0BESS FOB • 
» BEDISPLAY • 



*«**« 02* ********* 

* BEliEFINE • 

* LINE STAIOS » 

* ir 'BEAD' IN * 

* CHANNEL PSOQSAII* 

« 4 

«»**««*****«*«*•« 



«*««*g 2* ********* 



••**F2* ********* 

INSKRT * 

PABTITION-IU * 

INTO HABD * 

COPY BECOHD * 

* 



lc«»**^ 2* ********* 
» INSEBT * 
' CYCLE BIT * 

• INTO HABD * 

* COPY BECOBl) * 
» * 
»*««****«****«*«« 



CHTM110 

«*«v«H2********** 
*llHITE (IF* 

* WHITE BECORD • 

* TO HARD • 

* COPY FILE « 



.*ACTU«L *. 
► = IIRAP- * 
ABOOND ADDK 



C3 *. 
.* BBAP- *. 
.*A80DND ADDR*. YES 
■TO BE UPDATED.*... 
*. *Clt .* 



*. 



*«£ J«*««*** 



HODE 



CBTH120 

***«*F3******«**« 
*UPDAIE BF* 
«-*-*-*-*-*-«-*-* 

* UPDATE ACTUAL * 

* DISK AODBESS * 

* * 



*c« 

PSIMTLOG JUST PUNTED 
HABD COPY FILE « HRAP 
AROUND ADR BILL BE 
nPDATED SOUN 



»4««4IE4********** 

* * 

* R8SET * 

* PBoreciioN OF * 

* CUBBENT LINE • 

* * 

*«*««********«*«* 



«***F 4* ********* 

SET LINE * 

POINTER to * 

NEXT LIH£ * 

* 
********** ****m* 



< ANOTHEB *. YES 
LINK TO BE .*... 
•.BECORDBO .* 



.* INPUT *. 
• ALSO FHOH *. YES 

INSTBOCTION .*..X 
•. LINE .* 



***• 

* * 

* Et * 



Definitions: 



actual address 
wrap-around address 
overlay mode 



disk address of the next free record position in 

hard-copy file 

disk address up to which hard-copy file was already 

printed by system utility PRINTLOG 

parts of the hard-copy file which were not printed 

by system utility PRINTLOG are overwritten 



Charts 207 



Chart HE. *$BOCRTH - Write Hard-Copy Records (Part 2 of 3) 
(Refer to Chart 17) 



••••C I********* 
CALCULATE 
CRITICAL 
ADDRESS 
BAIGR *C2 



.• CRITICAL *. IBS 
*. ADR. BAM6B .*.... 
*. BMTBRBO .* 



«C2 IF TRBBB IS SPACI 
LEFT FOB 0*LI 100 OR 
LESS BECOBOS BEFOBB OVEB- 
LAI HODE IS ERTEBBD. 
THEN THE CRITICAL 
ADOBBSS RAR6B IS BRTBRED. 



•*B2******* 



aO .* OVBRLAI 


* 




• SET • 


..». BODE 




I* 


• UARBIRG FLAG 


• . 


» 




• • 


•• .• 






• « 


♦. .* 






•«»*••••«•« 


• lES 














••*« 




, 






•HF • 




, 






• Gl '.X 










« • 




, 






• ••• 




Z 






BOTOK 








• 




« 


•***F2********* 


• SET BBAF 




• 


• FETCH 


« ABODBO > 




• 


• S«BOCBTB 

• •f3 


•ACTUAL ADDRESS 


« 


« 




* 







•••••*•*«•**«••»* 



.* •. 
• OVEBLAI •• «ES 

HODE JUST .* 

•• ENTEBEO .• 

*• •• 


«»*«62* ******** 

* FETCH 

. . X* SSBOCRTU 

• •G3 


•• •• 




• NO 

xl 





«F) ISSUE A HARRIBG 
THAT OfBRLAI BOOB 
HILL BE EHTERBD SOOB 
OR HRIIE AN ERROR RSG. 



*GJ INVALIDATE 
HRAP-AROONO ADDRBSS 
IB RARO-COPt HEADER 
RECORD 



**»*H2********* 

• FETCH • 

• SSBOCBTQ • 

• « 
•**••••**••*•«* 



«***J ^**«*****« 
» FETCH • 

* fSBOCRTA • 

• • 
•••***••**•••*• 



208 DOS/VSE Logical Transients 



Chart MF, $$BOCRTH - Write Hard-Copy Records (Part 3 of 3) 
(Refer to Chart 17) 



» HRITB • 

» * 



• • 

• * 



* « 

• oPDite * 



« 

laCBEHEMT • 

B-VkLUB • 

Br 1 • 

* 



***»D1*»»*****» 



*•••••••*•*•«•• 



« 

* BOVE 

* HC RECORD 

* TO BLOCK 

* 



« 

• UPDATE 

• COBTROL 

• IIFORBATIOM 

• 
**************** 



***************** 



.» ». 


YES 


,♦ 


•. BLOCK POLL 




*. I/O ERROR 


*. •• 




». 


•• •• 




». •• 


•. .• 


X 


*. -• 


* NO 


**** 

» B2 * 

* * 

**** 


• NO 



****r i********* 

INOICITB 

INCORBBCT 

LEBGTH 

*************** 



*«***G)******«*« 



**************** 



'***IiH********* 



**•*•*••*«••••*: 



IHCBBHEBT 



***»*fH********* 



**************** 



****ii^********* 
* • 

> RBTUBN • 
m * 

*************** 



••••• 

• HE • 

• F2* 



****iii********* 

• * 

• BETUilM • 

• m 
*************** 



****H2********* 

• « 

• BETURN • 

• * 
*************** 



t****fm********** 



••***•••••••••••• 



****jit********* 

* * 

» RBTURR « 

• * 
*************** 



Charts 209 



Chart MG- $$BOCRTI - Write on 3284/3286/3287/3288 Console Priater 
(Refer to Chart 17) 



* * 

» ISBOCBTI * 

» * 



•••••B1*********» 



* • 
i 

BBGIII .*. 

CI ». 

.* tRIi *. 
.* THEB8 *. IBS 


• ••• 

♦ * 
« C2 • 

* • 

• *•* 

BEUIN1 X 

**«**C2* ********* 

• HOVE LINE • 

* COITEHTS • 


*. RBcoaos .* 

• •• .* 
». .* 
•»•• . • NO 

• • 

• CI • 

• * 

Dl' *». 
.* •, 

.•IHSTBUCTION*. IBS 

*. imB TO BE .* 

*. PRIIITED .« 


t « PBIBTOUT ABE* • 

• • 

i 

•••••02********** 

• • 
•AVOID PBINTIKG • 

• OF TBAILma * 

• BLiBKS * 



•••••*•**•**•*••* 



***B2************ 
SVC lb 
* PBIM • 
RECORD 
• BAIT « 



• ••pil************ 



* HRItB BBBOR 
.X flBSSkSB IB 
• INSTB. LIRE * 



•••**II1* ••«***•*• 





RBSTOBE 


..X* 


REGISTERS 






« 




*••***«*••*•• 


••*• 








B1 * 








•••• 





•••••*••«•••*•••• 



•• IBI •. 
I) .* HORB *. IBS 
.*. RECORDS TO BE.*.... 
*. FRIRTBD .* 



**•*•*•*•••••«•*• 



•••eii»****«****** 

CLEkB 
• IMSTROCTIOII * 
LIBE tND 
• IBPDT *RBt * 



• ••• 

• • 

• CI • 

• • 

• ••• 



•***J3***«***** 

• FETCH • 

• SSBOCRTG • 

• « 



*••* 

* • 

* C2 * 



» FETCH * 
* SSBOCRTH * 

» * 

*••••••**•••*•* 



***«K2********* 

• FETCH * 

• SiBOCRTi * 

( « 



•*•• 

* « 

* HI • 

* • 
«**• 



• ••« 

* * 

* FJ • 

* • 
***• 



210 DOS/VSE Logical Transients 



Chart MH.. $$BOCRTK - Comtaand Entry Processor (Part 1 of 4) 
(Refer to Chart 19) 



*•**•***•*••*«* 



1 ». 

», 

PIHSI *. MO 


CBTENTHI 

* 

* SET cai 


.• 


• BOSK 



**[ll***«*** 



••••***•••« 



*««*«E^ ««««**«*** 



«*«*«*«***«****«« 



•«***p 1 •**•*««•• 



••••*•**•••*•**• 



•••••**••« 



» SAVE PIB&DOa * 

* Alio REGISTEgS • 

• OF CBARIIEL • 

• SCHECULSB • 

* • 



*«D2*****'** 



«««*«*****« 



•***F2********** 



••••*•*»*••*«»«• 



* * 

* A3 • 



*«A3******* 

* * 

* EHABLE * 

• CHAMNEL * 

• INTEBRUPTS * 

* * 
*********** 



**** 

♦ UK * 

* AJ *.t 



**** 

t 
*«***B3********* 



•*•«•«*••****••* 



*****C3********** 



*•••*•**•••«•*••• 



« FLAG • 


.* IPL ♦. 


rES 


C-TBAMStBMT • 


*. IR PROCESS .* 




• ASEA BUST • 


•• .* 


. 


• * 






*•«*•*••*•« 


». •• 


X 


* 


• NO 


***** 
*I!J • 
* B3* 

* • 
* 




I I6MORR 


X 


X 




**e2******* 


*****2-^********** 




• SET aSER » 


•lOROUT RL* 




EBP ARO DEVICE* 


•-*-♦-•-•-•-»-»-• 




END POSTIRS * 


•EXECUTE BEAD HO* 




• IR CCB • 


« DIFIBD • 





***************** 



*****f3**«****** 

• COHPUIE 

* ROIIBEB OF 

• CHABACTBKS 

* BEAD 
• 
****•****•»****• 



.* FROH AH *. 
. IITBaauPTED . 
•CRT HODULR.* 



••••*H1**«******* 
» SET PIK, 
• TIK. 



COR BEG 
ADDRESS 



•••••*•*•*•*••*** 



• *. HO 

ORSOLICITED .*... 
••IIITEBBUPT.* 



****«II3********«* 



•*•**«***«•*••«•* 



.*. 


• *- 


HAIRLR .*. 


J1 *. 


02 *. 


J3 *. 


.* *. 


.* *. 


.* KOBE * 


.* ERTBT *. (£S 


I NO .• CARCBt *. RO 


NO .* IRAN 1 


♦• FBOH •*... 


...*. KEY .*.... 


.....*. CHARACTER 


*.»»BOCHTX .* 


*. PRESSED .* 


*. BEAD 


*. .* 


*. .* 


*. .* 


*. .* 


X *. .» 


*. .*■ 


* «0 


***** * IBS 
*HK • 
* A2* 


* XBS 




• • 

• 


X 






.*. 


***K^ «***•****««• 




K3 *. 






.* BOBK • 


* DUHHT • 


* FETCH • 


.* TEAR 3 


BEQUEST 
• TO CHARQ * 


• S«BOCRTP • 


*. CHARACTERS 


* * 


*. BEAD 






*. .* 


*' 




♦. .* 
* lES 


'.X 

X 




X 


**•• 




***** 



.* CUBSOR 
.X*. IR IRPUT 
*. LIRB 



***** 
*HJ * 
* B3* 



****KS********* 

• FETCB • 

• »*BOCRTIt • 

• * 
*******••***«** 



Charts 211 



Chart MJ. $$B0C8TK - ConnBand Entry Processor (Part 2 of 4) 
(Refer to Chart 19) 



•an ♦ 



* • 

* CONVEBT 10 * 

* UPPEB C«SE • 

* CUtBtCTEBS * 

* • 



« SKIP BLINKS • 



.* Olll 
ULiNXS 
*. BNTBBBO 



BEPE8BMCBS 
TO NJBJ: 
HHD3, HHK« 



IGNOBB X 

•••«»|I3*»**««**«« 
«IOBOUT BL* 

..X* BBASB ALL * 

• ONPBOtECTBD * 

• LIMBS » 



-«-*-•-•-• 



* DEPINB EXIt * 

« « 



«»«*D3********* 

* FETCH * 

* AMI PHASE * 

* « 



POHBB * 


YES 


COHRAMD 


••••• 


• * 




. .• 




»• •• 


.1 


• HO 






• BK • 




» A3* 




• • 




• 




SISTDBO 



DOC02EX 

z 

•*»»Blt*****«*** 

• • 
•FETCH StB0CBX2 • 

• • 
••*••••••••*••• 



MU .• ONLK 1 
...•. CUABACTEB 
•. ENTEIBS . 



KCOHHOR 

•SET 1-BKTE • 
• COHBAHO * 
...1* IMOICATOR 



G2 *. 
.* CUD •• 
• BEGINS *. IBS 
KITH 'K ...... 

I*. BLANK* .• 



♦ . .»■ 



*•••••••••• 



• •••G 3*««**«*^« 

* FErCH * 

* SSBOCBTM • 

* • 
«•«••••••«••••• 



H2 •. 
• • CUD *. 
.• BEGINS *. NO 
•• NITH "D" .*... 



•• .* 


XSISTHRO 


• YES 


••••* 




• HK • 




• A3* 


X 


• • 




* 


• • 




• AO • 




• * 




• ••* 





212 DOS/VSE Logical Transients 



Chart MK. $$BOCRTK - Command Entry Processor (Part 3 of 4) 
(Refer to Chart iI9) 



*••*• 




•••♦•REfBRBNCBS 


»HH • 




• 'TO BKAS: 


« J2* 




• •»HJ»I«, HJK2 


* * 




* « 


* 




• 


it 




X 


.*. 




SYSTBRD .*. 


*2 *. 




A3 *. 


* *. 




.* ». 


BEQUEST 


« 


NO YES .* LIA *. 




• X...*. RBaOIRED .» 


PRESSED 


« 


*. .• 


*. .♦ 




• *. • * 


♦. .• 




X *. .* 


• IBS 




••*»• • HO 
*I!B • 
* BJ» 
* * 
* 






IGNORE X 






• •• 


B2 «. 




B3 «. 


• IS *. 




- * *. 


ATTEMTIOR 


* 


»0 .* ATTEMTIOR •. IBS 


TASK 




•.... •. TASK ...... 


ACTIVE 


• 


*. ACTIVE .• 


•• .* 




*, , • 


*. •* 




X *. .* 


• YES 




**** • NO 

• * 

• F2 » 

• • 









* « 

* ACTIVATE » 

* AITEMIION * 

* ROUTINE • 

* « 



***»«£}2*«* ******* 

• INDICATE * 

• THAT • 

• CANCEL IS • 

• REQUIRED * 

r *********** *m*** 



SYSTMPDI X 

*****jii********** 

* INDICATE » 

* THAT • 

* LTA IS • 

* REQUIRED * 

* « 
***************** 



ATTENTION *. 
TASK LTA 
. BOUND .* 



**** . 

* * . 

* F2 '.X. 



*****f^^********** 

* * 

* CLEAR » 

• ATTENTION * 

• BUFFER • 
« • 



• ATTACH 
» ATTENTION 
» TASK 

* 
**************^ 



*****fi********** 

• INSERT • 

• COKBAND • 

• AND STORE • 

• COUNT ♦ 

• * 
***************** 



• INDICATE • 
» PTA » 
« REQUIRED • 

* « 
***************** 



Charts 213 



Chart ML.. $$BOCETK - Command Entry Processor {Part H of 4.) 
(Refer to Chart 19) 



****41*******«* 



*•••••«••••*••• 



•*••••••••**«•••• 



• * 

• BRAMCH INTO • 

• SaPEBVISOR * 

• JSIO) • 



• « 

* EXIT BOUTiaS • 



BETOBN TO *. IBS 
CALLUS .*.... 
. FH4SE .• 



» FBTCH • 

• SSBOCBTA « 

« « 



••*••*•••**•***«« 



• * 

• FBTCH PHASE * 

• * 



* * 

* RBTUBH • 

* • 



v«»««B 2* ********* 



••*•***»«**•***•• 



•»**F 2* ******** 

• FETCH • 

* «SBOCRTB * 
» • 

*•********•*«•• 



••**£3«* *»•*••• 

* • 

* SKIP BLARKS * 

* « 
*************** 



• •** 








* « 








* F3 ». 


X 






• « 








*•** 


k 




SKIPBtNK 


• •• 




F3 


». 




.* 


* 




.» CHARACTER 


• 


*. = 


B 


1.AIIK 





«•**••••***•***** 



•**G3*»***««** 

RETUBH * 

* 


.* *. 

• Iemd of inpot '.* 
*. .* 


•0 




»• .* 






*. .* 

* YES 


X 
*«** 

* * 

* F3 * 

* * 
**** 




****Hl»********* 

• * 






• RETURH * 

* ■ * 






*«*•**•••»*«•«• 





214 DOS/VSE Logical Transients 



Chact MM. $$BOCRT.L - Deletion by K-Command (Part 1 of 3) 
(Refer to Chart 19) 



« • 

• SSBOCBTL • 

* * 



••••***•••**•***« 



* 0P04IE * 
» POSITIOI to » 

* BE TESTED • 

* • 



**«*«B1 ********** 

* * 

• IHITHIIZB * 

* IHD LOAD * 
» REGISTEBS * 

• • 



-•-*-*-*-*-•-» 

* SCUM SCT • 
» BBTBIES TO • 

* ADJUST RUNGS * 
*«********«****•« 



• •*• 

* « 

* »3 » 

* » 
•«** 



*««««C2* ********* 

• * 

* * 
*UPDiTE SES«1L2 * 

• « 

* * 
***************** 



COflBI 
'*. .*' 



**|)1******» 



*«««*«***** 

• *** * 
» * • 

• El *.X. 

• * . 
**•* 

X 
««•**£ 1 **«•**«**• 



***************** 



*****02********** 



***************** 



* SCAH SCT * 

* EHIBIES TO • 

* ADJUST RAHGB • 

***************** 



*****j)i********** 

* * 

* UPDATE * 

* POSITION TO * 

* BE TESTED * 

* • 
«****««««*«****** 



****il^********» 

• FETCH * 
> SSBOCRTf * 

• * 
«**•**•**••*••• 



****«f 2********** 



•*«*••••••*•*•*•• 



.* K B,SEG *. YES 



.I*UPDkTB POiaiER « 

*••*•*•*•*•«••*•« 



.* SEGVAL2 *. 

EQDAI. 

*.SEGfAl2»2.* 



*»*««H2********** 
« * 

« INDICATE nSG * 
*NUST BE DELETED* 

* IN ARK CASE • 

* * 
***************** 



*»Q^******* 

• SET OFF • 

* SECOND TIRE • 

* SHITCH * 

* • 

• « 
***••**•*** 

**«* I 
*H« • 

* J1 *.I. 

* * . 
•*** 

Fiasix I 

*****H3******«*«* 



*«**•*••«****•••• 



*«**«e<i* •••**••*• 

• « 

• UPDATE • 

• POSITION « 

• TO BB TESTED • 

• « 
•*««**•*•******•• 



****J2********* 

* FETCH « 

* »$BOCBTQ » 

* • 
*************** 



***** 

• RN * 

* A1» 



Charts 215 



Chart MN. $$B0CRT;. - Deletion by K-Command (Part 2 of 3) 
(Refer to Chart 19) 



*HII * 



• **• 

* * 
» A3 * 

• * 

• »•« 



••••1 |**»******» 



••••••«*••«•***• 



S8COII0 *. IBS 
SNITCH .* 



•«**»A3******»*«* 

* Bove » 

* SSCOHD • 

* DIGIT TO • 
» SEG*tl2*2 • 

* * 



•***B3********* 
OPOATE 

rosiiioH 

SO BS 
STEO 



* A3 • 

• • 
• ••• 



• 

HOVE • 

DIGITS TO • 

SEGirAI.2 • 

* 



» SET 01 • 
* SECOKO Tint « 
• SirlTCH « 



•••••*•*•«• 



UPDATE 

POSITIOII 

TO BE 

TESTED 



IBS . 


• SEGHBIIT 


..••• 


COBBBCT 


^ 


• . 




• . .» 


X 


•• •• 


**•»• 




* NO 


•an * 






» A2* 






* * 






• 






DI6IT2 






00CV1 


] 




•••**B3*< 


**«•* 


« 


SET POIBTEB 


• 


OB FIBST 


• 


DIE 


.11 



«««**«««•**«**«« 



»«•*«••«•*••••«•• 



• IIDICATE • 

• HESSAGE * 

• lOHBEB • 

• • 

• • .X 

• 63 *.X. 



UPDATE 

POSITION 

TO BE 

TESTED 



* SCAN SCT * 

* ENIBIBS TO * 

* ADJUST BAN6E • 



••••»B2********* 

* OPOTE 

• SEGVAL2 

* ANO 

• SBGfAI.2*2 
• 



****G3***«***** 
» FETCH • 
* »BOCBTf • 

» • 



BLANK *. IBS 




FOIIONS .*..X 








• •* 




• • .• X 


« NO ••** 


• 


• G3 


X • 


*••*• •••• 


•MH » 


• B3* 


• • 


* 


FIBSTX 





216 DOS/VSE Logical Transients 



Chart MP- $$BOCfiTL - Deletion by K-Command (Part 3 of 3) 
(Refer to Chart 19) 



> BBOEFINE * 
• BtRGB • 

> * 



•••««B2*«******** 



•••«**••••*••«••• 



• C2 •.«. 



.•COaTIIOEO/ *. tBS 
>. PBOTBCtBD .*.... 
*. LINE .* 



«***02*«******* 

> * 

> BETOBM • 



••***C3********** 



•••••••*••••••••• 



•••**E3********** 



***•**«*«* 



* • 

• SBTOBK * 



Charts 2il7 



Chart NA- $$BOCRTM - Deletion by Cursor 
(Refer to Chart 19) 



* • 



* « 

* SSBOCBTB • 

* « 



• INSERT * 

• BESPBCTIVB • 

• JklBB BDBBBB • 
» to SEG»»L2*2 * 

• * 



CUBSOB IB 
HESSAGB 
. BBBB 



••*«*C2********* 



•••••••••••••••* 



**02******* 



*»•*••***** 



****E2********** 



••••*•••••«•*•«• 



.*COHTI«UB0/ *. NO 
. PBOTBCTBI) .*.., 
». LIBE •• 



»»**G2********* 



«••••••••**••** 



«•**•*••*••••«••« 



•***«C3********* 



«»«••*••*•••*••* 



****D3********* 

• FEtCfl * 

• SSBOCBTP • 

• • 



• INDICATE 

• OEtETIOH BY 

• CUBSOR 



•*«**••••***••«• 



•****CI|********** 

• CLEBB • 

• INSTBUCTIOI • 

• LIBE BDFFBB • 

• • 



► FETCH • 
' SSBOCBTQ • 

> * 
*************** 



****J2********* 



*************** 



218 DOS/VSE Logical Transients 



Chart NB,. *$BOCRTN - Screen Management Mode (Part 1 of 3) 
(Refer to Chart 19) 



* « 

« * 
• «** 



• * 

• A5 • 



***••****•**«*« 



Kconn 

*»***A2******«*** 

• GET CHT ♦ 

* IMPUT * 
...tL* AREA * 



*•***«*•*******•• 



••CI******* 

► SET OFF • 

IHOICATOR 

FOR K H/0 

OPERANDS 

» • 

**»***•«•*• 



•***•**••*• 

*••• I 

• * . 

• El ••X. 



•***E1 ********* 
» FETCH » 

• »$BOCHTL • 

* * 

••*•«••••*••**• 



••C2^*****« 

• RESET » 

».-PASS 

INDICATOR 



•••**•••••* 



.* COHHAND *. lES 
BEGINS .«... 
•WITH 'K E'.* 



.* COHHAND 
BEGINS 
•MIIH "K S' 



...I*. OPERAND'N* 



**B3******* 



»*••*»»*•*• 



****C3*****^*** 

• FETCH • 

• SSBOCBIO * 

• « 
*•****•***•••*« 



*«««*«*•«••*••*« 



••***g3«»***»*«* 



*•*****••»••**•• 



PROVIDE 

SPECIFICATION 

COHHAND 



•••«**•• 



:••*«»»» 



I******** 



* CtEAB * 

* ENTHJI * 

* AREA * 

* BDFFEB * 

* * 
•••«*••***«**«•«* 



• •C't*^***** 
* SKT OM * 

* VBItE * 
• INDICAT08 FOR 

* »$BOCBTP • 
» • 

•***««••♦*« 



*«DI|***»**« 



•*••*•••••* 



«**«Eil*»*«*»*** 

• FETCH • 

• SSBOCBSP • 

• • 
•«••**•••••*••* 



COHPASS X 

«**•« A &******< 
« UPDATE 

* COHHAND 

* ADDRESS 

* RBGISTEB 
* 
*«*•••***•*»••«• 



*«**«B5*«««»*«*«i 



• •*•****•••: 



• ••• 

* • 

* G«* 

* • 
**•• 



• A* • 

* ■ • 
• •«• 



****F1********* 

• FETCH * 

• SSBOCRIV * 

» • 

***•*•*•••••••• 



.* COHHAND 
BEGINS 
•MITH 'K D» 



SEFESRHCES 
TO NBG«: 
NCC3, NCG1 
NCGU, NCJ1 
NCJ4, NDJ2 
•••*• 



****G2****«**** 
» FETCH * 

• *»BOCRTO • 

• • 
•««•««••••••*** 



SAVE 

ERROB 

LOCATION 



••***H3********* 



**«*••*• 



****HI(** 
» FETCH 
• SfBOCRTV 



••*•********«•• 



• G"» • 

• * 
**** 



.* NEXT *. NO .» 

*. PARAHETER .* X*. 

•. 'REP' .* « 



.COHPASS 
X 
• ••• 

* • 

• AS * 



NEXT 
PARAHETER 
. "DEt' 



.* 



* XES 

Idblpass 

X 

«••*» 
*NC • 
* A1* 





• 


NEXT *. IBS 


. ..X* 




PARAHETBB .*.... 




* 


■COM* .* 
*. •• • 
*. .* X 

• NO •»**• 

♦ He • 

• Alt* 
• • 

« 
X COHPASS 
.•• 
J5 •• 
• •. 




* 


NEXT *. YES 


* 




PARAHETER .*.... 






•ALH' .» 

• • •• . 

*. .• X 

• MO **••• 
•ND • 
* A2* 

* * 
• 
X ALHPASS 
.*. 
Kb *. 

* •• 




* 


NEXT *. YES 


♦ 




PABAnET£B .*.... 




* 


•SEG' .* 

'*. .*' SBGPASSX 
• MU ****« 
• HD • 
.DOCVEI * A«* 
X • • 
«••• • 



Charts 219 



Chart NC. $$BOCRTM - Screen Management Mode (Part 2 of 3) 
(Refer to Chart 19) 



•MB • 

* • 



*UPDkTB COHHAKD * 

• 4DDBBSS * 

• BBGISrSR • 

• • 



• 

• &VOID TB&T 
*>OBL* IS TESTED' 

• ham* 



««*«ci********** 



•••••*••*****•** 



♦ . •• 

*. .♦ 

* YBS 



••••PI* *»«•*•**• 



«••••*••«•*••••• 



•••• 




••••• 


• • 




• IB • 


• »3 • 




• B5^ 


• • 




* • 


«••• 




• 


CHalBIIG X 


COIPtSS X 


•••••t3^«^*^****< 




»*m»mm*»**»****» 


• 4 




» • 


* GET (BIT < 




•UPDITE COHBAHO • 


..X* CBABtCIBK 1 




• BODBESS • 


• < 




• BBGISTBB • 


* * 




• « 


•••*•«••••••••••« 

* » 




••••••«•••••••••« 




• 


•NO • 




« 


» K2* 




, 


•••*• 

X 
.•• 




X^ 


B3 *. 






.* •• 




• • 


.* •• 


IBS 


* AVOID THAT • 


*. BLANK .*.... 


••COB' IS TESTED^ 


•. .• 


, 


• AGAIH • 


•• .• 




• • 


•. •• 


X 


••••••••••*•••••• 


• HO 


•*••• 

• BB • 

* D«* 

* • 
• 


1 


X DOCPBZ 


, 


• •• 




X 


C3 ». 




•••••C <>••*••«'•••• 


• • *. 




• • 


.» •• 


HO 


• GET HBXI • 


♦. ',' ...... 


• CBABACTBB • 


*. .* 




• * 


*. -• 


^ 


• • 


». .♦ 


X 


*••••••*••••••*•• 


• YES 


••••• 
•HB • 
• G»* 


I 


X 


• • 


^ 


*•*•* 


• 




•MB * DOCVEX 


X 


• H3» 




.•. 


« * 




DO *. 


* 




• • •• 


8PT 




• • *. 



••••pll»****«**« 



**••*•••*•*••** 





•. KES. 


BLANK 


.»..X. 




* 


,* 




• . •• 


X 


• HO 


*•**« 




*HB • 




• G4* 




* ♦ 




• 




DOCVEX 


.*. 


DELXES 


1 *. 


••••*H2******^^** 


* 


• • 




*. tes * IHOICATE * 


•I' 


• • i* AUTOHATIC ♦ 




• • DEIETIOH • 


,• 


♦ • 


*. .* 


•••••••••**••*••* 



••••* 

• HB • 

• GO* 

* • 



* IHOICATE • 
.X* COHVEBSIOH * 

• BODB • 

« « 

*•••••«•«••••«•«• 



X 




• •« 




Jl •. 




• • *. 




.* *. 


NO '. 


•H' .♦ 


• • • • • 


*. .* 




*- -• 


, 


•• •• 


X 


• JES 


««•«« 




• MB • 






• GO* 






* * 






* 




DOCVEX 


ii 




••K1**«**^* 




• • 




• RESET DEL=Y • 




INUICtTOR » 




• * 




• « 




♦•«•«•«•*•• 






X 





Jo' 


" HO 






.* * 








«, 


HO '. 


•H* 


* 




'*. .* 




, 


*. .* 




X 




* lES 




***** 
*HB * 
• GO^ 

• * . 

♦ 






COCVBX 


♦ •KO* 


i****« 






« 




SET OPP 


• 




COHVEBSIOH 


« 




no DP. 


• 
• 




«•******••• 






X... 







«**« 

* • 

* *J » 

* * 
**•• 



***« 
« * 

* A3 * 



220 DOS/VSE Logical Transients 



Chart ND. $$BOCETN - Screen Management Mode (Part 3 of 3) 
(Refer to Chart 19) 



• HB * 
» J5* 



••••• 
•HB • 
* K5* 



•UPDATE CONfllMD * 

• kOOBESS • 

• BBGISTEB • 



*aPOATe COBHAIID • 

• IDDBBSS • 

• BBGISTEB • 

• • 



m * 

• AVOID THAT • 
••ALB* IS TESTED* 
« AGAIN • 

• • 



••»**Bit********** 

• • 

* AVOID THAT • 
♦•SEG" IS TESTED* 

• AGAII * 

* * 
•**•*•*•*•*•**••• 



*****C2********** 



••••»C<t********«» 



•«*«••**»•*««•«•« 



••*•••*•***«***•« 



*. BLANK 



BLANK .* 



**»**F2********** 



•****Fi|********** 



»•••••*••*«•••**• 



••*•**••*••*•**»« 



•****•••*••••*•*« 



X NO .* DIGITS *. 

*. HITHIN 

*. VALID .* 
*.BANGE.* 



*•**< 

• HB • 

• GU* 

* « 

UOCVBX 



••K2******* 
« * 

• SET OFF * 

* ALABH * 

• IHCICATOB » 
* * 

«•••*••*•*• 

ICHAINING 



*••*• 
*NC • 
* A3* 



***«*Jlt***«****** 

• INSERT • 

• DIGITS * 

• INTO • 

• SE6VAL1 • 

• FIELD * 
•«*••***••*••••«• 



Charts 221 



Chart NE. $$BOCRTO - Line Number Display (Part 1 of 2) 
(Refer to Chart 19) 



* • 

* »i • 



• • 

• SSBOCBTO • 

• * 



«*«**B1 ********** 



**«**I13*******«*» 



••***•*«***•**•** 



X. 


•BF • 


OPBTKUR Z 


• K3* 


•«*«*llt«****«**** 


* • 


* INSEST/DBLBIB * 

* LINE MDHBEBS * 


« 




• IN HESStSB •!.. 




• *BEk * 





******«*•**••«*** 



>*B5******* 



*****«*«***•«•*** 



**«*••*«*** 



LIMB KO. *. KBS 

DELEIIOH .* 

.IRDICATOil.* 
». SET .* 



* RO 




***** 

*»r * 
♦ *j* 

* • 
* 




SKIPTOB 


• *. 






01 *. 






« * 






COHVEBS 


• 


IBS 


DBLETIOR 




*• .. • 



• •••«2^«******«*i 



•••«*••••*••••••< 



**•* 

* • 

* »• • 

* • 
*••* 



•••**H1********* 



• *•* 
*RF • 

* H3 '.l 



••**D3*»**««***« 



•*•*«•*••«**•••* 



••••«Q3*»*»***««* 

• • 
•OPDAIE coaniMD * 

• lOOBBSS * 

• REGISTBB BT 3 * 

• • 
•**•**••*•**«••«* 



•••••H3********»* 



*••••••«•«•••«**• 



****«J2********** 

* * 

* GET ICDRBSS * 

* OF INVALID • 

* CHABACTBB • 

* * 
****•*«•***•***** 



****K2********* 

• FETCH » 

• •IBOCBTY * 

• « 
***•»•***•***** 



*****K3******«*«« 



«••••••*****«*«•* 



•***Clt********* 

• PEICH » 

• SSBOCRII * 

• * 
•*••**••*••***• 



****C5********* 
» FETCB • 

* SSBOCBTF • 

• • 
«*******•*«*••* 



• ■•« 

* » 

• 13 • 



**** 

* »« * 

• * 
***• 



222 DOS/VSE Logical Transients 



Chart NF. $$BOCRTO - Line Numuer Display (Part 2 of 2) 
(Refer to Chart 19) 



•SB • 
• CU 



«««>*••«•«•««*«*•« 



»«***D]********«« 



•«**«•*••»••*••*« 



E3 *. 

BLANK 



»**«*g3«»*******« 



»«•*•*«»••••••••• 



••••• 

• IB • 

* J2» 

• • 

COHBSC 



•••*•••»••• 



•••••|[3*«**««**«* 

• • 

• IHOICtTB • 

• DELBTIO* or « 

• LINE HUBBERS • 

• • 



. OPBTBOB 

X 
••••• 



Charts 223 



Chart NS. $$BOCRTP - Exit Interphase (Part 1 of 2) 
(Refer to Chart 19) 



• • 

• StBOCBTP * 



**C2******* 



»•••••**•*• 



*«**02********* 

BRtlCU VIA 
HBGIStER 7 

X 

•*«*S2******«** 

SET OFF 

AUDIBLE 

11* BN 



.* HUE •. a 

*.IIURBIBS TO BE.*. 
*. DELBTBO .* 



••••*G2********«* 

• * 

• DELETE LIES * 

• MURBEBS IR • 

• BBSSEGE ARE* • 

• » 



• SCBBEB I/O * 

• RODTIRB • 

• • 



PBOTIDE 
CHABHEl 
PROCRAR 



• PBOflOE 

• I/F TO 

• SUPBBTISOa 

* 



•••••Oil********** 

• * 

• BRARCH IHTO • 

• SUPBRflSOR * 

• (SIO| » 

• * 
•**«••**•*****•** 



•******••*••**«« 



••••Q^*****«*«* 

» FRICB • 
> tSBOCRTE • 

» a 

••••*****•••*•* 



-••*-•-•-•-*-*-• 

HKITB MESSAGE • 

AREA * 

• 
•••••••*••••«••* 



****||l|***»***** 

* « 

• 8ET0RR * 

» ■ « 

•*••••*•••**•«» 



.* INVALID *. «0 
CURSOR .*... 
•• SETTING .» 



♦ VES ••••♦ 
*NH * 

.connoNi * Ai* 



•••** 

• B<l* 



224 DOS/VSE Logical Transients 



Chart MH. $$BOCRTP - Exit Interphase 
(Refer to Chart 19} 



(Part 2 o£ 2) 



*N6 * 



PBVDIISttI .*. 



.•INSTBUCIIOII*. XgS 
•. LINE TO .*.... 

*BB CtBlBED.* 



•••••0 )*••••••••* 

• CLBIB • 

• IRSTRUCTION * 
*IINE tND BIIT8T • 

• »BB« BUFFBB • 

• • 



« 

CLEiB * 

INSTBUCTION *. 

LIRE BOFFEB * 

• 



COBHON 

•xpBooii na* 

* WBIIB SCBEBI • 



••»*••••••*••**•« 



COBHOII X 

••••*Blt»********* 



*•*•••*••••••••** 



•I0F0DT1 BO* 

•-•-♦»•-•-•-•-»-• 

* HRITB IRSIB. • 

* LIRE TUBOUGH • 

* NABRIRG LIRB • 

•••• I 



ROCURS 

•I0ROUT1 RG« 

...X* RBIIE BBSSAGB • 
* ABBA ARD • 
•IRSXBOCT. LIRE • 



EXIT X 



•*•••••**•••*•** 



• SET CDBSOR * 

• TO 1st * 

• IHFOI LIRB * 



••*••••*•*«•••*•• 



ATTBXIT ^,...,^ 


* 





*••«••••••••*•••• 



.* RRITE SCBEER • 
•RITROUI HARRIIG* 
* LIRE • 



* FETCH « 

* SCBOCBTA * 



|i*«**F2********** 



•••••••*••••••••« 



• FETCH • 

• PHASE * 



Charts 225 



Chart NJ,. $$BOCRTQ - Deletion of Message Lines (Part 1 of 2) 
(Refer to Chart 19) 



• tSBOCBTQ * 



.•BRTKI FBOH *. 
.« AMD SCRBBM .* 

*. FOU .• 



.* tOTOHATIC 
. DELETION 
*. HOOB 



♦ Bit * 

• E2* 



•••••ei**»*»***«* 



*•««•••*•»••*•*•• 



• ■ f Dunncn 
•.ROT FDLt 
*. .♦ 
• • .* 
• IBS 



**E2******* 



••••••«*••• 



****]) 14* ««****«* 

• FETCH ♦ 

• SS BOCBTH * 

• « 



SB6LIH 

•••**F1********** 

• TBIHSFBB • 

• HESSkGB TIPES • 
•m COBIIMakTIOK* 

• LIIBS ALSO • 

• • 



***»*6 1*******«* 
• 

* GET HURBBB OF 
•LOWEST LIRE TO 

• BE DELETED 
• 



•••• 

*Rlt * 

• F1 •.! 



CORHKRO OB 
•BQUIVILERT. 



*.BMTBX FSOn X 



••H2*»*»**» 



BESET 

X-PASS 

IREICAT08 



•»********•*•**« 



****H3***»«**** 

* FETCH • 

* S»B0CBI0 * 

* t 



***** 

• NK • 

• Kl* 



• DELETIOR 


*. RO 


BI CUBSOB 


.*.... 


♦ , 


* 


• • .* 


, 


♦ • .* 


X LSTSEG 


• YES 


***** 




*RK • 


. 


* BI* 



***** 
*RK • 
• A1» 



226 DOS/VSE Logical Transients 



Chart NK. $$BOCRTQ - Deletion of Message Lines (Part 2 of 2) 
(Refer to Chart 19) 



COBBEHT *. IBS 
LIRE EQ. .*.... 
. OPPBE .* 
•.LIBIT.* 



IHY LIBES 

kLBE&DY 

. DBLBTED . 



*****C I********** 

* • 

• SHiri CUB8EMT * 

• imE IN * 

* PBBVIODS ONE • 

« • 



UPDtTEl 

••••*01* 



* GET NEXT LINE 



••*•*•**«»•••••* 



• *. IBS 

laSTBOCTION .*.... 
*. LIME .* 



.* DELETION 
.X*. DOE TO 

*. CONHkND 



» KETCH * 

• tSBOCRTP • 

* • 



•NJ » 

* B«» 



.•OPPRB LINE *. MO 
LIMIT .*... 
•.EXCEEDED .* 



»MJ • 
* H1» 



10 .• COMT. *. 
..•.POLLOHS UPPEB.* 
«. LIBIT .* 



* GET NIBE OP • 

* PRISE NUICH • 

• HXS BEQUIBBO • 

• THE DELETION • 

« • 



****G3***«**«** 

* « 

* FETCN PBkSE • 

* • 



.* K-CBD OB 


« 


XES 




..X*. CUBSOB 




*• . . . 


*. 


* 






♦. .* 








• . .• 








••*» • MO 
















HI * I 








• . 








•*•• 








Jl' *•. 








.♦ ♦ 








BO .• IS LINE 


* 






....*. PBOTECTED 




« 




X •. 


* 






*. .* 








• . .» 








• IBS 








*••* 








•NJ • .X... 








• Jl ••X. 








. * * . 






. *«•* X 






.INPBO .*. 






K1 •. 






.* • 






.lES .* LIME 


* 


MO 


....*. INTEBNAL 


• 


*,.., 


•.PBOTECTED 







» * 

« « 

X* DELETE LINE *. 

* • 



Charts 227 



Chart PA- $$BOCRTR - Read Processor Part 1 (Part \ of 3) 
(Refer to Chart 18) 



***** 

*PB « 
* J1* 



• «•* 
* * 

« * 

• •*• 



****A I********* 

• * 

• StBOCSTR * 

• * 

•««*****•**«*** 



»0 .» • 

. ..*. SEIURII FROM 
*.SSBOCBIE .* 



•**«*C1 ********** 

* * 

* RBSET BETURM * 

* ZHDIC. BBtNCH * 

* VI* BEG. 7 * 

* • 
***************** 



***«*01*** ******* 



»***•••******** 



•*21******* 
» SET OH * 
•SDPPBESS ICL* 
BIT' IN * 
CBTCCll * 
» * 

*********** 



.* IS THIS *. IBS 
.CONimotTION .*... 
*. BEAD ON .* 
•• CBT .* 



*****G1 ********** 

* * 

* LOCK KBIBOABD * 

* IF IPL IH * 

* PBOGBESS * 

* * 
*•*•*••*««•**•*** 



****«H1 ********** 
*BEADBT PC* 
*-»-»-*-•-*-«-*-• 

* ISSOE BEkD ON * 

* CBT TO CHECK * 

* CONDITION * 
***•<*********•** 



****«J1 *****•*•> 
* 

* CALCULATE 

* NUHBBB OF 

* BITES BEAD 
* 
••*«»*****•••*•* 



.* nOBE THAN *. N 
.3 CHABACTEBS .*. 
*. BEAD .* 



CONTBD X 

*****A2********** 

* LOAD • 

• BEGISTER 11 * 
*HITU LENGTH OF * 

• INPUT AREA • 

* « 
••**«********««** 



*****B2* ********* 
•LOAD BEGISTEH F* 

* KITH BEGIN * 

* ADDRESS OF * 

* DATA IN * 

* INPUT AREA • 
***************** 



*****C2* ********* 

* * 

* CLEAB INPUT * 

* AREA WITH • 

* ZEROS * 
» * 
***************** 



*****02********** 

* * 

* HOVE STABT * 

* FIELD ORDER * 
*IIITO INPUT ABEA* 

* » 
***************** 



*****£2********** 

* SAVE BEGIN * 

* ADDBESS OF * 

* UNPROTECTED * 

* INPUT AREA * 

* IN BEG. 6 * 
***************** 

***• 

* • 

* F2 *.X 

* * 
• *** 

LOOP X 

*****f2********** 
•IICCHK PB* 
•-*-*-*-*-*-*-*-* 

* * 

* TEST FOB TIC * 

* * 
***************** 



***««H2********** 

* HOVE STABT * 

* FIELD ORDER * 

* TO PROTECT * 

* REMAINING * 

* INPUT AREA * 
»••***«*••••***** 



• •*• 

• * 

• AU * 

• * 
**** 



* CALCULATE END • 
X* ADDRESS OF * 

* INP AREA * 

* * 
***************** 



****H3********* 

• FETCH • 

• StBOCBIS > 

• « 
*•**•••*•*****• 



*••****•****•«*** 



•****B4********** 

* • 

* * 
*CL£AR BEGISTER • 

* • 

* * 
***************** 



•****Cit****«***** 

* ISSUE 6ET0ADR * 

* HACBO TO GET * 

* VIRTUAL I/O • 

* AREA ADDBESS * 

* • 
***•••***•*****•* 



*****D«********** 
•LOAD BEGISTER 5* 

* HITH VIRTUAL • 

* I/O AREA * 

* ADDBESS * 

* * 
*•*••******•***•* 



*****Eit********** 

* * 

* BBSIOBB * 

* BEGISTEBS * 

* 8 4ID F • 

* • 
•**•***»«•****••• 



****«pi|*«**»***** 

* • 

* LOAD ADDRESS * 

* OF DATA TO • 

* BE IIOVBD • 

* * 
*****•••••***•«•• 



* ****GI|* •*••*»**• 

* SKIP CCN IF * 

* HOBB THAN 80 • 

* BXIES ILBBADX * 

* BOVED * 

* « 
***•****•**«•*••• 



•****Hll******«*« 
* 

• UPDATE END 

• ADDBESS OF 

• HBITE DATA 
* 
**«*****•****••* 



*****Jl|********** 

* * 

* ROVE DATA • 

* IITO INPUT * 

* ABEA • 

* * 
***************** 



*****A5*********« 



***************** 



*.DATA CHAINING.*. 



* TEST FOR TIC • 

• • 
•*•******•»•••••• 



HODAT X 

****«D5********** 

* SAVE BEGIN • 

* ADDRESS OF • 

* UHPKOIECTBD • 

* INPUT AREA • 

* IN REGISTER 6 • 
***************** 



***** g5*»»******* 

* REDUCE END • 
*ADDB. OF NRITB • 

* DATA BI 1 • 

* BECAUSE OF SI * 
*FLO OBOES BITE • 
**********•***••• 



•••**r5**«****»** 

* BOVB SIABI • 

* FIELD OBDBB • 

* FOB BEAD • 

* BEHIND HRIIE • 

* DATA • 
******•***••«•••• 



*****GS********** 

* ADD LENGTH OP • 

* STABT FIELD * 

* OIDBB TO END • 

* ADDBESS OF • 

* HRIIE DATA • 
••*»*••****•••••• 



*****H5*********» 
*LOAO LENGTH OF • 

* SCREEN IflAGB • 

* VITHOUI • 

* NARNING LINE * 

* • 
******•*****•*••* 



*****J5********** 
*ADD 2 TO LENGTH* 

• OF SCalBG • 

• BECAUSE OF • 

• ADDITIONAL * 

• SIFOROBR • 
********•••**••*« 



* F2 * 

* * 
••** 



' XES 

Inoibeady 



***** 
*PB * 
* Al* 



228 DOS/VSE Logical Transients 



Chart PB- $$BOCRTR - Read Processor Part il (Part 2 of 3) 
(Refer to Chart 18) 



NOTBEADI X 

*tLARM PC* 

* * 

* ISSUE ALARM * 



***«A2*''******* 

* * 

• TEST FOB TIC • 

« * 



*«**Al|********* 

• WAIT FOB * 
<■ OPEBATOB » 

• RESPOKSE * 



* HRIIE HABNIMG * 

* HESSAGE 'BEAD * 

* IS HAITING' * 



.» *. ««**B3«******** 

.« CHAIH TO *. YBS • FETCB » 

*.Be BBOKEN OFF.* X* SSBOCBIC • 

». ,* * • 

*. .* «***«*«««**««** 



••***•*•*** 



HAITI X 

*****C1 ******** 
*ATT»AIT P 
*-*-•-«-•-*-*-« 



***************** 



It* «**(;3*« «**««*«« 



***************** 



» ATIBiriOl 
INTEBRUPT 

'. peNDiMe . 



*****C5********** 

* • 

* SET INDICATOB • 
.X*tQ 6KT CONTIOL * 

•AFTEB IBtBBBUPT* 

* • 
*••***•******•••• 



****«Q1********** 

*BEADBT PC* 

*-*-*-*-*-*-*-•-• 

* READ MHOLE * 

* INPUT ABEA * 

* * 

* **************** 



****02********* 

* * 
> HEtUBK * 

* « 
**««•****««**** 



• B2 * 

* * 
**** 



« * 

• BEIURN * 
> • 

•«****•«**••*«* 



*****l)5»**»*»«*«« 



••«»«*•••••*•••«• 



*****BS********** 

* * 

* BESET * 
*INDICAIOB AFTEB* 

* IKTEBBUPT * 

* o 
***«*««*»««*«*««« 



««*«*p^***«*««*t** 



**•*********•*•«* 



****FS* ******** 

• • 

• RBIUBH * 

> * 

*****•••••**«•• 



**G1******* 



*********** 



•***»||1 ••**»•••*• 
*HBTIIRNG PC* 

•-•-*-*-•-•-•-•-• 

* HRITB HABIIIIIG • 

* tmE (FOB * 

* CLEABIBG) • 
***************** 



• •*•* 
*PA * 

• A2* 

* * 

* 

CONTBD 



***** 

♦ PC » 

* G2* 



Charts 229 



Chart PC. $$BOCRTR - Read Pcocessoc Part 1 (Part 3 of 3) 
(Refer to Chart 18) 



****A2********* 
• • 

•BEAD EiTBI »RB«« 

« • 



* 8RITB lABBtBG * 

* BBSStGB • 

* * 



• « 

• ISSUB ItUBB « 

• • 



• PBOVIDB » 

• CHBHNBL « 

• eaOGBAB • 

• « 



• PBOVIDB • 

• CBklNBL • 

• PROGRAH • 

• * 



• PROTIOB • 

• CHABBBL • 

• PR06BAB * 

• » 



« * 

* ISSUE BEAD • 



•****C3****«****« 
*IOBOUT PC» 

* ISSOB 8RITB • 



••CIt******* 

• « 

SET ALABH PXIG* 



••••••*•*«* 



* • 

• BBTURM • 
» « 



****03********* 

* • 

* RBIUBH * 

* • 



*ioaooT PC* 

* VRITE BBSSAGB • 

* ABBA * 

* « 



«««4>B2*** ****** 




• SCBBBR I/O 

* BOOIINB 




* 






• 




• 




« 








»••* I 








* * • 








* P2 *.X. 








* * . 








*••• t 








loaouT .*. 






NOATTERT 


F2 *. 






•****F ]********•* 


.* *. 






* • 


.* ATTBBTIOH 


*. 


NO 


* PBOVIOE I/F * 


*• INTEBRUPT 


« 


*• •• • 


••..X* TO SUPBBVISOR * 


*. 




* « 


*. .* 






• • 


*. .* 






••*•••*•*•«•*•**« 


* YES 








• •«* 








♦PB • 








* K1 *.X. 








* * . 








•*•» 






lORETRR X 


X 






• ••••G3*.********« 


•***G2*»******* 




• * • * 


• FEICH 




« 


* * SVC 7 • * 


• tSBOCBTK 




* 


• * IIAIT • • 



****B<I******«** 



•**••*•****•*•* 



•«•••••*••••••* 



* • • * 

• * • * 



* F2 • 

• * 



• FBTCH • 

• $SBOCRIB « 

• • 



* • 

* BBTUBN * 

» * 

***•**•«*»•*••» 



230 DOS/VSE Logical Transients 



Chart PD- $$BOCRTS - Read Processor Part 2 (Part 1 of 3) 
(Refer to Chart 18) 



• * 

* SSBOCBTS • 

* • 



*PE * 
• B3* 

* * 
* 


* hi * 

* * 
♦•** 

Fin X 

« * 
•PROTECT IMPOT* 






• BBID FIELD • 



»*C1***»**» 

• BESET • 
INDICITOBS 
BBtHCH VIA 
REGISTEB 7 

* * 



***«*««*«*« 



*IMCBENEIIT BKIE * 

* CODHT BY 1 * 

• BECAUSE OF •- 

* IDDITIOIIAL ST * 

• FIELD OBD * 
***************** 



**Q-)******* 

* SET OH • 
•SOPPBESS 
ICl BIT' 

iM careen 

* * 



.*IS PHASE S *. 

•. ENTERED FOB . 

•.COMT.BEAD.* 



*****f1*****»**** 

* * 

* LOAD DSEB CCR * 

* ADDRESS INTO • 

* BEGISTBB D • 

* • 
***************** 

**** ', 

*PE • 
*C3 *.X. 



* * 

•LOAD BECISTBB 1* 
*«ITH BTTE COOHT* 

* OF BEAD ecu • 

* • 
***************** 



•LOAD BEGISTEB D* 
X*HITU ADOBESS OF* 
•COST. BEAD CC« • 

• • 

««««•*••«*•••*«•• 



*»***f2********** 

* CALCULATE • 
•REHAIMIHG BITE • 
•COOHT FOB THIS • 

* READ ecu • 

* • 



C0BTBD1 X 

•••••HI********** 

* UPDATE DATA * 

* ADDRESS OP * 
*IHPnT AREA HITH* 

* BYTE COUNT OF * 

* READ ecu * 
***************** 



**************** 



•••••B4*^******** 

* • 

* CLEAB • 

* mSTBOCTIOK • 
*LIIIE fllTH ZBBOS* 

* • 
••***«•*••••«•••• 



•••••C4* *******«• 

* HOVE HSSSAGE * 

* 'EIITEB • 

* BESPONSE' * 
•INTO IHSTBUCT- * 

* ION Lias • 
**•••*•*****••*•• 



**j^l^******* 

* SET 'REST * 
*KBIB AND ATT ♦ 

* IDENT' AND * 
*>SOOIIO ALABE** 

* BITS * 
•••*••••••• 



**«**E<t*******«** 
*IOROUT PF* 
*-**«-*-*-*-*-*•>* 

* VBIIE SCaBEM * 

* IHAGE * 

* • 
••••••••••••••••• 



* »AII FOB 

* ATTBRTIOM 

* IHIEBBUPT 

*****«********««i 



•••••Cll^«*^^»^** 
• 

* LOCK KEYBOABD 

* IF IPL IS IN 

* PBOGBBSS 
• 
**•**•*****•••*• 



*****^H********** 
*BEAORT PF* 

*-*->*—*****-«-.*—* 

* ISSUE READ * 

* HODIFIED • 

* COHHAHD • 

••••••«•**••••*«« 



AREA 

, • 
. .* 
* MO 



•IS 
KEI 

*. 


BEQOBSI • 
PRESSED 


YES 
♦ . ... 


*. 


.♦ 








•• .* 
* NO 




X 

• •*** 
•PE * 

• A5^ 

* • 

* 




X 


COETBOL 



* YES *•*• 
InEXTCCWI • Ai • 



XRBTBX 
«***• 

• PS * 

• A«* 



Charts 231 



Chart PE. 



$$BOCRTS - Read 
(Refer to Chart 



Processor Part 2 (Part 2 of 3) 
18) 



•PD ♦ 



.* IS IT • 


. IBS 


*.C0IITIMD4TION 


.*........ 


*. REtD .• 




♦. .* 




*. .• 




* HO 




*•*• 




• * . 




• B1 *.X. 




* * • 




«•*• 




IBtDHI X 




••»*»g1********** 


* SUVE AODBSSS 




• OF BBID CCH 




• IR coiirccH 




• (FULLHOBD) 





••••**••«*•*•••** 



••CI******* 

» SET OH • 

• INDICATOR * 

• (00CB01) tS * 

•COMTBOST HOST* 

•BE UPOBTEO • 

•••*•«*««•« 



*»«**D ^c********* 



••«*••••••••«••«• 



•LOAD tDDBESS OF* 

X*COMI. BEAD ecu • 

•IBIO BB6ISIEB «• 

• • 

••••*••*•*«•*•**• 



•«*»*B2********** 

* * 
•LOAD BUBBEB OF * 

* BITES HOVBO * 
*IIITO BE6ISTBB S* 

* • 



*«**«C2********** 

* LOAD BEGISTBB • 

* J Hlia BITE * 

* COOHT OF • 

* CORTINOED * 

* BEAD ecu » 



«****j)2******««** 

* SUBTBACT BYTE • 

* COaVT OF DATA * 

* ALEEADI MOVED * 

* FBOH • 

* BBGISTES 3 * 
•••••*•••••«••••• 



BEXTCCH 1 X 

•••**13**«»*«***« 

* LOAD BEGISTBB * 

* D HIIH THE * 
•AODBESS OF THE • 

* RBXT BEAD CCH * 
« • 
•«***•••••***•••• 



• CLEAB * 

• mSTBDCIIOB * 
•LIIB HITH ZBBOS* 

• • 
••••••«•*•••••••• 



•****D3«**«**«**« 



••*•**••••**••*** 






•-•-•-•-*-•-•-»-* 
* ISSOB * 


, 


*IBITB (* 


, 


• FOB CLEABIHG) * 
••••••••*•••••»•« 


X 


••••« 




*PD • 




• G1* 




• • 




HAII 






i 








* FETCH * 




* SSBOCBTB • 



••*••*«•••••••• 



• CLEAB • 

• IISTBOCIIOH * 
•LIBB NITB ZBBOS* 

• • 
••••*•••••••••••• 





••B4******* 


••*«»B5****«***«^ 




* BESET * 


« BOITB BBSSAGB • 


BS 


* •SOUBD* ABD * 


••BHTBB COBBABD'* 




* • BEST * 


* IBtO • 


. 


* KEXBOABD' * 


• IBSTBUCTIOB • 


, 


* BITS • 


• LIBB • 


X 




••••«****•••••••• 


*•••• 


^ 


^ 


•PD * 


. 


. 



•*C5******* 
•SET BIT FOB* 

* 'BEST KEXB • 
*ABO ATT IDBBI* 

* ABO 'SOaBO* • 
* BITS • 

•»••*•*•••• 



••••«D5*********« 
•HBITTBB PF* 

•-•-•••-•-•-•—•-• 

* ISSOB MBITB • 

* SDBBOUTIBB * 

* • 
•••**••*••••••••• 



•••**g1********** 
• • 

*CLEAB BEGISTER * 



•••••••**«••*•••• 



••***p )••••••*«•* 

• ISSDE GBTDAOR * 

• HACBO TO GET * 

• VIRTUAL I/O * 

• AREA ADDRESS * 

• • 
••••*•****•«•*••* 



••••*S1 ••••*«*•»• 

* LOAD VXRTOAL * 

* I/O AREA * 

* ADDBESS INTO * 

* BEGISTBB 5 * 

* FOB EX IISTB. * 
••••••••«••••*••• 



»****B2********** 



•*••*••*•***•«*«* 



•••»*F2********** 



•••••**•••••*•«•* 



«****G2*******«** 



••••••*•«•••••«•• 



HO .* ASXHOC> *. 
...*. IBS 

•.GENERATED.* 



•*•• 

• • 

• All * 

• • 
•*•• 



•••••G3**«******« 

* SIBOLATE • 

* RESIDUAL • 

* COO NT FOB 

* ENTER * 

* • 
*•*••••«•••*•••«« 



• X. 



BO * ATTBHIIOM 
. ..* TASK 
* BEADX 



***•••••*** 



•••••BS********** 
* ATTN AIT PF* 
•-•-•-•-•-•-•••-• 

• HAIT FOB • 

• AITEBIIOH • 

• IHTEBBOPT • 
••••••*••**•••••• 



•BBADBT PF^ 

•-•-•-•-•-•-•-•-• 

• ISSUE READ • 

• BODIFIED * 

• • 
•••••••••••«••••• 



•*«**H1*^^*^^^^^* 

* • 

* BBTOBE * 

* BEGISTEBS 8 • 

* ABD F • 

* * 
**••*•••••**••*** 



••••*j I********** 

• • 
•LOAD UXTB COUHI^ 
•INTO REGISTER i* 

• FOB EX IHSTB. • 

• • 
•«***••••••••••«• 



• • 
•CISAB SAVE ABEA^ 
•FOR BYTE COOHT • 

• (CONTBOSV) • 

••*••«•••••*•**** 



• •••«II2*^******** 



REGISTER 5 

« m 

•*•••»«•••••*•••• 



•*«»»J2^********* 



••*••••••*•***•** 



«*»*K2********* 

• FETCH • 

• St BOCRTT * 

• « 
••**•••••***••• 



••Ba^*****^ 

* • 

INDICATE 

BBQOEST 
PBIDIH6 

• • 
•*•«••*•••• 



••J<l«**«*^^ 

• • 
•PROVIOB THAI • 

• REfgBH IS TO • 
• SiBOCRTB • 

• • 
••••••*•••• 



* FETCH • 

* SSBOCRTK • 

* • 
••••••«•••*•••• 



• ••• 

• • 

• A5^ 

• • 
•••* 



232 DOS/VSE Logical Transients 



Chart PF- $$BOCRTS - Read Processor Part 2 
(Refer to Chart 18) 



(Part 3 of 3) 



•***ti*** •••••* 



••••••*•••••«•• 



••••(2********* 

• • 

• REAOBT • 

» * 



» « 

» KBItB » 
■> « 



* MIT FOR • 

* OPBRATOB • 

* KBSroNSB • 



*•**••••••••*•••• 



BEAOBT X 

**B2******* 

•SET SCREBI • 

•IB*GE lOORESS* 

• or lEPUT LIIE * 

• liTO CRtCCH * 

• « 



* CLBIR IRPOr * 

• *RE1 HITH * 
« ZEROS • 

« • 



••*••••*••» 



•••••CI********** 

* BRANCH TO • 

• SOPBRflSOR • 
» (SIO> • 

********••***•*•• 



•*C2******* 

* SET BYTE * 
COUET FOR 

HflOLB IRPOT 

ktEk into 

* CBTCCV • 

••••••••••• 



••***C3****^^**** 

* HO»E START • 

* FIELD ORDER * 

* FOR WRITE • 
*I1II0 INPUT tRB4* 

* • 
*•*••••*•••••**•• 



**»**cs********** 

• • 

• PROVIDE THAT * 
I* RETORI IS • 

• TO SSBOCRIS * 
« • 
***••«••••••••••* 



••***D1*«******** 



•*•••«••••••••••* 



••02******* 

* SET READ • 

* HODiriBO 

* COailkRD lETO 

* CBTCCI 

* * 
••••••••••• 



**D3******* 

• SET BITE * 
COUNT FOR * 

BRITB RHOLB * 
SCRIEG INTO • 

• CBTCCU • 
••••••••••• 



••••D4********* 

• . • 

• BETURN • 

« * 

•*«•••••••*••«• 



••***DS**^***** 



•*•*•*••*••*••• 



•••••(2*******^** 

*ioBoai PF* 

•-•-•-•-*-*-*-•-* 

• PBBPOBH I/O * 

• OPBBATIOE * 

• * 
••••••••«*•»*•••• 



••g3^»***^* 

• • 

* SET kOORESS * 
*0P SCREEN IlltGB* 

* INTO CBTCCB * 

* * 
*•***•**•*• 



**85******* 

• * 
SET OFF 
RETUBB 

INOICUUB 

• • 
**••••••••• 



••••P2********* 

• * 

• BETORN * 

• • 
•*••••«*•****•• 



••P3******» 

• • 

• SET yRITS 
COHHANO INTO 

• CHTCCN 

* • 
**••*«•••*• 



•**«F5********* 

* • 

• RETURN • 
« • 

•••«•••**•«•••* 



••••6 ^****»*»*» 

• FETCH • 

• SSBOCBTE * 

• • 
•***•••*••*•••• 



•••••G3«»****^^** 
•lOHOOI PF* 
•-•-*-•-•-•-•-•-* 

* PERPORa I/O * 

* OPERITION • 

* • 
*•***•••**»**•*** 



• BETORN • 

• • 
*****•*•••****••• 



Charts 233 



Chart PG- $$BOCRTT - Read Processor Part 3 (Part 1 of 2) 
(Refer to Chart 18) 



* • 

• (SBOCBTT * 

• * 



■OTXT X 

• BEDUCB N0IIB88 • 

* OF BYTES BEkD • 
•BT 3 UII ID ♦ • 

• COBSOB BOFFBI • 

* tDDBBSSI * 



•***«t3»***«***** 

• SOBTBACT BIIB • 
•COOHT (REGISIBB* 

• 3) Bt 1 FOB * 

• BOVB • 

• INSTBOCTXOa • 



* SCBBBB I/O • 

• BOUTIBB • 



• BBSS! * 

• INDIC4T0B, • 

• BRtMCB Ilk • 

• SE6XSTEB 7 • 

• • 



**D1******* 

• « 

• SBT 

* SUPPRESS ICL 

• IBTO CRVCCH 

• « 



«****B2********** 
« « 

*10*0 RE6ISTEB C* 
•KITH BEGIR IDDR* 
• OF IRPUI tBBk * 
« * 



•••••C2********** 

• * 
•CALCaUXE SIXB * 

* OF INPUT ABE* * 

* FOR THIS BEAD * 

• * 



«****|)2*>******** 



••••••••••«•*«•*• 



•****B3********** 



*««*••*•••***•••• 



*«***C3«********* 

• ADD 1 TO * 

• REGISIBB a * 

• TO RBSTOBE * 

• HUHBEB OF • 

• BITES flOfBD • 

• D3 *.X. 

• • . 

ROMT X 

•****03********** 

• UPDATE DATA * 

• ADDRESS OF * 

• INPUT ABBA • 

• (BBGISTEB A) * 



lOBOUT X 



••••••*••*•«••••• 



• • 

• BBAHCB INTO • 

• SUPERVISOR • 

• (SIO) • 

• • 



• • • * 

• • BAIT FOB • • 

• • RKSPOBSB • • 



**«•«*••••••••••« 



••••*E1********** 

• • 
*LOAD REGISTER D* 
•RITH LERGTB OF * 

• INPUT AREA • 

• • 



• SUBTRACT • 
•RESIDUAL COUNT • 

• TO GET NUMBER • 

• OF BYTES READ * 

• • 



•••••HI********** 

• REDUCE RUBBER * 

• OF BITES BEAD • 

• BI 3 (SET • 
•BUFFER AODRBSS • 



•••• 
BOVBDATA I 

•••••E2*^^******* 

• • 

• ADO COURT OF • 

• DATA TO BE • 
•ROVED TO RB6 F • 

• • 
••••••••••••••*•• 



.*BXTB COUNT •. YES 
•.BORE TBAR THO. *... 
•. LINES .• 



.* BOBE DATA *. 

*. TO BE MOVED . 

*.TBAN ENT..^ 



.•IS CONTBDSV^. 

*. RALFVOBD TO .< 

•.BE INCBH .* 



• • 

• ADD NUMBER OF • 
•BITES ROVED TO * 
•UPDATE COMTRDSV* 

• • 
•**««*•*«*•«**•** 



• FBTCB • 
» SS BOCRTS • 

« • 



«•••• 
•PB • 
• A3^ 



•SAVE BITE COURT* 

• IR CONTBDSV • 

• HALFHOBD * 

• • 
••••••*••••*••••• 



• • 

• RBTURR • 

m « 

*••*•••»••••••• 



NO DATA • 


YES 


.• IS ecu 


TO BE MOVED . 


•••* • 


«. HITH DATA 


.• 


, 


• .CBAIRXIIG 


». •• 




•• •• 


• . .* 


X 


•• .• 


• RO 


«•••• 
♦PH • 
• EM 


• IBS 



• * 

• A2 • 

• • 
• ••• 



•»«*»J3****«***** 



SKIP FLAG •. IBS 


• LOAD ADDBESS * 


IN CCH .*.... 


• OF NEXT CCW • 


• • • ' 


•INTO BBSISTBR «• 


•• .* . 


• » 


• . .» X 


«••**••*••**••••• 


• no •••• 




• • * 


•*•• * 


• D3 * 


•PH • 


X • • 


• BI •.X. 


•••• ••*• 


• • . 


• • 


•*•• X 


* A3 • SXIP1 .*. 


• * 


K3 •. 


• ••* 


.• •• 




.• CHAIN TO •• 




• .BE BBOKBB OFF.^ 



• CLEAR FIBST • 
•BITE OF CORTCCH^ 

• FULLRORD • 

* • 

•*••••••••• 



•••••Ji|^^^*««^^^^ 
•FIRE PH* 

•-•-•-•-•-•••-*-• 

* HBITB SCREEN • 

* IRAFE FOR • 

* CLEARIR6 • 
*•••••••«•«••••** 



• •••Kil**^****** 
• FETCH • 
» SSBOCRTC * 

» • 



234 DOS/VSE Logical Transients 



Chart pa. $$BOCRTT - Read Processor Part 3 (Part 2 of 2) 
(Refer to Chart 18) 



***** 

• PG * 
« G2* 



*«***B1 *****•**•• 



*••*•*•**••*•**•• 



*10»0 BYTE COUHT* 

.JC*OF CHAINEO USEB* 

*CCN INTO REG. 3* 

» * 

««*****•*****«*** 



•*B2******* 
• « 

*SAVE HODR OF 
* HEAD CCH (IN 
» CONTCCB) 

•**••**•«** 



INDICATE 
10 SET UP 
CONTBDSV 

> 4 

•*•*******« 



•«»»*l)2*******«* 



•*•**•**•*•*•«•• 



»*«*«g2* *••**•*•' 



»••»••**•******* 



***«*r2********** 

• ISSUE GETOAOB • 

• HACBO TO GET • 

• VIBTOAI. I/O • 

• ABEA AOOBBSS * 

• « 
**«*•*••*•*•••*•• 



»****G2********** 

• • 
*LOA0 BEGISTBB 5« 

• NITH VIBTUAL • 

• I/O ABEA ADOB * 

• * 
***•**••**•••««•• 



«****H2********* 
* 

• BESTOBE 

• BB6ISTEBS 

• 8 AND F 
* 
*«•*****«****«*« 



***** 
*P6 * 
* E2» 



*****««***«**«*«* 



***«B ]*•****•*« 



»****«********•• 



«****C3********* 

* 

*GET BITE COUNT 

• FOB UAIA 

• A7AILABLB 
* 
***•*«**•***•*** 



•****D3*«******** 

* « 

* LOAD VBKB6 1 • 

* KITH HOVE * 

* LENGTH * 

* * 
••***********«**• 



NO .*IS CONTBDSV*. 

...•NALFHORO TO BE. 

*. IMCBEH .* 



••***F3********** 

* ADD HUHBER OF • 
•BITES HOVED TO * 

* HOVE LENGTH • 

* (REGISTER 1) • 

***************** 



NOAD01 

»*«**G3********** 

• SAVE BYTE • 

♦ COUHT 78ES • 

* 1J IN • 

* CONTBDSV • 

• HALPHOBD * 
*•«*•*••********« 



**I13******* 

• RESET • 

• UPDATE * 

INOICATOB FOB 
» CONTBDSV • 

* (DOCB01I • 
*********** 



***««Blt *•*••**•*• 

* • 

* SUBTRACT HOVE • 

* LENGTH BX t • 
•FOB NOVB INSTB * 

* • 
*•*•••••«•*••*••• 



•••••C'l^^^***^^^* 



*•****«*«*•*««*** 



«**••]> !(••*•••••*• 



****••*•**•*•*••* 



• B2 *.X 



*••* 
MODATA X 

•••**£<•*•*••••••• 

• CALCULATE * 

*BBSIDOAL COUNT • 

..X* FOB THIS USEB « 

. • BEAD CCR • 

« * 

•••*••••*«••••••• 



*****Flk********** 

• * 
•STOBB BESIDUAL • 

* BITE COONI IN • 

• USEB CCB • 

* • 
••**•*••**•••***• 



•••••GK********** 



**••••••*•***••** 



•***A5>******** 
•ZBBO OUT INSTB • 

• LINE AND • 

* INPUT ABBA • 

*•**•*«*••*»••• 



FINE 

*****il5****«***** 

* aOVE START • 
•FIELD OBUEB FOB* 

* 8BITE INTO • 

* INPUT ABBA • 

* • 
•••••••««••••«••• 



**C5***«*** 

• • 

> SET AODB OF • 
SCBEBN IRA6B • 

> INTO CBTCCN • 

• • 
•*••••••••• 



••OS******* 

• • 
•SET LBN6IU OF* 

* SCBBEN IHAGB • 
• INTO CBTCCH • 

• • 
• ••••«••••• 



*>gS***»«»« 

• • 

• SET VBIIB 

* coaaAHo INTO 

• CBTCCN 

• • 



• •F!>**«**** 

• • 
BESET 

CONT BEAD 
FLAG 

• • 
•«••••••*«• 



••G5******* 
» • 

BESET 
•SOUND ALABH* 

BIT 
» • 



«*RS«**«««* 

• SET • 
• 'BBSTOSB • 

> KEXBOAaO* BIT • 
•IF NOT IPL IN* 

• PBOGRESS * 



* H** 
RAINLINB 



• *jl|»«*««»* 

• SET ON • 

• INOICATOB * 
FOB CONT 

• BEAD • 

• (DOCB02I • 
•••*•*••••• 



•***KI|********^ 

* FETCH • 

* SSBOCBIB • 

* • 
»•*•*••••»*•••• 



*•*•• 
•PG • 
• Bi» 



Charts 235 



Chart PJ. $$B0CSTII - Update Wrap- Around Address 
(Re£er to Chart 16) 



• « 

• SSBOCHIO • 

» • 



***B2************ 
HBIte CUBSBKr 
» BLOCK TO • 
HC-FILE 



••••••*••«•*•••*• 



CBTUIO .*. 

CI *• 

.* •• 
.* OVEBJ.iI *. MO 


• •• 

C2 •• 
.• HBAP- *. 
.* ABOUHD *. BO 


"" C3-*-.. 
.* OVSBLII 


*. BRTEBBO .* 

•. *rj .• 


*.0PD»tE»G3.« 


•• 



•*«*CI>********* 

• rBTCH • 

• SSBOCBT* * 

• • 



•*!))•*••««• 



*•••*•*«••« 



**02******* 



••••*•*••*« 



••••OH********* 

* FBTCB • 

* (SBOCRTB * 

* • 



••«•*£ I********** 



**•••**•••«••*••« 



* * 

* COPX • 

* FLIG INTO * 

* HEkDEB BBC08D • 

* * 



OVEBLAK 
MODE JUST 
. ENTB8BD . 



• COPY llEU * 

• MBAP AROUHD * 
.X* ADDRESS IBTO * 

• UliADER RECOBD • 

« * 



•F3 OVBBLAI BODE: 
OVBBLAI RODE IS BKEBED 
HBBRBVEB THE HBAP-ABOUID 
POmt OF THE UABD-COPI 
PILE IS OVEBB BITTER. 
SSBOCRTH DETECTS OVBBLAX 
RODE AMD CAUSES IMfALIOA- 
TION OF THB HRAP-ABOOHO 
AD0B8SS IR HEADEB BBCORO 
VIA ttBOCBTD. 



*G3 MRAP-ABOBRD ADOBBSS 
UPDATE: 

PHIRIL06 ROVES TBB HRAP- 
ABOUHD POUT OF THE HABD- 
COPY FILE BY PBIRTIN6 ITS 
COHTBNTS DP 10 THB REM 
HEAP-ABOUND POINT. VIA 
SSBOCRTU IT UPDATES THE 
HBAP-ABODRD ADDRESS IR 
THE UEADEB RECOBD. 



• HHITE HEADER 
RECOBD TO 
» HC-FILB • 



* RE-BEAD • 
CURRENT BLOCK 
• FROH HC-FILE » 



•H3 FORCE HBITIN6 OF 
CURRENT BLOCK: 
FOB BLOCKED HARD-COPY 
FILES A BLOCK IS NOT 
HBITSBM URLBSS IT IS FULL. 
ON SORB OCCASIOHS (I.E. AT 
SYSTEH CLOSE DOMR TIRES. 
BEFORE PBINTLOG STARTS 



HARD-COPY FILE. FOB THIS REASON 
SiBOCBTU IS CALLED BY 
PBINTLOG AND BY THE IJBJC7 ROD 
CONHANO PROCESSOR. . 



236 DOS/VSE Logical Transients 



Chart PK. $$BOC£W - COMMAND Error Message Writer 
(Refer to Chart 20) 



• A2 • 



••**A1********* 
> • 

• S«BOCSTV • 

• « 



•****A2********** 
«I0B00I1 PK» 

• UBIIE SCRIJEH • 

« • 



****A<I********* 

• SCRiiBI I/O * 

• BOOTml • 

• • 



**B2******* 

» * 

SET OFF 

ALIRH 

FL4G 

« « 



• PBOTIDE • 

* CUiMBL • 

• PBOGRAH • 

* * 



••C1*»**»** 



••••*•***•• 



«****C2* ********* 

• • 
« SET COBSOB • 

* AT IB VALID * 

* CaiBACntB • 

• - • 
****••*••*•**«•*,• 



»*•••••*•••••••*• 



• ••*•{) I********** 



*•••*•«»*«••*••*• 



• HBXTE SCREEN * 
t * 



*»*»*Dlt*********< 

• • 

• BBANCH IKTO * 

* SOPEBVISOB • 

* <SIO) * 



* CAICOLATE H/ll * 

* AOOBBSS FOB • 

* COBSOB * 

* POSITIOKIIG • 

* * 



•****£ 3*»*«»*»*** 



********«*••**•*« 



•••**Elt******«« 



***••*****••*•* 



* * 

* CLBAB * 

* INSTBUCTIOB * 

* LIIE * 

* • 



****F2********* 

• FETCH * 
» JJB0CRT1 * 

• * 



••••f 3******«»* 

• FETCH • 

• SSBOCBTP • 

> « 



••Gt******* 

• • 
SET ON 

AlABH 
FLAG 

* ' * 



* F«ICH • 

* «»BOCBTE * 

* « 



.X*SEL£CI HBSSASE * 

• * 

* • 



• * 

* BETORM * 
» * 



* • 

* INSEBT EBROB * 

* MESSAGE FOB * 

* REDISPLAY • 

* * 



»*««*J2********** 

* INSEBT INTO * 
« INSTRUCTION * 

* LINE BOFFER * 

* • 



Charts 237 



Chart QA>. $$BOCRTH - Display Warning Message 
(Refer to Chart 20) 



» • 

* StBOCBIii • 

* • 



••CI ••••••* 



•••*«•««••• 



•••••Ol***^*****' 



•*•••••• 



•••••£ {•••••••••^ 

• • 

•COa» IHIBBIItL * 

• PROIECIBD • 

• LUES • 

• • 
••••••••••••••••• 



•••••t2****^****^ 

• • 

• IIOICAIE THAT • 
.X« $»BOCBTII BIS * 

• H*D COBTBOL • 

• « 
••••••••••••««••• 



••B2******« 



«••««•«*«•• 



•••••C2**^****«*^ 
*IOB00t1 01* 

*-•-•-•-•-♦-•-*-• 

• * 

• ISSUE ALiBB • 

• * 
•••••••**•••*•••• 



•*D2****^** 

« • 

SEI OFF 

ALtBH 

FLAG 

* • 

•••••••*••* 



•••••g2********** 

* PBEPABATIOB * 

* FOB HS6. « 

* •MESSAGE • 

* HAITIHG* • 

* • 
*•••••••••••••••• 



•••••P2********** 
•I0B0UT1 QA* 

*-•-•-•••-•-•-•-• 

* • 

* HBIIB SCBBEB • 

* « 
*••••••••••••*•*• 



• •••^••«****** 

* BAIT FOB « 

* OPBBATOB * 

* B8SP0BSB • 

•*•••••*•«*•••• 



•••«•••*«** 



•••«A5«******** 

• SCBSEM I/O • 

• BOaXIBE • 

• • 
•••*••••«•»•••• 



• PBOflDB • 

• CHABIEL • 

• PBOGBAB • 

• • 
•••*••*•*•••••••• 



****D3********* 

• * 

• BSiaaii * 

» • 

••••••••«••••«• 



•••••ca****^*^*** 

• • 

• PBOVIDB THAT • 
.X* SSBOCBTH BILL • 

• 6BX COMTBOl • 

• • 
*•••••••*•••••••• 



•••••DO********** 



**••*«*•****«•*** 



••EH^****** 

• • 
S8T OFF * 

IHDICATOB FOB 
GEITIBS * 

* COBTBOL • 
••••••••«•« 



****F<I********* 

* • 

* BBXDBH * 

* * 

•••••«•••••••«• 



***************** 



*****])5*********« 

• * 

• BBABCB imo * 

• SUPBBVISOB * 

• (SIO) • 

• * 
****••••*•****••• 



•••••g5^*^*«»»*** 



••«•••••••••••••• 



••••C ^••••••••» 

» FETCH • 

* SSBOCBTI * 

• « 
****•••**•••••• 



•••••g2********** 
•ATTHAIT QA* 
•-•-•-»-*-*-*-*-• 

• HAIT FOB * 

• OPEBATOB * 

• BBSPONSE * 
••••••••••••••••• 



•••••*••••••••• 



• ••••l)2***^^***** 



••«••*••••*•••••• 



•••*H5********* 

« • 

« BETUBII • 

* « 

*•••»••••••«••• 



•••••J 2*** ******* 
*I0B0DT1 QA* 

•-•-•-*-•-•-*-*-• 

* DELETE * 

* 'HESSAGB * 

* UAITING* • 
***************** 



••••K2********* 
» FETCH * 

• StBOCRTK • 

• * 
«••**•••***•*•« 



238 DOS/VSE Logical Transients 



Chart QB, $$BOCRTX - Verify Operator Commands (Part 1 of 2) 
(Refer to Chart 20) 



» »i» * 

« • 



* • 

• « 



> « 

» tSBOCBTX • 

* 4 

*************** 



*****^3********** 

* PBOTIOE tnkt • 

* SSBOCBTX HILl * 

* SET CONTROL « 
» iPTEH »IT. • 

* mTBBBUPT • 
***************** 



****^H****** 
PBOTIDB 
TO FITCH 
SSBOCRTK 



**************** 



**C1*****«* 



•••***•*••* 



*****l}1*mm******* 



***************** 



**•••£ 1*** **»••** 

• CLEAH * 

» INSIBUCTION * 

..X* AMD IMPOT • 

. * LINE BOfFER * 

. • • 

***************** 



**** 

* * 

• * 



*****f^********** 

* * 

* GET BANGE OF • 

* DELETION FBOn * 

* SBGVAt2 * 

* • 
***************** 



>*B3**»******* 



>**•****•*«««* 



*****(;i********* 

* SET OFF 

* INDICATOR 

* FOB SETTING 

* COHTBOL 

• *** * 

* • . 

* D3 *.l. 

* • . 

• «*• 
AT-IPENDO X 

**D3******* 



KKIBOABD 

m 9 

*********** 



* BEAD * 

* OPEBATOB'S • 
» INPUT » 

***************** 



ONLI ONE 
CHARACTBB 
. INPUT . 



• « 
» C5 • 

• * 
• •** 



*****Bb********» 
* 

• PBOVIDE TO 
« FETCH 

• tSBOCBIL 
* 

****************: 

**** 

• * 

• C5 •.! 

1 X 

••***C5********** 
•I0B00I1 QC* 

• BLANK • 

• INSIBUCIIOM • 

• LINE • 



*****0S**«******' 



***************** 



• FETCH • 

• PHASE • 

• « 



*****Q 1********** 

* * 

* PBOVIOB FOB » 

* AUDIBLE * 

* ALARM * 

* * 



••**G2********* 

* FETCH * 

* SSBOCBTP * 

* * 



• OP TO 1 

CHABACTEBS 
*. INPUT . 



***»*ll\**t******* 
♦lOROUTl QC* 

•WRITE •DELETION* 

• RE(i.' AND * 

* K-COHHAKD • 

*•«**«*« *«♦«***«* 



**J1******* 



.*. DOCNBX 


X 


*. 


•••••H«********** 


«. 






B,» *. YES 
HHAND .*.... 




PROVIDE TO * 




FETCH * 


.♦ 




MBOCBIH * 


• • 




* 


. .* I 


**«**««««*««****« 


• NO **** 




^ 


• • 




^ 


• Ab * 




^ 


X • ♦ 




X 


*••« **•• 




***• 


* 




» * 


A« * 




* C5 * 


* 




* * 


*•*« 




*••• 



IN CCB 

* * 

••***•****« 



* AJ • 

* • 
**•• 



• Di * 

« • 

• **• 



Charts 239 



Chart QC- $$BOCRTX - Verify Operator Commands (Part 2 of 2) 
(Refer to Chart 20) 



****Ait»*«**»*** 



•••••**«•*••••• 



lOBOSTI 

• PROVIDE 

• CUUIBI. 

• PBOGRtH 



•«•*•••»••••«««• 



PBOVIDB 

i/r to 

S0P8B?ISOB 



i»*****»****«»**' 



••••DH* •••••••• 

BBABCH 

IBIO 

SUPBBVISOB 

(SIO) 



«****Eit***«**«*** 



•••••••*•••*••••• 



• FBtCB • 

• StBOCBTB • 



••••Hit********* 

• * 

• BBtOBM * 

• * 
*•**•«•*•***•*« 



240 OOS/VSE Logical Transients 



Chart QD. $$BOCRTy - Handle Long Messages (Part 1 of 3) 
(Refer to Chart 20) 



* tSBocBxr • 



•*Cl******* 

• • 
SET OF 

SCBBB* BBP 
IBOICiTOB 

* « 



•••••D I********** 



••••••••I 



•••••••• 



SSBOCBTH 

PISSBD 

. ALBBADY 



•»BSI OF* 

• DBFIBB * 

• MESSAGE • 

• TYPE • 



• INDICATE THAT • 

• SSBOCRTV HAS * 

• BEE! PASSED • 

• ALREADY • 

• • 



• • 
» mSBBT • 

• PIK/TIK • 

• IBTO SCT • 

• « 



• PBOVIDB FOB • 

• AODIBLB ALBH • 

• IF BEQUIBBO *. 



ADVANCE 

» GET RANGE 
• OF BESSA6E 
..X* LINES 



*••••••*•*••*•»• 



•**«*B2********** 
•SCBPII QB* 
•-•-♦-•-•-»-«-#-• 
•WRITE IINBS 0* • 

• SCBBZN AND * 

• PBINTEB * 



.* AUTOMATIC 
*. OELIIION 
• . MODE 



*. BITEB (BI 



•••• 

• • 



•••• . 
2 X 

*I0B00T1 OP* 

•ISSUE COMTINUE • 

• BY ENTER • 

• MESSBGB • 



•I0800T1 OF* 

•-•-•-»-•—»-•- *-♦ 

• • 

• ISSUE ALARM • 

• • 
*•••••••*••••••** 



•••••F2****^***** 
•I0B00T1 OF* 
•-♦-•-•-♦-•-•-•-• 

• HRITE HABNING • 

• MESSAGE • 

• • 
•***••*•••*••««*« 



•••**G2*******^** 
«ATIMAIT QE* 
*-•-•-•-•-•-•-•-• 

• BAIT FOB • 

• ATTBIIION • 

• INIBIBOPI • 
••••••••*•«•••*•• 



•-•-•-•-•-•-•-*-• 

• READ * 

• OPBBATOB • 

• RESPONSE * 

•••*•••••*•*••••• 



• * 
•RESET INIBBB4L * 

• PBOTECTIOR OF • 

• LINES PBINTBD * 

• • 



****B3* •*••***• 

• FETCa • 

• SSBOCBTQ * 

• • 
••*•••••••*•••• 



• PROVIDE • 
I* INFORUriON • 

• FOR SSBOCRTB * 

• • 
•••••••••*•••*••• 



•***DI|****«**«« 

• FETCH * 

• SSBOCRTB • 

• • 
**•**••*••••••• 



•••••8S«*«»***«»« 

• CLBAB * 

* INSIIOCTIOB • 

* LINE *IBPUT • 
*LINBS IN BOFPU* 

• • 



*****cs********** 

•BSTHBN6 QB* 
•-•-«-•-•-•-•-«-• 
.• CLBAB NABNIN6 • 
• LINE • 



•*•••**•*•••••••• 



CORSOR 

OB ENTEB 

RET 



*••**( 3**^******* 

• CLEAR * 

• INSTRUCTION * 

• LINE * INPUT • 
*LINES IN BOFFBB* 

• • 
•••••*••••***•*•• 



Charts 24 1 



Chart QE. $$BOCRTY - Handle Long Messages (Part 2 o£ 3) 
(Refer to Chart 20) 



* NKITB • 

* BBSStGB • 

* LIIBS • 

••••••••••••••• 



SCBPBT X 

•BSTPBI QB» 

• SET ON PBINI • 

• BIT IB »««. * 

• BITBS • 



• tUBH CCB 
IB CUABBBL 
*. PBOGBiB . 



• • 

• PBOVIDB FOB * 

• tUOIBLB * 

• ALB8B * 

• • 



> BBITE « 

• NIBBIBG « 

• « 



BSMBBG 

•«***B2*********' 

• PBEPABB 

• NBBBIBG 

• LIBE 

• BDrPBB 
« 



••***C2********** 

*ioBouti or* 

• HBItE BOFFEB * 

• OBTO BBBBIBG • 

• LIBE • 

• • 



• • 

• BETUBM • 



••••••••••••••• 



Bill FOB 
OPBBttOB 
BBSPOBSB 



•••••••»*•»••*••• 



•flODIPI P8IBTBB • 

• FUG II BTTB. • 

• BITE • 

• • 



•••••D3»******««« 



• GET BEIT LIBE * 



*•*••«••*•**••«•• 



•IOBO0I1 OF* 

* HBITB TO • 

* SCBBEN BBD • 

* PBIBTEB • 



••••OH********* 



*•••••••••••••• 



•****cs********** 

* PBOVIOB TBBt • 

• SSBOCBII GETS • 
.X* COBIBOL BFIBB • 

• BtlBBTIOB • 

* IB1BBBUPI • 



•••••OS********** 



•*»«•*••••••••••• 



* SET OFF • 
INDICtlOB 

FOB GEXtlBG 
COBIBOL 

• • 



•«pt****>** 

• * 
SET OFF 

kLIBH 
FLAG 

• • 



«***F3********* 



••••••••*•••••• 



••••F&********* 



•«*««•**•««••«• 



*BSTPBT QE* 

* SET OFF PBIBT • 

* BIT OF LIBES • 

* HBITTBK • 



• • 

• BETUBN « 



242 DOS/VSE Logical Transients 



Chart QF- $$BOCfiTY - Handle Long Messages (Part 3 of 3) 
(Refer to Chart 20) 



• SCBEER I/O * 
» HOOtlUE • 

» • 



> DBPIMB * 
* HBSSIGE • 
» T»PE « 



• CBOVIDE * 

• CHINHBL • 

• PBOGBAN * 

• • 



* * 

* G« • 

* * 
• ••• 



»*•••••*•••*•***• 



.*nS6 READBB *. 10 « * 

*.»LPB*MUMERIC .*.. X* BET08N * 

*. .* X * • 



• * 

• BBAIiCH imo • 

• SOPERVISOB • 

• (SIO) • 

• » 



•***»E2*«******** 

• * * • 

• • SVC 7 » • 

• * Hill * » 



>««*••**•*••••*• 



* BEtDEB • 

FOLLOIED BI 
». BLIMK .* 



•«***F3***«****«* 



••••**•*•******«• 



.* •• TES 

.X*. laFOBRAIIOM .*. 
*. BBSSASB .* 



•***G3*««****** 

• « 

• BETUBK * 

• * 



*INSBRI BBSSAGE * 
*IYPB IMDICIIOB * 

• liTO sot BITE • 

* • 



***«U2* ******** 

• FETCH * 

• tSBOCRTE * 

• * 
«****«******««« 



•••«*I|«*******»** 

* mSBRI * 

* tSTEBISK • 

* II FBOBI OF * 

* HESSAGB * 

* * 
*•*•********••••* 



PAVilL X 

*****Jit«********* 

* IMDICIIB THAT * 

* IINE IS * 
« DELETIBLB * 

* (IB SOT * 

* BIIB) * 



****Kl|« ******** 

* * 

• BETURH * 
*************** 



Charts 243 



Chart QS, $$BOCRTZ - Channel Program Analyzer (Part 1 of 6) 
(Refer to Chart 16) 



» « 

• SSBOCRTZ * 

» « 



•»«**B2* *•*•*••** 



••••A3********* 



•*«•••*•••*«••• 



***^^B3********** 



* ST08E CSH-CCi » 



•••«•••*••••••••• 



BEGINZt 

•••••C2********** 
•TESTCBO QL* 
*-•-•-*-*-*-•-*.• 
•CHECK FOR VkLlD* 

• OPEBITIOR • 

• CODE * 
•*•*•*••••*••**** 



•••********•••••• 



•-•-•-•-•-•-*-•-• 

* TESI FOR BITS • 

* 38,39 IN ecu • 

* • 
**••••*•••****•*• 



BBGINZO 


*. 




F2 


• . 




,* 


* 


YES .* 


coRhand 


• • ■ *• 


IS 


NOP* 


, « 








'*. 


.* 




* 


.* 


«*«»« 




* NO 


• OJ • 






* k1* 




. 


* * 






• 






■OPCHD 




i 

*. 




G2 


*. 




,* 


* 


YES .* 


CORHAND 




IS 


ALH' 


• 






^ 


• ^ 


.* 


X 


* 


,* 


***** 




* NO 


»QJ • 






* A2* 






* * 






• 






tLRRCND 






*** 


»*H2*S**** 


*PROICHK 


*-• 


-*-*. 


.*-*-• 




CHECK FOB 


• 


!>ROTECTION 




VIOLATION 



***••••*••**•***• 



*-•-•-•-•-•-•-<-• 

• • 

• SKIP All TIC * 

• • 
••••••***•*•••*•* 



**** 




*0H * 




* KH *.X. 




* * . 




**** 




BEei«Z2 X 




•••••02********** 


***^^D3********** 


« * 


*TESIC«T OK* 

*.*-*.*-*-*-•-<-* 


* SAfE COHHANO * 


• COBBERTtl * 


* CHECK FOR * 


* PROCESSED • 


* VALID COOIt * 



*********•«•*•*** 



«*«•••••«•******* 



•«***H3«******** 
• 

* POST CHARIIEL 
X* AND DEVICE 

• END IN CSV 
* 
****•****•»•*••* 



*Q3 * 
• A3* 

* * 



.* DATA 


*. 


XES 


X*. CHAimiiG 




*• • . • 


*. 


• 




*. .* 






*. .* 




X 


* NO 




***• 

* * 

* A3* 


X 




* * 


***** 




**** 


*UH * 






* A3* 






* * 






« 






BBGINZ5 







244 DOS/VSE Logical Transients 



Chart QH. $$BOCRTZ - Channel Program Analyzer (Part 2 of 6) 
(Refer to Chart 16) 



.* mcossEcr *. ies 

•. LENGTH .*.... 

•.SDPPSIiSS .* 



• •*• 

• • 

• D3 • 

« * 



RBFERBNCeS 
ID QHE1: 
QJG3. QJGU 



• PROVIDE TO 

• FEICU fttkSe 

• SSBOCRTR • 



*****C3********** 



«*******««***««*« 
»•** 



**g^*«««««* 




E2 ». 


* SET OH * 




.* 


• INDIC4T0R » 


NO 


• COBB AND 


..I* FOR BHOKEM •X.. 


» 


CHAINING 


• ecu CHAIN * 




♦ . 


* * 




♦. 


*«*******•« 




*. .* 


••»• 




• YE 


* «•** 






* El »QJ * 






• * B1 •.!. 




X 


•*•*• * 




»»♦* 


••«• 




• * 


EXITZ1 X 




* H5 * 


*m*«"¥f 1******m*mm 




* * 


* « 




*••• 


•GET ADDRESS OF • 






• HEXT ecu • 






* * 






« * 






***************** 






**** l 






* * 






• G1 ».X. 






* • . 


***** 




*«*♦ . 


• QJ • 




EXITZIA X 


• GJ» 




*****G 1********** 


* * 




• * 


* 




* SAVE ADDRESS * 






*0F CURBBKT CCH *X.. 







HSITE WITH 



***************** 



••***G3*«******* 



• REJECT 

* 
**************** 



**fl3******* 

» « 

SET OFF 

cei-OE IN 

CSH 

« * 

*********** 

*»** 
* 

*.x. 



REFERENCES* 
TO gHJ3:a 
QKDS, ttnD2, 

**** 
CHECK 1 X 

«»***J3***«****** 

* * 

* INDICATE TBAT * 

* CCN CHAIN IS * 

* BROKEN OFF * 

* • 
***************** 



* PROVIDE TO * 
I* FETCH PHASE • 

* StBOCRTC • 

* * 



IBS .* INCORRECT *. 

...*. LENGTH IN . 

♦. CSN •• 



* • 
» El • 

* • 



« * 
• Hi • 

« * 



*SIORB THAI ecu • 

* ADDRESS IMIO • 

* CSN • 

* • 
***************** 



*****jii********»* 
•TICSKIP OL* 

•-*-»-•-♦-•-»-*-• 
« • 

• SKIP ANI TIC • 

• * 
***************** 



*****J5***** 

• * 
«GET PHASE NABIS • 

• APPROPR. 10 • 

• COHBAHD CODE • 

• * 
************ 



.* ERROR •- 
NO .* 00RIN6 ». 
...*. INITIAL 

♦.SELECTION.* 



• YES 

Iabbnuexit 



.* «. ****i/i^********* 

.* •. YES • FBTCH • 

*. MRITE HITH .*.... « PHASE • 

*. CR .* . • • 

*. .* *•«*••*•»•»•••• 

•. .♦ X 

* NO •»•* 

* * 

.BBGINZ2 • G1 * 
X * • 

• QG • 

♦ D2* 



Charts 245 



Chart QJ.. $$BOCRTZ - Channel Program Analyzer (Part 3 of 6) 
(Refer to Chart 16) 



• ***• 

» F2* 

» • 

* 


***** 
•OG • 
* G2» 

» • 
« 


VOPCHD i 

• * 

• PBO?IDI! TO » 

• FETCH PHASE •t. . 

• ijBOCRTC • 


kLBHCHU X 

**t2******* 
* 

• IHDICATB 
• ALARM 

• COMHAND 



•••••«••«••«****• 



••*••••••** 



* PROVIDE to » 

* FETCH PHASB * 

• SSBOCRTE * 

• * 
*****••*•*•**•*«• 



B3 *. 

.* *. 
• VALID 
BXIB COUIT 



**C3******« 

* * 

• IMDICAVB * 
*IIICORB. LBMGIB • 

• IM CSM * 

* • 



•*[)1*«»***» 

• SBI on * 

INDICATOR 

FOR BBOKEN 

CCM CHAIN 



• INITIAL 
SELECTION 



• F1« 
EXITZ1 



NO .* INCOBRBCT *. 
,..*. LENGTH 

•.SOPPSBSS .* 



**r3******* 



***»*c <)•••******* 

« • 

* INSERT CCH • 

* AOOBBSS INTO • 
» CSN • 

* * 



•«***D4***«*««»*» 
*IICSKIP QL* 
•-•-*-•-•-*-*-«-• 

* • 

* SKIP ANT * 

* TIC • 
••••*»•*••*•***•• 



**«»*II|***«*««*** 
•TESTCNT OK* 

* CHECK FOR * 

* VALID RYIB * 
» COUNT • 

•••*«•••••**••••• 



* SET OFF * 




.• INCORRECT •• IBS 


•INCORB. LENGTH 


• 


*. LENGTH .*.... 


* III CSN • 




*.SOPPRBSS .* 


• * 




». •• 


****••****« 




*. •* 
• NO 


* *•»• I 






* ♦ . 




, , 


• G3 *.X. 




« • 


* * • 






• *** X 




, , 


.SENSB1 .*. 




X 


G3 •. 




**6lt******* 


• • *. 




* • . 


.* COHNAND *. 


IBS 


• SET • . 


*. CHAINING 


♦ .... 


•INCORR. LENGTH • 


». .* 


, 


• IN CSN • 


•• .* 




* • . 


• • .• 


X 


*********** 


• NO 


***** 


^ , 




*0H • 


, , 


!••••••■••• xl 


• G1* 

* * 


•X. .••••••••• 


X 


X 


1***** 


* 


***** 


•QH » 


EXIIZ1A 


•OH ♦ 


• Kl* 




• E1» 


« « 




* * 


* 




• 


BXITZ 




BXIT1 



246 DOS/VSE Logical Transients 



Chart QK. $$BOCRTZ - Channel Program Analyzer (Part 4 of 6) 
(Refer to Chart 16) 



• • 

* INSBBT CC» * 

* ADDBESS • 

* into CSll • 



* CLBkB IDDBESS * 

* riELD FOR * 

* NEXT CCi « 

« « 



• CHECK CCH « 

• FLtG BXIB * 

• • 



* I>B0V1D8 PHtSB • 
.X* NABE IPPBOPH. * 

• TO COflHKND • 

« • 



•cgj******* 

> • 

SET OPP 

DEtCB 

I* CSN 

» • 



BITS 38 

BID 39 OP 

.ecu ZBSO . 



*«C1«***«** 

• BESBT « 
IMDICATOB 

FOB BBOKEN 
CC8 CHAIN 

* • 



****C2********* 

• FETCH • 

• PHASB • 

• « 



•***C3********* 

* FETCH « 

* SSBOCBTA * 

* • 



••**Cit****** ••* 
» CBBCK CCH • 

* BITE CODHI * 

• * 



• • 

• CLEAB AODBESS « 

• FIELD FOB * 

• BEIT ecu • 

• • 



• • 
. IBS * XBDICATB * 
.* X* PB06BAH CBBCK • 

• IB CSV • 



» FETCH • 

* SSBOCBTA • 

* * 



• « 

• BBTOBB « 

• « 



Charts 247 



Chart QL. $$BOCRTZ - Channel Program Analyzer (Part 5 of 6) 
(Refer to Chart 16) 



• CBSCK CCH • 

• OPBBATIOII * 

• CODE • 



• « 

• TEST FOB TIC • 



« HOVE • 
•OVBBATIOB COOB • 

• TO NOBK FIELD • 

• * 



• HOVB • 
•OFERBTIOII COOB • 

• TO HOBK FIELD • 

• • 



« ALL LOU 

OBOEB BITS 
•. ZBBO 



.* AMI 
. HI6B OBDBB 
•.BITS ORB . 



E3 
.• 
• • O 
•.CODE « 



•««**C<I*<>******** 
•PBOTCac OR* 

PBOTBCTIOI • 

• CBBCK • 

• • 



.X* 



••••D3*****«**« 

• « 

• BBTUBM * 

• * 



* • 

* GBT BDDBESS • 

* OF ecu • 

* POIBIBD TO « 

* « 



*****B<I********** 

• • 

• BOVE • 
*0PBB1TI0R CODE • 

• TO HOBKFIELD • 



* « 
CBOBEJCT 



• « 
FB06CBCK 



•***e2********* 

• * 

• BETOail • 

• * 



• « 

• BETORN • 

• 4 



248 DOS/VSE Logical Transients 



Chart QM- $$BOCRTZ - Channel Program Analyzer (Part 6 of 6) 
(Refer to Chart 16) 



••••11 ••*•••»•• 

• PSOTECTION * 

• CHBCK • 

• • 
*«••••••*•••«•• 



• GET fIRTUAL * 

• DATA ADDBSSS • 

• OF ecu • 

• • 
•*••«••••••••••*• 



•••••^•••••••••^ 

* • 

* Boyg • 

•OPKBATIOR CODE • 

* TO NORK FIELD * 

* . • 
•••••«••««••••••• 



• IMOICAIE THAT • 
.1»CCII CHAIR HOST • 

• BE BBOKEM OFF • 

• « 
•••••••••«••**••« 



••02*****^* 
* « 

IRDICATB 
VBOTECTIOll 
CBECK 
» « 

•••••«•*••• 



..X* J 3 • 

• • 

• ••• CHECK 1 



TIC 

•- .• 
• YES 



•••••^(••••••••* 



•••••••••••••••CI 



• ADD LBBGTB * 
.X* COUBI TO DATA • 

• ACDBESS • 

• « 
••«*••••••*«••••• 



• RESSA5B 

FOB SlStBH 
•. TASK 



.X*. HBItE 





• 




*, 


XES 


• 


A)OBBSS BR BOS 


•.... 




*, 


«» 


.• 


• 






• « 


-• 


I 






> RO 


• ••• 










• * 










• C2^ 










• • 




















•••♦KS^ 




• 








• 


• 




BET 


IRR 


• 


* 


*•< 






• 



Charts 249 



Chart RA,. $$B0CRT1 - Message Redisplay Part 1 (Part 1 of 2) 
(Refer to Chart 21) 



* * . 

kITl .*. 
Bl < 

.* 

BBQD8ST 
PBROIHG 
PLkG 

"•• ••' 





• **• 




• ♦•• 




• • 




• • 




* hi * 




• *« • 




• • 




• • 




• ••• 




• «•• 


•••»• 


" 




* 


♦ KB » 


, 




, 


• J2» 


MTBI I 




X 


♦ * 






• 


* 


♦lOHOUT BB* 




* 


t *• 


•-»-*-•-•-*-•-» 




-..I* DB/INE ecu * 




ISSOB RB&O * 


• • • • 


* 


noDiriED • 




* 


k * 


» 









> B1 • 



SECOBD 
EMTRI IN 
. CHklMBL . 
•.OaBOE.* 



•••< 


X 


aONBITE 


.«. 




01 • 






,* 


ERBOB 


*. 


8BTUBII 



•ROT DOCanBHTEO)* 



**F1******* 

• « 

• SET OFr 

• AODIBLE 

• ALIBH 

• « 

• •** 

• • 

• G1 ».X. 

• « 

E 



••«**«***«•**««» 



PROVIDE 
CBARHEL 
PBOGRAH 



SET ON 
AlARH 
FLAC 

« « 



♦-*-»-»-•-•-*-»- 
«NBITE TO SCREEN* 

• • 



**F2******* 

* • 

SET OFF 

AOOIBLg 

ALABH 



PROVIDE 
NABBING 
HESSAGB 



*HRITE TO SCBEKN* 



• »•* 

• • 

• D1 » 



• SET ON 
ERROR BEIORN 

• FLAG 

* « 

*********** 



*ilRIIB TO SCREEN* 

• * 

*•*••••*••**•*••* 



•*D3******* 

t « 

SET OFF 

AOOIBIE 

ALARB 

> * 

*****••**«* 



**** 
*RB • 
• D1 ».X 



*«*• 

X 
**E3******* 

* * 

• SET OFF 
t* POST FLAG 

* IR ecu 

* * 
*********** 



**cu******* 

• * 
R85ET 

BRROR FLAG 

• • 
**••***•**• 

X 

***• 

t * 
» Bl • 

• * 
**** 



**** 
•RB * 

* A1 *.I. 

* * • 

•♦•• BB 

EBBOR X 

*»**«CS********** 

* PRBPABe • 

* IBSTBOCTXON • 



*•••••••••••*••«• 



***** 

• IB * 

* A1* 



««B5******* 

» * 

* SET 
* ALARB 

• FLAG 

• * 

******«*»•* 



••** 

* • 

* G1 * 

* • 



•«***G3*** **••*•• 

• INDICATE THAT • 

* SSB0CRI1 GETS * 

• CONTROL AFTER » 

* ATTENTION * 

♦ INTEEKUPT • 
««***«**««***«*** 



****lij********** 



* * * 

* * * 
**************** 



**J3******* 
* SET OFF • 
INDICATOR 
FOR GETTING 
CONTROL 
t • 

**•*«*•***• 



» AU * 

« * 
**** 



250 DOS/VSE Logical Transients 



Chart KB. $$B0CRT1 - Message Redisplay Part 1 (Part 2 of 2J 
(Refer to Chart 21) 



•B4 • 

• B5* 

* * 



****i3**«»***** 



• YES 



«*****•*•**•••« 



• C5» 

• • 

ERBOR 



• C2 *.% 






.* OMLT SIX «. IBS 
■>. CHARkCtERS ...... 

•. INPOI .* 
•• •• 



• SBT DEFkUtl • 
X« PA6IIIS * 

• PABlHEtERS * 

• * 



«*«*«««• *««««•««* 



• 

BRANCH INtO • 

SUPERVISOR • 

(SIOI • 



D1 *. 

• * *• 




X 

****02*******«* 


•«««*03«»«»**«««» 


.• MORE THkM *. XES 
«. SIX CHARS .*.... 

*. IMPUI .* 
*. .* 


• FETCH * 

• $$B0CRT6 • 

• » 


• * SVC 7 ♦ • 

♦ ♦ M»IT • • 


•• •• 


X 








* NO 


• ••*« 






, 


•*••*£)•••••••«« 


• R» • 

• EJ* 

« * 
• 






X 

• *. 

E3 •. 

.* •• 


• GET INPUT 

• LENGTH 








.* ONIT *. 
*. EXCEPTIOi .* 

•• .* 
•. .* 


















*. .• 



««**«p 1«««««**««« 



«»••«»•«*•*«•*•«« 



• • 

• RETURN • 

• * 



« * 

• CONVERT FIRST • 

• CHARACTERS TO * 

• UPPER CASE • 

« * 



* • 
» PROCESS * 

* FAILURE II « 

* SfBOCRTE * 

* • 



« « 

* •HO 



INVCOH 

«**««H 2* ********* 

* PROVIDE CCa * 

* COUNT AND • 
. .-X* INSTRUCTION * 

» LINE CONTENTS * 

* * 
***************** 



««***«**«* 



*****J 1*********» 



**«**•*•*****«**• 



»*J2*»****» 



****J 3**«**««** 

* « 

* RETURN « 

* « 
***«*****«**«** 



**** 

* * 

* c:a * 

* « 
**** 



****K2******«** 
» FETCH • 

» »»B0CRT2 • 

> < 

*************** 



Charts 251 



Chart RC. $$B0CRT2 - Message Redisplay Part 2 (Part 1 of 2) 
(Refer to Chart 21) 



«««*j(2* ******** 

• »»B0CST2 * 

* « 



*B2********** 



,* 


*, 


NO 


*. BLANK JillSIS . 


*... . 


*. •* 


, 


*. . * 


, 


*. •* 


X 


* KES 


*••« 




• • 






• F1* 






• • 






***• 


X 




*»B5******» 




• * 




* B&Sei ULANK > 




* INDICATOB 


« 



*************** 



**••«*•*•*» 



SEFEBBMCBS 
TO 8CF1: 
8DB3. SOKI 



***** 02** ******** 



•**E2******«*** 
TRAHSLATE * 
INPUT INTO * 
UPPER CASE • 
CHABACTBBS * 
* 



*. -* 


I 


* NO 


*»••• 




*BD * 


. 


* *1* 



*••• 

* • 

* Fl* 

* * 
••*• 



**E5***«*** 



»**«**«**** 



*••* 
SBFEBKNCKS* * 
TO RCF5: » • •.x 
RDE2. RDKU* « 

*•*» 
ERA 



***************** 



•»** 
« 4 

• ri * 

* « 
•*•* 



«****Q1 *«*««****« 



***************** 



****H1********* 
» FETCH 
* SSB0C8TV 

• 
v************** 



*. JES * INDICATE THAI * 

.* X* NO PARAMETER * 

.* * IS SPECIFIED » 



•*•*•***«•***»*«* 



REFERENCES* 
TO RCHJ:* 
aOCi, RDE5* 



****H2*** ****** 



««*»****««« 



****U3********* 
» FiiTCH 

* JSB0CRI6 



**«**K2* ********* 
« V 

» INDICATE THAT ♦ 
.* BLANK IS * 
* PRESENT * 



*****S 5* *«*«**«*< 



BLANK .* 



252 DOS/VSE Logic?.! Transients 



Chart RD- $$B0CRT2 - Message Redisplay Part 2 (Part 2 of 2) 
(Refer to Chart 21) 



•sc • 

• C5» 



• « 



• 4"* • 



«***«A 3**«** *••« < 



*.BIID OF IHPOt .*. 



•*«**B 1«*>»***»*« 



••*«**««««•«*•*«« 



« * 

• C2 • 

* « 



•BC • 
» G3» 

• « 



-*. 



». 



CDIHA 
• .*' 

• IBS 



• PI* 



BSROaCtS 

X 
••• ««F 1**** •« « 



««**•*••**••••«** 



las 


,* 


iEIT • 


, 


.. •• 




PAUAHJ^rtfi 


.• 


^ 


* 


•B" .• 




^ 




*. .• 




X 




•• •• 




♦••♦• 




» HO 




♦ EC • 








• F5« 










* « 










* 














I 




• ««««ir2*««*«««* 


>• 


« 


XHDICATE TtaX 




• 




NU FlbST 




• 




»AK&afc't'i:K 




* 




txl. 


>IS 





•**«*«•*«•*•**•«« 



aM. 4 *. ao 
OJBIIS .»... 

I0...9J .• 



•••**C3***«***** 
* 

• PBUVXUls 

• Kilt 

• COUDLtlOttS 
« 



•BC • 

• U3« 



• « 

• i>4 •.Jt 

• * 



• ISOlCAtu 

• fABflCXOk 



«**««c<t«*«****** 



• * 



*.iiMO or INl^U't 



* • 

• IHUlCAIfi • 
I* BiCKaABD *. 

• usuiseLki • 

* • 



• •*•«*** j»«* 



« iaDXCAT£ 4 

* POimABU < 

!• BEBXSi'Lil » 



««*•*«*•*««*«•««« 



r£s 


• KBXT • 




.. .* 


fXMAiilJJ) . 


* 


. 


• • 'ALl.' .• 




. 


». .* 




X 


•- •• 




••** 


* HO 




* « 






• A<t • 


, 




• • 


, 




*•«• 


X 

• *. 

Ul *. 

.♦ KfcXT *. 






• tAhXAKIUi * 


RU 


* 


BU, fH, OR AB 

♦. .♦ 

*. •• 


..... 




•• •• 


£ 




» «£S 


* * 

• ♦ 



.**»*J l« ««««*««*« 



«*•«**«***««««** 



•«**«S3********** 

« « 

• MJSXT • 

• CdABACTKB « 

« « 



>***dj*********i 
XKDXCXXfi < 

OXHiiCTXail « 
PAKAKE'TBii < 

eK£seiix < 

4 



* « 

* 04 • 
« « 

• *•« 



• * 



« XKDXCAVi: I'dXI < 

*. ihs A • no iiiscuai) « 

ili.AIIK .•........!« {■AfcA5i:iT£U < 

.• • Ll.l.:ti!i « 

.* • « 



•at • 



»riH«*«««**««* 



»««*••«««**• 



* IJ£S 




•••• 


X 

XIIUXCA'X;2 
l>AUA4i:Xl^U 


• » 





**««««««•« 



Charts 253 



Chart BE- *$B0CRT3 - Message Redisplay Part 3 (Part 1 of 3) 
(Refer to Chart 21) 



• « 

* $SB0CRT3 « 

* * 



BEDISPLiX 
. AODR 



• SET LIME * 
« POIHTBB TO • 

• LAST HESSkSB * 

• LINE • 

• • 



• INDICATE * 

* BACKNARO 

AOOHSSS 

* UPDATE 

« * 



••HI******* 
* INDICATE * 
• 'BEGIN OF 
* FILE" TO 
« LIBIT LINE 



*•••) 



>•*»• 



• SET COUN- • 

• TERS TO LAST * 

• HBSSA6S LIKE • 

• COUNTERS • 

• • 
***************** 



*****Q1********** 

* SET START • 

* ADDRESS TO • 

* LAST HESSAGE » 

* LIME ADDRESS ♦ 

* * 
***************** 



PIBIITION 
BBDISPLAI 


*. YES 
* 

X 
♦ BF,» 


*• .* 
*• .* 
• NO 



FORW 

*****Q2********** 

• SET LINB • 

• POINTER TO • 

• FI8SI HESSASB • 

• LINE * 

• * 
***************** 



**C2******* 

• INDICATE * 

FOBHARD 
BESSASE 
OPCATB 

• * 



••£2******* 

* INDICATE * 
• 'END OF 

FILE* TO 
> LIBIT LINE 

* « 



**»»«F2** ******** 

* SET COUNTERS * 

* TO FIRST • 

* BESSAGE * 

* LINE COUNTERS * 

* * 
******jt********** 



*****G2* ********* 

* SET START * 

* ADDRESS TO * 

* FIRST MESSAGE * 

* LINE ADDRESS * 

* * 
***************** 



••** . 

*BF * 

• F3 *.X. 



• ••• 

* * 

* JO * 

* * 



• DBCBEASE • 

• SKIP LINE *] 

• COUNT BI 1 • 

• » 
•*«**•*****•**••• 



«••* 
•BF • 
• D1 *.X 



*****f i********* 



**************** 



**** 
UPDkl X 

•****G3********* 
*UPDTBOUT RG 
•-*-*-«-«-»-*-*- 

* UPDATE 

* REDISPLAY 

* ADDRESS 
**************** 



•*Ei|******* 

* * 
SET 

DISPLAY 
FLAG 

* * 
••****••**• 



*****eit********* 

* PASS CURRENT 

* LINE COUNTERS 
TO FIRST 



***************** 



*****G5******«*** 

* PASS CUBBENT * 

* LINE COUNTERS * 

* TO LAST • 

* HESSAGE LINE • 

* COUNTERS * 
*••****»**•«**••* 



BESSAGE LINE: 

SPACE IN THE SCREEN IMAGE 

BUFFER FOR THE DISPLAY OP 

ONE MESSAGE LINE 

LINE POINTER: 

POINTER TO THE CURBENT 

MESSAGE LINE 

LINE ADDRESS: 
HABD-COPY PILE DISK 
ADDRESS OF THE HESSAGE 
IN THE LIME 



* At * 

* ■ * 
**** 



»****Hlt********** 
*PASS REDISPLAY * 

* ADDRESS TO * 

* FIRST BBSSAGE * 

* LINE ADDRESS * 

* * 
***************** 

**** 

* * . 

* JU *.X. 

* * .X 

«*** X 
PL .*. 

Jl *. 



*»***HS********** 
•PASS REDISPLAY * 

* ADDRESS TO * 

* LAST HESSAGE • 

* LINE ADDRESS * 

* * 
***************** 



REDISPLAY ADDRESS: 
HARD-COPY PILE DISK ADDSESS 
OF THE MESSAGE CURRENTLY 
REDISPLAYED 

SKIP LINE COUNT: 
NUMBER OF MESSAGE LINES 
TO BE SPACED FORUABD OR 
BACKHARD DURING RE- 
DISPLAY PROCESS 



* ****Xit********** 
*DISI(IO RG* 
•-*-*-*-*-*-*-*-* 

* READ RECORD *. 

* INTO BESSAGE * 

* LINE • 
****»*«***«**•**» 



254 DOS/VSE Logical Transients 



Chart BF- $$B0CRT3 - Message Redisplay Part 3 (Part 2 of 3) 
<Refer to Chart 21) 



CODNT BI 1 



PkBTI 1 

•DISKIO aG» 

* READ BECOBD • 

* IKTO BESSiGK • 

* LIMB » 



LIBIT X 

• SKI UP 10 • 

* DlSeLkl FIJ.B • 
« LIBIT IITO • 
**VAILtBLE LIBB • 



conetBE 

PIBTITIOH 
IDEHTIFIBS 



» • 

* SET LIRE * 
» POINTEB 1 • 

• LINK UPNARO * 

« * 



• SET LIHB • 

• POINTER 1 • 

• LINE DOBBHIBO • 

• * 



•. 


« 


X 


• 


IBS 


*•**« 


•••» 




*8E * 


* * . 




• Bi* 


• El *.X. 




« * 


» • . 




* 


•••• X 






BNDRED .* 







•0 PUT BOUT RG* 

• UPDUB ■ 
« BBDISPLAI • 

* ADDBBSS • 



» El* 

• « 
•••• 



• • 
SBT LIMIT 

laoICATIOB 

• • 

• ••• 

* « 

• F2 • 

« » 



• RB • 

* S3* 



* PASS CURRENT * 

* LINE COUNTERS • 

* TO FIRST • 

* NSS LI IE * 

* CODNTBRS • 



*4i««*f 2********** 

• PASS CURRENT * 
« LINE COUNTERS ' 

• TO LAST RSG 

• LINE COUNTERS 

m * 

••**««*••*••*««** 



•X. 



FORUABO *. IBS • * 
REDISPLAT .*....X* Al • 



•PASS REDISPLAY * 

* AOOSBSS TO * 

* FIRST RBSSAGE • 

• LINE ADDRESS • 

• • 
••*••••*•**•••*** 



««*«*G2********** 
•PASS REDISPLAY • 

• ADDRESS TO • 

• LAST RBSSAGE • 

• LINE ADDRESS • 

• * 
«•»•«•••••••*•••• 



• ••*« 

• RE • 

• on* 



YES -• LIBIT 
...... INDICATION 

*. SET 



RESSAGE LINE COUNT: 
GIVES THE NDHtlEB OF 
HESSAGE LINES KHICB 
ARE STILL FREE IN 
SCREEN IRAGE BUFFER. 
IT IS SET BY $$B0CRT6 
TO RAXIHUH HHICH IS U 
FOR 12SD AND 20 FOB 3277 



• FETCH • 

• tSBOCRTlt • 

• * 
••••••»*••••••• 



Charts 255 



Chart RG, $$B0CRT3 - Message Redisplay Part 3 (Part 3 of 3) 
(Refer to Chart 21) 



* • 

* DISKIO •t2 • 

* * 



•112 

BKkO BE- 
OISPLAI 
BECOBO 



•»5 

OPOklB 

RBDISFUY 

ItOOBBSS 



* « 

* UPOTBOOt •hS • 

* « 



URBLOCKBD 
HABD COPT 
. PUB 



.* BBCORD 
. ALBBADI III 
*. BOPFBB . 



BACKKABD 
AOOBBSS 
. 0P0AT8 



«****Ci|********** 

• • 

• IHCRBHBHT'-I • 

• BOF'StBISKA • 

• StABI'LASTSKA • 

• « 



• • 

• 1IICBBHBIT«» 1 * 

• BOF«LASXSKA • 

• StABT'STBISKA • 

• • 



• • 

• SET SBABCH • 

• AB6URBIT TO • 

• BEDISPLAT * 

• ADDBBSS * 



* BEAD BECOBO • 
FBOfl HARD 
* COPY FILE • 
•B2 



«B2 

BBBOB TYPES: 

IICOBB. LBBGTH 

DBBECOVEBiBLE 

I/O EBROB 



• 

» UPDATE 

* ALL LIME 

• COUITBB 

« 



••***E<I********* 



• *•••••*••*•••••< 



•••••QIC********* 

• • 

* BOTE » 
» HECOBD IMTO • 

• MESSAGE LIME • 

* • 



••••HI********* 

• « 

• BBTOBM • 

» • 



STBTSKA * 

SCABT ADDRESS OF HARD-COPK 

FILE MESSAGE AREA 

LASTSKA : 

EMD ADDRESS OF 
BARD-COPT FILE 

REDISPLAT ADDRESS IS 
FOR CKD: CCHHR 
FOR FBA: BBBBB 



••P2******* 



••*••••*••• 



••••S2********* 

• FETCH ♦ 

• *SBOCRTB • 

• * 



•••**p^*»*««««»«i 



••••••*«****»*«« 



««*««65««*»4 



*«••*•••*«•«*•••• 



* SET BEDISPLAK 

* ADDR TO 

* START OF 

* FILE 



«*«*KI4* ******** 

> « 

• SSTORM * 

* • 
**»**•**•*•**•* 



256 DOS/VSE Logical Transients 



Chart Bh. $$BOCRTi( - Message Redisplay Part 4 
(Refer to Chart 21) 



» • 

* $SBOCBT<» « 



» BBTURI * 

FBOH SCB8BI 
». BBP .« 



••C1***«*«* 



••••**•*•*• 



••••*l) 1**»««***** 



••••••***•*•*«•«• 



•••••g1****«*«*»* 



••*••*«•*••**»••* 



• IP BEQUIBBD • 



* TRAISLUE IN « 

* HBSSIGE kBEl • 

* BOFFBB * 

* aRPBINTtBLB • 

* CHkBACTBBS * 



BEUSP 

IMIIIILIIE 

IISTROCTIOII 

IIIB HITR 



DEEIOLI 
DISPLIII 



* CLBtB SCBEEI * 



•***B2******«** 

IRSBBT 

OIBECIIOII IITO 

LIBE 



*«***C2********** 
« • 

* IRSBBT LIBIt • 

* COOBT IBIO * 

* IINB * 
« • 



•••••02********** 



* • 
SUPPBKSS 

kODIfiLE 
4LABB 

• • 



****Ci********* 

PBOVIDB 
CHIRBBL 
PBOCBAM 



• PBOTIDB I/r • 

• TO SUPEBflSOB • 

• (SIO) • 



E2 



*, 



IS ♦. 
.* THEBE t *. HO 
*. PtBTITIOR .*... 
*. LIBE .* 
*.CO0HT.* 



*, 



• YES 



****F2********* 

IRSBBT 

PBBTITIOH 

LIRE COURT 

IRTO LINE 



SCIP X 

••**«G2******«*** 
•URIIS RH« 

« CLBIR SCHBBH * 



• •••Ii2********* 

• FETCH * 

• SBBOCBTI « 

• • 



****B3*«******* 

• S»C 7 • 

• RMI • 



* • . 

* Q] *.X. 

* « . 
• •«« 



.* 



GJ 



.». 



,* 
• •• 
* TBS 



» FETCtt * 

• SSBOCBTE 4 

• 4 



• •••Qll********* 

* * 

* BBIURB * 

* * 



*NBITS BH* 

* • 

* CLBBB SCBBBM • 

* * 



•••*K I********* 

• FETCH • 

• S*BOCRTP • 

• • 



Charts 257 



Chart EJ. $$B0CRT5 - Message Redisplay Part 5 (Part 1 of 2) 
(Refer to Chart 21) 



**2 
OD37I HC-FILE NOT 
OPEMKD, NO REDISPLAI 



» 4 

* J»B0CRT5 » 

» a 



m * 

• PROVIDE * 
t« HESSIIGE *. 

• 0D37I * 

• •42 • 



FETCH « 
$«BOCBTP ♦ 

4 



«*•***•***•*•** 



***** 04***4* ***4t« 

* GET DISK * 

* ADDRESS OF » 

* SCREEN IMAGE * 

* SA»E AREA * 

* 4 
«»*••**»**«*•«*•* 



RESTOBE *. 
SCREEN 
IHAGB .• 



*•••*£ 1 ••«*«•*•** 
•SIO BK* 

•-*-*-•-*-*-•-•-* 

* SAVE CDRBENT • 
*BDFFEB COHTENTS* 

• • 
••*••»•••*•*•**«* 



••»**D2*** ******* 
*IOROUT RJ* 
*-*-*-»-*-*-*-»-* 

* RESTORE * 

* SCREEN • 

* IMAGE * 
***************** 



**E2******* 

4 4 

RESET 

BEOISPLAI 

RODE 

* * 

«****«*«*** 



* «***n****«***« 

*iORoai Rj 

•-*-•-•-•-•-*-*- 

* SAVE SCBEEN 

* IHAGB 

* *J1 

•***•*«•***••*** 



**Q1******* 

* * 

mDICATE 

REDISPLAT 

NODE 

• * 
•*••«••*•*• 



•••*|J1«*******» 
» FETCH « 
* $«B0CBT6 * 

4 * 

•*•*••••****•*« 



•-*-*-*-•-*-*-*-* 



>«*••********•*** 



****H2** ******* 

• FETCH * 

* *$BOCRT<l * 

*************** 



*****Dit******«*** 

* HOVE LINES * 

* FROM SCREEN * 

* IHAGB INTO • 

* BUFFER * 

* « 
***«***«**«****4i* 



•-*-•-*-< 

* NHITE BOFFBR • 

* TO SAVE AREA • 

* • 
*•••••*••*•**••*• 



*-*-*-•-»-•-*-•-• 
*BEAD FROM SAVE • 
AREA 



***«*B5*«******** 



***••***••*•*•••• 



•****pi(*«*****»** 

* • 

* INCREMENT * 

* SCREEN IMAGE • 

* POINTER * 

* * 
***«««««•**«**** « 



.* SAVE/ 

RESTOBE 
*. FINISHED 



****G5********* 

4 « 

• 8ETUSN * 

* * 
*««*»****««***« 



****«*«*«**«**** 4 



*J1 

SAVE SCREEN IMAGE: 
THE CONTENTS OF SCREEN 
IHAGB BUFFER ARE SAVED 
IN THE SCREEN IHIGE SAVE 
ABBA. IT IS PAST OF THE 
HABD-COPT FILE. IT STARTS 
AT RECORD NUHBEB 2. ITS 
LENGTH DEPENDS OK THE SIZE 
OF IRE SCBEEN (B BECORDS 
FOR 125D: 20 RECORDS FOB 
3277). 



*Ji 
RESTOBE SCBEEN IMAGE: 
THE ORIGINAL CONTENTS OF 
SCREEN IMAGE BUFFER ARE 
RESTOBBD FROM SCREEN IMAGE 
SAVE ARSA IN UARD-COPK 
FILE. 



258 DOS/VSE Logical Transients 



CHart RK. $$B0CRT5 - Message Redisplay Part 5 (Part 2 of 2) 
(Refer to Chart 21) 



••••a I********* 

• * 

• OPDITE • 

• «H1 * 



* 4 

* SIO * 

* 4 



• * 

• mCBBREIT • 
« R-fltU8 BX « 
•BLOCKING FACTOR* 

• * 



***B3*»»»*******« 



••«***«*4**«****4 



•B« KBkD FBOH 

OB HSIIB 10 

HiBD-COPI FILE 



*.HH INCBEHBHT 
*. •* 
• . •• 
*. .* 



» • 

• RETURN • 



**C<t******* 
• * 

• IIDICRTE 
.X* IICOIRBCT 

• LBMOTH 



ii«i***D )«••*•••*•• 



• *«!••*•**••••***• 



•*DH******* 

• • 

• IHDICAIB • 
.X* URBECOTBRiBLB *. 

• I/Q BRBOB * 

* • 



****os** ******* 

» FEICB * 

* SSBOCBIB • 

» • 

**»•*•*••**••»• 



El *. 

.* *. 

CC 

mCRBBERT 



****E2********* 

» 4 

• RETURN 4 

* 4 
•••••**»••••••• 



****B3********* 

• • 

• RETURN * 

• « 
«*••**•*»•****• 



• ••••F t********** 



***************** 



••••61********* 

* * 

* RBTORM * 

* * 
•••*•««*•••«**• 



•HI FOR CKD DEVICES: 
TRE DISK AOORBSS CCHHR IS 
INCBBMBNTBD BY 1 (BLOCKIMG 
FACTOR « 1) 

FOR FBA DEVICES: 
IBS RELATIVE BLOCKNUHBER 
EXTENDED BX A ORE BXTE 
RBCOBD VAIU "" 

TREATED AS 



Charts 259 



Chart RL* $$B0CRT6 - Message Redisplay Part 6 (Part 1 of 2> 
(Refer to Chart 21) 



* • 

* tSB0CBT6 • 

* * 



.* BIPtSS *. IBS 
COflHkND .*.... 

*.CiiECKIIIG .* 



*RII • 



.* PtBTITOII *. NO 

*.0B OIBECIIOI .* X*. 

*. SPECIFIED.* 



BETORH *. IBS .* 

SPECIFIED .* I*. BEDISPLkl 

.* *. BODB 



■0 .* ». 


lES .* 


COOKT 


« 




...*. BEDISPLtY .'X.. 


•..••*. 


SPECIFIED 




* 


*. RODE .* 


* 




♦ 




*. .* 




•. .*" 






X «. •• 




». •• 






•»•• • »ES 
* 
H3 * 




• HO 








• 






« 










»»»• 




X 






X 




.». 






••***G1* •••*****• 




G2 *. 






* * 




• ' * 






* TRAHSFEB * 


.* 




« 




* ti»B coum • 


». 


REDISPLAY 




« 


* • 


• 


NODE 


* 




• * 




• • .* 






***•*•••**«***•** 




*. .* 







****»D5******«*** 



.* 
"» 


PABTITIOB 
SPECIFIED 

». .* 


*. IBS 
.*. .. . 


* 


* 


COOHT 
SPECIFIED 

». •• 


.* 
* 


lES 




BEDEFIIE • 
BBDISPLAY •.... 
mOICATOBS • 

• 




*. .* 


X 






•• .* 




X 


*«**••***•«»«•••• X 




• HO 


*BH * 
• A2* 

* > 

* 






• BO 




*BB * 
* A1» 

* * 
* 




• • 

* • 


.» 
*» 


.** 
E3 *. 

* « 
DIBECTIOa 
SPECIFIED 

*. .* 
*. -* 


PABPA 

.* 

* 


* 


* 


X 
.«. 

E<» *. 

* * 

REDISPIAI 
HODS 

• • .* 

*. .* 


C01 

* 


CASE2 

«**«*BS********** 

• SET LME • 
YES • COUBT BQBAL • 
X« TO HUBBBB • 

• OF BESSASE • 

• IIBBS • 



• *** 

• * 

• H3 * 

• « 



•*•* 



MO 



*SET IIBB COUNT 
*EQU*I. TO NUHBEB 
« OF MESSAGE 
• LINES 

* 
**************** 



'REFBEIENCES 
* * • » »'T0 RLBJ: 
, * % •"•RIIAI, BHA3 

»,*» ;rhb2 

ERROR X 



**************** 



• ••* 

* « 
» B3 * 

« * 



REDEFINE 

REDISPLAY 

INDICATORS 



>****K2******«** 



**»*«******«*««* 



••***j 3*«******* 



•*******••*****• 



» FETCH » 
* SSBOCRTT * 



* 

• REDEFINE 

• REDISPLAY 

• PARAHETERS 



* REDEFINE 
I* REDISPLAY 

* IHDICATOBS 



*Ba * 

• B2* 



* RBDEFXNB * 

* REDISPLAY *. 

* INOICAZOBS • 

« • 



»G5****»** 



«*«***«•*** 

**•* 



LINECOO X 



• •** 

* * 

• JS ».x 

BXIT1 



* • 
* 
EXII2 



» FETCH * 

* *»BOCBIb * 

* « 



260 DOS/VSE Logical Transients 



Chart RM. $$B0CfiT6 - Message Redisplay Part 6 (Part 2 of 2) 
(Refer to Chart 21) 



BEFSRENCSS 
TO RHAt: 
BLB3, RLJS 



***** 

♦ BL * 

* HJ* 



* * 

* 

ERBOH 



•***«B1 ********** 



* RBS8T * 

• BKPASS * 

* FLAG * 

• * 
***************** 



*»***B1I******** 



***************** 



***** 
*B1 • 
* PS* 



***** 
*BL * 
* H3* 



*****C3********** 

* • 

* REOEFIME * 
X* BEDISPLAY * 

* INDICATOBS • 

* * 
***************** 



It************ 



*****C 4* ********* 



*•****•**•* 



REDEFINE 

BEDISPLA! 

INOICATOBS 

************* 



**>**D4* ******** 
» FETCH * 
* JJBOCRTJ * 
» « 

•*•♦*****»***** 



•*♦***♦***♦**»*♦* 



***** 
*RL * 
* H5* 



Charts 261 



Chart SA. $$BCHKPT - Test Checkpoint Conditions 
(Refer to Chart 23) 



* UBCHKPT • 



•**«*B1*** •*•*••• 

• • 

• SkVE POIiTEB « 

• to CHKPT • 
•PABKHETEB LIST * 

• « 



.• A5XBCHB. *. 
. PB0CBSSIB6 . 
*SUPBRVISOR.* 



.* CHKPT •. BO 
. ISSOEO FBOH .*..X 
•.BBIBTtSK .* 



.• SUBTASKS • 

>. kTTACHED TO 

*.RBIBT1SK .• 



AHY 

IBBCKS 

HELD 



CHKPTOUO X 

♦ * EXTBkCT: • • 

• *GEt DEVICE • * 

* IIPE OP CHKPT • 

* • DEVICE * • 

» • * • 



.» CHKPI *. lES 
DEVICE .*..X 
•.ASSIGNED .* 



CHKPT 
DEVICE A 
. TAPS 



«*««»A2********** 

* * BXTBACT: * • 

• •GET DEVICE • * 
•TXPB OP CHABMEL« 

• *QaEOE EHTBY* • 

* » • • 



• * 
» K1 * 



CHKPT090 X 

• SET CHKPT-IO » 

♦ IB CBKPT * 

• HEAOEB • 

* BECOBD • 

« • 



*****P2******«*** 

• » BXTBACT: • » 

• GET TEHPOBARX * 

• BOONOABIES OP « 
*CHKPT PABTITIOB* 

• • • • 



*. GETVIS DOHK .«. 



U2 *. 

.« USBB * 

.*CHKPT EBD- 

ADDBESS 

*. GIVEH 

♦ . .* 



. * USES *. 

SPECIFIED 

ADDRESS 

. VALID . 



• SET CHKPT • 

• EBD AOOBESS • 
. X* TO PABTITIOB • 

• PHYSICAL BBO • 

• • 



**«**)I3**«*«***«* 

* SET CHKPT • 

* BRO ADDBESS * 
.X* TO PABTITIOB •. 

* LOGICAL EBD * 

* * 
***************** 



» PPIX • 

IBFOBHATIOB 
*. TO SAVE .* 



***«*BM******** • 

* CALCOLATE * 
*BOHBER OF PFIX • 

* BECOBDS ABD * 
•STOBB TO HEADER* 

* BECOBD • 



CHKPT 180 X 

••**«C «••*•*•*•** 

• * EXIBACI: • • 

• • PEBHBHBBT • • 

• •BOORDABIES * • 

• • OF CHKPT • * 

• • PABTITIOB • • 



*****IIH********** 

• GET HOBBBB OF * 

• SISTEH LOBS, • 

• PBOSBAHRBR * 
•LUBS. ABD BICL • 

• • 



.« EXTENT *. HO 
. IBFOBBATION .*. .. 
•. TO SAVE .• 



*****rn********** 

* CALCULATE HO. • 

* OF EXTEBT * 
•BECOBDS NEEDED • 

* ABO STORE TO • 
« HBADEB BECOBD • 
***************** 



.» 3800- •. 
.* PBIHTEB • 
. IBFOBBATIOM 
*. TO SAVE .♦ 



*****flU********** 
•CALCOLATB 3800 • 
•PBIBTEB BECOBDS* 

• HEEDED ABD • 
•STOBE TO HEADER* 

• BECORO • 
*•••***«•*•••••*• 



CHKPT360 X 

••***JI|*«*****»*« 
•STOBB PARTITION* 

• IBFOBBATION * 

• NBCESSARX FOR • 
•REST. TO CHKPT • 

• HBADEB RECOBO • 



CUKPIBBQ I 

•••••B5********** 

* SET OP • 

* IBFOBHATIOH • 

* BBBDBO FOB • 

* BBSSA6B • 

* • 
•••«*•*•••••••••• 



•***CS********* 

• FBTCB • 

• SSBBBS61 « 

• • 
••••••*«*•••*•• 



.•CHANBBL*. 
.•QUEUE EMTBI*. MO 
•.FOR BAINTISK .•... 



.• CALCULATE •. 

*. NO. OF IbK . 

OUBP BECOBDS^ 



****fiH********* 

* FETCH • 

* SSBCHKPZ • 

* • 
•*•••**••••*•«« 



262 DOS/VSE Logical Transients 



Chart SB. $$BCHKP2 - Build and Write Checkpoint Eecords 
(Refer to Chart 23) 



* * 
» $$BCHKP2 • 

* * 



* « 

* B2 * 

* * 



.* liXTENT *. 
. IDFORHATION . 
*I0 BE SAVED* 



* COHPLJJTE • 
» CHKPT • 

* UE1D8S * 

* HBCOBO • 

* * 



«*««**««***«*«*** 



« EXTENTS 

FOB SYSCAT 
». TO SAVE . 



tm***f1* ********* 

* * * * 

* * GETVCE * * 
» *GET VOLSEB * • 

* • OF SYSCAT • • 

* * * * 
***************** 



*****Q1********** 

* * 

* OBTAIN AMD • 

* SET TAPE • 

* DENSITY * 

* * 
***************** 



*-•-*-»-»-♦-»-»-* 



************ 



CHKP2170 1 

*****Blt********** 

*IOBT SB* 

*-•-*-•-•-•-•-*-• 
*»liITE PARTITION* 

* DUMP BECOBOS • 

* « 
•*•••**•*•••••*•• 



*****cn********** 

•lOBT SB* 

•-*-*-•-*-*-•-*-• 

* HBIIE TBAILBB * 

* LABEL • 



****AS********* 

« « 

» I08I • 

« • 

*************** 



««***B5****«»**** 

* * 
*SBT UP CCB AND * 

* OPDAIE BECOBD * 

* COONIEB » 

* * 
***************** 



**** 
lOBH X 

***Q^************ 



CHKP2040 

*****Q2********** 

* OBTAIN EXTENT * 

* INF. FROa * 

* JIBTABLE • 
« AKEA AND HOVE < 
♦TO EXT. BECOBD * 
***************** 



CHKP2110 

*****lj'i********** 

* OBTAIN EXTENT • 

* INF. FROM ♦ 

* SYSTEM EXTENT • 

* AREA AND HOVE * 
•TO EXT. BECOBD ♦ 
***************** 



EXTENT 

BECOBD 

•COBPLETE 



CIIKP21;>0 

«*«»«P2* ********* 
*IOBT SB* 

*-»-»-*-•-•-*-•-* 

* MBITE EXTENT * 

* IHFOBRATION * 

* BECOBD * 
»♦♦*»•***♦*♦****♦ 



HOBE 
EXTENTS 
TO SAVE 



************** 



CHKPEB1 X 

*****j^H********** 

* SET DP * 

* INFOBBATION * 

* NEEDED FOB * 

* HESSAGE * 

« * 

***************** 



*«**E4********* 
» FETCH * 
• SSBBHSGI * 
» « 

*************** 



*****fH********** 

* MODIFY * 

* CHANNEL * 

* PBOGBAN TO 

* BACKSPACE 



*****j)S****»***** 

* * * * 

* * * * 

* * BAIT * • 

* • « « 

* * * • 

•*****••••*«»•**• 



BACKSPACE 

"*. -*" 

*. .* 



*X. 



»*♦*»*♦***♦♦**»♦* 



.* PFIX •. NO 

.X*. INFORMATION .* 

*. 10 SAVE .* 



»*««G5********* 

* BETUBN * 

* TO CALLEB * 

* • 
»•«•*•**«*«•••• 



.* 3800 *. 






.* PBIMIEB * 




10 


. INFOBMATION 


* 


... 


«. TO S»VE .* 




, 


*. .* 






*- -* 




X 


* YES 




»*** 

* * 

* B2 • 

* » 


X 






*«»»K1********* 




FETCH 


* 




S$BCHKP3 


* 







.X 


YES 


**** 

* * 

* B» * 

* * 
**** 


CHKP2165 

*****H3* 


********* 







*************** 



* * PFIXCHPT: * * 

* * BUILD • * 

* *PFIX-BECORD* * 

* • « * 
***************** 



» iRITE PFIX * 

* INFOBBATION * 

♦ BECOBD * 

***************** 



.* MORE ». 

.PFIX BBCOBDS .• 
*.T0 BBITE .* 



• *•* 

* « 

* C5* 

* * 

• **• 



Charts 263 



Chart SC, $$fiCHKP3 - Build and Hcite 3800 Checlcpoint Records 
(Refer to Chart 23) 



*****»**••*•••• 



* * 
» lOHt • 

* * 
••••••••••••••• 



* IMITI«LIZB • 

* CHKPT BECOHD * 

* MD VORKABSa • 

* FOB 3800 * 

* PBINTBB IHF. * 



♦ SEI OP ♦ 
*CH1IIIBL PBOGBAH* 

• AID OPDATE * 

• BECORO NOHBEB * 

* * 



*•••*(; 1********** 

• * 
•LOCATE LOGICAL • 

• OMIT ASSIGNED • 
*tO 3800-PBIIITEB* 

• • 



• ♦ QSETPBT * ♦ 

• • BETBIEVB • • 

• 3800 PIIHTBR* • 

• *IIIF08BATI0II* • 



• • 



• • 



••••••*•»•*«»••*• 



B1 *. 
EBBOa 



•••CIt************ 

EXCP 

* • 



•••••Dl********** 



•*•*••*••••**••** 



«*«*«F1*******«*« 
•lORT SC» 

♦ HHITB 3800- • 
*PBIHIEB IBFOB- • 

* HATIOII BECOBD * 



IBS .* BOBE 
...*. LDBS TO 
*. PBOCBSS 



••***••««*••••• 



•**«»g2********** 

• • 
» SET UP FOB • 

.X*BACKS»CE CHKPT* 

• BBCOBOS • 

• • 



•••**F2*«******** 
•I0BI2 SC» 

* BACKSPACE * 

• BECORDS * 

» » 



• SEI UP • 

• BESSAGE • 

* IBFOBHATION * 

* • 



••••H2********* 

* FETCH • 

* SSBRHSGI « 

* « 



****E3* ******** 
» • 

* I0BI2 • 

• * 
••*••**••»•••«* 



* HOOIFX CCVS • 

* FOB BACKSPACE • 

* CHKPT RECORDS *X. 



*. BACKSPACE 



• * 

• C«* 
> • 

•••• 



X 

•*•• 

* • 

* c« * 

* • 



••••GH********* 

* BETOBN TO * 

* CALLRB • 

* • 
•••***•*••••••* 



264 DOS/ySE Logical Transients 



Chart SD. $$BCHKP'D - Test Checkpoint Conditions 
(Refer to Chart 23) 



> • 

* SSBCHKPD * 



« StTB POIKTER- • 

• 10 CHKPT • 

• PIKAHKTBK • 

• LIST • 



.* ISIICHB. 
. PBOCESSIRG 
•SOPBBVISOR. 



• GBt SPECIFIC • 

• BECORD LENGTH * 

• OF CHKPT • 

• BEflCE • 

• * 



CHKPD110 

••«**C2********** 
« GET NOHBEB • 

• OF BBCOBDS • 

• PBB TBACK FOB * 
•DOHP k«D IBFOB.* 

• RECOBDS • 



CHKPD120 

• * GETVCB: • • 

• ♦GET BLOCS- • • 
...1» * SIZE OF • • 

• *PBA-DEVICB • • 

• * • • 



CHKPOUO 

• CtLCOLBTE 10. • 

• OF BLOCKS • 
•HEEDED FOB DUBP* 
*4MD IIFOBBBtlON* 

• BBCOBDS « 



> EZTBMTS 

FOB SISCBI 
». StVBD . 



«••••€«•••*••«*•« 

• » GETVCB: * • 

• •&£! VOtSEB • • 

• • OF STSC» • • 

• « • • 

• « • * 



•••• 

• « 

• B5 » 

• « 



CBKP0B10 X 

•••«*B5«********* 

• SBt OP * 

• BBCBSSIBX • 

• IBFOBBATIOI • 

• FOB BBSSiGB • 

• • 



•***CS*******«* 

• FBZCH * 

• SSBBBSGI • 

• • 



01 •. 
.* •• 


CHKPoiao .*. 

D2 • 

,• 


• CRKPT *. NO 

ISSUBD PEON .*.... 
•.RBINUSK .• 
•• •• 


•• GETVIS 
*. DONE 



CHKP0220 

*»***03«***«««**« 

• SET CBKPT END • 
« tODBESS TO • 

...K* PtBTITION *. 

• PBISICBL BIO • 

• • 



CHKP0670 .*. 



.* iUOO •. 
• PBIBTBB *. BO 

IIFOBBkllON .*.. 
». to S»»E •• 



.• SOBZISKS *. IBS. 
. tTTICBBD to .*. 
•.RklNtASK .* 



.* USEB *. 

. CBKPt END- . 

*. ADOBESS .* 

*. GIVEN.* 



• SEt CBKPt • 

• END iODBBSS • 
.X* to PBBtltlOH *. 

• LOGICAL ElU • 

• • 



• *•••£<>•*••••••*• 

• CBLCDLAtE * 

* 3U0O PBINIBB • 

* IBPOBBRtlON * 

• BBCOBDS AND • 

* STORE * 



ANI 

TBACKS 
. RBLD 
*. . 



CHKP0200 .*. 

F2 ♦. 

.« OSES *. 
NO .* SPECIFIED *. 
....*. ADDBBSS 

*. VALID .* 



••••F«******«** 

• rstCH * 

> SSBCBKPB • 

• • 



caKPDO«0 . X 

•«**»G1******«*** 

• • EXtBACT: • • 

• • tBRPORABI * • 

• *BO0 BO ABIES • • 

• • OF CBKPt • • 

• • PABTItlON • • 



CHKPD290 X 

•••*«e2********** 

• CALCVLAtE • 

• NORBEB OF • 

• DOBP BBCOBDS « 

• AND StOBE • 

• to BEADBR * 



*«***ll |«**««««*** 
•GBT POIBTBB tO • 

• CBKPt DTPPB • 

• FBOB CBKPt • 
•PARABBtBB LISt « 

• « 



• GET NICL FOB • 

• PABTITION AND • 

• POIBTBB TO • 
VPBOGRANHBR LOBS* 

• • 



.* DIFPB *. 

. OPEH SINGLE . 

*BBD OUTPaT.* 

*. •* 



.* *. 

• EXTBIt • 

IRFORBAtlON 
*. to SAVE .* 



• CBKPt • 

DEVICB-TXPB 
*. VALID .* 



CHKPD420 X 

*****K2********** 
•CALCULATE EXT. • 

• IBFORHATION • 

• RBCOBO NDHBIR •. 

• AND STORE TO • 

• HBADBB BECORD • 
•••«•**•••*•***•* 



Charts 265 



Chart SB. $$BCflKPE - Cooplete Test and Write Checkpoint 
(Refer to Chart 23) 



Header 



•••• 

• • 

* 12 • 

* • 



• • 

• StBCBKFB * 



• GET Alio SITE • 

• SISTER HODS • 

• OF CHKPt * 

• SISTER • 

• • 



» PFIl •. 10 
IRFORRftllOH .*... 
*. TO S«<B .* 



• CaLCOLtTE RO. • 
•or PFIX-IIPOK- « 
•RtTIOB RBCOIDS • 

• tRD STOBK TO • 

• BE&DBR BICOSD • 



CBIIPB260 .«. 

t2 *. 

.CBIRRBL-*. 
.•QOBUB ERTBI*. 



****»B2********** 

• • BXTBACT: • « 
» •GET DEUCE-* • 

• • IIPE FOB • * 

• CHARBBL-QOEUB • 

• • BRIBI * * 



* SET CBKPT-ID * 
t* IR HB40BB • 

* BBCOBU • 

* • 



•STOBB PkBTITIOR* 

* IHPOBBtllOR • 

* RBCBSSBBI FOB • 
•BSTBT IR CBKPT * 

* HEBDEB BECOHD • 



• •• 




CiiKPE380 .*. 


C2 •. 






C3 ». 


.* *. 






.• ». 




♦. IBS 




• • ». 


T/P DB*ICE 


•*•••• 




*. FBt DEVICE .* 




♦ 




*. .* 


*•• .* 


^ 




•• •• 


». •• 


X 




*. .* 


• HO 


•••• 


* RO 




• 


• 




, 


• BS 


« 




X 


• 


• 




• •*• 


*••• 




• • 








• *2 * 




CBRPB400 X 


* * 






•••**03***»****** 


*••• 






• SET UP CKD- * 

• CRXRREL • 

• PROSBXB BRD * 

• I/O BOOTIRE • 

• lODBBSS • 



« • 

• BS • 

• • 



CHKPBBB1 X 

•«***B5********** 

* SET DP • 
« RBCESSXBX • 
» IRFOBBAIIOR • 

* FOB BBSSA6B • 

* • 



••••CS********* 

• FETCB * 

• SSBBBSei * 

• • 



• SET OP • 

• FBB CBABREL • 

• PBOGBXH XRD • 

• I/O BOOTIRE « 



• CXLCDLXTB RO. • 

• OF TRACKS OB * 

• BIOCKS BEBDBD • 

• FOB DORP • 

• BECOBDS * 



CHKPE080 

• CtLCaLiTE • 

• TOTXL SPACE * 

• REEDED FOR • 

• CHECKPOIRT • 

• FILE » 



.* EROUGH *. 

SPkCB 

•.XVXILRBLE.* 



.*SBEK-IDOB. 
*. OR lOaBR 
*. EXTBII . 
*.LIIIIT.* 



•SET SEEK-BODB. * 

.* TO LOKEB * 

» EXTERT IIRIT • 

* • 



«*•••*•*••••••*•• 



•. 8PS DEVICE .*... 



«****p3*«»***««* 

• BODIFI 

• CBkNREL 

• PBOGBkH 

• FOB BPS 
* 



CH|[PEIt«0 

•••••G3«*****«*»« 
•i/0 HOOTIHB SB* 



• RRITE CHKPT *I 

• HBBDBB * 

• BECOBD * 



.* 3800 *. 
* PBIHTBB *. IBS 

IRFOBHATIOR .*.... 
*, TO SAVE .• 



• •••Hit********* 

• FETCH • 

• SSBCBKPS • 

• • 



•***J3*«******* 
» FETCH • 
< SSBCHKPF • 

* • 



266 DOS/VSE Logical Transients 



Chart SF,. $$BCHKPF - Write Checkpoint Records 
(Refer to Chart 23) 



* * 

* SSBCHKPF * 

• * 



* PFIX *. MO 
IMFOBH&TIOII .*... 
► . 10 SAVE .» 



.• EXTENT » 
. IIF08H4TI0H 
*. to SAVE .« 



► SET I/O » 

* BOOTIME • 

• AODBESS * 

>«*«**♦*******««« 



EXTENTS 
FBOM JIB 
. TABLE 



..X. 

.CHKPF200 i 

•«***C3*********« 

• • PFIXCHPT: • • 

• *BalLD PFIX * • 

• *IMFOBBATION* • 
BBCOBO 



* • 



* • 



***************** 



.CHKPF020 X 

• OBTAIN EXTENT * 

* IMFOBNATION * 
*FBOH JIB TABLE * 

* AND HOVE TO * 

• EXTENT BBC. • 



CHKPF090 

•••**I)2********** 

• OBTAIN EXTENT » 

• IMF. FBOH • 

* SYSTEH EXTENT * 

* ABEA AND HOVE • 
*T0 EXTENT BEC. • 
m***9**** ******** 



* HBITE PFIX • 

* IMFOBBAIION • 

* BECOBD *H2 • 



.* EXTENT *. lES 
BECOBO .*. 
•.COHPLETE .* 



.YES .* HOBE *. 
*.PFIX 8BC0BDS .* 
*.T0 NBITE .* 






.* ROBE *. 

EXTENTS 

*. TO SAVE .• 



CHKPF220 X 

*****fi********** 
*I/0 BOUTIME SH» 

•WRITE PABTITION* 

• DUHP RECORDS * 

• *H2 • 



• SET I/O- • 

• BOOTIME * 

• ADDBESS * 

t**************** 



CHKPF300 X 

*****(iJ********** 

* SET UP » 

* NBCESSARX * 

* INFOBHATION * 

* FOB HESSASE * 

* • 
***************** 



.CHKPF160 X 

*****fl\********** 
•I/O ROUTINE SH* 
*-*-*-*-*-*-*-*-* 

* NRITE EXTENT • 

* INFOBHATION • 

* RECORD •H2 * 
*•»•*••***•••••*• 



bCKO OB lOFBA 



0t**n3********* 

* FETCH • 

• SSBBBSGI • 

» • 



Charts 267 



Chart SG. $$BCHKPG - Write 3800 Printer Inforiaation Records 
(Refer to Chart 23) 



» • 

* SSBC8KP6 • 

* • 
••••••••••••••• 



• miTIkLIZS • 

• HBCOBD AND • 

• HOBK tBBl FOR • 

• 3800 IBFOBHA- • 

• TIOI BBCOBDS * 



CHKPG030 

•••**C 1*«****«*** 

• LOCATE * 

• LOGICAL OBIT • 

• ASSIGBBO TO • 

• 3800-PBIMTBB • 

• • 



BETBIBVB • • 

3800 PBIBTBB* • 

« *IBrOBBAIIOB* * 

• • • • 



El •• 
BBBOB 



•••••••••**•••• 



•I/O BOUTIHB SH* 

* BBIIE 3800- • 
•PBINIB8 IBFOB. * 

• BECOBD 'HZ * 



.* aOBE 
LUBS 
•TO PBOCBSS. 



•«*««B2********** 

• « 

• BBSBT * 
.X* SEEK AODBBSS * 

• III DTFPH « 

• • 



•••••F2********** 

• SET OP • 

• lECBSSABI * 

• IBFOBHATIO* • 

• FOB MESSAGE * 

• * 



**»«G2********* 

* FETCH • 

* ISBBHSGI • 

* • 



•H2 
CALLS CKD OB FBA I/O 
ROUTIIIE (lOCKD OB lOPBA) 



•••*j f********* 

* FETCH • 

* SSBCHKPF * 

* • 



268 DOS/VSE Logical Transients 



Chart SH- $$BCHKPG - I/O Subroutines for Writing Checkpoint Records on Disk 
(Refer to Chart 23) 



* • 

• lOFB* « 



t » 

* lOCKD • 

« « 

*^m***** ******* 



***B1***********< 

* * 

Bxce 

* * 



»«*«*B2********** 

• * 

• UPDATE * 

• SEEK IDOHESS * 
» III DTFPH * 

• * 



♦**C1* ♦•»»**»•* 

* * * 
« * * 

« UAH * • 

* * • 
« « * 

*************** 



***C2************ 

* * 

EXCP 

* * 

***************** 



*****j)'\********** 

* UPDATE SEEK * 

• ADDRESS III • 

* DTfPH »ND • 
*B10CK NUHBER IN* 

• LOCATE ecu • 



*****li2*** ******* 

* * * * 

* * * * 

* * WAIT • • 

* * * * 

* * * * 
***************** 



****E1 ********* 

* » 

* RETUBM • 

* TO CILLSB * 

*************** 



•***E2******»** 
» 8ETUBN * 

• TO CALLER • 

* * 
*************** 



Charts 269 



Chart SJ. $$BRMSG1 - Checkpoint Message Routine 
(Refer to Chart 23) 



• A3 * 

* • 



* « 

* BRflSGt • 

* * 



***»»B1**»»»***** 

* SAVE HESSiGe * 

* NOHBEB AND * 

* SET ADDBESS • 

* OF MESSAGE * 

* TEIT * 



•• DTP •• lES 
*. FILBHAae .*.... 
*. GIVEII .» 



♦OPDATE CHKPT-ID* 

* IH PABTIIIOII » 

* COHHONICATIOM * 
•SESIOH AND HOVE* 

* TO MESSAGE * 
***************** 



*****q2********** 

* * 

* HOVE FILENAME * 
t* TO MESSAGE ». 

* TEXT • 

* * 
***************** 



MSG12<»0 X 

***CJ************ 

EXCP: 

• WfilTE • 

...X MESSAGE 

* ON SYSLOG * 



***************** 



*t***j)^********** 



*****gf ********** 

• * EXTRACT: * • 
» • CUD FOB • • 

• • SPBCiriED * * 

• • LOGICAL • • 

• • ONIT • * 



■ SG10<»0 X 

• CONVERT * 

• ODD Ate • 

• LOGICAL UNIT * 

• AMD ROVS TO * 

• BBSSACe • 



*•*•••••**««**••« 



.* MESSAGE 
FBOM 
*.S$BCUK3G 



t****fj********** 

• SET CHKPT » 
•RETUBN CODE IN * 

• REGISTER ZERO * 

• OF PARTITION • 

• SAVE AREA * 



REID8II •. NO 
CODE TO .»... 
CONVBBT .* 



INTERNAL 
CHKPT 
. ERROB 



•CONVERT RETOBN • 

• CODE. MOVE • 
.X*MACRO NAME AND *. 

» PHASE-IO TO * 

• MESSAGE * 



NSG1140 X 

•****J1*»******«* 

* CONVEBT ♦ 

* RETOBN CODE • 

* AND MOVE * 

* TO MESSAGE • 

* * 



. X» 



****G5*«******* 
• SVC 11 RETURN * 
TO PROBLEM • 
PROGRAM • 



MSG1280 

I 
****B3********* 

• • 
» FETCH • 

* SSBCHK3G « 



****gH********* 

* FETCH » 

• SSBDURP * 



270 DOS/VSE Logical Transients 



Chart SK- $$BCHK3G - Checkpoint Erase-Gap Routine 
(Refer to Chart 23) 



• « 

* SSBCHK3G * 

« * 



* B2 * 



B1 ♦. 
.* T»PE *. 
.BEPOSITIONING. NO 
•TABLE SPECIFIED*... 



.» AMY *. IBS 

EBBOa .* 

•-DETECTED .• 



CHKJGI80 

• SBI UP • 

• INFOBHATIOi • 
...t* MECKSStBV * 

• FOB HESSASB * 

• « 
••••**•*•**•«•••* 



• SVC IT TO • 

• PBOBLBH « 

• PBOGRAH * 

••••*****««•••* 



« FETCH • 

* SSBBHSG1 * 

• • 

••••••*«•*•*•*« 



* D1 *.%. 

* * . 
*•«« 

CHII3G060 X 

* * EXTBACT: * • 

* »GET DEVICE » • 

* • TYPE OF * • 

* • SPECIFIED * • 

* * DTF * » 



CBK3G080 .*. 



CBK3G100 .•. 

F1 *. 
.• DTF •• 
.♦TYPE VALID *. NO 
*. OPEN AMD .*... 
•. OUTPUT .* 



• EXCP ♦ 
PEBFOBH 
• EBASE GAP • 



»««f) '!**«*««**«« 



• •*« 

* • 

* D1 * 

« * 
«•«• 



Charts 271 



Chart SL,. $$BRSTRT - Restore Problem Program (Part 1 of 2) 
(Refer to Chart 23> 



» SSBRSTBI * 



♦EBTBIBTB IHFOB-* 

• HtTIOR PISSBD • 

• PBOH SJOBCTLB * 
*PBOH PIBTITION * 

• SAVE ABBA * 



* BEIBIBVB CCH « 

* mFOBHAIIOH • 
*F80n PkBT. S«VB* 

* kBEJl IlHD set * 
*I/0 BOOTIHB *DB* 



GETVIS 
DONE AT 
CHKPT 



* * SETLIHIT: • ♦ 

* •SET COBBECT* * 

* • PABTITIOM » • 
•lOGICAL END* 



• • 



* • 



««•**««««««****•« 



•***«A J********** 
» * PFIXBEST: • • 

• • PFIX • • 

♦ • BEQOESTEO * • 
PAGES 



• • 



• « 






BSTBT150 .♦. 



♦ . .• 


X 


• NO 


*•«• 




* « 


.X. 


* B5 • 




« « 


, 


• *•• 



.* PFIX- *. NO 

*. INFORMATION .* 

•TO BESTOBE.* 



* * 

» CJ • 



• READ PFIX- 'X 

• INFORHATION * 

• RECORD • 



PFIX- 

RBCORD 

FOUND 



•••*•*••••••••••* 



.* ROBE *. 
» PFIX • 

IHFOBRATION 
*. BBCDBDS .* 



• ••• 

• * . 

• C3 '.X. 



CHKPT 
DEVICE 
TAPE 



BSTBT2II0 X 

•I/O BOOTINES SB* 

*-•-»-*-*-•-•-•-• 
•READ PARTITION • 

• DDHP RECORDS • 

* • 



LAST *. IBS 
RECORD .*... 
READ .• 



NO ,» LAST •. 

,..*. RECORD TO . 

*. BE RBAD .* 



• CALCULATE • 

• LAST RECORD * 
.* LENGTH AND * 

• STORE TO ecu • 

• • 



* SKIP •» 

* TRAILER * 

* LABEL * 

*»•««•*•**»•*•*«« 



RSTRI300 

•I/O ROUTINES SB* 

•-*•«-•-•-»-•-•-• 

. ..X^BBAD PABTITION • 

• DUMP BBCORDS • 



•••••**••••••**•« 

• *•• 

• • 

• D« •.X. 

• * 
»••• 

X 

• * 

• GET AOOBESS • 

• OF CHRP! • 
•PABAHETEII LIST * 

• • 



•••• 

• * 

• Bb • 

• • 
••»• 



BSTBTBBI X 

• SET PP • 

• IBFOBSAIION • 
. . X* N8CBSSABI • 
. • FOB HBSSAGB • 

• • 



••••CS^««*« •*•• 

* F8ICB • 

* *»BBHS62 • 

* • 
••••••••»«••••• 



CHKPT •. YES 
DEVICE .*... 
TAPE .• 



•POINT SEEK ADDB^ 

• IN USER DTFPH * 

• AFTER CDRREMI • 

• CHECKPOINT • 

• • 
•*••••*••*•**••*• 



RSTRI560 .*. 



•• TAPE *. 

*. REPOSITION . 

•TABLE GIVEN^ 



.* OASD •. 
.VERIFICATION . 
•TABLE GIVEN* 



••««B5*«***«*^* 

• FBICB • 

• S»BBSTS2 • 

• • 
«•««*•*««••*«•« 



• OBTAIN RSTBT- • 

• ADDBESS AND * 

• BODIFI PSH • 

« * 



**««K4« •*•*•••• 
» SVC 11 TO • 

* PROBLEM • 

• PROGRAM • 

**••••••••••••* 



*••• 
» * 
t AJ * 



272 DOS/VSE Logical Transients 



Chart SM,- $$BRSTRT - Restore Problem Program (Part 2 of 2i 
(Refer to Chart 23) 



• « 

» lapiooo • 



« « 

• CKDIOOO « 

• « 



• • 

» FBIOOO « 



•*«*«B I********** 



•«•••••*•«••••••• 



«****g3***««*«*** 

SorrPH • 
BSS klD • 

• ROOIFI • 

• SEBK ADOBBSS * 

« • 



••*«*B!>********** 
» * 

* GBI • 

► DtFt>H • 

> kOOBBSS • 
« • 



••*C I************ 

• EXCP • 
RBAO 
• BECOBO • 



* BXCP 
BBkD 
• BBCORD • 



• BXCP • 
BBAD 
• BBCOBO * 



( • • 

• * * 

• BJIIT • * 

• • • 

• • • 



••»03«»****«««« 

• • * 

» * « 

K « « 

» ' • • 



•••••1)S«*«*«*«»»* 



*•••••••«•••*•••• 



• 8BIURII * 

• TO CkLLBR • 

• • 



••••EU********* 

• BBTOSN • 

• TO CBLLBB • 

• • 



* IRCBBiSB • 

• BLOCK lUHBBB • 

* IN OIFPB ABD • 

• LOCtTK CCM • 



•****F3*»*******« 



*«•***•«**«*•*««« 



• BBTUBN * 

• TO CkLLBB • 

• • 



.* UPPBR *. 
.* EXT8IIT 
LIIIIT 
*. SEACHSD . 



• ••** 
•St • 

• B5« 



Charts 273 



Chart SN, $$BRSTR2 - Tape Repositioning and DASD Verification Routine (Part 1 of 2i 
(Refer to Chart 23) 



> « 
• ••* 



• • 

• SSBRSTB2 • 

• * 



.* PHYSICAL *. I 
*.ReP0SItIOII«6.*. 
*.IIIDIC*IEO.* 



.* OkSO *. 10 
. X*. f 8RIFICATI0H .*.... 
*.I«DIC«TeD.* 





*B2 




OB BBANCH TO 


i 


GBMERkTEO BETOBII 


.*. 


ICOBESS B1, B3, 
BS, OB DS 


B1 •• 


.* • 




• CtLtEO 


*. NO 


FBOH 


.«. ... 


*.tSBBSTBT 


• 


•• •* 




•• •• 


X 


• IBS 


•«••* 




*SP • 


. 


• Bl* 



BSTB0020 .*. 



.* TAPE *. HO 

. BEPOSITIOmilG. • . . . . 
•.INDICATED.* 



.* LOGICAL *. NO 
.REPOSITIONING.*... 
•.INDICATED.* 



.* ALL *. 
.*BNTRIBS IN *. IBS 
. REPO TABLE .*.... 
*.PBOCESSED.* 



RSTR0II60 X 

• * EXTRACT: * 

• 'GET DEVICE • 

• • TYPE OF • 

• * LOGICAL * 

• * DNIT * 



LOGICAL *. NO 
UNIT A .«... 
TAPE .* 



•••• 
« • 

* HS • 

• • 
•••• 



«**«*G1 **••*•*•*• 

• • EXTRACT: • * 

• •GET DEVICE • • 

• *TIPE OP DTF* * 
LOGICAL UNIT* ~ 



* • 



* * 



•••*•********••*• 



LOGICAL 

UNIT t 

TAPE 



• *•* 

BSTB0300 .*. 

• SET OP CCB * .* *. 

* AND BBCORD * .* BACRNARD *. YES 

• COONTER FOB * X*. REPOSITIONING.*. .. . 

* RBPOSITIOMING • 



***E3************ 
SPACE FORRARO 
» TAPE * 
SPBCIFIEO 
• NORBER OF • 
FILES 
••***••••••*•»*** 



.* BECOROS *. N 
•.SPECIFIED FOR.*. 
*POSITIOHIRG* 



RSTR2000 X 

•****(;3»a»»****** 
*REPOSITION SPA1* 
•-«-•-*.•■.•-•-•-« 
•REPOSITION TAPE* 

• FORHARD * 

* DIRECTION * 
•••*•***•*••*••*• 



* Bb *.X 



RSTR0660 

•«***BS********* 

• • GBIVCE: • 

• •GET VOLOBE • 

• * SERIAL * 

• • NUHBER • 
« • • 



•BSSSAGES SR* 

• SET UP FOR • 

• RBSSAGE • 

• • 
****•«••«•••••*«• 



RSTR0700 .*. 

DS *. 
.* ALL *. 
.•ENTRIES IN •. HO 
•.VERIFY TABLE .«... 
•. PROCESSED. • 



• • 
•OBTAIN BBSTABT * 

• ADDRESS AND • 

• STORE TO PS* • 

• • 
•••••••••••*••••• 



* BETUBN TO • 

* PR08LEB • 

* PROGR. • 



RSTHSG600 

• • 

• HBSSAGES • 

• • 
••*«•••••••***• 



•••* 

• * 

• E5* 

• • 
*••• 



REFERENCES I . 
TO SNHS: I -* 
SPC3, SPESI *, 

• •*• 



SPH2 



• SET HS. CODE • 

•PLUS NECESSARY • 

..X^ INFOREAIION • 

. • AND RETURN • 

. * ADDRESS • 

*••• 



• H5 • 



••*•••***•*•••••• 



«, 



••••JS**«««^*** 

» * 

* *SBRBSG2 • 

> « 



RSTR2000 X 

•••**K2^^******** 
•REPOSITION SPAI^ 

• REPOSITION • 

• TAPE FORRARD • 

• OIRECTIOR • 



RSXR2S0O X 

••«*«K3»««*««*«** 
•REPOSITION SPAS* 

•REPOSITION TAPE* 

* BACKHARD • 

* DIRECTION * 

*•••*••*••*•**••• 



274 DOS/VSE Logical Transients 



Chart SP. $$BRSTR2 - Tape Repositioning and DASD Verification Routine (Part 2 of 2) 
(Refer to Chart 23) 



BSTB2000 




**«*A 1**««***** 




» BEPOSITIOM * 




* FOBHIBD * 




• * 




*•*••*•*«*••**« 




*«** * 




•S* * 




• B1 *.X. 




* • . 




*••• X 




.*. 


BS'fB2080 


B1 *. 


««*B2* *********** 


.* ». 




• • SMHDABD •. HO 


• BEAD A * 


♦. LABELED .*...* 


••.•X BECORD 


». PILE .* 


* * 



••••*****•«••**•• 



IBS .* VOL 
...«. LABEL 
*. BEAD 



««*«««******«***« 



TAPE 
HABK 
BEAD 



*•** 

* *. 

* J2 • 

* • 
**** 



***«A5******«** 

* BEPOSniOM • 

• BACKMABO * 

> * 

*•*••*•*••«*••• 



***BS************ 

* BACKSPACE * 
OHB BECOBO 
• AMD BEAD • 

*********•••••••« 



MOB- *. res 

STANOABD .*.... 
. FILE .* 



TAPE 
■ABK 
BEAD 



BDB1 *. XES 
LABEL .*.... 
BEAD .* 



.X* 



**M*g2********** 
*HESSAGBS SB* 

•-*-«-*-•-*-*-•-* 

sbbial amd * 
*se5demce no. to* 



.•AMI HEADEB *. 

LABEL 

*. READ .* 



* SPACE 
.X FOBBABD 
* PILE * 

«••*•******«•***• 



***** 
•SB * 
* H5* 



>«•«***••*•*•*••• 



,** 


TAPE 


*. 


BABK 


*, 


BEAD 




*. .* 




• NO 


••* 




* 


« . 


* J2 


*.X. 


* 


• 


*«• 


> X 


BSIB2140 .*. 




J2 *. 


.* 


CHKPT 


*, 


HEADER 


*. 


BECOBD 




*. .* 




* NO 



**** 

* * 

* G2 * 

* * 
**** 



• *«»• 
*SM * 

* H5* 



» J5* 

• * 
**•* 



***os***** •*•***• 

• BACKSPACE * 
BECOBD 
• AMD BEAD • 

*•*•***•••••«•••• 



TAPE 
HABK 
BEAD 



F5 *. 

CBKPT 



***S5************ 

• SKIP • 
CBKPT 
* RECOBOS * 

*•*«***•**•*•••*• 



• SKIP • 
.X CHKPT 

• BECOBDS • 

*••*•******•*«••• 



.* ALL • 




.*. BICOBDS 


• I 


•.PBOCBSSEO.* 








*. •* 




* lES 




«*** 




• • 






• Ji *.X 






* * 






*«** 










****J5********* 


* IBI IBM 


• 


* TO C 


ILLBB 





••**•*•*••*•••• 



* BBTOBM • 

* TO CALLER * 

* • 
•••******•*•*•• 



TES .* ALL *. 

....*. BECOBDS .* 
*.PBOCESSBD.* 



*•** 

* * 

* G2 * 

* • 
• *•• 



Charts 275 



Chart SQ. $$BRHSG2 - Restart Message Routine 



• « 

• SSBRHSG2 * 

* • 



••*«*B1**«******* 

• Sirs MESSAGE • 

* ROMBER AND * 

* LOAD HBSSAGE • 

• TEXT AODBESS • 
« • 



.* 0PE8AT0B *. 
*. RESPOHSB 
•.EXPECTED .* 



•COBfBRT DIFIXPB* 

• AND HOVE * 
.X* DTF FILBIAaB *. 

• TO HBSSAGE * 

• • 



BSG2080 

» CORVBRI • 

• LOSICAL DHIT * 

• Alio HOVE • 

• TO MESSAGE • 

« • 



Hse2300 X 

BXCP 
• IIRITE • 
. .X HESSAGB 

• 01 STSLOG * 



****Clt******* 



••*••••*••*•« 



* COMVEBT • 

* BETUBII CODE * 

* AMD MOVE TO • 

* HBSSAGE • 

* * 



• * EXTBACT • • 

• ♦ COU FOB • • 

• • SPECIFIED * ». 

• LOSICAL OIIIT* « 

• • • « 



*****Gt *•***•*•** 



**••**•*••*•***** 



* MOVE » 
*TBANSIEIII NAME * 

* TO MESSAGE • 

* • 



MSU20«0 

* **»«(j2********** 

* COMVEBT -AND • 

* HOVE SIZE * 
» VALDB TO • 

* MESSAGE • 

* * 



• *** 

• * 

• 81 * 

• * 

• *** 



• COMVEBT Cau • 
I* AND HOVE • 

* TO MESSAGE * 

« • 



.* SEBIAL 
RDHBER 
*. FOB HSG 



««***(;3««»***»*** 

• MOVE VOLUME • 

* SERIAL NUHBBB * 
•OR TAPE SERIAL • 

* NDMBEB TO * 

• MESSAGE • 





.*. 




HSG2500 .*. 




D<» ». 




05 •. 




* *. 




.* *. 


• 


OPEBATOR • 


MO 


.* IHTIBIIAL *. *0 




RESPORSE 
EXPECTED .* 


• ... . 


....X*. BSXBI .*.... 


* 




*. EBBOB .« 




*. .* 




•. .• 




•• •♦ 




• • •• X 




• TES 




• TBS •••* 
» * 

• HS* 

• • 




X 




HSG2510 I 


* 


»«E4************ 


X 




BXCP 




«***BS********* 




BEAU 


* 


• FETCH • 




OPESATOB 




• SSBOUHP * 




BESPOISE 


• 


• » 



••***•**••**••••• 



•****F4********* 



•**•*•***«**«**• 



*••••••«•••««•« 



OPEBATOR 


• 


HO 






RESPONSE 




*. • . . 






VALIO 


* 


, 






*. .» 








•••» 


• • .• 




X 




* * 


* YES 




» * 

* B« * 

* * 




« « 










, 


.*. 




HSe2520 


^ 


Hit •. 








. X 


* * 






****as********* 


CANCEL 


• 


IBS 


« 




INDICATED 


• 


• . 


x» 

• 


CANCEL 


*. •* 









* « 

• Bl • 



MS62't20 X 

**««*J !(•*•**•«••* 

SET OP • 

VALUES TO • 

BBTURN • 

TO CALLER * 



» FETCH * 

* $SBRST82 * 

* « 



276 DOS/VSE Logical Transients 



APPENDIX A: ERROR MESSAGE CROSS REFERENCE 



Message 


Phase 


Chi 


OCOOI 


$$BCHKP2 
$$BCHKPF 


SB 

SF 


0C02I 


$$BCHKPT 


SA 


0C03I 


$$BCHKPT 
«$BCHKPE 


SA 
SE 


0C04I 


$$BCHKPT 
$$BCHKPD 


SA 

SD 


0C05I 


$$BCHKPD 


SD 


0C06I 


$$BCHKPD 


SD 


0C07I 


$$BCHKPD 


SD 


0C08I 


$$BCHKPD 


SD 


0C09I 


$$BCHKPE 


SE 


0C10I 


$$BCHKPT 
$$BCHKPD 


SA 
SD 


ocni 


$$BCHKPT 
$$BCHKPD 


SA 

SD 


0C12I 


$$BCHKPT 
$$BCHKPD 


SA 

SD 


0C13I 


$$BCHKP2 
$$BCHKP3 


SB 
SC 


0C14I 


$$BCHKPT 
$$BCHKPD 


SA 
SD 


0C15I 


$$BCHKPT 


SA 


0C16X 


$$BCHKPG 
$$BCHKP3 


SG 
SC 


0C17I 


$$BCH,^PT 
$$BCHKPD 
$$BCHKPE 


SA 
SD 
SE 


0C18I 


$$BCHK3G 


SK 


0C19I 


$$BCHKPD 


SD 


0D01A 


$$BOCRTV 


PK 


0D02I 


$$BOCRTM 


NA 


0D03A 


$$BOCRTX 


QB 


0D04D 


$$BOCRTV 


PK 


0D05A 


$$BOCRTW 
$$B0CRT1 


QA 
RA 



0D06A 


S>$BOCRTy 


QD 


0D07D 


$$BOCRTS 


PD 


0D08A 


$$BOCRTS 


PD 


0D09D 


$$BOCRTR 


PA 


OD20E 


$$BOCRTB 


KD 


0D25E 


$$BOCRTB 


KD 


0D26E 


$$BOCRTB 


KD 


0D28A 


$$BOCRTG 


MA 


0D29E 


$$BOCRTB 


KD 


0D30A 


$$BOCfiTV 


PK 




$$B0CRT1 


RA 


0D33A 


$$BOCRTE 


LD 


0D34E 


$$BOCRTF 


LG 


0D35E 


$$BOCRTF 


LG 


0D36I 


$$BOCfiTF 


LG 


0D37I 


$$B0CRT5 


RJ 


0D38A 


*$BOCRTE 


LD 


0D39D 


$$BOCRTI 


HG 


0D40A 


$$BOCRTI 


MG 


0D41D 


*$BOCRTI 


HG 


0D97A 


$$B0CRT1 


RA 


0P70I 


IJBEOJ 


FP 


0P71I 


IJBEOJ 


FP 


0P72I 


IJBEOJ 


FP 


0P73I 


IJBEOJ 


FP 


0P74I 


IJBEOJ 


FP 


0P75I 


IJBEOJ 


FP 


0P76I 


IJBEOJ 


FP 


0P77I 


IJBEOJ 


FP 


0P76I 


IJBEOJ 


FP 


0P79I 


IJBEOJ 


FP 


0P80I 


IJBEOJ 


FP 



Appendix A: Error Message Cross Reference 277 



0P81I 


IJBEOJ 


FP 


0P82I 


IJBBOJ 


FP 


0P83A 


IJBEOJ 


FP 


0P84I 


IJBEOJ 


FP 


0P85I 


$$BEOJ 


DA 


0P86I 


IJBEOJ 


FP 


0P87A 


$$BEOJ 


DA 


0P88I 


IJBEOJ 


FP 


0P91I 


$$BEOJ 


DA 


0R09I 


$$BRSTRT 


SL 


0R13I 


$$BRSTRT 


SL 


0R15I 


$$BRSTR2 


SN 


0B20A 


$$BESTR2 


SN 


0B21A 


$$BRSTR2 


SN 


0R22A 


$$BRSTR2 


SN 


0R23A 


$$BRSTR2 


SN 


0R24A 


$$BRSTR2 


SN 


0R25A 


$$BeSTR2 


SN 


0R26A 


$$BRSTR2 


SN 


0R27A 


$$BRSTR2 


SN 


0R28A 


$$BRSTR2 


SN 


0R29A 


$$BRSTR2 


SN 


OSOOI 


IJBEOJ 


FP 


0S01I 


IJBEOJ 


FP 


0S02I 


IJBEOJ 


FP 


0S03I 


IJBEOJ 


FP 


0S04I 


IJBEOJ 


FP 


OS05I 


IJBEOJ 


FP 


0S07I 


IJBEOJ 


FP 


0S08I 


IJBEOJ 


FP 


0S12I 


IJBEOJ 


FP 


0S13I 


IJBEOJ 


FP 


0S14I 


IJBEOJ 


FP 


0S16I 


IJBEOJ 


FP 



03171 


IJBEOJ 


FP 


0V02I 


IJBEOJ 


FP 


0V03I 


IJBEOJ 


FP 


0V04I 


IJBEOJ 


FP 


0V05I 


IJBEOJ 


FP 


0V06I 


IJBEOJ 


FP 


0V07I 


IJBEOJ 


FP 


0VO8I 


IJBEOJ 


FP 


0V09I 


IJBEOJ 


FP 


0V10I 


IJBEOJ 


FP 


0V11I 


IJBEOJ 


FP 


1B12D 


$$BATTF1 
$$BATTai 


CC 
CJ 


IB13A 


$$BATTF3 
$$BATTF4 


GN 
CD 


1B14A 


$$BATTF2 
$$BATTF5 


6L 
CF 


IB15I 


$$BATTF4 
*$BATTF5 
$$BAITU2 


CD 
Cf 
CK 


1B16I 


$$BATTF4 
$$BATTF5 
$$BArTU2 


CD 
CF 
CK 


lBfl7l 


3)$BATTF5 


CF 


1B18A 


$$BATTU2 


CK 


IB19I 


$$BATTF2 
$$BATTF3 


GL 
GN 


1B20A 


$$BATTF2 
$$BATTF3 
$$BATTF4 
$$BATTF5 
$$BATTU2 


GL 
GN 
CD 
CF 
CK 


1C40I 


$$BATTNA 
$$BATTNB 


AA 

AE 


1C50I 


$$BATTNA 
$$BATTNB 


AA 

AE 


1I30D 


$$BATTNC 


AG 


1I41A 


$$BATTNT 
$$BATTNU 


BF 
BH 


1I42D 


$$BATTNT 


BF 


1I43D 


$$BATTNV 


BE 


1I44I 


$$BATTNX 


BN 



278 DOS/VSE Logical Transients 



1I45D 


$$BATTNT 


BF 


1I46D 


$$BATTNV 
$IJBDOMP 


BE 
EA 


1I47I 


$$BATrNT 


BF 


1I48I 


SSBATTNU 


BH 


1I49I 


SIJBDOMP 


EA 


1I51I 


SIJBDUMP 


EA 


1I52I 


SIJBDOMP 


EA 


1P01D 


$$BATTNE 


AH 


IPO 21 


$$BATTNE 


AM 


1P03D 


$$BATTNF 


AP 


1P04D 


$$BATTNF 


AP 


iPlnD 


$$BATTMG 


AT 


1Q62I 


$$BATTHC 


AG 


iSOnD 


$$BATTNB 
«$BATTNC 
$$BATTNE 
$$BATTNF 
$$BATTNG 
$$BATTNH 
$$BATTNN 


AE 
AG 
AH 
AQ 
AT 
AV 
BA 





$$BATTNQ 
»$BATTNS 
$$BATTNT 
$$BATTNU 
$$BATTNY 
$$BATTNZ 
$$BATTN2 


BB 
BD 
BF 
BH 
BT 
BH 
BV 


5J95I 


IJBEOJ 


FP 


5J96I 


IJBEOJ 


FP 


P100I 


$$BATTS1 


CS 


PI01I 


$$BATTS2 


CV 


P102I 


«$BATTN7 


CL 


P103I 


$$BATTN7 


CL 


P104I 


$$BATTN7 


CL 


P105I 


$$BATTS1 


CS 


P106I 


$$BATTS1 


CS 


P107I 


*$BATTN7 
$$BATTS1 


CL 
CS 


P108I 


$$BATTS1 


CS 


P109I 


$$BATTN7 


CL 


P201I 


$$BPCLOS 





Appendix A: Error Message Cross Reference 27^ 



APPENDIX B: TOTAL MESSAGE CROSS-REFERENCE LIST 



All messages issued by the DOS/VS system Supervisor Loc[ic, SY33-8551- For cause and 
control programs, with a reference to the action o± each message^ see pOS /V S 
PLM and issuing phase, are listed in DOS/V S Messages, GC33-5379- 



280 DOS/VSE Logical Transients 



APPENDIX C: LABEL LIST 



Label 


Phase 


Location 


ADVANCE 


SiBOCBTC 


KJC4 


ADVANCE 


$$BOCRTD 


LCC3 


ADVANCE 


$$BOCBTG 


HCC5 


ADVANCE 


$$BOCRTY 


QDA2 


AENDBXIT 


SSBOCBTZ 


QKA3 


AGAIN 


$$B£0H4 


DGCii 


AGAIN 


$$8E0J 


DBA2 


ALABn 


$$BOCBTR 


PCB*t 


ALLP1 


$$B0CBT2 


RDA4 


ALLXFB 


*SBOCBTD 


LAAU 


ALHPASS 


$$BOCfiTN 


NDA2 


ALHIES 


$*BOCHTN 


NDH1 


ALHHCHD 


$$BOCBTZ 


Q4IA2 


ALTER 


$$BATTNT 


BBF1 


ALTER 1 


$$BATTNT 


BBD1 


ASSGHLOG 


$$BATTNG 


ASB5 


ATTEXIT 


$$BOCBTK 


HLB3 


ATTEXIT 


$$BOCBTP 


NHE1 


ATTN RET 


$$BATTF4 


CDE5 


ATTPSNDO 


$$BOCBTX 


QBD3 


ATT8AIT 


$$BOCBTB 


PBBa 


ATTHAIT 


$$BOCBTS 


PFB4 


ATTN AIT 


$fBOCBTH 


QAB3 


ATTBAIT 


$$BOCBTY 


QEB4 


AOTOCLOS 


$$B£0J4 


DFC3 


AOTOEMD 


$$BE0J4 


DFF3 


B 


IJBEOJ 


FPJ2 


BAL 


$$BATTF2 


GLC4 


BAL 


$$BATTF3 


GNC4 


BAL 


$$BATTF4 


CDC4 


BAL 


$$&ATT02 


CKH4 


BAL 


IJBDHPAB 


EHC1 


BATCH 


$$BATTNG 


ABCi* 


BCOUN 


$»B0CBT2 


RD04 


BEGIN 


S$&ATTNO 


BCB2 


BEGIN 


$$BOCBTI 


MGC1 


BEGINZ1 


$$BOCBTZ 


QGC2 


BEGIIIZ2 


$$BOCBTZ 


QGD2 


BBGI8Z4 


$$BOCBTZ 


QGF2 


BBGINZS 


»SBOCBTZ 


QHA3 


BSGINZ6 


$fBOCRTZ 


QHD3 


BBGIlil 


SSBOCBTI 


H6C2 


BGP1 


$$B0CBT2 


BDB4 


BLOCKED 


S$BAXTa2 


CK02 


BLOCKPOT 


IJBDfiPAR 


EOBS 


BTLOOP 


SSBATTNH 


ATE3 


B»P 


$$B0CBT2 


RDE3 


BTPASS 


SSBSBBOP 


GHD4 


BIPSTH 


$$BATTN3 


BPCl 


CALC2 


IJBSDUHP 


EGF4 


CAHCELCD 


»$BE0H4 


DGJ1 


CASEBA 


$i;bocrt6 


RLJ2 


CASSIA 


$$B0CBT6 


RLG5 


CASS 10 


$$B0CBT6 


RLG4 


CASE 2 


$$B0CBT6 


RLE5 


CASE4A 


$$B0CBT6 


HLF5 


CA0SS2 


IJBSOJ 


FPG3 


CCRLMG 


$SBATTNT 


BBD2 



Label 

CDISK 

CD3 

CEX 

CFBA 

CHAINING 

CHAIHTST 

CHECK 

CHECK 

CHECKEND 

CHECKKB 

CHECK 1 

CHECK3 

CHHIRQ 

CHK 

CHKAPRT 

CUKBLK 

CHKDIGIT 

CHKLIBIT 

CHKHXT 

CHKPD 

CHKPDR10 

CHKPD020 

CflKPD040 

CHKPD060 

CHKPD090 

CHKPDIIO 

CHKPD120 

CHKPD140 

CHKPD180 

CHKPD200 

CHKPD220 

CHKPD290 

CHKPD420 

CHKPD660 

CHKPD670 

CHKPD740 

CHKPEER1 

CHKPBB1 

CHKPE005 

CHKPE080 

CHKPE140 

CHKPE220 

CHKPE260 

CHKPE360 

CHKPB380 

CHKPB400 

CHKPB440 

CHKPB500 

CHKPF020 

CHKPF090 

CHKPF140 

CHKPF160 

CHKPF180 

CHKPF200 

CHKPF220 

CHKPF300 

CBKPG030 

CHKPG050 

CHKP6060 

CHKPG080 

CHKPTEHO 



P base 


Location 


IJBDHPIC 


FJA3 


$3iBOCRT6 


RLF1 


$$BOCRTB 


PBB3 


IJBDHPIC 


FJD2 


SSBOCRTN 


NCA3 


$$BOCHTE 


LDE4 


Si^BOCRTN 


flBC2 


$$B0CBT1 


RBK2 


$SBATTN7 


CPH2 


$$BOCRTK 


njG2 


$$BOCHTZ 


QHJ3 


$$BOCBTZ 


QKB2 


$$BATT«S 


AXFt 


$$BOCRTE 


LFB3 


$$B£0J4 


DFF1 


$$BATTN2 


BnF2 


$$BATTH7 


CRD3 


$$BATTN7 


CHE3 


$$BOCBTS 


FEB 3 


$$BCHKPD 


SDB1 


$$BCHKPD 


SDB5 


$$BCRKPD 


SDF1 


$$BCHKPD 


SDG1 


$$BCHKPD 


SDJ1 


$li»BCHKPD 


SDK1 


$$BCHKPD 


SDC2 


$1»BCHKPD 


SDB3 


$$BCflf(PD 


SDC3 


$$BCHKPD 


S0D2 


$$BCHKPD 


SDF2 


$$BCHKPD 


SDD3 


$$BCHKPD 


SDG2 


$$BCHKPD 


SDK2 


$$BCflKPD 


SDB4 


$$BCHKPD 


SDD4 


$$BCHKPD 


SDF4 


$$BCHKPE 


SEB5 


$$BCHKP2 


SBD4 


SSBCHKPE 


SEC1 


$$BCHKPE 


SEF1 


SSBCHKPE 


SEJ1 


$$BCHKPE 


SEGt 


SSBCHKPE 


SEA2 


$$BCHKPE 


SSA3 


$$BCHKPE 


SEC 3 


$$BCHKPE 


SED3 


$$BCHKPE 


SEG3 


SSBCHKPE 


SEJ3 


$$BCHKPF 


SFD1 


$$BCHKPF 


SFD2 


$$BCHKPF 


SFG1 


$$BCaKPF 


SFHl 


$$BCHKPF 


SFA3 


$$BCBKPF 


SFC3 


$$BCHKPF 


SFF3 


$$BGHKPF 


SFG3 


$$BCHKPG 


SGC1 


$$BCIiKPG 


SGD1 


$$BCBKPG 


SGF1 


$$BCHKPG 


SGJl 


$$BCHKPT 


SABS 



Appendix C: Label List 281 



Label 

CHKPT020 

CHKPl!0«tO 

CHKPT060 

CHKPT090 

CHKPT150 

CHKPTieO 

CHKPr320 

CHKPT360 

CHKP2030 

CflKP20(IO 

CHKP2110 

CHKP2150 

CBKP2160 

CHKP2165 

CHKP2170 

CHKPJERI 

CHKSTT 

CHKSTTI 

CHKSUB 

CHKSOB 

CHKSUB 1 

CHKS?A 

CHKSV&1 

CHKIItB 

CHK2 

CHKi 

CHK3 

CHK3G040 

CeK3G060 

CHK3G080 

CHK3G100 

CHK3G160 

CHK3G180 

CKDI001 

CKDPHASfi 

CKECCCQ 

CKECCCTH 

CKECCM 

CKECCHQ 

CKFOfiTSS 

CKHIfiEOT 

CKPIBFLG 

CLEANUP 

CLEAS 

CLEAHNXT 

CLI 

CLOSAPHT 

CLOSEB 

CLOSER 

CLOSED 

CLRPASS 

CLRSCRN 

CBDBEJCT 

CHCLIN 

CNCLTEST 

CNLRTN 

COMMON 

COHMON 1 

COHMSG 

C0HPARE2 

COMPASS 

CONPASS 

CONT 

CONTHD 

CONTBD 

CONTHDE 



Phase 


Location 


$$BCHKPT 


SAP1 


$$BCaKPT 


SAG1 


«$BCHKPT 


SAK1 


$$BCHKPT 


SAE2 


$$BCHKPT 


SAK2 


$$BCHKPT 


SAC4 


SSBCflKPT 


SAG1 


$$BCHKPT 


SAJ4 


«fBCHKP2 


SBB2 


$$BCHKP2 


SBD2 


$$BCHKP2 


SBD3 


$$6CHKP2 


SBF2 


$$BCHKP2 


SBG3 


$$BCHKP2 


SBH3 


$$BCBKP2 


SBB4 


$$BCHKP3 


SCG2 


$$BATINR 


ATB1 


$*8ATTNH 


ATD1 


$$BEOJ 


DAE3 


$$BE0J4 


DHG5 


$$B£0H4 


DGA1 


$$BATTNT 


BAE2 


$$BATTNT 


BBA1 


$$BATTNS 


AXE1 


$$BOCfiTE 


LDC2 


$$BOCRTS 


LFC3 


S$BOCRTF 


LKC4 


$$BCHK3G 


SKC1 


f$BCRK3G 


SKDl 


$$BCHK3G 


SKEl 


3;«BCHK3G 


SKF1 


$$BCHK3G 


SKB2 


$$6CHK3G 


SKB3 


SSBRSTRT 


SMC3 


$$BCCHHR 


GJE3 


$$BATTMS 


AXG3 


$$BATTNS 


AXH3 


$I>BATTNS 


AXB3 


$$BATTNS 


AXC3 


$$BATTNS 


AXE3 


$$BATTNS 


AXG1 


SSB&TTNG 


hSGU 


$$B0C8TQ 


NJH1 


$$B£0H4 


DGF2 


S$B0CRTA 


KBH1 


IJBEOJ 


FPF<I 


$$B£0J4 


DFF2 


IJBDMPIC 


FJB1 


IJBDMPIO 


FBB2 


IJBDMPIC 


FHE3 


*SB0CST0 


NFJ3 


$JPB0CRTB 


KDD2 


$$BOCRTZ 


QHG3 


»$BATTNC 


AG01 


IJBEOJ 


FPB2 


$$BATTSC 


AGB3 


$$BOCBTP 


NHB3 


$$BOCRTP 


NHB4 


$$BOCRTO 


NEJ2 


$SBATTN7 


CRD2 


$:(BOCBTN 


NBAS 


S$BOCBTN 


NCA4 


filBEOJS 


DDF2 


«$BOCRTR 


PAA2 


fSBOCfllT 


PHA3 


*$BOCRTS 


PEA2 



Label 

C0HTHD1 

COMTREAD 

CONTROL 

CONTROL 

CONT I 

CON? 

COHYES 

COUNT 

col 

CPRINT 

CRT 

CRTDSBL 

CRTDSBL 

CRTDSBL 1 

CRTEND 

CRTENTHt 

CRTEOJRT 

CRTHOtO 

CRTH110 

CRTH120 

CRT010 

CRTUi»0 

CTAPE 

CORSENT 

CORSENT 

CURSOP 

COUADDR 

D 

DATCHAIN 

DECK 

DECRE 

DEFAULT 

DELPASS 

DELTHO 

DELTHl 

DELTH2 

DELTH3 

DELYES 

DERRRODT 

DEVOK 

DEV3800 

DIAG135Q 

DIAG135R 

DIGIT 1 

DIGIT2 

DIPA 

DISABLE 

DISKB 

DISKETT 

DISKETT 

DISK1 

DKTYPE 

DKTYPE 

DKTYPE1 

DKTYPE1 

DOCAEX 

DOCAEX 

DOCAEX 

DOCAEX 

DOCCEX 

DOCCEX 

DOCDEX 

DOCEEX 

DOCFEX 

DOCFEX 



Phase 


Location 


$$BOCRTS 


PDH1 


$$BOCETS 


PDE2 


$$BATTNA 


ABB1 


$$BOCRTS 


PEAS 


$$BATTNV 


BGB1 


IJBDMPIC 


FJG3 


$$BOCRTN 


sees 


$$BOCRTG 


MAH4 


$$B0CRT6 


8MA1 


IJBDMPIC 


FJH3 


$$BE0J4 


DFG1 


$*BOCRTA 


KAH4 


$$BOCRTK 


MHC1 


$$BOCRTA 


KAK4 


$$BOCRTA 


KBD3 


$*BOCRTK 


HBB2 


$*BOCRTA 


KBF4 


$fBOCBTH 


MDD1 


SSBOCRTH 


NDH2 


$*BOCRTH 


MDF3 


$$BOCRT0 


PJC1 


$$BOCfiTU 


PJH1 


IJBDMPIC 


FJE1 


$$BOCRTX 


QBG4 


$$BOCRTY 


QDAS 


SiBOCRTK 


MHK4 


$*BATTH7 


CMB3 


IJBEOJ 


PPH4 


$$BOCBIS 


PDGl 


$$B0CRT2 


RCG2 


$SB0CRT3 


RED3 


$$BOCRTL 


MMFU 


$$BOCRTH 


NCA1 


$$BE0H4 


DGH4 


$$B£0J4 


DHC1 


$$BEOJi| 


DHE1 


$$BEOJi| 


DHG2 


$$BOCETN 


NCH2 


SSBATTNU 


BCG2 


$$BATTHV 


BGJ1 


SiBATTSI 


CSC2 


$*BATT»Z 


BKE5 


$$BATTIi2 


BKE4 


$$BOCRTL 


MNF2 


$$BOCRTL 


MMA2 


$$B0C»T6 


HLE2 


$$BE0J3A 


DEK2 


IJBDMPIC 


FHCa 


$$BEOJ 


DCA3 


IJBEOJ 


FHF3 


$$BE0fl4 


DGE4 


$fBEOJ 


Dca3 


IJBEOJ 


FRC3 


$*BEOJ 


DCH4 


IJBEOJ 


FRC4 


$$BOCSTC 


KHE4 


$$BOCRTE 


LDK4 


$$BOCeTF 


LJE2 


$*BOCRTG 


MBB3 


$$BOCRTD 


LABS 


$$BOCRTE 


LDF5 


$$BOCRTC 


KGG4 


$SB0C8TF 


LHF3 


$*BOCRTE 


LDK3 


$$BOCRTE 


LEB1 



282 DOS/VSE Logical Transients 



Label 

DOCFEXl 

DOCGEX 

DOCGEX 

DOCGEX 1 

D0CGEX2 

DOCHEX 

DOCLEX 

DOCLEXl 

DOCHEX 

DOCNEX 

DOCOEX 

D0C02EX 

DOCPEX 

DOCPEX 

DOCQEX 

DOCQEX 

DOCQEX 

DOCQEX 

DOCQEX 1 

DOCQEX 2 

DOCQEX i 

DOCQ02S 

DOCVEX 

DOCVEX 

D0C¥1 

D0CV2 

DONE 

DOSKIP 

DOSKIP 

DOSKIP 

DOSKIP 

DOOPDATE 

DOHN 

DSDOMMYI 

DSPCR00T1 

DSPCBO0T2 

DSPL 

DSPLY 

DSPLI1 

DSVA 

D'fCHAT 

DTINOtI 

DUHMf 

D0MBX1 

DUnPALLP 

DOHPABI 

DUHPCfi 

DOWPCR 

DUBPEND 

DOHPENDI 

DOHPIT 

DOMPPAHT 

DOHPSUP 

DV3ttOO 

ECCCTBIT 

EMBL 

EHBL 

END 

END 

ENDBED 

END1 

END2 

ENTEfi 

EQCHK 

EQCHK1 



Phase 


Location 


$$BOCfiTE 


LDK2 


SSBOCRTB 


KDK2 


SJBOCRTC 


KGB2 


*fBOCB!rC 


KGE2 


SSBOCBTC 


KGC2 


$$BOCBTY 


QDCH 


$$BOCfiTN 


NBA3 


$$BOCBTN 


NBEI 


$$BOCBTX 


QBHa 


iSBOCHTQ 


NJD4 


$$BOCBTQ 


NJG3 


$SBOCBTK 


HJB4 


$$BOCBT0 


NEBS 


$«BOCBTQ 


NKE4 


*$BOCRTB 


KFE2 


$$BOCBTC 


KJG3 


$$BOCRTD 


LCF2 


$$fiOCBTL 


HnG2 


$$BOCRTB 


KFF1 


$«BOCBTB 


KFE3 


$*BOCRTB 


KFF3 


*:»BOCBTQ 


NJD3 


$$BOCRTL 


HNG3 


**BOCBTN 


NBG4 


$$BOCRTL 


HNE3 


SSBOCRTL 


HNF3 


$$BE0J3A 


DEJ'i 


$$BATTF2 


GLB5 


**BATTF3 


GNB5 


$$BATTFU 


CDB5 


$$BATTF5 


CFF5 


$$BE0J3A 


DEF4 


$$B0CRT3 


RFC2 


$$BATTNa 


BCK3 


$$fiATTNU 


BDD3 


$$BATTNa 


BDF2 


$$B0CRT3 


REJ4 


$5BATTNU 


BCD5 


$$BATTNO 


BCA5 


IJBSDOHP 


EHCa 


$$BATTNA 


AAB5 


$$BATTNA 


Acca 


$$BATTNT 


BAD2 


*$BATTNT 


BAA4 


SSBATTHV 


BEE4 


IJBDMPPA 


£RAt4 


IJBDMPPA 


EQB1 


IJBSDOHP 


EJA1 


IJBSDUHP 


ELEI 


IJBSDUHP 


ELFt 


IJBSDOHP 


EHK1 


IJBSDOHP 


EFA4 


IJBSDOHP 


ELF1 


$$BATTN7 


CMB2 


$$BATTNS 


AYG3 


$«BOCBTE 


LFE3 


$SBOCRTF 


LKF4 


$$BOCRTI 


HGH1 


J|i$B0CRT2 


RCH3 


$*B0CRT3 


HFEI 


$$BOCRTQ 


NKG1 


$$BOCR3;2 


RDE5 


$$B0CRT1 


BBA1 


$$BOCBTF 


LHA5 


*$BOCRTF 


LHB2 



Label 


Phase 


Location 


EBA 


$$B0CBT2 


HCF5 


ERASE 


$*BOCRTC 


KKK4 


EBAI 


$*B0CRT2 


SCE5 


EBEPIN 


SSBSDROP 


GHB4 


EREPOOT 


$$BSDfiOP 


GHG3 


ERR 


$$BATTNV 


BGBb 


ERR 


IJBDMPIC 


FGD1 


ERRE 


IJBDMPIC 


FGE1 


ERROR 


$3>B0CRTE 


LDA2 


ERROR 


$*B0CRT1 


SACS 


ERROR 


$$B0CRT6 


SLH3 


ERRORCAS 


$*B0CBT2 


SCF1 


EBR0R4 


$*B0CRTF 


LGF2 


ERRROOT 


$$BATTNT 


BAH2 


ERRRfN 


$$BATTNA 


ACB1 


ERR1 


SSBOCRTE 


LFD4 


ERR1 


$$B0CRTF 


LKEi* 


EBR2 


$*BATTNT 


BBA2 


ESETID 


$$BATTNI 


ALC2 


ESKIPRTI 


$$BATTNI 


ALB 2 


ESOPV 


$$BATTNI 


ALD1 


ETEST 


$SBOCRTL 


MMA3 


EX 


$$BOCRTE 


LFG2 


EX 


IJBDHPIO 


PAF2 


EXCPRG 


$$BATTNA 


ACB2 


EXIT 


$$BCCHHR 


GJB4 


EXIT 


$$BOCRTE 


LEH2 


EXIT 


$$BOCRTF 


LHAU 


EXIT 


$$BOCRTO 


NEB4 


EXIT 


$*BOCRTP 


NUDi 


EXIT 


$$BOCRTQ 


MKE3 


EXIT 


$*BOCRTO 


PJC3 


EXIT 


$*BSYSWR 


GGF2 


EXIT 


IJBDHPAB 


8SC2 


EXITA 


$$BOCRTK 


HKA2 


EXITA1 


$$BOCaTK 


MKE2 


EXITA2 


$$BOCRTK 


nK62 


EXITZ 


$SBOCRTZ 


QHE1 


EXITZIA 


$$BOCRTZ 


QHG1 


EXITZl 


$$BOCRTZ 


QHF1 


EXITZ2 


$$BOCRTZ 


QHHS 


EXITOO 


$4>BEOJ7 


DHH4 


EXIT01 


$$BE0J7 


DHJ4 


EXIT1 


$*BCCHHR 


GJG4 


EXIT1 


$$BOCBTF 


LHF1 


EXIT1 


$SBOCRTV 


PKE3 


EXIT1 


$$B0CBT3 


SFJ1 


EXIT1 


$$B0CRT6 


RLJ5 


EXIT2 


$$B0CRT6 


BHA^ 


EXT 


IJBOHPAR 


EfD2 


EXTINT 


$$BATTHA 


ABB3 


FBAPHASE 


$$BCCHHR 


GJC3 


FETCH 


$$B£0H4 


DGHS 


FETCH 


$$BE0J3 


DDK 3 


FETCHO 


$$BOCRTA 


KBJ3 


FETCHZ 


$$BOCRTA 


KBGS 


FGLST 


$*BEOJ 


DCG3 


FGLST 


IJBEOJ 


FRB3 


FIN 


$SBOCRTS 


PDA3 


FINDKEY 


$$BATTN7 


CNB3 


FINDPOB 


$*BATT8V 


BGE1 


FINDPOB 


$$BATTS1 


CSC3 


FINE 


$*BOCRTT 


PHB5 


FINISH 


$SBATT»7 


CQE3 


FIRSTX 


$*BOCRTL 


HHH3 




Appendix C: Label 


List 28. 



Label 



Phase 



Location 



FMDHATCH 


»$BATTS2 


CVC2 


FOLD 


$$B0CRT2 


BCE2 


F0B6STIf 


S$BATTN3 


BPJ3 


FOBW 


$fBGCRT3 


REC2 


FOOND 


$$BATTNF 


AQ03 


FREEBl 


$$BBOJ 


DBG5 


FREBTRK 


$$B£0J4 


DHE3 


FRET 


$SBOCfiTB 


LDB2 


FULL WORD 


$$BAT!I!NU 


BCF3 


F« 


f$B0CBT3 


BFF2 


Ftp 


$fB0CfiT2 


RDF3 


F8P1 


f$B0CfiT2 


BDG3 


GETS IT 


IJfiDHP&R 


EUJ1 


GETCHD 


$$BATTNA 


AAD2 


GEfK 


$$BATTND 


AHB3 


GETPIBXT 


SJIBATTNC 


AHG4 


GETPID 


$$BAXXND 


AHDI 


GETPIK 


$$BATTNC 


AGB5 


GETPIKl 


fSBATTNC 


AGC5 


GETSIZE 


$$BATTNF 


APH1 


GO 


SfBOGBTE 


LEA2 


GO 


$$60CRT6 


HAE1 


GO 


SSBOCfiTK 


HHF1 


GO 


$$BOCBTP 


NGE2 


GO 


fSBOCBTR 


PAD1 


GO 


$$BOCaTS 


PDD1 


GO 


SSBOCBTT 


PGD1 


GO 


$$BOCBTV 


PKE1 


GO 


fSBOCBTW 


QAE1 


GO 


$$BOCBTX 


QBE1 


GO 


$$BOCfiTI 


QDE1 


GO 


f$B0CRT4 


BHE1 


GOON 


$$B0CBTG 


NBA2 


GOON 


f$BOCBTT 


PHA2 


GOON 10 


$$B0CBTD 


LBA2 


GOON 11 


SfBOCBTD 


LBB3 


GOON 14 


$$BOCBT0 


LAJ2 


GOON 30 


$$BOCBTC 


KHD1 


GOON 4 


$*BOCBTC 


KJD2 


GOl 


$fBOCRTH 


NAF2 


G01 


$$BOCBTY 


QDC3 


G02 


$fBOCRTH 


NAAK 


G02 


$$BOCfiT¥ 


QDD2 


HALTIO 


S$BE0J3a 


DEBS 


HALT01 


$$BE0J3A 


DEG5 


RAROH&IT 


$$BEOJ 


DAE2 


HARDVAZT 


fSBOCRTF 


LGJ2 


HARDH&If 


$$BOCBTF 


LJD4 


HERE 


$$BSISBH 


6GB 1 


HIRQaiET 


$$BATTNS 


hlGH 


IGNORE 


$$BATTNC 


AJJ4 


IGNORE 


*$BOCBTK 


HJB3 


IJBATTF2 


$$BATTF2 


GLB1 


UBATTFa 


iSBATTFU 


CDB1 


IJBAaCTFS 


$$BATTF5 


CFB1 


IJBEJ33S 


;|$B£0J3 


DDC2 


IL 


$$BOCBTB 


KEA2 


IMCORRL 


$$BCCBTB 


KEA 1 


INCREfl 


UBSDOHP 


EGD1 


INIT 


SfBATTNT 


BAC1 


INITDUNP 


UBSDOHP 


ECC3 


INITIAL 


f$BATTNU 


BCC2 


IHITLOOP 


$$B£0J3A 


DEK3 



Label 


Phase 


Location 


INITOPR 


$»BATTNG 


ASB1 


INIT0PH1 


$$BATTNG 


ASF2 


INITOPR 2 


$$BATTN6 


ASF 3 


INITPAHT 


$$BEOJ 


DBB1 


INITPH 


$$BCCHHa 


GJE2 


INITOO 


$$BE0J7 


DSC1 


INIT05 


$fBE0J7 


Dfl£2 


INPBO 


$J6B0CBTQ 


NKK1 


INSOPH 


$$BATTNA 


ACD1 


INSBTAEB 


$SBATTNB 


AirB4 


IHTEBR 


$$BE0J 


DAB3 


INT? 


$fBOCBTB 


KED2 


INT? 


$$BOCBTE 


LEC2 


INVALID 


$$BATTNT 


BBC2 


IN7ALID1 


$$BATTNT 


BAG4 


INVALOOT 


$$BOCRTH 


NAB3 


INVAL1 


$$BATTNF 


APB5 


INVC08 


SSBOCRTI 


BBH2 


IHVLSTS 


IJBDHPIO 


FAF4 


IHVP 


IJBDHPAR 


ESE4 


IN¥PG 


$$BEOJ 


DBC2 


INVPHASB 


$$BATTF2 


6LF2 


INVPHASE 


$$BATTF3 


GND3 


INVPHASB 


$$BATT02 


CKH3 


IHVSYN 


$$BATTNF 


APG2 


INVS¥N1 


SfBATTNF 


APF2 


INVSYH2 


$4iBATTNF 


APD2 


10 


$$BOCRTV 


PKA2 


lOEBR 


$$BATTF3 


GNG3 


lOERfi 


$$BATTF4 


CDD3 


10 EBB 


$$BATTF5 


CFH«i 


IOBEG05 


$$BE0J7 


DHE3 


lORETN 


$$BOCfiTK 


»L£1 


lOBETfiS 


fSBOCBTG 


HCD2 


lOBETBN 


$«BOCBTP 


NGE4 


lORETBN 


$$BOCBTB 


PCG3 


10 BOOT 


$$BOCBTG 


MCB1 


lOBOOT 


$$BOCBTK 


HLB1 


lOBOOT 


$$BOCfiTP 


NGC4 


lOBOOT 


SSBOCBTB 


PCF2 


lOfiOOT 


$$BOCBTS 


PFB1 


lOBOUT 


SSBOCRTT 


PGB5 


lOBOOT 


$$BOCBTV 


PKC4 


lOBOOT 


$$BOCBTH 


QAC!> 


lOROOT 


$$BOCaTY 


QFC2 


lOBOOT 


$$B0CBT1 


RBB3 


lOBOOT 


$$B0CfiT4 


5HD3 


IORO0T1 


$$B0CBTP 


HGB4 


IOBO0T1 


$$B0CBTV 


PKB4 


I0B0UT1 


SSBOCBTH 


QAB5 


I0R0UT1 


$$BOCBTX 


QCB4 


lOROOTI 


$$BOCRTY 


QFB2 


I0RT1 


$$BCHKP2 


SBC5 


I0RT1 


$*BCHKP3 


SCC4 


101 


$$BOCBTG 


HBF4 


106 


$SBOCBTG 


MBAU 


IRCROO 


$S6ATTNZ 


BKH5 


ITERATE 


$$BE0J3A 


DBA 2 


JAEXIT 


$$B£0H4 


DGAtI 


JCLFAIL 


$$BEOJ 


DAC* 


KCOHB 


$$BOCBTN 


NBA2 


KCOBHfl 


$$BOCBTA 


KCA3 


KCOHHON 


$$BOGfiTK 


MJF3 


KCOHHON 


$$BOCBTN 


NBDI 



284 DOS/VSE Logical Transients 



Label 


Phase 


Location 


KEYWORD 


S*BATTN7 


CNC2 


LABHV 


I$BSKSRB 


GGC1 


LABHV1 


$JgBS¥SHB 


GGH1 


L&BHV2 


$$BSYSHH 


GGC2 


L&BHV3 


*$BSYSHH 


GGD2 


LAMBVI 


$$BSZSH5 


GGG1 


LASTPOB 


$$BE0J3A 


DEB3 


LBLPB 


IJBSDOMP 


EFD1 


LEN3 


$$BATfNV 


BFE2 


LIBIT 


f$B0CeT3 


RFA5 


LIHE 


$$B0CRTB 


KDD3 


LINECOO 


$$B0CRT6 


RLH5 


LIHE2 


fSBOCBTB 


KEE1 


LISTIO 


$*BATTF2 


GMC2 


LlSJflO 


$$BATTFU 


CEB3 


LO&O 


$$BATTF2 


GLH3 


L0ADERH1 


$$BATTN7 


CPK3 


L0ADERB2 


$$BATTSt 


CSH2 


LOADIT 


$$BATTNA 


ABG1 


LOAUPHAS 


S$BATTF2 


GLH1 


LOADPHAS 


$fBATTF3 


GNG2 


LOADPUAS 


$$BATTF4 


CDE2 


LOADPHAS 


JPSBATTFS 


CFD2 


LOADPHAS 


$$BATTU2 


CKB4 


LOAD B 3 


*$BATTNT 


BAJ1 


LOADUPDT 


$$BAITN7 


CPJ2 


LOG 


$SBATTNC 


AJB5 


LOG 


$$B0CRT2 


RDA1 


LOGGING 


IJBEOJ 


FQG2 


LOGIO 


$*BATTF2 


GHD3 


LOGIC 


$$BATTF4 


CEG1 


LOGIOW 


$$BATTF4 


CEB1 


LOOP 


$$BATTF4 


CEF1 


LOOP 


$$BOCRTR 


PAF2 


LOOPS 3 


$SBATTNF 


APC3 


L0OP1 


$$BATTIIE 


AND3 


L00P1 


*$BATTNF 


AQC3 


L00P2A 


$$BATTNF 


AQEl 


LOOP 3 


$*BATTHV 


BHB4 


LPIEfiB 


S$BATTF5 


CFC3 


LSTSEG 


S$BOCRTQ 


NKB1 


LTADUMP 


IJBSDUMP 


EDB2 


LOBCHECK 


$*BCCHHR 


GJC2 


LUBLOOP 


$$BATTF4 


GED3 


HACFAIL 


**BATTS1 


CTE2 


HACF&IL 


*$BATXS1 


CUE2 


HACfiET 


$$BATTF2 


GLK2 


HACBET 


$:iiBATTF3 


GHE3 


HAINLIME 


fSBOCBTR 


PAG3 


HAIHLINE 


$*BOCfiTS 


PEK2 


MAINLIHE 


$iBOCaTT 


PGH4 


HAINLH 


$$BOCBTK 


HHJ3 


nAINOO 


$«BE0J7 


DMB1 


HAIN05 


$$BE0J7 


DHG1 


HAIH07 


$SBE0J7 


DHK2 


HAINIO 


$$BE0J7 


DMEU 


HATCH 


$$BATTN7 


CQD2 


HAXFHD 


IJBSDUMP 


EGE4 


HICB 


f$B£0J4 


DFGit 


niCRl 


$$B£0J4 


DFJ4 


HISHATCH 


$$BATTFlt 


CDF3 


MISMATCH 


$$BATTF5 


CFJ3 


MOVALUE 


*$BATTS1 


CUB3 


MOVEDATA 


*$B0CBTT 


PGE2 



Label 


Phase 


Location 


HOVESOB 


IJBEOJ 


FPF5 


HOVES0B1 


IJBEOJ 


FPG5 


HO¥ETIC 


$$BOCRTA 


KCC4 


MSG 


$$BAT'£NB 


AEfil 


MSGO0T3 


$$BATTNA 


AGC3 


HSG02 


S$BATTS2 


CVJ2 


HSG1 


$$fiATTNB 


AEG1 


HSG1 


$$BOCRTF 


LJD3 


MSG1020 


$$BR«SG1 


SJD1 


HSG1040 


$$BRnSGl 


SJF1 


HSG1120 


$$BRMSG1 


SJG1 


MSG1140 


$$BRHSG1 


SJJ1 


MSG 1200 


$$BRnSGl 


SJA3 


HSG1240 


$$BHHSG1 


SJC3 


MSG1260 


SSBRHSGI 


SJG5 


MSG12B0 


$$BBSSG1 


SJH3 


HSG2 


$3>BATTNB 


A EC 3 


HSG2 


$$BOCETE 


LEJ4 


MSG2 


$$BOCfiTF 


LJB5 


HSG2020 


$$BRMSG2 


SQHl 


MSG2040 


$$BRHSG2 


SQG2 


MSG2060 


$$BRMSG2 


SQA2 


HSG20B0 


$$BRnSG2 


SQB2 


MSG2120 


$SBRHSG2 


SQC2 


MSG2160 


$$BRnSG2 


SQE3 


HSG2300 


$$BRMSG2 


SQB4 


HSG2420 


$SBEnSG2 


SQJ4 


MSG2500 


$$BRHSG2 


SQD5 


MSG2520 


$$BRBSG2 


SQH5 


HSG2540 


$$BRHSG2 


SQE5 


MSG3 


$$BOCRTE 


LEH3 


MSG3 


SfBOCRTF 


LJA4 


HVCBSG6 


SfBATTHV 


BGF2 


MVERDY 


$$BATT»C 


AHD1 


MVREMAIH 


$$BATTS1 


CUE3 


N DSC AN 


$$BATTNA 


ADC3 


NEHCHD 


$:j>BOCRTD 


LBE1 


NEHL 


$*BOCRTC 


KGJ1 


MEHLINE 


SSBOCRTD 


LAD2 


NEWLINEI 


$$BOCRTD 


LAB3 


NEHHIN 


IJBSDOMP 


gGD4 


NEHVOL 


$$BATTBC 


AHB4 


NEXT 


$$BATTN7 


CRE2 


NEXTCCW1 


$$BOCRTS 


PEA 3 


NEXTDIB 


$$BE0H4 


DGF4 


NEXTDIB 


IJBDHPPA 


EQD4 


NEXTEHT 


IJBSDUMP 


EGC2 


NEXTEHTRY 


$$BCCHHR 


GJJ2 


NEXTLINE 


$SBOCHTI 


HGG2 


HEXTPH 


SSBCCHBR 


GJG2 


NEXTO 


$«BATTS1 


CTD3 


HEXT2 


$iBATTS1 


CTF3 


NEXT 3 


$$BATTS1 


CTG3 


NEXT4 


$*BATTS1 


CTH3 


NOADD 


$$BOCRTT 


PGG3 


N0ADD1 


$fBOCRTT 


PHG3 


NOAP 


$$BEOJ 


DAE1 


NOAP 


$$BE0J3A 


DEEl 


NOAP 


IJBEOJ 


FPG4 


NOAP 


IJBSDUMP 


EAE2 


HOATTENT 


SSBOCBTG 


HCB2 


NOATTEHT 


$$BOCRTR 


PCF3 


NOCRT 


$$BE0J4 


DFHl 


NOCUHS 


$$BOCRTP 


NHC5 


NODAT 


SfBOCRTB 


PADS 


A 


ppendix C: Label 


List 28f 



Label 


Phase 


Location 


NODATA 


fSBOCRTT 


PH£tl 


NODEL 


$$BOCBTQ 


NJD2 


NOETSS 


IJBSDOBP 


ECD1 


NOFIPA 


$$B0CfiT6 


RLC4 


MOPOBHS 


$$BATTF3 


GNG1 


NOHOLO 


$$B£0J4 


DHE2 


NOKCOHH 


$$BOCBTA 


KCA2 


NOLOG 


$$fiATTNC 


AJE5 


NOLTA 


IJBEOJ 


FPA5 


NOLXADOHP 


IJBSDUnP 


EDG2 


ROHOVE 


$$BATTS2 


CVB3 


HOnOVE 


$$BOCRTC 


KGJ3 


sonovE 


f$BOCBTD 


LAB4 


Nonv 


$$BOCRTT 


PGD3 


NOOPBHD 


$$BATTN7 


CNE5 


NOPABT 


$$B£0H4 


D6G1 


MOPCBD 


$$BOCBTZ 


QJA1 


NOPOHEB 


$$B£0H4 


DGF1 


HOPSOT 


SfBOCBTS 


PDA4 


H0PUB2 


XJBDHPPA 


EQG2 


H0P2 


j($BOCBTZ 


QJD1 


NOB AS 


S$B£0J4 


DFA3 


NOBEAD 


$fB0CfiT3 


BFA1 


HOBEDSP 


$$B0CRT7 


PKH2 


NOBEQ 


i$fi£GJ3A 


DED5 


NOBHAL 


$$BATTNV 


BFB1 


N0BHAL1 


$$BATTNV 


BFD2 


NOBHDHP 


IJBSDUHP 


ECG1 


NOSOUND 


$$BOCBTI 


QEE1 


NOSVADflP 


IJBSDOBP 


EHB1 


NOSYSTSK 


$$BOCBTA 


KAA3 


NOTFHD 


$$BATTF2 


GLE2 


HOTFMD 


S$BATTF3 


GNG3 


NOTFND 


$$BATTF4 


CDJ1 


NOTFHD 


$$BATTF5 


CFJ1 


NOTFND 


$$BATT02 


CKH2 


NOTFOLL 


$$B0CfiTH 


QAA2 


NOTFOLL 


IJBDHPIC 


FBJ1 


NOTIC 


ji$B0CfiTC 


KHA5 


NOTOK 


$$B0CaTH 


HEF2 


NOTPBT 


IJBSDOHP 


EJB1 


NOTBEADY 


SSBOCBTB 


PBA1 


HOTXT 


$$fi0CfiTT 


PGA2 


NOON ITCH 


SSBOCBTA 


KCE2 


NOVOLIDl 


$$BE0J7 


DND4 


NOHBITE 


$$B0CBT1 


BAD1 


H032 1 1 


$$BATT02 


CKC2 


NVSERB 


$$BATTNA 


ACBS 


N370BP 


IJBSDOHP 


EHD1 


OALL06 


$$BACL0S 


DKB4 


0AL1 


$$BACL0S 


DJH1 


OAL10 


$$BACL0S 


0KB1 


0AL12 


S$BACL0S 


DKC1 


0AL2A 


$$BACLOS 


DJF2 


0AL3 


SSBACLOS 


DJG2 


0AL4 


$$BACLOS 


DJH2 


0AL6 


$SBACLOS 


DJB3 


OALI 


$$BACLOS 


DJB4 


0AL8 


$$BACLOS 


DJC3 


ODASD 


IJBDHPIC 


FGC2 


OFBA 


IJBDBPIC 


FGC5 


OKEXIT 


IJBDBPIC 


FFG5 


OKEXIT 


IJBDHPIO 


FBD2 


ONELINE 


$$BOCBTB 


KEB4 


ONETST 


$$BOCBTC 


KKJ1 



Label 

ONLIST 

ONLIST 

ONLYD 

OHLYENT 

OPENEHD 

OPNESS 

OPHESS 

OPHESS 

OPHESS 

OPRSHT 

OPBTHUH 

OBBD? 

OUTCALL 

OOTSTAT 

PAGEPOOL 

PARAHOO 

PABCKBTN 

PABINV 

PABH 

PABPA 

PABTI 

PABT1 

PAUSE 

PA0SE2 

PA VAIL 

PAVAIL 

PGBOOTI 

PCB00T2 

PDEND 

PDIB 

PDOHP 

PDOHPB 

PFBLTHSG 

PFCLBABT 

PFDDNCOO 

PFEOPB 

PFBSHT 

PFESYHTX 

PFFETCH 

PFFOBHS 

PFGETOPB 

PFKEYDPC 

PFLPI 

PFLPI 

PFLDBAD 

PFHE 

PFNKSCOO 

PFNKYVAL 

PFNOL 

PFNOLHSG 

PFNXTOPB 

PFNiOPfi 

PFN3211 

PFOPB 

PFOPRFCP 

PFOPBFLD 

PFOPBIN? 

PFPBMHVC 

PFPOBCNT 

PFBCOHBS 

PFSTHEND 

PFSTRPBH 

PFSONIT 

PFUNIT 

PFWOFCOO 



Phase 


Location 


$$BEOJ 


0CA2 


IJBEOJ 


FBF1 


$$B0CfiT2 


8CG3 


$*B0CfiT1 


1BC2 


IJBDHPIC 


FGG5 


$fBATTF2 


G1B4 


$^BATTF3 


GNB4 


$$BATTF4 


CDB4 


$$BATTF5 


CFB5 


$*BATTNC 


AGE2 


SiBOCBTO 


NEA4 


$*BATTNC 


AUE1 


$$BSDBUP 


GHJ2 


$*BATTMB 


AUBS 


IJBSDUHP 


SHD2 


$$BATTNZ 


BKD3 


$*BATTHQ 


AVD1 


IJBSDUHP 


BHD5 


$$B0CBT2 


RCAb 


$$B0CBT6 


BHA2 


$SB0CBT3 


aFA3 


IJBSDUHP 


1HB1 


$I>BATTHC 


AJB1 


$$BATTHC 


AJK1 


$$B0CHrC 


KKD2 


S^BOCBTY 


QFJ4 


$$BATTST 


BBJ5 


$$BATTHT 


BBK5 


IJBSDUHP 


EL64 


IJBDHPPA 


BQD3 


$$BATTMV 


BHB1 


IJBSDOHP 


EBB1 


$$BATTF1 


CCD4 


$*BATTH8 


CAB2 


$$BATTF1 


CCJ3 


$$BATTH8 


CAF1 


SiBATTFI 


CCE2 


$$BATTF1 


CCB3 


$$BATTFO 


GKF5 


$$BATTN8 


CAE3 


$$BATrN8 


CBB1 


$$BATTF1 


CCD3 


$$BATTFO 


GKF1 


$$BATTN8 


CAF3 


SSBATTFO 


GKH2 


$*BATTFO 


GKJ3 


$$BATTF1 


CCG3 


$$BATTN8 


CAH2 


$$BATTFO 


GKB1 


S$BATTN8 


CAK3 


$$BA7TN8 


CAC1 


$$BATTHB 


CBB2 


S$BATTF1 


CCJ1 


$*BATTN8 


CAD2 


$$BATTN8 


CAG1 


$$BATTN8 


CAB1 


$*BATTF1 


CCC4 


$$BATTN8 


CBG1 


$$BATTFO 


GKC4 


$*BATTF1 


CCBl 


$$BATTN8 


CAK5 


$$BATTN8 


CBD1 


$$BATTFO 


GKG2 


$$BATTFO 


GKB2 


$$BATTF1 


cca3 



286 DOS/VSE Logical Transients 



Label 

PF10PH 

PF20PS 

PG8EGS 

PN&VAIL 

PN&VAIL 

PNDUHP 

P0HCHK1 

POBER 

PP0CT5CTT 

PREPOHSG 

PREPVMSG 

PREPVMSG 

PRESENT 

PRINT 

PRINT 

PRINTEHD 

PSINTEND 

PRINTERS 

PRINTERR 

PRINTERR 

PRINTO 

PRISTO 

PRINT 1 

PRINT! 

PRINT1 

PROCEDORT 

PROCKE? 

PROCMSG 

PROGCHCK 

PROGCHCK 

PROTCHCK 

PROTCHK 

PROTCHKl 

P80TCHK2 

PRTEND 

PHTPA 

PRTPA 

PRTPSai 

PRTPS82 

PRTY 

PBTILOP 

PRTYSET 

PRTY05 

PRTY15 

PRTY20 

PRTY21 

PRTJ30 

PRTI52 

PRTY56 

PRTI57 

PRTI58 

PRTf59 

PRVDflSGI 

PUBFOUMD 

PUBLOOP 

POBLOOP 

POBLOOP 

POBLTHSG 

POCLE&RT 

PUDDNCUO 

POESMT 

POFOLD 

POGETOPR 

PUGOPR 

POKEIDPC 

PDKEIWRO 



Phase 


Locatxon 


$$BATTN8 


CAH3 


SSBATTNB 


CAJ3 


IJBSDOMP 


EHD1 


$$BOCRTC 


KKH5 


$*B0C8TI 


QFG4 


IJBSDOMP 


BKF2 


*SBaTTFO 


GKK2 


$$B£0H4 


DGE1 


$$BiTTNS 


AXF5 


$$BATTF4 


CDC2 


**BATTF2 


GLG1 


$$B&TTF5 


CFC2 


iSBATTNC 


AHD4 


IJBDHPIC 


FFA3 


IJBDHPIO 


FBB5 


$$BA1TF2 


GLE5 


SilBATTFB 


GNF5 


$$BATTF*» 


CDG3 


**BATTF5 


CFD3 


$SBATT02 


CKJ2 


IJBDHPIC 


FFD5 


IJBDHPIO 


FBF5 


$$B£OJ 


DCD4 


IJBDHPIO 


FCB2 


IJBEOJ 


FRH4 


$$BATTNS 


AXD5 


$iBATTN7 


CYtBk 


f$BATTS2 


C¥H2 


$$BOCHTA 


KBF1 


S$BOCBTZ 


QKD5 


$*BOCRTZ 


QMC2 


SSBOCRTZ 


QHB1 


$$BOCRTZ 


QME2 


$$BOCBTZ 


QHGt 


IJBEOJ 


FRG2 


IJBSDOfiP 


EKA3 


IJBSDOMP 


BKC3 


IJBEOJ 


FQC1 


IJBEOJ 


FQF1 


$$BATTN2 


BLB1 


$$BATTN2 


BHG1 


$$BATTN2 


BHA1 


$$BATTN2 


BLD1 


*SBATTN2 


BLF1 


$$BATTN2 


BLA2 


$SSATTN2 


BLD2 


$$BATTN2 


BLA3 


$$BATTN2 


BHB1 


$$BATTN2 


BHD1 


$$BATTN2 


BHG2 


$SBATTN2 


BHB4 


*$BATTN2 


BHC5 


SSBOCRTP 


IiHA2 


$$BATTS1 


CSC<J 


$$BATTF4 


CDF2 


*$BATTF5 


CFH2 


$$BATT02 


CKCft 


$SBATT01 


CJF2 


$$BATTN9 


CGB2 


$$BA1fT0l 


CJG5 


$$BATTU1 


CJC4 


$$BATTN9 


CGG3 


$$BATTN9 


CHB1 


$»BATTN9 


CGF1 


$$BATT01 


CJE3 


$S6ATTN9 


CHJ2 



Label 

PONKSCOO 

POMOCHK 

POMULHSG 

POMIOPR 

POOPR 

POOPRFLD 

P0PRHH7C 

PORCOMBS 

POSTRPRH 

PUTDATA 

POTHSG 

POTMSG 

POTHSG 1 

POTRAIN 

PUMOUCOG 

P010PR 

P020PR 

P02OPR 

PVALID 

QEX 
QOEUE 

RASSY 

RASWAIT 

RASHAIT 

RDSPLAY 

REACHED 

READ 

READCHD 

READCHD 

READDIR 

READH1 

READRT 

READRT 

REAL370 

RECOG 

REC0V2 

REDSP 

REPEAT 

REPEAT 

BEPEATO 

REPEAT2 

REQCANC 

REQCAHCO 

BEQPEND 

REQPE8D 

REQPR 

REQU 

RESCODE 

BESET 

RESET 

RESET 

RESETSM 

BESET 1 

RESEXT 

RESTK 

BESTREGS 

RSTSRR 

BBTERR 

RSTEBR 

RETX 

RETOK 

RETRY 

BETBY 

BETHY 



Phase 


Location 


$$BATT01 


CJE5 


$*BATTN9 


CGH3 


$$BATTN9 


CGJ3 


$$BATTN9 


CHC2 


$$BATTN9 


CGD2 


$$BATTN9 


CGB1 


$$BATTN9 


CHGl 


$*BATT01 


CJB1 


$$BATTN9 


CHDl 


IJBDHPIC 


FHB1 


$$BATTHT 


BBB5 


IJBDHPIC 


FFB3 


IJBDHPIC 


FFE3 


$*BATTN9 


CGC«* 


$*BATTal 


CJF5 


$*BATTH9 


CGE3 


$$BATTN9 


C6E4 


$3»BATTH9 


CGF3 


IJBDHPAR 


EUB1 


$*BOCBTL 


MHJ2 


$$BE0J3A 


DEH2 


$:iiBCCUHR 


GJB1 


$$BCCHHR 


GJE4 


$$BE0J4 


DFJ2 


$$BOCRTB 


KEA3 


$$B0CHT3 


RED4 


$$BATTNT 


BAB 3 


SSBOCRTC 


KHD5 


$$B0CRTZ 


QHD2 


$SBATTU2 


CKF2 


$*BOCRTS 


PEB1 


$$BOCRTR 


PeB2 


$*BOCRTS 


PFB2 


$$BEOJ 


DBC5 


$$BOCRTG 


HAE2 


$$BOCRTF 


LGH* 


$SB0CRT4 


9HA2 


$$BOCRTR 


PAA4 


$$BOCRTY 


QEC3 


$$BOCRTC 


KGG1 


$$BOCHTC 


KHD4 


$$BOCBTX 


QBF2 


$*BOCRTY 


Q0K3 


$$BOCRTK 


nLB4 


$$BOCRTP 


NHE2 


$$BOCRTK 


HKF2 


SSBOCRTI 


RAB5 


$SBEOJ 


DBH2 


$$BOCRTB 


KDFl 


$$BOCRTG 


MBA 3 


IJBDHPIO 


FCE2 


$*BATTBT 


BAD3 


$$BOCRTG 


HAC4 


$$BE0J4 


DHJ5 


$$BOCBTG 


HAH1 


IJBDHPIO 


FBE2 


SSBATTF^ 


CDJ3 


$$BATTF5 


CFF3 


$$BATT02 


CKK3 


$$BATTF5 


CFJ5 


IJBDHPIC 


FFHS 


$$BATTF2 


GLJ3 


$$BATTF3 


GilK3 


$$BATTF4 


CDB3 



Appendix C: Label List 287 



Label 



Phase 



Location 



Label 



Phase 



Location 



RETBY 


fSBATTFS 


CFF4 


BETRI 


«$BOCRfS 


PEA4 


RETURN 


SSBATTNS 


AXC1 


RSTORN 


S$BATI02 


CKJS 


RETl 


$$B0CRT6 


RLC5 


RET 2 


$$B0CfiT6 


RHA3 


RFC HECK 


$$BE0H4 


DGB1 


RLCCB 


SSBEOJ 


DCK2 


RLCCfi 


IJBEOJ 


FRE2 


RHSPOST 


»$BCCHHR 


GJF4 


RPT 


$$BOCRTN 


NBH3 


RSTflS6600 


$$BRSfR2 


S1IG5 


RSTPRT 


$$BOCRT¥ 


QEB3 


RSTBTEfil 


:^$fiBSTRT 


SLB5 


RSTHT150 


$$BRSTRT 


SLH1 


RSTRT200 


$$BBSTRT 


SLC3 


RSTBI240 


$$fiRSTRT 


SL03 


RSTeT300 


$$BRSTRT 


sLca 


RSTHT560 


$$BRSTRT 


SLG«» 


RSTeT600 


»$SBSIRT 


SLJ4 


RSTRT700 


SSBBSTRT 


SLH5 


RSTB0020 


$$BRSTR2 


SNC1 


RSTR0140 


$$BBSTR2 


SND1 


BSTB0180 


$$SRSTR2 


SNE1 


RSTB0200 


»$BBSTR2 


SHF1 


RSTB0300 


$$BBSfR2 


SNJ2 


RSTB0400 


$$BBSTR2 


SNA3 


RSTR0460 


$$BRSTR2 


SNC3 


RSTB0480 


S$BBSTB2 


SNF3 


RSTB0600 


$$BBSTR2 


SNA5 


RSTfi0660 


S$BRSIB2 


SNB5 


RSTRO/00 


$$BBSTfi2 


SHOS 


RSTB0800 


S$BBSIfi2 


SNE5 


RSTB2000 


$$BRSfR2 


SNG3 


RSTB2000 


$SBRSTR2 


SNK2 


RSTR2000 


$SBRSfR2 


SPA1 


RSTB2020 


$$BRSIR2 


SPC1 


RSTB2060 


$»BRSTR2 


SPF2 


RSTB2080 


$SBRSTR2 


SPB2 


RSTB2100 


»$BRSXR2 


SPG2 


RSTS2140 


$SfiRSTR2 


SPJ2 


RSTR2160 


$$BRSXR2 


SPK2 


RSTR2500 


SSBBSTR2 


SNK3 


RSTtfRNG 


^UBOCBTY 


QEB2 


RSTXECB 


$|iBE0J4 


DFB3 


RTSTflT 


$SBATTNA 


ACBa 


RONREAL 


$SB£0J3A 


DEJ3 


SAVEfi3 


$$BATTNT 


BAF3 


SA?ID 


«$B0CRT6 


RME2 


SCAMBL1 


$$fiATXNA 


ADD1 


SC&NBL2 


f$6ASTNA 


ADE1 


SC&NOPN 


$$BATTNA 


ADB3 


SCAN1 


$$BAII{l!r 


BBB3 


SCIP 


$$fiOCRT<» 


RHG2 


SCR 


$$BOCRTL 


HPB2 


SCRPRT 


$$BOCRTI 


QSB1 


SCH1 


S$fiOCRTL 


MPC2 


SDDUHP 


IJBSDOHP 


EKB2 


SDEOV 


IJBDflPIO 


FCD1 


SOOHPR 


ZJBSOUHP 


EC At 


SDOHPB 


IJBSDOHP 


ECE1 


SEARCH 


$$BAITN7 


CQC2 


SEARCH 


$SBOCBIB 


KFB1 


SEARCH 


$*BOCRTC 


KJB3 


SEARCH 


SfBOCBTO 


LCB2 



SEARCH 


$$fiOCRT6 


aCB4 


SECPA 


$$B0CRT2 


SDJ4 


SEEIFHOR 


UBSDUHP 


SHE4 


SEGLIH 


$$BOCRTQ 


NJF1 


SEGPASS 


$$BOCBTN 


l«DA4 


SEMDHSG 


$$BOCBT£ 


LEB3 


SEMDHSG 


$*BOCRTF 


LJB3 


SENSECflD 


$$BOCRTZ 


QJA3 


SEBSS1 


$$BOCfiTZ 


QJG3 


SENSE2 


$$BOCRTZ 


QJB4 


SETCOHRG 


$$BOCRTA 


KAA4 


SETEXT 


$$BATTNB 


AFBS 


SETFLAG 


$$BOCBTA 


KBG1 


SETID 


$$BATTND 


AKC2 


SETP 


IJBDHPIO 


FADS 


SETDPOO 


$$BATTNY 


BJJ3 


SETTAL 


IJBOHPAR 


S0G1 


SHIFT 


IJBDflPAR 


EVK1 


SIZE 


$SBATTNF 


APB1 


SKIP 


$»BOCfiTP 


N6H2 


SKIP 


$$BOCRTT 


PGH3 


SKIPBLNK 


$SBOCRTK 


HLF3 


SKIPBLH1 


$$BOCBTK 


HLF4 


SKIPLOAD 


$$BATTF5 


CFD4 


SKIPRTX 


$$fiATTIID 


AKB2 


SKIPTOE 


$*BOCRTO 


NFA3 


SKIPTST 


$J[>BOCBTC 


KKJ2 


SKIP1 


$$BOCRTP 


HGK2 


SKIP1 


$$BOCRTT 


PGK3 


SRCHLOOP 


$$BE0J3A 


DEB4 


START 


$$BATTNT 


BAB1 


START 


$$BSDfiUP 


GHB2 


STARTS 


$$BOCBTE 


LDD1 


STARTIO 


$$BOCRTG 


nAD3 


STARTIO 


IJBDHPIO 


FCE4 


STARTUP 


$$B0CBT3 


R£A4 


START 1 


$$B0CBT1 


SAB1 


STAT05 


$iBE0J7 


DLCl 


STATIC 


$$BE0J7 


DLC2 


STAT 12 


$$BE0J7 


DLF2 


STAT15 


$$BE0J7 


DLJ2 


STAT35 


$SBE0J7 


DLSS 


STAT40 


$$BE0J7 


DLK2 


STCCH7 


$$&ATTNO 


BCHS 


STDOHP 


$fBATTM? 


BGB3 


STEXCD 


$$&ATTNB 


AFBl 


STIO 


$$BOCRTE 


LFEl 


STIO 


$$BOCRTF 


LKE2 


STLNGTH 


$$BATTF3 


GNJ1 


STORECCW 


SSBOCRTA 


KBE2 


ST0RE1 


IJBDHPIO 


FAES 


STORES 


IJBDHPAR 


E/D1 


STR6EN0 


$$BOCRTC 


KJC3 


STBGEND 


$$BOCRTD 


LCC2 


STRGEND 


$$B0CBT6 


HCC4 


STRTIO 


$$BOCRTE 


LFB1 


STRTIO 


$$BOCBTF 


LKB2 


SOBLOOP 


$$BATTNC 


AHB2 


SOBTASK 


$$BE0H4 


DGA2 


SOPDUflP 


IJBSDOHP 


8FB1 


S0P7 


$$BATTND 


AKD1 


SVADHP 


IJBSDOHP 


SGB2 


SVADQHP 


IJBSDOHP 


&JA3 


SVAST 


$$BATTNV 


BFB4 


SVC26 


$$BOCRTZ 


QHH5 


SBAOTOCL 


$$BE0J4 


DFE4 



288 DOS/¥SE Logical Transients 



label 

SHTCHOFP 
SYSTHPOI 
SYSTHBO 
SYSWR 

TAB1 

TAPEOEV 

TAPEDEV 

TAPEIO 

TAPEOO 

TAR 

TASK 

TBIT 

TDISK 

TEA 

TEND 

TEHD1 

TERN 

TERHCANC 

TEST 

TEST 

TESTAP 

TESTBRST 

TESTCHD 

TESTCNT 

TESTBRB 

TESTIO 

TESTIO 

TESTLPI 

TESTHAX 

TESTNOSD 

TEST02 

TEST02 

TPOL 

TICCHECK 

TICCHK 

TICBRROB 

TIGHT 

TICSKIP 

TB 

THPAB1 

TOL 

TPBAL 

TPTYPB 

TPTXPE 

TPTXPE1 

TPTIPE1 

TRC 

THC 

TBEAL 

TRKFBA 

TRSFB 

TRSFR1 

TBSFB2 

TRSFB3 

TRYNXT 

TSAMB 

TStADDR 

TSTBJF 

TSTBUFF 

TSTBUPF 

TSTBADDR 

TSTJBF 

THOADUNP 

THOBDS 

TXPEONE 



Phase 


Location 


IJBDHPAR 


EV62 


¥$BOCRTK 


NKD3 


$$BOCBTK 


HKA3 


$SBSYSHR 


GGB4 


$$BATTNV 


BFE3 


$$BEOJ 


DC J 2 


IJBEOJ 


FRD2 


IJBDBPIC 


FBC2 


$$BE0J7 


DNA3 


IJBSDUnp 


EAG2 


$$BE0J3A 


DEC5 


IJBSDUNP 


BBB1 


IJBDHPIO 


FCB3 


IJBDHPAB 


ETC 2 


IJBOHPAR 


Esca 


IJBDHPAB 


EVCd 


IJBEOJ 


FPJ5 


S^BEOJ 


DADa 


«$BOCRTC 


RKBt 


$$BOCRTY 


QFB3 


IJBEOJ 


FPCa 


$$BATXS1 


CTB3 


$$BOCRTZ 


QLB2 


$$BOCBTZ 


QKD4 


»:iiBOCRTA 


KBA2 


$$fiOCBTE 


LPH1 


«$BOCRTF 


LKfl2 


«$BATTF5 


CFE2 


IJBSDUHP 


E6B2 


$*BOCBTZ 


QKB4 


$$BOCfiTC 


KKG3 


f$BOCBTY 


QFE3 


IJBDHPIC 


FGD5 


S$BOCBTA 


KAGa 


y^BOCBTB 


PBB2 


$$BOCfiTA 


KAGS 


$$BOCBT& 


KCA4 


$$BOCfiTZ 


QLB3 


$$BE0a3& 


DEB2 


$SBATTNA 


AAC2 


SSBATTNV 


BE63 


:ii$BATTN2 


BNBI 


$$BEOJ 


DCG2 


IJBEOJ 


FfiB2 


»SBEOJ 


DCH2 


IJBEOJ 


FRC2 


IJBDBPAR 


EHDI 


IJBDHPPA 


EBJ1» 


IJBDBPAR 


ETJ2 


$»B£0J4 


DBD<) 


$$B0CBTD 


LAD1 


$$BOCBTD 


LAE1 


f:iifiOCBTD 


LAF1 


$$BOCBTD 


LAF3 


fSBATTSI 


CSD2 


IJBDBPAR 


EVC2 


IJBDHPAB 


BSB2 


IJBEOJ 


FRJ1 


*$BATTF2 


GI.A3 


$$BATTF5 


CFF2 


IJBDHPAB 


ETB2 


$$B£OJ 


DCD2 


IJBSDUHP 


ELB1 


IJBDHPAR 


EVB1 


$$BATTN7 


CQB2 



Label 
UI 

UNAV 

ONRECOV 

UNI 

UPO 

UPDATE 

UPDATER 

UPDATE1 

UPDA1 

VALBBOO 

VALCUUOO 

VALIDATE 

VALHOD05 

VALNODOO 

VERIHSG 

VLOOP 

V0LUME62 

VBBL1 

VTAHHOOK 

HAITI 

HAITI 

HAITI 

HARN 

HBITEH 

HBITECHD 

HBITEH 

HBITEO 

URITB20 

HRITS 

HRTIHSTL 

HRTHRNG 

HTE 

HTE1 

XFB 
XFR1 

YESFOLD 



Phase 


Location 


$$B0CRT3 


HFFi 


$$BATTN6 


ASJ5 


$$BOCRTF 


LJA1 


$$BOCRTX 


QBC5 


SJBOCRTB 


RFC 2 


$$B0CBr3 


HEE3 


IJBSDUHP 


BKG2 


$$BOCRTQ 


HKD1 


$$B0CRT3 


REG3 


$$BATTN¥ 


BJBS 


$$BATTNY 


BJS1 


IJBDHPAR 


BSC4 


$*BATT1IY 


BJF3 


Si^BATTNY 


BJC3 


$iBAT'rU2 


CKF5 


IJBSDUHP 


BHB3 


$SBATTNO 


A0H2 


SJSBOCRTN 


!iBA4 


$$BATTNH 


ATB4 


$$BEOJ 


DCE<» 


$$BOCBTR 


PBC1 


IJBEOJ 


FRJ4 


$$BOCaTB 


KDB4 


$$BOCRTS 


PFH3 


$$BOCBTZ 


QHE4 


$$BOCRTS 


PFB3 


$3»B0CRT1 


HAC2 


$$BOCRTH 


HFE2 


$$B0CHT4 


RHBS 


SSBOCRTI 


*1GF3 


$$BOCHTR 


PCB3 


$$B0CRT1 


RAG1 


$$B0CHT1 


BAA3 


$$B0CHTC 


KHC2 


SiBOCHTC 


KGD3 


$$BATTU2 


CKB2 



Appendix C: Label List 289 



290 DOS/VSE Logical Transients 



INDEX 



I « 

I A I 

L J 

ALLOC command processor 
detail chart 88 
general chart 21 
text 16 

ALLOCS command processor 
detail chart 88 
general chart 21 
text 16 

ALTER command processor 
detail chart 100 
general chart 23 
text 16 

attention interrupts 16 

attention routines 16 



DUMP command processor 
detail chart 104 
general chart 24 
text 16 
DUMP macro 33 
dumps 24, 33, 31 



I n 

1 £ 1 

L J 

ENOSD command processor 

detail chart 113 

general chart 21 

text 17 
error message cross reference 



277 



r 1 
1 B I 

L J 

B (logical) transients 11 

BATCH command processor 

detail chart 92 

general chart 21 

text 16 , 

buffer load phases 37 



f n 

I C I 
I J 

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 



r 1 

f F I 



flowchart symbols, explanation of 
forms control buffer (FCB) loading 



r 1 

I H 1 



hard-copy control flags 52 
hard-copy file, format of 53 



r~ 1 

\ I I 

L J 

IGNORE command processor 
detail chart 85 
general chart 20 
text 17 



r 1 

i J I 

L J 



76 
37 



JDUMP macro 



33 



r 1 

I D i 
t J 



I — -I 
I L I 

L J 



Display operator console support 40 
DOC (Display Operator Console) 40 
DSPLY command processor 

detail chart 102 

general chart 23 

text 16 



label list 281 

LFC6 command processor 
detail chart 114, 
general chart 26 
text 17 

LFCB macro processor 



116 



Index 291 



detail chart 181 

general chart 39 
LOG command processor 

detail chart 85 

general chart 20 

text 17 
logical ($$Bj transients 

area 11 

attention routines 16 

checicpoint/restart routines 63 

CRT routines HO 

terminator routines 31 
LUCB command processor 

detail chart 120, 122 

general chart 27 

text 17 



r n 

i H I 
I J 

MAP command processor 

detail chart 86, 87 

general chart 20 

text 17 
NODE command processor 

detail chart 96-99, 108, 109 

general chart 22, 25 

text 17 
HSG command processor 

detail chart 81 

general chart 20 

text 17 



r~ 1 
I N I 
c J 

NEHVOL command processor 
detail chart 84 
general chart 20 
text 17 

NOLOG command processor 
detail chart 85 
general chart 20 
text 17 



r 1 




1 P 1 




1 J 




PAUSE command processor 


detail chart 85 




general chart 2C 


1 


text 17 




PDOMP macro 34 




phases (see also SVA 


phases) 


$$BACLOS 




detail chart 


142 


general chart 


32 


$$BArTFO 




detail chart 


180 


general chart 


39 


text 37 




$$BATTF1 





detail chart 


116 


general chart 


26 


text 17 




$$BATTr2 




detail chart 


181 


general chart 


39 


text 37 




$$BATTF3 




detail chart 


183 


general chart 


39 


text 37 




$$BATTF4 




detail chart 


117 


general chart 


26 


text 17 




$$BATTF5 




detail chart 


1'9 


general chart 


26 


text 1 7 




$$BATTNA 




detail chart 


77 


general chart 


19 


text 16 




$$BATTNB 




detail chart 


81 


general chart 


20 


text 16, 17 




$$BATTNC 




detail chart 


83 


general chart 


20 


text 16, 17 




$$BATTND 




detail chart 


86 


general chart 


20 


text 1 7 




$$BATTNE 




detail chart 


88 


general chart 


21 


text 16 




$$BATTNF 




detail chart 


90 


general chart 


21 


text 17 




$$BATTNG 




detail chart 


92 


general chart 


21 


text 16, 17 




$$BATTNH 




detail chart 


94 


general chart 


19 


text 16 




$$BATTNI 




detail chart 


87 


general chart 


20 


text 17 




$$BATTNK 




general chart 


20 


text 17 




$$BATTNO 




detail chart 


95 


general chart 


21 


text 17 




$$BATTNQ 




detail chart 


96 


general chart 


22 


text 17 




$$BATTNfi 




detail chart 


97 



292 DOS/VS Logical Transients 



general chart 


22 


text 17 




$$BATTNS 




detail chart 


98 


general chart 


22 


text 17 




$$BATTNT 




detail chart 


100 


general chart 


23 


text 16, 17 




$$BATTNO 




detail chart 


102 


general chart 


23 


text 16 




$$BATTNV 




detail chart 


104 


general chart 


24 


text 16 




$$BATTNy 




detail chart 


108 


general char^ 


25 


text 17 




$$BATTNZ 




detail chart 


109 


general chart 


25 


text 17 




$$BATTN2 




detail chart 


110 


general chart 


21 


text 17 




$$BATTN3 




detail chart 


113 


general chart 


21 


text 17 




$$BATTN7 




detail chart 


124 


general chart 


28 


text 17 




$$BATTN8 




detail chart 


114 


general chart 


26 


text 17 




$$BATTN9 




detail chart 


120 


general chart 


27 


text 17 




$$BATTS1 




detail chart 


130 


general chart 


26 


text 17 




$$BATTS2 




detail chart 


133 


general chart 


28 


text 17 




$$BAITU1 




detail chart 


122 


general chart 


27 


text 17 




$$BATTU2 




detail chart 


123 


general chart 


27 


text 17 




$$BCCHHE 




detail chart 


179 


text 38 




$$BCHKPD 




detail chart 


265 


general chart 


66 



text 71 




$$BCHKPE 




detail chart 


266 


general chart 


66 


text 71 




$$BCHKPF 




detail chart 


267 


general chart 


66 


text 72 




$$BCHKPG 




detail chart 


268 


general chart 


66 


text 72 




$$BCHKPT 




detail chart 


262 


general chart 


66 


text 67 




$$BCHKP2 




detail chart 


263 


general chart 


66 


text 69 




$$BCHKP3 




detail chart 


264 


general chart 


66 


text 70 




$$BCHK3G 




detail chart 


271 


general chart 


66 


text 73 




$$B£OJ 




detail chart 


134 


general chart 


32 


text 31 




$$BE0J3 




detail chart 


137 


general chart 


32 


text 31 




$$fi£0J3A 




detail chart 


138 


general chart 


32 


text 31 




$$6£0J4 




detail chart 


139 


general chart 


32 


text 31 




$$BE0J7 




detail chart 


144 


general chart 


32 


text 31 




$$BOCRTA 




-detail chart 


184 


general chart 


41 


text 48 




$$BOCETB 




detail chart 


187 


general chart 


47 


text 48 




$$BOCRTC 




detail chart 


190 


general chart 


.42 


text 48 




$$BOCBTD 




detail chart 


194 


general chart 


42 


text 49 




$$BOCRTE 




detail chart 


197 


general chart 


47 



Index 293 



text 50 

SSfiOCfiTF 

detail chart 200 

general chart 47 

text 50 
$$BOCBTG 

detail chart 204 

general chart 42 

text 51 
$$60CBIH 

detail chart 207 
. general chart 42 

text 51 
$$BOCETI 

detail chart 210 

general chart 42 

text 55 
$$BOCRTK 

detail chart 211 

general chart 44 

text 55 
$$BOCBTL 

detail chart 215 

general chart 44 

text 55 
$$BOCRTM 

detail chart 218 

general chart 44 

text 55 
$$60CfiTN 

detail chart 219 

general chart 44 

text 56 
$$B0CBTO 

detail chart 222 

general chart 44 

text 56 
$$BOCETP 

detail chart 224 

general chart 44 

text 56 
$$BOCBTQ 

detail chart 226 

general chart 44 

text 57 
$$60CRTB 

detail chart 228 

general chart 43 

text 57 
$$BOCBTS 

detail chart 231 

general chart 43 

text 57 
$$BOCBTT. 

detail chart 234 

general chart 43 

text 58 
$$BOCBTU 

detail chart 236 

general chart 41 

text 58 
$$BOCfiTV 

detail chart 237 

general chart 45 

text 58 
$$60C£TW 



detail chart 


238 


general chart 


45 


text 59 




$$BOCfiTX 




detail chart 


239 


general chart 


45 


text 59 




$$BOCRTY 




detail chart 


241 


general chart 


45 


text 59 




$$60C£TZ 




detail chart 


244 


general chart 


41 


text 60 




$$B0CfiT1 




detail chart 


250 


general chart 


46 


text 60 




$$B0CRT2 




detail chart 


252 


general chart 


46 


text 60 




$$B0CRT3 




detail chart 


254 


general chart 


46 


text 61 




$$B0CfiT4 




detail chart 


257 


general chart 


46 


text 61 




$$B0CRT5 




detail chart 


258 


general chart 


46 


text 61 




$$B0CfiT6 




detail chart 


260 


general chart 


46 


text 62 




$$BPCLOS 




general chart 


32 


text 38 




$$BRMSG1 




detail chart 


270 


general, chart 


66 


text 73 




$$Bfi-MSG2 




detail chart 


276 


general chart 


66 


text 75 




$$BfiSTRT 




detail chart 


272 


general chart 


66 


text 73 




$$BBSTE2 




detail chart 


274 


general chart 


66 


text 74 




$$BSYSWfi 




detail chart 


178 


text 38 




printer buffer load 


phases 


PfiTY command processor 


detail chart 110 


general chart 21 


text 17 





37 



294 DOS/VS Logical Transients 



r t 
I B I 

Restart routines 



65 



r" 1 
I S i 

screen control table (SCT) entry 49 
SETDF command processor 

detail chart 124 

general chart 28 

text 17 
SETHOD command processor 

general chart 20 

text 17 
SIZE command processor 

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 (S¥C) 12 
supervisor 

calls 12 

cancel codes 35 
SWA phases 11 

*IJBDUMP 33, 24 

IJBDHPAB 

detail chart 162 
general chart 33 

IJBDMPIC 

detail chart 170 
general chart 33 

IJBDBPIp 

detail chart 167 
general chart 33 



IJBDHPPA 




detail chart 


160 


general chart 


33 


IJBEOJ 




detail chart 


175 


general chart 


33 


IJBSDUNP 




detail chart 


147 


general chart 


33 


SVC (supervisor call 


interrupt) 


system dump 33 




r 1 




i T 1 




L---J 





12 



terminator routines 31 
TBBAL command processor 
detail chart 110 
general chart 21 
text 17 



r ""1 

I I 
I -J 



universal character set buffer (UCB) 
loading of 37 



r "% 
I V I 
< --J 

VOLUHE command processor 
detail chart 95 
general chart 21 
text 17 

3800 printer files 

automatic close of 38 



Index 295 



SY33-8553-4 



O 
O 

CO 

< 



o 



3 

a 

D 

c 

3 
•o 



O 



(D 

a. 

5' 
c 

C/5 
> 

(/J 

-< 
CO 
CO 

do 
oi 
w 

CO 



I K.^ft 



internationai Business Machines Corporation 

Data Processing Division 

1133 Westchester Avenue, White Plains, N.Y. 10604 

itsm ilvorid Trade Americas/Far East Corporation 

Town of Mount Pleasant, Route 9, North Tarrytown, N.Y.. U.S.A. 10591 

IBM World Trade Europe/Middle East/Africa Corporation 
300 Hamilton Avenue, White Plains, N.Y., U.S.A. 10601 



DOS/VSE Logical Transients 
and Dump Phases Logic 



SY33-8553-4 



READER'S 
COMMENT 
FORM 



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. 



Name 
Address 



What is your occupation? 



How did you use this manual? 
As a reference source 
As a classroom text 
As a self-study text 



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 



Appearance 
Printing 



Paper 
Binding 



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 incuning any obligation whatever. You may, of course, continue to use 
the information you supply. 



Please note : Requests for copies of publications and for assistance in utilizing your IBM ^stem 
should be directed to your IBM representative or to the IBM sales office serving your locality. 



FokJ 



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 . . 

IBM Corporation 

1 133 Westchester Avenue 

White Plains, N.Y. 10604 




D 
O 
CO 

< 

m 



o 



3 

a 

D 

c 

3 

■D 

-a 

3" 



Attent ion : Department 8 1 3 BP 



o 
-o 

5' 

5' 

c 

CO 

> 

< 

CO 

00 
Ol 
01 
CO 



Fold 



Fold 



IBM 



Intarnatiorwl Business Machines Corporation 

Data Processing Division 

1133 Westchester Avenue, White Plains, N.Y. 10604 

IBIM World Trade Americas/Far East Corporation 

Town of Mount Pleasant^ Route 9, North Tarrytowvn, N. Y., U.S.A. 10591 

IBM World Trade Europe/Middle East/Africa Corporation 
360 Hamilton Aveniie. White Plains, N.Y.. U.S.A. 10601