source: WorldVistAEHR/trunk/r/ADVERSE_REACTION_TRACKING-GMRA-GMA/GMRAPED3.m@ 789

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

initial load of WorldVistAEHR

File size: 255 bytes
RevLine 
[613]1GMRAPED3 ;HIRMFO/YMP,RM-VALIDATE ENTRY FOR .02 FIELD IN FILE 120.8 ; 11/12/91
2 ;;4.0;Adverse Reaction Tracking;;Mar 29, 1996
3EN1 ; GIVEN DFN, SELECT PATIENT ALLERGY
4 K GMRAAR S GMRAAR=""
5 W !!,"CAUSATIVE AGENT: "_$P(GMRAPA(0),"^",2)_"// (Uneditable)"
6 Q
Note: See TracBrowser for help on using the repository browser.