Subversion Repositories wimsdev

  !set error1=no_object

  !set error1=no_object

  !exit

  !exit

!endif

!endif

!if $n<2

!if $n<2

  !set error1=Cette méthode est utilisable uniquement quand il y a plusieurs\

  !set error1=Cette méthode est utilisable uniquement quand il y a plusieurs\

  !exit

  !exit

!endif

!endif

!exit

!exit

:form

:form

Mettre le but

Mettre le but

!set gl=!replace internal , by , in $m_goal

!set gl=!replace internal , by , in $m_goal

!set gl=!lines2items $gl

!set gl=!lines2items $gl

!set n=!itemcnt $gl

!set n=!itemcnt $gl

!formselect methparm1 from 0 to $n prompt $ch_choose,$gl

!formselect methparm1 from 0 to $n prompt $ch_choose,$gl

!exit

!exit

:check

:check

n=!linecnt $m_goal

n=!linecnt $m_goal

!bound methparm1 between integer 0 and $n default 0

!bound methparm1 between integer 0 and $n default 0

!if $methparm1=0

!if $methparm1=0