SELECT  SORT-FILE  ASSIGN TO DISK-SORT.   
      DATA DIVISION.                              
                                                    
        FILE SECTION.                               
                                                    
        SD  SORT-FILE.                              
        01  SORT-REC.                               
            05  SORT-KEY    PIC 9(6).               
            05  SORT-RECORD PIC X(158). 

   PROCEDURE DIVISION.
                                                                    
      SORT SORT-FILE ON ASCENDING KEY SORT-KEY                  
          INPUT PROCEDURE  IS RELEASE-TO-SORT  THRU RTS-EXIT    
          OUTPUT PROCEDURE IS RETURN-FROM-SORT THRU RFS-EXIT.

       *                                            

-----Original Message-----
From: cobol400-l-bounces@xxxxxxxxxxxx
[mailto:cobol400-l-bounces@xxxxxxxxxxxx] On Behalf Of Michael Rosinger
Sent: Wednesday, November 15, 2006 11:57 AM
To: cobol400-l@xxxxxxxxxxxx
Subject: [COBOL400-L] question on sortwork file for internal sort...


List,

I am busy writing my source filter program for converting COBOL programs

from the mainframe to ILE/COBOL. Some questions please....

1) Is it necessary to define a SELECT for the sortwork file for an
internal 
COBOL SORT?

2) If #1 is yes, could someone provide an example of the SELECT and FD
for 
the sortwork file?

3) If anyone out there is familiar with the differences between
mainframe 
and iSeries concerning this, is there anything else I need to be aware
of on 
this topic?



As an Amazon Associate we earn from qualifying purchases.

This thread ...


Follow On AppleNews
Return to Archive home page | Return to MIDRANGE.COM home page

This mailing list archive is Copyright 1997-2022 by midrange.com and David Gibbs as a compilation work. Use of the archive is restricted to research of a business or technical nature. Any other uses are prohibited. Full details are available on our policy page. If you have questions about this, please contact [javascript protected email address].

Operating expenses for this site are earned using the Amazon Associate program and Google Adsense.