#4 -LOOP in Lists: only one token possible

[Thomas Goerlich]

the "{SQL-LOOP" statement cannot be used in Lists with more than one SQL-Query.
The query can be used in several tokens though.

<b>Example that works (simple):</b>

{SQL-LOOP
{SQL-VAR v_login = SELECT LOGIN from userstat01 order by DATE1, LOGIN VAR-SQL}
{SQL SELECT LOGIN from userstat01 where "$v_login$"<>"###" order by DATE1, LOGIN SQL}
{SQL-TXT;
TXT-SQL}
LOOP-SQL}

<b>Example that works (one query in several tokens):</b>

{SQL-LOOP
{SQL-VAR dummy=select id_arbeit from arbeit01 ORDER BY tarnzahl VAR-SQL}
{SQL-TXT<tr><td ALIGN=RIGHT COLSPAN="2" BGCOLOR="#C0C0C0"><b>
TXT-SQL}
{SQL SELECT tarnzahl FROM arbeit01 WHERE tarnzahl<1999 AND $dummy$>0 AND rang<>15 ORDER BY tarnzahl SQL}
{SQL-TXT</b></td></tr>
<tr><td> <a href="info_TXT-SQL}
{SQL SELECT tarnzahl FROM arbeit01 WHERE tarnzahl<1999 AND $dummy$>0 AND rang<>15 ORDER BY tarnzahl SQL}
{SQL-TXT.html"> <img SRC="./thumbs/TXT-SQL}
{SQL SELECT tarnzahl FROM arbeit01 WHERE tarnzahl<1999 AND $dummy$>0 AND rang<>15 ORDER BY tarnzahl SQL}
{SQL-TXTa.jpg" WIDTH=70 BORDER=0></a></td>
<td></td>
</tr>TXT-SQL}
LOOP-SQL}

<b>Example that doesn't work:</b>

{SQL-LOOP
{SQL-VAR v_login = SELECT LOGIN from userstat01 order by DATE1, LOGIN VAR-SQL}
{SQL SELECT LOGIN from userstat01 where "$v_login$"<>"###" order by DATE1, LOGIN SQL}
{SQL-TXT; TXT-SQL}
{SQL SELECT FSIZE from userstat01 where "$v_login$"<>"###" order by DATE1, LOGIN SQL}
{SQL-TXT; TXT-SQL}
{SQL SELECT DATE1 from userstat01 where "$v_login$"<>"###" order by DATE1, LOGIN SQL}
{SQL-TXT; TXT-SQL}
{SQL select login from arbeit01 where login='$v_login$' SQL}
{SQL-TXT; TXT-SQL}
{SQL select tarnzahl from arbeit01 where login='$v_login$' SQL}
{SQL-TXT; TXT-SQL}
TXT-SQL}
LOOP-SQL}

In this case only one row will be produced! The LOOP works correct when not uses in a List.

<b>Example that works in a usual environment (one set per file)</b>

{SQL-LOOP
{SQL-VAR var_idarbeit=SELECT id_arbeit from arbeit01 where rang <> 15 order by tarnzahl VAR-SQL}
{SQL select vname from personen01 where personen01.ref_id_arbeit=$var_idarbeit$ SQL}
{SQL-TXT   TXT-SQL}
{SQL select name from personen01 where personen01.ref_id_arbeit=$var_idarbeit$ SQL}
{SQL-TXT ,  TXT-SQL}
{SQL select ort from personen01 where personen01.ref_id_arbeit=$var_idarbeit$ SQL}
{SQL-TXT <br> TXT-SQL}
LOOP-SQL}