Subversion Repositories wimsdev

Rev

Rev 4407 | Rev 11278 | Go to most recent revision | Details | Compare with Previous | Last modification | View Log | RSS feed

Rev Author Line No. Line
4407 bpr 1
!! date writing - option notime
485 guerimand 2
!distribute item $wims_read_parm into slib_don,slib_option
3
!default slib_don=$wims_now
4
!let slib_day=!char 7 to 8 of $slib_don
5
!let slib_month=!char 5 to 6 of $slib_don
6
!let slib_year=!char 1 to 4 of $slib_don
7
!let slib_hour=!char 10 to 17 of $slib_don
8
!if $module_language=fr
9
 !let slib_out=$slib_day/$slib_month/$slib_year
10
!else
11
 !let slib_out=$slib_year/$slib_month/$slib_day
12
!endif
13
!if notime notin $slib_option
14
 !let slib_out=$slib_out - $slib_hour
15
!endif
9584 bpr 16
$slib_out
17