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 |