Re: Stuck with an SQL error

Thanks Charles but that didn't work. I'll attempt a couple of other
options for DATFMT and see if that might make it work though.

Respectfully,
Kendall Kinnear
System Analyst
Standard Motor Products, Inc.
Work: 972-316-8169
Mobile: 940-293-7541


-----Original Message-----
From: MIDRANGE-L [mailto:midrange-l-bounces@xxxxxxxxxxxx] On Behalf Of
Charles Wilt
Sent: Friday, March 16, 2018 4:30 PM
To: Midrange Systems Technical Discussion <midrange-l@xxxxxxxxxxxx>
Subject: Re: Stuck with an SQL error

exec SQL
set option datfmt= *iso, timfmt = *iso;

Charles


On Fri, Mar 16, 2018 at 3:03 PM, Kendall Kinnear <
Kendall.Kinnear@xxxxxxxxxxx> wrote:

I'm stuck and I hope someone on the list can help me.

I have this as part of a SQL select statement:
"timestamp(CHAR(T01.MIDTSY) || '-' || substr(digits(T01.MIMTIM),1,2)
|| '.' || substr(digits(t01.MIMTIM),3,2) || '.00') as Message_Timestamp"

When I run the select statement using Run SQL Scripts out of IBM
Access Client Solutions I get back the row I expected with a timestamp
that looks like this: "2018-03-16 15:35:00.000000"

When I embed the same select into an RPG ILE program, I get this error
and I can't see why:
"Select or omit error on field Cast(Concat(Cast(RBAMI_1.MIDTSY AS
Char(8) CCSID 37),'-',Substr((Cast(ABS(RBAMI_1.MIMTIM) AS
Numeric(4,0))),1,2),':',
Substr((Cast(ABS(RBAMI_1.MIMTIM) AS Numeric(4,0))),3,2),':00') AS
TimeStamp) member RBAMI."

The second level text says:
Cause . . . . . : A select or omit error occurred in record 1, record
format *FIRST, member number 1 of file RBAMI in library RBTALRLIB,

because

of condition 6 of the following conditions: ... 6 - A data mapping
error occurred on the field before the select or omit operation was
attempted."

I know I probably have a setting wrong in my RPG LE program but I am
at a total loss as to where to look. Why would RPG LE be interpreting
the statement differently than Run SQL Script?

Respectfully,
Kendall Kinnear
System Analyst
Standard Motor Products, Inc.
Mobile: 940-293-7541

________________________________
Please consider the environment before printing this email.

The content of this e-mail (including any attached files) is
confidential and may be privileged and protected by law. It is
intended solely for the purpose of the person to whom it is addressed.
If you are not the intended recipient of this message, please notify
the sender immediately and delete the message (inclusive of any
attached files). In addition, if you are not the intended recipient of
this message, any disclosure, copying, distribution or taking any
action in reliance of the contents of this email is strictly prohibited.
--
This is the Midrange Systems Technical Discussion (MIDRANGE-L) mailing
list To post a message email: MIDRANGE-L@xxxxxxxxxxxx To subscribe,
unsubscribe, or change list options,
visit:
https://urldefense.proofpoint.com/v2/url?u=https-3A__lists.midrange.co
m_mailman_listinfo_midrange-2Dl&d=DwICAg&c=CBjl-DmyMmSeXzqzAOY98w&r=pO
vNBD1fQ8EIsnWxCJIvLGGO-zLgOpZ92efsKAWQMBM&m=XKrge3kO1Srmb_Q6JPAIbzjgeg
rXzoHrJKnn4xUsh7U&s=QlVUpNDXunKUnM0Tc4rPISwi1O8DmX2ZVtk-G1063V4&e=
or email: MIDRANGE-L-request@xxxxxxxxxxxx Before posting, please take
a moment to review the archives at
https://urldefense.proofpoint.com/v2/url?u=https-3A__

