IBCEP4 ;ALB/TMP - EDI UTILITIES for provider ID ;29-SEP-00
Source file <IBCEP4.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 |
| Package | Total | Caller Graph |
|---|---|---|
| Integrated Billing | 5 | IBCE PRVCARE UNIT MAINT IBCEP4A IBCEP5B IBCEP5C IBCEP9B |
| Kernel | 1 | ^ORD(101 |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| EN | ; -- main entry point
|
|
| EN1(IBINS) | ; -- Entry point from provider number maintenence
|
|
| ENX | ; Common call to list template for dual entry points
|
|
| HDR | ; -- header
|
|
| INIT | ; -- init variables, list array
|
|
| BLD | ; Bld display - IBINS must = ien of file 36
|
|
| HELP | ; -- help
|
|
| EXIT | ; -- exit
|
|
| EXPND | ;
|
|
| SEL(IBDA,MANY) | ; Select from care unit list
; IBDA is passed by reference and IBDA(1) returned containing ; ien's of the care unit selected (file 355.95). ; If > 1 entry can be selected, MANY is set to 1 |
|
| DISP(IBVAR,IBINS,IBPTYP,IBFT,IBCT,START,END) | ; Set up display array for
; provider id |
|
| CAREUOK(IBIFN,IBCU,IBTYPE,IBSEQ) | ; Returns 1 if care unit is appropriate
; for bill based on provider type, care type, bill type and insurance co ; IBIFN = ien of bill (file 399) ; IBCU = the ien of the care unit (file 355.96) ; IBTYPE = type of ID being checked (1=performing, 2=EMC) ; IBSEQ = the COB seq being checked (1-3) |
|
| CAREOKQ |
| Name | Field # of Occurrence |
|---|---|
| ^DIR | ENX+6, INIT+6 |
| $$FT^IBCEF | CAREUOK+8 |
| $$INPAT^IBCEF | CAREUOK+11 |
| $$FINDINS^IBCEF1 | CAREUOK+8 |
| $$ISRX^IBCEF1 | CAREUOK+10 |
| $$EMCID^IBCEP | CAREUOK+9 |
| $$PPTYP^IBCEP0 | CAREUOK+9 |
| $$EXPAND^IBTRE | BLD+13, DISP+6, DISP+7, DISP+8 |
| EN^VALM | ENX+9, ENX+10 |
| FULL^VALM1 | ENX+3 |
| CLEAN^VALM10 | EXIT+1 |
| SET^VALM10 | BLD+8, BLD+9, BLD+15, BLD+17 |
| EN^VALM2 | SEL+6 |
| DISP^XQORM1 | HELP+4 |
| Name | Line Occurrences |
|---|---|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Routine Call |
|
| Routine Call |
|
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^DIC(36 - [#36] | HDR+3, DISP+5 |
| ^IBA(355.95 - [#355.95] | BLD+6 |
| ^IBA(355.96 - [#355.96] | BLD+8, BLD+11, CAREUOK+13, CAREUOK+14, CAREUOK+15, CAREUOK+16 |
| ^TMP("IBPRV_CU" | BLD+1!, BLD+10*, EXIT+2!, SEL+7 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| DIR | ENX+1~, ENX+6!, INIT+1~, INIT+6! |
| DIR("?" | INIT+5* |
| DIR("A" | ENX+5*, INIT+5* |
| DIR("B" | ENX+5* |
| DIR(0 | ENX+4*, ENX+5, INIT+5* |
| >> DTOUT | INIT+7 |
| >> DUOUT | INIT+7 |
| END | DISP~, DISP+4*, DISP+9* |
| IB | INIT+1~, BLD+6*, BLD+8, BLD+9 |
| IB0 | INIT+1~, BLD+11*, BLD+13, BLD+14 |
| IB95 | EN+1~, EN1+1~ |
| IBALL | EN+1~, EN1+1~, HDR+3, EXIT+2! |
| IBCT | DISP~, DISP+8, CAREUOK+6~, CAREUOK+11*, CAREUOK+15, CAREUOK+16 |
| IBCU | CAREUOK~, CAREUOK+13, CAREUOK+14, CAREUOK+15, CAREUOK+16 |
| IBDA | SEL~, SEL+5*, SEL+7* |
| IBDA( | SEL+7* |
| IBENT | INIT+1~, BLD+5*, BLD+7*, BLD+8, BLD+9, BLD+10, BLD+15 |
| IBFASTXT | ENX+2! |
| IBFT | DISP~, DISP+7, CAREUOK+6~, CAREUOK+8*, CAREUOK+14, CAREUOK+16 |
| IBIFN | CAREUOK~, CAREUOK+8, CAREUOK+10, CAREUOK+11 |
| IBINS | EN+1~, EN1~, HDR+3, INIT+2, INIT+4, INIT+8*, BLD+6, BLD+8, BLD+17, EXIT+2! , DISP~, DISP+5, CAREUOK+6~, CAREUOK+8*, CAREUOK+9, CAREUOK+13, CAREUOK+14, CAREUOK+15, CAREUOK+16 |
| IBLCT | INIT+1~, BLD+5*, BLD+7*, BLD+8, BLD+9, BLD+12*, BLD+15, BLD+17*, BLD+18 |
| IBNM | INIT+1~, BLD+5*, BLD+6* |
| IBOK | CAREUOK+6~, CAREUOK+7*, CAREUOK+13*, CAREUOK+14*, CAREUOK+15*, CAREUOK+16*, CAREOKQ |
| IBPRV | EN1+1~ |
| IBPTYP | DISP~, DISP+6, CAREUOK+6~, CAREUOK+9*, CAREUOK+13, CAREUOK+14, CAREUOK+15, CAREUOK+16 |
| IBQ | INIT+1~, BLD+13*, BLD+14*, BLD+15 |
| IBRX | CAREUOK+6~, CAREUOK+10*, CAREUOK+11, CAREUOK+14 |
| IBSEQ | CAREUOK~, CAREUOK+8 |
| IBSLEV | ENX+1~, ENX+8*, ENX+9, BLD+3, HELP+2 |
| IBTYPE | CAREUOK~, CAREUOK+9 |
| IBVAR | DISP~, DISP+5, DISP+6, DISP+7, DISP+8 |
| MANY | SEL~, SEL+6 |
| START | DISP~, DISP+3*, DISP+4, DISP+5, DISP+6, DISP+7, DISP+8, DISP+9 |
| U | HDR+3, BLD+6, BLD+8, BLD+9, BLD+13, BLD+14, DISP+5 |
| >> VALMBCK | EN1+2* |
| >> VALMBG | BLD+18* |
| >> VALMCNT | BLD+18* |
| VALMHDR | HDR+1! |
| VALMHDR(1 | HDR+2* |
| VALMHDR(2 | HDR+3* |
| >> VALMQUIT | INIT+13* |
| >> VALMY( | SEL+7 |
| X | INIT+1~, HELP+4* |
| >> XQORNOD(0 | SEL+6 |
| Y | ENX+1~, ENX+7, ENX+8, INIT+1~, INIT+2*, INIT+7*, INIT+8, INIT+10 |
| Z | INIT+1~, BLD+6*, BLD+8, BLD+10, BLD+11, SEL+4~, SEL+7*, DISP+2~, DISP+4*, CAREUOK+6~ |
| Z0 | INIT+1~, BLD+11* |
| Z1 | INIT+1~, BLD+11* |