Subversion Repositories wimsdev

Rev

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

Rev Author Line No. Line
11731 guerimand 1
!! create a datepicker form with some option (in line) in wims_read_parm
2
!!line 1 : default value
3
!!line 2 : name form
4
!!line 3 : minDate,maxDate (use datepicker format)
5
!!
14719 obado 6
!! example call :
7
!! !read adm/datepickerform.phtml $expirydate\
8
!! expirydate\
9
!! "-1d","+1y"
11731 guerimand 10
 
11
!distribute line $wims_read_parm into default_,name_,date_
12
!distribute item $date_ into mdate_,Mdate_
17298 guerimand 13
 
14
!reset option_ y_ m_ d_
15
!if $mdate_!=$empty
16
  !set y_=!char 1 to 4 of $mdate_
17
  !set m_=!char 5 to 6 of $mdate_
18
  !set d_=!char 7 to 8 of $mdate_
19
  !set option_=$option_ min="$y_-$m_-$d_"
20
  !reset y_ m_ d_
21
!endif
22
!if $Mdate_!=$empty
23
  !set y_=!char 1 to 4 of $Mdate_
24
  !set m_=!char 5 to 6 of $Mdate_
25
  !set d_=!char 7 to 8 of $Mdate_
26
  !set option_=$option_ max="$y_-$m_-$d_"
27
  !reset y_ m_ d_
28
!endif
29
!if $default_!=$empty
30
  !set y_=!char 1 to 4 of $default_
31
  !set m_=!char 5 to 6 of $default_
32
  !set d_=!char 7 to 8 of $default_
33
  !set option_=$option_ value="$y_-$m_-$d_"
34
!endif
35
<input type="date" name="$name_" id="$name_" $option_>