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 |