RE: Embedded SQL issue

Perhaps because there is no colon on ad_environment_id in the where statement.

-----Original Message-----
From: RPG400-L <rpg400-l-bounces@xxxxxxxxxxxxxxxxxx> On Behalf Of rpg400-l-request@xxxxxxxxxxxxxxxxxx
Sent: Friday, August 20, 2021 8:56 AM
To: rpg400-l@xxxxxxxxxxxxxxxxxx
Subject: RPG400-L Digest, Vol 20, Issue 374

This message originated from an External Source. Please use caution when working with this email.

Send RPG400-L mailing list submissions to
rpg400-l@xxxxxxxxxxxxxxxxxx

----------------------------------------------------------------------

message: 1
date: Fri, 20 Aug 2021 07:08:25 -0400
from: Brian Garland via RPG400-L <rpg400-l@xxxxxxxxxxxxxxxxxx>
subject: Embedded SQL issue

I've got a weird SQL problem. A static SQL statement in an RPG program returns an SQLSTATE of 02000 but when run from STRSQL (or run SQL
statements) I get a result.

I've verified the value of the host variable on the where clause and substituted that when running manually.

SELECT TIMEZONE_ID, DST_RULE_ID, SOURCE_LABEL, USE_DST_FLAG INTO :ID_TIMEZONE, :ID_DSTRULE, :s1Source, :s1UseDST FROM SDW_V/VIP_SOURCE JOIN envmstv5 ON source_code = ad_environment_id WHERE appdtaa_library = :CusLib FETCH FIRST ROW ONLY

Any suggestions?


--
Brian J. Garland
Vermont Information Processing, Inc.
brian.garland@xxxxxxxxxx

--
This email and any files transmitted with it are confidential and intended solely for the use of the individual or company to whom they are addressed.
Do not disclose, distribute, or copy this email to others outside your company. If you have received this email in error, please notify the sender immediately and delete this email from your system.