Re: Embedded SQL

["Agustin Casiva" <casivaagustin@xxxxxxxxx>]

Hello, is posible make the embedded Sql into a free format like the sample

>       /Free
>
>        exec sql
>           declare CSR cursor for
>              select * from ordrfile
>              where status not in('S','C','D')
>              order by ordrno desc;
>        exec sql
>              open CSR;
>        exec sql
>           fetch CSR into :Hoststr :Indarr;
>
>        Return;
>       /end-free


or should be coded like this

C/exec sql
C+           declare CSR cursor for
C+             select * from ordrfile
C+              where status not in('S','C','D')
C+              order by ordrno desc;
C/end-exec
C/exec sql
C+              open CSR;
C/end-exec
C/exec sql
C+          fetch CSR into :Hoststr :Indarr;
C/end-exec