Portal | Manuals | References | Downloads | Info | Programs | JCLs | Master the Mainframes
IBM Mainframe Computers Forums Index
 
Register
 
IBM Mainframe Computers Forums Index Mainframe: Search IBM Mainframe Forum: FAQ Memberlist Usergroups Profile Log in to check your private messages Log in
 

 

ADSO Store Procedure to receive mutiple occurences

 
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> IDMS/ADSO
View previous topic :: :: View next topic  
Author Message
yogi.47eie

New User


Joined: 16 Aug 2006
Posts: 28
Location: india

PostPosted: Fri Aug 21, 2015 7:14 pm    Post subject: ADSO Store Procedure to receive mutiple occurences
Reply with quote

Hi Team,
we are developing a Stored procedure to receive set of fields from
external interface(outside of Mainframe).

Ex:

create procedure PP.ADDRESS
(
EMPID CHARACTER(10)
ADDRESSLINE1 CHARACTER(20)
ADDRESSLINE2 CHARACTER(20)
ADDRESSLINE3 CHARACTER(20)
)
external name ADDRESS
protocol ads;

The defined fields will be populated with empID and address lines and processed using ADSO dialogues.

Is that possible to introduce OCCURS clause in this definition ??
Scenario is ,this EMPID can have more than one address & i should be able to receive
more than one addresses at a time.

Note:I have tried to receive ADDRESSLINES as single string CHARACTER(600) and through the program,I am able to handle 10 set of addresses by reading first 60 characters as first occurence of address,next 60 characters as second occurence etc..
Ex:

create procedure PP.ADDRESS
(
EMPID CHARACTER(10)
ADDRESSLINES CHARACTER(600)
)
external name ADDRESS
protocol ads;

Any help from CA ADSO Stored procedure experts is much appreciated.
Back to top
View user's profile Send private message

Rohit Umarjikar

Senior Member


Joined: 21 Sep 2010
Posts: 1609
Location: NY,USA

PostPosted: Fri Aug 21, 2015 8:49 pm    Post subject:
Reply with quote

Hello,

Quote:
Is that possible to introduce OCCURS clause in this definition ??


Who creates a Stored procedures at your place? by yourself ?then you could try and see otherwise ask the support team about this.Because this is more like a manual question.

Quote:

I have tried to receive ADDRESSLINES as single string CHARACTER(600) and through the program,I am able to handle 10 set of addresses by reading first 60 characters as first occurence of address,next 60 characters as second occurence etc..


Build a Cobol array and use a subscript. so i think this is the solution.
Back to top
View user's profile Send private message
yogi.47eie

New User


Joined: 16 Aug 2006
Posts: 28
Location: india

PostPosted: Fri Aug 28, 2015 12:10 pm    Post subject: Reply to: ADSO Store Procedure to receive mutiple occurences
Reply with quote

Thanks for the suggestion Rohit, ... Yes we are the one defining the Procedure .We tried the possibilities and concluded that array concept is NOT possible within stored procedure.

Yes ,we tried developing the array concept in IDMS work records and its working fine which we tried initially.


Thanks
Yogi
Back to top
View user's profile Send private message
View previous topic :: :: View next topic  
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> IDMS/ADSO All times are GMT + 6 Hours
Page 1 of 1

 

Search our Forum:

Similar Topics
Topic Author Forum Replies Posted
No new posts Regarding COBOL Stored Procedure opti... selvamsrinivasan85 DB2 4 Fri Nov 04, 2016 8:57 pm
No new posts Access SQLCA fields inside a stored p... gangapd DB2 4 Thu Oct 27, 2016 10:20 am
No new posts Is possible to call subprogram from c... cmsmoon COBOL Programming 3 Fri Aug 05, 2016 6:46 pm
This topic is locked: you cannot edit posts or make replies. Stored procedure on Federated thru DB2 arif677 DB2 6 Tue May 31, 2016 11:48 pm
No new posts Mainframe COBOL - DB2 Stored Procedure Elixir DB2 2 Sat Mar 19, 2016 9:39 am


Facebook
Back to Top
 
Mainframe Wiki | Forum Rules | Bookmarks | Subscriptions | FAQ | Tutorials | Contact Us