DGRPEIS2 ;ALB/MIR,ERC - EDIT INCOME SCREENING DATA (SCREEN 9) ; 4/20/06 10:37am
Source file <DGRPEIS2.m>
Name | Comments | DBIA/ICR reference |
---|---|---|
EDIT9 | ; Allow edit of income screening amounts (called from DGRPE)
; In: DFN ; DGRPANN as string of selected items ; DGRPSEL as allowable groups for edit (V, S, and/or D) ; DGRPSELT (maybe) as type of dependent selected (V=vet, ; S=spouse, and D=dependent). If not defined, it is set ; to DGRPSEL. |
|
EDIT9Q | ||
EDT | ;Edit inc and nt worth
|
|
EDTQ | ||
SPOUSE | ; make sure marital status, spouse is up-to-date
; input -- DFN ; DGREL("V") as returned from GETREL for veteran ; used -- DGSPFL as VETS marital status |
|
SPOUSE1 | ||
ACT | ; ask date active as of (use dob if KIDS)
; In: DOB ; DGRP0ND as 0 node of PATIENT RELATION file (relation=piece 2) |
|
READ | ; get active as of date
; DIR("B") set before entry ; DOB passed in as input |
|
ACTQ | ||
RELTYPE(RELIEN,TYPE) | ;* Return type of relationship
|
Name | Line Occurrences |
---|---|
Function Call: WRITE |
|
Function Call: WRITE |
|
FileNo | Call Tags |
---|---|
^DGMT(408.21 - [#408.21] | Classic Fileman Calls |
^DGMT(408.22 - [#408.22] | Classic Fileman Calls |