Routine: PSGTAP1

Package	Total	Call Graph
VA Fileman	3	NOW^%DTC FILE^DICN ^DIK
Inpatient Medications	2	($$LOCK,UNLOCK)^PSGPLUTL ^PSJPL0
Kernel	1	^%ZISC
Registration	1	PID^VADPT

Entry Points

Name	Comments	DBIA/ICR reference
QUIT	;
SET	; write ^TMP global to ACT file
S2	;
S1	;
ENQ	;
DTS	;
OS	; order record set
RESTART	;

External References

Name	Field # of Occurrence
NOW^%DTC	ENQ+4
^%ZISC	QUIT+4
FILE^DICN	ENQ+7
^DIK	ENQ+6, QUIT+2
$$LOCK^PSGPLUTL	ENQ+2
UNLOCK^PSGPLUTL	QUIT+4
^PSJPL0	DTS+1
PID^VADPT	ENQ+11

Interaction Calls

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

FileMan Files Accessed Via FileMan Db Call

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

Global Variables Directly Accessed

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

Label References

Name	Line Occurrences
DTS	OS+5
OS	ENQ+16
QUIT	ENQ+4, ENQ+7, SET+3
RESTART	ENQ+5
S1	S1+1, S1+3, RESTART+2
S2	S2+1, S2+3, RESTART+2

Naked Globals

Name	Field # of Occurrence
^(	ENQ+11, RESTART+2
^(0	ENQ+4, ENQ+11, SET+3*
^(1	ENQ+5
^(212	ENQ+16

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
>> %	ENQ+4*
>> A	S1+3, S2+3, ENQ+16, RESTART+2, OS+9
ATCFF	ENQ+1~, ENQ+8*, ENQ+15
>> BLKS	ENQ+9*, ENQ+11, ENQ+16
>> C	ENQ+13, ENQ+16, OS+9
>> D	ENQ+13*, ENQ+14
>> DA	ENQ+6, QUIT+2
DD	ENQ+1~, ENQ+7!, ENQ+9, ENQ+12, ENQ+13*, OS+9
>> DFN	ENQ+11*
>> DIC	ENQ+7*
>> DIC(0	ENQ+7*
DIK	ENQ+6, QUIT+2!
>> DINUM	ENQ+7*
>> DN	ENQ+14*, ENQ+15, ENQ+16
DNUNIT	ENQ+1~, ENQ+15*, ENQ+16
DO	ENQ+7!
DT	ENQ+16
>> FD	OS+2*
G	ENQ+1~, ENQ+9*, ENQ+10, ENQ+12, ENQ+13
ND	ENQ+1~, ENQ+5, ENQ+9, SET+1, SET+2, SET+3, RESTART+2
>> ND2	OS+1, OS+2, OS+3, OS+7
>> O	ENQ+13*
>> ON	ENQ+12*, ENQ+14, OS+1, OS+2, DTS+1
P	ENQ+1~, ENQ+9, ENQ+10, ENQ+11, ENQ+12, ENQ+13
>> PID	ENQ+11*, OS+9
>> PL	ENQ+11*, OS+9
>> PN	ENQ+11*, OS+9
>> PND	ENQ+11*
PSGMAR	OS+6, OS+10!
PSGMAR(	OS+8
>> PSGMFOR	DTS+1*
>> PSGORD	ENQ+9, ENQ+12, ENQ+13, OS+9
>> PSGP	ENQ+11*, ENQ+12, ENQ+13, ENQ+14, OS+1, OS+2, OS+9
>> PSGPLED	ENQ+4*, DTS+1
PSGPLF	DTS+1*, DTS+2!
>> PSGPLG	ENQ+2, ENQ+3, ENQ+4, ENQ+5, ENQ+6, ENQ+7, ENQ+9, SET+2, SET+3, RESTART+2 , QUIT+2, QUIT+3, QUIT+4, OS+1
PSGPLO	DTS+1*, DTS+2!
PSGPLS	DTS+1*, DTS+2!
>> PSGPLSD	ENQ+4*, DTS+1
>> PSGPLWG	ENQ+16
>> PSGSPD	RESTART+2
>> PSGTAPR	ENQ+5
>> PSJJORD	ENQ+9*
>> PST	OS+2*, OS+3, OS+5
>> Q	S1+1, S1+3, S2+1, S2+3
>> QST	OS+3*, OS+9
>> QUIT	S1+2, S1+4, S2+2, S2+4, ENQ+4, ENQ+7, SET+3, RESTART+1, RESTART+2, QUIT+2
R	ENQ+1~, ENQ+9, ENQ+10, ENQ+12, ENQ+13, OS+9
>> SD	OS+1*
ST	ENQ+1~, ENQ+9, ENQ+12, ENQ+13
>> T	OS+2*
TM	ENQ+1~, ENQ+9, ENQ+10, ENQ+12, ENQ+13, OS+9
U	OS+1, OS+2, OS+3, OS+7
>> VA("PID"	ENQ+11
W	ENQ+1~, ENQ+9, ENQ+10, ENQ+12, ENQ+13, OS+9
>> X	S1+1, S1+3, S2+1, S2+3, ENQ+7, SET+1, SET+2, OS+8, OS+9
>> Y	ENQ+7, SET+1*, SET+2

Customize PDF page

Package: Inpatient Medications

Routine: PSGTAP1

Information

Source Information

Call Graph

Call Graph Total: 7

Entry Points

External References

Interaction Calls

FileMan Files Accessed Via FileMan Db Call

Global Variables Directly Accessed

Label References

Naked Globals

Local Variables

Legend: