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

Package: IHS Changes To ADT

Routine: ADGLOC0


Information

ADGLOC0 ; IHS/ADC/PDW/ENM - LOCATOR CARD ; [ 03/25/1999 11:48 AM ]

Source Information

Source file <ADGLOC0.m>

Call Graph

Call Graph Total: 6

Package Total Call Graph
Kernel 3 ^%ZIS  ^%ZISC  ^%ZTLOAD  
VA Fileman 2 ^DIC  ^DIR  
IHS Changes To ADT 1 ^ADGLOC1  

Caller Graph

Caller Graph Total: 2

Package Total Caller Graph
IHS Changes To ADT 1 ADGEVNT  
Registration 1 DG IHS LOCATOR  

Entry Points

Name Comments DBIA/ICR reference
A ;EP; -- main
Q ; -- cleanup
EN(DFN,IFN)
DEV ; -- select device
1 ; -- admission
QUE ; -- queued output
ASK ; -- print?

External References

Name Field # of Occurrence
^%ZIS DEV+1
^%ZISC QUE+3, Q+1
^%ZTLOAD QUE+3
^ADGLOC1 A+5
^DIC ADGLOC0+5
^DIR ASK+2, 1+8

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !?5,"No admissions on file."
  • Line Location: 1+2
Function Call: WRITE
  • Prompt: !!,"Admission(s)"
  • Line Location: 1+3
Function Call: WRITE
  • Prompt: !?5,I,". ",Y
  • Line Location: 1+6
Function Call: WRITE
  • Prompt: !
  • Line Location: DEV+1
Routine Call
  • DIC
  • Line Location:
    • ADGLOC0+5
Routine Call
  • DIR
  • Line Location:
    • ASK+2
    • 1+8
Routine Call
  • %ZIS
  • Line Location:
    • DEV+1

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^DPT - [#2] Classic Fileman Calls

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DD("DD" 1+6
^DGPM - [#405] 1+6
^DGPM("APCA" 1+2
^DGPM("ATID1" 1+4, 1+5

Label References

Name Line Occurrences
@( A+2
A EN+1
DEV A+3
Q ADGLOC0+5, A+2, A+3, A+4, A+5
QUE A+4

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> %ZIS DEV+1*
DFN ADGLOC0+3~, ADGLOC0+5*, EN~, 1+2, 1+4, 1+5
DIC ADGLOC0+4*, ADGLOC0+5!
DIC("A" ADGLOC0+4*
DIC(0 ADGLOC0+4*
DIR 1+8!
DIR("A" ASK+1*, 1+8*
DIR("B" ASK+1*, 1+8*
DIR(0 ASK+1*, 1+8*
>> DIRUT 1+10
I 1+1~, 1+3*, 1+6*, 1+7, 1+8, QUE+2~*
ID 1+1~, 1+4*, 1+5
IFN ADGLOC0+3~, A+1*, A+2, EN~, ASK+2*, 1+2*, 1+5*, 1+6, 1+7*, 1+9*
, 1+10*, 1+11*
IO("Q" A+4, QUE+3!
J 1+1~
J( 1+6*, 1+7, 1+11
J(1 1+9
>> POP A+3
X A+2~*, 1+1~, 1+11
Y ADGLOC0+3~, ADGLOC0+5, ASK+2, 1+1~, 1+6*, 1+9, 1+10
>> ZTDESC QUE+1*
>> ZTRTN QUE+1*
>> ZTSAVE( QUE+2*
ZTSK QUE+3!
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