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

Package: IHS Dental System

Routine: ADEPRE28


Information

ADEPRE28 ; IHS/OIT/GAB - ADE6.0 PATCH 28 ENVIRONMENT CHECK [ 07/02/2015 16:43 PM ]

Source Information

Source file <ADEPRE28.m>

Call Graph

Call Graph Total: 3

Package Total Call Graph
Kernel 2 HOME^%ZIS  $$CJ^XLFSTR  
IHS VA Utilities 1 $$DIR^XBDIR  

Entry Points

Name Comments DBIA/ICR reference
GETUP(ADEMSG,ADEACT)
SORRY(X) ;
ENV ;Environment check

External References

Name Field # of Occurrence
HOME^%ZIS ENV+1
$$DIR^XBDIR GETUP+5
$$CJ^XLFSTR GETUP+4, GETUP+5, SORRY+3

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,$$CJ^XLFSTR(ADEMSG,IOM)
  • Line Location: GETUP+4
Function Call: WRITE
  • Prompt: *7,!,$$CJ^XLFSTR("Sorry.....",IOM),$$DIR^XBDIR("E","Press Return")
  • Line Location: GETUP+5
Function Call: WRITE
  • Prompt: !,"YOUR DUZ VARIABLE IS UNDEFINED!! Please login with your Access & Verify."
  • Line Location: ENV+3
Function Call: WRITE
  • Prompt: !,"Your DUZ(0) VARIABLE IS UNDEFINED OR NULL."
  • Line Location: ENV+5
Function Call: WRITE
  • Prompt: *7,!,$$CJ^XLFSTR("Sorry....Please fix it.",40)
  • Line Location: SORRY+3
Routine Call
  • %ZIS
  • Line Location:
    • ENV+1

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^%ZOSF("TEST" ADEPRE28+3

Label References

Name Line Occurrences
ENV ADEPRE28+5
GETUP ADEPRE28+4
SORRY ENV+3, ENV+5, ENV+7

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
ADEACT GETUP~, GETUP+3
ADEMSG ADEPRE28+4*, GETUP~, GETUP+4
DIFQ GETUP+2!, SORRY+1!
DUZ ENV+3
DUZ(0 ENV+5, ENV+7
IOM GETUP+4, GETUP+5, ENV+1
X ADEPRE28+3*, SORRY~, SORRY+2
>> XPDQUIT GETUP+3*, SORRY+2*
>> ZTQUEUED ENV+7
Info |  Source |  Call Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Local Variables |  All