IBCNBU1 ;ALB/ARH-Ins Buffer: Utilities ;1 Jun 97
Source file <IBCNBU1.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 |
---|---|---|
BUFFER(DFN) | ; returns IFN of first buffer entry found for the patient, 0 otherwise
|
|
SELINS() | ; user select an insurance company
|
|
SELGRP(IBINSDA) | ; given a specific insurance company, allow user to choose a group/plan
|
|
SELEXT(DFN) | ; user select existing ins co, group, and if the patient is a member of the group also return the policy
|
|
PTGRP(DFN,IBINSDA,IBGRPDA) | ; return policy ifn if patient is a member of this group plan
|
|
DISPBUF(IBBUFDA) | ; display summary info on a buffer entry
|
|
LOCK(IBBUFDA,DISP,TO) | ; return true if able to lock the buffer entry, if not an DISP is true then will display a message
; TO - lock attempt time out & hang time in seconds, default to 4 |
|
UNLOCK(IBBUFDA) | ; unlock a Buffer entry
|
|
DICINS(INSNAME,IBSCACT,IBLISTN) | ; user search/selection of existing Insurance Company Names, does not list duplicates, based on names and synonyms
|
|
DINSQ | ||
DIR(MAX) | ; DIR call for DICINS search for insurance company name
|
|
DICBUF(INSNAME,DFN,IBDUZ) | ; display list of editable buffer entries based on insurance name, may specify patient and/or enterer
; (non-MCCR people: only the person that created an entry should be able to edit it, everyone else should create new ones) |
Name | Field # of Occurrence |
---|---|
EN^DDIOL | DICINS+38 |
^DIC | SELINS+2, SELGRP+4 |
IX^DIC | DICBUF+6 |
^DIE | UNLOCK+11 |
^DIR | DIR+2 |
$$IBE^IBCNERTQ | UNLOCK+7 |
$$PROCSEND^IBCNERTQ | UNLOCK+9 |
$$FO^IBCNEUT1 | DICINS+37 |
$$EXPAND^IBTRE | DISPBUF+7, DISPBUF+8, DISPBUF+9, DISPBUF+10 |
$$FMTE^XLFDT | DISPBUF+7, DISPBUF+8 |
$$UP^XLFSTR | DICINS+18, DICBUF+6 |
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 |
|
Routine Call |
|
Routine Call |
|
Routine Call |
|
Routine Call |
|
FileNo | Call Tags |
---|---|
^IBA(355.3 - [#355.3] | Classic Fileman Calls |
^IBA(355.33 - [#355.33] | Classic Fileman Calls |
^DIC(36 - [#36] | Classic Fileman Calls |
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^DIC(36 - [#36] | SELGRP+2, DICINS+21, DICINS+23, DICINS+24, DICINS+25, DICINS+26, DICINS+27 |
^DPT - [#2] | PTGRP+2 |
^IBA(355.33 - [#355.33] | BUFFER+1, DISPBUF+3, DISPBUF+4, DISPBUF+11, DISPBUF+12, LOCK+4, UNLOCK+14 |
^TMP("IBCNERTQ" | LOCK+8!, LOCK+9*, UNLOCK+1!, UNLOCK+2, UNLOCK+12! |
^TMP($J | DICINS+16!, DICINS+29, DICINS+30*, DICINS+33*, DICINS+35, DICINS+36, DICINS+44, DINSQ! |
Name | Line Occurrences |
---|---|
$$DIR | DICINS+39, DICINS+42 |
$$PTGRP | SELEXT+4 |
$$SELGRP | SELEXT+3 |
$$SELINS | SELEXT+2 |
DINSQ | DICINS+16 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
D | DICBUF+2~, DICBUF+6* |
DA | UNLOCK+4~, UNLOCK+11*, DICBUF+2~ |
DFN | BUFFER~, BUFFER+1, SELEXT~, SELEXT+4, PTGRP~, PTGRP+1*, PTGRP+2, DICBUF~, DICBUF+5 |
DIC | SELINS+1~, SELINS+2*, SELGRP+1~, SELGRP+4*, DICBUF+2~, DICBUF+6* |
DIC("A" | SELINS+2* |
DIC("S" | SELINS+2*, SELGRP+4*, DICBUF+5* |
DIC("W" | DICBUF+4* |
DIC(0 | SELINS+2*, SELGRP+4*, DICBUF+6* |
DIE | SELINS+1~, SELGRP+1~, UNLOCK+4~, UNLOCK+11* |
DIR | DIR+1~, DIR+2!, DICBUF+2~ |
DIR("A" | DIR+1* |
DIR(0 | DIR+1* |
DIRUT | DIR+1~, DICBUF+2~ |
DISP | LOCK~, LOCK+5 |
DR | UNLOCK+4~, UNLOCK+11*, DICBUF+2~ |
DTOUT | SELINS+1~, SELGRP+1~, DIR+1~, DIR+2, DICBUF+2~, DICBUF+6 |
DUOUT | SELINS+1~, SELGRP+1~, DIR+1~, DIR+2, DICBUF+2~, DICBUF+6 |
IB0 | DISPBUF+3~*, DISPBUF+7, DISPBUF+8, DISPBUF+9 |
IB60 | DISPBUF+3~, DISPBUF+4*, DISPBUF+10 |
IB90 | DISPBUF+3~, DISPBUF+4*, DISPBUF+10, DISPBUF+11 |
IBBUFDA | DISPBUF~, DISPBUF+2, DISPBUF+3, DISPBUF+4, DISPBUF+11, DISPBUF+12, LOCK~, LOCK+4, LOCK+8, LOCK+9 , UNLOCK~, UNLOCK+1, UNLOCK+2, UNLOCK+7, UNLOCK+11, UNLOCK+12, UNLOCK+14 |
IBC1 | DICINS+15~, DICINS+35*, DICINS+39*, DICINS+42 |
IBCNT | DICINS+15~, DICINS+33*, DICINS+35*, DICINS+36, DICINS+37, DICINS+39 |
IBCX | DICINS+15~, DICINS+20*, DICINS+21, DICINS+23 |
IBDUZ | DICBUF~, DICBUF+5 |
IBGRPDA | SELEXT+1~*, SELEXT+3*, SELEXT+4, PTGRP~, PTGRP+1*, PTGRP+2 |
IBINB | DICINS+15~, DICINS+18*, DICINS+20 |
IBINSDA | SELGRP~, SELGRP+2, SELGRP+4, SELEXT+1~*, SELEXT+2*, SELEXT+3, SELEXT+4, PTGRP~, PTGRP+1*, PTGRP+2 |
IBINSIEN | DICINS+15~, DICINS+22*, DICINS+23*, DICINS+24, DICINS+25, DICINS+26, DICINS+27 |
IBINSNM | SELGRP+1~, SELGRP+2*, SELGRP+3, SELGRP+4 |
IBLINE | DICINS+15~, DICINS+37*, DICINS+38 |
IBLISTN | DICINS~, DICINS+13*, DICINS+39, DICINS+42 |
IBNAME | DICINS+15~, DICINS+27*, DICINS+28, DICINS+29, DICINS+30, DICINS+36*, DICINS+37 |
IBPOLDA | SELEXT+1~*, SELEXT+4* |
IBSCACT | DICINS~, DICINS+12*, DICINS+25, DICINS+26 |
IBSEL | DICINS+15~, DICINS+16*, DICINS+35, DICINS+39*, DICINS+42*, DICINS+44*, DINSQ+1 |
IBSYNM | DICINS+15~, DICINS+36*, DICINS+37 |
IBX | SELINS+1~*, SELINS+3*, SELINS+4, SELGRP+1~*, SELGRP+5*, SELGRP+6, SELEXT+1~, SELEXT+2*, SELEXT+3*, SELEXT+4* , SELEXT+5, PTGRP+1~*, PTGRP+2*, PTGRP+3, LOCK+2~*, LOCK+4*, LOCK+5, LOCK+6, LOCK+11, DICINS+15~ , DICINS+18*, DICINS+21, DICINS+33*, DIR+1~*, DIR+2*, DIR+3, DICBUF+2~*, DICBUF+6*, DICBUF+7 |
IBXRF | DICINS+15~, DICINS+20*, DICINS+21*, DICINS+23, DICINS+30 |
IBY | PTGRP+1~, PTGRP+2* |
INSNAME | DICINS~, DICINS+16, DICINS+18*, DICINS+21, DICBUF~, DICBUF+6 |
MAX | DIR~, DIR+1, DIR+2 |
RESPONSE | UNLOCK+4~, UNLOCK+5*, UNLOCK+9* |
TO | LOCK~, LOCK+3*, LOCK+4, LOCK+5 |
TQIEN | UNLOCK+4~, UNLOCK+7*, UNLOCK+9 |
U | SELGRP+2, SELEXT+3, SELEXT+4, PTGRP+2, DISPBUF+7, DISPBUF+8, DISPBUF+9, DISPBUF+10, DISPBUF+11, DISPBUF+12 , DICINS+25, DICINS+26, DICINS+27 |
X | SELINS+1~, SELGRP+1~, SELGRP+4*, UNLOCK+4~, DIR+1~, DICBUF+2~, DICBUF+6* |
Y | SELINS+1~, SELINS+3, SELGRP+1~, SELGRP+5, UNLOCK+4~, DIR+1~, DIR+2, DICBUF+2~, DICBUF+6 |