MVSFORUMS.com Forum Index MVSFORUMS.com
A Community of and for MVS Professionals
 
 FAQFAQ   SearchSearch   Quick Manuals   RegisterRegister 
 ProfileProfile   Log in to check your private messagesLog in to check your private messages   Log inLog in 

E15 & E35 COBOL routines

 
Post new topic   Reply to topic   printer-friendly view    MVSFORUMS.com Forum Index -> Application Programming
View previous topic :: View next topic  
Author Message
rnanavaty
Beginner


Joined: 12 Apr 2006
Posts: 29
Topics: 20

PostPosted: Thu Jun 28, 2007 1:09 am    Post subject: E15 & E35 COBOL routines Reply with quote

I require the details of E15 and E35 COBOL routine details. I read the ref guide http://publibz.boulder.ibm.com/cgi-b...20020722140254 and other ref material on it. But most of them are related to DFSORT. It is not clear that what exacllty E15 and E35 meant for?
Back to top
View user's profile Send private message
dbzTHEdinosauer
Supermod


Joined: 20 Oct 2006
Posts: 1411
Topics: 26
Location: germany

PostPosted: Thu Jun 28, 2007 2:29 am    Post subject: Reply with quote

rnanavaty,

your link does not work.

paraphrased from a VSE Using Language Support:
All language products use SORT user exits to handle input and output
processing (E15 and E35 exits). These exits are usually called for each
record passed to SORT(E15) and passed back from SORT(E35).

this is the DFSORT Appl Pgm Guide, Chap 4 - User Exit Routines for z/os

If you are not on z/OS, this link will return all DFSORT pubs and you can select which applies to your shop.
_________________
Dick Brenholtz
American living in Varel, Germany
Back to top
View user's profile Send private message
rnanavaty
Beginner


Joined: 12 Apr 2006
Posts: 29
Topics: 20

PostPosted: Thu Jun 28, 2007 4:23 am    Post subject: Reply with quote

The link you have provided I already had a look and s same seprate guide for the same but it assumes that we are aware abt E15 and E35.
Back to top
View user's profile Send private message
dbzTHEdinosauer
Supermod


Joined: 20 Oct 2006
Posts: 1411
Topics: 26
Location: germany

PostPosted: Thu Jun 28, 2007 4:35 am    Post subject: Reply with quote

rnanavaty,

E15 and E35 are two of the DFSORT Exits available. When DFSORT receives a record, and the E15 exit is provided on the SORT Control Cards the associated program is called by SORT and the record is passed to the routine, which can be in any language - COBOL, HLASM, C. Upgrades to the type of INREC processing has attempted to reduce the need for E15 Exits. E35 is just before SORT releases the record, OUTREC enhancements attempt to reduce the need for E35 Exits.

At this point, you are more than aware of E15 and E35 Exits. If you still have a question, please raise it.
_________________
Dick Brenholtz
American living in Varel, Germany
Back to top
View user's profile Send private message
rnanavaty
Beginner


Joined: 12 Apr 2006
Posts: 29
Topics: 20

PostPosted: Thu Jun 28, 2007 11:06 pm    Post subject: Reply with quote

Thanks dbzTHEdinosauer. I think this description is of great help.
Back to top
View user's profile Send private message
abhishek_snn
Beginner


Joined: 24 Aug 2006
Posts: 16
Topics: 5

PostPosted: Wed Aug 10, 2011 5:31 am    Post subject: Reply with quote

Does anyone know how to put displays in a COBOL program that is called through E15. Normal Display doesnt seem to work even though the SYSOUT is coded.

Any pointers would be of great help.

Regards,
Abhishek
Back to top
View user's profile Send private message
kolusu
Site Admin
Site Admin


Joined: 26 Nov 2002
Posts: 12375
Topics: 75
Location: San Jose

PostPosted: Wed Aug 10, 2011 10:27 am    Post subject: Reply with quote

abhishek_snn wrote:
Does anyone know how to put displays in a COBOL program that is called through E15. Normal Display doesnt seem to work even though the SYSOUT is coded.

Any pointers would be of great help.

Regards,
Abhishek


Abhishek,

There is nothing special to put displays in COBOL E15. Use the DISPLAY statement in the exit and you are all done. However note that if you are invoking COBOL E15 via DFSORT, note that DFSORT puts the messages in the sysout Dataset. Your COBOL displays will be mixed with the DFSORT messages. So if you want to distinguish SORT messages from COBOL displays then you can route the messages of DFSORT to a different DD name. ex:

Code:

//STEP0100 EXEC PGM=SORT,PARM='MSGDDN=DFSOUT'
//SYSOUT   DD SYSOUT=*    <== COBOL Displays
//DFSOUT   DD SYSOUT=*    <== DFSORT messages
//EXITC    DD DSN=your cobol exit lib,DISP=SHR
//SORTIN   DD DSN=your input file,DISP=SHR
//SORTOUT  DD SYSOUT=*
//SYSIN    DD *
  SORT FIELDS=COPY                                         
  MODS E15=(COBE15,1024,EXITC,C)                           
  RECORD LENGTH=(,1024)                                   
//*

_________________
Kolusu
www.linkedin.com/in/kolusu
Back to top
View user's profile Send private message Send e-mail Visit poster's website
Display posts from previous:   
Post new topic   Reply to topic   printer-friendly view    MVSFORUMS.com Forum Index -> Application Programming All times are GMT - 5 Hours
Page 1 of 1

 
Jump to:  
You cannot post new topics in this forum
You cannot reply to topics in this forum
You cannot edit your posts in this forum
You cannot delete your posts in this forum
You cannot vote in polls in this forum


MVSFORUMS
Powered by phpBB © 2001, 2005 phpBB Group