View previous topic :: View next topic
|
Author |
Message |
passion_sujesh
New User
Joined: 14 Mar 2008 Posts: 74 Location: India,Chennai
|
|
|
|
Is it possible to call DFSORT utility in rexx. IF possible can any one please send me any KEY words to search in this forum. I have a requirement in which i have to sort few files based on certain condition. This has to be in rexx as i am writing a rexx code which needs the file to be sorted before Proceeding further.
Sujesh. |
|
Back to top |
|
|
expat
Global Moderator
Joined: 14 Mar 2007 Posts: 8797 Location: Welsh Wales
|
|
|
|
Yes, it's possible. Here's a snippet of code that I use to sort a stem
Code: |
x = msg('off')
"Free fi(sysout)"
"Alloc fi(sysout) sysout(X)"
if ax.0 > 1 then do
"Free fi(Sysin,Sortin,Sortout)"
"Alloc fi(Sysin) new tracks space(3 3) recfm(f b) lrecl(80)"
"Alloc fi(Sortin) new tracks space(300 300) recfm(v b) lrecl(80)"
"Alloc fi(Sortout) new tracks space(300 300) recfm(v b) lrecl(80)"
Push " OPTION VLSHRT VLSCMP"
"Execio 1 Diskw Sysin"
Push " SORT FIELDS=(5,44,CH,A)"
"Execio 1 Diskw Sysin ( Finis"
"Execio * Diskw Sortin ( Stem ax. Finis"
Drop ax.
ax.0 = 0
"Call *(SORT)"
"Execio * Diskr Sortout ( Stem ax. Finis"
"Free fi(Sysin,Sortin,Sortout)"
end |
|
|
Back to top |
|
|
passion_sujesh
New User
Joined: 14 Mar 2008 Posts: 74 Location: India,Chennai
|
|
|
|
Thanks Expat. |
|
Back to top |
|
|
passion_sujesh
New User
Joined: 14 Mar 2008 Posts: 74 Location: India,Chennai
|
|
|
|
Hi Expat,
The code u provided works fine, but if there is any issue in the sort card the sysmptom dump is displayed on the screen. Is is possible to route the sysmtopm dump to any file, instead of displaying them on the screen.
Can u please help me in this.
Symptom dump message displayed:
IEA995I SYMPTOM DUMP OUTPUT
USER COMPLETION CODE=0007
TIME=04.51.09 SEQ=11111 CPU=0000 ASID=001234
PSW AT TIME OF ERROR 0345f3000 000v45874 ILC 2 INTC 0D
..
..
End of Symptom dump
Thanks in advance,
Sujesh. |
|
Back to top |
|
|
expat
Global Moderator
Joined: 14 Mar 2007 Posts: 8797 Location: Welsh Wales
|
|
|
|
What DD name does the output assign to if the abend occurs in batch.
A guess - DD = SYSUDUMP |
|
Back to top |
|
|
passion_sujesh
New User
Joined: 14 Mar 2008 Posts: 74 Location: India,Chennai
|
|
|
|
Hi expat,
I tried with the ddname 'SYSUDUMP', but the issue still exist. The symptom dump is still dispalyed on the screen. Is there any other ddname which will solve this issue.
Thanks in advance,
Sujesh. |
|
Back to top |
|
|
expat
Global Moderator
Joined: 14 Mar 2007 Posts: 8797 Location: Welsh Wales
|
|
|
|
From the manual, I found these, so try them all and see what happens, but apart from that I suggest you post a question in the DFSORT forum and let one of the product developers answer you. You can't get a better answer than from those guys.
Quote: |
//SYSUDUMP DD
Defines the data set for output from a system ABEND dump routine
//SYSMDUMP DD
Same as //SYSUDUMP DD
//SYSABEND DD
Same as //SYSUDUMP DD
//SORTSNAP DD
Defines the snap dump data set dynamically allocated by DFSORT
|
|
|
Back to top |
|
|
|