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

Understanding a piece of Easytrieve


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

Moderator Emeritus


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

PostPosted: Mon May 17, 2010 11:51 pm
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
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

Moderator Emeritus


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

PostPosted: Tue May 18, 2010 11:10 pm
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: 2481
Location: Netherlands, Amstelveen

PostPosted: Wed May 19, 2010 1:30 pm
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 View Bookmarks
All times are GMT + 6 Hours
Forum Index -> CA Products

 


Similar Topics
Topic Forum Replies
No new posts Count the number of characters in a f... CA Products 1
No new posts File matching functionality in Easytr... DFSORT/ICETOOL 14
No new posts Easytrieve EZABX007 with error code 0... CA Products 7
No new posts Converting SAS code to Cobol or Easyt... All Other Mainframe Topics 6
No new posts Easytrieve with SQL CA Products 1
Search our Forums:

Back to Top