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: APSPT09

Package: IHS Changes To Pharmacy

Routine: APSPT09


Information

APSPT09 ; IHS/DSD/ENM - GENERATED FROM 'APSP PREPACK LOG ADD' INPUT TEMPLATE(#992), FILE 9009031 ; [ 09/03/97 1:30 PM ]

Source Information

Source file <APSPT09.m>

Call Graph

Call Graph Total: 9

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

Entry Points

Name Comments DBIA/ICR reference
DE
PR
1
BEGIN
RP
C4S
TR
X8
RD
RE
3
2
5
4
7
6
X2
X3
C1
X1
X6
X7
X4
C4
A
B
D
I
O
N
P
R
T
W
V
Y
X
Z
QS
C7
C7S
9
C1S
8

External References

Name Field # of Occurrence
^%DT X1
^APSPT091 9
^DIC P
E^DIE0 I+1, 1+4
^DIE17 RD
F^DIE17 2, 3, 6, 7, 8, 9
M^DIE17 T
N^DIE17 RP, 1+4
OUT^DIE17 3, 6, 8
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

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*, X6, C7+1, C7S+1
^APSPP(31.1 - [#9009031.1] X6
^DD( T, R, R+1
^DD("DD" R+2
^DD(9009031 C4+1, C4+3, C7+1, C7+3, C7S+1, C7S+3
^DISV( RD+2, Z*

Label References

Name Line Occurrences
@( B, V
A N, Z, Y, RP, 1+4, 3, 6, 8
B QS
BEGIN APSPT09+2
C1S C1
C4S C4
C7S C7
D RD, RD+1, P+1, QS
DE APSPT09+2, 2, 3, 6, 7, 8
N Y
O Y, RP
P T
PR RE, I+1
QS RD
R R, R+1
RD Y, I, I+1, 1+5
RP PR, R, R+1
TR RE
V T, P+1
W O, RE
X N, T+1, P
X3 3
X6 6
X8 8
Y 2+3, 4+4, 7+4
Z P+1, 1+5

Naked Globals

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

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> % DE+1*, T*, T+1*, R+2*
>> %DT X1*
>> %PSITE X3
%Z DE+1*, DE+2!
>> APSP("PREPACK LOG FLG" , C7+5*, C7S+5!
>> APSPRT("QTY" X6*, 7+2, X8!
>> D N, D*
>> D0 BEGIN+1*, C4+1*, C4+3*, C7+1*, C7+3*, C7S+1*, C7S+3*
>> DA DE, BEGIN+1, C1+1, C1S+1, C4+1, C4+3, X6, C7+1, C7S+1
DB DE!, C1!, C1S!, C4!, C4S!, C7!, C7S!
DB( T, T+2, P, X, 1+4*
>> DC RP
DE DE!
DE( RE, Y, PR, RP, 1+1*, 1+4, 4+1*, 7+1*
DE(1 DE+1*, C1
DE(2 DE+1*
DE(4 DE+1*, C4, C4+2
DE(7 DE+1*, C7, C7+2, C7+4
DG DE!, T+1*, T+2, PR*, R*, R+1*, R+2, 2, 3, 6
, 7, 8, 9
DG( Z*, C1S, C4S, C4S+2, C7S, C7S+2, C7S+4
>> DIC DE*, P*, C1*, C1S*, C4*, C4+2*, C4S*, C4S+2*, C7*, C7+2*
, C7+4*, C7S*, C7S+2*, C7S+4*
>> DIC("S" T, T+1, Z!
>> DIC(0 P*, 3*, 6*, 8*
>> DIE DE*, P, C1, C1S, C4, C4+2, C4S, C4S+2, C7, C7+2
, C7+4, C7S, C7S+2, C7S+4
>> DIEL DE*
>> DIEZ BEGIN+1*
>> DIFLD T, D, 1*, 2*, 4*, 7*
>> DIU C4+1*, C4+3*, C7+1*, C7+3*, C7S+1*, C7S+3*
>> DIU(0 C7+1, C7S+1
DIV C4+1!*, C4+3!*, C7+1!*, C7+3, C7S+1!*, C7S+3
DIV(0 C4+1*, C4+3*, C7+1*, C7S+1*
>> DL DE*, W
DLAYGO P*, Z!
>> DLB W, RD+2, Z, D, 1*, 2*, 4*, 7*
>> DNM BEGIN*
>> DP DE*, T
>> DQ A*, B, RE, T, T+2, P, P+2, V, X, D
, Y, PR, RP, BEGIN*, 1+4, C1S, 2*, 3*, C4S, C4S+2
, 5*, 6*, 7*, C7S, C7S+2, C7S+4, 8*
>> DQ( A!, P+2, D*, PR
DT 1+2
DTIME TR, BEGIN+1*
>> DTOUT TR*
>> DU DE*, T, T+1, P, D, PR, 1*, 2*, 2+1*, 4*
, 4+2*, 7*
DUZ RD+2, Z
>> DV O+1, O+2, N, RD+2, T, P, P+1, P+2, Z, D
, PR, RP, I, 1*, 1+4, 2*, 4*, 7*
>> DW Z, D, 1*, 1+1, 2*, 3*, 4*, 4+1, 6*, 7*
, 7+1, 8*
>> DZ QS*
>> I(0 C4+1, C4+3, C7+3, C7S+3
U TR, P, P+2, Z, D, R, R+1, BEGIN+1*, 3, X3
, C4+1, C4+3, 6, X6, C7+1, C7+3, C7S+1, C7S+3, 8
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, 1+2*, 1+3, 1+4*, 1+5, C1*, C1+1, C1S*, C1S+1
, X1*!, 3*, C4*, C4+1*, C4+2*, C4+3*, C4S*, C4S+2*, 6*, 7+2*
, 7+3, C7*, C7+1*, C7+2*, C7+3*, C7+4*, C7S*, C7S+1*, C7S+2*, C7S+3*
, C7S+4*, X7!, 8*
Y O, O+1, O+2, T*, T+1*, P, Y, PR*, R*, R+1*
, R+2*, 1+3*, 1+4, X1, 2+2*, 3*, X3*, 4+3*, C4+1!, C4+3!
, 6*, 7+3*, C7+1!, C7+3!, C7S+1!, C7S+3!, 8*
Y(0 C4+1*, C4+3*, C7+1*, C7S+1*
Y(1 C7+1*, C7S+1*
Y(201 C4+1, C4+3, C7+3, C7S+3
YS T+1*, T+2, V!

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