Subversion Repositories wimsdev

Rev

Rev 11293 | Rev 14064 | Go to most recent revision | Blame | Compare with Previous | Last modification | View Log | RSS feed

  1.  !set cc=$wims_read_parm
  2.  <ul class="wims_nopuce">
  3.  !for ff in tit,type,syntax,alias,mean,sample
  4.    !set text=!lookup $ff in cmd/$cc.phtml
  5.    !if $text!=$empty
  6.  <li>
  7.    $(lst_$ff)
  8.    !set text=!replace internal `` by $emph in $text
  9.    !if $ff=syntax
  10.      !set text=!replace internal $\
  11. $ by $(lst_$(ff)end) <br/>$lstyle2 in $text
  12.    !endif
  13.    !replace internal '' by $emphend in $text
  14.    !if $ff=mean and $cc iswordof word column char item line record
  15.       !set numlist_type=$cc
  16.       !if $numlist_type=record
  17.         !set numlist_str=``fname''
  18.       !else
  19.         !set numlist_str=``string''
  20.       !endif
  21.       !if $numlist_type=char
  22.         !set numlist_type=character
  23.       !endif
  24.       !set text=!record 0 of cmd/numlist
  25.       !set text=!replace internal '' by $emphend in $text
  26.       !replace internal `` by $emph in $text
  27.     !endif
  28.     !if $ff=mean and $cc iswordof randfile record recordcnt
  29.       !read cmd/datafile.phtml
  30.     !endif
  31.     $(lst_$(ff)end)
  32.     </li>
  33.   !endif
  34.  !next
  35.   </ul>
  36.   !if $cc iswordof if
  37.     !read help/if.phtml
  38.   !endif
  39.   !set text=!lookup numlist in cmd/$cc.phtml
  40.   !if $text!=$empty
  41.     !set text=!replace internal ` by $emph in $text
  42.     !replace internal ' by $emphend in $text
  43.  !endif
  44.