©2011-2018 Open Source Electronic Health Record Alliance
This work is licensed under a Creative Commons Attribution 3.0 Unported License
This work is licensed under a Creative Commons Attribution 3.0 Unported License
IBARX ;ALB/AAS - INTEGRATED BILLING, PHARMACY COPAY INTERFACE ; 14-FEB-91
Source file <IBARX.m>
| Package | Total | Call Graph |
|---|---|---|
| Integrated Billing | 5 | (,E3)^IBAERR ^IBAFIL (CANRX,RX)^IBARX1 $$RXEXMT^IBARXEU0 (ARPARM,BILLNO,CHKX)^IBAUTL |
| Registration | 1 | (ELIG,INP)^VADPT |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| NEWQ | ||
| END | ||
| XTYPE | ; - tag XTYPE - returns array of billable action types for service
|
|
| DOM | ||
| CANQ | ||
| UCHPARQ | ||
| XTYPEQ | ||
| U1 | ||
| UPDATE | ; - will cancel current open charge and create updated entry
|
|
| UPDQ | ||
| U2 | ||
| UCHPAR | ; Check that IB action and its parent exist.
|
|
| N1 | ||
| CANCEL | ; - cancel charges for a rx
|
|
| NEW | ; - process new/renew/refill rx for charges
|
|
| C1 | ||
| X1 | ||
| INSTAL |
| Name | Field # of Occurrence |
|---|---|
| ^IBAERR | NEWQ, C1+8, CANQ, UPDQ |
| E3^IBAERR | X1+7 |
| ^IBAFIL | N1+21, C1+7, U2+17 |
| CANRX^IBARX1 | C1+7 |
| RX^IBARX1 | N1+19, U2+16 |
| $$RXEXMT^IBARXEU0 | N1+10, U2+7 |
| ARPARM^IBAUTL | N1+5, C1+4, U2+3 |
| BILLNO^IBAUTL | N1+16, U2+14 |
| CHKX^IBAUTL | X1+3, N1+2, C1+1, U1+1, U2+2 |
| ELIG^VADPT | X1+9 |
| INP^VADPT | X1+9 |
| Name | Line Occurrences |
|---|---|
| Function Call: WRITE |
|
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^DIC(42 - [#42] | DOM |
| ^IB - [#350] | UCHPAR+2, UCHPAR+3, UCHPAR+4 |
| ^IB(0 | INSTAL |
| ^IBE(350.1 - [#350.1] | X1+5, X1+10, N1+18, U2+12, U2+15 |
| ^IBE(350.9 - [#350.9] | INSTAL |
| Name | Line Occurrences |
|---|---|
| CANCEL | U1+6 |
| CANQ | C1+1, C1+2, C1+4 |
| DOM | X1+9 |
| END | NEWQ+1, CANQ+2 |
| INSTAL | X1, N1 |
| NEWQ | N1+2, N1+3, N1+5, N1+10, N1+16, N1+18, N1+20 |
| UCHPAR | U2+16 |
| UCHPARQ | UCHPAR+2 |
| UPDQ | U1+1, U1+3, U2+2, U2+3, U2+7, U2+12, U2+14, U2+15 |
| XTYPEQ | X1+3, X1+5 |
| Name | Field # of Occurrence |
|---|---|
| ^(0 | DOM |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| % | END! |
| %H | END! |
| %I | END! |
| DA | X1+1~, X1+10*, N1+1~, C1~, U1~ |
| DFN | X1+1~, N1+1~, N1+10, C1~, U1~, U2+7 |
| DT | N1+10, U2+7 |
| I | X1+1~, X1+10*, N1+1~, C1~, U1~ |
| IBAFY | END! |
| IBARTYP | END! |
| IBATYP | N1+18, U2+12*, U2+15, END! |
| IBCHRG | END! |
| IBCRES | END! |
| IBDESC | END! |
| IBDOM | XTYPEQ!, DOM* |
| IBDUZ | END! |
| IBFAC | END! |
| IBI | END! |
| IBIL | END! |
| IBJ | N1+11*, N1+12*, N1+18*, N1+19*, N1+22*, C1+6*, C1+7*, U2+8*, U2+9*, U2+16* , U2+18*, END!, UCHPAR+2, UCHPAR+4 |
| IBLAST | END! |
| >> IBM | C1+8* |
| IBN | END! |
| IBND | END! |
| IBNOS | U2+15*, END! |
| IBNOW | END! |
| IBPARNT | END!, UCHPAR+1*, UCHPAR+2, UCHPAR+3*, UCHPAR+4 |
| IBSAVX | X1+1*, XTYPEQ!, N1!, N1+2*, N1+23, C1!, C1+1*, CANQ+1, U1!, U1+1* , U1+2, U2+2*, END! |
| IBSAVX( | N1+4*, N1+12, N1+19, C1+3*, C1+7 |
| IBSAVXU | U1+2*, U2+1, U2+19, UPDQ+1! |
| IBSAVXU( | U1+4*, U2+1, U2+9, U2+16 |
| IBSAVY | END! |
| IBSAVY( | N1+22, U2+16, U2+18, UCHPAR+2*, UCHPAR+4* |
| IBSEQNO | N1+18*, U2+15*, END! |
| IBSERV | X1+5, X1+10, XTYPEQ!, END! |
| IBSITE | END! |
| IBT | C1+8*, CANQ, END! |
| IBTAG | X1+1*, XTYPEQ!, N1+2*, C1+1*, U1+1*, U2+2*, END! |
| IBTOTL | N1+15*, N1+18*, N1+23, C1+6*, U2+15*, U2+19, END! |
| IBTRAN | END! |
| IBUNIT | END! |
| IBWHER | X1+1*, XTYPEQ!, N1+2*, C1+1*, U1+1*, END! |
| IBX | N1+19*, C1+7*, U2+16*, END!, UCHPAR+1 |
| IBY | C1+8*, END! |
| IBY( | C1+7*, C1+8 |
| J | X1+1~, N1+1~, N1+4*, C1~, C1+3*, U1~, U1+4*, U2+1* |
| K | END! |
| VA | XTYPEQ! |
| VAEL | XTYPEQ! |
| VAERR | XTYPEQ! |
| VAIN | XTYPEQ! |
| VAIN(4 | DOM |
| X | X1+1, X1+9~, X1+10, N1+2, N1+3, N1+23*, C1+1, C1+2, CANQ+1*, U1+1 , U1+3, U2!, U2+1*, U2+2, U2+19* |
| X( | N1+4, C1+3, U1+4*, U2+1* |
| X1 | X1+1~, X1+10, XTYPEQ!, N1+1~, C1~, U1~, END! |
| X2 | X1+1~, X1+10, XTYPEQ!, N1+1~, C1~, U1~, END! |
| X3 | END! |
| Y | X1!*, X1+1*, X1+3, X1+5*, X1+9*, N1!*, N1+2*, N1+3*, N1+5, N1+10* , N1+16, N1+18*, N1+20, N1+23*, NEWQ, C1!, C1+1*, C1+2*, C1+4, C1+7 , C1+8*, CANQ, U1!, U1+1*, U1+3*, U2+2*, U2+3, U2+7*, U2+12*, U2+14 , U2+15*, U2+18*, U2+19*, UPDQ |
| Y( | X1+10*, N1+12*, N1+22*, C1+8*, U2+9*, U2+18* |
| >> ZTQUEUED | X1+6 |