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: 7992
Location: Bellevue, IA

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 SQL query not working in Cobol program. CuriousMainframer COBOL Programming 14 Wed Feb 22, 2017 5:56 pm
No new posts Execute TSO ACF commands from COBOL-I... supreethi.srid TSO/ISPF 0 Tue Feb 21, 2017 5:19 pm
No new posts Who can recomend or to know a PL1 com... Miguel Fernandez DB2 0 Tue Feb 14, 2017 1:42 pm
No new posts Mainframe Interview Questions CICS,CO... akshathan Mainframe Interview Questions 6 Thu Feb 09, 2017 6:38 pm
No new posts Submit job from Cobol with input data abdulrafi COBOL Programming 4 Wed Feb 01, 2017 12:41 pm


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