IBBAADTI ;OAK/ELZ - PFSS INBOUND FILER ;15-MAR-2005
Source file <IBBAADTI.m>
Package | Total | Call Graph |
---|---|---|
Health Level Seven | 5 | $$FMDATE^HLFNC GENACK^HLMA1 $$GET^HLOPRS ($$NEXTSEG,$$STARTMSG)^HLPRS $$SETPURG^HLUTIL |
VA FileMan | 3 | ^DIC UPDATE^DIE GETS^DIQ |
CPT HCPCS Codes | 1 | $$CODEN^ICPTCOD |
Integrated Billing | 1 | EVENT^IBBAACCT |
Kernel | 1 | $$NOW^XLFDT |
Registration | 1 | $$SITE^VASITE |
action | A | extended action | Ea | event driver | Ed | subscriber | Su | protocol | O | limited protocol | LP | run routine | RR | broker | B | edit | E | server | Se | P | screenman | SM | inquire | I |
Package | Total | Caller Graph |
---|---|---|
Integrated Billing | 3 | IBB PFSS ADT-A04 CLIENT IBB PFSS ADT-A05 CLIENT IBBAPI |
Kernel | 1 | ^ORD(101 |
Scheduling | 1 | SD53430P |
Name | Comments | DBIA/ICR reference |
---|---|---|
A04 | ;receiver for returned A04 messages to create account
|
|
A05 | ;receiver for returned A05 messages to create account
|
|
SET(IBBDFN,HLMTIENS) | ;set returned external account number in file #375
|
|
INPT() | ;set new account record for inpatient admission
|
|
INTNUM(IBBEXVN) | ;return PFSS Account Reference using external visit number
|
|
PID() | ;get DFN from HL7 message; compare to file #2 data
|
|
EXVN() | ;external account/visit number must be non-null
|
|
ACK | ; prepare positive acknowledgement (AA) message
|
|
NAK | ;prepare negative acknowledgement (AE) message
|
|
IBBACONV(IBBDFN,IBBTYPE,IBBWHEN,IBBWHERE,IBBEXVN) | ;new account record for converted inpatient or outpatient
|
Name | Field # of Occurrence |
---|---|
^DIC | SET+29 |
UPDATE^DIE | INPT+14, IBBACONV+22 |
GETS^DIQ | SET+35, PID+14 |
$$FMDATE^HLFNC | SET+19 |
GENACK^HLMA1 | ACK+4, NAK+4 |
$$GET^HLOPRS | SET+11, SET+14, SET+15, SET+16, SET+17, SET+18, SET+19, SET+21, PID+4, PID+6 , PID+8, PID+10, EXVN+5 |
$$NEXTSEG^HLPRS | SET+9, PID+3, EXVN+3 |
$$STARTMSG^HLPRS | A04+2, A05+2, SET+6 |
$$SETPURG^HLUTIL | ACK+2, NAK+2 |
EVENT^IBBAACCT | SET+72, INPT+20 |
$$CODEN^ICPTCOD | SET+64 |
$$SITE^VASITE | PID+12 |
$$NOW^XLFDT | SET+71, INPT+13, IBBACONV+21 |
HL7 Protocol Name | Call Tags |
---|---|
IBB PFSS ADT-A05 CLIENT | A05 |
IBB PFSS ADT-A04 CLIENT | A04 |
FileNo | Call Tags |
---|---|
^IBBAA(375 - [#375] | GETS^DIQ |
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^IBBAA(375 - [#375] | SET+46, SET+47, SET+49, SET+50, SET+57, SET+58, SET+64, SET+69, SET+70*, SET+71* , INPT+3, INPT+5, INPT+15, INPT+19*, INPT+21*, INTNUM+4, IBBACONV+11, IBBACONV+13, IBBACONV+23, IBBACONV+27* , IBBACONV+28*, IBBACONV+29* |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
ALTNUM | SET+1~, SET+18*, SET+59, SET+60 |
ALTNUMX | SET+1~, SET+58*, SET+59, SET+60 |
DIC | SET+1~, SET+28* |
DIC(0 | SET+28* |
FDA | INPT+1~, IBBACONV+9~ |
FDA(375 | INPT+9*, INPT+10*, INPT+11*, INPT+12*, INPT+13*, IBBACONV+17*, IBBACONV+18*, IBBACONV+19*, IBBACONV+20*, IBBACONV+21* |
FIELD | PID+1~, PID+13*, PID+14 |
FILE | PID+1~, PID+13*, PID+14 |
>> HL("EID" | ACK+4, NAK+4 |
>> HL("EIDS" | ACK+4, NAK+4 |
>> HL("FS" | ACK+3, NAK+3 |
>> HL("MID" | ACK+3, NAK+3 |
HLA | ACK+1~, NAK+1~ |
HLA("HLA" | ACK+3*, NAK+3* |
HLERR | A04+1~, A04+5*, A04+7*, A04+9*, A05+1~, A05+5*, A05+7*, A05+9*, NAK+3 |
HLMTIENS | A04+2, A04+8, A05+2, A05+8, SET~, SET+4, SET+6, ACK+4, NAK+4 |
HLRESULT | ACK+1~, ACK+4, NAK+1~, NAK+4 |
IBB | INPT+1~, IBBACONV+9~ |
IBB("DIERR" | INPT+16, IBBACONV+24 |
IBBARFN | A04+1~, A04+8*, A04+9, A04+10, A05+1~, A05+8*, A05+9, A05+10, SET+2~, SET+3* , SET+4, SET+5, SET+6, SET+16*, SET+23, SET+25*, SET+33*, SET+35, SET+36, SET+41 , SET+43, SET+68*, SET+73, INPT+1~, INPT+2*, INPT+17*, INPT+22, INTNUM+1~, INTNUM+2*, INTNUM+3 , INTNUM+5*, INTNUM+6, IBBACONV+9~, IBBACONV+10*, IBBACONV+25*, IBBACONV+30 |
IBBARRAY | SET+2~ |
IBBARRAY(375 | SET+36, SET+37, SET+38, SET+39, SET+40 |
IBBARRY | PID+1~ |
IBBARRY(2 | PID+15, PID+16 |
IBBDFN | A04+1~, A04+4*, A04+5, A04+8, A05+1~, A05+4*, A05+5, A05+8, SET~, SET+5 , SET+37, SET+46, SET+47, SET+49, SET+50, SET+57, INPT+11, INPT+21, IBBACONV~, IBBACONV+19 , IBBACONV+29 |
IBBERR | INPT+1~, INPT+8*, INPT+14, IBBACONV+9~, IBBACONV+16*, IBBACONV+22 |
IBBEVENT | SET+2~, SET+11*, SET+25, SET+39, SET+40, SET+52, SET+72, INPT+20 |
IBBEXVN | A04+1~, A04+6*, A04+7, A05+1~, A05+6*, A05+7, SET+2~, SET+17*, SET+25, SET+70 , INPT+10, INTNUM~, INTNUM+3, INTNUM+4, EXVN+1~, EXVN+2*, EXVN+5*, EXVN+6, IBBACONV~, IBBACONV+18 |
IBBHDR | A04+1~, A04+2, A05+1~, A05+2, SET+2~, SET+6 |
IBBHDR("EVENT" | A04+3, A05+3 |
IBBIEN | SET+2~, SET+34*, SET+41*, SET+44*, SET+52*, SET+54*, SET+56, SET+57, SET+59*, SET+62* , SET+65*, SET+67, SET+68, SET+69, SET+70, SET+71, SET+72, INPT+1~, INPT+5*, INPT+6 , INPT+9, INPT+17, INPT+19, INPT+20, INPT+21, IBBACONV+9~, IBBACONV+13*, IBBACONV+14, IBBACONV+17, IBBACONV+25 , IBBACONV+27, IBBACONV+28, IBBACONV+29 |
IBBIEN(1 | INPT+6*, IBBACONV+14* |
IBBIENS | INPT+1~, INPT+7*, INPT+9, INPT+10, INPT+11, INPT+12, INPT+13, IBBACONV+9~, IBBACONV+15*, IBBACONV+17 , IBBACONV+18, IBBACONV+19, IBBACONV+20, IBBACONV+21 |
IBBMSG | A04+1~, A04+2, A05+1~, A05+2, SET+2~, SET+6, SET+9, PID+3, EXVN+3 |
IBBSEG | SET+2~, SET+9, SET+11, SET+14, SET+15, SET+16, SET+17, SET+18, SET+19, SET+21 , PID+3, PID+4, PID+6, PID+8, PID+10, EXVN+3, EXVN+5 |
IBBSEG("SEGME | NT TYPE" , SET+10, SET+13, SET+20, PID+3, EXVN+4 |
IBBTYPE | IBBACONV~, IBBACONV+26, IBBACONV+28 |
IBBWHEN | SET+2~, SET+19*, SET+31*, SET+38, SET+46, SET+47, SET+49, SET+50, SET+57, INPT+18 , INPT+21, IBBACONV~, IBBACONV+26, IBBACONV+28, IBBACONV+29 |
IBBWHERE | SET+2~, SET+14*, SET+25, SET+27, SET+28, SET+30*, SET+31, SET+39, SET+40, SET+45 , SET+46, SET+47, SET+48, SET+49, SET+50, SET+52, SET+56, SET+57, INPT+18, INPT+21 , IBBACONV~, IBBACONV+26, IBBACONV+29 |
IEN1 | SET+1~, SET+46*, SET+47, SET+49*, SET+50, SET+52, SET+54, SET+57*, SET+58, SET+59 , SET+62, SET+64, SET+65 |
IEN2 | SET+1~, SET+47*, SET+50*, SET+54, SET+56 |
IENS | SET+1~, SET+35*, SET+36, SET+37, SET+38, SET+39, SET+40, PID+1~, PID+13*, PID+14 , PID+15, PID+16 |
OK | SET+1~, SET+33, SET+34*, SET+36*, SET+37*, SET+38*, SET+39*, SET+40* |
OUT | SET+1~, SET+8*, SET+9, SET+12*, SET+23, PID+1~, PID+2*, PID+3, PID+5, PID+11* , EXVN+1~, EXVN+2*, EXVN+3, EXVN+5* |
PHYS | SET+1~, SET+15*, SET+62, SET+63 |
PHYSX | SET+1~, SET+61*, SET+62, SET+63 |
PROC | SET+1~, SET+21*, SET+64*, SET+65 |
PROCX | SET+1~, SET+64*, SET+65 |
REC | SET+1~, SET+58*, SET+61 |
REP | PID+1~, PID+5*, PID+6, PID+8, PID+10 |
U | SET+30, SET+58, SET+61, SET+64, SET+69, SET+70, SET+71, INPT+5, INPT+18, PID+12 , IBBACONV+13, IBBACONV+26, IBBACONV+28 |
X | SET+1~, SET+25*, SET+28*, INPT+1~, INPT+18*, INPT+19, IBBACONV+9~, IBBACONV+26*, IBBACONV+27 |
XID | PID+1~, PID+2*, PID+9*, PID+11, PID+13, PID+15*, PID+16*, PID+17 |
XNAME | PID+1~, PID+4*, PID+16 |
XSITE | PID+1~, PID+9*, PID+12 |
XSSN | PID+1~, PID+2*, PID+10*, PID+11, PID+15 |
XTYP | PID+1~, PID+6*, PID+7, PID+10 |
XX | SET+1~, SET+11*, SET+12, SET+19*, INTNUM+1~, INTNUM+4*, INTNUM+5, PID+1~, PID+8*, PID+9 , ACK+2*, NAK+2* |
Y | SET+28!, SET+30 |