|
View previous topic :: View next topic
|
| Author |
Message |
ramankapoor
New User
Joined: 27 Feb 2006
Posts: 23
Location: delhi
|
|
|
|
I AM HAVING 16 RECORDs AS FIRST FOUR COLUMNS.
NOW THE REQUIRMENT IS I WANT ONLY THE RECORD ENDS WITH '0' IN OUTFILE.
PLEASE GIVE ME THE SOLUTION .
The Code i m writing is :
| Code: |
//STEP0010 EXEC PGM=SORT
//SORTIN DD DSN=APASPUB.SORT.PS7,DISP=SHR
//SORTOUT DD DSN=APASPUB.SORT.PS8,
// DISP=(NEW,CATLG,CATLG),
// SPACE=(CYL,(1,1),RLSE),
// DCB=(LRECL=80,BLKSIZE=0,RECFM=FB)
//SYSIN DD *
SORT FIELDS=(1,4,CH,A)
OUTFIL FILES=01
INCLUDE COND=(4,1,CH,EQ,'0')
//SYSOUT DD SYSOUT=*
//
|
The Data in input file for 1st four column is :
0001
0010
4444
0030
0040
7777
0060
0070
6666
0090
0100
0200
0300
0400
8888
9999
i am getting abend in this :
Abend Log is :
USER COMPLETION CODE=0113
TIME=02.41.51 SEQ=04883 CPU=0000 ASID=00AB
PSW AT TIME OF ERROR 078D1000 00ED7F48 ILC 2 INTC 0D
NO ACTIVE MODULE FOUND
NAME=UNKNOWN
DATA AT PSW 00ED7F42 - 41A0C458 0A0D9602 D3CD9180
AR/GR 0: 80C36B3E/00000000 1: 00000000/80000071
2: 00000000/00000071 3: 00000000/00ED7EF2
4: 00000000/00000050 5: 00000000/000063D7
6: 00000000/00008A08 7: 00000000/40EDAFBC
8: 00000000/00ED8B00 9: 00000000/40EDB270
A: 00000000/00ED7F58 B: 00000000/00ED6B00
C: 00000000/00ED7B00 D: 00000000/00007000
E: 809FA03C/00ED7EF0 F: 809FA020/00000010
END OF SYMPTOM DUMP
1 - CONTROL STATEMENTS FOR 5740-SM1, DFSORT REL 14.0
SORT FIELDS=(1,4,CH,A)
OUTFIL FILES=01
INCLUDE COND=(4,1,CH,EQ,'0')
$
E COMPARISON FIELD ERROR
9 SORTOF01 NOT DEFINED
3 END OF DFSORT
Please Clarify where i am mistaking ?? |
|
| Back to top |
|
 |
martin9
Active User
Joined: 01 Mar 2006
Posts: 290
Location: Basel, Switzerland
|
|
|
|
hy ramankapoor,
as you see in your joblog,
you did not define a sortof01 dd (OUTFIL FILES=01).
--> OUTFIL FILES=xx --> SORTOFxx DD...
change the sortout dd in sortof01 dd and
it will work properly...
martin9 |
|
| Back to top |
|
|
martin9
Active User
Joined: 01 Mar 2006
Posts: 290
Location: Basel, Switzerland
|
|
|
|
hy ramakapoor,
i just forgot...
the INCLUDE should be
INCLUDE COND=(4,1,CH,EQ,C'0'),
it is a charcter constant in the form C'anystring'
martin9 |
|
| Back to top |
|
|
ramankapoor
New User
Joined: 27 Feb 2006
Posts: 23
Location: delhi
|
|
|
|
Yes , Its Done ..
Thanks a lot for the Quick Reply. |
|
| Back to top |
|
|
fixdoubts
New User
Joined: 21 Oct 2005
Posts: 54
|
|
|
|
Hi,
Apart from what martin suggested i would suggest use the following SYSIN
| Code: |
//SYSIN DD *
SORT FIELDS=(1,4,CH,A)
OUTFIL FILES=01,
INCLUDE=(4,1,CH,EQ,C'0') |
Instead of the one u have given above.
Regards, |
|
| Back to top |
|
|
martin9
Active User
Joined: 01 Mar 2006
Posts: 290
Location: Basel, Switzerland
|
|
|
|
hy ramankapoor,
no problem,
i just like supporting people.
in this forum i meet many indian guys,
what i like, 'cause i'm somehow indian related...
have a good time...
martin9 |
|
| Back to top |
|
|
ramankapoor
New User
Joined: 27 Feb 2006
Posts: 23
Location: delhi
|
|
|
|
Can u Pls tell Me How u manage to debug these problems so quicly.
Pls give me some tips so that i can imrove upon myself in this technique.
Thanks... |
|
| Back to top |
|
|
martin9
Active User
Joined: 01 Mar 2006
Posts: 290
Location: Basel, Switzerland
|
|
|
|
hy ramankapoor,
ok,
E COMPARISON FIELD ERROR
9 SORTOF01 NOT DEFINED
this is why.
i just looked at the error messages, ok.
so for any problem/question you give to this forum
provide always the error codes, joblogs and so on...
martin9 |
|
| Back to top |
|
|
ramankapoor
New User
Joined: 27 Feb 2006
Posts: 23
Location: delhi
|
|
|
|
Ok .
Now i ll try to concentrate on to the what the main problem exactly in future.
Realy Thnks a lot to u.. |
|
| Back to top |
|
|
|
|
