Last change
on this file since 1397 was 628, checked in by George Lilly, 15 years ago |
initial load of FOIAVistA 6/30/08 version
|
File size:
304 bytes
|
Line | |
---|
1 | MPIFQED ;ALB/RJS-ADD PATIENT RETURNED IN QUERY ;AUG 22, 1997
|
---|
2 | ;;1.0; MASTER PATIENT INDEX VISTA ;;30 Apr 99
|
---|
3 | EDIT(DFN,ARRAY) ;-- Edits existing patient
|
---|
4 | ;--Data needs to be loaded in a certain sequence
|
---|
5 | N ERR,FLD
|
---|
6 | S FLD=".01;.03;.09"
|
---|
7 | D EDIT^VAFCPTED(DFN,.ARRAY,FLD)
|
---|
8 | S ERR=$$UPDATE^MPIFAPI(DFN,ARRAY)
|
---|
9 | Q
|
---|
Note:
See
TracBrowser
for help on using the repository browser.