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 |  Label References |  Local Variables |  All
Print Page as PDF
Routine: ADE60P33

Package: IHS Dental System

Routine: ADE60P33


Information

ADE60P33 ;IHS/OIT/GAB - ADE V 6.0 PATCH 33 [ 10/12/2018 2:35 PM ]

Source Information

Source file <ADE60P33.m>

Call Graph

Call Graph Total: 6

Package Total Call Graph
IHS Dental System 3 ADDCDT33^ADE6P331  MODCDT33^ADE6P332  DELCDT33^ADE6P333  
Kernel 3 HOME^%ZIS  $$CJ^XLFSTR  BMES^XPDUTL  

Entry Points

Name Comments DBIA/ICR reference
POST ;EP Post-Install
; only post for patch 33 - /IHS/OIT/GAB *33* 10/2018
; Add new, modify and delete ADA Codes
SORRY(X) ;
ENV ;Environment check

External References

Name Field # of Occurrence
HOME^%ZIS ENV+1
ADDCDT33^ADE6P331 POST+5
MODCDT33^ADE6P332 POST+8
DELCDT33^ADE6P333 POST+11
$$CJ^XLFSTR SORRY+3
BMES^XPDUTL POST+4, POST+6, POST+7, POST+9, POST+10, POST+12

Interaction Calls

Name Line Occurrences
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

Label References

Name Line Occurrences
SORRY ENV+3, ENV+5, ENV+7

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
ADECNT POST+3~
ADED POST+3~
ADEVALUE POST+3~
DIFQ SORRY+1!
DUZ ENV+3
DUZ(0 ENV+5, ENV+7
IOM ENV+1
X SORRY~, SORRY+2
>> XPDQUIT SORRY+2*
>> ZTQUEUED ENV+7
Info |  Source |  Call Graph |  Entry Points |  External References |  Interaction Calls |  Label References |  Local Variables |  All