IVMCM3 ;ALB/SEK - ADD NEW DCD DEPENDENT TO PATIENT RELATION FILE ; Jun 24, 2020@16:57
Source file <IVMCM3.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| EN | ; this routine will add entries for new dependents to PATIENT
; RELATION file-408.12 (including 408.1275) or will add new entries ; to effective date multiple (408.1275) for all DCD spouses and ; dependents. if only adding to 408.1275 and DCD relationship is ; different then VAMC relationship, change in 408.12 and add to ; MEANS TEST CHANGES file (408.41). |
|
| NEWPR | ;Add entry to file #408.12
|
|
| NEWVET | ; if no entry in file #408.12 for vet add
|
|
| SRCOFMT(DGMTI) | ;Define value of FILED BY IVM field : GTS - IVM*2*101
|
| FileNo | Call Tags |
|---|---|
| ^DGPR(408.12 - [#408.12] | Classic Fileman Calls |
