Table of Contents
Advertisement
Read 1 record (0) from OST
Is 0 a binary or encoded record?
No
Is
0 a MONARCH ID record?
Ves
Blocking flag set?
Ves
Ve.
Set blocklna
mode
switch
I. 0
a
I..,el liD?
Ves
Reset blocking
mode
_Itch
Ilc,eldng u"r level 2 JD control?
Ve.
Reset blocking mode switch
Flag 0 indicating that It hal been
written
Chars.
9-16010
=
"SYSEND,v('?
UPDATE ROUTINE
{cont.}
Type
-NONSTANDARD FORMAT"
I. BREAKPOINT 1 (9300 SENSE 1)
Set?
Store
0
as current OST level
1
or
level
2
ID record
Is
level 1 Stop Iwltch set?
No
Is
na . . In 0
=
level 1 name of 2nd
argument?
Is
level 1 Stop Iwitch let?
No
Is
level 2 Stop Iwltchaet?
No
Is
name In 0
=
level 2 name of 2nd
argument?
(
C6~----------~~~~------~--------~
BLOCKING SUBROUTINE
......... -----...0("010
a level 1 MONARCH ID record?
No
87
Advertisement
Table of Contents
