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 |