Routine: PSGTAP0

Entry Points

Name	Comments	DBIA/ICR reference
S1	;
S2	;
S3	; *284 - Added ! to clear WR buffer for network channel
ENQ	;
RESTART	;
QUIT	;

Name	Line Occurrences
Function Call: READ	Variable: *X Timeout: $S(Q<15:1,1:5) Line Location: S1+1
Function Call: WRITE	Prompt: $C(48) Line Location: S1+1
Function Call: READ	Variable: *X Timeout: $S(Q<15:1,1:5) Line Location: S1+3
Function Call: WRITE	Prompt: A Line Location: S1+3
Function Call: READ	Variable: X Timeout: $S(Q<15:1,1:5) Line Location: S2+1
Function Call: WRITE	Prompt: $C(48) Line Location: S2+1
Function Call: READ	Variable: X Timeout: $S(Q<15:1,1:5) Line Location: S2+3
Function Call: WRITE	Prompt: A Line Location: S2+3
Function Call: READ	Variable: *X Timeout: $S(Q<15:1,1:5) Line Location: S3+1
Function Call: WRITE	Prompt: $C(48),! Line Location: S3+1
Function Call: READ	Variable: *X Timeout: $S(Q<15:1,1:5) Line Location: S3+3
Function Call: WRITE	Prompt: A,! Line Location: S3+3

FileNo	Call Tags
^PS(53.55 - [#53.55]	Classic Fileman Calls

Name	Line Occurrences (* Changed, ! Killed)
^%ZOSF("LABOFF"	RESTART+1
^DPT - [#2]	ENQ+11
^PS(53.5 - [#53.5]	ENQ+10, ENQ+12, ENQ+13
^PS(53.55 - [#53.55]	ENQ+3, ENQ+5, ENQ+6, ENQ+8, ENQ+17, ENQ+18, ENQ+19, RESTART+2, QUIT+2
^PS(55 - [#55]	ENQ+14
^PS(59.7 - [#59.7]	ENQ+9
^PSDRUG - [#50]	ENQ+16

Name	Field # of Occurrence
>> %	ENQ+4*
>> A	S1+3, S2+3, S3+3, ENQ+16, ENQ+17, ENQ+18, RESTART+2*
ATCFF	ENQ+1~, ENQ+9*, ENQ+15
>> BLKS	ENQ+8*, ENQ+11, ENQ+17
>> C	ENQ+13, ENQ+17, ENQ+18*
>> D	ENQ+8, ENQ+13, ENQ+14
>> DA	ENQ+6, QUIT+1
>> DAT	ENQ+4*, RESTART+2
DD	ENQ+7!, ENQ+8, ENQ+13
>> DFN	ENQ+11*
>> DIC	ENQ+7*
>> DIC(0	ENQ+7*
>> DIK	ENQ+6, QUIT+1
>> DINUM	ENQ+7*
>> DN	ENQ+14*, ENQ+15, ENQ+16
DNUNIT	ENQ+1~, ENQ+15*, ENQ+16
DO	ENQ+7!
DT	ENQ+16
>> G	ENQ+8*, ENQ+10, ENQ+12, ENQ+13
>> IOT	RESTART+2
>> ND	ENQ+5, ENQ+8, ENQ+17, ENQ+18, ENQ+19, RESTART+2
>> O	ENQ+8, ENQ+12, ENQ+13
>> ON	ENQ+13*, ENQ+14
>> P	ENQ+8, ENQ+10, ENQ+11, ENQ+12, ENQ+13
>> PID	ENQ+11*, ENQ+17, ENQ+18
>> PL	ENQ+11*, ENQ+17, ENQ+18
>> PN	ENQ+11*, ENQ+17, ENQ+18
>> PND	ENQ+11*
>> PSGORD	ENQ+8, ENQ+12, ENQ+13
>> PSGP	ENQ+11*, ENQ+13, ENQ+14
>> PSGPLG	ENQ+2, ENQ+3, ENQ+4, ENQ+5, ENQ+6, ENQ+7, ENQ+8, ENQ+17, ENQ+18, ENQ+19 , RESTART+2, QUIT+1, QUIT+2, QUIT+3
>> PSGPLWG	ENQ+16
>> PSGSPD	RESTART+2
PSGTAG	ENQ+1~, RESTART+2*
>> PSGTAPR	ENQ+5
>> PSJJORD	ENQ+8*
>> Q	S1+1, S1+3, S2+1, S2+3, S3+1, S3+3
>> QUIT	S1+2, S1+4, S2+2, S2+4, S3+2, S3+4, ENQ+4, ENQ+7, ENQ+19, RESTART+1 , RESTART+2, QUIT+1
>> R	ENQ+8, ENQ+10, ENQ+12, ENQ+13
>> S	ENQ+8, ENQ+11, ENQ+12*, ENQ+13
>> T	ENQ+8, ENQ+10, ENQ+12, ENQ+13
>> VA("PID"	ENQ+11
>> W	ENQ+8, ENQ+10, ENQ+12, ENQ+13
>> X	S1+1, S1+3, S2+1, S2+3, S3+1, S3+3, ENQ+7*
>> Y	ENQ+7