IBARXEU4 ;ALB/AAS - RX COPAY EXEMPTION CHECK IF PREVIOUSLY CANCELED ; 12-JAN-93
Source file <IBARXEU4.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| CANDT | ; -- set beginning and ending dates
; input dfn =: patient internal number ; ibedt =: end date to cancel ; ibdt =: beging date to cancel |
|
| CANDTQ | ||
| CONV | ; -- see if conversion done
|
|
| CONVQ | ||
| ARCAN(DFN,IBSTAT,IBDT,IBEDT) | ; -- process cancellation with ar logic here
|
|
| ARCANQ | ||
| UPCAN | ; -- update canceled date fields
|
|
| UPCANQ |
| FileNo | Call Tags |
|---|---|
| ^IBA(354.1 - [#354.1] | Classic Fileman Calls |