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

Package: IHS Dental System

Routine: ADEGRL0


Information

ADEGRL0 ; IHS/HQT/MJL - DENTAL ENTRY PART 1.5 ;04:55 PM [ 03/24/1999 9:04 AM ]

Source Information

Source file <ADEGRL0.m>

Call Graph

Call Graph Total: 1

Package Total Call Graph
IHS VA Utilities 1 ^XBKVAR  

Caller Graph

Caller Graph Total: 2

Package Total Caller Graph
IHS Dental System 2 ADEGRL  ADEGRL1  

Entry Points

Name Comments DBIA/ICR reference
INIT ;EP
UNIV(ADEFACD) ;EP - Returns 0 if local facility has no entry in UNIVERSAL LOOKUP
WARN(ADEFACD) ;

External References

Name Field # of Occurrence
^XBKVAR INIT+5

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,"SIGN-ON FACILITY NOT SET IN USER FILE. CONTACT SITE MANAGER"
  • Line Location: INIT+3
Function Call: WRITE
  • Prompt: !,"DIVISION NOT SET IN USER FILE -- CONTACT SITE MANAGER OR ISC"
  • Line Location: INIT+5
Function Call: WRITE
  • Prompt: !,*7,"UNIVERSAL LOOKUP FOR VISITS field in the RPMS SITE file",!,"has no entry. Contact your site manager."
  • Line Location: INIT+10
Function Call: WRITE
  • Prompt: !,"FileMan Access Undefined. Contact site manger."
  • Line Location: INIT+11
Function Call: WRITE
  • Prompt: !,"FileMan Access denied. Contact site manager."
  • Line Location: INIT+12
Function Call: WRITE
  • Prompt: !,*7,"UNIVERSAL LOOKUP field value for this local facility not entered."
  • Line Location: UNIV+9
Function Call: WRITE
  • Prompt: *7,!!,"Dental Site Parameter File has not been set up properly or fully"
  • Line Location: WARN+1
Function Call: WRITE
  • Prompt: !,"for ",$P(^AUTTLOC(ADEFACD,0),U,2)
  • Line Location: WARN+2
Function Call: WRITE
  • Prompt: ".",!,"Consult the DDS Documentation, the Help Frames, or your Site Manager.",!!
  • Line Location: WARN+3

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^ADEPARAM - [#9002006] INIT+7, INIT+8, INIT+9, UNIV+9, UNIV+11
^ADEPARAM("AB" UNIV+6, UNIV+7, UNIV+8
^ADEUTL($J INIT+4*
^AUTTLOC - [#9999999.06] WARN+2
^AUTTSITE(1 INIT+6, INIT+7, INIT+10, UNIV+5

Label References

Name Line Occurrences
WARN INIT+7, INIT+8, INIT+9, UNIV+6, UNIV+7

Naked Globals

Name Field # of Occurrence
^(0 INIT+9

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> ADECON INIT+2*
ADEDFN UNIV+4~, UNIV+8*, UNIV+9, UNIV+11
>> ADEDIR INIT+2*
ADEFACD UNIV~, UNIV+6, UNIV+7, UNIV+8, UNIV+12, WARN~, WARN+2
>> ADEFAST INIT+13*
ADELIN INIT+13!*
ADESITE UNIV+4~, UNIV+5*, UNIV+7, UNIV+8, UNIV+9, UNIV+11
>> AUPNLK("ALL" UNIV+10!, UNIV+11*
DUZ(0 INIT+11, INIT+12
DUZ(2 INIT+3, INIT+4, INIT+5, INIT+6*, INIT+8, INIT+9, UNIV+12*
U INIT+9, INIT+10, UNIV+9, UNIV+11, WARN+2
>> Y INIT+1*, INIT+14*
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All