Subversion Repositories wimsdev

Rev

Rev 5861 | Blame | Last modification | View Log | RSS feed

  1.  
  2. !form reply
  3.   <input type="submit" value="$wims_name_Show"/>
  4.   !reset job
  5.   !formselect job list work,todo prompt $name_done,$name_todo
  6.   $name_between
  7.   !distribute item $[$jyear],0,$[$jmonth] into jyear,jday,jmonth
  8.   !let v=!values v for v=1 to 31
  9.   !read adm/date.phtml
  10.   !let creyear=!char 1 to 4 of $class_creation
  11.   !let expyear=!char 1 to 4 of $class_expiration
  12.   !read adm/lang/datemenu.phtml.$moduclass_lang 1,jday,jmonth,jyear
  13.   $name_and
  14.   !if $jyear2=$empty or $jyear2=0
  15.    !let jyear2=!char 1 to 4 of $wims_now
  16.    !let jmonth2=!char 5 to 6 of $wims_now
  17.    !let jday2=!char 7 to 8 of $wims_now
  18.   !endif
  19.   !distribute item 0,0,0 into jyear2,jday2,jmonth2
  20.   !let v1=!values v for v=$creyear to $expyear
  21.   !read adm/lang/datemenu.phtml.$moduclass_lang 4,jday2,jmonth2,jyear2
  22.   <br/><small> $name_warning1</small>
  23.  
  24. !formend
  25.  
  26.  
  27. !if $wims_user=supervisor and $cdt_supervise=yes
  28.  !set wims_menu_items= !append line adddate,1,cmd=new&job=adddate\
  29.  addfile,1,cmd=reply&job=file\
  30.  addtodo,1,cmd=new&job=addtodo\
  31.  config,1,cmd=reply&job=config\
  32.  to $wims_menu_items
  33. !endif
  34.  
  35. !if ($job isitemof home,todo or work isin $job and $jour_begin!=$empty) and $cdt_nbdate<$max_defaffi
  36.   !set wims_menu_items=!append line back2,1,cmd=new&job=home to $wims_menu_items
  37. !endif
  38.