Portal | Manuals | References | Downloads | Info | Programs | JCLs | Mainframe wiki | Quick Ref
IBM Mainframe Computers Forums Index
 
Register
 
IBM Mainframe Computers Forums Index Mainframe: Search IBM Mainframe Forum: FAQ Memberlist Profile Log in to check your private messages Log in
 
SOC7 ABEND WHILE DOING TOT IN DFSORT

 
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> DFSORT/ICETOOL
View previous topic :: :: View next topic  
Author Message
avaneendra_linga

New User


Joined: 13 Dec 2006
Posts: 73
Location: Hyderabad

PostPosted: Fri Feb 16, 2007 4:57 pm    Post subject: SOC7 ABEND WHILE DOING TOT IN DFSORT
Reply with quote

Hi,
i am getting SOC7 abend while doing TOT in trailer record.
can anybody help on this...


Code:
//STEP1 EXEC PGM=SORT                                 
//SORTIN DD *                                         
        12,345                                         
        01,234                                         
/*                                                     
//RPT3     DD SYSOUT=*                                 
//SYSPRINT DD SYSOUT=*                                 
//SYSOUT   DD SYSOUT=*                                 
//SYSLIST  DD SYSOUT=*                                 
//SYSIN DD *                                           
  OPTION COPY                                         
  OUTFIL FNAMES=RPT3,                                 
  OUTREC=(9:9,6,ZD,EDIT=(SIIIIIT),SIGNS=(,-),X,80:X), 
  TRAILER1=(1:'TOTALS',9:TOT=(9,6,ZD,M12,LENGTH=6))   
/*
Back to top
View user's profile Send private message

William Thompson

Global Moderator


Joined: 18 Nov 2006
Posts: 3158
Location: Tucson AZ

PostPosted: Fri Feb 16, 2007 5:12 pm    Post subject:
Reply with quote

I think that the commas in your 9,6 field are the problem, rather than ZD, DFSORT has UFF and SFF formats to take care of the imbeded commas.
Back to top
View user's profile Send private message
avaneendra_linga

New User


Joined: 13 Dec 2006
Posts: 73
Location: Hyderabad

PostPosted: Fri Feb 16, 2007 5:59 pm    Post subject: THX A LOT
Reply with quote

HiThompson,
it was working with UFF, Thx a lot it was a great help for me.
Back to top
View user's profile Send private message
View previous topic :: :: View next topic  
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> DFSORT/ICETOOL All times are GMT + 6 Hours
Page 1 of 1

 

Search our Forum:

Similar Topics
Topic Author Forum Replies Posted
No new posts How to force a select query to abend neo4u DB2 7 Mon Apr 23, 2018 1:36 pm
No new posts Need urgent suggestion on DFSORT subratarec DFSORT/ICETOOL 6 Wed Mar 21, 2018 8:46 pm
No new posts Need help with 002-030 ABEND in TSO R... Terry Tallian TSO/ISPF 1 Sat Mar 17, 2018 1:13 am
No new posts Need help with ABEND RC=S806 RSN=4 an... chong.zhou All Other Mainframe Topics 3 Fri Feb 09, 2018 12:17 am
No new posts Formatting using DFsort Guru Nandu DFSORT/ICETOOL 5 Thu Nov 30, 2017 7:33 am

Facebook
Back to Top
 
Job Vacancies | Forum Rules | Bookmarks | Subscriptions | FAQ | Polls | Contact Us