Re: SQL in a *SRVPGM

"RPG400-L" <rpg400-l-bounces@xxxxxxxxxxxx> wrote on 12/04/2018 05:26:21
PM:

It's looking to me like I need to put the exec sql set
statements at the top?

An example from one of my service programs.

.
.
.
//========================================================================
// Enter all your data definitions before this point
//========================================================================

exec sql set option ALWBLK = *ALLREAD, CLOSQLCSR = *ENDACTGRP,
COMMIT = *CS, DATFMT = *ISO,
EXTIND = *YES, LANGID = ENU,
NAMING = *SYS, SRTSEQ = *HEX,
USRPRF = *USER, DYNUSRPRF = *USER;

//========================================================================
// Begin service procedure definitions
//========================================================================
.
.
.


Sincerely,

Dave Clark