IBCEQ1 ;BSL,ALB/TMK - PROVIDER ID QUERY ;25-AUG-03
Source file <IBCEQ1.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 |
|---|---|---|
| EN | ;
|
|
| EN1Q | ||
| ENT(IBREBLD,IBTO) | ; Queued job enter here
|
|
| LP | ; Loop through ids
|
|
| SET(Z) | ;SET VALUES INTO SAVE GLOBAL
; Z=REASON WHY WE'RE SETTING IT ; 1. PAYER-ins co name (36) ; 2. PLAN-grp name (355.3) ; 3. GROUP-grp # (355.3) ; 4. FTA-form typ (355.9) ; 5. EPLAN-"BL" (355.3) ; 6. IEPLAN-elec ins typ (36) ; 7. IPROV-hosp prov# (36) ; 8. PPROV-prof prov# (36) ; 9. EDII-inst edi id# (36) |
| Name | Line Occurrences |
|---|---|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Routine Call |
|
| Routine Call |
|
| Routine Call |
|
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^DIC(36 - [#36] | LP+16 |
| ^IBA( | LP+8, LP+11 |
| ^IBA(355.3 - [#355.3] | LP+34, LP+35, LP+47, LP+48 |
| ^IBA(355.9 - [#355.9] | LP+32 |
| ^IBA(355.91 - [#355.91] | LP+32 |
| ^IBE(355.97 - [#355.97] | LP+3, LP+14 |
| ^TMP("XMY" | EN+10!, EN+13, EN+14! |
| ^TMP("XMY0" | EN+10!, EN+14! |
| ^TMP($J | ENT+3!, ENT+4*, ENT+5*, ENT+17! |
| ^XTMP("IB_PLAN232" | EN+2, EN+3, ENT+8!, ENT+9*, LP+29, LP+30*, LP+45, LP+46*, LP+51*, LP+54* , LP+57*, LP+60*, SET+21, SET+22* |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| %ZIS | EN+1~, EN+16* |
| A | SET+19~, SET+21*, SET+22 |
| BCR | LP+1~, LP+2*, LP+4*, LP+7*, LP+27 |
| BL | LP+1~, LP+33*, LP+35*, LP+36 |
| BLUE | LP+1~, LP+2*, LP+38*, LP+57 |
| BSH | LP+1~, LP+2*, LP+5*, LP+7*, LP+27 |
| DIR | EN+1~, EN+5!, LP+1~ |
| DIR("?" | EN+4* |
| DIR("A" | EN+5* |
| DIR("B" | EN+5* |
| DIR(0 | EN+5* |
| DT | ENT+9 |
| DTOUT | EN+1~, EN+6, LP+1~ |
| DUOUT | EN+1~, EN+6, LP+1~ |
| DUP | SET+19~ |
| DUZ | EN+12 |
| EDII | LP+1~, LP+9*, LP+19* |
| EDIP | LP+1~, LP+9*, LP+18* |
| FTA | LP+1~, LP+9*, LP+24*, LP+40, LP+41, LP+42, SET+22 |
| IB | LP+1~, LP+11*, LP+12, LP+15, LP+24, LP+26 |
| IBI0 | LP+1~, LP+16*, LP+17, LP+21, LP+22, LP+23 |
| IBI3 | LP+1~, LP+16*, LP+18, LP+19, LP+20 |
| IBPMBPID | LP+1~, LP+9*, LP+25*, SET+22 |
| IBREBLD | EN+1~, EN+2*, EN+7*, EN+18, EN+23, ENT~, ENT+4, ENT+6 |
| IBSENDM | EN+1~ |
| IBTO | EN+1~, EN+23, ENT~ |
| IBTO( | EN+13*, ENT+5 |
| IEPLAN | LP+1~, LP+9*, LP+20*, SET+22 |
| IO | EN+22 |
| IO("Q" | EN+17, EN+21! |
| IPROV | LP+1~, LP+9*, LP+22* |
| LOOP | ENT+2~, ENT+13*, LP+8, LP+11, LP+15, LP+25 |
| NBLUE | LP+1~, LP+2*, LP+36*, LP+51 |
| PAYER | LP+1~, LP+9*, LP+16*, SET+22 |
| PAYERP | LP+1~, LP+9*, LP+15*, LP+16, LP+29, LP+30, LP+32, LP+34, LP+45, LP+46 , LP+47, SET+22 |
| PLANIEN | LP+1~, LP+9*, LP+35*, LP+48*, SET+22 |
| POP | EN+1~, EN+16 |
| PPROV | LP+1~, LP+9*, LP+21* |
| PTYP | LP+1~, LP+12*, LP+13, LP+14, LP+26, LP+27, LP+40, LP+41, LP+42 |
| PTYPNM | LP+1~, LP+9*, LP+14*, SET+22 |
| SEQ | LP+1~, LP+2*, LP+10*, LP+54 |
| TOT | LP+1~, LP+2*, LP+60, SET+21* |
| TYPCOV | LP+1~, LP+9*, LP+23*, SET+22 |
| U | ENT+9, LP+4, LP+5, LP+6, LP+12, LP+14, LP+15, LP+16, LP+17, LP+18 , LP+19, LP+20, LP+21, LP+22, LP+23, LP+24, LP+26, LP+35, LP+48, LP+51 , LP+54, LP+57, LP+60, SET+22 |
| UPIN | LP+1~, LP+2*, LP+6*, LP+7*, LP+26 |
| X | EN+1~, LP+1~, LP+2*, LP+8*, LP+11, LP+25 |
| XMINSTR | EN+9~, EN+12 |
| XMINSTR("ADDR | FLAGS" , EN+11* |
| Y | EN+1~, EN+6 |
| Z | EN+1~, EN+9~, EN+13*, ENT+2~, ENT+5*, LP+1~, LP+3*, LP+4, LP+5, LP+6 , SET~, SET+22 |
| Z0 | LP+1~, LP+3* |
| Z1 | LP+1~, LP+34*, LP+35, LP+46*, LP+47*, LP+48 |
| ZTDESC | EN+1~, EN+18* |
| ZTRTN | EN+1~, EN+18* |
| ZTSAVE | EN+9~ |
| ZTSAVE("IBTO(" | EN+18* |
| ZTSK | EN+1~, EN+20, EN+21! |
