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* |