Routine: APSPT091

Package	Total	Call Graph
VA Fileman	8	^%DT ^DIC E^DIE0 (,F,M,N,Z)^DIE17 Z^DIE2 ^DIE3 RW^DIED QQ^DIEQ
IHS Changes To Pharmacy	1	^APSPT093

Package	Total	Caller Graph
IHS Changes To Pharmacy	1	APSPT09

Entry Points

External References

Name	Field # of Occurrence
^%DT	X2
^APSPT093	6
^DIC	P, X4
E^DIE0	I+1
^DIE17	RD
F^DIE17	1, 2, 6
M^DIE17	T
N^DIE17	RP
Z^DIE17	X
Z^DIE2	RD+1
^DIE3	T
RW^DIED	O+1
QQ^DIEQ	QS

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: W Line Location: W+0
Function Call: WRITE	Prompt: !?DL+DL-2,DLB_": " Line Location: W+0
Function Call: WRITE	Prompt: W Line Location: O+0
Function Call: WRITE	Prompt: Y Line Location: O+0
Function Call: WRITE	Prompt: !?9 Condition for execution: $X>45 Line Location: O+0
Function Call: WRITE	Prompt: " (No Editing)" Line Location: O+2
Function Call: READ	Timeout: DTIME Variable: X Line Location: TR+0
Function Call: WRITE	Prompt: *7 Line Location: TR+0
Function Call: WRITE	Prompt: " "_X Line Location: RD+2
Function Call: WRITE	Prompt: *7,"??" Line Location: X+0
Routine Call	DIC Line Location: P X4

FileMan Files Accessed Via FileMan Db Call

FileNo	Call Tags
^APSPP(31 - [#9009031]	Classic Fileman Calls

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^APSPP(31 - [#9009031]	DE, C1+1, C1S+1, 5+4, M5
^DD(	T, R, R+1
^DD("DD"	R+2
^DD(9009031	C1+1, C1+3, C1S+1, C1S+3
^DISV(	RD+2, Z*

Label References

Name	Line Occurrences
5+1	R5+1
@(	B, V
A	N, Z, Y, RP
B	QS
BEGIN	APSPT091+2
C1S	C1
D	RD, RD+1, P+1, QS
DE	APSPT091+2, 1, 2, R5
M5	5+3
N	Y
O	Y, RP
P	T
PR	RE, I+1
QS	RD
R	R, R+1
RD	Y, I, I+1
RE	1+2, 5+3, M5+1
RP	PR, R, R+1
TR	RE
V	T, P+1
W	O, RE
X	N, T+1, P
Y	2+3, 3+4, 4+4
Z	P+1

Naked Globals

Name	Field # of Occurrence
^(	RD+2, R, R+1
^(0	DE+1, R, R+1, C1+1, C1S+1, 5+3, 5+4, M5
^(12.1	T

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
>> %	DE+1, T, T+1, R+2
>> %DT	X2*
%Z	DE+1*, DE+2!
>> APSP("EXPDATE"	2+1
>> APSP("PREPACK	LOG FLG" , C1+5!
>> D	N, D, 5, 5+3, 5+4, M5, R5+1*
>> D0	C1+1, C1+3, C1S+1, C1S+3
>> DA	DE, C1+1, C1S+1, C1S+3, 5+4, M5
DB	DE!, C1!, C1S!
DB(	T, T+2, P, X
>> DC	RP, 5+1, M5
DE	DE!
DE(	RE, Y, PR, RP, 1+1*
DE(1	DE+1*, C1, C1+2, C1+4, 5!
DE(2	DE+1*
DE(3	DE+1*
DE(4	DE+1*
DE(5	M5*
DG	DE!, T+1, T+2, PR, R, R+1, R+2, 1, 2, 6
DG(	Z*, C1S, C1S+2, C1S+4
>> DGO	5+1*
DIC	DE, P, C1, C1+2, C1+4, C1S, C1S+2, C1S+4, X4!*
DIC("S"	T, T+1, Z!, X4*
DIC(0	P*
>> DIE	DE*, P, C1, C1+2, C1+4, C1S, C1S+2, C1S+4, X4
>> DIEL	DE*
>> DIFLD	T, D, 1, 2, 3, 4, 5+1*
>> DIU	C1+1, C1+3, C1S+1, C1S+3
>> DIU(0	C1+1, C1+3, C1S+1, C1S+3
DIV	C1+1!, C1+3, C1S+1!, C1S+3!*
DIV(0	C1+1, C1S+1, C1S+3*
>> DL	DE*, W
DLAYGO	P*, Z!
>> DLB	W, RD+2, Z, D, 1, 2, 3, 4, 5+1*
>> DNM	BEGIN*
>> DOW	5+1*
>> DP	DE*, T
>> DQ	A, B, RE, T, T+2, P, P+2, V, X, D , Y, PR, RP, BEGIN, 1, C1S, C1S+2, C1S+4, 2
>> DQ(	A!, P+2, D*, PR
>> DSC(	5+3
DTIME	TR
>> DTOUT	TR*
>> DU	DE, T, T+1, P, D, PR, 1, 2, 3, 3+1* , 4, 4+1, 5+2*
DUZ	RD+2, Z
>> DV	O+1, O+2, N, RD+2, T, P, P+1, P+2, Z, D , PR, RP, I, 1, 2, 3, 4, 5+1*
>> DW	Z, D, 1, 1+1, 2, 3, 4, 5+1*
>> DZ	QS*
>> I(0	C1+3, C1S+3
>> PSCLC	3+2, 4+2
U	TR, P, P+2, Z, D, R, R+1, C1+1, C1+3, C1S+1 , C1S+3, 5+4, M5
X	O+2, TR, N, RD, RD+1, RD+2, T, T+1, T+2, P* , P+1!, P+2, Z, X+1, QS, Y, PR, R, R+1, R+2 , RP, I+1, C1, C1+1, C1+2, C1+3, C1+4, C1S, C1S+1, C1S+2* , C1S+3, C1S+4, X1!, 2+1, 2+2, X2!, 3+2, 3+3, 4+2, 4+3 , X4*!
Y	O, O+1, O+2, T, T+1, P, Y, PR, R, R+1* , R+2, C1+1!, C1+3!, C1S+1!, C1S+3!, 2+2, X2, 3+3, 4+3, X4
Y(0	C1+1, C1S+1, C1S+3*
Y(1	C1+1, C1S+1
Y(201	C1+3, C1S+3
YS	T+1*, T+2, V!

Marked Items

Customize PDF page

Package: IHS Changes To Pharmacy

Routine: APSPT091

Information

Source Information

Call Graph

Call Graph Total: 9

Caller Graph

Caller Graph Total: 1

Entry Points

External References

Interaction Calls

FileMan Files Accessed Via FileMan Db Call

Global Variables Directly Accessed

Label References

Naked Globals

Local Variables

Legend:

Marked Items

Name	Comments	DBIA/ICR reference
DE
M5
PR
1
BEGIN
RP
TR
RD
RE
3
2
5
4
6
X2
X3
C1
X1
X4
A
R5
B
D
I
O
N
P
R
T
W
V
Y
X
Z
QS
C1S