IBCIMG ;DSI/JSR - IBCI CLAIMS MANAGER MGR WORKSHEET ;6-MAR-2001
Source file <IBCIMG.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
|
|
HDR | ; -- header code
|
|
INIT | ; -- init variables and list array
|
|
HELP | ; -- help code
|
|
EXIT | ; -- exit code
; User is prompted to enter comments for each claim that has error if ; they exit before fixing the claim. |
|
BLD | ; build array for display
|
|
SETO(RT,LN) | ;
; set line number of beginning line of ClaimsManager error message |
|
SET(TTL,DATA,LN,LR) | ;
|
|
SET1(STR,LN,COL,WD,RV) | ; set up TMP array with screen data
|
|
CBILL | ;Cancel Bill
; Uses core IB and takes user cancel and populates Comment |
|
EBILL | ; re-edit action no need to capture comments
; Uses core IB routines and allows user to re-edit bill |
|
ABILL | ; override action
; This Protocol driven option only appears for those user witht he override key |
|
XIT | ;
|
|
UTIL2 | ;
|
Name | Field # of Occurrence |
---|---|
^DIR | ABILL+7, UTIL2+4 |
PROCESS^IBCC | CBILL+5 |
ST2^IBCIST | ABILL+13 |
DIAG^IBCIUT1 | BLD+41 |
COMMENT^IBCIUT7 | EXIT+7, ABILL+14, XIT+6 |
EN^VALM | EN+1 |
$$SETFLD^VALM1 | BLD+28, BLD+29, BLD+30, BLD+31, BLD+32, BLD+33, BLD+34, BLD+35, BLD+36 |
$$SETSTR^VALM1 | SET1+2 |
CLEAR^VALM1 | EXIT+6, CBILL+2, EBILL+2, ABILL+11, XIT+5 |
CLEAN^VALM10 | EXIT+6, EBILL+2, ABILL+11, XIT+5 |
CNTRL^VALM10 | BLD+39, BLD+55, SET1+3 |
SET^VALM10 | SET1+3 |
DISP^XQORM1 | HELP+1 |
Name | Line Occurrences |
---|---|
Function Call: WRITE |
|
Routine Call |
|
Routine Call |
|
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^IBA(351.9 - [#351.9] | BLD+16, BLD+17, BLD+25 |
^TMP("DISPLAY" | BLD+45, BLD+46, BLD+78! |
^TMP("IBCILM" | EXIT+8!, BLD+7, BLD+9, BLD+63, BLD+67, BLD+69, CBILL+7! |
^TMP("IBCIMG" | INIT+2!, EXIT+9!, SET1+1 |
^TMP("IBCIMG1" | INIT+2!, EXIT+9!, SETO+2* |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
COL | SET1~, SET1+2, SET1+3 |
DATA | BLD+69*, BLD+70, SET~, SET+2 |
DIR | ABILL+7!, UTIL2+4! |
DIR("A" | ABILL+5*, UTIL2+2* |
DIR("B" | ABILL+6*, UTIL2+3* |
DIR(0 | ABILL+4*, UTIL2+1* |
DIRUT | ABILL+8, UTIL2+5, UTIL2+6! |
EOLM | BLD+2~, BLD+74*, BLD+76 |
I | INIT+4*, BLD+73*, CBILL+3~ |
IBCCCC | CBILL+3~ |
>> IBCIASN | HDR+6*, HDR+13 |
>> IBCIBIL | HDR+7*, HDR+13 |
>> IBCIBIR | HDR+3*, HDR+11 |
>> IBCICAR | HDR+10*, HDR+12 |
>> IBCICLNO | HDR+2*, HDR+11 |
>> IBCICM1 | BLD+65*, BLD+66 |
>> IBCICM2 | BLD+64*, BLD+66 |
>> IBCICMP | INIT+3*, INIT+4*, BLD+65 |
IBCICNCL | CBILL+3~, CBILL+4* |
>> IBCICNM | HDR+5*, HDR+13 |
IBCICNT | BLD+1~, BLD+3*, BLD+37*, BLD+38*, BLD+39, BLD+54*, BLD+55, BLD+57, BLD+59, BLD+60* , BLD+61, BLD+66*, BLD+68, BLD+70*, BLD+71*, BLD+72*, BLD+73*, BLD+74, BLD+76* |
>> IBCIERL | BLD+7*, BLD+9, BLD+63, BLD+65, BLD+67, BLD+69 |
>> IBCIERT | BLD+67*, BLD+69 |
>> IBCIEVV | HDR+9*, BLD+76 |
>> IBCILD1 | BLD+16*, BLD+18, BLD+19, BLD+20, BLD+23, BLD+24 |
>> IBCILD2 | BLD+17*, BLD+21, BLD+22 |
>> IBCILEV | BLD+13*, BLD+64 |
>> IBCINAM | HDR+1*, HDR+11 |
>> IBCIPAD | HDR+1, HDR+2, HDR+3, HDR+4, HDR+5, HDR+6, HDR+7, HDR+8, HDR+9, HDR+10 |
>> IBCIPRV | HDR+12 |
>> IBCIREDT | EBILL+3* |
IBCISEQ | BLD+1~, BLD+63*, BLD+67, BLD+69 |
>> IBCISEX | HDR+4*, HDR+11 |
IBCISNT | ABILL+2~, ABILL+12* |
>> IBCISRR | HDR+8*, HDR+11 |
>> IBCIYYY | BLD+10*, BLD+11, BLD+12, BLD+13 |
>> IBCIZZZ | BLD+9*, BLD+10 |
IBD | BLD+1~, BLD+37*, BLD+38*, BLD+54*, BLD+60*, BLD+66*, BLD+70*, BLD+73* |
IBGRPB | BLD+1~, BLD+57*, BLD+59*, BLD+61*, BLD+68*, BLD+71 |
IBGRPE | BLD+1~, BLD+71*, BLD+72 |
>> IBIFN | EXIT+7, BLD+16, BLD+17, BLD+25, BLD+41, BLD+45, BLD+46, CBILL+5, ABILL+14, XIT+6 |
>> IBLINE | BLD+12*, BLD+14, BLD+15, BLD+16, BLD+17, BLD+25, BLD+45, BLD+46, BLD+58, BLD+62 |
IBLN | BLD+1~ |
IBLR | BLD+1~, BLD+53*, BLD+54, BLD+59*, BLD+60, BLD+61*, BLD+66, BLD+68*, BLD+70, BLD+71* |
>> IBPREV | BLD+4*, BLD+14, BLD+58, BLD+62* |
IBQUIT | CBILL+3~, CBILL+5 |
IBRT | BLD+1~ |
IBSW | BLD+1~ |
IBSW( | SET+2 |
IBSW(1 | BLD+5* |
IBSW(2 | BLD+5* |
IBT | BLD+1~, BLD+37*, BLD+38*, BLD+54*, BLD+60*, BLD+66*, BLD+70*, BLD+73* |
IBTC | BLD+1~ |
IBTC( | SET+2 |
IBTC(1 | BLD+5* |
IBTC(2 | BLD+5* |
IBTW | BLD+1~ |
IBTW( | SET+2 |
IBTW(1 | BLD+5* |
IBTW(2 | BLD+5* |
IBX | SET1+1~*, SET1+2*, SET1+3 |
IBY | SET+1~, SET+2* |
ICDL | BLD+2~, BLD+44*, BLD+45*, BLD+46 |
ICDSP | BLD+2~, BLD+43*, BLD+46, BLD+47* |
ICDXX | BLD+2~, BLD+42*, BLD+46*, BLD+49, BLD+52 |
>> IOINHI | BLD+39, BLD+55 |
>> IOINORM | BLD+39, BLD+55 |
>> IORVOFF | SET1+3 |
>> IORVON | SET1+3 |
>> LMBDATE | BLD+18*, BLD+30 |
>> LMCHARG | BLD+24*, BLD+32 |
>> LMCPT | BLD+23*, BLD+33 |
LMDX | BLD+2~, BLD+48*, BLD+54 |
LMDX2 | BLD+2~, BLD+49*, BLD+52*, BLD+54 |
>> LMEDATE | BLD+19*, BLD+31 |
>> LMLINE | BLD+15*, BLD+36 |
>> LMMOD | BLD+26*, BLD+34 |
>> LMPOS | BLD+20*, BLD+29 |
>> LMTOS | BLD+21*, BLD+28 |
>> LMUNIT | BLD+22*, BLD+35 |
LN | SETO~, SETO+2, SET~, SET+2, SET+3*, SET+4, SET1~, SET1+1, SET1+3 |
LR | SET~, SET+2 |
MOD2 | BLD+2~, BLD+27*, BLD+52 |
MODS | BLD+2~, BLD+25*, BLD+26, BLD+27 |
>> QUITDP | INIT+1*, EXIT+5* |
RT | SETO~, SETO+2 |
RV | SET1~, SET1+3 |
STR | SET1~, SET1+2 |
TTL | SET~, SET+2 |
>> TYPE | BLD+11*, BLD+65 |
U | BLD+11, BLD+12, BLD+13, BLD+18, BLD+19, BLD+20, BLD+21, BLD+22, BLD+23, BLD+24 , BLD+25 |
>> VALMBCK | CBILL+5*, CBILL+6*, ABILL+3*, ABILL+10*, XIT+1*, XIT+4* |
>> VALMCNT | BLD+3*, BLD+72* |
>> VALMHDR(1 | HDR+11* |
>> VALMHDR(2 | HDR+12* |
>> VALMHDR(3 | HDR+13* |
>> VALMSG | BLD+76* |
WD | SET1~, SET1+2, SET1+3 |
>> X | HELP+1* |
>> Y | EXIT+3, EXIT+5, ABILL+9, XIT+3, UTIL2+5* |
>> YARR | BLD+8*, BLD+28*, BLD+29*, BLD+30*, BLD+31*, BLD+32*, BLD+33*, BLD+34*, BLD+35*, BLD+36* , BLD+38 |