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)