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 |  FileMan Files Accessed Via FileMan Db Call |  Label References |  Local Variables |  Marked Items |  All
Print Page as PDF
Routine: ADE60P26

Package: IHS Dental System

Routine: ADE60P26


Information

ADE60P26 ;IHS/OIT/GAB - ADE6.0 PATCH 26 [ 10/17/2014 2:35 PM ]

Source Information

Source file <ADE60P26.m>

Call Graph

Call Graph Total: 7

Package Total Call Graph
IHS Dental System 3 ADDCDT5^ADE6P261  MODCDT5^ADE6P262  DELCDT5^ADE6P263  
Kernel 3 HOME^%ZIS  $$CJ^XLFSTR  BMES^XPDUTL  
VA Fileman 1 FILE^DICN  

Entry Points

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

External References

Name Field # of Occurrence
HOME^%ZIS ENV+1
ADDCDT5^ADE6P261 POST+5
MODCDT5^ADE6P262 POST+8
DELCDT5^ADE6P263 POST+11
FILE^DICN ADDRVU+14
$$CJ^XLFSTR SORRY+3
BMES^XPDUTL POST+4, POST+6, POST+7, POST+9, POST+10, POST+12, POST+14, POST+18

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

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^ADEKOB - [#9002009.6] Classic Fileman Calls

Label References

Name Line Occurrences
ADDRVU POST+17
SORRY ENV+3, ENV+5, ENV+7

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
ADECNT POST+3~, POST+16*, ADDRVU+1*
ADED POST+3~, POST+15*, ADDRVU+2, ADDRVU+7, ADDRVU+8
ADEVALUE POST+3~, POST+17, ADDRVU+2*, ADDRVU+3, ADDRVU+7, ADDRVU+8
DA ADDRVU+4!
DD ADDRVU+13!
DIC ADDRVU+4!, ADDRVU+5*
DIC("DR" ADDRVU+9*, ADDRVU+10*, ADDRVU+11*, ADDRVU+12*
DIC(0 ADDRVU+6*
DIFQ SORRY+1!
>> DINUM ADDRVU+7*
DO ADDRVU+13!
DUZ ENV+3
DUZ(0 ENV+5, ENV+7
IOM ENV+1
X ADDRVU+4!, ADDRVU+8*, SORRY~, SORRY+2
>> XPDQUIT SORRY+2*
Y ADDRVU+4!
>> ZTQUEUED ENV+7

Marked Items

Name Field # of Occurrence
$T(@1+ADECNT ADDRVU+2
Info |  Source |  Call Graph |  Entry Points |  External References |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Label References |  Local Variables |  Marked Items |  All