archive.midrange.com_midrange-2Dl&d=DwICAg&c=CBjl-DmyMmSeXzqzAOY98w&r=
pOvNBD1fQ8EIsnWxCJIvLGGO-zLgOpZ92efsKAWQMBM&m=XKrge3kO1Srmb_
Q6JPAIbzjgegrXzoHrJKnn4xUsh7U&s=GNBlSY-us8MKxHLOEuggr0I6PYCBS9jCAunE0
RRVE-o&e=.

Please contact support@xxxxxxxxxxxx for any subscription related
questions.

Help support midrange.com by shopping at amazon.com with our affiliate
link:
https://urldefense.proofpoint.com/v2/url?u=http-3A__amzn.to_2dEadiD&d=
DwICAg&c=CBjl-DmyMmSeXzqzAOY98w&r=pOvNBD1fQ8EIsnWxCJIvLGGO-zLgOpZ92efs
KAWQMBM&m=XKrge3kO1Srmb_Q6JPAIbzjgegrXzoHrJKnn4xUsh7U&s=5gWiuI4zuBZ39M
NE9Kas-2efzPmBHszoe1FYw3zp7lI&e=

--
This is the Midrange Systems Technical Discussion (MIDRANGE-L) mailing
list To post a message email: MIDRANGE-L@xxxxxxxxxxxx To subscribe,
unsubscribe, or change list options,
visit: https://urldefense.proofpoint.com/v2/url?u=https-3A__lists.
midrange.com_mailman_listinfo_midrange-2Dl&d=DwICAg&c=CBjl-
DmyMmSeXzqzAOY98w&r=pOvNBD1fQ8EIsnWxCJIvLGGO-zLgOpZ92efsKAWQMBM&m=
XKrge3kO1Srmb_Q6JPAIbzjgegrXzoHrJKnn4xUsh7U&s=
QlVUpNDXunKUnM0Tc4rPISwi1O8DmX2ZVtk-G1063V4&e=
or email: MIDRANGE-L-request@xxxxxxxxxxxx Before posting, please take a
moment to review the archives at https://urldefense.proofpoint.
com/v2/url?u=https-3A__archive.midrange.com_midrange-2Dl&d=DwICAg&c=CBjl-
DmyMmSeXzqzAOY98w&r=pOvNBD1fQ8EIsnWxCJIvLGGO-zLgOpZ92efsKAWQMBM&m=
XKrge3kO1Srmb_Q6JPAIbzjgegrXzoHrJKnn4xUsh7U&s=GNBlSY-
us8MKxHLOEuggr0I6PYCBS9jCAunE0RRVE-o&e=.

Please contact support@xxxxxxxxxxxx for any subscription related
questions.

Help support midrange.com by shopping at amazon.com with our affiliate
link: https://urldefense.proofpoint.com/v2/url?u=http-3A__amzn.to_
2dEadiD&d=DwICAg&c=CBjl-DmyMmSeXzqzAOY98w&r=pOvNBD1fQ8EIsnWxCJIvLGGO-
zLgOpZ92efsKAWQMBM&m=XKrge3kO1Srmb_Q6JPAIbzjgegrXzoHrJKnn4xUsh7U&
s=5gWiuI4zuBZ39MNE9Kas-2efzPmBHszoe1FYw3zp7lI&e=
________________________________

Please consider the environment before printing this email.

The content of this e-mail (including any attached files) is confidential
and may be privileged and protected by law. It is intended solely for the
purpose of the person to whom it is addressed. If you are not the intended
recipient of this message, please notify the sender immediately and delete
the message (inclusive of any attached files). In addition, if you are not
the intended recipient of this message, any disclosure, copying,
distribution or taking any action in reliance of the contents of this email
is strictly prohibited.
--
This is the Midrange Systems Technical Discussion (MIDRANGE-L) mailing list
To post a message email: MIDRANGE-L@xxxxxxxxxxxx
To subscribe, unsubscribe, or change list options,
visit: https://lists.midrange.com/mailman/listinfo/midrange-l
or email: MIDRANGE-L-request@xxxxxxxxxxxx
Before posting, please take a moment to review the archives
at https://archive.midrange.com/midrange-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