Re: SQL set option DatFmt = *ISO ?

That's not all of it is it?

Do you have any SQL statements in the mainline and or another SR that
appears before *INZSR?

If so, that's your problem. SET OPTION must be positioned in the code
prior to any other SQL.

The fact that *INZSR is executed before any other statement doesn't matter.

SET OPTION is a compile time statement, not a run-time one.

Charles

On Mon, May 22, 2017 at 1:20 PM, Duane Scott <dscott@xxxxxxxxxxx> wrote:

most obvious question is the member type SQLRPGLE? After that, I'm
stymied too.

-----Original Message-----
From: RPG400-L [mailto:rpg400-l-bounces@xxxxxxxxxxxx] On Behalf Of Booth
Martin
Sent: Monday, May 22, 2017 3:18 PM
To: RPG programming on the IBM i / System i <rpg400-l@xxxxxxxxxxxx>
Subject: SQL set option DatFmt = *ISO ?

I am missing something but can't figure out where to look to find it. I
am not even sure where to start counting to find position 36.

I have a program with:

h option(*nodebugio) dftactgrp(*no) actgrp(*caller)

begsr *inzsr;

exec sql set option
DatFmt = *ISO,
Commit = *None,
SrtSeq = *LangIDShr;

It fails to compile with a message telling me:

"SQL0084: Position 36 SQL statement not allowed."

What confounds me is that this code is copy/paste from another program
where it compiles just fine. In fact its pretty much the same in several
other programs.

--
This is the RPG programming on the IBM i (AS/400 and iSeries) (RPG400-L)
mailing list To post a message email: RPG400-L@xxxxxxxxxxxx To subscribe,
unsubscribe, or change list options,
visit: http://lists.midrange.com/mailman/listinfo/rpg400-l
or email: RPG400-L-request@xxxxxxxxxxxx
Before posting, please take a moment to review the archives at
http://archive.midrange.com/rpg400-l.

Please contact support@xxxxxxxxxxxx for any subscription related
questions.

Help support midrange.com by shopping at amazon.com with our affiliate
link: http://amzn.to/2dEadiD
CONFIDENTIALITY NOTICE: This electronic message transmission is intended
only for the person or entity to which it is addressed and may contain
information that is privileged, confidential or otherwise protected from
disclosure. If you have received this transmission, but are not the
intended recipient, you are hereby notified that any disclosure, copying,
distribution or use of the contents of this information is strictly
prohibited. If you have received this e-mail in error, please contact NALC
Health Benefit Plan at 703-729-4677 and delete and destroy the original
message and all copies.
--
This is the RPG programming on the IBM i (AS/400 and iSeries) (RPG400-L)
mailing list
To post a message email: RPG400-L@xxxxxxxxxxxx
To subscribe, unsubscribe, or change list options,
visit: http://lists.midrange.com/mailman/listinfo/rpg400-l
or email: RPG400-L-request@xxxxxxxxxxxx
Before posting, please take a moment to review the archives
at http://archive.midrange.com/rpg400-l.

Please contact support@xxxxxxxxxxxx for any subscription related
questions.

Help support midrange.com by shopping at amazon.com with our affiliate
link: http://amzn.to/2dEadiD