| View previous topic :: View next topic |
| Author |
Message |
Papz
Beginner
Joined: 28 Jul 2004
Posts: 11
Topics: 2
|
 Posted: Thu Jul 29, 2004 2:09 am Post subject: UTL0030 - routine!! |
 |
|
Can anyone say what is the linkage area size of this internal routine and where does one specify that ; The scenario is like I would like to pass some ws-variables from a Cobol exit program for dislplay.
Thx,
Papz |
|
| Back to top |
|
 |
kolusu
Site Admin
Joined: 26 Nov 2002
Posts: 12378
Topics: 75
Location: San Jose
|
| Posted: Thu Jul 29, 2004 4:30 am Post subject: |
|
|
Papz,
What is this UTL0030 program? Is it a vendor utility? Is this anyway related to the E35 sort exit you were talking yesterday?
Btw did my proposed solution for splitting the records in a VB file work?
Kolusu
_________________
Kolusu
www.linkedin.com/in/kolusu |
|
| Back to top |
|
|
Papz
Beginner
Joined: 28 Jul 2004
Posts: 11
Topics: 2
|
| Posted: Thu Jul 29, 2004 4:34 am Post subject: |
|
|
Hi Kolusu,
I had used the E35 routine itself and yesterday went home very late after it ran fine. got my required output; just thought will share it with you when you join in today.
There was some link error that time i think kolusu, I am very new to mainframes and so couldn't locate anything at that time.
Then it got correted, we are calling this from our program , i think its some sort of CNTL pgm which comes along with sort(only my guess!!)
Bear with me if I am wrong
Thx for your help,
Papz. |
|
| Back to top |
|
|
kolusu
Site Admin
Joined: 26 Nov 2002
Posts: 12378
Topics: 75
Location: San Jose
|
| Posted: Thu Jul 29, 2004 4:52 am Post subject: |
|
|
Papz,
Please post the source of the pgm.
Ps: I would really appreciate if you can avoid chat room language in here. I edited your previous post
Thanks
Kolusu
_________________
Kolusu
www.linkedin.com/in/kolusu |
|
| Back to top |
|
|
Papz
Beginner
Joined: 28 Jul 2004
Posts: 11
Topics: 2
|
| Posted: Thu Jul 29, 2004 6:57 am Post subject: |
|
|
Sorry kolusu,
couldnt reply then as I had a meeting.
The program is a simple one where it collects the input record from sort through the linkage section
Then checks for a particular key and then writes into different output files.
The best part is how the control is passed to the cobol program..
using the sysin card
| Code: |
//SYSIN DD *
OPTION COBEXIT=COB2
MODS E35=(PGMNAME,20480,EXITLIB,C)
SORT FIELDS=(1,54,A),FORMAT=CH
SUM FIELDS=NONE
RECORD TYPE=V
/*
|
We specify out loadlibb in a dd called EXITLIB
We are using SORTD20
Can you explain how exit routines perform better than normal sort or programs ? I thought it would consume the same I/O
Thx,
Papz. |
|
| Back to top |
|
|
kolusu
Site Admin
Joined: 26 Nov 2002
Posts: 12378
Topics: 75
Location: San Jose
|
| Posted: Thu Jul 29, 2004 7:45 am Post subject: |
|
|
| Code: |
//SYSIN DD *
OPTION COBEXIT=COB2
MODS E35=(PGMNAME,20480,EXITLIB,C)
SORT FIELDS=(1,54,A),FORMAT=CH
SUM FIELDS=NONE
RECORD TYPE=V
/*
|
Here is the explanation of the sort card:
The SORT statement says that you want to sort in ascending order on a 54 byte CH (Character) field that starts in position 1.
OPTION Statement: COBEXIT = COB2 specifies that the cobol E35 Routine is to be run with the VS COBOL II library or with the language Environment library.
The MODS statement says that you want to use a COBOL E35 exit named PGMNAME which is in the library defined by the EXITLIB DD and is approximately 20480 (20K) bytes in length.
The SUM fields=None specifies that all duplicates are to be dropped.
The RECORD statement says that your input records are variable
Also check this link in "DFSORT Application Programming Guide" which explains in detail about DFSORT Program Phases
http://publibz.boulder.ibm.com/cgi-bin/bookmgr_OS390/BOOKS/ICE1CA00/4.2?DT=20031124143823
| Quote: |
Can you explain how exit routines perform better than normal sort or programs ? I thought it would consume the same I/O
|
I am not a big fan of exits in SORT. Generally speaking Exits have a bearing on performance. It's more efficient to NOT use exits at all, if possible.
Sometimes you can use a COPY rather than a sort. Sorting affects performance. A copy operation is much faster than sort operation.For example with an E15 exit, you could use a copy which would most likely be faster than using a sort without an exit, unless the number of records was small.
Check this link in "DFSORT Application Programming Guide" which explains how User Exit routines affect DFSORT performance
http://publibz.boulder.ibm.com/cgi-bin/bookmgr_OS390/BOOKS/ICE1CA00/4.5?DT=20031124143823
Check this link in "DFSORT Application Programming Guide" which will give you a good idea of how passing the records to user exit via linkage section is done
http://publibz.boulder.ibm.com/cgi-bin/bookmgr_OS390/BOOKS/ICE1CA00/4.11.1?SHELF=&DT=20031124143823&CASE=
Hope this helps...
Cheers
Kolusu
_________________
Kolusu
www.linkedin.com/in/kolusu |
|
| Back to top |
|
|
Papz
Beginner
Joined: 28 Jul 2004
Posts: 11
Topics: 2
|
| Posted: Thu Jul 29, 2004 7:57 am Post subject: |
|
|
Thanks a lot kolusu , you have provided me with a lot of information.
I will try to go through the links and gather as much information as possible.
pretty satisfied that I came to this site.  |
|
| Back to top |
|
|
haatvedt
Beginner
Joined: 14 Nov 2003
Posts: 66
Topics: 0
Location: St Cloud, Minnesota USA
|
| Posted: Sun Aug 01, 2004 3:05 pm Post subject: |
|
|
Papz,
please contact me at my work email address.
The UTL0030 program is an in house written utility program which creates a control report. it can be called from any program which executes in a batch environment.
you can find my email address in Outlook on our company email. Otherwise please ask your supervisor to contact me.
chuck haatvedt
sr. technical architect
application performance tuning.
thanks.
ps.. if you send me an email, I'll tru to call you in Chennai.
_________________
Chuck Haatvedt
email --> clastnameatcharterdotnet
(replace lastname, at, dot with appropriate
characters) |
|
| Back to top |
|
|
|
|
|
FAQ
Search
Quick Manuals
Register
Profile
Log in to check your private messages
Log in
