Re: Scott's JDBCR4 program from RPG -- RPG400-L

× The internal search function is temporarily non-functional. The current search engine is no longer viable and we are researching alternatives.
As a stop gap measure, we are using Google's custom search engine service.
If you know of an easy to use, open source, search engine ... please contact support@midrange.com.

Scott, I have been able to nail in down a little bit more.

Problem is with the seventh parameter. If I change the seventh parameter to
a constant then it works.

p AddViolation...
p b
d pi
d InCompany...
d 10a Value
d InDriver...
d 11a Value
d InStartDate...
d 10a Value
d InFinishDate...
d 10a Value
d InClass...
d 10a Value
d InSubClass...
d 10a Value
d InComment...
d 100a Value

Statement = JDBC_PrepareCall(Connection :
'{call UpsertViolation(?,?,?,?,?,?,?)}');

This works.

JDBC_SetString(Statement :
6 :
%Trim(InSubClass));
JDBC_SetString(Statement :
7 :
'Your AS400 5' );

This does not.

JDBC_SetString(Statement :
6 :
%Trim(InSubClass));
JDBC_SetString(Statement :
7 :
%Trim(InComment));

The Sql definition

CREATE PROCEDURE [dbo].[UpsertViolation]
@companyCode varchar(10)
,@driverIdNumber varchar(11)
,@violationStart DATETIME
,@violationFinish DATETIME
,@violationClass VARCHAR(10)
,@violationSubClass VARCHAR(10)
,@violationComment VARCHAR(100)

Can't figure out how a trim field would be any different than a constant.

This mailing list archive is Copyright 1997-2025 by midrange.com and David Gibbs as a compilation work. Use of the archive is restricted to research of a business or technical nature. Any other uses are prohibited. Full details are available on our policy page. If you have questions about this, please contact [javascript protected email address].

Operating expenses for this site are earned using the Amazon Associate program and Google Adsense.