Re: SQL in a *SRVPGM

[Booth Martin <booth@xxxxxxxxxxxx>]

Well.  *duh* Now isn't that obvious.  Thank you Charles; I'd have never 
seen that solution.  That saved me a LOT of wasted time.


On 12/4/2018 4:30 PM, Charles Wilt wrote:
> set options is a compile time statement...
>
> I simply put them in a procedure by themselves at the top of the module...
>
>
>   //-----------------------------------------------------------------------
>         //  SetSqlOptions
>         //
>         // The SQL SET OPTION statement is a compile time statement
>         //   It must be physically the first SQL statement the compiler sees
>         //   during compilation.  the options are in effect for the entire
> module
>         //
>         //   Thus this dummy procedure that isn't ever called.
>
>   //-----------------------------------------------------------------------
>         dcl-proc SetSqlOptions;
>
>            exec sql set option  naming =*sys, commit= *none, usrprf= *owner,
>                  dynusrprf= *owner,datfmt= *iso, timfmt = *iso,
>                  closqlcsr= *endactgrp, alwblk = *allread,
>                  alwcpydta = *optimize, dlyprp = *yes;
>            return;
>         end-proc;