Routine: NURAPA

Package	Total	Call Graph
VA Fileman	9	E^DIE0 (,F,M,N,UNIQFERR,Z)^DIE17 Z^DIE2 ^DIE3 (AST,NOSCR)^DIED QQ^DIEQ $$GETTMP^DIKC1 ^DIR RW^DIR2
Nursing Service	1	^NURAPA1

Entry Points

External References

Name	Field # of Occurrence
E^DIE0	I+1, 1+3, 2+3, 3+3, 4+3, 5+3, 6+3, 7+3, 8+3, 9+3 , 10+3, 11+3, 12+3, 13+3, 14+3, 15+3, 16+3, 17+3, 18+3, 19+3
^DIE17	RD
F^DIE17	20
M^DIE17	T
N^DIE17	RP, 1+3, 2+3, 3+3, 4+3, 5+3, 6+3, 7+3, 8+3, 9+3 , 10+3, 11+3, 12+3, 13+3, 14+3, 15+3, 16+3, 17+3, 18+3, 19+3
UNIQFERR^DIE17	Z
Z^DIE17	X
Z^DIE2	RD+1
^DIE3	T
AST^DIED	P
NOSCR^DIED	P
QQ^DIEQ	QS
$$GETTMP^DIKC1	BEGIN+1
^DIR	SET+2
RW^DIR2	O+1
^NURAPA1	20

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	DIR Line Location: SET+2

FileMan Files Accessed Via FileMan Db Call

