IBECEA37 ;EDE/WCJ-Multi-site maintain UC VISIT TRACKING FILE (#351.82) - CALLER/REQUESTOR ; 2-DEC-19
Source file <IBECEA37.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 | IBECEA39 IBUC MULTI FAC COPAY SYNCH |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| AWAY | ||
| UPDATED | ; Get all in File that were UPDATED and not yet pushed out. They may have gotten to some sites but not all sites
; |
|
| MULTI(IBINDEX,IBLOOKUP) | ;
; IBINDEX = a single regular fileman index ; IBLOOKUP = internal value for that index |
|
| LOGRES(IBDFN,ERR,RESMESS) | ; log results
|
|
| TFL(DFN,IBS,IBT) | ; returns treating facility list (pass IBT by reference)
; supported references ia #2990, value returned is count ; needed to N Y because VAFCTFU1 will kill it ; DFN - Patient IEN ; IBS - External site ; IBT - By reference for results |
|
| ALERTSO | ; alert someone
; what is needed to actually be informative - maybe PATIENT NAME, FULL ICN (if available), RECEIVING SITE, ERROR MESSAGE ; screen out all but errors (get rid of 0's (info only) and 1's (successes)) |
|
| REMOVE(IBIEN) | ; remove from UPDATED index - only called if sent to ALL other treating facilities successfully.
|
| Name | Field # of Occurrence |
|---|---|
| FIND^DIC | MULTI+8 |
| FILE^DIE | REMOVE+4 |
| CLEAN^DILF | ALERTSO+33 |
| $$GET1^DIQ | MULTI+36, ALERTSO+12, ALERTSO+13 |
| $$ICN^IBARXMU | MULTI+42 |
| SITE^IBAUTL | MULTI+25 |
| $$GETELGP^IBECEA36 | MULTI+51 |
| TFL^VAFCTFU1 | TFL+8 |
| SENDMSG^XMXAPI | ALERTSO+32 |
| EN1^XWB2HL7 | MULTI+61, MULTI+62 |
| RPCCHK^XWB2HL7 | MULTI+79 |
| CLEAR^XWBDRPC | MULTI+96 |
| RTNDATA^XWBDRPC | MULTI+86 |
| FileNo | Call Tags |
|---|---|
| ^DPT - [#2] | GET1^DIQ |
| ^IBUC(351.82 - [#351.82] | FIND^DIC |
| ^DIC(4 - [#4] | GET1^DIQ |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^TMP("DILIST" | MULTI+14, MULTI+28, MULTI+29 |
| ^TMP("IBECEA_COPAY" | MULTI+4!, MULTI+89*, MULTI+93*, MULTI+105!, LOGRES+3*, ALERTSO+4, ALERTSO+8, ALERTSO+10, ALERTSO+14, ALERTSO+16* , ALERTSO+20*, ALERTSO+21, ALERTSO+22, ALERTSO+23, ALERTSO+25*, ALERTSO+28* |
| ^TMP($J | MULTI+93, MULTI+94! |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| DFN | TFL~, TFL+8 |
| DUZ | ALERTSO+32 |
| ERR | LOGRES~, LOGRES+1*, LOGRES+3 |
| FDA | REMOVE+1~ |
| FDA( | REMOVE+3* |
| IBAD | ALERTSO+5~, ALERTSO+9*, ALERTSO+17*, ALERTSO+18*, ALERTSO+26* |
| IBBILL | MULTI+21~, MULTI+47*, MULTI+61 |
| IBC | MULTI+21~, MULTI+79*, TFL+7~, TFL+10*, TFL+13*, TFL+14 |
| IBCOMM | MULTI+21~, MULTI+48*, MULTI+61 |
| IBDATA | MULTI+21~, MULTI+29*, MULTI+30, MULTI+31, MULTI+32, MULTI+34, MULTI+45, MULTI+46, MULTI+47, MULTI+48 , MULTI+49, ALERTSO+5~, ALERTSO+14*, ALERTSO+15, ALERTSO+16, ALERTSO+19, ALERTSO+20, ALERTSO+23*, ALERTSO+24, ALERTSO+25 , ALERTSO+27, ALERTSO+28 |
| IBDFN | MULTI+21~, MULTI+32*, MULTI+39, MULTI+42, MULTI+43, MULTI+51, MULTI+82, MULTI+89, MULTI+93, MULTI+97 , LOGRES~, LOGRES+2~*, LOGRES+3, ALERTSO+5~, ALERTSO+7*, ALERTSO+8*, ALERTSO+10, ALERTSO+11, ALERTSO+12, ALERTSO+13 , ALERTSO+14, ALERTSO+16, ALERTSO+17, ALERTSO+18, ALERTSO+20, ALERTSO+21, ALERTSO+22, ALERTSO+23, ALERTSO+25, ALERTSO+26 , ALERTSO+28 |
| IBELGRP | MULTI+21~, MULTI+51*, MULTI+61 |
| IBERR | MULTI+21~, MULTI+27*, MULTI+43, MULTI+66, MULTI+82, MULTI+88*, MULTI+89, MULTI+92*, MULTI+93, MULTI+97 |
| IBEXSITE | MULTI+21~ |
| IBFAC | MULTI+21~, MULTI+35, ALERTSO+5~, ALERTSO+21*, ALERTSO+22, ALERTSO+23, ALERTSO+25, ALERTSO+28 |
| IBFT | TFL+7~, TFL+12*, TFL+13 |
| IBH | MULTI+21~, MULTI+60~, MULTI+61, MULTI+62 |
| IBH(0 | MULTI+64, MULTI+67 |
| IBHERE | MULTI+21~, MULTI+85!, MULTI+86, MULTI+87, MULTI+89 |
| IBHERE(0 | MULTI+90 |
| IBICN | MULTI+21~, MULTI+42*, MULTI+43, MULTI+61, MULTI+62 |
| IBIEN | MULTI+21~, MULTI+31*, MULTI+35, MULTI+40, MULTI+50, MULTI+98, REMOVE~, REMOVE+2 |
| IBINDEX | MULTI~, MULTI+8, MULTI+23 |
| IBL4 | ALERTSO+5~, ALERTSO+13*, ALERTSO+18, ALERTSO+26 |
| IBLN | ALERTSO+5~, ALERTSO+12*, ALERTSO+18, ALERTSO+26 |
| IBLOOKUP | MULTI~, MULTI+8 |
| IBLOOP | MULTI+21~, MULTI+27*, MULTI+28*, MULTI+29 |
| IBLP | ALERTSO+5~, ALERTSO+22*, ALERTSO+23 |
| IBOSITEEX | MULTI+21~, MULTI+36*, MULTI+39, MULTI+61, MULTI+62 |
| IBOSITEIN | MULTI+21~, MULTI+34*, MULTI+35, MULTI+36 |
| IBPATPR | MULTI+21~, MULTI+23*, MULTI+61, MULTI+62 |
| IBR | MULTI+21~, MULTI+78~, MULTI+79, MULTI+85! |
| IBR(0 | MULTI+79, MULTI+82, MULTI+84 |
| IBREMOVE | MULTI+70~, MULTI+71*, MULTI+73*, MULTI+82*, MULTI+90*, MULTI+95*, MULTI+97*, MULTI+98 |
| IBRES | ALERTSO+5~, ALERTSO+10*, ALERTSO+14, ALERTSO+21, ALERTSO+22, ALERTSO+23 |
| IBS | TFL~, TFL+13 |
| IBSITE | MULTI+21~, MULTI+50 |
| IBSTAT | MULTI+21~, MULTI+46*, MULTI+61 |
| IBT | MULTI+21~, MULTI+39*, MULTI+40, TFL~ |
| IBT( | TFL+13* |
| IBTFL | MULTI+21~, MULTI+38!, MULTI+39 |
| IBTFL( | MULTI+57, MULTI+61, MULTI+62, MULTI+65*, MULTI+66, MULTI+67*, MULTI+72, MULTI+73, MULTI+79, MULTI+82 , MULTI+86, MULTI+89, MULTI+93, MULTI+96 |
| IBUNIQ | MULTI+21~, MULTI+49*, MULTI+50*, MULTI+61 |
| IBVISDT | MULTI+21~, MULTI+45*, MULTI+51, MULTI+61 |
| IBX | MULTI+21~, MULTI+57*, MULTI+61, MULTI+62, MULTI+65, MULTI+66, MULTI+67, MULTI+72*, MULTI+73, MULTI+79 , MULTI+82, MULTI+86, MULTI+89, MULTI+93, MULTI+96 |
| IBZ | MULTI+21~, MULTI+96, TFL+7~, TFL+8, TFL+10*, TFL+13* |
| IBZ( | TFL+13 |
| IBZ(1 | TFL+9 |
| IENS | REMOVE+1~, REMOVE+2*, REMOVE+3 |
| LN | ALERTSO+5~, ALERTSO+7*, ALERTSO+17*, ALERTSO+18*, ALERTSO+19*, ALERTSO+26*, ALERTSO+27*, ALERTSO+29*, ALERTSO+30 |
| MSG | ALERTSO+5~, ALERTSO+29 |
| MSG( | ALERTSO+17*, ALERTSO+18*, ALERTSO+19*, ALERTSO+26*, ALERTSO+27*, ALERTSO+29* |
| RESMESS | LOGRES~, LOGRES+3 |
| RETURN | REMOVE+1~ |
| SUBJ | ALERTSO+5~, ALERTSO+6*, ALERTSO+32 |
| U | MULTI+31, MULTI+32, MULTI+34, MULTI+45, MULTI+46, MULTI+47, MULTI+48, MULTI+49, MULTI+79, TFL+13 , ALERTSO+27 |
| XMTO | ALERTSO+5~, ALERTSO+32 |
| XMTO("G.IBUC | URGENT CARE EXCEPTIONS" , ALERTSO+31* |
| Y | TFL+7~ |
