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

Package: Utility Tables

Routine: AUT98P25


Information

AUT98P25 ; IHS/OIT/FBD - AUT V98.1 PATCH 25 ENVIRONMENT CHECKS ;

Source Information

Source file <AUT98P25.m>

Call Graph

Call Graph Total: 6

Package Total Call Graph
VA Fileman 3 (,IX)^DIC  FILE^DICN  (,UPDATE)^DIE  
Kernel 2 $$CJ^XLFSTR  ($$VERSION,MES)^XPDUTL  
IHS VA Utilities 1 $$VAL^XBDIQ1  

Entry Points

Name Comments DBIA/ICR reference
LANG ;PERFORM LANGUAGE FILE UPDATE(S)
ADDHF(VISIT,HF,HFDA) ;add this v health factor to visit
ECOG ;POPULATE ECOG CATEGORY & HEALTH FACTORS
CODE ;now update all HF Codes per Floyd's spreadsheet
HFDATA ;
INSTYP ;UPDATE INSURER TYPE FILE
IMES ;
SORRY(X) ;
INSTALLD(AUTSTAL) ;EP - Determine if patch AUTSTAL was installed, where
; AUTSTAL is the name of the INSTALL. E.g "AG*6.0*11".
GOTHF(VISIT,HF) ;is this hf already attached to this visit?
POST ;PATCH 25 POST-INIT PROCESS
HF ;

External References

Name Field # of Occurrence
^DIC INSTALLD+9, INSTALLD+12
IX^DIC INSTALLD+6
FILE^DICN LANG+3, HF+8, HF+12, HF+16, HF+38, ECOG+2, ECOG+5, INSTYP+2, CODE+13
^DIE HF+4, HF+21, HF+24, HF+27, HF+31, HF+34, HF+44, HF+49, HF+54, CODE+8
UPDATE^DIE ADDHF+27
$$VAL^XBDIQ1 HFDATA+6, HFDATA+12, HFDATA+18, GOTHF+3
$$CJ^XLFSTR AUT98P25+8, AUT98P25+9, AUT98P25+11, AUT98P25+12, AUT98P25+14, AUT98P25+15, IMES+1, SORRY+4
$$VERSION^XPDUTL AUT98P25+8, AUT98P25+11, AUT98P25+14
MES^XPDUTL AUT98P25+8, AUT98P25+9, AUT98P25+11, AUT98P25+12, AUT98P25+14, AUT98P25+15, LANG+1, LANG+4, LANG+5, HF+9
, HF+13, HF+17, HF+39, HF+43, HF+45, HF+48, HF+50, HF+53, HF+55, ECOG+3
, ECOG+6, INSTYP+3, CODE+14, ADDHF+28, IMES+1

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: "."
  • Line Location: ADDHF+29
Function Call: WRITE
  • Prompt: *7,!,$$CJ^XLFSTR("Sorry....FIX IT!",IOM)
  • Line Location: SORRY+4
Routine Call
  • DIE
  • Line Location:
    • ADDHF+27
Routine Call
  • DIE
  • Line Location:
    • HF+4
    • HF+21
    • HF+24
    • HF+27
    • HF+31
    • HF+34
    • HF+44
    • HF+49
    • HF+54
    • CODE+8
Routine Call
  • DIC
  • Line Location:
    • INSTALLD+9
    • INSTALLD+12
