Subversion Repositories wimsdev

Rev

Rev 12053 | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 12053 Rev 12429
Line 9... Line 9...
9 
ltsheets=!listintersect $asheets and $ltsheets
 9 
ltsheets=!listintersect $asheets and $ltsheets
10 
!if $ltsheets=$empty
 10 
!if $ltsheets=$empty
11 
 ltsheets=$asheets
 11 
 ltsheets=$asheets
12 
!endif
 12 
!endif
13 
!if $cf_set!=$empty
 13 
!if $cf_set!=$empty
14 
 !if $echoose=$empty
 14 
  !if $echoose=$empty
15 
  echoose=$eold
 15 
    echoose=$eold
16 
 !endif
 - 
 
17 
 eopt=!listintersect $eopt and $optionlist
 - 
 
18 
 cf_title=!trim $cf_title
 - 
 
19 
 !default cf_title=$name_palier
 - 
 
20 
 donnees=$empty
 - 
 
21 
 !for k=1 to $nbpalier_comp
 - 
 
22 
  !if $k!=$palier
 - 
 
23 
   d=!record $k of $livret_dir/.comp$comp
 - 
 
24 
  !else
 - 
 
25 
   d=$cf_title\
 - 
 
26 
$echoose
 - 
 
27 
  !endif
 16 
  !endif
- 
 
 17 
  eopt=!listintersect $eopt and $optionlist
- 
 
 18 
  cf_title=!trim $cf_title
- 
 
 19 
  !default cf_title=$name_palier
- 
 
 20 
  donnees=$empty
- 
 
 21 
  !for k=1 to $nbpalier_comp
- 
 
 22 
    !if $k!=$palier
- 
 
 23 
      d=!record $k of $livret_dir/.comp$comp
- 
 
 24 
    !else
- 
 
 25 
      d=$cf_title\
- 
 
 26 
$echoose
- 
 
 27 
    !endif
28 
  donnees=!append line :$d to $donnees
 28 
    donnees=!append line :$d to $donnees
29 
 !next k
 29 
  !next k
30 
 !writefile $livret_dir/.comp$comp $donnees
 30 
  !writefile $livret_dir/.comp$comp $donnees
31 
 !reset cf_set
 31 
  !reset cf_set
32 
 job=addcomp
 32 
  job=addcomp
33 
 !read $job.proc
 33 
  !read $job.proc
34 
!endif
 34 
!endif
35 
!set wims_name_competence=$name_Competence
 35 
!set wims_name_competence=$name_Competence
36 
!set wims_ariane=!append line configb,1,cmd=renew&job=config\
 36 
!set wims_ariane=!append line configb,1,cmd=renew&job=config\
37 
competence,1,cmd=reply&job=addcomp&comp=$comp\
 37 
competence,1,cmd=reply&job=addcomp&comp=$comp\
38 
to $wims_ariane
 38 
to $wims_ariane
39 
 
 -