FBXIP154 ;WOIFO/SAB - PATCH INSTALL ROUTINE ;12/2/2014
Source file <FBXIP154.m>
Name | Comments | DBIA/ICR reference |
---|---|---|
PS | ; post-install entry point
; create KIDS checkpoints with call backs |
|
USRAUD | ; populate user audit
|
|
ADDUA(FBFILE,FBIENS,FBDT,FBUSR,FBTXT) | ; add user audit record
|
|
SHOWCNT | ; show counts for file
|
|
AUTHP | ; populate authorization pointer data
|
|
ASSOC(FBDFN,FBDOS,FB7078) | ; find authorization for ASSOCIATED 7078/583
; input ; FBDFN - patient (internal, pointer to file 2 and file 161) ; FBDOS - date of service (internal, FM date) ; FB7078 - associated 7078/583 (internal) ; returns null value or authorization IEN in file 161 for patient |
|
POV(FBDFN,FBDOS,FBPOV) | ; find authorization for POV
; input ; FBDFN - patient (internal, pointer to file 2 and file 161) ; FBDOS - date of service (internal, FM date) ; FBPOV - purpose of visit (internal, pointer to 161.82) ; returns null value or authorization IEN in file 161 for patient |
|
RPT | ; report of ^XTMP
|
|
LIST(FBSUB) | ; list lines in subscript
|
Name | Field # of Occurrence |
---|---|
$$GET1^DID | AUTHP+25 |
FILE^DIE | AUTHP+111 |
UPDATE^DIE | ADDUA+8 |
$$GET1^DIQ | LIST+13 |
$$FMADD^XLFDT | AUTHP+22 |
$$NEWCP^XPDUTL | PS+4 |
BMES^XPDUTL | PS+5, USRAUD+2, AUTHP+124, AUTHP+136 |
MES^XPDUTL | USRAUD+5, USRAUD+33, USRAUD+51, USRAUD+69, USRAUD+96, ADDUA+12, SHOWCNT+1, SHOWCNT+2, AUTHP+2, AUTHP+112 , AUTHP+116, AUTHP+117, AUTHP+119, AUTHP+121, AUTHP+125, AUTHP+127, AUTHP+129, AUTHP+131, AUTHP+133, AUTHP+137 , AUTHP+139, AUTHP+141, AUTHP+143, AUTHP+145, AUTHP+147, AUTHP+149 |
$$ACTIVE^XUSER | ADDUA+2 |
Name | Line Occurrences |
---|---|
Function Call: WRITE |
|
Function Call: WRITE |
|
Routine Call |
|
Routine Call |
|
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^FB583 - [#162.7] | USRAUD+56, USRAUD+58, USRAUD+61, USRAUD+91 |
^FB7078 - [#162.4] | USRAUD+38, USRAUD+40, USRAUD+43, USRAUD+88 |
^FBAA(162.2 - [#162.2] | USRAUD+12, USRAUD+14, USRAUD+17 |
^FBAAA - [#161] | USRAUD+74, USRAUD+76, USRAUD+79, USRAUD+84, USRAUD+85, AUTHP+41, AUTHP+42, ASSOC+13, POV+12, POV+13 |
^FBAAA("AG" | ASSOC+12 |
^FBAAC - [#162] | AUTHP+30, AUTHP+33, AUTHP+36, AUTHP+37, AUTHP+47, AUTHP+52, AUTHP+56 |
^XTMP("FB*3.5*154" | AUTHP+22*, AUTHP+78*, AUTHP+84*, AUTHP+99*, AUTHP+105*, LIST+11, LIST+12 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
DA | USRAUD+1~, USRAUD+12*, USRAUD+14, USRAUD+16, USRAUD+17, USRAUD+38*, USRAUD+40, USRAUD+42, USRAUD+43, USRAUD+56* , USRAUD+58, USRAUD+60, USRAUD+61, USRAUD+76*, USRAUD+79, USRAUD+81, USRAUD+84, USRAUD+85, AUTHP+1~, AUTHP+46* , AUTHP+47*, AUTHP+49, AUTHP+52, AUTHP+56 |
DA(1 | USRAUD+74*, USRAUD+76, USRAUD+79, USRAUD+81, USRAUD+84, USRAUD+85, AUTHP+35*, AUTHP+36*, AUTHP+37, AUTHP+47 , AUTHP+49, AUTHP+52, AUTHP+56 |
DA(2 | AUTHP+32*, AUTHP+33*, AUTHP+36, AUTHP+37, AUTHP+47, AUTHP+49, AUTHP+52, AUTHP+56 |
DA(3 | AUTHP+29*, AUTHP+30*, AUTHP+33, AUTHP+36, AUTHP+37, AUTHP+41, AUTHP+42, AUTHP+47, AUTHP+49, AUTHP+52 , AUTHP+56, AUTHP+73, AUTHP+94 |
DIERR | USRAUD+1~, ADDUA+9, AUTHP+1~, AUTHP+112 |
DT | USRAUD+27, USRAUD+83, AUTHP+22 |
FB7078 | ASSOC~, ASSOC+8, ASSOC+12 |
FBA | AUTHP+1~ |
FBA("7078" | AUTHP+44*, AUTHP+68, AUTHP+72 |
FBA("POV" | AUTHP+43*, AUTHP+89, AUTHP+93 |
FBAUTHP | AUTHP+1~, AUTHP+64*, AUTHP+68, AUTHP+69*, AUTHP+72, AUTHP+75*, AUTHP+78, AUTHP+79, AUTHP+81*, AUTHP+84 , AUTHP+89, AUTHP+90*, AUTHP+93, AUTHP+96*, AUTHP+99, AUTHP+101, AUTHP+102*, AUTHP+105, AUTHP+108, AUTHP+110 |
FBC | USRAUD+1~, USRAUD+6*, USRAUD+34*, USRAUD+52*, USRAUD+70*, ADDUA+9*, SHOWCNT+1 |
FBCE | USRAUD+1~, USRAUD+6*, USRAUD+34*, USRAUD+52*, USRAUD+70*, ADDUA+11*, SHOWCNT+2 |
FBDA | ASSOC+9~, ASSOC+11*, ASSOC+12*, ASSOC+13, ASSOC+18, POV+9~, POV+11*, POV+12*, POV+13, POV+19 |
FBDFN | ASSOC~, ASSOC+8, ASSOC+12, ASSOC+13, POV~, POV+8, POV+12, POV+13 |
FBDOS | ASSOC~, ASSOC+8, ASSOC+15, ASSOC+16, POV~, POV+8, POV+16, POV+17 |
FBDT | USRAUD+1~, USRAUD+19*, USRAUD+21, USRAUD+23*, USRAUD+25, USRAUD+27*, USRAUD+29, USRAUD+45*, USRAUD+47, USRAUD+63* , USRAUD+65, USRAUD+83*, USRAUD+93, ADDUA~, ADDUA+1, ADDUA+5 |
FBFDA | ADDUA+3~, AUTHP+109~ |
FBFDA( | ADDUA+5*, ADDUA+6*, ADDUA+7*, AUTHP+110* |
FBFE | AUTHP+1~, AUTHP+25*, AUTHP+39 |
FBFILE | USRAUD+1~, USRAUD+7*, USRAUD+21, USRAUD+25, USRAUD+29, USRAUD+35*, USRAUD+47, USRAUD+53*, USRAUD+65, USRAUD+71* , USRAUD+93, ADDUA~, ADDUA+5, ADDUA+6, ADDUA+7 |
FBFLD | LIST+1~, LIST+7*, LIST+8*, LIST+13 |
FBFLDN | LIST+1~, LIST+7*, LIST+8*, LIST+13 |
FBFTP | ASSOC+6~, ASSOC+7*, ASSOC+12, ASSOC+18*, ASSOC+20, POV+6~, POV+7*, POV+12, POV+19*, POV+21 |
FBIENS | USRAUD+1~, USRAUD+16*, USRAUD+21, USRAUD+25, USRAUD+29, USRAUD+42*, USRAUD+47, USRAUD+60*, USRAUD+65, USRAUD+81* , USRAUD+93, ADDUA~, ADDUA+4*, ADDUA+5, ADDUA+6, ADDUA+7, ADDUA+12, AUTHP+1~, AUTHP+49*, AUTHP+78 , AUTHP+84, AUTHP+99, AUTHP+105, AUTHP+110, AUTHP+112, LIST+1~, LIST+10*, LIST+11*, LIST+12, LIST+13 |
FBP | AUTHP+1~ |
FBP("7078" | AUTHP+57*, AUTHP+66, AUTHP+68, AUTHP+72, AUTHP+73, AUTHP+87 |
FBP("DOS" | AUTHP+38*, AUTHP+73, AUTHP+94 |
FBP("FTP" | AUTHP+39*, AUTHP+41*, AUTHP+42, AUTHP+60, AUTHP+68, AUTHP+69, AUTHP+76, AUTHP+77, AUTHP+78, AUTHP+81 , AUTHP+82, AUTHP+83, AUTHP+84, AUTHP+89, AUTHP+90, AUTHP+97, AUTHP+98, AUTHP+99, AUTHP+102, AUTHP+103 , AUTHP+104, AUTHP+105 |
FBP("POV" | AUTHP+58*, AUTHP+89, AUTHP+93, AUTHP+94 |
FBPOV | POV~, POV+8, POV+15 |
FBSUB | LIST~, LIST+3, LIST+4, LIST+5, LIST+6, LIST+7, LIST+8, LIST+11, LIST+12 |
FBT | AUTHP+1~ |
FBT("NOP" | AUTHP+8*, AUTHP+9*, AUTHP+10*, AUTHP+11*, AUTHP+12*, AUTHP+60*, AUTHP+77*, AUTHP+83*, AUTHP+98*, AUTHP+104* , AUTHP+123, AUTHP+126, AUTHP+128, AUTHP+130, AUTHP+132 |
FBT("PTR" | AUTHP+13*, AUTHP+14*, AUTHP+15*, AUTHP+16*, AUTHP+17*, AUTHP+18*, AUTHP+19*, AUTHP+61*, AUTHP+70*, AUTHP+76* , AUTHP+82*, AUTHP+91*, AUTHP+97*, AUTHP+103*, AUTHP+135, AUTHP+138, AUTHP+140, AUTHP+142, AUTHP+144, AUTHP+146 , AUTHP+148 |
FBT("TLN" | AUTHP+5*, AUTHP+6*, AUTHP+7*, AUTHP+48*, AUTHP+53*, AUTHP+54*, AUTHP+115, AUTHP+118, AUTHP+120 |
FBTXT | USRAUD+1~, USRAUD+36*, USRAUD+47, USRAUD+54*, USRAUD+65, USRAUD+72*, USRAUD+93, ADDUA~, ADDUA+7 |
FBTXT(1 | USRAUD+8*, USRAUD+21 |
FBTXT(2 | USRAUD+9*, USRAUD+25 |
FBTXT(3 | USRAUD+10*, USRAUD+29 |
FBUSR | USRAUD+1~, USRAUD+20*, USRAUD+21, USRAUD+24*, USRAUD+25, USRAUD+28*, USRAUD+29, USRAUD+46*, USRAUD+47, USRAUD+64* , USRAUD+65, USRAUD+84*, USRAUD+88, USRAUD+91, USRAUD+93, ADDUA~, ADDUA+2, ADDUA+6 |
FBX | PS+2~, PS+3*, PS+4, PS+5, USRAUD+77~, USRAUD+85*, USRAUD+88, USRAUD+91, AUTHP+1~, AUTHP+73* , AUTHP+74, AUTHP+75, AUTHP+94*, AUTHP+95, AUTHP+96, AUTHP+115*, AUTHP+116, AUTHP+118*, AUTHP+119, AUTHP+120* , AUTHP+121, AUTHP+123*, AUTHP+124, AUTHP+126*, AUTHP+127, AUTHP+128*, AUTHP+129, AUTHP+130*, AUTHP+131, AUTHP+132* , AUTHP+133, AUTHP+135*, AUTHP+136, AUTHP+138*, AUTHP+139, AUTHP+140*, AUTHP+141, AUTHP+142*, AUTHP+143, AUTHP+144* , AUTHP+145, AUTHP+146*, AUTHP+147, AUTHP+148*, AUTHP+149 |
FBY | USRAUD+1~, USRAUD+17*, USRAUD+19, USRAUD+20, USRAUD+23, USRAUD+24, USRAUD+28, USRAUD+43*, USRAUD+45, USRAUD+46 , USRAUD+61*, USRAUD+63, USRAUD+64, ASSOC+9~, ASSOC+13*, ASSOC+14, ASSOC+15, ASSOC+16, POV+9~, POV+13* , POV+14, POV+15, POV+16, POV+17, LIST+1~, LIST+12*, LIST+13 |
FBYA | AUTHP+1~, AUTHP+42*, AUTHP+43, AUTHP+44 |
FBYD | AUTHP+1~, AUTHP+37*, AUTHP+38, AUTHP+39 |
FBYP | AUTHP+1~, AUTHP+56*, AUTHP+57, AUTHP+58 |
U | USRAUD+19, USRAUD+20, USRAUD+23, USRAUD+24, USRAUD+28, USRAUD+45, USRAUD+46, USRAUD+63, USRAUD+64, USRAUD+84 , USRAUD+85, AUTHP+38, AUTHP+39, AUTHP+43, AUTHP+44, AUTHP+52, AUTHP+57, AUTHP+58, ASSOC+14, ASSOC+15 , ASSOC+16, POV+14, POV+15, POV+16, POV+17, LIST+13 |
Y | PS+2~, PS+4*, PS+5 |