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 |