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 |