IBCE837K ;EDE/JWS - ACK FOR 837 FHIR TRANSMISSION ;8/6/18 10:48am
Source file <IBCE837K.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 | 1 | IBTAS 837 ACK |
Name | Comments | DBIA/ICR reference |
---|---|---|
GET(RESULT,ARG) | ;RPC - EDIACKCLAIMS; ack queue posting
|
|
R | ; setup return JSON
; create JSON structured message |
|
EMAIL(IBIEN,IBTXTEST,IBBATCH) | ; Send an email message to MCT mail group - to emulate existing functionality
|
|
EMAILX | ;
|
Name | Field # of Occurrence |
---|---|
DTNOLF^DICRW | GET+5 |
^DIE | GET+22 |
CLEAN^DILF | EMAILX+2 |
$$GET1^DIQ | GET+29, EMAIL+3, EMAIL+4, EMAIL+5 |
UPD^IBCE837A | GET+30 |
FINISH^IBCE837I | R+5 |
SETSUB^IBCE837I | GET+33 |
$$FT^IBCEF | GET+27 |
$$LAST364^IBCEF4 | GET+15 |
$$TEST^IBCEF4 | GET+27 |
$$HTE^XLFDT | GET+28 |
ENCODE^XLFJSONE | R+4 |
SENDMSG^XMXAPI | EMAIL+23 |
$$PROD^XUPROD | GET+27 |
RPC Name | Call Tags |
---|---|
IBTAS 837 ACK | GET |
FileNo | Call Tags |
---|---|
^IBE(350.9 - [#350.9] | GET1^DIQ |
^IBA(364 - [#364] | Classic Fileman Calls, GET1^DIQ |
^DGCR(399 - [#399] | GET1^DIQ |
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^IBA(364 - [#364] | GET+19, GET+20, GET+21, GET+22, GET+25, GET+27 |
Name | Line Occurrences |
---|---|
GET+34 | |
R | GET+13 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
ARG | GET~ |
ARG("IEN399" | GET+7 |
ARG("RES" | GET+11 |
>> DA | GET+22* |
DIE | GET+22*, GET+31! |
>> DR | GET+22* |
DUZ | GET+2~, EMAIL+2*, EMAIL+23, EMAILX+3* |
IB364 | GET+2~, GET+15*, GET+18, GET+19, GET+23*, GET+25*, GET+27, GET+29, GET+33 |
IBBATCH | GET+2~, GET+29*, GET+30, GET+34, EMAIL~, EMAIL+12 |
IBBATCHN | EMAIL+1~ |
IBBILL | GET+2~, GET+30 |
IBBILL( | GET+27* |
IBBTYP | GET+2~, GET+27*, GET+28, GET+30 |
IBCLAIM | EMAIL+1~, EMAIL+3*, EMAIL+12 |
IBDESC | GET+2~, GET+28*, GET+30 |
IBEQ | EMAIL+1~, EMAIL+8*, EMAIL+9, EMAIL+12, EMAIL+13, EMAIL+21 |
IBIEN | GET+2~, GET+7*, GET+15, GET+20, GET+25, GET+27, GET+34, R+2, EMAIL~, EMAIL+3 , EMAIL+9, EMAIL+12 |
IBLQ | EMAIL+1~, EMAIL+5*, EMAIL+8 |
IBRES | GET+2~, GET+11*, GET+13 |
IBTEST | GET+2~, GET+27* |
IBTQ | EMAIL+1~, EMAIL+4*, EMAIL+8 |
IBTXTEST | GET+2~, GET+27*, GET+28, GET+34, EMAIL~, EMAIL+8 |
MSG | EMAIL+1~ |
MSG(1 | EMAIL+12* |
MSG(2 | EMAIL+13* |
MSG(3 | EMAIL+14* |
ODUZ | EMAIL+1~, EMAIL+2*, EMAILX+3 |
OK | GET+20~*, GET+23*, GET+24 |
RES | GET+2~, GET+13*, GET+36*, R+3 |
RES("ien" | R+2* |
RES("status" | R+3* |
RESULT | GET~, GET+3! |
SUBJ | EMAIL+1~, EMAIL+9*, EMAIL+23 |
U | GET+27 |
X | EMAIL+1~ |
X1 | GET+20~*, GET+21, GET+22, GET+23, GET+25* |
XMINSTR | EMAIL+1~, EMAIL+23 |
XMINSTR("FROM" | EMAIL+22* |
XMTO | EMAIL+1~, EMAIL+23 |
XMTO("G." | EMAIL+21* |
XMTO("G.CLAIMS4US" | EMAIL+20* |