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 |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Local Variables |  All
Print Page as PDF
Routine: ASDCWMA

Package: IHS Changes To Scheduling

Routine: ASDCWMA


Information

ASDCWMA ; IHS/ADC/PDW/ENM - CLERK WHO MADE APPT LIST ; [ 03/25/1999 11:48 AM ]

Source Information

Source file <ASDCWMA.m>

Call Graph

Call Graph Total: 9

Package Total Call Graph
Kernel 3 (,HOME)^%ZIS  ^%ZISC  ^%ZTLOAD  
VA Fileman 2 ^%DT  ^DIR  
IHS Changes To Scheduling 1 ($$ACTV,$$HRC)^ASDUT  
IHS VA Utilities 1 $$VAL^XBDIQ1  
Registration 1 CLINIC^VAUTOMA  
Scheduling 1 ASK2^SDDIV  

Caller Graph

Caller Graph Total: 1

Package Total Caller Graph
Scheduling 1 SD IHS LIST MADE BY  

Entry Points

Name Comments DBIA/ICR reference
A ; -- driver
BD ; -- beginning date
ALL ; -- all clinics
ZIS ; -- select device
CL ; -- select clinic
HD(X) ; -- heading
ED ; -- ending date
AGE(X) ; -- age
Q
START ;EP
D(Y) ; -- date
1 ; -- loop clinics
QUE ; -- queued
CLK(X) ; -- clerk who made appt

External References

Name Field # of Occurrence
^%DT BD+1, ED+1
^%ZIS ZIS+1
HOME^%ZIS QUE+3
^%ZISC Q+1
^%ZTLOAD QUE+3
$$ACTV^ASDUT ALL+3
$$HRC^ASDUT 1+6
^DIR 1+8, HD+1
ASK2^SDDIV CL+1
CLINIC^VAUTOMA CL+1
$$VAL^XBDIQ1 AGE+2

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,$$D(D),?20,$$HRC^ASDUT(+N),?30,$$AGE(+N)
  • Line Location: 1+6
Function Call: WRITE
  • Prompt: ?40,$$CLK($P(N,U,6)),?65,$$D($P(N,U,7))
  • Line Location: 1+7
Function Call: WRITE
  • Prompt: @IOF,!!,?35,$P(^SC(+SC,0),U),!!,"DATE/TIME",?20,"HRCN"
  • Line Location: HD+2
Function Call: WRITE
  • Prompt: ?30,"AGE",?40,"CLERK WHO MADE APPT",?65,"DATE APPT MADE",!!
  • Line Location: HD+3
Routine Call
  • %ZIS
  • Line Location:
    • QUE+3
Routine Call
  • DIR
  • Line Location:
    • 1+8
    • HD+1
Routine Call
  • %ZIS
  • Line Location:
    • ZIS+1

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DD("DD" D+2
^SC - [#44] ALL+1, ALL+2, 1+3, 1+4, 1+5, HD+2
^VA(200 - [#200] CLK+2

Label References

Name Line Occurrences
$$AGE 1+6
$$CLK 1+7
$$D 1+6, 1+7
1 START+4, ALL+3
ALL START+2
BD A+2
CL A+1
ED A+3
HD 1+1, 1+5
Q A+1, A+2, A+3, A+4, A+5, START+5
QUE A+5
START A+6
ZIS A+4

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> %DT BD+1*, ED+1*
>> %DT("A" BD+1*, ED+1*
>> %ZIS ZIS+1*
ASDQT Q!, START+1*, START+4, ALL+1, 1+3, 1+4, 1+5, 1+8*, HD+1*
D Q!, 1+2*, 1+3*, 1+4, 1+5, 1+6, D+1~, AGE+1~, CLK+1~
>> DIR(0 1+8*, HD+1*
IO START+1
IO("Q" A+5, QUE+1!
IOF HD+2
IOSL 1+5
IOST 1+8, HD+1
N Q!, 1+5*, 1+6, 1+7, D+1~, AGE+1~, CLK+1~
P Q!, 1+4*, 1+5, D+1~, AGE+1~, CLK+1~
POP A+4, Q!
SC Q!, START+4*, ALL+1*, ALL+2, ALL+3, 1+3, 1+4, 1+5, HD+2
SD Q!, START+3*, START+4*
SDBD BD+1*, Q!, 1+2
SDED ED+1*, Q!, 1+3
SDQUIT Q!
U ALL+2, 1+7, HD+2, CLK+2
VAUTC Q!, START+2
VAUTC( START+4
VAUTD Q!
VAUTD( ALL+2
VAUTD(0 ALL+2
>> VAUTNI CL+1*
X BD+1*, ED+1*, Q!, HD~, HD+1, AGE~, AGE+2, CLK~, CLK+2
Y A+1, A+2, A+3, CL+1, BD+1, ED+1, Q!, 1+8, HD+1, D~
, D+2
>> ZTDESC QUE+1*
>> ZTRTN QUE+1*
>> ZTSAVE("DIV" QUE+2*
>> ZTSAVE("SDBD" QUE+2*
>> ZTSAVE("SDED" QUE+2*
>> ZTSAVE("VAUT*" QUE+2*
ZTSK QUE+3!
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Local Variables |  All