EASECU2 ;ALB/LBD - Income Utilities ;14 AUG 2001
Source file <EASECU2.m>
| Name | Comments | DBIA/ICR reference | 
|---|---|---|
| GETIENS(DFN,DGPRI,DGDT) | ;Look-up individual annual income and income relation
 ; Input -- DFN Patient file IEN ; DGPRI Patient Relation IEN ; DGDT Date/Time ; Output -- DGINI Individual Annual Income IEN ; DGIRI Income Relation IEN ; DGERR 1=ERROR and 0=NO ERROR  | 
|
| GETIN(DFN,DGPRI,DGDT) | ;Look-up individual annual income
 ; Add a new entry if one is not found ; Input -- DFN Patient file IEN ; DGPRI Patient Relation IEN ; DGDT Date/Time ; Output -- Individual Annual Income IEN  | 
|
| GETINQ | ||
| ADDIN(DFN,DGPRI,DGYR) | ;Add a new individual annual income entry
 ; Input -- DFN Patient file IEN ; DGPRI Patient Relation IEN ; DGYR Test Year ; Output -- New Individual Annual Income IEN  | 
|
| ADDINQ | ||
| GETIR(DFN,DGINI) | ;Look-up income relation
 ; Add a new entry if one is not found ; Input -- DFN Patient file IEN ; DGINI Individual Annual Income IEN ; Output -- Income Relation IEN  | 
|
| GETIRQ | ||
| ADDIR(DFN,DGINI) | ;Add a new income relation entry
 ; Input -- DFN Patient file IEN ; DGINI Individual Annual Income IEN ; Output -- New Income Relation IEN  | 
|
| ADDIRQ | 
| FileNo | Call Tags | 
|---|---|
| ^DGMT(408.21 - [#408.21] | Classic Fileman Calls | 
| ^DGMT(408.22 - [#408.22] | Classic Fileman Calls |