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 |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Local Variables |  All
Print Page as PDF
Routine: ASDWL

Package: IHS Changes To Scheduling

Routine: ASDWL


Information

ASDWL ; IHS/ADC/PDW/ENM - WAITING LIST ; [ 03/25/1999 11:48 AM ]

Source Information

Source file <ASDWL.m>

Call Graph

Call Graph Total: 8

Package Total Call Graph
Kernel 4 ^%ZIS  ^%ZISC  ^%ZTLOAD  $$REPEAT^XLFSTR  
VA Fileman 2 ^DIC  ^DIR  
IHS Changes To Scheduling 1 ($$CONF,$$HRN)^ASDUT  
IHS VA Utilities 1 $$VAL^XBDIQ1  

Caller Graph

Caller Graph Total: 1

Package Total Caller Graph
Scheduling 1 SD IHS WAIT LIST  

Entry Points

Name Comments DBIA/ICR reference
A ; -- driver
LF ; -- loop waiting list
EN ;EP; -- queued EP
AGE(DFN) ; -- returns printable age
DT(Y) ; -- date entered
PHONE(DFN) ; -- returns patient's phone #
Q ; -- cleanup
LT ; -- loop temp
QUE ; -- queued output
NWPG ; -- new page
SORT(S,N) ; -- returns sort subscript
SC ; -- select clinic
SB ; -- sort by
PRV(X) ; -- returns provider name
HD ; -- heading
SD ; -- select device

External References

Name Field # of Occurrence
^%ZIS SD+1
^%ZISC Q+1
^%ZTLOAD QUE+3
$$CONF^ASDUT HD+2
$$HRN^ASDUT LT+10
^DIC SC+1
^DIR SB+5, NWPG+2
$$VAL^XBDIQ1 AGE+1, PHONE+1
$$REPEAT^XLFSTR HD+7

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !
  • Line Location: SB+5
Function Call: WRITE
  • Prompt: !!,$E($P(^DPT(DFN,0),U),1,20),?22,$$HRN^ASDUT(DFN)
  • Line Location: LT+10
Function Call: WRITE
  • Prompt: ?32,$$AGE(DFN),?40,$$PHONE(DFN)
  • Line Location: LT+11
Function Call: WRITE
  • Prompt: ?56,$$DT($P(N,U,3)),?66,$$DT($P(N,U,6))
  • Line Location: LT+12
Function Call: WRITE
  • Prompt: ?76,$$PRV($P(N,U,7))
  • Line Location: LT+13
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: HD+1
Function Call: WRITE
  • Prompt: !?12,$$CONF^ASDUT
  • Line Location: HD+2
Function Call: WRITE
  • Prompt: !?2,"WAITING LIST for ",$P($G(^SC(+ASDC,0)),U)
  • Line Location: HD+3
Function Call: WRITE
  • Prompt: ?60,Y
  • Line Location: HD+4
Function Call: WRITE
  • Prompt: !!,"Patient",?22,"HRCN",?33,"Age",?40,"Phone",?56,"Dt Added"
  • Line Location: HD+5
Function Call: WRITE
  • Prompt: ?66,"Recall",?76,"Prov"
  • Line Location: HD+6
Function Call: WRITE
  • Prompt: !,$$REPEAT^XLFSTR("=",80)
  • Line Location: HD+7
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: NWPG+1
Routine Call
  • DIC
  • Line Location:
    • SC+1
Routine Call
  • DIR
  • Line Location:
    • SB+5
    • NWPG+2
Routine Call
  • %ZIS
  • Line Location:
    • SD+1

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^ASDWL - [#9009015] Classic Fileman Calls

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^ASDWL - [#9009015] LF+2, LF+3
^DD("DD" HD+4
^DPT - [#2] LT+10
^SC - [#44] HD+3
^TMP("ASDWL" ASDWL+3!, LF+4*, LT+3, LT+5, LT+7, LT+9, Q+1!
^VA(200 - [#200] PRV+1

Label References

Name Line Occurrences
$$AGE LT+11
$$DT LT+12
$$PHONE LT+11
$$PRV LT+13, SORT+1
$$SORT LF+4
HD EN+2, NWPG+1, NWPG+3
LF EN+2
LT EN+2
NWPG LT+8
Q A+4, A+6, EN+2
QUE A+6
SB A+3
SC A+2
SD A+4

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> %ZIS SD+1*
ASDC A+1~, SC+1*, LF+2, LF+3, LF+4, LT+3, LT+5, LT+7, LT+9, HD+3
ASDI LT+1~, LT+2*, LT+3*, LT+5, LT+7, LT+9
ASDJ LT+1~, LT+6*, LT+7*, LT+9
ASDQ LT+2*, LT+3, LT+5, LT+7, LT+8, Q+1!, NWPG+2*, NWPG+3
ASDS A+1~, SB+5*, LF+4
DFN LT+1~, LT+4*, LT+5*, LT+7, LT+9, LT+10, LT+11, AGE~, AGE+1, PHONE~
, PHONE+1
DIC SC+1!*
DIC(0 SC+1*
DIR SB+1!, SB+5!, Q+1!, NWPG+2!
DIR("A" SB+1*, SB+2*, SB+3*, SB+4*
DIR(0 SB+1*, NWPG+2*
>> DIRUT A+3
DT HD+4
I LF+1~, LF+2*, LF+3, LF+4
IO EN+1
IO("Q" A+6
IOF HD+1, NWPG+1
IOSL LT+8
IOST HD+1, NWPG+1
N LF+1~, LF+3*, LF+4, LT+9*, LT+12, LT+13, LT+14, SORT~, SORT+1, SORT+2
, SORT+3
POP A+4, Q+1!
S SORT~, SORT+1, SORT+2, SORT+3
U LT+3, LT+5, LT+7, LT+8, LT+10, LT+12, LT+13, LT+14, HD+3, PRV+1
, SORT+1, SORT+2, SORT+3
X NWPG+2, PRV~, PRV+1
Y A+2, SC+1, SB+5, HD+4*, DT~, DT+1
>> ZTDESC QUE+1*
>> ZTRTN QUE+1*
>> ZTSAVE("ASDC" QUE+2*
>> ZTSAVE("ASDS" QUE+2*
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Local Variables |  All