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 |  Naked Globals |  Local Variables |  All
Print Page as PDF
Routine: ADGPTLQ

Package: IHS Changes To ADT

Routine: ADGPTLQ


Information

ADGPTLQ ; IHS/ADC/PDW/ENM - QUEUE PATIENT LIST ; [ 03/25/1999 11:48 AM ]

Source Information

Source file <ADGPTLQ.m>

Call Graph

Call Graph Total: 5

Package Total Call Graph
Kernel 3 (,HOME)^%ZIS  ^%ZISC  ^%ZTLOAD  
IHS Changes To ADT 1 ^ADGPTLC  
VA Fileman 1 ^DIR  

Caller Graph

Caller Graph Total: 1

Package Total Caller Graph
Registration 1 DG IHS INPAT LIST BY WARD  

Entry Points

Name Comments DBIA/ICR reference
END
DEV
QUE
SELECT
WARD
SELECT1

External References

Name Field # of Occurrence
^%ZIS DEV
HOME^%ZIS END
^%ZISC QUE+2
^%ZTLOAD QUE+2
^ADGPTLC DEV
^DIR SELECT1, WARD+1, WARD+3

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: @IOF,!!!!,"Print Patient List: ",!
  • Line Location: SELECT+0
Function Call: WRITE
  • Prompt: *7,?40,"** INACTIVE WARD **"
  • Line Location: WARD+4
Routine Call
  • %ZIS
  • Line Location:
    • END
Routine Call
  • DIR
  • Line Location:
    • SELECT1
    • WARD+1
    • WARD+3
Routine Call
  • %ZIS
  • Line Location:
    • DEV

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DIC(42 - [#42] WARD+4

Label References

Name Line Occurrences
DEV SELECT1+3, WARD+2
END SELECT1+1, DEV
QUE DEV
SELECT SELECT1+1, WARD+1
WARD WARD+3, WARD+4

Naked Globals

Name Field # of Occurrence
^("I" WARD+4

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> %ZIS DEV*
DGO SELECT1+1*, SELECT1+3, END!
DGWST SELECT1+3*, WARD+2*, WARD+5*, END!
DIR SELECT+1!, WARD!, WARD+3!, END!
DIR("A" SELECT+1*, SELECT+2*, SELECT+3*, SELECT+4*, SELECT+5*, SELECT1*, WARD*
DIR("B" WARD*
DIR(0 SELECT1*, WARD*, WARD+3*
>> DIRUT SELECT1+1, WARD+3
>> DTOUT WARD+1
>> DUOUT WARD+1
IO("Q" DEV, QUE!
IOF SELECT
>> POP DEV
U WARD+4
Y SELECT1+1, WARD+2, WARD+3, WARD+4, WARD+5, END!
>> ZTDESC QUE*
>> ZTRTN QUE*
>> ZTSAVE("DGO" QUE+1*
>> ZTSAVE("DGWST" QUE+1*
ZTSK QUE+2!
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All