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 |