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
 

 

Identifying whether DFSORT or COBOL performed I/O

 
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 08, 2009 8:21 am    Post subject: Identifying whether DFSORT or COBOL performed I/O
Reply with quote

Its known that usage of a COBOL sort verb invokes DFSORT internally. At the same time even if FASTSRT compiler options is used the I/O is being taken care by the E15 and E35 exit routines of DFSORT if INPUT & OUTPUT PROCEDURE is used along with the SORT verb in COBOL.

1. Now how can I identify from the DFSORT messages that I/O was performed by COBOL exit routines or DFSORT itself??

2. Can we find out the DFSORT SORT CARD internally used which is associated with the corresponding COBOL SORT verb?

Thanks in advance..
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 08, 2009 9:14 pm    Post subject:
Reply with quote

Add this to your COBOL JCL:

Code:

//DFSPARM DD *
  OPTION MSGPRT=ALL,LIST,MSGDDN=MYMSGS
/*
//MYMSGS DD SYSOUT=*


1. If COBOL performs the input, you will see message ICE089I in MYMSGS. If DFSORT performs the input, you will see message ICE088I in MYMSGS.

If COBOL performs the output, you will see message ICE091I in MYMSGS. If DFSORT performs the output, you will see message ICE090I in MYMSGS.

2. The DFSORT SORT statement will be listed in MYMSGS.
Back to top
View user's profile Send private message
Singaram

New User


Joined: 19 Aug 2009
Posts: 19
Location: India

PostPosted: Tue Sep 08, 2009 10:40 pm    Post subject: Reply to: Identifying whether DFSORT or COBOL performed I/O
Reply with quote

Thanks a lot Frank...

Will definitely add this to the JCL and let you know for any updates.

Isnt there any performance degradation because of printing all the messages??
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 08, 2009 10:50 pm    Post subject:
Reply with quote

Quote:
Isnt there any performance degradation because of printing all the messages??


Seems like an odd question given you asked "how to identify from the DFSORT messages" which assumes you want to print the DFSORT messages.

The real question should be: Is there a significant performance degradation from printing the messages.

If you are sorting a small number of records, then the CPU time would be small and the additional CPU time for printing the messages might be noticable, but shouldn't be significant given the small CPU time.

If you are sorting a large number of records, the added CPU time for printing the messages shouldn't be significant compared to the total CPU time.
Back to top
View user's profile Send private message
Singaram

New User


Joined: 19 Aug 2009
Posts: 19
Location: India

PostPosted: Wed Sep 09, 2009 1:17 am    Post subject:
Reply with quote

Im extremely sorry for an indirect way of asking the question..

Because I just got a doubt whether I can use it in all places in production to extract the messages or to use only in case of long running codes...

Once again Im sorry for an odd question will make sure not to repeat next time...

Thanks for the details
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 RULES(NOEVENPACK) in cobol jackzhang75 COBOL Programming 5 Wed Mar 29, 2017 12:47 am
No new posts DFSORT MUL FIELDS tspr52 DFSORT/ICETOOL 16 Fri Mar 03, 2017 11:53 pm
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 Mainframe Interview Questions CICS,CO... akshathan Mainframe Interview Questions 6 Thu Feb 09, 2017 6:38 pm


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