Your paramter style should be GENERAL. Read the SQL Reference manual for differnces in PARAMTER STYLE GENERAL, GENERAL WITH NULLS, AND SQL.
--------------------------------------------
On Thu, 3/17/16, Graves, Chuck <cgraves@xxxxxxxxxxxxxx> wrote:
Subject: T-SQL receiving parameter from iSeries
To: "rpg400-l@xxxxxxxxxxxx" <rpg400-l@xxxxxxxxxxxx>
Date: Thursday, March 17, 2016, 12:50 PM
I have a T-SQL stored procedure on
MS-SQL server, calling a procedure on iSeries, which
changes the parameter @Parm from "Called Parm" TO "Returned
Parm".
The iSeries SQLRPGLE program is:
C *entry
plist
C
parm
Parm
15
C*
/free
eval Parm='Returned Parm';
/end-free
C
eval *inlr = '1'
C
return
I ran this command from within SQL400:
CREATE PROCEDURE RODDACUSTM/TEST_PARM(INOUT Parm CHAR (
15))
LANGUAGE RPGLE SPECIFIC RODDACUSTM/TEST_PARM NOT
DETERMINISTIC NO
SQL EXTERNAL NAME RODDACUSTM/TEST_PARM PARAMETER STYLE SQL
The T-SQL procedure is:
Code snippet....
DECLARE @parm
CHAR(15)
set @parm = 'Called Parm'
execute ('Call RODDACUSTM.TEST_PARM(?)', @Parm) at
LS_ISERIES
insert into test_parms
VALUES(@Parm)
The only values that end-up in the test_parm table are
"Called Parm"
Why do I not get a parameter back?
[Rodda Paint Company]
Chuck Graves
Director of Information Systems
Rodda Paint Co.<
http://www.roddapaint.com>
6107 N. Marine Drive
Portland, Oregon 97203
(503) 737-6042
--
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.
midrange.com
