IBCEST ;ALB/TMP - 837 EDI STATUS MESSAGE PROCESSING ;17-APR-96
Source file <IBCEST.m>
| Package | Total | Call Graph |
|---|---|---|
| Integrated Billing | 7 | ($$FT,$$POLICY)^IBCEF $$LOCK^IBCEM $$CKREVU^IBCEM4 DELMSG^IBCESRV2 ($$CHKSUM,$$SCODE)^IBCEST1 $$PRINTUPD^IBCEU0 FSTRNG^IBJU1 |
| VA FileMan | 5 | FILE^DICN (,UPDATE,WP)^DIE ^DIK $$EXTERNAL^DILFD $$GET1^DIQ |
| Accounts Receivable | 2 | $$STA^PRCAFN (,AUDITX)^PRCAUDT |
| Kernel | 2 | $$FMTE^XLFDT ($$TRIM,$$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 |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| UPD361(IBTDA) | ; Update IB BILL STATUS MESSAGES file
; IBTDA = ien of return message in file 364.2 |
|
| UPDTBILL() | ||
| STORE(IB0,IBBTCH,IBMNUM,IBTDA,IBBILL,IBSEQ,IBPID,IB1) | ;
|
|
| UPDQ | ||
| BLDMSG(IB1,IBTDA,IBT,IBAUTO) | ; Builds message text
; IB1 = flag for batch message ; IBTDA = ien of entry in file 364.2 ; IBT = array returned with message text ; IBAUTO = if passed by reference, returns 1 if text indicates review ; not needed |
|
| UPDINS(IBPID,IBINS,IBIFN,IBTDA) | ||
| UPDINSQ | ||
| UPDLOG(UPD,IBDATE,IBINS,IBLOOK,IBTYP,IBID) | ||
| MSGLNSZ(MSG) | ; Change Input Message Lines to be no more than 70 characters long each
|
| Name | Field # of Occurrence |
|---|---|
| FILE^DICN | STORE+38 |
| ^DIE | STORE+30, STORE+76, STORE+81, UPDINS+23, UPDINS+45, UPDINS+62 |
| UPDATE^DIE | UPDLOG+15 |
| WP^DIE | STORE+86 |
| ^DIK | STORE+52 |
| $$EXTERNAL^DILFD | STORE+18 |
| $$GET1^DIQ | UPDINS+41, UPDINS+42 |
| $$FT^IBCEF | STORE+23 |
| $$POLICY^IBCEF | STORE+24 |
| $$LOCK^IBCEM | UPD361+5 |
| $$CKREVU^IBCEM4 | BLDMSG+10 |
| DELMSG^IBCESRV2 | UPD361+25, STORE+52, STORE+89 |
| $$CHKSUM^IBCEST1 | STORE+20 |
| $$SCODE^IBCEST1 | UPD361+23 |
| $$PRINTUPD^IBCEU0 | STORE+83 |
| FSTRNG^IBJU1 | MSGLNSZ+14 |
| $$STA^PRCAFN | UPD361+17 |
| ^PRCAUDT | UPD361+15 |
| AUDITX^PRCAUDT | UPD361+23 |
| $$FMTE^XLFDT | BLDMSG+8 |
| $$TRIM^XLFSTR | UPD361+21, MSGLNSZ+9 |
| $$UP^XLFSTR | STORE+68, STORE+83 |
| SENDMSG^XMXAPI | UPDINS+76 |
| FileNo | Call Tags |
|---|---|
| ^DIC(36 - [#36] | Classic Fileman Calls, GET1^DIQ |
| ^IBM(361 - [#361] | Classic Fileman Calls, WP^DIE |
| ^IBA(364.2 - [#364.2] | EXTERNAL^DILFD |
| ^DGCR(399 - [#399] | Classic Fileman Calls |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^DGCR(399 - [#399] | UPD361+23, UPDINS+69 |
| ^DGCR(399.3 - [#399.3] | UPD361+23 |
| ^DIC(36 - [#36] | UPDINS+57, UPDINS+70, UPDLOG+8 |
| ^IBA(364 - [#364] | UPD361+9, UPD361+32, UPD361+34 |
| ^IBA(364.1 - [#364.1] | BLDMSG+8 |
| ^IBA(364.2 - [#364.2] | UPD361+7, UPD361+19, UPDTBILL+4, UPDQ, BLDMSG+8, BLDMSG+10 |
| ^IBM(361 - [#361] | STORE+46, STORE+48, STORE+50, STORE+66, STORE+80, STORE+82, STORE+83 |
| ^TMP("IBCONF" | UPD361+33 |
| Name | Field # of Occurrence |
|---|---|
| ^( | UPD361+19, UPDTBILL+5, BLDMSG+10 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| CNT | MSGLNSZ+5~, MSGLNSZ+6*, MSGLNSZ+17* |
| DA | STORE+13~, STORE+29*, STORE+44~, STORE+52*, STORE+76*, STORE+81*, UPDINS+10~, UPDINS+23*, UPDINS+45*, UPDINS+62* |
| DD | STORE+13~, STORE+39! |
| DIC | STORE+13~, STORE+36*, STORE+39! |
| DIC("DR" | STORE+37* |
| DIC(0 | STORE+36* |
| DIE | STORE+13~, STORE+29*, STORE+76*, STORE+81*, UPDINS+10~, UPDINS+23*, UPDINS+45*, UPDINS+62* |
| DIK | STORE+13~, STORE+44~, STORE+52* |
| DLAYGO | STORE+13~, STORE+36*, STORE+39! |
| DO | STORE+13~, STORE+39! |
| DONE | UPDINS+10~, UPDINS+39*, UPDINS+40, UPDINS+47*, UPDINS+50 |
| DR | STORE+13~, STORE+29*, STORE+76*, STORE+81*, UPDINS+10~, UPDINS+23*, UPDINS+45*, UPDINS+62* |
| DT | UPDINS+34 |
| ERROR | UPDLOG+9~ |
| HAVONE | UPDINS+10~, UPDINS+39*, UPDINS+40, UPDINS+43*, UPDINS+50 |
| IB | UPD361+3~, UPD361+34*, UPD361+35 |
| IB0 | UPD361+3~, UPD361+7*, UPD361+8, UPD361+9, UPD361+11, UPDTBILL+9, STORE~, STORE+17, STORE+18, STORE+19 |
| IB00 | UPD361+3~, UPD361+9*, UPD361+10, UPDTBILL+8 |
| IB1 | STORE~, STORE+59, STORE+82, BLDMSG~, BLDMSG+8 |
| IBA1 | UPDTBILL+1~, UPDTBILL+2*, UPDTBILL+4*, UPDTBILL+5 |
| IBAUTO | STORE+13~, STORE+59, STORE+76*, STORE+80, BLDMSG~, BLDMSG+7*, BLDMSG+10* |
| IBBILL | UPD361+3~, UPD361+10*, UPD361+15, UPD361+17, UPD361+23, UPD361+25, UPD361+28, UPD361+31*, UPD361+32*, UPD361+33 , UPD361+34, UPDTBILL+9, STORE~, STORE+15, STORE+23, STORE+24, STORE+48 |
| IBBTCH | UPD361+3~, UPD361+11*, UPD361+25, UPD361+32, UPD361+34, UPDTBILL+9, STORE~, STORE+18, BLDMSG+8 |
| IBCK | BLDMSG+6~, BLDMSG+7*, BLDMSG+10 |
| IBDATA | BLDMSG+6~, BLDMSG+7*, BLDMSG+10* |
| IBDATE | UPD361+3~, UPDINS+34*, UPDINS+46, UPDINS+50, UPDINS+63, UPDINS+77, UPDLOG~, UPDLOG+8, UPDLOG+12 |
| IBDUP | STORE+13~, STORE+15*, STORE+26, STORE+29, STORE+32, STORE+35 |
| IBFDA | UPDLOG+9~ |
| IBFDA( | UPDLOG+11*, UPDLOG+12*, UPDLOG+13*, UPDLOG+14* |
| IBFLDS | STORE+13~, STORE+17*, STORE+18*, STORE+19*, STORE+20*, STORE+29, STORE+37 |
| IBHOLD | UPDINS+10~, UPDINS+19*, UPDINS+21, UPDINS+29, UPDINS+30, UPDINS+36 |
| IBID | UPDINS+10~, UPDINS+35*, UPDINS+42*, UPDINS+46, UPDINS+50, UPDINS+57*, UPDINS+58, UPDINS+61, UPDINS+63, UPDINS+64 , UPDINS+73, UPDINS+77, UPDLOG~, UPDLOG+14 |
| IBIDFLD | UPDINS+10~, UPDINS+54*, UPDINS+56*, UPDINS+57, UPDINS+62 |
| IBIDQ | UPDINS+10~, UPDINS+35*, UPDINS+41*, UPDINS+43, UPDINS+44 |
| IBIFN | UPDINS~, UPDINS+23, UPDINS+69 |
| IBINS | UPDINS~, UPDINS+12, UPDINS+41, UPDINS+42, UPDINS+45, UPDINS+46, UPDINS+50, UPDINS+57, UPDINS+62, UPDINS+63 , UPDINS+70, UPDINS+77, UPDLOG~, UPDLOG+8, UPDLOG+10 |
| IBLN | STORE+13~, STORE+68*, STORE+70, STORE+71, STORE+72, STORE+73, STORE+74, STORE+75 |
| IBLOOK | UPDINS+10~, UPDINS+15*, UPDINS+30*, UPDINS+31, UPDINS+58, UPDINS+62, UPDINS+63, UPDINS+64, UPDINS+74, UPDINS+77 , UPDLOG~, UPDLOG+8, UPDLOG+11 |
| IBMNUM | UPD361+3~, UPD361+8*, UPD361+25, UPDTBILL+9, STORE~, STORE+18 |
| IBMSG0 | UPDTBILL+1~, UPDTBILL+5*, UPDTBILL+6 |
| IBNEW | STORE+44~, STORE+45*, STORE+46*, STORE+51 |
| IBOLD | STORE+44~, STORE+49*, STORE+50*, STORE+51 |
| IBPID | UPDTBILL+1~, UPDTBILL+2*, UPDTBILL+4, UPDTBILL+6*, UPDTBILL+9, STORE~, STORE+21, STORE+24, UPDINS~, UPDINS+12 , UPDINS+19, UPDINS+34 |
| IBPID("TYPE" | STORE+23*, UPDINS+34, UPDINS+54, UPDINS+56, UPDINS+72 |
| IBPID69 | UPDINS+10~, UPDINS+34*, UPDINS+36, UPDINS+45, UPDINS+46, UPDINS+50 |
| IBPRT | UPDINS+10~, UPDINS+21*, UPDINS+22, UPDINS+28 |
| IBQUAL | UPDINS+10~ |
| IBQUAL( | UPDINS+41, UPDINS+45 |
| IBQUAL(1 | UPDINS+37* |
| IBQUAL(2 | UPDINS+37* |
| IBSEQ | UPD361+3~, UPDTBILL+8*, UPDTBILL+9, STORE~, STORE+18, STORE+24 |
| IBSID | UPDINS+10~ |
| IBSID( | UPDINS+42, UPDINS+45 |
| IBSID(1 | UPDINS+38* |
| IBSID(2 | UPDINS+38* |
| IBT | STORE+13~, STORE+34!, STORE+57!, STORE+59, STORE+85, BLDMSG~ |
| IBT( | STORE+67, STORE+68, STORE+82, STORE+83, BLDMSG+10* |
| IBT(1 | BLDMSG+8* |
| IBTDA | UPD361~, UPD361+5, UPD361+7, UPD361+19, UPD361+25, UPDTBILL+4, UPDTBILL+9, STORE~, STORE+20, STORE+24 , STORE+52, STORE+59, STORE+89, UPDQ, BLDMSG~, BLDMSG+8, BLDMSG+10, UPDINS~ |
| IBTYP | UPD361+3~, UPDINS+34*, UPDINS+36, UPDINS+37, UPDINS+38, UPDINS+46, UPDINS+50, UPDINS+63, UPDINS+77, UPDLOG~ , UPDLOG+8, UPDLOG+13 |
| IBXM | UPDINS+66~ |
| IBXM(1 | UPDINS+69* |
| IBXM(2 | UPDINS+70* |
| IBXM(3 | UPDINS+72* |
| IBXM(4 | UPDINS+73* |
| IBXM(5 | UPDINS+74* |
| IBXM(6 | UPDINS+75* |
| IBXM(7 | UPDINS+75* |
| IBXM(8 | UPDINS+75* |
| IBY | STORE+13~, STORE+31*, STORE+32*, STORE+40*, STORE+41, STORE+46, STORE+48, STORE+52*, STORE+56, STORE+66 , STORE+76, STORE+80, STORE+81, STORE+82, STORE+83, STORE+86 |
| IBZ | BLDMSG+6~, BLDMSG+7*, BLDMSG+10* |
| IBZ0 | BLDMSG+6~, BLDMSG+7*, BLDMSG+8*, BLDMSG+10* |
| IBZ1 | BLDMSG+6~, BLDMSG+10* |
| II | UPDINS+10~, UPDINS+40*, UPDINS+41, UPDINS+42, UPDINS+45 |
| LDNGSP | MSGLNSZ+5~, MSGLNSZ+10*, MSGLNSZ+11*, MSGLNSZ+17 |
| LDNGSPN | MSGLNSZ+5~, MSGLNSZ+11*, MSGLNSZ+14 |
| LEV | UPDLOG+9~, UPDLOG+10*, UPDLOG+11, UPDLOG+12, UPDLOG+13, UPDLOG+14 |
| LN | MSGLNSZ+5~, MSGLNSZ+6*, MSGLNSZ+9, MSGLNSZ+10 |
| MSG | MSGLNSZ~, MSGLNSZ+20!* |
| MSG( | MSGLNSZ+6, MSGLNSZ+9, MSGLNSZ+10 |
| OK | UPD361+16~, UPD361+18*, UPD361+19, UPD361+23* |
| OUTMSG | MSGLNSZ+5~, MSGLNSZ+20 |
| OUTMSG( | MSGLNSZ+17* |
| PCE | STORE+44~, STORE+46*, STORE+50* |
| TMPMSG | MSGLNSZ+5~, MSGLNSZ+9*, MSGLNSZ+10, MSGLNSZ+14 |
| U | UPD361+8, UPD361+9, UPD361+11, UPD361+19, UPD361+23, UPDTBILL+6, UPDTBILL+8, STORE+17, STORE+18, STORE+19 , STORE+46, STORE+50, STORE+66, STORE+80, STORE+82, STORE+83, BLDMSG+8, UPDINS+36, UPDINS+57, UPDINS+69 , UPDINS+70 |
| UPD | UPDLOG~, UPDLOG+8 |
| UPDATE | UPDINS+10~, UPDINS+34* |
| X | STORE+13~, STORE+15*, UPDINS+10~ |
| XARY | MSGLNSZ+5~, MSGLNSZ+14! |
| XARY( | MSGLNSZ+17 |
| XARYLN | MSGLNSZ+5~, MSGLNSZ+17* |
| XMBODY | UPDINS+66~, UPDINS+68*, UPDINS+76 |
| XMDUZ | UPDINS+66~, UPDINS+68*, UPDINS+76 |
| XMSUBJ | UPDINS+66~, UPDINS+68*, UPDINS+76 |
| XMTO | UPDINS+66~, UPDINS+76 |
| XMTO("I:G.IB | EDI" , UPDINS+67* |
| XMZ | UPDINS+66~, UPDINS+76 |
| Y | STORE+13~, STORE+26, STORE+31, STORE+40, UPDINS+10~ |
| Z | UPD361+16~, UPD361+18*, UPD361+19*, STORE+13~, STORE+44~, STORE+47*, STORE+48*, STORE+50, STORE+67*, STORE+68 , STORE+82*, STORE+83, BLDMSG+6~, BLDMSG+10*, UPDINS+10~, UPDINS+19* |
| Z0 | UPD361+16~, UPD361+19*, UPD361+21*, UPD361+22, UPD361+23, STORE+13~, STORE+67*, STORE+69, STORE+70*, STORE+73 , STORE+82*, STORE+83* |
| Z1 | UPD361+16~, STORE+13~, STORE+67*, STORE+69, STORE+71*, STORE+74 |
| Z2 | STORE+13~, STORE+67*, STORE+69, STORE+72*, STORE+75 |
| Z3 | STORE+13~, STORE+67*, STORE+73*, STORE+74*, STORE+75*, STORE+76 |
| Name | Field # of Occurrence |
|---|---|
| $T(PRCAUDT+1^PRCAUDT | UPD361+15 |