IBJD1 ;ALB/MR - DIAGNOSTIC MEASURES UTILITIES ;16-DEC-00
Source file <IBJD1.m>
| Name | Comments | DBIA/ICR reference | 
|---|---|---|
| VA(DFN) | ; - Is patient a VA employee?
 ; Input: DFN - Pointer to the Patient file ; IBEXCEL - Optional global Variable (Print to an Excel format) ; Output: VAEMP - "E" (if IBEXCEL) or "*" - VA employee  | 
|
| VAQ | ||
| PYMT(X) | ; - Return most recent bill payment.
 ; Input: X=Bill pointer to file #399/#430 ; Output: Y=Payment date in Fileman format ^ Payment amount  | 
|
| PAYQ | ||
| INS(DFN,DTE) | ; return the Insurance Company for the Patient on DTE (date)
 | 
|
| QINS | ||
| DIV(CLM) | ; Returns the Medical Center Division for the Claim
 ; Input: CLM - Pointer to Claim Tracking File (#356)  | 
|
| QDIV | ||
| CATTYP(IBBCAT) | ; - Break down AR Categories into First or Third party
 | 
 
  |