IBARXPFS ;OAK/ELZ - PFSS ROUTINE FOR INTER-FACILITY RX COPAY ;23-MAR-05
Source file <IBARXPFS.m>
| 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 | 2 | IB PFSS DFT-P03 CLIENT IBARXMI |
| Kernel | 1 | ^ORD(101 |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| NEW(DFN) | ; this entry point will check patient cap knowledge status and queue to look up as necessary
|
|
| DQNEW | ; tasked entry point for cap information query
|
|
| BBE | ; back billing entry assumes IBADT
|
|
| DQNEWQ | ;
|
|
| MSG | ; receives HL7 message from COTS product and files in 354.71 or others
|
|
| NEWTRANQ | ;
|
|
| PATIENT(IBICN,IBDFN,IBSSN,IBVACLM,IBALIAS) | ; this function will receive
; several patient data elements and validate them. Assuming the data ; meets expected requirements, the function will return the patient's ; DFN. The requirement is ICN is a must, the patient must also match ; at least 2 other data elements. |
|
| PATQ | ;
|
|
| HL7DATA | ; hl7 data mapping
; format: description ; IB Variable ^ segment ^ seq ^ comp ^ subcomp ^ ; extract code |
| Name | Field # of Occurrence |
|---|---|
| ^%ZTLOAD | NEW+5 |
| GENACK^HLMA1 | NEWTRANQ+2 |
| $$GET^HLOPRS | MSG+11 |
| $$NEXTSEG^HLPRS | MSG+8 |
| $$STARTMSG^HLPRS | MSG+5 |
| $$NEXTMO^IBARXMC | BBE+10 |
| CAP^IBARXMC | BBE+5 |
| $$ADD^IBARXMN | BBE+17 |
| $$DFN^IBARXMU | PATIENT+8 |
| $$PRIORITY^IBARXMU | BBE+3 |
| $$TFL^IBARXMU | BBE+4 |
| ADD^IBARXMU | DQNEW+3 |
| UQUERY^IBARXMU | BBE+11 |
| $$NOW^XLFDT | NEW+4 |
| HL7 Protocol Name | Call Tags |
|---|---|
| IB PFSS DFT-P03 CLIENT | MSG |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^DPT - [#2] | PATIENT+13, PATIENT+17, PATIENT+21 |
| ^IBAM( | NEW+3, NEW+6, DQNEW+2, DQNEWQ+1 |
| ^IBAM(354.7 - [#354.7] | NEW+2, DQNEW+1 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| DA | BBE+1~ |
| DFN | NEW~, NEW+2, NEW+3, NEW+6, DQNEW+1, DQNEW+2, DQNEW+3, BBE+3, BBE+4, BBE+11 , BBE+17, DQNEWQ+1, MSG+2~, MSG+16*, MSG+17, PATIENT+6~, PATIENT+8*, PATIENT+10, PATIENT+11, PATIENT+13 , PATIENT+17, PATIENT+21, PATIENT+22*, PATQ+1, PATQ+2 |
| DIE | BBE+1~ |
| DR | BBE+1~ |
| DT | BBE+2 |
| >> HL("EID" | NEWTRANQ+2 |
| >> HL("EIDS" | NEWTRANQ+2 |
| >> HL("FS" | NEWTRANQ+1 |
| >> HL("MID" | NEWTRANQ+1 |
| HLA | MSG+2~ |
| HLA("HLA" | NEWTRANQ+1* |
| HLERR | MSG+6*, NEWTRANQ+1, PATIENT+7*, PATIENT+8*, PATIENT+11*, PATIENT+14*, PATIENT+18*, PATIENT+22*, PATQ+1! |
| >> HLMTIENS | MSG+5, NEWTRANQ+2 |
| IB350 | MSG+2~ |
| IB351 | MSG+2~ |
| IB35181 | MSG+2~ |
| IB35471 | MSG+2~ |
| IBA | BBE+1~, BBE+17* |
| >> IBADT | BBE+2 |
| IBALIAS | MSG+1~, MSG+16, PATIENT~, PATIENT+21 |
| IBB | BBE+1~, BBE+3*, BBE+17* |
| IBCLAIM | MSG+1~ |
| IBCODE | MSG+2~, MSG+12*, MSG+13 |
| IBD | BBE+1~, BBE+11, BBE+14, BBE+18!, MSG+9*, MSG+10, MSG+11, MSG+12, MSG+13 |
| IBD( | BBE+17 |
| IBDFN | MSG+1~, MSG+16, PATIENT~, PATIENT+10, PATIENT+11 |
| IBDT | BBE+1~, BBE+2*, BBE+5, BBE+10*, BBE+11 |
| IBFD | BBE+1~, BBE+5, BBE+6, BBE+10 |
| IBHEADER | MSG+1~, MSG+5 |
| IBICN | MSG+1~, MSG+16, PATIENT~, PATIENT+8 |
| IBINST | MSG+1~ |
| IBMATCH | PATIENT+6~, PATIENT+7*, PATIENT+10*, PATIENT+13*, PATIENT+15, PATIENT+17*, PATIENT+19, PATIENT+21*, PATIENT+22 |
| IBMSG | MSG+1~, MSG+5, MSG+8 |
| IBMTDT21 | MSG+2~ |
| IBP | BBE+1~, BBE+3*, BBE+5 |
| IBRESLT | MSG+2~, NEWTRANQ+2 |
| IBRXDAT | MSG+2~ |
| IBS | BBE+1~ |
| IBSSN | MSG+1~, MSG+16, PATIENT~, PATIENT+13, PATIENT+14 |
| IBSTAT | MSG+1~, MSG+5*, MSG+6 |
| IBT | BBE+1~, BBE+4*, MSG+9* |
| IBT( | BBE+7, BBE+17 |
| IBTD | BBE+1~, BBE+5, BBE+6, BBE+10 |
| IBTYPE | MSG+1~, MSG+18*, MSG+20 |
| IBVACLM | MSG+16, PATIENT~, PATIENT+17, PATIENT+18 |
| IBX | BBE+1~, BBE+7*, BBE+11, BBE+17, PATIENT+6~, PATIENT+7*, PATIENT+21* |
| IBY | BBE+1~, BBE+5 |
| IBZ | BBE+1~, BBE+5 |
| POP | NEW+1~ |
| SEG | MSG+2~, MSG+8, MSG+11 |
| SEG("SEGMENT | TYPE" , MSG+10 |
| X | NEW+1~, BBE+1~, BBE+17*, MSG+13* |
| Y | NEW+1~ |
| ZTDESC | NEW+1~, NEW+4* |
| ZTDTH | NEW+1~, NEW+4* |
| ZTIO | NEW+1~, NEW+4* |
| ZTRTN | NEW+1~, NEW+4* |
| ZTSAVE | NEW+1~ |
| ZTSAVE("DFN" | NEW+4* |
| ZTSAVE("IBADT" | NEW+4* |
| ZTSK | NEW+1~ |
| Name | Field # of Occurrence |
|---|---|
| $T(HL7DATA+IBT | MSG+9 |