Changeset 327 for ccr/trunk/p


Ignore:
Timestamp:
Jan 15, 2009, 10:51:18 AM (15 years ago)
Author:
George Lilly
Message:

set default Lab Limit to "T-360" ... override with "T-5000" to get all
labs

File:
1 edited

Legend:

Unmodified
Added
Removed

  • ccr/trunk/p/GPLLABS.m

    r326 r327  
    145145 I $D(^TMP("GPLCCR","LABLIMIT")) D  ; IS LAB LIMIT SET? MOVE THIS TO PARMS
    146146 . S C0CLLMT=^TMP("GPLCCR","LABLIMIT") ;USE THE LAB LIMIT PARAMATER
    147  E  S C0CLLMT="T-5000" ;START DATE LONG AGO TO GET EVERYTHING
     147 E  S C0CLLMT="T-360" ;START DATE LONG AGO TO GET EVERYTHING
    148148 D DT^DILF(,C0CLLMT,.C0CSDT) ;
    149149 W "LAB LIMIT: ",C0CLLMT,!
Note: See TracChangeset for help on using the changeset viewer.