AUMUPD2 ;IHS/OIT/NKD - SCB UPDATE 05/23/2012 ;
Source file <AUMUPD2.m>
Package | Total | Call Graph |
---|---|---|
VA Fileman | 4 | (FIND,IX)^DIC FILE^DICN (,UPDATE,WP)^DIE ^DIK |
Kernel | 2 | ($$LJ,$$REPEAT)^XLFSTR MES^XPDUTL |
Table Maintenance | 1 | TEXT^AUMUPD4 |
Name | Comments | DBIA/ICR reference |
---|---|---|
COMINAC | ;INACTIVATE COMMUNITY
|
|
HFFR | ;EP --- HEALTH FACTOR FROM
|
|
DIK | ;--- KILL ENTRY
|
|
DIE | ;----- DIE EDIT
|
|
ADDINST | ;EP --- Add institute
|
|
RESNEW | ; NEW RESERVATION
|
|
PCLASNEW | ;EP --- NEW PROV CLASS
|
|
FILE | ;--- FILE NEW ENTRY
|
|
ADDPCLAS | ;
|
|
HFMOD | ;EP --- MODIFY HEALTH FACTOR
|
|
RESMOD | ;EP --- CONT EDIT RESERVATION ENTRY
|
|
HFINA | ;EP --- INACTIVATE HEALTH FACTOR
|
|
PCLASFR | ;EP - provider class from
|
|
EDUCNEW | ;EP --- NEW PATIENT ED- P&F
|
|
RESMOD2 | ;
|
|
ADDFAIL | ;----- "FAILED" MESSAGE
|
|
DELSTNM | ;EP --- Remove station number
|
|
TRIBENEW | ;EP --- NEW TRIBE
|
|
ADDOK | ;----- "ADDED" MESSAGE
|
|
MODOK | ;--- IF MOD OK
|
|
EXAMINA | ;EP - inactivate exam
|
|
RSLT(%) | ;--- ISSUE MESSAGES DURING INSTALL
|
|
ADDEXAM | ;
|
|
TRIBEMOD | ;EP --- MOD TRIBE
; C=CODE, N=NAME, LN=LONG NAME, P=IEN |
|
PCLASMOD | ;EP
|
|
IXDIC(DIC,DIC0,D,X,DLAYGO) | ||
DASH | ;----- PRT DASH LINE
|
|
MEASMOD | ;EP --- UPDATE MEASUREMENT TYPE
|
|
CNTYDEL | ; County Delete
; Temporary action to physically remove a county entry |
|
EXAMFR | ;EP - exam from
|
|
RESFR | ;EP --- EDIT RESERVATION ENTRY
|
|
TRIBEFR | ;EP --- tribe from
|
|
EXAMMOD | ;EP - modify exam file
|
|
ADDTRIBE | ;
|
|
ADDEDUC | ;--- ADD THE NEW PATIENT EDUCATION
|
|
ADDHF | ;
|
|
SVARS | ;;A,C,E,F,L,M,N,O,P,R,S,T,V;Single-character work variables
|
|
M(%) | ;--- ERROR MESSAGE
|
|
EXAMNEW | ;EP --- NEW EXAM
|
|
HFNEW | ;EP --- NEW HEALTH FACTORS
|
|
ADDSTNM | ;EP --- Add station number
|
|
INSMOD | ;EP - update insurer type
|
Name | Field # of Occurrence |
---|---|
TEXT^AUMUPD4 | MEASMOD+35 |
FIND^DIC | MEASMOD+7, INSMOD+7 |
IX^DIC | IXDIC+6 |
FILE^DICN | FILE+4 |
^DIE | DIE+4, EXAMINA+7, HFINA+8, PCLASMOD+9 |
UPDATE^DIE | MEASMOD+19, MEASMOD+31, INSMOD+16, INSMOD+25 |
WP^DIE | MEASMOD+36 |
^DIK | DIK+2, CNTYDEL+9 |
$$LJ^XLFSTR | ADDTRIBE+2 |
$$REPEAT^XLFSTR | DASH+2 |
MES^XPDUTL | RSLT+2 |
FileNo | Call Tags |
---|---|
^DIC(4 - [#4] | Classic Fileman Calls |
^DIC(7 - [#7] | Classic Fileman Calls |
^AUTTTRI - [#9999999.03] | Classic Fileman Calls |
^AUTTCOM - [#9999999.05] | Classic Fileman Calls |
^AUTTMSR - [#9999999.07] | FIND^DIC, WP^DIE |
^AUTTEXAM - [#9999999.15] | Classic Fileman Calls |
^AUTTINTY - [#9999999.181] | FIND^DIC |
^AUTTCTY - [#9999999.23] | Classic Fileman Calls |
^AUTTRES - [#9999999.47] | Classic Fileman Calls |
^AUTTHF - [#9999999.64] | Classic Fileman Calls |
^AUTTEDPF - [#9999999.98] | Classic Fileman Calls |
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^AUTTCOM("C" | COMINAC+2, COMINAC+3 |
^AUTTCTY("C" | CNTYDEL+5 |
^AUTTEDPF("B" | ADDEDUC+2 |
^AUTTEXAM("C" | ADDEXAM+2, EXAMMOD+3, EXAMMOD+6, EXAMINA+4 |
^AUTTHF - [#9999999.64] | HFMOD+8*, HFMOD+9* |
^AUTTHF("B" | ADDHF+3, HFMOD+4, HFMOD+6, HFINA+5 |
^AUTTINTY - [#9999999.181] | INSMOD+20, INSMOD+26 |
^AUTTLOC - [#9999999.06] | ADDSTNM+8, DELSTNM+8 |
^AUTTLOC("C" | ADDSTNM+6, DELSTNM+6 |
^AUTTMSR - [#9999999.07] | MEASMOD+23, MEASMOD+32 |
^AUTTRES("B" | RESNEW+6, RESMOD+4, RESMOD2+1 |
^AUTTRES("C" | RESNEW+6, RESMOD+4, RESMOD2+1 |
^AUTTTRI("C" | TRIBEMOD+4, TRIBEMOD+7, ADDTRIBE+3 |
^DIC(4 - [#4] | ADDINST+4, ADDSTNM+10, DELSTNM+10 |
^DIC(7 - [#7] | ADDPCLAS+3, PCLASMOD+5 |
Name | Line Occurrences |
---|---|
$$M | ADDFAIL+1, DIE+3, ADDEXAM+2, ADDEDUC+2, ADDHF+3, ADDPCLAS+3, PCLASMOD+10, RESNEW+6, TRIBEMOD+14, ADDTRIBE+4 , ADDINST+5, ADDINST+10 |
@( | ADDEXAM+6, ADDEDUC+6, ADDHF+7, ADDPCLAS+6, MEASMOD+38, RESNEW+10, ADDTRIBE+10, INSMOD+28 |
ADDEDUC | EDUCNEW+4 |
ADDEXAM | EXAMNEW+4, EXAMMOD+7 |
ADDFAIL | MEASMOD+20, INSMOD+17 |
ADDHF | HFNEW+4, HFMOD+7 |
ADDPCLAS | PCLASNEW+6, PCLASMOD+6 |
ADDTRIBE | TRIBEMOD+8, TRIBENEW+2 |
DIE | EXAMMOD+9, HFMOD+12, RESMOD2+5, COMINAC+5, TRIBEMOD+13, ADDINST+13, ADDSTNM+16, DELSTNM+16 |
FILE | ADDEXAM+5, ADDEDUC+5, ADDHF+6, ADDPCLAS+5, RESNEW+9, ADDTRIBE+9, ADDINST+10 |
MODOK | EXAMMOD+11, HFMOD+14, PCLASMOD+11 |
RESNEW | RESMOD2+2 |
RSLT | ADDOK+1, ADDFAIL+1, DASH+1, DASH+2, DASH+3, DIE+3, MODOK+1, EXAMNEW+1, EXAMNEW+2, EXAMNEW+3 , ADDEXAM+2, EXAMMOD+10, EXAMINA+1, EXAMINA+8, EXAMINA+9, EDUCNEW+1, EDUCNEW+2, EDUCNEW+3, ADDEDUC+2, HFNEW+1 , ADDHF+3, HFMOD+13, HFINA+1, HFINA+9, HFINA+10, PCLASNEW+3, ADDPCLAS+3, PCLASMOD+1, PCLASMOD+10, MEASMOD+2 , MEASMOD+13, RESNEW+3, RESNEW+6, RESFR+2, RESMOD2+6, RESMOD2+7, COMINAC+2, COMINAC+6, COMINAC+7, CNTYDEL+2 , CNTYDEL+6, CNTYDEL+10, CNTYDEL+11, TRIBEMOD+2, TRIBEMOD+14, TRIBEMOD+15, TRIBENEW+1, ADDTRIBE+4, ADDINST+2, ADDINST+5 , ADDINST+10, ADDINST+11, ADDSTNM+2, ADDSTNM+7, ADDSTNM+17, ADDSTNM+18, DELSTNM+2, DELSTNM+7, DELSTNM+17, DELSTNM+18 , INSMOD+2 |
SVARS | DIE+1, DIK+1, FILE+1, RSLT+1, IXDIC+2 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
% | M~, M+1, RSLT~, RSLT+2, ADDTRIBE+3*, ADDTRIBE+4, ADDINST+4*, ADDINST+5, ADDINST+7, ADDINST+13 |
>> A | ADDPCLAS+1*, ADDPCLAS+2, ADDPCLAS+4, PCLASMOD+2*, PCLASMOD+4*, PCLASMOD+7, PCLASMOD+8, RESNEW+4*, RESNEW+5, RESNEW+8 , RESMOD+5*, RESMOD2+4, RESMOD2+7, COMINAC+1*, CNTYDEL+4* |
>> ASUFAC | ADDSTNM+3*, ADDSTNM+6, ADDSTNM+18, DELSTNM+3*, DELSTNM+6, DELSTNM+18 |
AUMACT | MEASMOD+1~, MEASMOD+4*, MEASMOD+12, MEASMOD+29, MEASMOD+38 |
AUMCHG | MEASMOD+1~, MEASMOD+21*, MEASMOD+32*, MEASMOD+38, INSMOD+1~, INSMOD+18*, INSMOD+26*, INSMOD+28 |
AUMCNT | MEASMOD+1~, MEASMOD+8*, MEASMOD+9, MEASMOD+10, MEASMOD+11, INSMOD+1~, INSMOD+8*, INSMOD+9, INSMOD+10, INSMOD+11 |
AUMCOD | MEASMOD+1~, MEASMOD+4*, MEASMOD+5, MEASMOD+7, MEASMOD+18, MEASMOD+28, INSMOD+1~, INSMOD+4*, INSMOD+5, INSMOD+7 , INSMOD+15, INSMOD+24 |
AUMD0 | MEASMOD+1~, MEASMOD+23*, MEASMOD+32, INSMOD+1~, INSMOD+20*, INSMOD+26 |
AUMDES | MEASMOD+1~, MEASMOD+4*, MEASMOD+5, MEASMOD+17, MEASMOD+27 |
AUMFLG | RESNEW+2, RESNEW+11!, RESFR+1*, RESMOD2+2* |
AUMHTXT | MEASMOD+1~, MEASMOD+4*, MEASMOD+35 |
AUMIEN | MEASMOD+1~, MEASMOD+3*, MEASMOD+9*, MEASMOD+10*, MEASMOD+11*, MEASMOD+12, MEASMOD+14, MEASMOD+21*, MEASMOD+22, MEASMOD+23 , MEASMOD+26, MEASMOD+27, MEASMOD+28, MEASMOD+29, MEASMOD+30, MEASMOD+32, MEASMOD+36, INSMOD+1~, INSMOD+3*, INSMOD+9* , INSMOD+10*, INSMOD+11*, INSMOD+12, INSMOD+18*, INSMOD+19, INSMOD+20, INSMOD+23, INSMOD+24, INSMOD+26 |
AUMINP | MEASMOD+1~, MEASMOD+4*, MEASMOD+30 |
AUMNAM | INSMOD+1~, INSMOD+4*, INSMOD+5, INSMOD+14, INSMOD+23 |
AUMRES | MEASMOD+1~, MEASMOD+6!, INSMOD+1~, INSMOD+6! |
AUMRES("DILIST" | MEASMOD+8, MEASMOD+10, MEASMOD+11, INSMOD+8, INSMOD+10, INSMOD+11 |
AUMTYP | MEASMOD+1~, MEASMOD+4*, MEASMOD+5, MEASMOD+16, MEASMOD+26 |
>> C | ADDEXAM+1*, ADDEXAM+2, ADDEXAM+4, EXAMMOD+2*, EXAMMOD+3, EXAMMOD+5*, EXAMMOD+6, EXAMMOD+8, EXAMINA+3*, EXAMINA+4 , EXAMINA+9, ADDEDUC+1*, ADDEDUC+4, ADDHF+1*, ADDHF+2, ADDHF+5, HFMOD+5*, HFMOD+11, ADDPCLAS+1*, ADDPCLAS+2 , ADDPCLAS+3, ADDPCLAS+4, PCLASMOD+2*, PCLASMOD+4*, PCLASMOD+5, PCLASMOD+7, PCLASMOD+8, RESNEW+4*, RESNEW+5, RESNEW+6 , RESNEW+8, RESMOD+2*, RESMOD+3, RESMOD+4, RESMOD+5*, RESMOD2+1, RESMOD2+4, RESMOD2+7, COMINAC+1*, COMINAC+2 , COMINAC+3, CNTYDEL+4*, CNTYDEL+5, TRIBEMOD+3*, TRIBEMOD+4, TRIBEMOD+6*, TRIBEMOD+7, TRIBEMOD+9, TRIBEMOD+12, ADDTRIBE+1* , ADDTRIBE+2, ADDTRIBE+3, ADDTRIBE+8 |
D | IXDIC~, ADDHF+1*, ADDHF+2, ADDHF+5, HFMOD+5*, HFMOD+11, HFINA+3*, HFINA+4, HFINA+7 |
>> DA | DIE+2, DIE+3, DIE+5, EXAMMOD+3*, EXAMMOD+6*, EXAMMOD+7, EXAMINA+4*, HFMOD+4*, HFMOD+6*, HFMOD+7 , HFMOD+8, HFMOD+9, HFINA+5*, PCLASMOD+8*, RESMOD+4*, RESMOD2+1*, RESMOD2+2, COMINAC+3*, CNTYDEL+8*, TRIBEMOD+11* , ADDINST+13*, ADDSTNM+12*, DELSTNM+12* |
DD | FILE+2! |
DIC | FILE+5!, IXDIC~, ADDEXAM+3*, ADDEDUC+3*, ADDHF+4*, ADDPCLAS+4*, RESNEW+7*, ADDTRIBE+6*, ADDINST+7* |
DIC("DR" | ADDEXAM+4*, ADDEDUC+4*, ADDHF+5*, ADDPCLAS+4*, RESNEW+8*, ADDTRIBE+8* |
DIC(0 | FILE+3*, IXDIC+3* |
DIC0 | IXDIC~, IXDIC+3, IXDIC+4! |
>> DIE | DIE+2, DIE+3, DIE+5, EXAMMOD+9*, EXAMINA+5*, HFMOD+10*, HFINA+6*, PCLASMOD+8*, RESMOD2+3*, COMINAC+4* , TRIBEMOD+10*, ADDINST+13*, ADDSTNM+14*, DELSTNM+14* |
DIK | DIK+1~, CNTYDEL+7* |
DINUM | ADDINST+7*, ADDINST+12! |
DLAYGO | FILE+5!, IXDIC~, IXDIC+5!, ADDEXAM+3*, ADDEXAM+7!, ADDEDUC+3*, ADDHF+4*, ADDPCLAS+4*, RESNEW+7*, ADDTRIBE+5* , ADDINST+7*, ADDINST+12! |
DO | FILE+2! |
>> DR | EXAMMOD+9*, EXAMINA+6*, HFMOD+11*, HFINA+7*, PCLASMOD+8*, RESMOD2+4*, COMINAC+4*, TRIBEMOD+12*, ADDINST+13*, ADDSTNM+13* , DELSTNM+13* |
DT | COMINAC+4 |
>> E | EXAMMOD+1*, EXAMMOD+10, HFMOD+1*, HFMOD+13, PCLASNEW+2*, PCLASNEW+3 |
ERR | MEASMOD+1~, MEASMOD+15!, MEASMOD+20, INSMOD+1~, INSMOD+13!, INSMOD+17 |
FDA | MEASMOD+1~, MEASMOD+15!, MEASMOD+25!, INSMOD+1~, INSMOD+13!, INSMOD+22! |
FDA( | MEASMOD+16*, MEASMOD+17*, MEASMOD+18*, MEASMOD+26*, MEASMOD+27*, MEASMOD+28*, MEASMOD+29*, MEASMOD+30*, INSMOD+14*, INSMOD+15* , INSMOD+23*, INSMOD+24* |
>> I | PCLASMOD+4*, PCLASMOD+8 |
>> II | PCLASMOD+4*, PCLASMOD+8 |
>> INSNAM | ADDINST+3*, ADDINST+7, ADDINST+11, ADDSTNM+3*, ADDSTNM+18, DELSTNM+3*, DELSTNM+18 |
IOM | DASH+2 |
>> L | ADDOK+1, ADDFAIL+1, MODOK+1, ADDEXAM+1*, EXAMFR+1, EXAMMOD+4, EXAMMOD+8*, EXAMMOD+10, EXAMINA+2, EXAMINA+3 , EXAMINA+8, ADDEDUC+1*, ADDHF+1, ADDHF+2*, HFFR+1, HFMOD+2, HFMOD+13, HFINA+2, HFINA+3, HFINA+4* , HFINA+9, HFINA+10, ADDPCLAS+1, ADDPCLAS+2*, PCLASFR+1, PCLASMOD+3, PCLASMOD+7*, PCLASMOD+10, MEASMOD+4, MEASMOD+5* , MEASMOD+13, RESNEW+2*, RESNEW+4, RESNEW+5*, RESFR+3, RESMOD+1, RESMOD+3*, RESMOD2+6, COMINAC+1*, COMINAC+6 , COMINAC+7, CNTYDEL+3, CNTYDEL+4, TRIBEFR+1, TRIBEMOD+5, TRIBEMOD+9*, TRIBEMOD+14, TRIBEMOD+15, ADDTRIBE+1, ADDTRIBE+2* , ADDINST+3, ADDINST+10, ADDSTNM+3, ADDSTNM+7, ADDSTNM+17, DELSTNM+3, DELSTNM+7, DELSTNM+17, INSMOD+4, INSMOD+5* |
>> L1 | TRIBEMOD+3*, TRIBEMOD+15 |
>> L2 | CNTYDEL+4*, CNTYDEL+6, CNTYDEL+10, CNTYDEL+11 |
>> LFR | EXAMFR+1*, EXAMMOD+2, HFFR+1*, HFMOD+3, PCLASFR+1*, PCLASMOD+2, RESFR+3*, RESMOD+2, RESMOD+3, TRIBEFR+1* , TRIBEMOD+3 |
>> LN | TRIBEMOD+3*, TRIBEMOD+6*, TRIBEMOD+12 |
>> LTO | EXAMMOD+4*, EXAMMOD+5, HFMOD+2*, HFMOD+5, PCLASMOD+3*, PCLASMOD+4, RESNEW+2, RESMOD+1*, RESMOD+5, CNTYDEL+3* , TRIBEMOD+5*, TRIBEMOD+6 |
>> M | ADDEDUC+1*, ADDEDUC+4, HFMOD+5*, HFMOD+11 |
>> N | ADDEXAM+1*, ADDEXAM+2, ADDEXAM+3, EXAMMOD+2*, EXAMMOD+5*, EXAMMOD+8, EXAMMOD+9, EXAMINA+2*, EXAMINA+9, ADDEDUC+1* , ADDEDUC+2, ADDEDUC+3, ADDHF+1*, ADDHF+2, ADDHF+3, ADDHF+4, HFMOD+3*, HFMOD+4, HFMOD+5*, HFMOD+6 , HFMOD+11, HFINA+2*, HFINA+4, HFINA+5, ADDPCLAS+1*, ADDPCLAS+2, ADDPCLAS+4, PCLASMOD+2*, PCLASMOD+4*, PCLASMOD+7 , PCLASMOD+8, RESNEW+4*, RESNEW+5, RESNEW+6, RESNEW+7, RESMOD+2*, RESMOD+3, RESMOD+4, RESMOD+5*, RESMOD2+1 , RESMOD2+4, RESMOD2+7, COMINAC+1*, CNTYDEL+4*, TRIBEMOD+3*, TRIBEMOD+6*, TRIBEMOD+9, TRIBEMOD+12, ADDTRIBE+1*, ADDTRIBE+2 , ADDTRIBE+4, ADDTRIBE+7 |
NEWIEN | MEASMOD+1~, MEASMOD+15!, MEASMOD+38, INSMOD+1~, INSMOD+13!, INSMOD+28 |
NEWIEN(1 | MEASMOD+21, INSMOD+18 |
>> O | ADDHF+1*, ADDHF+2, ADDHF+5, HFMOD+5*, HFMOD+11, COMINAC+1*, COMINAC+2, COMINAC+3 |
>> P | ADDPCLAS+1*, ADDPCLAS+4, PCLASMOD+5*, PCLASMOD+6, PCLASMOD+8, CNTYDEL+5*, CNTYDEL+6, CNTYDEL+8, TRIBEMOD+4*, TRIBEMOD+7* , TRIBEMOD+8, TRIBEMOD+11 |
>> R | ADDPCLAS+1*, ADDPCLAS+4 |
>> S | ADDHF+1*, ADDHF+2, ADDHF+5, HFMOD+5*, HFMOD+11, RESNEW+4*, RESNEW+5, RESNEW+8, RESMOD+5*, RESMOD2+4 , RESMOD2+7, COMINAC+1*, COMINAC+2, COMINAC+3, CNTYDEL+4*, CNTYDEL+5 |
>> STNUM | ADDINST+3*, ADDINST+13, ADDSTNM+3*, ADDSTNM+13, ADDSTNM+18, DELSTNM+3*, DELSTNM+18 |
U | ADDEXAM+1, EXAMINA+2, ADDEDUC+1, ADDHF+1, HFINA+2, HFINA+3, ADDPCLAS+1, MEASMOD+3*, MEASMOD+4, RESNEW+4 , RESMOD+2, RESMOD+3, RESMOD+5, COMINAC+1, CNTYDEL+4, TRIBEMOD+3, TRIBEMOD+6, ADDTRIBE+1, ADDINST+4, INSMOD+3* , INSMOD+4 |
>> V | COMINAC+1* |
X | IXDIC~, ADDEXAM+3*, ADDEDUC+3*, ADDHF+4*, ADDPCLAS+4*, RESNEW+7*, ADDTRIBE+7*, ADDINST+7* |
>> XINSTDAT | ADDSTNM+10*, ADDSTNM+11, DELSTNM+10*, DELSTNM+11 |
>> XINSTEIN | ADDSTNM+10*, ADDSTNM+12, DELSTNM+10*, DELSTNM+12 |
>> XINSTNM | ADDSTNM+11*, DELSTNM+11* |
>> XLOCDAT | ADDSTNM+8*, ADDSTNM+10, DELSTNM+8*, DELSTNM+10 |
>> XLOCEIN | ADDSTNM+6*, ADDSTNM+7, ADDSTNM+8, DELSTNM+6*, DELSTNM+7, DELSTNM+8 |
>> Y | DIE+3*, IXDIC+7, ADDEXAM+6, EXAMMOD+10, EXAMINA+8, ADDEDUC+6, ADDHF+7, HFMOD+13, HFINA+9, ADDPCLAS+6 , PCLASMOD+10, RESNEW+10, RESMOD2+6, COMINAC+6, CNTYDEL+10, TRIBEMOD+14, ADDTRIBE+10, ADDINST+10, ADDINST+11, ADDSTNM+17 , DELSTNM+17 |
Name | Field # of Occurrence |
---|---|
$T(SVARS | DIE+1~, DIK+1~, FILE+1~, RSLT+1~, IXDIC+2~ |