Subversion Repositories wimsdev

        w$k=!wordcnt $($k)

        w$k=!wordcnt $($k)

      !next k

      !next k

      !if NaN isin $[$re]$[$we] or $[$wre*$wwe*$wdi]!=1 or $wpa>1 or $ti=$empty or\

      !if NaN isin $[$re]$[$we] or $[$wre*$wwe*$wdi]!=1 or $wpa>1 or $ti=$empty or\

          .. isin $di or $re<0 or $we<0 or ($re>0 and $we=0)

          .. isin $di or $re<0 or $we<0 or ($re>0 and $we=0)

         error=bad_source

         error=bad_source

        !exit

        !exit

      !endif

      !endif

      ti=!char 1 to $etitle_limit of $ti

      ti=!char 1 to $etitle_limit of $ti

      de=!char 1 to $edesc_limit of $de

      de=!char 1 to $edesc_limit of $de

      source_$i=$s_

      source_$i=$s_

      last=$i

      last=$i

    !else

    !else

      # last record may be empty

      # last record may be empty

      !if $i!=$putcnt

      !if $i!=$putcnt

        error=bad_source

        error=bad_source

        !exit

        !exit

      !endif

      !endif

    !endif

    !endif

  !next i

  !next i

  !for i=1 to $last

  !for i=1 to $last

    !appendfile wimshome/log/classes/$wims_class/sheets/.sheet$sheet :$(source_$i)

    !appendfile wimshome/log/classes/$wims_class/sheets/.sheet$sheet :$(source_$i)

  !next i

  !next i

!endif

!endif

!if $activetest!=$empty

!if $activetest!=$empty

  sheet_exist=yes

  sheet_exist=yes

  !default expiration=!line 2 of $activetest

  !default expiration=!line 2 of $activetest