IBM Mainframe Forum Index
 
Log In
 
IBM Mainframe Forum Index Mainframe: Search IBM Mainframe Forum: FAQ Register
 

Easytreive table declaration issue


IBM Mainframe Forums -> CA Products
Post new topic   Reply to topic
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
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

Moderator Emeritus


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

PostPosted: Sat Sep 27, 2008 9:28 am
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
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

Moderator Emeritus


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

PostPosted: Sat Sep 27, 2008 9:17 pm
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
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

Moderator Emeritus


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

PostPosted: Sun Sep 28, 2008 9:51 am
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

Superior Member


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

PostPosted: Sun Sep 28, 2008 10:15 am
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: 2146
Location: At my coffee table

PostPosted: Sun Sep 28, 2008 3:37 pm
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
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

Moderator Emeritus


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

PostPosted: Wed Oct 01, 2008 7:28 am
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 View Bookmarks
All times are GMT + 6 Hours
Forum Index -> CA Products

 


Similar Topics
Topic Forum Replies
No new posts Load new table with Old unload - DB2 DB2 6
No new posts SFTP Issue - destination file record ... All Other Mainframe Topics 2
No new posts Pulling a fixed number of records fro... DB2 2
No new posts Multiple table unload using INZUTILB DB2 2
No new posts Check data with Exception Table DB2 0
Search our Forums:

Back to Top