Routine: APSPT07

Package	Total	Call Graph
VA Fileman	8	^DIC E^DIE0 (,0,F,M,N,Z)^DIE17 Z^DIE2 ^DIE3 QQ^DIEQ ^DIR RW^DIR2

Entry Points

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

External References

Name	Field # of Occurrence
^DIC	P
E^DIE0	I+1, 1+5, 2+4, 3+5, 4+3, 5+4, 6+4
^DIE17	RD
0^DIE17	7
F^DIE17	2, 4
M^DIE17	T
N^DIE17	RP, 1+5, 2+4, 3+5, 4+3, 5+4, 6+4
Z^DIE17	X
Z^DIE2	RD+1
^DIE3	T
QQ^DIEQ	QS
^DIR	SET+2
RW^DIR2	O+1

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: $C(7) Line Location: TR+0
Function Call: WRITE	Prompt: " "_X Line Location: RD+2
Routine Call	DIC Line Location: P
Routine Call	DIR Line Location: SET+2

FileMan Files Accessed Via FileMan Db Call

FileNo	Call Tags
^APSPDUE(32 - [#9009032]	Classic Fileman Calls

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^APSPDUE(32 - [#9009032]	DE, C1+1!, C1S+1, C3+1!, C3S+1
^DD(	T, R, R+1
^DD("DD"	R+2
^DISV(	RD+2, Z*

Label References

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

Naked Globals

Name	Field # of Occurrence
^(	RD+2, R, R+1
^(0	DE+1, R, R+1
^(12.1	T

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
>> %	DE+1, T, R+2, SET+2*
%Z	DE+1*, DE+2!
>> APSDUECN	1+3
>> D	N, D*
>> D0	BEGIN+1*
>> DA	DE, BEGIN+1, C1+1, C1S+1, C3+1, C3S+1
DB	DE!, C1!, C1S!, C3!, C3S!
DB(	T, P, X, SET, SET+1, 1+5, 2+4, 3+5, 4+3, 5+4* , 6+4*
>> DC	RP
DDER	T, T+1!, SET+2
DE	DE!
DE(	O+2, RE, Y, PR, RP, 1+1, 1+5, 2+4, 3+1, 3+5 , 4+3, 5+4, 6+4
DE(1	DE+1*, C1
DE(2	DE+1*
DE(3	DE+1*, C3
DE(4	DE+1*
DE(5	DE+1*
DE(6	DE+1*
DG	DE!, PR, R, R+1*, R+2, 2, 4
DG(	Z*, C1S, C3S
>> DIC	DE, P, C1, C1S, C3, C3S
>> DIC("S"	T, Z!
>> DIC(0	P*
>> DIE	DE*, P, C1, C1S, C3, C3S
>> DIEL	DE*
>> DIEZ	BEGIN+1*
>> DIFLD	T, D, 1, 2, 3, 4, 5, 6
DIQUIET	SET+1~*
DIR	SET~
DIR("V"	SET*
DIR(0	SET*
>> DL	DE*, W
DLAYGO	P*, Z!
>> DLB	W, RD+2, Z, D, 1, 2, 3, 4, 5, 6
>> DNM	BEGIN*
>> DP	DE*, T
>> DQ	O+2, A, B, RE, T, P, P+2, V, X, D , Y, PR, RP, SET, SET+1, BEGIN, 1+5, C1S, 2, 2+4 , 3+5, C3S, 4, 4+3, 5+4, 6+4
>> DQ(	A!, P+2, D*, PR
DTIME	TR, BEGIN+1*
>> DTOUT	TR*
>> DU	DE, P, D, PR, SET, 1, 1+2, 2, 2+1, 3 , 3+2, 4, 5, 5+1, 6, 6+1
DUZ	RD+2, Z, 6+2
>> DV	O+1, O+2, N, RD+2, T, P, P+1, Z, D, Y , PR, RP, I, 1, 1+5, 2, 2+4, 3, 3+5, 4 , 4+3, 5, 5+4, 6, 6+4
>> DW	Z, D, 1, 1+1, 2, 3, 3+1, 4, 5, 6
>> DZ	QS*
>> RX0	2+2, 3+3, 4+1, 5+2
U	DE+1, TR, P, P+2, Z, D, R, R+1, SET, BEGIN+1* , 2+2, 3+3, 4+1, 5+2
X	O+2, TR, N, RD, RD+1, RD+2, T, P, P+1!, P+2* , Z, X+1, QS, Y, PR, R, R+1, R+2, RP, I+1 , SET+2, 1+3, 1+4, 1+5, 1+6, C1, C1+1, C1S, C1S+1, 2+2 , 2+3, 2+4, 2+5, 3+3, 3+4, 3+5, 3+6, C3, C3+1, C3S* , C3S+1, 4+1, 4+2, 4+3, 4+4, 5+2, 5+3, 5+4, 5+5, 6+2* , 6+3, 6+4*, 6+5
>> Y	O, O+1, O+2, P, Y, PR, R, R+1, R+2, SET+2 , 1+4, 1+5, 2+3, 2+4, 3+4, 3+5, 4+2, 4+3, 5+3, 5+4 , 6+3, 6+4
>> Y(0	SET+2
YS	V!
>> ZTQUEUED	X

Marked Items

Name	Field # of Occurrence
$T(@(3)	D

Customize PDF page

Package: IHS Changes To Pharmacy

Routine: APSPT07

Information

Source Information

Call Graph

Call Graph Total: 8

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