Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Call Graph |  Entry Points |  External References |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  Marked Items |  All
Print Page as PDF
Routine: APCDT601

Package: Patient Care Component

Routine: APCDT601


Information

APCDT601 ; ;10/13/05

Source Information

Source file <APCDT601.m>

Call Graph

Call Graph Total: 10

Package Total Call Graph
VA Fileman 8 E^DIE0  (,1,F,M,N,UNIQFERR,Z)^DIE17  Z^DIE2  ^DIE3  (AST,NOSCR)^DIED  QQ^DIEQ  ^DIR  RW^DIR2  
IHS Patient 2 VLAB04^AUPNCIX  (ADD,SUB)^AUPNVSIT  

Entry Points

Name Comments DBIA/ICR reference
DE
C3F1
PR
1
BEGIN
SET
RP
TR
RD
RE
3
2
5
4
X2
C2
C1
X1
KEYCHK()
C3
A
B
D
C2S
I
X3
O
N
C2F1
P
R
T
W
V
Y
X
Z
QS
NKEY
X4
C1S
C1F1
C3S
SAVEVALS

External References

Name Field # of Occurrence
VLAB04^AUPNCIX X3
ADD^AUPNVSIT C2S+6
SUB^AUPNVSIT C2+6
E^DIE0 I+1, 1+5, 2+5
^DIE17 RD
1^DIE17 5
F^DIE17 2, 3, 4
M^DIE17 T
N^DIE17 RP, 1+5, 2+5
UNIQFERR^DIE17 Z
Z^DIE17 X
Z^DIE2 RD+1
^DIE3 T
AST^DIED P
NOSCR^DIED P
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
  • DIR
  • Line Location:
    • SET+2

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^AUPNVLAB - [#9000010.09] Classic Fileman Calls

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^AUPNVLAB - [#9000010.09] DE, C1+4, C1+6, C1+8, C1S+4, C1S+6, C1S+8, C2+8, C2+10, C2S+8
, C2S+10, C3+2, C3S+2
^AUPNVLAB("AA" C1+4!, C1S+4*
^AUPNVLAB("AC" C1+2!, C1S+2*
^AUPNVLAB("AD" C2+2!, C2S+2*
^AUPNVLAB("AE" C1+6!, C1S+6*, C2+8!, C2S+8*
^AUPNVLAB("AOP" C1+8!, C1S+8*, C2+10!, C2S+10*
^AUPNVLAB("AR" C3+2!, C3S+2*
^AUPNVSIT - [#9000010] C1+4, C1+6, C1+8, C1S+4, C1S+6, C1S+8, C2+8, C2+10, C2S+8, C2S+10
^DD( T, R, R+1
^DD("DD" R+2
^DD("KEY" - [#.31] N
^DISV( RD+2, Z*

Label References

Name Line Occurrences
$$KEYCHK Z
@( B, V
A N, Z, Y, RP, 1+5, 2+5
B QS
BEGIN APCDT601+1
C1F1 C1S
C1S C1
C2F1 C2S
C2S C2
C3F1 C3S
C3S C3
D RD, RD+1, P+1, QS
DE APCDT601+1, 2, 3, 4
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+6, 2+6
RE 3+2, 4+1
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, 1+6, 2+6

Naked Globals

Name Field # of Occurrence
^( 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*, T, R+2*, SET+2*
%Z DE+1*, DE+2!
>> APCDPAT 1+3
>> APCDVSIT 2+3
>> D N, D*
>> DA DE, C1+2, C1+4, C1+6, C1+8, C1S+2, C1S+4, C1S+6, C1S+8, C2+2
, C2+8, C2+10, C2S+2, C2S+8, C2S+10, C3+2, C3S+2
DB DE!, C1!, C1S!, C2!, C2S!, C3!, C3S!
DB( T, P, X, SET, SET+1, 1+5*, 2+5*
>> DC RP
DDER T, T+1!, SET+2
DE DE!
DE( O+2, RE, Z, Y, PR, RP, SAVEVALS, SAVEVALS+1, KEYCHK, 1+1*
, 1+5*, 2+1*, 2+5*, 3+1*
DE(1 DE+1*, C1, C1+1, C1+3, C1+5, C1+7
DE(2 DE+1*, C2, C2+1, C2+3, C2+5, C2+7, C2+9
DE(3 DE+1*, C3, C3+1, C3+3
DE(4 DE+1*
DG DE!, PR*, R*, R+1*, R+2, 2, 3, 4
DG( Z*, C1S, C1S+1, C1S+3, C1S+5, C1S+7, C2S, C2S+1, C2S+3, C2S+5
, C2S+7, C2S+9, C3S, C3S+1, C3S+3
>> DIC DE*, P*, C1+1*, C1+3*, C1+5*, C1+7*, C1S+1*, C1S+3*, C1S+5*, C1S+7*
, C2+1*, C2+3*, C2+5*, C2+7*, C2+9*, C2S+1*, C2S+3*, C2S+5*, C2S+7*, C2S+9*
, C3+1*, C3+3*, C3S+1*, C3S+3*
>> DIC("S" T, Z!
>> DIC(0 P*
>> DIE DE*, P, C1+1, C1+3, C1+5, C1+7, C1S+1, C1S+3, C1S+5, C1S+7
, C2+1, C2+3, C2+5, C2+7, C2+9, C2S+1, C2S+3, C2S+5, C2S+7, C2S+9
, C3+1, C3+3, C3S+1, C3S+3
>> DIEL DE*
>> DIEZTMP SAVEVALS, SAVEVALS+1, SAVEVALS+2
>> DIFLD N, T, D, SAVEVALS, SAVEVALS+1, SAVEVALS+2, 1*, 2*, 3*, 4*
>> DIIENS SAVEVALS, SAVEVALS+1, SAVEVALS+2
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*
>> 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+5, C1S, C1S+1
, C1S+3, C1S+5, C1S+7, 2*, 2+5, C2S, C2S+1, C2S+3, C2S+5, C2S+7
, C2S+9, 3*, C3S, C3S+1, C3S+3, 4*
>> DQ( A!, P+2, D*, PR
DTIME TR
>> DTOUT TR*
>> DU DE*, P, D, PR, SET, 1*, 1+2*, 2*, 2+2*, 3*
, 4*
DUZ RD+2, Z
>> DV O+1, O+2, N, RD+2, T, P, P+1, Z, D, Y
, PR, RP, I, 1*, 1+5, 2*, 2+5, 3*, 4*
>> DW Z, D, SAVEVALS+1, KEYCHK, 1*, 1+1, 1+5, 2*, 2+1, 2+5
, 3*, 3+1, 4*
>> DZ QS*
U DE+1, TR, P, P+2, Z, D, R, R+1, SET, C1+4
, C1+6, C1+8, C1S+4, C1S+6, C1S+8, C2+8, C2+10, C2S+8, C2S+10
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+3*, 1+4, 1+5*, 1+6, C1+1*, C1+2, C1+3*, C1+4
, C1+5*, C1+6, C1+7*, C1+8, C1S*, C1S+1*, C1S+2, C1S+3*, C1S+4, C1S+5*
, C1S+6, C1S+7*, C1S+8, 2+3*, 2+4, 2+5*, 2+6, C2+1*, C2+2, C2+3*
, C2+5*, C2+7*, C2+8, C2+9*, C2+10, C2S*, C2S+1*, C2S+2, C2S+3*, C2S+5*
, C2S+7*, C2S+8, C2S+9*, C2S+10, C3+1*, C3+2, C3+3*, C3S*, C3S+1*, C3S+2
, C3S+3*, X3+1!, X4!, X4+1!
>> Y O, O+1, O+2, P, Y, PR*, R*, R+1*, R+2*, SET+2
, 1+4*, 1+5, 2+4*, 2+5
>> Y(0 SET+2
YS V!
>> ZTQUEUED X, NKEY

Marked Items

Name Field # of Occurrence
$T(@(3) D
Info |  Source |  Call Graph |  Entry Points |  External References |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  Marked Items |  All