Subversion Repositories wimsdev

Rev

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

  1.  
  2. !read tabletheme
  3. !set cnt=!recordcnt interface0
  4. !for j=1 to $cnt
  5.   !set interf=!record $j of interface0
  6. $table_header
  7. $table_tr
  8. <th width="150">$wims_name_name</th><td>
  9. !line 1 of $interf
  10. </td>
  11. $table_tr
  12. <th>$wims_name_Author</th><td>
  13. !line 2 of $interf
  14. !!!exec $name about
  15. </td>
  16. $table_tr
  17. <th>$wims_name_Address</th><td>
  18. !line 3 of $interf
  19. </td>
  20. $table_tr
  21. $table_end
  22. <p>
  23. !next
  24.  
  25. <h2>Logiciels internes à WIMS</h2>
  26. !set cnt=!recordcnt interface1
  27. !for j=1 to $cnt
  28.   !set interf=!record $j of interface1
  29. $table_header
  30. $table_tr
  31. <th width="150">$wims_name_name</th><td>
  32. !set name=!line 1 of $interf
  33. !line 1 of $interf
  34. </td>
  35. $table_tr<th>$wims_name_Author</th>
  36. <td>
  37. !line 2 of $interf
  38. !!!exec $name about
  39. </td>
  40. $table_tr<th>Utilisation</th>
  41. <td>
  42. !line 3 of $interf
  43. </td>
  44. $table_tr<th>Input data</th>
  45. <td>
  46. !line 4 of $interf
  47. </td>
  48. $table_tr<th>Output data</th>
  49. <td>
  50. !line 5 of $interf
  51. </td>
  52. $table_tr<th>Example</th><td>
  53. !set example=!line 7 of $interf
  54. !if $example!=
  55. !set example=!replace internal \\ by $\
  56. $ in $example
  57. !set example=!replace internal xx by in $example
  58. !set example0=!line 6 of $interf
  59. !set example0=!replace internal \\ by $\
  60. $ in $example0
  61. !set u=!linecnt $example0
  62. !for a=1 to $u
  63.   !set a1=!replace internal = by , in $a1
  64.   !set $(a1[1])=$(a1[2])
  65. !next
  66. <pre>
  67. <font color="green">$example0
  68. $name $example</font></pre>
  69.  <br>
  70.  <pre>
  71.  !exec $name $example
  72.  </pre>
  73. !endif
  74. $table_tr
  75. $table_end
  76. <p>
  77. !next
  78.