|
Last change
on this file since 785 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.
