IBCNSP2 ;ALB/AAS - PATIENT INSURANCE INTERFACE FOR REGISTRATION ;21-JUNE-93
Source file <IBCNSP2.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| REG | ; --Edit Patient insurance from registration, fee and mccr, allow new entries
; only edit policy if new policy ; call event driver if adding a new policy |
|
| R1 | ||
| REGQ | ; -- exit logic and checks
; -- if no policy pointer delete |
|
| FEE | ; -- fee entry point to add patient insurance.
|
|
| MCCR | ; -- called from screen 3 of the edit bill option in mccr
|
|
| UPDCLM(IBIFN,DFN,IBCDFN) | ; Update the claim's insurance nodes when edits are made
; to the patient insurance file. ; This procedure is called when a claim is being edited from IB billing ; screen#3 and also when the patient insurance is being edited directly. |
|
| DISP | ; -- Display Patient insurance policy information for registrations
|
|
| DISPQ | ||
| ASKCOVD(DFN,IBCOV,IBCOVP) | ; ask user if patient covered by insurance (2,.3192), returns true if answered yes
|
| Name | Line Occurrences |
|---|---|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| FileNo | Call Tags |
|---|---|
| ^DPT - [#2] | Classic Fileman Calls |
| ^DGCR(399 - [#399] | Classic Fileman Calls |