Rev 4407 | Go to most recent revision | Details | Last modification | View Log | RSS feed
Rev | Author | Line No. | Line |
---|---|---|---|
485 | guerimand | 1 | !distribute item $wims_read_parm into slib_don,slib_option |
2 | !default slib_don=$wims_now |
||
3 | !let slib_day=!char 7 to 8 of $slib_don |
||
4 | !let slib_month=!char 5 to 6 of $slib_don |
||
5 | !let slib_year=!char 1 to 4 of $slib_don |
||
6 | !let slib_hour=!char 10 to 17 of $slib_don |
||
7 | !if $module_language=fr |
||
8 | !let slib_out=$slib_day/$slib_month/$slib_year |
||
9 | !else |
||
10 | !let slib_out=$slib_year/$slib_month/$slib_day |
||
11 | !endif |
||
12 | !if notime notin $slib_option |
||
13 | !let slib_out=$slib_out - $slib_hour |
||
14 | !endif |
||
15 | $slib_out |