source: WorldVistAEHR/trunk/r/PCE_PATIENT_CARE_ENCOUNTER-AUTN-EFDP-PX-VSIT--PXRM/PX1P167.m@ 1639

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

initial load of WorldVistAEHR
File size: 265 bytes
RevLine 
[613]1PX1P167 ; WV/CJS - PX*1*167 POST-INSTALL ;10/10/06 15:58
2 ;;1.0;PCE PATIENT CARE ENCOUNTER;**167**;Aug 12, 1996;Build 22
3 S ^DD(9000010,0,"SCR")="I '$P(^(0),U,11),($P(^(0),U,9)!($D(APCDOVRR)!$D(VSIT)!($G(DUZ(""AG""))?1""V""0.1""A"")!(""IE""[$G(DUZ(""AG"")))))"
4 Q
Note: See TracBrowser for help on using the repository browser.