Routine Call
  • DIC
  • Line Location:
    • INSTALLD+6

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^DIC(9.4 - [#9.4] Classic Fileman Calls
^AUTTINTY - [#9999999.181] Classic Fileman Calls
^AUTTHF - [#9999999.64] Classic Fileman Calls
^AUTTLANG - [#9999999.99] Classic Fileman Calls

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^AUPNVHF - [#9000010.23] HFDATA+5, HFDATA+9, HFDATA+11, HFDATA+15, HFDATA+17, HFDATA+21, HFDATA+23, GOTHF+3, ADDHF+8, ADDHF+10
, ADDHF+11, ADDHF+12, ADDHF+13, ADDHF+14, ADDHF+15, ADDHF+16, ADDHF+17, ADDHF+18, ADDHF+19, ADDHF+20
, ADDHF+21, ADDHF+22, ADDHF+23, ADDHF+24, ADDHF+25, ADDHF+26
^AUPNVHF("AD" GOTHF+3
^AUPNVSIT - [#9000010] ADDHF+2
^AUTTHF - [#9999999.64] HF+4, HF+31, HF+34
^AUTTHF("B" HF+3, HF+7, HF+11, HF+15, HF+20, HF+23, HF+26, HF+30, HF+33, HF+37
, HF+42, HF+47, HF+52, ECOG+1, CODE+5, CODE+11, CODE+12, ADDHF+7
^AUTTINTY("B" INSTYP+1
^AUTTLANG("B" LANG+2
^AUTTXHF( CODE+1, CODE+2, CODE+3, CODE+4

Label References

Name Line Occurrences
$$GOTHF HFDATA+9, HFDATA+11, HFDATA+15, HFDATA+17, HFDATA+21, HFDATA+23
$$INSTALLD AUT98P25+17
ADDHF HFDATA+9, HFDATA+11, HFDATA+15, HFDATA+17, HFDATA+21, HFDATA+23
IMES INSTALLD+7, INSTALLD+10, INSTALLD+14
SORRY AUT98P25+8, AUT98P25+11, AUT98P25+14, AUT98P25+17

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> AUTC CODE+12*, CODE+13
>> AUTDA HFDATA+5*, HFDATA+6, HFDATA+9, HFDATA+11, HFDATA+12, HFDATA+15, HFDATA+17, HFDATA+18, HFDATA+21, HFDATA+23
AUTERRR ADDHF+4~, ADDHF+28
AUTFDA ADDHF+4~
AUTFDA( ADDHF+7*, ADDHF+8*, ADDHF+9*, ADDHF+10*, ADDHF+11*, ADDHF+12*, ADDHF+13*, ADDHF+14*, ADDHF+15*, ADDHF+16*
, ADDHF+17*, ADDHF+18*, ADDHF+19*, ADDHF+20*, ADDHF+21*, ADDHF+22*, ADDHF+23*, ADDHF+24*, ADDHF+25*, ADDHF+26*
>> AUTHF CODE+2*, CODE+5
>> AUTHFC CODE+3*, CODE+7
>> AUTHFN CODE+4*, CODE+7
AUTIENS ADDHF+4~, ADDHF+6*, ADDHF+7, ADDHF+8, ADDHF+9, ADDHF+10, ADDHF+11, ADDHF+12, ADDHF+13, ADDHF+14
, ADDHF+15, ADDHF+16, ADDHF+17, ADDHF+18, ADDHF+19, ADDHF+20, ADDHF+21, ADDHF+22, ADDHF+23, ADDHF+24
, ADDHF+25, ADDHF+26
>> AUTNEW HFDATA+8*, HFDATA+9, HFDATA+10*, HFDATA+11, HFDATA+14*, HFDATA+15, HFDATA+16*, HFDATA+17, HFDATA+20*, HFDATA+21
, HFDATA+22*, HFDATA+23, GOTHF+3
>> AUTPCX HF+36*, HF+37, HF+38, HF+39, HF+41*, HF+42, HF+43, HF+45, HF+46*, HF+47
, HF+48, HF+50, HF+51*, HF+52, HF+53, HF+55, ECOG+4*, ECOG+5, ECOG+6, CODE+1*
, CODE+2, CODE+3, CODE+4, CODE+14
AUTPIEN ADDHF+4~
AUTSTAL INSTALLD~, INSTALLD+4, INSTALLD+8, INSTALLD+11, IMES+1
AUTY INSTALLD+3~, INSTALLD+13*, INSTALLD+15
>> D INSTALLD+5*
DA HF+3*, HF+4!, HF+20*, HF+21!, HF+23*, HF+24!, HF+26*, HF+27!, HF+30*, HF+31!
, HF+33*, HF+34!, HF+42*, HF+43, HF+44!, HF+47*, HF+48, HF+49!, HF+52*, HF+53
, HF+54!, CODE+5*, CODE+6, CODE+7, CODE+9!
DIADD LANG+3*!, HF+8*!, HF+12*!, HF+16*!, HF+38*!, ECOG+2*!, ECOG+5*!, INSTYP+2*!, CODE+13*!
DIC LANG+3*!, HF+8*!, HF+12*!, HF+16*!, HF+38*!, ECOG+2*!, ECOG+5*!, INSTYP+2*!, CODE+13*!, INSTALLD+3~
, INSTALLD+5*, INSTALLD+8*, INSTALLD+11*
DIC("DR" LANG+3*, HF+8*, HF+12*, HF+16*, HF+38*, ECOG+2*, ECOG+5*, INSTYP+2*, CODE+13*
DIC(0 LANG+3*, HF+8*, HF+12*, HF+16*, HF+38*, ECOG+2*, ECOG+5*, INSTYP+2*, CODE+13*, INSTALLD+5*
DIE HF+4*!, HF+21*!, HF+24*!, HF+27*!, HF+31*!, HF+34*!, HF+44*!, HF+49*!, HF+54*!, CODE+7*
, CODE+9!
DIFQ SORRY+1!
DITC ADDHF+4~, ADDHF+5*
DLAYGO LANG+3*!, HF+8*!, HF+12*!, HF+16*!, HF+38*!, ECOG+2*!, ECOG+5*!, INSTYP+2*!, CODE+13*!
DR HF+4*!, HF+21*!, HF+24*!, HF+27*!, HF+31*!, HF+34*!, HF+44*!, HF+49*!, HF+54*!, CODE+7*
, CODE+9!
DT HF+4, HF+31, HF+34
G GOTHF+1~, GOTHF+2*, GOTHF+3*, GOTHF+4
HF GOTHF~, ADDHF~, ADDHF+7, ADDHF+28
HFDA ADDHF~, ADDHF+8, ADDHF+10, ADDHF+11, ADDHF+12, ADDHF+13, ADDHF+14, ADDHF+15, ADDHF+16, ADDHF+17
, ADDHF+18, ADDHF+19, ADDHF+20, ADDHF+21, ADDHF+22, ADDHF+23, ADDHF+24, ADDHF+25, ADDHF+26
IOM IMES+1, SORRY+4
U HF+4, HF+31, HF+34, HFDATA+9, HFDATA+11, HFDATA+15, HFDATA+17, HFDATA+21, HFDATA+23, CODE+2
, CODE+3, CODE+4, ADDHF+8, ADDHF+10, ADDHF+11, ADDHF+12, ADDHF+13, ADDHF+14, ADDHF+15, ADDHF+16
, ADDHF+17, ADDHF+18, ADDHF+19, ADDHF+20, ADDHF+21, ADDHF+22, ADDHF+23, ADDHF+24, ADDHF+25, ADDHF+26
VISIT GOTHF~, GOTHF+3, ADDHF~, ADDHF+1, ADDHF+2, ADDHF+9, ADDHF+28
X AUT98P25+6*, LANG+3*!, HF+8*!, HF+12*!, HF+16*!, HF+38*!, ECOG+2*!, ECOG+5*!, INSTYP+2*!, CODE+13*!
, GOTHF+1~, GOTHF+3*, INSTALLD+3~, INSTALLD+4*, INSTALLD+8*, INSTALLD+11*, SORRY~, SORRY+2, SORRY+3
>> XPDDIQ( AUT98P25+6*
>> XPDDIQ("XPZ1" AUT98P25+5*
>> XPDDIQ("XPZ2" AUT98P25+5*
>> XPDENV AUT98P25+5
>> XPDQUIT SORRY+2*, SORRY+3*
Y LANG+4, HF+9, HF+13, HF+17, HF+39, HF+45, HF+50, HF+55, ECOG+3, ECOG+6
, INSTYP+3, CODE+14, INSTALLD+3~, INSTALLD+7, INSTALLD+8, INSTALLD+10, INSTALLD+11, INSTALLD+13, IMES+1
Info |  Source |  Call Graph |  Entry Points |  External References |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Local Variables |  All