Subversion Repositories wimsdev

Rev

Rev 17323 | Blame | Compare with Previous | Last modification | View Log | RSS feed

  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. !!
  6. !! example call :
  7. !! !read adm/datepickerform.phtml $expirydate\
  8. !! expirydate\
  9. !! "-1d","+1y"
  10.  
  11. !distribute line $wims_read_parm into default_,name_,date_
  12. !distribute item $date_ into mdate_,Mdate_
  13.  
  14. !reset option_ y_ m_ d_
  15. !if $mdate_!=$empty
  16.   !set mdate_=!text select char 0123456789 in $mdate_
  17.   !set y_=!char 1 to 4 of $mdate_
  18.   !set m_=!char 5 to 6 of $mdate_
  19.   !set d_=!char 7 to 8 of $mdate_
  20.   !set option_=$option_ min="$y_-$m_-$d_"
  21.   !reset y_ m_ d_
  22. !endif
  23. !if $Mdate_!=$empty
  24.   !set Mdate_=!text select char 0123456789 in $Mdate_
  25.   !set y_=!char 1 to 4 of $Mdate_
  26.   !set m_=!char 5 to 6 of $Mdate_
  27.   !set d_=!char 7 to 8 of $Mdate_
  28.   !set option_=$option_ max="$y_-$m_-$d_"
  29.   !reset y_ m_ d_
  30. !endif
  31. !if $default_!=$empty
  32.   !set default_=!text select char 0123456789 in $default_
  33.   !set y_=!char 1 to 4 of $default_
  34.   !set m_=!char 5 to 6 of $default_
  35.   !set d_=!char 7 to 8 of $default_
  36.   !set option_=$option_ value="$y_-$m_-$d_"
  37. !endif
  38. <input type="date" name="$name_" id="$name_" $option_>
  39.