source: WorldVistAEHR/trunk/r/MASTER_PATIENT_INDEX_VISTA-MPIF/MPIFQED.m@ 837

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

initial load of WorldVistAEHR

File size: 304 bytes
RevLine 
[613]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.