Re: question on sortwork file for internal sort...

  
           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?