Conversion from easytrev

Ask/Clarify the questions on EASYTRIEVE

Moderators: DikDude, Moderator Group

Post Reply
Gopi
Member
Posts: 3
Joined: Tue Jun 02, 2009 5:57 pm

Conversion from easytrev

Post by Gopi » Tue Jun 02, 2009 6:02 pm

In old easytrev, there is a keyword 'SORTED'

For ex:

IF SORTED = YES
PRINT J01
END-IF


Is there any equivalent for this 'SORTED' keyword in easytrev plus??
COBOLGOPOL

User avatar
Vamsi99
Active Member
Posts: 183
Joined: Wed Nov 05, 2008 11:20 am

Post by Vamsi99 » Wed Jun 03, 2009 3:06 pm

i am working in easytrieve+ , i am not aware of this keyword.
Can you let me know, what is exactly it will do.. so that i can tell you
equalent keyword in easytrieve plus.

Gopi
Member
Posts: 3
Joined: Tue Jun 02, 2009 5:57 pm

Post by Gopi » Wed Jun 03, 2009 3:37 pm

Im currently working in converting Easytrev programs into Easytrev+.
In the old easytrev, 'SORTED' keyword is used.
The actual definition for this keyword is :

'When the SORT command is used, the input file records are processed thru the condition sets and those records which were selected are written into an intermediate file(FILEB). After the input file has been processed, the system sort is invoked. The records are sorted as specified and the sorted records are again processed against the condition sets. Therfore it is sometimes desirable to control which equate statements are executed before the sort and after the sort like:
IF SORTED EQ YES
IF SORTED = NO' .

But i doubt whether in Easytrev Plus this option is available.
In some old easytrev programs, some conditions involve this SORTED keyword and based on it, the program flow varies.
COBOLGOPOL

User avatar
Vamsi99
Active Member
Posts: 183
Joined: Wed Nov 05, 2008 11:20 am

Post by Vamsi99 » Wed Jun 03, 2009 4:56 pm

I dont see exact equalent in easytrieve+. In new easytrieve, following is the syntax of SORT.

Code: Select all

SORT INFILE +
TO OUTFILE +
USING EMPNO +
BEFORE PARA-BEFORE
*
PARA-BEFORE. PROC
IF SAL  LT 10000
SELECT
END-IF
END-PROC
Since you may not get direct mapping, you need to convert the code at functional level.

Gopi
Member
Posts: 3
Joined: Tue Jun 02, 2009 5:57 pm

Post by Gopi » Thu Jun 04, 2009 1:27 pm

Hi, Its working ..
Thanks :)
COBOLGOPOL

Post Reply

FREE TUTORIALS

Tutorials
Free tutorials from mainframegurukul
  • JCL Tutorial
    Covers all important JCL concepts.
  • Cobol Tutorial
    This tutorials covers all Cobol Topics from STRING to COMP-3.
  • DB2 Tutorial
    DB2 Tutorial focuses on DB2 COBOL Programming.
  • SORT Tutorial
    This Tutorial covers all important aspects of DFSORT with examples
  • CICS Tutorial
    This CICS tutorial covers CICS concepts and CICS Basics, CICS COBOL Programming.
Interview
Mainframe Interview questions



Other References
Mainframe Tools and others