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
 

 

Declaring variables in easytrieve

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

New User


Joined: 04 Apr 2007
Posts: 29
Location: Chennai

PostPosted: Wed Jan 23, 2013 12:42 am    Post subject: Declaring variables in easytrieve
Reply with quote

Hi-

I have a cobol copybook and I want declare the same in easytrieve.

cobol copybook layout

01 LS-INY100-PARMS

05 LS-INY100-TABLE
10 INY100-CALLING-ITEM OCCURS 20 TIMES
ASCENDING KEY IS I100-KEY
INDEXED BY I100-INDEX
15 I100-KEY
20 INY100-PART PIC 9(5)

How to convert the layout in easytrieve? Can anyone shed some light on this?
Back to top
View user's profile Send private message

superk

Moderator Team Head


Joined: 26 Apr 2004
Posts: 4648
Location: Raleigh, NC, USA

PostPosted: Wed Jan 23, 2013 1:37 am    Post subject: Reply to: Declaring variables in easytrieve
Reply with quote

I think there's already a topic on this:

http://www.ibmmainframes.com/viewtopic.php?t=38614&highlight=cobol
Back to top
View user's profile Send private message
PORYES

New User


Joined: 04 Apr 2007
Posts: 29
Location: Chennai

PostPosted: Wed Jan 23, 2013 2:20 am    Post subject: Reply to: Declaring variables in easytrieve
Reply with quote

Thanks SuperK.

Is there any other way I can convert?
I looked for CBLCNVRT macro in my shop, But didn't get a luck..
Back to top
View user's profile Send private message
Gary McDowell

Active User


Joined: 15 Oct 2012
Posts: 139
Location: USA

PostPosted: Wed Jan 23, 2013 3:26 am    Post subject:
Reply with quote

We have MACRO4 Data Manipulation in our shop which can convert COPY to Easytrieve Plus File Layout Macro. I tried it and got the following…

Code:
       01  LS-INY100-PARMS.                             
           05  LS-INY100-TABLE.                         
               10  INY100-CALLING-ITEM OCCURS 20 TIMES   
                   ASCENDING KEY IS I100-KEY             
                   INDEXED BY       I100-INDEX           
                   15  I100-KEY                         
                       20  INY100-PART PIC 9(5).         

Code:
MACRO                                                                   
LS-INY100-PARMS                                      1    100 A         
LS-INY100-TABLE                                      1    100 A         
INY100-CALLING-ITEM                                  1      5 A     +   
                              OCCURS     20 INDEX(SUB001)         
I100-KEY                                                            +   
          INY100-CALLING-ITEM                               5 A         
INY100-PART                                                         +   
          INY100-CALLING-ITEM                               5 N         
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 Jan 23, 2013 7:24 am    Post subject:
Reply with quote

Hello,

Quote:
I looked for CBLCNVRT macro in my shop, But didn't get a luck..

This is a built-in conversion available with Easytrieve. It is installed along with Easytrieve.

Where did you look for this?
Back to top
View user's profile Send private message
PeterHolland

Global Moderator


Joined: 27 Oct 2009
Posts: 2422
Location: Netherlands, Amstelveen

PostPosted: Wed Jan 23, 2013 10:49 am    Post subject:
Reply with quote

dick scherrer wrote:
Hello,

Quote:
I looked for CBLCNVRT macro in my shop, But didn't get a luck..

This is a built-in conversion available with Easytrieve. It is installed along with Easytrieve.

Where did you look for this?


Probably here :

http://pic.dhe.ibm.com/infocenter/pdthelp/v1r1/index.jsp?topic=%2Fcom.ibm.mu.doc_4.1%2Ffsyug191.html

And that means its NOT installed with Easytrieve.
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 Jan 23, 2013 10:45 pm    Post subject:
Reply with quote

Hello,

Well, i'd recommend checking "things" with the vendor (CA) rather than IBM doc.

For years CBLCNVRT was part of the product. When the jump was made to the first R11, someone got the bright idea to Not include it in the install. After enough users said they wanted it back, it has been put back into the product - so if someone installs the current software, it will be there.

It has always been available but for some recent years, it was a burp . . .

Anyway, the macros quite likely may already be on the system (depending on how current the release) and simply need to be discovered. If they are not, CA can make them available. A few years ago a client was very far behind on releases and the CBLCNVRT installed failed sometimes. CA sent me the new macros and we were able to run the "new" cblcnvrt on a very old release.
Back to top
View user's profile Send private message
PeterHolland

Global Moderator


Joined: 27 Oct 2009
Posts: 2422
Location: Netherlands, Amstelveen

PostPosted: Thu Jan 24, 2013 5:19 pm    Post subject:
Reply with quote

dick scherrer wrote:
Hello,

Well, i'd recommend checking "things" with the vendor (CA) rather than IBM doc.


I stand corrected, my research should have been more acute.
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: Thu Jan 24, 2013 10:16 pm    Post subject:
Reply with quote

Not to worry icon_smile.gif

This is like the flip-side of "JCL Checkers" many sites use. They are not current so they raise errors that are Not . . . icon_cool.gif

Be well, and thanks for the feedback - i was not aware cblcnvrt was mentioned in IBM material icon_rolleyes.gif

d
ps. it must be Emoticon Day here . . .
Back to top
View user's profile Send private message
PeterHolland

Global Moderator


Joined: 27 Oct 2009
Posts: 2422
Location: Netherlands, Amstelveen

PostPosted: Fri Jan 25, 2013 12:29 pm    Post subject:
Reply with quote

dick scherrer wrote:
ps. it must be Emoticon Day here . . .


Sure, especially after surviving "Blue Monday"
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 Protection Exception while move 0 to ... Kevin Vaz CICS 10 Tue Oct 18, 2016 4:19 pm
No new posts Easytrieve - Report writing - Only 1 ... Abhi Nature CA Products 2 Wed Sep 14, 2016 11:40 am
No new posts Is it possible to pass variables of s... Csongor CLIST & REXX 2 Fri Jun 10, 2016 7:33 pm
No new posts RACF Easytrieve Plus macro Susan Jackson CA Products 0 Fri Jun 03, 2016 8:25 pm
No new posts TWS 'global' or 'local' variables Steve Coalbran IBM Tools 2 Thu Mar 17, 2016 7:40 pm


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