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
 

 

SORT - E15 and E35 using same user exit routine

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

New User


Joined: 14 Dec 2011
Posts: 17
Location: India

PostPosted: Mon Oct 03, 2016 4:33 pm    Post subject: SORT - E15 and E35 using same user exit routine
Reply with quote

Hello,

I am planning to use same user exit routine (a COBOL program) for E15 and E35.

It is possible to find out within the called COBOL program as to what exit routine (E15 or E35) has called it?

Thanks!
Back to top
View user's profile Send private message

Bill Woodger

DFSORT Moderator


Joined: 09 Mar 2011
Posts: 7228

PostPosted: Mon Oct 03, 2016 6:49 pm    Post subject: Reply to: SORT - E15 and E35 using same user exit routine
Reply with quote

There's a whole chapter on Exits in the manual. What does that say?
Back to top
View user's profile Send private message
Abhi Nature

New User


Joined: 14 Dec 2011
Posts: 17
Location: India

PostPosted: Mon Oct 03, 2016 8:03 pm    Post subject:
Reply with quote

I did not find anything in the manual which specifies the source of call to user exit routine. Is it possible to find the source of call?
Back to top
View user's profile Send private message
enrico-sorichetti

Global Moderator


Joined: 14 Mar 2007
Posts: 10202
Location: italy

PostPosted: Mon Oct 03, 2016 8:23 pm    Post subject: Reply to: SORT - E15 and E35 using same user exit routine
Reply with quote

Quote:
I did not find anything in the manual which specifies the source of call to user exit routine.


given the above premise

asking
Quote:
Is it possible to find the source of call?

is just a waste of time for everybody
Back to top
View user's profile Send private message
Rohit Umarjikar

Senior Member


Joined: 21 Sep 2010
Posts: 1609
Location: NY,USA

PostPosted: Mon Oct 03, 2016 8:27 pm    Post subject:
Reply with quote

4.0 Using Your Own User Exit Routines
Back to top
View user's profile Send private message
Abhi Nature

New User


Joined: 14 Dec 2011
Posts: 17
Location: India

PostPosted: Mon Oct 03, 2016 8:38 pm    Post subject: Re: Reply to: SORT - E15 and E35 using same user exit routine
Reply with quote

enrico-sorichetti wrote:
Quote:
I did not find anything in the manual which specifies the source of call to user exit routine.


given the above premise

asking
Quote:
Is it possible to find the source of call?

is just a waste of time for everybody


I had thought I might be missing something. Thanks anyway.
Back to top
View user's profile Send private message
Rohit Umarjikar

Senior Member


Joined: 21 Sep 2010
Posts: 1609
Location: NY,USA

PostPosted: Mon Oct 03, 2016 8:40 pm    Post subject:
Reply with quote

Quote:
I had thought I might be missing something. Thanks anyway
YES, The Google Search.
Back to top
View user's profile Send private message
Arun Raj

Moderator


Joined: 17 Oct 2006
Posts: 2158
Location: @my desk

PostPosted: Mon Oct 03, 2016 10:00 pm    Post subject:
Reply with quote

Abhi,

If the manual does not say much about it, try any of these as mentioned in the manual. They should be able to help you.

- Contact your IBM service representative
- Call IBM Technical Support
- Visit the IBM support portal at ibm.com/systems/z/support

You might have to register in the IBM support portal in order to submit a service incident. I have tried this in the past for some other IBM products and they were pretty quick in responding to tickets each time.

Good luck!
Back to top
View user's profile Send private message
Bill Woodger

DFSORT Moderator


Joined: 09 Mar 2011
Posts: 7228

PostPosted: Tue Oct 04, 2016 2:03 am    Post subject: Reply to: SORT - E15 and E35 using same user exit routine
Reply with quote

An E15 prepares or provides input for SORT.

An E35 processes output from SORT.

I'm having difficulty understanding why you want to use the same program for E15 and E35. Can you explain more?

I don't think it will work if you use the same program name for each exit. You could use the same source, different program name, I just don't get why this would be useful.
Back to top
View user's profile Send private message
Abhi Nature

New User


Joined: 14 Dec 2011
Posts: 17
Location: India

PostPosted: Tue Oct 04, 2016 11:02 am    Post subject:
Reply with quote

Bill Woodger wrote:
I'm having difficulty understanding why you want to use the same program for E15 and E35. Can you explain more?


E15 and E35 exit had a lot similar processing with very few differences. That's why thought of writing single code with difference separated by identifying if E15 called it or E35. Writing different codes is the final resort.

Bill Woodger wrote:
I don't think it will work if you use the same program name for each exit. You could use the same source, different program name, I just don't get why this would be useful.


Yes, I suppose the only things that SORT passes to user exit are return code (0, 4 or 8) and record address. So there isn't any trace as to which exit called it, or are you saying this because same program would be re- loaded in the memory?
Back to top
View user's profile Send private message
Bill Woodger

DFSORT Moderator


Joined: 09 Mar 2011
Posts: 7228

PostPosted: Tue Oct 04, 2016 12:06 pm    Post subject: Reply to: SORT - E15 and E35 using same user exit routine
Reply with quote

If you have duplicated code (but why, what is it doing at input that it also needs to do at output) you have CALL and COPY.

My concern is whether you get a new copy of the program or not, or whether it just fails (I've never thought to try it).

However, if the "mechanics" work (you'll have to try that) there would be a way to do it. There is a separate area of defined storage which is passed to the exits which allows inter-exit communication. Which is just what you want to do.

It is in that same chapter in the current manual for your version of DFSORT. Test in the E15 (set to indicate E15 has been entered). Test in the E35 (spots that the E15 as been entered, so it must be the E35).

So possible, if the mechanics work.
Back to top
View user's profile Send private message
PeterHolland

Global Moderator


Joined: 27 Oct 2009
Posts: 2422
Location: Netherlands, Amstelveen

PostPosted: Tue Oct 04, 2016 1:00 pm    Post subject:
Reply with quote

Using the The Extended Parameter List you can supply a 4 character call identifier (offset 32 (dec)).
Back to top
View user's profile Send private message
Bill Woodger

DFSORT Moderator


Joined: 09 Mar 2011
Posts: 7228

PostPosted: Tue Oct 04, 2016 1:25 pm    Post subject: Reply to: SORT - E15 and E35 using same user exit routine
Reply with quote

The Extended Parameter List is only available for program-invoked SORTs. It is not available for the interface between EXEC PGM=SORT and an exit.
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 Limit duplicate records in the SORT pshongal SYNCSORT 6 Mon Nov 21, 2016 12:54 pm
No new posts How to convert the VBM file to VB or... Sulabh Agrawal JCL & VSAM 4 Fri Nov 18, 2016 1:04 pm
No new posts Sort records based on numeric field. Alks SYNCSORT 2 Wed Oct 19, 2016 10:14 pm
No new posts How to delete second instance from Fl... Gunapala CN DFSORT/ICETOOL 6 Tue Oct 18, 2016 11:42 pm
No new posts abend sort based on count records in ... anatol DFSORT/ICETOOL 5 Mon Oct 17, 2016 10:10 pm


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