IBCNSMM2 ;ALB/CMS -MEDICARE INSURANCE INTAKE (CONT) ; 18-MAY-99
Source file <IBCNSMM2.m>
| Package | Total | Call Graph |
|---|---|---|
| VA FileMan | 2 | D^DIQ ^DIR |
| Integrated Billing | 1 | OK^IBCNSMM1 |
| 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 |
|---|---|---|
| MII | ; -- Ask Medicare Insurance Card questions
; ; Output Variables: ; IBNAME = Name of Insured ; IBHICN = Subscriber ID as of IB*601 could also be a MBI Number ; IBAEFF = Effective Date for Part A ; IBBEFF = Effective Date for Part B ; IBCOB/IBCOBI = Coordination of Benefits ; IBQUIT=1 User timed-out or entered ^ |
|
| MIIA | ; -- Ask user for Information
|
|
| MIIPB | ; - don't allow editing Part B date if more than one policy
|
|
| MIIC | ; - check effective dates before COB prompt
|
|
| MIIQ | ||
| HICH | ; Help text for the HIC number prompt.
|
| Name | Line Occurrences |
|---|---|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Routine Call |
|
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^DPT - [#2] | MIIA+4 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| >> DFN | MIIA+4 |
| DIR | MII+10~, MIIA+7!, MIIA+18!, MIIA+30!, MIIPB+8!, MIIC+11!, MIIC+16! |
| DIR("?" | MIIA+6*, MIIA+17*, MIIA+29*, MIIPB+7*, MIIC+10* |
| DIR("A" | MIIA+2*, MIIA+11*, MIIA+24*, MIIPB+2*, MIIC+5* |
| DIR("B" | MIIA+4*, MIIA+13*, MIIA+14*, MIIA+26*, MIIA+27*, MIIPB+4*, MIIPB+5*, MIIC+8* |
| DIR(0 | MIIA+5*, MIIA+16*, MIIA+28*, MIIPB+6*, MIIC+9* |
| DIROUT | MII+10~, MIIA+8!, MIIA+19!, MIIA+31!, MIIPB+9!, MIIC+12! |
| DIRUT | MII+10~, MIIA+8!, MIIA+19!, MIIA+31!, MIIPB+9!, MIIC+12! |
| DTOUT | MII+10~, MIIA+8!, MIIA+19!, MIIA+31!, MIIPB+9!, MIIC+12! |
| DUOUT | MII+10~, MIIA+8!, MIIA+19!, MIIA+31!, MIIPB+9!, MIIC+12! |
| >> IBAEFF | MIIA+26, MIIA+32*, MIIC+1 |
| >> IBARR("A" | MIIA+3, MIIA+12, MIIA+23, MIIA+25, MIIC+6 |
| >> IBARR("B" | MIIA+3, MIIA+12, MIIPB+1, MIIPB+3, MIIC+6 |
| >> IBBEFF | MIIPB+4, MIIPB+10*, MIIC+1 |
| >> IBCOB | MIIC+8, MIIC+13* |
| >> IBCOBI | MIIC+13* |
| >> IBHICN | MIIA+13, MIIA+20* |
| >> IBNAME | MIIA+4, MIIA+9* |
| >> IBOK | MIIC+16*, MIIC+17 |
| >> IBPOLA | MIIA+23 |
| >> IBPOLB | MIIPB+1 |
| >> IBQUIT | MIIA+8*, MIIA+19*, MIIA+31*, MIIPB+9*, MIIC+1*, MIIC+12*, MIIC+17* |
| IBX | MII+10~, MIIA+3*, MIIA+4, MIIA+12*, MIIA+14, MIIA+25*, MIIA+27, MIIPB+3*, MIIPB+5, MIIC+6* , MIIC+7*, MIIC+8 |
| U | MIIA+4 |
| X | MII+10~ |
| Y | MII+10~, MIIA+9, MIIA+20, MIIA+26*, MIIA+27*, MIIA+32, MIIPB+4*, MIIPB+5*, MIIPB+10, MIIC+13 , MIIC+16! |