Call Graph
IBJTLA1 ;ALB/ARH - TPI ACTIVE BILLS LIST BUILD ;2/14/95
Source file <IBJTLA1.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 |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| BLDA | ; build active list for third party joint inquiry active list
|
|
| SCRN | ; add bill to screen list (IBIFN,DFN must be defined)
|
|
| DATE(X) | ; date in external format
|
|
| TYPE(X) | ; return abbreviated form of Bill Classification (399,.05)
|
|
| TF(X) | ; return abbreviated form of Timeframe of Bill (399,.06)
|
|
| SET(X,CNT) | ; set up list manager screen array
|
|
| EEOB(IBIFN) | ; get payment information
; IB*2.0*451 - find an EOB payment for a bill ; input is the IEN for the bill # in file #399 and must be valid, ; output is the EEOB indicator '%' if a payment is found in file #361.1, ; exclude EOB type MRA (Medicare). |
| Name | Field # of Occurrence |
|---|---|
| $$LST^DGMTU | SCRN+14 |
| $$FT^IBCEF | SCRN+20 |
| $$CURR^IBCEF2 | SCRN+32 |
| $$MCRWNR^IBEFUNC | SCRN+32 |
| $$MINS^IBJTU31 | SCRN+30 |
| $$REF^IBJTU31 | SCRN+9 |
| $$ACTIVE^IBJTU4 | BLDA+2 |
| $$ARSTATA^IBJTU4 | SCRN+27 |
| $$BILLREJ^IBJTU6 | SCRN+6 |
| $$TYP^IBRFN | SCRN+23 |
| $$IB^IBRUTL | SCRN+10 |
| $$ECME^IBTRE | SCRN+8 |
| $$BILL^RCJIBFN2 | SCRN+35 |
| $$SETFLD^VALM1 | SCRN+3, SCRN+8, SCRN+9, SCRN+10, SCRN+11, SCRN+12, SCRN+14, SCRN+20, SCRN+25, SCRN+27 , SCRN+29, SCRN+30, SCRN+34, SCRN+36, SCRN+37 |
| Name | Line Occurrences |
|---|---|
| Function Call: WRITE |
|
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^DGCR(399 - [#399] | BLDA+2, SCRN+2, SCRN+31, EEOB+8 |
| ^DGCR(399.3 - [#399.3] | SCRN+29 |
| ^DIC(36 - [#36] | SCRN+33 |
| ^IBM(361.1 - [#361.1] | EEOB+7, EEOB+10, EEOB+11 |
| ^TMP("IBJTLA" | SET+2*, SET+3* |
| ^TMP("IBJTLAX" | SET+4* |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| CNT | SET~, SET+2, SET+3, SET+4 |
| >> DFN | BLDA+2, SCRN+14 |
| IBCNT | BLDA+1~*, SCRN+2*, SCRN+3, SCRN+38 |
| IBD0 | SCRN+1~, SCRN+2*, SCRN+6, SCRN+8, SCRN+16, SCRN+20, SCRN+29 |
| IBDM | SCRN+1~, SCRN+2* |
| IBDU | SCRN+1~, SCRN+2*, SCRN+11, SCRN+12, SCRN+14 |
| IBIFN | BLDA+1~, BLDA+2*, SCRN+2, SCRN+5, SCRN+8, SCRN+9, SCRN+10, SCRN+20, SCRN+23, SCRN+27 , SCRN+30, SCRN+31, SCRN+32, SCRN+35, SET+4, EEOB~, EEOB+6, EEOB+7, EEOB+8, EEOB+10 |
| IBJTLA1 | SCRN+1~ |
| IBPFLAG | SCRN+5*, SCRN+7, EEOB+5~, EEOB+10, EEOB+12*, EEOB+13 |
| >> IBTYP | SCRN+23*, SCRN+24*, SCRN+25 |
| IBVAL | EEOB+5~, EEOB+11*, EEOB+12 |
| IBY | SCRN+1~, SCRN+3*, SCRN+8*, SCRN+9*, SCRN+10*, SCRN+11*, SCRN+12*, SCRN+14*, SCRN+20*, SCRN+25* , SCRN+27*, SCRN+29*, SCRN+30*, SCRN+31*, SCRN+32*, SCRN+33*, SCRN+34, SCRN+35*, SCRN+36, SCRN+37 |
| INDFLG | SCRN+1~, SCRN+7*, SCRN+8 |
| REJFLAG | SCRN+1~, SCRN+6*, SCRN+7 |
| TYPE | SCRN+1~, SCRN+16*, SCRN+20 |
| U | SCRN+6, SCRN+8, SCRN+11, SCRN+12, SCRN+14, SCRN+16, SCRN+20, SCRN+27, SCRN+29, SCRN+33 , SCRN+36, SCRN+37, SET+4 |
| >> VALMCNT | BLDA+1*, BLDA+4, SET+1*, SET+2, SET+3, SET+4 |
| X | SCRN+1~*, SCRN+3*, SCRN+8*, SCRN+9*, SCRN+10*, SCRN+11*, SCRN+12*, SCRN+14*, SCRN+20*, SCRN+25* , SCRN+27*, SCRN+29*, SCRN+30*, SCRN+34*, SCRN+36*, SCRN+37*, SCRN+38, DATE~, DATE+1, TYPE~ , TYPE+1, TF~, TF+1, SET~, SET+2 |
| Y | DATE+1~*, DATE+2 |
| Z | EEOB+5~, EEOB+10*, EEOB+11 |
