Subversion Repositories wimsdev

Rev

Rev 17170 | Rev 17530 | Go to most recent revision | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 17170 Rev 17310
Line 113... Line 113...
113 
!! error are not display to user but default value replace bad value
 113 
!! error are not display to user but default value replace bad value
114 
!! date format verification
 114 
!! date format verification
115 
!set _e=begin,end
 115 
!set _e=begin,end
116 
!set _l=$class_creation,$class_expiration
 116 
!set _l=$class_creation,$class_expiration
117 
!for _t=1 to 2
 117 
!for _t=1 to 2
118 
  !if $jquery_defined!=yes
 - 
 
119 
    _m=!char 2,3 of $[abs(floor($(month$(_e[$_t])dscore$_num)))+100]
 - 
 
120 
    _d=!char 2,3 of $[abs(floor($(day$(_e[$_t])dscore$_num)))+100]
 - 
 
121 
    _y=!char -4 to -1 of $[abs($(year$(_e[$_t])dscore$_num))+100000]
 - 
 
122 
    $(_e[$_t])dscore$_num=$_y$_m$_d
 - 
 
123 
  !endif
 - 
 
124 
  !set $(_e[$_t])dscore$_num=!text select 0123456789 in $($(_e[$_t])dscore$_num)
 118 
  !set $(_e[$_t])dscore$_num=!text select 0123456789 in $($(_e[$_t])dscore$_num)
125 
  !bound $(_e[$_t])dscore$_num between $class_creation and $class_expiration default $(_l[$_t])
 119 
  !bound $(_e[$_t])dscore$_num between $class_creation and $class_expiration default $(_l[$_t])
126 
  !set _y=!char 1 to 4 of $($(_e[$_t])dscore$_num)
 120 
  !set _y=!char 1 to 4 of $($(_e[$_t])dscore$_num)
127 
  !set _m=!char 5 to 6 of $($(_e[$_t])dscore$_num)
 121 
  !set _m=!char 5 to 6 of $($(_e[$_t])dscore$_num)
128 
  !set _d=!char 7 to 8 of $($(_e[$_t])dscore$_num)
 122 
  !set _d=!char 7 to 8 of $($(_e[$_t])dscore$_num)