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~ |