Changeset 146
- Timestamp:
- 07/26/06 10:57:43 (18 years ago)
- Location:
- trunk/SRC/ToBeReviewed/WIDGET
- Files:
-
- 2 edited
Legend:
- Unmodified
- Added
- Removed
-
trunk/SRC/ToBeReviewed/WIDGET/AUTOUR_de_XXX/buildreadcmd.pro
r134 r146 156 156 (*top_uvalue[1, findline(top_uvalue, 'dates')])[*, numdessinout] = [date1, date2] 157 157 ENDIF ELSE BEGIN 158 Cmd = [funclec_name+'('+snamevar+', date1, date2, '+snameexp $158 Cmd = [funclec_name+'('+snamevar+', '+sdate1+', '+sdate2+', '+snameexp $ 159 159 +', parent = '+strtrim(base, 1)+', boxzoom = '+box+' $' $ 160 160 , ' , filename = '+sfilename+' $'] -
trunk/SRC/ToBeReviewed/WIDGET/COMPOUND_WIDGET/cw_calendar.pro
r134 r146 61 61 ; 62 62 value = long(value[0]) 63 ; make sure the value correspond 64 value = jul2date(date2jul(value)) 63 65 ; define year month day 64 66 year = value/10000l 65 67 month = (value MOD 10000L)/100L 66 68 day = value MOD 100L 67 ; make sure the values correspond to real dates68 if year EQ 0 then year = -169 if month EQ 0 then month = 670 if day EQ 0 then day = 1571 69 ; check that the date exists in the calendar 72 70 if (where(infowid.calendar EQ julday(month, day, year)))[0] EQ - 1 then return
Note: See TracChangeset
for help on using the changeset viewer.