source: FOIAVistA/trunk/r/ORDER_ENTRY_RESULTS_REPORTING-OR-OCX--ORRC--ORRJ/ORY201.m

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

initial load of FOIAVistA 6/30/08 version

File size: 341 bytes
Line 
1ORY201 ;slc/dcm - Post/Pre inits for patch OR*3.0*201
2 ;;3.0;ORDER ENTRY/RESULTS REPORTING;**201**;Dec 17, 1997
3PRE ; -- preinit
4 ;
5 Q
6 ;
7POST ; -- postinit
8 ;
9 Q
10 ;
11SENDRPT(ANAME) ;Return true if the current report should be sent.
12 I ANAME="ORRPW PCE IMMUNIZATION" Q 1
13 I ANAME="ORRPW PCE SKIN TEST" Q 1
14 I ANAME="ORRPW ADT DISAB" Q 1
15 Q 0
Note: See TracBrowser for help on using the repository browser.