IBCE837 ;ALB/TMP - OUTPUT FOR 837 TRANSMISSION ;8/6/03 10:48am
Source file <IBCE837.m>
| Package | Total | Call Graph |
|---|---|---|
| Integrated Billing | 10 | $$MGCHK^IBCE (CHKBTCH,CHKNEW,CLEANUP,ERRMSG,MAILIT,SETVAR,TESTLIM)^IBCE837A QTXMT^IBCE837B SETCLM^IBCE837I $$FT^IBCEF ($$TEST,$$TXMT)^IBCEF4 $$EXTRACT^IBCEFG BILLPARM^IBCEFG0 $$LOCK^IBCEM02 $$TESTPT^IBCEU |
| VA FileMan | 3 | C^%DTC ^DIE $$GET1^DIQ |
| Kernel | 2 | ($$FMTE,$$HTE,$$NOW)^XLFDT $$UP^XLFSTR |
| MailMan | 1 | SENDMSG^XMXAPI |
| 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 | 6 | IBCB1 IBCE IBCEM03 IBCEXTRP ^IBA(364.5 ^IBE(353 |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| EN | ; Auto-txmt
|
|
| SETUP(IBEXTRP) | ; Txmn set up
; IBEXTRP=1 prnt 837 data |
|
| FIND | ; Find/sort by CMS-1500/UB-04, test/live, ins ID # & div
|
|
| OUTPUT | ; 837
|
|
| CLEANUP | ; moved
|
|
| MESSAGE(IBLCNT,IBIEN,IBBILL,IBCTM,IBSIZE,IBSIZEM,IBDUZ,IBBTYP,IBINS) | ; Create msg in ^TMP("IBXMSG",$J)
|
|
| SETHDR | ; hdr for curr batch
|
|
| SETHDR1 | ; hdr node for curr ins
|
|
| SETG | ; msg global for each segment
|
|
| ONE | ; Txmt 1 or more bills for test or in 'X' status for live
|
| Name | Field # of Occurrence |
|---|---|
| C^%DTC | EN+7 |
| ^DIE | EN+10, OUTPUT+61 |
| $$GET1^DIQ | SETUP+16, OUTPUT+42 |
| $$MGCHK^IBCE | EN+5, ONE+1 |
| CHKBTCH^IBCE837A | OUTPUT+55 |
| CHKNEW^IBCE837A | OUTPUT+19, OUTPUT+29, OUTPUT+31 |
| CLEANUP^IBCE837A | CLEANUP+1, ONE+4 |
| ERRMSG^IBCE837A | OUTPUT+11, OUTPUT+70 |
| MAILIT^IBCE837A | OUTPUT+40, OUTPUT+53 |
| SETVAR^IBCE837A | FIND+28 |
| TESTLIM^IBCE837A | FIND+25 |
| QTXMT^IBCE837B | EN+9 |
| SETCLM^IBCE837I | OUTPUT+44 |
| $$FT^IBCEF | FIND+22 |
| $$TEST^IBCEF4 | FIND+20 |
| $$TXMT^IBCEF4 | FIND+15 |
| $$EXTRACT^IBCEFG | OUTPUT+50, OUTPUT+53 |
| BILLPARM^IBCEFG0 | OUTPUT+48 |
| $$LOCK^IBCEM02 | SETUP+18, SETUP+28 |
| $$TESTPT^IBCEU | FIND+23 |
| $$FMTE^XLFDT | SETUP+11 |
| $$HTE^XLFDT | OUTPUT+25, OUTPUT+78 |
| $$NOW^XLFDT | SETUP+11 |
| $$UP^XLFSTR | MESSAGE+20 |
| SENDMSG^XMXAPI | OUTPUT+88 |
| FileNo | Call Tags |
|---|---|
| ^IBE(350.9 - [#350.9] | Classic Fileman Calls, GET1^DIQ |
| ^DIC(36 - [#36] | Classic Fileman Calls |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^DGCR(399 - [#399] | SETUP+31, FIND+14, FIND+19, OUTPUT+69 |
| ^DIC(36 - [#36] | OUTPUT+37, OUTPUT+59 |
| ^IBA(364 - [#364] | SETUP+9, SETUP+31, FIND+12 |
| ^IBA(364.1 - [#364.1] | OUTPUT+85 |
| ^IBA(364.5 - [#364.5] | MESSAGE+14 |
| ^IBE(350.9 - [#350.9] | EN+3, OUTPUT+5 |
| ^IBE(353 - [#353] | OUTPUT+5 |
| ^TMP("IBCE-BATCH" | OUTPUT+4!, OUTPUT+74, OUTPUT+82 |
| ^TMP("IBEDI_TEST_BATCH" | SETUP+3!, SETUP+7*, FIND+6 |
| ^TMP("IBHDR" | SETUP+3!, OUTPUT+55!, SETHDR+1* |
| ^TMP("IBHDR1" | SETUP+3!, OUTPUT+31!, SETHDR1+1* |
| ^TMP("IBICT" | FIND+3!, OUTPUT+59, OUTPUT+61, OUTPUT+72! |
| ^TMP("IBONE" | EN+2!, SETUP+8, SETUP+26, SETUP+28, SETUP+31*, SETUP+32*, FIND+5 |
| ^TMP("IBRESUBMIT" | EN+2!, SETUP+7, SETUP+8, SETUP+13, SETUP+18, SETUP+21*, SETUP+24*, SETUP+25*, FIND+5, OUTPUT+44 , OUTPUT+76, OUTPUT+90* |
| ^TMP("IBSELX" | FIND+5 |
| ^TMP("IBTX" | SETUP+3! |
| ^TMP("IBTXMT" | SETUP+3!, FIND+29*, FIND+33, OUTPUT+19, OUTPUT+29, OUTPUT+31, OUTPUT+39 |
| ^TMP("IBXDATA" | FIND+33*, OUTPUT+53!, OUTPUT+57, MESSAGE+16, MESSAGE+18, MESSAGE+20, MESSAGE+22!, SETHDR+1, SETHDR1+1 |
| ^TMP("IBXERR" | SETUP+3!, SETUP+11*, OUTPUT+63, OUTPUT+69 |
| ^TMP("IBXINS" | SETUP+3!, FIND+29, OUTPUT+33 |
| ^TMP("IBXMSG" | SETUP+3!, OUTPUT+65!, OUTPUT+66*, OUTPUT+69*, OUTPUT+72!, SETG+3* |
| ^TMP($J | FIND+3!, FIND+17, FIND+31*, FIND+34! |
| ^VA(200 - [#200] | SETUP+25, SETUP+32, OUTPUT+79 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| DA | EN+1~, EN+10*, OUTPUT+60~, OUTPUT+61* |
| DIE | EN+1~, EN+10*, OUTPUT+60~, OUTPUT+61* |
| DR | EN+1~, EN+10*, OUTPUT+60~, OUTPUT+61* |
| DT | EN+8, EN+10, OUTPUT+61 |
| DUZ | SETUP+25, SETUP+32, OUTPUT+79 |
| IB | SETUP+2~, SETUP+26*, SETUP+31, SETUP+32, OUTPUT+75~, OUTPUT+81*, OUTPUT+82*, OUTPUT+83, OUTPUT+84, MESSAGE+13~ |
| IB0 | FIND+2~, FIND+14*, FIND+17, FIND+18, FIND+23, FIND+27, FIND+28, FIND+29, FIND+31, OUTPUT+75~ , OUTPUT+82*, OUTPUT+84, OUTPUT+85 |
| IB1 | MESSAGE+13~, MESSAGE+15*, MESSAGE+16*, MESSAGE+18, MESSAGE+20 |
| IB2 | MESSAGE+13~, MESSAGE+17*, MESSAGE+18*, MESSAGE+20 |
| IB3 | OUTPUT+2~, OUTPUT+59*, OUTPUT+61, MESSAGE+13~, MESSAGE+19*, MESSAGE+20* |
| IB837 | OUTPUT+2~, OUTPUT+5*, OUTPUT+7, OUTPUT+50, OUTPUT+53 |
| IB837R | FIND+2~, FIND+28, FIND+29, OUTPUT+2~, OUTPUT+28*, OUTPUT+29*, OUTPUT+31, OUTPUT+39 |
| IBBILL | OUTPUT+2~, OUTPUT+19, OUTPUT+29, OUTPUT+31, OUTPUT+40, OUTPUT+53, OUTPUT+57, MESSAGE~ |
| IBBILL( | MESSAGE+21* |
| IBBTYP | FIND+2~, FIND+22*, FIND+29, OUTPUT+2~, OUTPUT+19*, OUTPUT+20, OUTPUT+21, OUTPUT+25, OUTPUT+29, OUTPUT+31 , OUTPUT+40, OUTPUT+53, OUTPUT+57, MESSAGE~ |
| IBBTYPX | OUTPUT+2~, OUTPUT+17*, OUTPUT+19*, OUTPUT+29, OUTPUT+31, OUTPUT+33, OUTPUT+39 |
| IBCBH | FIND+2~, FIND+18*, FIND+19 |
| IBCT | OUTPUT+2~, OUTPUT+13*, OUTPUT+45*, OUTPUT+56*, OUTPUT+64~, OUTPUT+68*, OUTPUT+69* |
| IBCTM | OUTPUT+2~, OUTPUT+13*, OUTPUT+19, OUTPUT+29, OUTPUT+31, OUTPUT+40, OUTPUT+45*, OUTPUT+53, OUTPUT+54, OUTPUT+56* , OUTPUT+57, MESSAGE~ |
| IBD | OUTPUT+2~, OUTPUT+25*, OUTPUT+26, OUTPUT+37 |
| IBDEFPRT | OUTPUT+2~, OUTPUT+20* |
| IBDEL | MESSAGE+13~, MESSAGE+14*, SETG+1, SETG+2 |
| IBDESC | OUTPUT+2~, OUTPUT+13*, OUTPUT+19, OUTPUT+26*, OUTPUT+29, OUTPUT+31, OUTPUT+37*, OUTPUT+40, OUTPUT+53 |
| IBDFN | OUTPUT+2~, OUTPUT+33*, OUTPUT+39* |
| IBDIV | FIND+2~, FIND+28, FIND+29 |
| IBDUZ | MESSAGE~ |
| IBERR | OUTPUT+64~, OUTPUT+68*, OUTPUT+69* |
| IBEXTRP | SETUP~, SETUP+5 |
| IBGBL | FIND+2~, FIND+5*, FIND+8 |
| IBIEN | MESSAGE~, MESSAGE+21 |
| IBINS | FIND+2~, FIND+19*, FIND+25, FIND+27, FIND+28, FIND+29, OUTPUT+2~, OUTPUT+30*, OUTPUT+31, OUTPUT+33* , OUTPUT+37, OUTPUT+40, OUTPUT+53, OUTPUT+57, OUTPUT+59*, OUTPUT+61, MESSAGE~ |
| IBL | OUTPUT+75~, OUTPUT+81*, OUTPUT+82*, OUTPUT+85*, MESSAGE+13~ |
| IBLCNT | OUTPUT+2~, OUTPUT+30*, OUTPUT+36*, OUTPUT+57, MESSAGE~, SETG+3* |
| >> IBLOC | FIND+13 |
| IBMAX | OUTPUT+2~, OUTPUT+5*, OUTPUT+40 |
| IBNF | FIND+2~, FIND+12*, FIND+13*, FIND+15 |
| IBNID | FIND+2~, FIND+28, FIND+29, FIND+33, OUTPUT+2~, OUTPUT+30*, OUTPUT+31*, OUTPUT+33, OUTPUT+39 |
| IBNOTX | FIND+2~, FIND+15 |
| IBPARMS | OUTPUT+2~, OUTPUT+48, OUTPUT+50, OUTPUT+53 |
| IBQ | OUTPUT+2~, OUTPUT+17*, OUTPUT+19, OUTPUT+21*, OUTPUT+22, OUTPUT+29, OUTPUT+31, OUTPUT+40, OUTPUT+44, OUTPUT+53 , MESSAGE+13~ |
| IBQUEUE | OUTPUT+2~, OUTPUT+13*, OUTPUT+15, OUTPUT+21 |
| IBREC | MESSAGE+13~, MESSAGE+15*, MESSAGE+17*, MESSAGE+19*, MESSAGE+20*, SETG+1*, SETG+2*, SETG+3 |
| IBREF | OUTPUT+2~, OUTPUT+39*, OUTPUT+44, OUTPUT+48, OUTPUT+50, OUTPUT+53, OUTPUT+57 |
| IBRESUB | OUTPUT+75~, OUTPUT+76*, OUTPUT+78, OUTPUT+79, OUTPUT+81, OUTPUT+87, OUTPUT+90 |
| IBRUN | EN+1~, EN+3*, EN+6, EN+8* |
| IBSEC | FIND+2~, FIND+28, FIND+29 |
| IBSITE | OUTPUT+2~, OUTPUT+5*, OUTPUT+13, OUTPUT+19, OUTPUT+26, OUTPUT+29, OUTPUT+31, OUTPUT+35 |
| IBSITE8 | EN+1~, EN+3*, EN+4, EN+6, EN+7, EN+9, EN+10 |
| IBSIZE | OUTPUT+2~, OUTPUT+13*, OUTPUT+19, OUTPUT+29, OUTPUT+31, OUTPUT+40*, OUTPUT+51, OUTPUT+53*, OUTPUT+57, MESSAGE~ , MESSAGE+15*, SETG+2* |
| IBSIZEM | OUTPUT+2~, OUTPUT+50*, OUTPUT+51, OUTPUT+53*, OUTPUT+54, OUTPUT+57, MESSAGE~, MESSAGE+15 |
| IBT | OUTPUT+75~ |
| IBT( | OUTPUT+85* |
| IBT(1 | OUTPUT+78* |
| IBT(2 | OUTPUT+79* |
| IBT(3 | OUTPUT+79* |
| IBTEST | FIND+2~, FIND+6*, FIND+17, FIND+20 |
| IBTESTB | OUTPUT+75~ |
| IBTQUEUE | OUTPUT+2~, OUTPUT+13*, OUTPUT+15, OUTPUT+21 |
| IBTXST | FIND+2~, FIND+15*, FIND+16 |
| IBTXTEST | FIND+2~, FIND+20*, FIND+22, FIND+23, FIND+25, OUTPUT+2~, OUTPUT+21*, OUTPUT+26, OUTPUT+37, OUTPUT+59 , OUTPUT+78, OUTPUT+84, OUTPUT+87 |
| >> IBTYPPTC | FIND+13 |
| IBX | FIND+2~, FIND+8*, FIND+12, FIND+13, FIND+29, OUTPUT+75~, OUTPUT+83*, OUTPUT+84*, OUTPUT+85 |
| IBXERR | SETUP+3!, SETUP+8, SETUP+11*, SETUP+13, SETUP+20*, SETUP+23*, SETUP+26, SETUP+30*, ONE+3 |
| IBXIEN | FIND+2~, FIND+12*, FIND+13*, FIND+14, FIND+15, FIND+19, FIND+20, FIND+22, FIND+28, FIND+29 |
| IBZ | OUTPUT+8~ |
| IBZ(1 | OUTPUT+10* |
| IBZ(2 | OUTPUT+10* |
| U | EN+4, EN+6, EN+7, EN+10, SETUP+7, SETUP+18, SETUP+25, SETUP+31, SETUP+32, FIND+17 , FIND+18, FIND+19, FIND+22, FIND+23, FIND+27, FIND+29, FIND+31, OUTPUT+5, OUTPUT+13, OUTPUT+19 , OUTPUT+26, OUTPUT+35, OUTPUT+37, OUTPUT+44, OUTPUT+57, OUTPUT+61, OUTPUT+69, OUTPUT+79, OUTPUT+84, OUTPUT+85 , MESSAGE+14, MESSAGE+20 |
| X | EN+1~, EN+8 |
| X1 | EN+1~, EN+7* |
| X2 | EN+1~, EN+7* |
| XMBODY | OUTPUT+8~, OUTPUT+9*, OUTPUT+11, OUTPUT+64~, OUTPUT+70*, OUTPUT+87*, OUTPUT+88 |
| XMDUZ | OUTPUT+64~, OUTPUT+75~, OUTPUT+87*, OUTPUT+88 |
| XMSUBJ | OUTPUT+64~, OUTPUT+75~, OUTPUT+87*, OUTPUT+88 |
| XMTO | OUTPUT+64~, OUTPUT+75~, OUTPUT+88 |
| XMTO("I:G.IB | EDI" , OUTPUT+87* |
| XMZ | OUTPUT+75~, OUTPUT+88 |
| Z | SETUP+17~, SETUP+18*, SETUP+19, SETUP+22, SETUP+27~, SETUP+28*, SETUP+29 |
| Z0 | SETUP+17~, SETUP+18*, SETUP+21, SETUP+24, SETUP+27~, SETUP+28*, SETUP+31 |