Portal | Manuals | References | Downloads | Info | Programs | JCLs | Mainframe wiki | Quick Ref
IBM Mainframe Computers Forums Index
 
Register
 
IBM Mainframe Computers Forums Index Mainframe: Search IBM Mainframe Forum: FAQ Memberlist Profile Log in to check your private messages Log in
 
Regarding mroe data to be processed in COBOL Stored Procedur

 
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> DB2
View previous topic :: :: View next topic  
Author Message
vinu78

Active User


Joined: 02 Oct 2008
Posts: 160
Location: India

PostPosted: Mon May 27, 2019 7:31 pm    Post subject: Regarding mroe data to be processed in COBOL Stored Procedur
Reply with quote

Hi All,

I have a COBOL DB2 Stored Proc defined as:

Code:
WORKING STORAGE SECTION.

01 WS-INPUT-OUTPUT-DATA.
   05 WS-INPUT-OUTPUT-AREA   OCCURS 300 TIMES
      10 WS-INPUT-ACCT-NO    PIC X(20).
      10 WS-INPUT-DESC       PIC X(80).

LINKAGE SECTION
 01 WS-INPUT-OUTPUT
    49 LS-INPUT-OUTPUT-LEN   S9(4) COMP.
    49 LS-INPUT-OUTPUT-TEXT     PIC X(32700).

PROCEDURE DIVISION.

MOVE LS-INPUT-OUTPUT-TEXT TO WS-INPUT-OUTPUT-AREA

<Process all the data in this WS-INPUT-OUTPUT-AREA that occurs for 300 times >

This COBOL DB2 Stored Procedure receives data from Java and it is fine.
We are expecting more data from Java and with the VARCHAR limitation of 32767 for field LS-INPUT-OUTPUT-TEXT, I am wondering how we can receive more data.

One solution that I thought is to receive the extra data in
LS-INPUT-OUTPUT-TEXT-2

Code:
 01 WS-INPUT-OUTPUT
    49 LS-INPUT-OUTPUT-LEN   S9(4) COMP.
    49 LS-INPUT-OUTPUT-TEXT     PIC X(32700).
 01 WS-INPUT-OUTPUT-2
    49 LS-INPUT-OUTPUT-LEN-2   S9(4) COMP.
    49 LS-INPUT-OUTPUT-TEXT-2   PIC X(20000).


Is it possible to get both of these variable's data (LS-INPUT-OUTPUT-TEXT and LS-INPUT-OUTPUT-TEXT-2) loaded to single variable WS-INPUT-OUTPUT-AREA, as I am changing the OCCURS of it to 500 times and then process it.

Thanks
Vinu
Back to top
View user's profile Send private message

Rohit Umarjikar

Senior Member


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

PostPosted: Wed May 29, 2019 2:28 am    Post subject:
Reply with quote

Don't LOBs help here?
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 -> DB2 All times are GMT + 6 Hours
Page 1 of 1

 

Search our Forum:

Similar Topics
Topic Author Forum Replies Posted
No new posts How to DEBUG DB2 Stored Procedures Us... thesumitk DB2 0 Mon Jun 03, 2019 8:26 pm
No new posts masking data with HPU jzhardy DB2 0 Tue May 14, 2019 2:43 pm
No new posts How to browse RECFM=VBS DSORG=PSE seq... Alan Playford JCL & VSAM 7 Fri May 10, 2019 2:59 pm
No new posts data conversion error maxsubrat PL/I & Assembler 4 Thu May 09, 2019 10:57 pm
No new posts How to Hash a data inCOBOL Log Thangavel COBOL Programming 10 Tue May 07, 2019 8:35 pm

Facebook
Back to Top
 
Job Vacancies | Forum Rules | Bookmarks | Subscriptions | FAQ | Polls | Contact Us