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
 

 

Understanding a piece of Easytrieve

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

New User


Joined: 27 Sep 2005
Posts: 8
Location: Gurgaon

PostPosted: Mon May 17, 2010 11:37 pm    Post subject: Understanding a piece of Easytrieve
Reply with quote

Hi,
I am trying to undersyand an Easytrieve program. This is quite different from Easytrieve Plus that I am used to and hence I need some help. Can someone please briefly let me know with respect to the part in bold, how this program functions?
Thanks




FILE FILEB FB-17-FULLTRK

9999

FILE TABLEFL FB-17-FULLTRK

9999

IF SORTED = YES THEN GO TO AFTERSORT

IF FILE = FILE ---à What is this condition meant for?
ARG1X = ARG1

FUNC1X = FUNC1

MOVE ARG1X 17 TO ARG

CNT*IN = CNT*IN + 1

SEQ*IN = CNT*IN

SUCCESS





IF TRAIN = ( FILL ) ---à FILL means?

SYMBOL = (FILL)

TRAIN2 = DEPDAY



IF FILE = FILE

FRCITYST = * --------------------à Asterisk indicates the function?
TOCITYST = *

IF FRCITYST = * THEN FRCITYST = CHECK FRMP ----à check FRMP means?
IF TOCITYST = * THEN TOCITYST = CHECK TOMP

IF FRCITYST = * THEN FRCITYST = RECHECK FRMP

IF TOCITYST = * THEN TOCITYST = RECHECK TOMP

IF FRCITYST = * THEN FRCITY6 = FRMP

OTHERS = OTHERS + 1

IF TOCITYST = * THEN TOCITY6 = TOMP

OTHERS = OTHERS + 1
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: Mon May 17, 2010 11:51 pm    Post subject:
Reply with quote

Hello,

Which release of Easytrieve are you using (the output will show this)?
Back to top
View user's profile Send private message
gaps030980

New User


Joined: 27 Sep 2005
Posts: 8
Location: Gurgaon

PostPosted: Tue May 18, 2010 10:16 pm    Post subject: Reply to: Understanding a piece of Easytrieve
Reply with quote

Not really sure about the release...this is a new setup againg as I said I am used to Easytrieve Plus; this seems to be an older version where statements like DISPLAY are not supported. Can someone explaing the below technical jargon in Easytrieve.

FILE = FILE means? I believe it signifies a true condition

anlso unsure what
TRAIN = ( FILL ) means?


Also unsure of the below technical jargon:-

FRCITYST = *
and
IF FRCITYST = * THEN FRCITYST = CHECK FRMP
IF TOCITYST = * THEN TOCITYST = CHECK TOMP
IF FRCITYST = * THEN FRCITYST = RECHECK FRMP


Also was trying to get hold of an older Easytrieve manual but didnt find it on net.
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: Tue May 18, 2010 11:10 pm    Post subject:
Reply with quote

Hello,

You should not be able to find this on the net. . . The documentatoin is covered by copyright and it is illegal to make it publically available on some website . . .

If your organization is licensed to use the product CA support will be able to help.

Easytrieve shows the version in the output (at least all of the ones i've seen).

Suggest you experiment with the code and see what happens when you change a statement. Also suggest that you only do one exieriment at a time. . .
Back to top
View user's profile Send private message
PeterHolland

Global Moderator


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

PostPosted: Wed May 19, 2010 1:30 pm    Post subject:
Reply with quote

FRCITYST = * is the same as FRCITYST = ' '
IF FRCITYST = * is the same as IF FRCITYST = ' '

( FILL ) never heard or did see that one
CHECK/RECHECK never heard or did see those

IF FILE = FILE is the same as IF 1 = 1

the stament takes care that all statements after a previous IF are not processed because of that previous IF, e.g.

IF condition
statement 1
statement 2
statement 3
statement 4

if only statement 1 and 2 need to be executed because of the condition
then a IF FILE = FILE is needed before statement 3.

This is because the old EASYTREV program didnt have
IF ... END-IF or DO ... END-DO constructions.
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 Need Help in understanding what is th... mainakdalal PL/I & Assembler 9 Mon Oct 03, 2016 8:03 pm
No new posts Easytrieve - Report writing - Only 1 ... Abhi Nature CA Products 2 Wed Sep 14, 2016 11:40 am
No new posts RACF Easytrieve Plus macro Susan Jackson CA Products 0 Fri Jun 03, 2016 8:25 pm
No new posts Query regarding Easytrieve program shanudarling All Other Mainframe Topics 2 Wed Jan 06, 2016 5:33 pm
No new posts Adjust Heading Position in Easytrieve thesumitk CA Products 4 Mon Dec 21, 2015 3:26 pm


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