Subversion Repositories wimsdev

Rev

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

  1. !! Give answers in this file.
  2.  
  3. !if $type notwordof 0 1 2
  4.   !goto end
  5. !endif
  6. !if $type iswordof 1 2
  7.   !goto 12
  8. !endif
  9. !goto $type
  10. :0
  11.  
  12.  <table class="wimscenter wimsborder">
  13.   <tr><td>$name_file</td>
  14.   </tr>
  15.   <tr>
  16.     <td>$wims_deposit</td>
  17.     !!$format_out_
  18.   !for f in svg
  19.     !if $f=png
  20.       <td>
  21.       <img src="$wims_home/$wims_sesdir/getfile/$f_depo.$f" />
  22.       </td>
  23.     !endif
  24.     !if $f iswordof svg
  25.       <td>
  26.       !record 0 of wimshome/s2/$wims_session/$f_depo.$f
  27.       </td>
  28.     !endif
  29.     <td>
  30.      !getfile $f_depo.$f $f_depo.$f
  31.     </td>
  32.   !next
  33.   </tr>
  34. </table>
  35.  
  36. !goto end
  37. :12
  38.   <table class=" wimscenter wimsborder">
  39.   <tr><td>Smiles</td><td>$name_file</td>
  40.   </tr>
  41. !for sm=1 to $data_cnt
  42.   <tr>
  43.     <td>$(data_1[$sm])</td><td>$(data_2[$sm])</td>
  44.   !for f in $format_out_
  45.     !if $f=png
  46.       <td>
  47.        <img src="$wims_home/$wims_sesdir/getfile/$(data_2[$sm]).$f" />
  48.       </td>
  49.     !endif
  50.     !if $f iswordof svg
  51.       <td>
  52.       !record 0 of wimshome/s2/$wims_session/$(data_2[$sm]).$f
  53.       </td>
  54.     !endif
  55.     <td>
  56.     !getfile $(data_2[$sm]).$f $(data_2[$sm]).$f
  57.     </td>
  58.   !next
  59.   </tr>
  60. !next
  61. </table>
  62.  
  63. !if $save_old=1
  64.   $name_savefile
  65. !endif
  66. !goto end
  67.  
  68. :end
  69. !if $wims_theme=default
  70.   !set wims_ref_class=wims_button
  71.   !href module=adm/tool/chemtool&cmd=resume $wims_name_back2
  72. !endif
  73. !!!getfile $(data_2[$sm]).$f $(data_2[$sm]).$f
  74.