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 |
