source: FOIAVistA/trunk/r/MASTER_PATIENT_INDEX_VISTA-MPIF/MPIFQED.m@ 1783

Last change on this file since 1783 was 628, checked in by George Lilly, 15 years ago

initial load of FOIAVistA 6/30/08 version

File size: 304 bytes
Line 
1MPIFQED ;ALB/RJS-ADD PATIENT RETURNED IN QUERY ;AUG 22, 1997
2 ;;1.0; MASTER PATIENT INDEX VISTA ;;30 Apr 99
3EDIT(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.