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??
Conversion from easytrev
Moderators: DikDude, Moderator Group
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.
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
I dont see exact equalent in easytrieve+. In new easytrieve, following is the syntax of SORT.
Since you may not get direct mapping, you need to convert the code at functional level.
Code: Select all
SORT INFILE +
TO OUTFILE +
USING EMPNO +
BEFORE PARA-BEFORE
*
PARA-BEFORE. PROC
IF SAL LT 10000
SELECT
END-IF
END-PROC
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
- Cobol Interview Questions
50+ Interview Questions - JCL Interview Questions
50+ Interview Questions - DB2 Interview Questions
100+ Interview Questions - CICS Interview Questions
70+ Interview Questions - VSAM Interview Questions
27 Interview Questions
Other References
Mainframe Tools and others
- XPEDITER Reference
Explains how we can debug a program - FILEAID Reference
Explains how to browse , edit and delete datasets - Change Man Reference
Quick Start tutorial on Changeman - Abend Reference
Important Abend codes explained - FaceBook Page
MainframeGurukul FaceBook Page - LinkedIn Page
MainframeGurkul Linkedin Page