Subversion Repositories wimsdev

  i_vardef=oef/var.def

  i_vardef=oef/var.def

 !endif

 !endif

 !if document isitemof $i_category

 !if document isitemof $i_category

  i_vardef=docu/var.def

  i_vardef=docu/var.def

 !endif

 !endif

 c=!char 1 of $i_description

 c=!char 1 of $i_description

 c=!lower $c

 c=!lower $c

 i_description=!replace char number 1 by $c in $i_description

 i_description=!replace char number 1 by $c in $i_description

 c=!char -1 of $i_description

 c=!char -1 of $i_description

 !if $c!=.

 !if $c!=.

     i_description_$l_=!replace char number 1 by $c in $(i_description_$l_)

     i_description_$l_=!replace char number 1 by $c in $(i_description_$l_)

     c=!char -1 of $(i_description_$l_)

     c=!char -1 of $(i_description_$l_)

     !if $c!=. and $(i_description_$l_)!= $empty

     !if $c!=. and $(i_description_$l_)!= $empty

       i_description_$l_=$(i_description_$l_).

       i_description_$l_=$(i_description_$l_).

     !endif

     !endif

 !bound i_language within $langlist default $module_language

 !bound i_language within $langlist default $module_language

 i_level=!listintersect $i_level and $levellist

 i_level=!listintersect $i_level and $levellist

 i_level_cnt=!itemcnt $i_level

 i_level_cnt=!itemcnt $i_level

 !if $i_level issametext $levellist or $i_level_cnt >= 10

 !if $i_level issametext $levellist or $i_level_cnt >= 10

   !reset i_level

   !reset i_level

 i_address=!words2items $i_address

 i_address=!words2items $i_address

 i_address=!text select ;,$mailchar in $i_address

 i_address=!text select ;,$mailchar in $i_address

 i_translator=!char 1 to 100 of $i_translator

 i_translator=!char 1 to 100 of $i_translator

 i_translator_address=!word 1 of $i_translator_address

 i_translator_address=!word 1 of $i_translator_address

 i_translator_address=!text select $mailchar in $i_translator_address

 i_translator_address=!text select $mailchar in $i_translator_address

 !if $i_translation_language!=$empty

 !if $i_translation_language!=$empty

   !for l_ in $i_translation_language

   !for l_ in $i_translation_language

     i_translator_$l_=!char 1 to 100 of $(i_translator_$l_)

     i_translator_$l_=!char 1 to 100 of $(i_translator_$l_)

     i_translator_address_$l_=!word 1 of $(i_translator_address_$l_)

     i_translator_address_$l_=!word 1 of $(i_translator_address_$l_)

     i_translator_address_$l_=!text select $mailchar in $(i_translator_address_$l_)

     i_translator_address_$l_=!text select $mailchar in $(i_translator_address_$l_)

 !endif

 !endif

 i_version=!word 1 of $i_version

 i_version=!word 1 of $i_version

 i_wims_version=!word 1 of $i_wims_version

 i_wims_version=!word 1 of $i_wims_version

 !default i_version=1.00

 !default i_version=1.00

 !default i_wims_version=$wims_version

 !default i_wims_version=$wims_version

 !for l in $deflist1

 !for l in $deflist1

   i_$l=$(i_$l)

   i_$l=$(i_$l)

 !next

 !next

 i_translation_language=!items2words $i_translation_language

 i_translation_language=!items2words $i_translation_language

 ###add fields not accessible by the interface for the moment

 ###add fields not accessible by the interface for the moment

!if dialog isitemof $category

!if dialog isitemof $category

  i_category=exercise,dialog

  i_category=exercise,dialog

!endif

!endif

!if scenario isitemof $category

!if scenario isitemof $category

  i_category=exercise,scenario

  i_category=exercise,scenario

 cat1=!item 1 of $i_category

 cat1=!item 1 of $i_category

 !if document isin $i_category

 !if document isin $i_category

  i_category=document

  i_category=document

  cat1=doc

  cat1=doc

 !endif

 !endif

!default useropts2=1

!default useropts2=1

!default useropts3=0

!default useropts3=0

!set usersize=$[$wims_texbasesize + ($useropts4)]

!set usersize=$[$wims_texbasesize + ($useropts4)]

!setdef wims_useropts=$(usersize)$(useropts1)$(useropts2)$(useropts3) in wimshome/sessions/$wims_session/var.stat

!setdef wims_useropts=$(usersize)$(useropts1)$(useropts2)$(useropts3) in wimshome/sessions/$wims_session/var.stat