Portal | Manuals | References | Downloads | Info | Programs | JCLs | Master the Mainframes
IBM Mainframe Computers Forums Index
 
Register
 
IBM Mainframe Computers Forums Index Mainframe: Search IBM Mainframe Forum: FAQ Memberlist Usergroups Profile Log in to check your private messages Log in
 

 

FASTSRT COBOL compiler option

 
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> DFSORT/ICETOOL
View previous topic :: :: View next topic  
Author Message
Singaram

New User


Joined: 19 Aug 2009
Posts: 19
Location: India

PostPosted: Tue Sep 01, 2009 9:38 pm    Post subject: FASTSRT COBOL compiler option
Reply with quote

Hi,

Does the usage of COBOL internal sort with INPUT and/or OUTPUT procedure invokes DFSORT internally while execution if we have set FASTSRT = YES as the COBOL compiler option.

Or is this internal invocation of DFSORT dependent on COBOL version and DFSORT release version.

We are using Enterprise COBOL and DFSORT release 14.

Thanks in advance

Singaram
Back to top
View user's profile Send private message

Bill O'Boyle

CICS Moderator


Joined: 14 Jan 2008
Posts: 2502
Location: Atlanta, Georgia, USA

PostPosted: Tue Sep 01, 2009 9:47 pm    Post subject: Reply to: FASTSRT COBOL compiler option
Reply with quote

FASTSRT only applies to USING and GIVING. It has no effect on INPUT or OUTPUT procedures.

I cannot answer your DFSORT question conclusively.

Perhaps this post needs to be moved to the COBOL forum?

Bill
Back to top
View user's profile Send private message
Robert Sample

Global Moderator


Joined: 06 Jun 2008
Posts: 8117
Location: East Dubuque, Illinois, USA

PostPosted: Tue Sep 01, 2009 10:50 pm    Post subject:
Reply with quote

Quote:
Or is this internal invocation of DFSORT dependent on COBOL version and DFSORT release version.
I believe the COBOL compiler invokes the system sort package (DFSORT, SYNCSORT, or whichever) no matter what. FASTSRT merely tells whether or not COBOL will do the I/O for the USING and GIVING files.
Back to top
View user's profile Send private message
Frank Yaeger

DFSORT Moderator


Joined: 15 Feb 2005
Posts: 7130
Location: San Jose, CA

PostPosted: Tue Sep 01, 2009 10:51 pm    Post subject:
Reply with quote

Singaram,

I'm not sure what you're asking.

The COBOL SORT verb invokes DFSORT. If COBOL sets the FASTSRT option, then DFSORT accesses the data sets directly. If COBOL sets the NOFASTSRT option, then COBOL accesses the data sets and passes the records to/from DFSORT.

For more information on FASTSRT, see the COBOL manual. For more information on DFSORT and COBOL, see:

http://publibz.boulder.ibm.com/cgi-bin/bookmgr_OS390/BOOKS/ICE1CT10/6.0?DT=20080528173317
Back to top
View user's profile Send private message
Singaram

New User


Joined: 19 Aug 2009
Posts: 19
Location: India

PostPosted: Tue Sep 01, 2009 11:26 pm    Post subject:
Reply with quote

Thanks a lot Frank.

To clarify my question; consider the following 4 cases

CASE1 :

COBOL SORT verb with USING/GIVING with FASTSRT option

CASE2 :

COBOL SORT verb with USING/GIVING with NOFASTSRT option

CASE3 :

COBOL SORT verb with INPUT/OUTPUT procedure with FASTSRT option

CASE4:

COBOL SORT verb with INPUT/OUTPUT procedure with NOFASTSRT option

In all the above said cases does COBOL invoke DFSORT for sort processing?
In all the above said cases will I/O be taken care by COBOL if NOFASTSRT is used and vice versa if FASSRT is in effect?
[/quote]
Back to top
View user's profile Send private message
Frank Yaeger

DFSORT Moderator


Joined: 15 Feb 2005
Posts: 7130
Location: San Jose, CA

PostPosted: Tue Sep 01, 2009 11:42 pm    Post subject:
Reply with quote

Quote:
In all the above said cases does COBOL invoke DFSORT for sort processing?


Yes.

Quote:
In all the above said cases will I/O be taken care by COBOL if NOFASTSRT is used and vice versa if FASSRT is in effect?


Specifying the FASTSRT option does NOT guarantee that COBOL will use it - that decision is made by COBOL. If FASTSRT is in effect, then the I/O is taken care of by DFSORT. If NOFASTSRT is in effect, then the I/O is taken care of by COBOL.
Back to top
View user's profile Send private message
Singaram

New User


Joined: 19 Aug 2009
Posts: 19
Location: India

PostPosted: Wed Sep 02, 2009 1:00 am    Post subject:
Reply with quote

Thanks once again for the timely help.

As referred by you, I was going through the manual as
"http://publibz.boulder.ibm.com/cgi-bin/bookmgr_OS390/BOOKS/ICE1CT10/6.0?DT=20080528173317" and found that

1.When NOFASTSRT is in effect, the E15 user exit routine is used for USING/INPUT PROCEDURE and the E35 exit routine is used for GIVING/OUTPUT PROCEDURE.

2. FASTSRT cannot be used for input processing when an INPUT PROCEDURE is specified. Referring for further details on the COBOL prog guide indicated that

With FASTSRT in effect:

Quote:

You cannot use an input procedure on an input file, nor an output procedure on an output file. Instead of using input or output procedures, you might be able to use DFSORT control statements: – INREC
– OUTFILE – OUTREC – INCLUDE – OMIT – STOPAFT – SKIPREC – SUM Many DFSORT functions perform the same operations that are common in input or output procedures. Code the appropriate DFSORT control statements instead, and place them either in the IGZSRTCD data set or the SORTCNTL data set. v Do not code the LINAGE clause for the output FD entry.



Once again thanks a lot for proper direction Frank.[/quote]
Back to top
View user's profile Send private message
View previous topic :: :: View next topic  
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> DFSORT/ICETOOL All times are GMT + 6 Hours
Page 1 of 1

 

Search our Forum:

Similar Topics
Topic Author Forum Replies Posted
No new posts XML Parse for COBOL 5.2 Bhanu Praveen COBOL Programming 1 Sat Jul 08, 2017 8:58 pm
No new posts pre-compiler for program in an HFS Pedro DB2 0 Fri Jun 23, 2017 11:13 pm
No new posts Dynamic output file creation in cobol... smileheal COBOL Programming 7 Thu Jun 15, 2017 10:53 pm
No new posts Search utility(3.14) using JCl and Cobol RKS3 COBOL Programming 12 Sat Jun 10, 2017 10:24 pm
No new posts COBOL DB2 program - zIIP eligible vasanthz COBOL Programming 7 Wed May 31, 2017 5:12 am


Facebook
Back to Top
 
Mainframe Wiki | Forum Rules | Bookmarks | Subscriptions | FAQ | Tutorials | Contact Us