IBM Mainframe Forum Index
 
Log In
 
IBM Mainframe Forum Index Mainframe: Search IBM Mainframe Forum: FAQ Register
 

SORT - E15 and E35 using same user exit routine


IBM Mainframe Forums -> DFSORT/ICETOOL
Post new topic   Reply to topic
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
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

Moderator Emeritus


Joined: 09 Mar 2011
Posts: 7309
Location: Inside the Matrix

PostPosted: Mon Oct 03, 2016 6:49 pm
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
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

Superior Member


Joined: 14 Mar 2007
Posts: 10872
Location: italy

PostPosted: Mon Oct 03, 2016 8:23 pm
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

Global Moderator


Joined: 21 Sep 2010
Posts: 3048
Location: NYC,USA

PostPosted: Mon Oct 03, 2016 8:27 pm
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
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

Global Moderator


Joined: 21 Sep 2010
Posts: 3048
Location: NYC,USA

PostPosted: Mon Oct 03, 2016 8:40 pm
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: 2481
Location: @my desk

PostPosted: Mon Oct 03, 2016 10:00 pm
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

Moderator Emeritus


Joined: 09 Mar 2011
Posts: 7309
Location: Inside the Matrix

PostPosted: Tue Oct 04, 2016 2:03 am
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
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

Moderator Emeritus


Joined: 09 Mar 2011
Posts: 7309
Location: Inside the Matrix

PostPosted: Tue Oct 04, 2016 12:06 pm
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: 2481
Location: Netherlands, Amstelveen

PostPosted: Tue Oct 04, 2016 1:00 pm
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

Moderator Emeritus


Joined: 09 Mar 2011
Posts: 7309
Location: Inside the Matrix

PostPosted: Tue Oct 04, 2016 1:25 pm
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 View Bookmarks
All times are GMT + 6 Hours
Forum Index -> DFSORT/ICETOOL

 


Similar Topics
Topic Forum Replies
No new posts JCL sort card - get first day and las... JCL & VSAM 9
No new posts PuTTY - "User is not a surrogate... IBM Tools 5
No new posts Sort First/last record of a subset th... DFSORT/ICETOOL 7
No new posts how to calculate SUM value for VB fil... DFSORT/ICETOOL 1
No new posts how to calculate SUM for VB file usin... JCL & VSAM 1
Search our Forums:

Back to Top