IBCEP ;ALB/TMP - Functions for PROVIDER ID MAINT - INS CO PARAMS ;11-02-00
Source file <IBCEP.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 |
|---|---|---|
| EN | ; -- main entry point for IBCE PRV INS PARAMS
|
|
| HDR | ; -- header code
|
|
| INIT | ; Initialization
|
|
| BLD(IBINS,IBCUINC) | ; Build display for ins co level provider ID parameters
; IBINS = ien of ins co (file 36) ; IBCUINC = flag: ; = 1 if care unit list should be included or 0 if not |
|
| BLDQ | ||
| SET1(IBLCT,Z0) | ;
|
|
| EXPND | ;
|
|
| HELP | ;
|
|
| EXIT | ;
|
|
| EDIT | ; Entrypoint called from IBCSCE to invoke provider id edit functions
|
|
| EDIT1 | ; Edit parameters
|
|
| NETID() | ; Returns the ien of the entry in file 355.97 that is designated as the
; NETWORK ID |
|
| EMCID() | ; Returns the ien of the entry in file 355.97 that is designated as the
; EMC ID |
|
| UPIN() | ; Returns the ien of the entry in file 355.97 that is designated as the
; UPIN ID |
|
| EDITID(IBCNS) | ; Edit provider id's from insurance co enter/edit
; IBCNS = ien of file 36 |
| Name | Line Occurrences |
|---|---|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Routine Call |
|
| Routine Call |
|
| Routine Call |
|
| FileNo | Call Tags |
|---|---|
| ^DIC(36 - [#36] | Classic Fileman Calls |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^DIC(36 - [#36] | HDR+2, BLD+6, EDITID+4 |
| ^IBA(355.96 - [#355.96] | BLD+15, BLD+20, BLD+22 |
| ^IBE(355.95 | BLD+25 |
| ^IBE(355.97 - [#355.97] | BLD+20, NETID+2, EMCID+2, UPIN+2 |
| ^TMP("IBPRV_INS_ID_PARAMS" | BLD+7!, EXIT+1! |
| ^TMP("IBPRV_INS_ID_PARAMS_SORT" | BLD+21*, BLD+23, BLD+26, BLD+29, BLD+30, BLD+35, BLDQ! |
| Name | Field # of Occurrence |
|---|---|
| ^( | BLD+23*, BLD+26*, BLD+35, NETID+2, EMCID+2 |
| ^(0 | BLD+25 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| A | BLD+4~, BLD+19*, BLD+20*, BLD+21, BLD+22, BLD+28*, BLD+29*, BLD+30, BLD+35 |
| A0 | BLD+4~, BLD+22*, BLD+30*, BLD+31, BLD+35 |
| A1 | BLD+4~, BLD+22*, BLD+23, BLD+24, BLD+25, BLD+26, BLD+35* |
| A2 | BLD+4~, BLD+21*, BLD+23, BLD+26, BLD+29* |
| A3 | BLD+4~, BLD+25*, BLD+26 |
| DA | INIT+1~ |
| DIC | INIT+1~, INIT+2* |
| DIC(0 | INIT+2* |
| DIE | EDIT1+1~ |
| DIR | INIT+1~, INIT+6*, INIT+7!, EDITID+3~, EDITID+6! |
| DIR("?" | INIT+6* |
| DIR("A" | INIT+6*, EDITID+6* |
| DIR(0 | EDITID+6* |
| DR | EDIT1+1~ |
| DTOUT | INIT+1~, INIT+8 |
| DUOUT | INIT+1~, INIT+8 |
| IB | EDIT1+1~ |
| IB1 | BLD+4~, BLD+29* |
| IB12 | BLD+4~, BLD+29*, BLD+32, BLD+34* |
| IB4 | BLD+4~, BLD+6*, BLD+9, BLD+10, BLD+11, BLD+12 |
| IBCNS | EDIT1+1~, EDIT1+3*, EDITID~, EDITID+4 |
| IBCUINC | EN+1~, INIT+9*, INIT+10, BLD~, BLD+23, BLD+29, BLD+33 |
| IBINS | EN+1~, HDR+2, INIT+10*, BLD~, BLD+6, BLD+15, BLD+20, BLD+22, EDIT1+3 |
| IBLCT | BLD+4~, BLD+5*, BLD+9, BLD+10, BLD+11, BLD+12, BLD+13, BLD+16, BLD+18, BLD+29 , BLD+32, BLD+35, BLDQ+1, SET1~, SET1+1* |
| IBPTYP | BLD+4~, BLD+20*, BLD+21 |
| IBY | EDIT1+1~, EDIT1+3* |
| >> IORVOFF | BLD+18 |
| >> IORVON | BLD+18 |
| U | HDR+2, BLD+9, BLD+10, BLD+11, BLD+12, BLD+20, BLD+21, BLD+23, BLD+24, BLD+25 , BLD+26, BLD+29, BLD+31, NETID+2, EMCID+2, EDITID+5 |
| >> VALMBCK | EDIT1+5* |
| >> VALMBG | BLDQ+1* |
| >> VALMCNT | BLDQ+1* |
| VALMHDR | HDR+1! |
| VALMHDR(1 | HDR+2* |
| >> VALMQUIT | INIT+4*, INIT+8* |
| X | INIT+1~, EDIT1+1~, EDITID+3~ |
| Y | INIT+1~, INIT+3, INIT+9, INIT+10, EDIT1+1~, EDITID+3~ |
| Z | NETID+2~*, NETID+3, EMCID+2~*, EMCID+3 |
| Z0 | BLD+4~, BLD+9*, BLD+10*, BLD+11*, BLD+12*, BLD+13*, BLD+16*, BLD+18*, BLD+31*, BLD+32 , BLD+35*, SET1~, SET1+1 |
| Z4 | EDITID+3~, EDITID+4*, EDITID+5 |