FileNo	Call Tags
^NURSA(213.2 - [#213.2]	Classic Fileman Calls

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^DD(	T, R, R+1
^DD("DD"	R+2
^DD("KEY" - [#.31]	N
^DIE(2756	BEGIN+2
^DISV(	RD+2, Z*
^NURSA(213.2 - [#213.2]	DE

Label References

Name	Line Occurrences
$$KEYCHK	Z
@(	B, V
A	N, Z, Y, RP, 1+3, 2+3, 3+3, 4+3, 5+3, 6+3 , 7+3, 8+3, 9+3, 10+3, 11+3, 12+3, 13+3, 14+3, 15+3, 16+3 , 17+3, 18+3, 19+3
B	QS
BEGIN	NURAPA+1
D	RD, RD+1, P+1, QS
DE	NURAPA+1
N	Y
NKEY	N
O	Y, RP
P	T
PR	RE, I+1
QS	RD, NKEY
R	R, R+1
RD	Y, I, I+1, 1+4, 2+4, 3+4, 4+4, 5+4, 6+4, 7+4 , 8+4, 9+4, 10+4, 11+4, 12+4, 13+4, 14+4, 15+4, 16+4, 17+4 , 18+4, 19+4
RP	PR, R, R+1
SAVEVALS	Z
SET	T
TR	RE
V	T, P+1
W	O, RE
X	N, T+1, P, Y
Z	P+1

Naked Globals

Name	Field # of Occurrence
^(	DE+4, RD+2, R, R+1
^("F"	SAVEVALS*
^(0	DE+1, R, R+1
^(12.1	T

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
>> %	DE+1, DE+2, DE+3, DE+4, T, R+2, SET+2
%Z	DE+1, DE+2, DE+3, DE+4, DE+5!
>> D	N, D*
>> D0	BEGIN+3*
>> DA	DE, BEGIN+3
DB	DE!
DB(	T, P, X, SET, SET+1, 1+3, 2+3, 3+3, 4+3, 5+3* , 6+3, 7+3, 8+3, 9+3, 10+3, 11+3, 12+3, 13+3, 14+3, 15+3 , 16+3, 17+3, 18+3, 19+3
>> DC	RP
DDER	T, T+1!, SET+2
DE	DE!
DE(	O+2, RE, Z, Y, PR, RP, SAVEVALS, SAVEVALS+1, KEYCHK, 1+3 , 2+3, 3+3, 4+3, 5+3, 6+3, 7+3, 8+3, 9+3, 10+3, 11+3 , 12+3, 13+3, 14+3, 15+3, 16+3, 17+3, 18+3, 19+3
DE(1	DE+1*
DE(10	DE+2*
DE(11	DE+2*
DE(12	DE+2*
DE(13	DE+2*
DE(14	DE+2*
DE(15	DE+3*
DE(16	DE+3*
DE(17	DE+4*
DE(18	DE+4*
DE(19	DE+4*
DE(2	DE+1*
DE(3	DE+1*
DE(4	DE+1*
DE(5	DE+1*
DE(6	DE+1*
DE(7	DE+1*
DE(8	DE+2*
DE(9	DE+2*
DG	DE!, PR, R, R+1*, R+2, 20
DG(	Z*
>> DIC	DE, P
>> DIC("S"	T, Z!
>> DIC(0	P*
>> DICRREC	BEGIN+2*
>> DIE	DE*, P
DIEBADK	BEGIN+1!
DIEFIRE	BEGIN+1!
>> DIEL	DE*
>> DIEZ	BEGIN+3*
DIEZAR	BEGIN+1~, BEGIN+2*
DIEZRXR	BEGIN+1~
DIEZTMP	SAVEVALS, SAVEVALS+1, SAVEVALS+2, BEGIN+1~*
>> DIFLD	N, T, D, SAVEVALS, SAVEVALS+1, SAVEVALS+2, 1, 2, 3, 4 , 5, 6, 7, 8, 9, 10, 11, 12, 13, 14 , 15, 16, 17, 18, 19*
DIIENS	SAVEVALS, SAVEVALS+1, SAVEVALS+2, BEGIN+1~, BEGIN+3*
DIQUIET	SET+1~*
DIR	SET~
DIR("V"	SET*
DIR(0	SET*
DIXR	BEGIN+1~
>> DL	DE*, W
DLAYGO	P*, Z!
>> DLB	W, RD+2, Z, D, 1, 2, 3, 4, 5, 6 , 7, 8, 9, 10, 11, 12, 13, 14, 15, 16 , 17, 18, 19*
>> DNM	BEGIN*
>> DP	DE*, N, T, SAVEVALS, SAVEVALS+1, SAVEVALS+2
>> DQ	O+2, A, B, RE, T, P, P+2, V, X, D , Y, PR, RP, SET, SET+1, SAVEVALS, BEGIN, 1+3, 2+3, 3+3 , 4+3, 5+3, 6+3, 7+3, 8+3, 9+3, 10+3, 11+3, 12+3, 13+3 , 14+3, 15+3, 16+3, 17+3, 18+3, 19+3
>> DQ(	A!, P+2, D*, PR
DTIME	TR, BEGIN+3*
>> DTOUT	TR*
>> DU	DE, P, D, PR, SET, 1, 2, 3, 4, 5 , 6, 7, 8, 9, 10, 11, 12, 13, 14, 15 , 16, 17, 18, 19
DUZ	RD+2, Z
>> DV	O+1, O+2, N, RD+2, T, P, P+1, Z, D, Y , PR, RP, I, 1, 1+3, 2, 2+3, 3, 3+3, 4 , 4+3, 5, 5+3, 6, 6+3, 7, 7+3, 8, 8+3, 9* , 9+3, 10, 10+3, 11, 11+3, 12, 12+3, 13, 13+3, 14* , 14+3, 15, 15+3, 16, 16+3, 17, 17+3, 18, 18+3, 19* , 19+3
>> DW	Z, D, SAVEVALS+1, KEYCHK, 1, 2, 3, 4, 5, 6 , 7, 8, 9, 10, 11, 12, 13, 14, 15, 16 , 17, 18, 19*
>> DZ	QS*
>> NURSFT(1	1+1
>> NURSFT(10	10+1
>> NURSFT(11	11+1
>> NURSFT(12	12+1
>> NURSFT(13	13+1
>> NURSFT(14	14+1
>> NURSFT(15	15+1
>> NURSFT(16	16+1
>> NURSFT(17	17+1
>> NURSFT(18	18+1
>> NURSFT(19	19+1
>> NURSFT(2	2+1
>> NURSFT(3	3+1
>> NURSFT(4	4+1
>> NURSFT(5	5+1
>> NURSFT(6	6+1
>> NURSFT(7	7+1
>> NURSFT(8	8+1
>> NURSFT(9	9+1
U	DE+1, DE+2, DE+3, DE+4, TR, P, P+2, Z, D, R , R+1, SET, BEGIN+3*
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, NKEY, 1+1, 1+2, 1+3, X1!, 2+1, 2+2, 2+3, X2! , 3+1, 3+2, 3+3, X3!, 4+1, 4+2, 4+3, X4!, 5+1, 5+2 , 5+3, X5!, 6+1, 6+2, 6+3, X6!, 7+1, 7+2, 7+3, X7! , 8+1, 8+2, 8+3, X8!, 9+1, 9+2, 9+3, X9!, 10+1, 10+2 , 10+3, X10!, 11+1, 11+2, 11+3, X11!, 12+1, 12+2, 12+3, X12! , 13+1, 13+2, 13+3, X13!, 14+1, 14+2, 14+3, X14!, 15+1, 15+2 , 15+3, X15!, 16+1, 16+2, 16+3, X16!, 17+1, 17+2, 17+3, X17! , 18+1, 18+2, 18+3, X18!, 19+1, 19+2, 19+3, X19!
>> Y	O, O+1, O+2, P, Y, PR, R, R+1, R+2, SET+2 , 1+2, 1+3, 2+2, 2+3, 3+2, 3+3, 4+2, 4+3, 5+2, 5+3 , 6+2, 6+3, 7+2, 7+3, 8+2, 8+3, 9+2, 9+3, 10+2, 10+3 , 11+2, 11+3, 12+2, 12+3, 13+2, 13+3, 14+2, 14+3, 15+2, 15+3 , 16+2, 16+3, 17+2, 17+3, 18+2, 18+3, 19+2*, 19+3
>> Y(0	SET+2
YS	V!
>> ZTQUEUED	X, NKEY

Marked Items

Customize PDF page

Package: Nursing Service

Routine: NURAPA

Information

Source Information

Call Graph

Call Graph Total: 10

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
X10
X11
X9
20
PR
1
BEGIN
SET
RP
TR
X8
RD
RE
3
2
5
4
7
6
X2
X3
X1
X6
X7
KEYCHK()
X5
A
B
D
I
13
O
N
X18
P
X19
R
T
W
V
Y
X
X12
Z
X14
X15
X16
X17
11
10
QS
12
15
14
17
16
19
18
9
NKEY
X4
8
X13
SAVEVALS