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
 

 

Easytreive table declaration issue

 
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> CA Products
View previous topic :: :: View next topic  
Author Message
svsarath

New User


Joined: 30 May 2006
Posts: 16

PostPosted: Sat Sep 27, 2008 8:44 am    Post subject: Easytreive table declaration issue
Reply with quote

I need to declare the following cobol table into easytrieve table. Pls advise me.

01 WS-CLAIM-INFO.
02 WS-CLAIM-RECORD OCCURS 44 TIMES
03 FILLER-1 X(7000)
03 WS-REVENUE-INFO OCCURS 40 TIMES.
04 WS-REVENUE-DATA X(35).
03 WS-BILL-LINE-INFO OCCURS 23 TIMES.
05 WS-BILL-LINE-DATA X(834)

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

dick scherrer

Site Director


Joined: 23 Nov 2006
Posts: 19270
Location: Inside the Matrix

PostPosted: Sat Sep 27, 2008 9:28 am    Post subject:
Reply with quote

Hello Satya and welcome to the forums,

Which release of Easytrieve are you using?

R11 is current the current release, but even r6.4 has muilti-dimensional array support (and examples up thru defining 3-dimensional arrays.

If your organization is licensed to use Easytrieve, all of the material may be downloaded for free from the CA support web site.
Back to top
View user's profile Send private message
svsarath

New User


Joined: 30 May 2006
Posts: 16

PostPosted: Sat Sep 27, 2008 6:51 pm    Post subject:
Reply with quote

Good Morning... Thanks alot for your reply. Currently we are using V6.1. I am sure that it supports 3- dimensional array. I don't find much useful information in ca product manuals and I tried the values are not populating correctly. It seems my declaration is incorrect. Can you pls explain me by taking the above specific table as an example? I am really very close to the delivery deadline Appreciate your help.
Back to top
View user's profile Send private message
dick scherrer

Site Director


Joined: 23 Nov 2006
Posts: 19270
Location: Inside the Matrix

PostPosted: Sat Sep 27, 2008 9:17 pm    Post subject:
Reply with quote

Hello,

Post your array definition and the code to load/read the array and we should be able to help.
Back to top
View user's profile Send private message
svsarath

New User


Joined: 30 May 2006
Posts: 16

PostPosted: Sun Sep 28, 2008 7:24 am    Post subject:
Reply with quote

Good Morning,

The array definition in cobol is as follows.

01 WS-CLAIM-INFO.
02 WS-CLAIM-RECORD OCCURS 44 TIMES
03 FILLER-1 X(7000)
03 WS-REVENUE-INFO OCCURS 40 TIMES.
04 WS-REVENUE-DATA X(35).
03 WS-BILL-LINE-INFO OCCURS 23 TIMES.
05 WS-BILL-LINE-DATA X(834) .

I'm in need of EZ table declaration for the above table. I've to load the above table with file data and need to process the table for validation. Please let me know if you need any additional information.
Thanks alot for your time.

Thanks
Satya.
Back to top
View user's profile Send private message
dick scherrer

Site Director


Joined: 23 Nov 2006
Posts: 19270
Location: Inside the Matrix

PostPosted: Sun Sep 28, 2008 9:51 am    Post subject:
Reply with quote

Hello,

You already posted the cobol equivalent.

Quote:
I tried the values are not populating correctly. It seems my declaration is incorrect
You need to post the code you have in easytrieve that does not work - both the array and the code that references the array. . . Please refer to my prior reply.

When you post what you have, someone will be able to help get it running.
Back to top
View user's profile Send private message
Anuj Dhawan

Senior Member


Joined: 22 Apr 2006
Posts: 6258
Location: Mumbai, India

PostPosted: Sun Sep 28, 2008 10:15 am    Post subject:
Reply with quote

Just peeping in..how it's always morning for you..first it was at 6:21 P.M. & second it was at 6:54 A.M. ... icon_biggrin.gif
Back to top
View user's profile Send private message
CICS Guy

Senior Member


Joined: 18 Jul 2007
Posts: 2150
Location: At my coffee table

PostPosted: Sun Sep 28, 2008 3:37 pm    Post subject:
Reply with quote

Anuj D. wrote:
Just peeping in..how it's always morning for you..first it was at 6:21 P.M. & second it was at 6:54 A.M. ... icon_biggrin.gif
Go figure, and I thought that Phoenix and Tucson were in the same time zone....grin.....
Back to top
View user's profile Send private message
svsarath

New User


Joined: 30 May 2006
Posts: 16

PostPosted: Mon Sep 29, 2008 7:32 pm    Post subject:
Reply with quote

Hi, Pls help me with the following EZ 3 dimensional issue.
My EZ table declaration is as follows.

Code:
CLAIM-TABL      S    27990   A OCCURS 44
HLD-CLAIM-LEVEL-INFO     CLAIM-TABL   +1     7308  A
HLD-REVENUE-LEVEL-INFO   CLAIM-TABL   +7309  1500  A
HLD-REVENUE-DATA     HLD-REVENUE-LEVEL-INFO    35  A   +
                               OCCURS 40
HLD-BILL-LINE-INFO       CLAIM-TABL   +8809 19182  A
HLD-BILL-LINE-DATA   HLD-BILL-LINE-INFO       834  A   +
                               OCCURS 23


when i use the below move statement the table values are not populating correctly. CTR is an input file with the same the same declaration of table definition.

Code:
HLD-CLAIM-LEVEL-INFO(1) = CTR-CLAIM-LEVEL-INFO
HLD-REVENUE-DATA(1 , 1) = CTR-REVENUE-DATA(1)
HLD-REVENUE-DATA(1 , 2) = CTR-REVENUE-DATA(2)
HLD-BILL-LINE-DATA(1 , 1) = CTR-BILL-LINE-INFO


Thanks
Satya
Back to top
View user's profile Send private message
dick scherrer

Site Director


Joined: 23 Nov 2006
Posts: 19270
Location: Inside the Matrix

PostPosted: Wed Oct 01, 2008 7:28 am    Post subject:
Reply with quote

Hello,

A couple of questions:

Why does the cobol array have different attributes than the easytrieve code?

You mentioned a 3-dimensional array requirement, but your code to load the table only uses 2 levels of subscripts.

Does that cobol array work as a 3-dimensional array (i suspect maybe not)? Please post the code you use to place entries in the cobol array.
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 -> CA Products All times are GMT + 6 Hours
Page 1 of 1

 

Search our Forum:

Similar Topics
Topic Author Forum Replies Posted
No new posts Execessive parameter issue Sumeendar JCL & VSAM 5 Mon Dec 19, 2016 4:35 pm
No new posts SQL query to run through list of valu... Ni3-db2 DB2 14 Wed Dec 14, 2016 9:52 am
No new posts DFHRESPONSE returns issue divated CICS 3 Wed Nov 02, 2016 6:32 pm
No new posts Can sending 5 MB data between cobol p... Kevin Vaz CICS 12 Tue Oct 18, 2016 4:50 pm
No new posts Need Rexx Program to Load in to DB2 T... Hareesh Verma CLIST & REXX 22 Tue Sep 20, 2016 2:59 pm


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