IBCNBME ;ALB/ARH-Ins Buffer: external entry points, add/edit buffer ;1 Jun 97
Source file <IBCNBME.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 |
---|---|---|
Registration | 2 | DGRPCE DGRPE |
Integrated Billing | 1 | IBCNSP2 |
Name | Comments | DBIA/ICR reference |
---|---|---|
FEE(DFN) | ; ENTRY FOR FEE BASIS: add/edit a buffer entry
|
|
REG(DFN) | ; ENTRY FOR REGISTRATION: add/edit a buffer entry
|
|
PREG(DFN) | ; ENTRY FOR PRE-REGISTRATION: add/edit a buffer entry
|
|
EDADD(IBSOURCE,DFN) | ; add or select a specific patient's buffer entry then edit all data
; IBSOURCE = 1-interview, 2-data match, 3-ivm, 4-pre-reg, 5-eiiv |
|
HELP | ;
|
|
NEW(DFN,INSNAME,SOURCE) | ; ask then add new insurance buffer entry
|
|
EDIT() | ; ask user if they want to edit an existing buffer entry
; returns 0 if don't want to edit, -1 if trys to exit, 1 if wants to edit existing buffer entry |
|
DISPLAY | ;
|
|
INSCOV(DFN) | ; return true if covered by insurance is yes, false if not covered or user ^ out
; allow user to edit 'Covered By Insurance' question (2,.3192), then auto correct if if they were wrong ; (primarily needed because this field an inconsistancy check in registration so it must have a value) |
Name | Field # of Occurrence |
---|---|
^DIR | EDADD+6, NEW+2, EDIT+3 |
GRP^IBCNBEE | EDADD+21 |
INS^IBCNBEE | EDADD+20 |
POLICY^IBCNBEE | EDADD+22 |
$$ADDSTF^IBCNBES | NEW+3 |
$$DICBUF^IBCNBU1 | EDADD+13, HELP+3 |
$$LOCK^IBCNBU1 | EDADD+18 |
UNLOCK^IBCNBU1 | EDADD+27 |
BUFF^IBCNEUT2 | EDADD+25 |
$$INSERROR^IBCNEUT3 | EDADD+25 |
COVERED^IBCNSM31 | INSCOV+6 |
ENR^IBCNSMM | EDADD+11 |
$$ASKCOVD^IBCNSP2 | INSCOV+5 |
$$UP^XLFSTR | EDADD+8 |
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 |
|
Function Call: WRITE |
|
Routine Call |
|
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^DPT - [#2] | FEE+1, REG+1, PREG+1, EDADD+2 |
Name | Line Occurrences |
---|---|
$$EDIT | EDADD+13 |
$$INSCOV | FEE+2, REG+2, PREG+2 |
$$NEW | EDADD+15 |
DISPLAY | FEE+3, REG+3, PREG+3 |
EDADD | FEE+4, REG+4, PREG+4 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
DFN | FEE~, FEE+1, FEE+2, FEE+4, REG~, REG+1, REG+2, REG+4, PREG~, PREG+1 , PREG+2, PREG+4, EDADD~, EDADD+2, EDADD+11, EDADD+13, EDADD+15, HELP+3, NEW~, NEW+3 , INSCOV~, INSCOV+5, INSCOV+6 |
DIR | EDADD+2~, NEW+1~, EDIT+2~ |
DIR("?" | EDADD+5* |
DIR("A" | EDADD+6*, NEW+2*, EDIT+3* |
DIR("B" | NEW+2*, EDIT+3* |
DIR(0 | EDADD+6*, NEW+2*, EDIT+3* |
DIRUT | EDADD+2~, EDADD+6, NEW+1~, EDIT+2~, EDIT+3 |
DTOUT | EDIT+2~ |
DUOUT | EDIT+2~ |
DUZ | EDADD+13, HELP+3 |
IBBUFDA | EDADD+2~, EDADD+8*, EDADD+13*, EDADD+15*, EDADD+16, EDADD+18, EDADD+20, EDADD+21, EDADD+22, EDADD+25 , EDADD+27 |
IBCOV1 | INSCOV+4~, INSCOV+5, INSCOV+6 |
IBDATA | NEW+1~, NEW+3 |
IBDATA( | NEW+3* |
IBINSNM | EDADD+2~, EDADD+8*, EDADD+11, EDADD+13, EDADD+15 |
IBSOURCE | EDADD~, EDADD+2, EDADD+11, EDADD+15 |
IBX | EDADD+2~, EDADD+13*, NEW+1~*, NEW+3*, NEW+4, EDIT+2~*, EDIT+3*, EDIT+4, INSCOV+4~*, INSCOV+5* , INSCOV+7 |
IBY | EDADD+2~, EDADD+13*, INSCOV+4~, INSCOV+5* |
INSNAME | NEW~, NEW+3 |
SOURCE | NEW~, NEW+3 |
X | EDADD+2~, NEW+1~, EDIT+2~ |
Y | EDADD+2~, EDADD+6, EDADD+8, NEW+1~, NEW+3, EDIT+2~, EDIT+3 |
Z | HELP+1~, HELP+3* |