$("#ray_7220").html("\n
1<\/a>
2<\/a>
3<\/a>
4<\/a>
5<\/a>
6<\/a>
7<\/a>
8<\/a>
9<\/a>
10<\/a><\/strong>
11<\/a>
12<\/a>
13<\/a>
14<\/a>
15<\/a>
16<\/a>
17<\/a>
18<\/a>
19<\/a>
20<\/a><\/strong>
21<\/a>
22<\/a>
23<\/a>
24<\/a>
25<\/a>
26<\/a>
27<\/a>
28<\/a><\/pre><\/td>\n  
  <\/span>PROGRAM<\/span> <\/span>GERADORDB<\/span>

      <\/span>INCLUDE<\/span> <\/span>\'<\/span>SCAPCOMM.FOR<\/span>\'<\/span><\/span>
  <\/span>INCLUDE<\/span> <\/span>\'<\/span>LoopCommons.for<\/span>\'<\/span><\/span>


  <\/span>LOGICAL<\/span>  <\/span>ERRO<\/span>

  <\/span>SKIPFL<\/span> <\/span>=<\/span> <\/span>1<\/span>

  <\/span>CALL<\/span> <\/span>CarregaInput<\/span>(<\/span>ERRO<\/span>)<\/span>

  <\/span>CALL<\/span> <\/span>GeraTabela<\/span>(<\/span>ERRO<\/span>)<\/span>









<\/span>9000<\/span>  <\/span>WRITE<\/span>(<\/span>*<\/span>,<\/span>*<\/span>)<\/span>
  <\/span>WRITE<\/span>(<\/span>*<\/span>,<\/span>*<\/span>)<\/span>\'<\/span><ENTER> para finalizar.<\/span>\'<\/span><\/span>
  <\/span>READ<\/span>(<\/span>*<\/span>,<\/span>*<\/span>)<\/span>


  <\/span>END<\/span><\/pre><\/td>\n<\/tr><\/table>\n\n");