Subversion Repositories wimsdev

Rev

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

Rev 11999 Rev 14831
Line 1... Line 1...
1
!! generate link for action on sheet in a class
1
!! generate link for action on freework in a class
2
!! wims_read_parm=linkmodule,sheetnumber,statutsheet,flag(after action 1 return to home 0 stay in linkmodule)
2
!! wims_read_parm=linkmodule,freeworknumber,statutsheet,flag(after action 1 return to home 0 stay in linkmodule),typeoffreework
-
 
3
 
3
!distribute item $wims_read_parm into m_,sh_,st_,home_
4
!distribute item $wims_read_parm into m_,sh_,st_,home_,ty_
4
!let exocnt_=!recordcnt wimshome/log/classes/$wims_class/$(m_)s/.$(m_)$(sh_)
5
!let exocnt_=!recordcnt wimshome/log/classes/$wims_class/freeworks/.freework$sh_
5
!if $home_=1
6
!if $home_=1
6
  !let li_=cmd=new&$m_=$sh_&back=$home_&module=adm/class/$(m_)
7
  !let li_=cmd=new&$m_=$sh_&back=$home_&module=adm/class/$(m_)
7
!else
8
!else
8
  !let li_=cmd=reply
9
  !let li_=cmd=reply
9
!endif
10
!endif
10
 
11
 
11
!if $st_=0
12
!if $st_=0
-
 
13
  !! ---- link for preparing mode
12
  !if $exocnt_>0
14
  !if $exocnt_>0
13
    !set wims_ref_class=wims_button
15
    !set wims_ref_class=wims_button
14
    !href $li_&job=prep_activate $(wims_name_actionlist[1])
16
    !href $li_&job=prep_activate $(wims_name_actionlist[1])
15
     
17
     
16
  !endif
18
  !endif
17
  !if $erasable=yes or ($sh_>$(min_$(m_)_erasable) and $home_=1)
19
  !if $erasable=yes or ($sh_>$(min_$(m_)_erasable) and $home_=1)
18
    !set wims_ref_class=wims_button wims_warning
20
    !set wims_ref_class=wims_button wims_warning
19
    !href $li_&job=prep_erase $(wims_name_actionlist[6])
21
    !href $li_&job=prep_erase $(wims_name_actionlist[6])
20
    $
22
    $
21
  !endif
23
  !endif
22
!else
24
!else
23
  !if $st_=1
25
  !if $st_=1
-
 
26
    !! ---- link for active mode
24
    !set wims_ref_class=wims_button
27
    !set wims_ref_class=wims_button
25
    !href $li_&job=expire $(wims_name_actionlist[2])
28
    !href $li_&job=expire $(wims_name_actionlist[2])
26
    $
29
    $
27
    !set wims_ref_class=wims_button wims_secondary_button
30
    !set wims_ref_class=wims_button wims_secondary_button
28
    !href $li_&job=deactivate $(wims_name_actionlist[3])
31
    !href $li_&job=deactivate $(wims_name_actionlist[3])
Line 32... Line 35...
32
      !href $li_&job=hide $(wims_name_actionlist[4])
35
      !href $li_&job=hide $(wims_name_actionlist[4])
33
    !else
36
    !else
34
      !href $li_&job=expire $(wims_name_actionlist[5])
37
      !href $li_&job=expire $(wims_name_actionlist[5])
35
    !endif
38
    !endif
36
    $
39
    $
-
 
40
    !if $st_<4
37
    !set wims_ref_class=wims_button
41
      !set wims_ref_class=wims_button
38
    !href $li_&job=reactivate $(wims_name_actionlist[1])
42
      !href $li_&job=reactivate $(wims_name_actionlist[1])
-
 
43
      !if $ty_>1
39
    $
44
        $
40
    !set wims_ref_class=wims_button wims_secondary_button
45
        !set wims_ref_class=wims_button wims_secondary_button
41
    !href $li_&job=deactivate $(wims_name_actionlist[3])
46
        !href $li_&job=archive $(wims_name_actionlist[7])
-
 
47
      !endif
-
 
48
    !endif
42
  !endif
49
  !endif
43
!endif
50
!endif