|
View previous topic :: View next topic
|
| Author |
Message |
naveen.prabhu.p
New User
Joined: 20 Sep 2006
Posts: 4
Location: Bangalore
|
|
|
|
My input file has data as mentioned below,
| Code: |
AAA -31.00 0001
AAA 1.00 0001
AAA 111.00 0001
BBB 34.00 0001
BBB 222.00 0001
CCC 14.00 0001
CCC -22.00 0001
|
expected output :
| Code: |
AAA 81.00 0003
BBB 256.00 0002
CCC -8.00 0002
|
Can anyone please help me out with this?? |
|
| Back to top |
|
 |
guptae
Moderator
Joined: 14 Oct 2005
Posts: 1208
Location: Bangalore,India
|
|
|
|
Hi there,
would u please tell me field length & offset that will be helpful to provide u sort card |
|
| Back to top |
|
|
naveen.prabhu.p
New User
Joined: 20 Sep 2006
Posts: 4
Location: Bangalore
|
|
|
|
Hi Ekta,
Actually i have the input file as,
(1,13) is trans type PIC X(13).
(14,6) filler
(20,10) is the Trans date pic x(10)
(30,2) filer
(32,13) is trans amount PIC -Z(8)9.99
(45,5) filler
(50,7) has constant 0000001 (pic x(7))
(57,123) filler.
I need to get, Total no of each transaction type, total amount against each type.
I hope this explanation would let you know my problem.
Thanks in advance,
Naveen |
|
| Back to top |
|
|
mubs55
New User
Joined: 19 Apr 2006
Posts: 12
|
|
|
|
Hi Naveen,
heres the solution for ur problem
| Code: |
//SORT01 EXEC PGM=ICEMAN
//SORTIN DD DSN=INPUT FILE,DISP=SHR
//SORTOUT DD DSN=OUTPUT FILE,DISP=OLD
//SYSOUT DD SYSOUT=*
//SYSIN DD *
SORT FIELDS=(1,15,CH,A)
OUTFIL REMOVECC,NODETAIL,
SECTIONS=(1,15,
TRAILER3=(1,20,
32:TOT=(32,13,SFF,EDIT=(STTTTTTTTTT.TT),SIGNS=(,-)),
50:TOT=(50,7,ZD,EDIT=(TTTTTTT))))
|
|
|
| Back to top |
|
|
naveen.prabhu.p
New User
Joined: 20 Sep 2006
Posts: 4
Location: Bangalore
|
|
|
|
| Thanks Mubs, that solved my problem |
|
| Back to top |
|
|
|
|
