source: FOIAVistA/trunk/r/ORDER_ENTRY_RESULTS_REPORTING-OR-OCX--ORRC--ORRJ/OCXF21.m@ 1757

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

initial load of FOIAVistA 6/30/08 version

File size: 758 bytes
Line 
1OCXF21 ;SLC/RJS,CLA - GENERATES CODE FOR 'Date' OPERATORS ;10/29/98 12:37
2 ;;3.0;ORDER ENTRY/RESULTS REPORTING;**32**;Dec 17,1997
3 ;; ;;ORDER CHECK EXPERT version 1.01 released OCT 29,1998
4 Q
5 ;
6 ;
7 ;
8AFTER(DATA,CVAL) ; AFTER DATE
9 ;
10 Q $$GRT^OCXF20(DATA,"$$DT2INT("_CVAL_")") ; GREATER THAN
11 ;
12BEFORE(DATA,CVAL) ; BEFORE DATE
13 ;
14 Q $$LESS^OCXF20(DATA,"$$DT2INT("_CVAL_")") ; LESS THAN
15 ;
16ON(DATA,CVAL) ; ON DATE
17 ;
18 Q $$EQ^OCXF20(DATA,"$$DT2INT("_CVAL_")") ; EQUALS
19 ;
20DINCL(DATA,CVAL1,CVAL2) ; INCLUSIVE BETWEEN DATES
21 ;
22 Q $$INCL^OCXF20(DATA,"$$DT2INT("_CVAL1_")","$$DT2INT("_CVAL2_")") ; INCLUSIVE BETWEEN
23 ;
24DEXCL(DATA,CVAL1,CVAL2) ; EXCLUSIVE BETWEEN DATES
25 ;
26 Q $$EXCL^OCXF20(DATA,"$$DT2INT("_CVAL1_")","$$DT2INT("_CVAL2_")") ; EXCLUSIVE BETWEEN
27 ;
Note: See TracBrowser for help on using the repository browser.