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 |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All
Print Page as PDF
Routine: ADEXCOD

Package: IHS Dental System

Routine: ADEXCOD


Information

ADEXCOD ; IHS/HQT/MJL - UPDATE ADA CODE FILE ;08:42 PM [ 03/24/1999 9:04 AM ]

Source Information

Source file <ADEXCOD.m>

Call Graph

Call Graph Total: 3

Package Total Call Graph
VA Fileman 2 YN^DICN  IXALL^DIK  
IHS Dental System 1 ^ADEXCOD2  

Entry Points

Name Comments DBIA/ICR reference
END1
RESTYP ;Re-index DENTAL RESOURCE TYPE file
END
CTRL ;------->$O THRU TEMPFILE ^ADEXCOD AND GET CODE
TEXT
U1
UPDATE
A1
ADD
XREF
CONF

External References

Name Field # of Occurrence
^ADEXCOD2 CONF+6
YN^DICN CONF+2
IXALL^DIK RESTYP+5

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,*7,"The ADEXCOD global must be restored before installing the IHS DENTAL package.",!,"Please review the installation instructions."
  • Line Location: ADEXCOD+5
Function Call: WRITE
  • Prompt: !!,*7,"The CURRENT VERSION of the ADEXCOD global must be restored",!,"before installing the IHS DENTAL package. Please review the installation",!,"instructions."
  • Line Location: ADEXCOD+7
Function Call: WRITE
  • Prompt: !,"Did you back up the ^AUTTADA global before beginning this installation"
  • Line Location: CONF+1
Function Call: WRITE
  • Prompt: !?5,"Answer NO if you did not save a backup of the ^AUTTADA global before",!,"beginning this installation.",!
  • Line Location: CONF+3
Function Call: WRITE
  • Prompt: !!,"Back up ^AUTTADA before installing the IHS DENTAL package.",!,"Keep the backup on file."
  • Line Location: CONF+4
Function Call: WRITE
  • Prompt: !!,"CHECKING FOR DUPLICATE CODES AND REINDEXING"
  • Line Location: CONF+5
Function Call: WRITE
  • Prompt: !!,"UPDATING ADA CODE FILE NOW."
  • Line Location: CONF+7
Function Call: WRITE
  • Prompt: "."
  • Line Location: CTRL+2
Function Call: WRITE
  • Prompt: !,"ADA CODE File update done!"
  • Line Location: END+0
Function Call: WRITE
  • Prompt: !!,"Re-indexing the DENTAL RESOURCE TYPE file - please wait.",!
  • Line Location: RESTYP+2

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^ADERSCT - [#9002010.05] Classic Fileman Calls

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^ADERSCT - [#9002010.05] RESTYP+1
^ADERSCT("B" RESTYP+3!
^ADEXCOD ADEXCOD+4, U1+6, U1+14, U1+15, U1+17, U1+18, A1+2, A1+12, A1+13, A1+15
, A1+16, TEXT+4
^ADEXCOD("B" CTRL+1, CTRL+2
^ADEXCOD(0 ADEXCOD+6
^AUTTADA - [#9999999.31] U1+3, U1+4, U1+12*, U1+14!*, U1+16!, U1+21*, A1, A1+9*, A1+13*, A1+19*
, TEXT+4*, XREF, XREF+1
^AUTTADA("B" CTRL+4, U1, U1+1, U1+16!, U1+21*, A1+11*, A1+19*
^AUTTADA("BA" XREF+2*
^AUTTADA("C" U1+3!, XREF*
^AUTTADA("D" U1+4!, XREF+1*
^AUTTADA(0 ADD, A1+20*
^DD(9999999.31 CONF+11

Label References

Name Line Occurrences
A1 A1
ADD CTRL+6
CONF CONF+3
CTRL CTRL+4, CTRL+6
END CTRL+1
END1 ADEXCOD+4, ADEXCOD+6, CONF+4
TEXT U1+15, A1+14
U1 U1+1
UPDATE CTRL+4
XREF U1+13, A1+10

Naked Globals

Name Field # of Occurrence
^(0 A1+20*
^(88 U1+16, U1+17, A1+15

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> % CONF*, CONF+3, CONF+4
ADECOD CONF+12*, CTRL+1*, CTRL+2, CTRL+4, END1!, U1, U1+1, A1+11, XREF+2
ADENOD END1!, U1+6*, U1+8, A1+2*, A1+5
ADEODFN END1!, UPDATE*, U1*, U1+1, U1+3, U1+4, U1+12, U1+14, U1+16, U1+21
, ADD*, A1*, A1+9, A1+11, A1+13, A1+19, A1+20, TEXT+4, XREF, XREF+1
, XREF+2
ADEOMN END1!, U1+16*
ADERROR END1!
>> ADETXT TEXT*, TEXT+4*
ADEX CONF+11*, END1!, U1+7*, U1+8, U1+11, U1+12, A1+4*, A1+5, A1+8, A1+9
ADEXFRM END1!
ADEXFRM( CONF+11*, U1+11, A1+8
ADEXFRM(10 U1+19, A1+17
ADEXFRM(8 CONF+12*, A1+3*
ADEY CONF+10*, CONF+11*, END1!
ADEZDFN CTRL+2*, END1!, U1+6, U1+14, U1+15, U1+17, U1+18, A1+2, A1+12, A1+13
, A1+15, A1+16, TEXT+4
DIFQ ADEXCOD+4!, ADEXCOD+6!, CONF+4!
>> DIK RESTYP+4*
U ADEXCOD+3*, ADEXCOD+6, CONF+11, U1+3, U1+4, U1+8, U1+12, ADD, A1+5, A1+9
, A1+20, XREF, XREF+1
>> X U1+8*, U1+9, U1+10, U1+12, U1+18*, U1+20, U1+21, A1+5*, A1+6, A1+7
, A1+9, A1+16*, A1+18, A1+19
Info |  Source |  Call Graph |  Entry Points |  External References |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All