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

Package: IHS Dental System

Routine: ADE60P32


Information

ADE60P32 ;IHS/OIT/GAB - ADE V 6.0 PATCH 32 [ 10/12/2017 2:35 PM ]

Source Information

Source file <ADE60P32.m>

Call Graph

Call Graph Total: 6

Package Total Call Graph
IHS Dental System 3 ADDCDT32^ADE6P321  MODCDT32^ADE6P322  DELCDT32^ADE6P323  
Kernel 3 HOME^%ZIS  $$CJ^XLFSTR  BMES^XPDUTL  

Entry Points

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

External References

Name Field # of Occurrence
HOME^%ZIS ENV+1
ADDCDT32^ADE6P321 POST+5
MODCDT32^ADE6P322 POST+8
DELCDT32^ADE6P323 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