AUT98P25 ; IHS/OIT/FBD - AUT V98.1 PATCH 25 ENVIRONMENT CHECKS ;
Source file <AUT98P25.m>
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 |
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 | ;
|
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 |
Name | Line Occurrences |
---|---|
Function Call: WRITE |
|
Function Call: WRITE |
|
Routine Call |
|
Routine Call |
|
Routine Call |
|
Routine 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 |
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 |
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 |
>> | 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 |