CODEWITHSUNDEEP
db2ibm-midrangedb2-400
Sfp
Sfp

Reputation: 549

call program in interactive sql as400

Is there a way to call a program from db2 interactive SQL in as400 (strsql)? this program receives an argument by reference and modify it's content. In CL, you simply call it like this:

call myprogram 12345

I need to be able to call it in interactive SQL, Is there any way or workaround to do this? like launching an OS command? for example in C you do system("your system command"). I couldn't find anything related to it.

Upvotes: 3

Views: 1536

Answers (1)

Charles
Charles

Reputation: 23783

STRSQL supports the SQL CALL statement.

The best option is to define the program as External SQL Stored procedure

--note 
----- numeric-->zoned decimal
----- decimal-->packed decimal
CREATE PROCEDURE MYLIB.MYPROGRAM_SP 
  (IN number numeric(5,0))  
LANGUAGE RPGLE
EXTERNAL NAME 'MYLIB/MYPROGRAM'
PARAMETER STYLE GENERAL;

Then you can
CALL MYLIB.MYPROGRAM_SP(12345)

Technically, every *PGM object on the IBM i is a stored procedure. You can call it without explicitly defining it as shown above. But assumptions are made about the parms in that case. It's much better to provide the DB with the interface definition.

Note that STRSQL is a 20 year old tool, it has various limitations including not supporting OUT or INOUT parameters of stored procedures.

A much better choice is to use the Run SQL Scripts component of IBM's Access Client Solutions (ACS)

Upvotes: 3

Related Questions