IBCEP5C ;ALB/TMP - EDI UTILITIES for provider ID ;02-NOV-00
Source file <IBCEP5C.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 | 2 | IBCEP5B IBCEP5D |
Name | Comments | DBIA/ICR reference |
---|---|---|
COMBOK(IBFILE,IBDAT,IBALL,IBF) | ; Generic ask if conflict, should id rec still
; be added? ; IBFILE = 355.9 or 355.91 for the file being edited ; IBDAT = var ptr prov ien (355.9) ^ pc to check ^ ; ins co ien or *ALL* ^ care unit or *N/A* ^ ; form type code ^ care type code ^ prov id type ptr ; IBALL = flag: ; 0 = Individual entry selected - check for existing ALL entry ; 1 = 'ALL' selected - check for existing individual ones ; IBF = 1 if deleting from ins co-related options, "" ; from provider-related options ; Returns 1 if ok to continue, 0 if not |
|
CAREUN | ;Called from NEWID^IBCEP5B to check for existing record combination
|
|
DEL(IBFILE,IBDA,IBF) | ; Delete prov specific ID's
; IBFILE = 355.9 or 355.91 for the file ; IBDA = ien of entry in file IBFILE ; IBF = 1 if deleting from ins co-related options, "" ; from prov-related options |
|
DELQ | ||
CUCHK(IBDA,IB0) | ;Called from CHG^IBCEP5B to check for existing combination
; during edit ; IBDA = the ien of the record being edited ; IB0 = Proposed changed 0 node of the entry in the file ; FUNCTION RETURNS 0 if no duplicate found, 1 if record already exists |
Name | Line Occurrences |
---|---|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Routine Call |
|
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^IBA( | COMBOK+23, COMBOK+33, COMBOK+34, DEL+6, DEL+11, DEL+22, DEL+25, DELQ |
^IBA(355.9 - [#355.9] | CAREUN+18, CUCHK+12 |
^IBA(355.91 - [#355.91] | CAREUN+9, CUCHK+7 |
^IBA(355.96 - [#355.96] | CAREUN+5, CAREUN+6, CAREUN+7, CAREUN+8, CAREUN+14, CAREUN+15, CAREUN+16, CAREUN+17 |
^TMP("IB_EDITED_IDS" | DEL+24*, DEL+25* |
Name | Line Occurrences |
---|---|
DELQ | DEL+7, DEL+20 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
DA | DEL+5~, DEL+26* |
DIK | DEL+5~, DEL+26* |
DIR | COMBOK+13~, COMBOK+54!, CAREUN+1~, CAREUN+10!, CAREUN+19!, DEL+5~, DEL+9, DEL+10!, DEL+19!, CUCHK+5~ , CUCHK+14! |
DIR("?" | COMBOK+49*, COMBOK+50*, COMBOK+51*, COMBOK+52* |
DIR("A" | COMBOK+48*, CAREUN+10*, CAREUN+19*, DEL+13*, DEL+15*, DEL+16*, DEL+17*, CUCHK+14* |
DIR("B" | COMBOK+52*, DEL+17* |
DIR(0 | COMBOK+42*, CAREUN+10*, CAREUN+19*, DEL+18*, CUCHK+14* |
IB0 | DEL+5~, DEL+11*, DEL+13, DEL+14, DEL+15, DEL+16, CUCHK~, CUCHK+7, CUCHK+10, CUCHK+11 , CUCHK+12 |
IB3559 | CAREUN+10!, CAREUN+19! |
IB3559( | CAREUN+3, CAREUN+5, CAREUN+6, CAREUN+7, CAREUN+8, CAREUN+9, CAREUN+12, CAREUN+14, CAREUN+15, CAREUN+16 , CAREUN+17, CAREUN+18 |
IB35591 | CAREUN+10!, CAREUN+19! |
IB35591( | CAREUN+3*, CAREUN+4*, CAREUN+5*, CAREUN+6*, CAREUN+7*, CAREUN+8*, CAREUN+9, CAREUN+12*, CAREUN+13*, CAREUN+14* , CAREUN+15*, CAREUN+16*, CAREUN+17*, CAREUN+18 |
IBALL | COMBOK~, COMBOK+14*, COMBOK+20, COMBOK+30, COMBOK+44, COMBOK+45, COMBOK+51 |
IBCUCHK | CUCHK+5~, CUCHK+6*, CUCHK+7*, CUCHK+12*, CUCHK+13, CUCHK+15 |
IBD | COMBOK+13~, COMBOK+15*, COMBOK+17, COMBOK+18, COMBOK+24, COMBOK+25, COMBOK+27, COMBOK+28, COMBOK+35, COMBOK+44 , COMBOK+51 |
IBD( | COMBOK+18*, COMBOK+24, COMBOK+25, COMBOK+44 |
IBD(4 | COMBOK+40, COMBOK+41 |
IBDA | DEL~, DEL+6, DEL+11, DEL+21, DEL+22, DEL+24, DEL+25, DEL+26, DELQ, CUCHK~ , CUCHK+7, CUCHK+12 |
IBDAT | COMBOK~, COMBOK+15, COMBOK+17, COMBOK+18, COMBOK+23, COMBOK+33 |
IBDD | COMBOK+13~, COMBOK+15*, COMBOK+24, COMBOK+25, COMBOK+35 |
IBF | COMBOK~, COMBOK+39, DEL~, DEL+17 |
IBFILE | COMBOK~, COMBOK+23, COMBOK+33, COMBOK+34, COMBOK+35, COMBOK+39, CAREUN+2, CAREUN+11, DEL~, DEL+6 , DEL+11, DEL+13, DEL+14, DEL+22, DEL+24, DEL+25, DEL+26, DELQ, CUCHK+7, CUCHK+8 |
>> IBINS | CAREUN+5, CAREUN+6, CAREUN+7, CAREUN+8, CAREUN+9, CAREUN+14, CAREUN+15, CAREUN+16, CAREUN+17, CAREUN+18 |
IBLAST | DEL+5~, DEL+14, DEL+15, DEL+16 |
IBOK | COMBOK+13~, COMBOK+14*, COMBOK+55*, COMBOK+56 |
>> IBPRV | CAREUN+18 |
>> IBPTYP | CAREUN+5, CAREUN+6, CAREUN+7, CAREUN+8, CAREUN+9, CAREUN+14, CAREUN+15, CAREUN+16, CAREUN+17, CAREUN+18 |
IBSPEC | COMBOK+13~, COMBOK+19!, COMBOK+27*, COMBOK+28*, COMBOK+35*, COMBOK+37, COMBOK+46 |
IBWHAT | COMBOK+38~, COMBOK+39*, COMBOK+45, COMBOK+51 |
IBX | DEL+5~, DEL+12*, DEL+13*, DEL+14 |
NEXTONE | DEL+23~*, DEL+24, DEL+25 |
Q | COMBOK+13~, COMBOK+53* |
TEXT | COMBOK+38~ |
TEXT( | COMBOK+47*, COMBOK+53 |
TEXT(1 | COMBOK+43* |
TEXT(2 | COMBOK+44* |
TEXT(3 | COMBOK+45* |
TEXT(4 | COMBOK+46*, COMBOK+47 |
U | COMBOK+15, COMBOK+17, COMBOK+18, COMBOK+23, COMBOK+24, COMBOK+27, COMBOK+33, COMBOK+35, COMBOK+44, DEL+13 , DEL+14, DEL+15, DEL+16, DEL+22, DEL+24, CUCHK+7, CUCHK+10, CUCHK+11, CUCHK+12 |
X | COMBOK+13~, DEL+5~, CUCHK+5~, CUCHK+9~, CUCHK+10*, CUCHK+12 |
X0 | COMBOK+21~, COMBOK+23*, COMBOK+24, COMBOK+26*, COMBOK+27, COMBOK+31~, COMBOK+34*, COMBOK+35, COMBOK+38~, COMBOK+40* , COMBOK+44 |
X1 | COMBOK+21~, COMBOK+22*, COMBOK+23*, COMBOK+24, COMBOK+25, COMBOK+31~, COMBOK+32*, COMBOK+33*, COMBOK+34, COMBOK+38~ , COMBOK+41*, COMBOK+44, COMBOK+45, CUCHK+9~, CUCHK+11*, CUCHK+12 |
X1( | COMBOK+24*, COMBOK+26 |
X1(0 | COMBOK+25*, COMBOK+28 |
Y | COMBOK+13~, COMBOK+55, DEL+5~, DEL+20, CUCHK+5~ |
Z | COMBOK+13~, COMBOK+16*, COMBOK+17, COMBOK+18, DEL+5~, DEL+6*, CUCHK+5~, CUCHK+7*, CUCHK+12* |
Z( | COMBOK+17*, COMBOK+24, COMBOK+25, COMBOK+35 |
Z(2 | COMBOK+23, COMBOK+33 |
Z(3 | COMBOK+23, COMBOK+33, COMBOK+35 |
Z(6 | COMBOK+23, COMBOK+33 |