IBCNSP2 ;ALB/AAS - PATIENT INSURANCE INTERFACE FOR REGISTRATION ; 21-JUNE-93
Source file <IBCNSP2.m>
| Package | Total | Caller Graph |
|---|---|---|
| Integrated Billing | 3 | IB20PT87 IB20PT8C IBCSCE |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| DISP | ; -- Display Patient insurance policy information for registrations
|
|
| FEE | ; -- fee entry point to add patient insurance.
|
|
| R1 | ||
| REGQ | ; -- exit logic and checks
|
|
| DISPQ | ||
| MCCR | ; -- called from screen 3 of the edit bill option in mccr
|
|
| REG | ; --Edit Patient insurance from registration, fee and mccr, allow new entries
|
|
| Name | Field # of Occurrence |
|---|---|
| ^DIC | REG+9, R1+6 |
| ^DIE | REG+18, R1+22, MCCR+4 |
| DISP^IBCNS | DISP+2 |
| $$INSURED^IBCNS1 | REG+15, REG+21 |
| PAT^IBCNSEH | R1+27 |
| POL^IBCNSEH | R1+30 |
| SEL^IBCNSEH | R1+17 |
| ^IBCNSEVT | REGQ+8 |
| AFTER^IBCNSEVT | REGQ+8 |
| DP1^IBCNSM1 | REGQ+3 |
| $$NEW^IBCNSM3 | R1+20 |
| EDPOL^IBCNSM3 | R1+30 |
| OK^IBCNSM3 | R1+19 |
| PATPOL^IBCNSM3 | R1+27 |
| $$LK^IBCNSM31 | R1+18 |
| COVERED^IBCNSM31 | REGQ+12 |
| $$DUPCO^IBCNSOK1 | R1+8 |
| Name | Line Occurrences |
|---|---|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Routine Call |
|
| Routine Call |
|
| FileNo | Call Tags |
|---|---|
| ^DPT - [#2] | Classic Fileman Calls |
| ^DGCR(399 - [#399] | Classic Fileman Calls |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^DIC(36 - [#36] | R1+3 |
| ^DPT - [#2] | REG+14, REG+19, REG+21, R1+3, R1+5*, R1+11, REGQ+2, REGQ+6 |
| ^IBE(350.9 - [#350.9] | R1+9, R1+12, R1+13 |
| ^XUSEC("IB INSURANCE SUPERVISOR" | R1+30 |
| Name | Line Occurrences |
|---|---|
| MCCR | MCCR+6 |
| R1 | REGQ+11, MCCR+6 |
| REG | FEE+1 |
| REGQ | REG+8, REG+11, REG+20, REG+21, R1+6, R1+11, R1+15, R1+16, R1+26 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| D | REG+6~, MCCR+1~ |
| DA | REG+6~, REG+18*!, R1+22*, R1+23!, MCCR+1~, MCCR+4*! |
| DA(1 | R1+4*, R1+22* |
| DE | REG+6~, MCCR+1~ |
| >> DFN | REG+8, REG+10*, REG+11, REG+14, REG+15, REG+18, REG+19, REG+21, R1+1, R1+3 , R1+4, R1+5, R1+8, R1+11, R1+22, REGQ+2, REGQ+6, REGQ+12, DISP+1 |
| DIC | REG+6~, REG+9*, REG+18!, R1+1*, R1+6!, R1+23!, MCCR+1~, MCCR+4! |
| DIC("A" | R1+1* |
| DIC("B" | R1+3* |
| DIC("W" | R1+2* |
| DIC(0 | REG+9*, R1+1* |
| DIE | REG+6~, REG+18*!, R1+22*, R1+23!, MCCR+1~, MCCR+4*! |
| DIH | REG+6~, MCCR+1~ |
| DIR | REG+6~, MCCR+1~ |
| DIV | REG+6~, MCCR+1~ |
| DIY | REG+6~, MCCR+1~ |
| DLAYGO | MCCR+1~ |
| DQ | REG+6~, MCCR+1~ |
| DR | REG+6~, REG+18*!, R1+21*, R1+23!, MCCR+1~, MCCR+4*! |
| >> DTOUT | REG+20 |
| DUZ | R1+21, R1+30 |
| I | REG+6~, MCCR+1~ |
| IBADI | MCCR+6! |
| IBCDFN | REG+6~, R1+7*, R1+8, R1+11, R1+22, R1+27, R1+30, REGQ+2, REGQ+6, REGQ+10! , MCCR+1~ |
| IBCNP | REG+6~, REG+7*, R1+3, R1+10*, MCCR+1~, MCCR+3* |
| IBCNRTN | MCCR+6*, MCCR+7! |
| IBCNS | REG+6~, R1+7*, R1+8, R1+18, R1+20, REGQ+10!, MCCR+1~ |
| IBCNSEH | REG+6~, R1+9*, MCCR+1~ |
| IBCNT | REG+6~ |
| >> IBCOV | REG+14*, REG+15 |
| IBCOVP | REG+6~, REG+19*, REGQ+12 |
| IBCPOL | REG+6~, R1+18*, R1+19*, R1+20*, R1+21, MCCR+1~ |
| IBD | REG+6~, MCCR+1~ |
| IBDD | REG+6~, MCCR+1~ |
| IBDT | REG+6~, MCCR+1~ |
| IBEVT1 | REG+6~ |
| IBEVTA | REG+6~ |
| IBFEE | R1+15, FEE+1~* |
| >> IBIFN | MCCR+4 |
| IBNEW | REG+6~, R1*, R1+8*, R1+11, R1+15, R1+16, REGQ+2, REGQ+3!, REGQ+6, REGQ+7! , REGQ+10!, MCCR+1~ |
| IBNEWP | REG+6~, R1*, R1+20*, R1+30, REGQ+10!, MCCR+1~ |
| IBOK | REG+6~, R1+19, MCCR+1~ |
| IBQUIT | REG+6~, REG+11*, REG+20*, REG+21*, R1*, R1+6*, R1+12*, R1+13*, R1+16, R1+19 , R1+20*, R1+26, R1+30, R1+31*, REGQ+11, REGQ+13!, MCCR+1~ |
| IBREG | R1+26*, R1+31! |
| IBSEL | REG+6~, MCCR+1~ |
| J | REG+6~, MCCR+1~ |
| L | REG+6~, MCCR+1~ |
| VAERR | REG+6~ |
| VALMQUIT | REG+6~, REG+8, REG+11*, R1+6*, MCCR+1~ |
| X | REG+6~, R1+3*, MCCR+1~ |
| Y | REG+6~, REG+10, REG+20, R1+6, R1+7, R1+8, MCCR+1~ |