Subversion Repositories wimsdev

!set cc=$wims_read_parm

<ul class="wims_nopuce">

!for ff in tit,type,syntax,alias,mean,sample

  !set text=!lookup $ff in cmd/$cc.phtml

  !if $text!=$empty

    <li>

    $(lst_$ff)

    !set text=!replace internal `` by $emph in $text

    !if $ff=syntax

      !set text=!replace internal $\

$ by $(lst_$(ff)end) <br/>$lstyle2 in $text

    !endif

    !replace internal '' by $emphend in $text

    !if $ff=mean and $cc iswordof word column char item line record

      !set numlist_type=$cc

      !if $numlist_type=record

        !set numlist_str=``fname''

      !else

        !set numlist_str=``string''

      !endif

      !if $numlist_type=char

        !set numlist_type=character

      !endif

      !set text=!record 0 of cmd/numlist

      !set text=!replace internal '' by $emphend in $text

      !replace internal `` by $emph in $text

    !endif

    !if $ff=mean and $cc iswordof randfile record recordcnt

      !read cmd/datafile.phtml

    !endif

    $(lst_$(ff)end)

    </li>

  !endif

!next

</ul>

!if $cc iswordof if

  !read help/if.phtml

!endif

!set text=!lookup numlist in cmd/$cc.phtml

!if $text!=$empty

  !set text=!replace internal ` by $emph in $text

  !replace internal ' by $emphend in $text

!endif