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
 
Problem with overlapping fields

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

New User


Joined: 29 Feb 2008
Posts: 49
Location: Pune

PostPosted: Mon Aug 26, 2013 11:16 am    Post subject: Problem with overlapping fields
Reply with quote

Hi,
I am facing similar problem (to this)

Code:

********************************* TOP OF DATA **********************************
ICE201I H RECORD TYPE IS V - DATA STARTS IN POSITION 5
ICE150I 1 VLSHRT NOT USED FOR SORT, MERGE, INCLUDE, OMIT OR SUM STATEMENT FIELDS
ICE805I 1 JOBNAME: CJYAF5YH , STEPNAME: S01SORT2
ICE802I 0 BLOCKSET     TECHNIQUE IN CONTROL
ICE143I 0 BLOCKSET     COPY  TECHNIQUE SELECTED
ICE250I 0 VISIT http://www.ibm.com/storage/dfsort FOR DFSORT PAPERS, EXAMPLES AN
ICE000I 1 - CONTROL STATEMENTS FOR 5694-A01, Z/OS DFSORT V1R12 - 06:42 ON MON AU
                 SORT FIELDS=COPY
                 OPTION VLSHRT
                 OUTFIL BUILD=(1:1,4,
                               5:5,186,
                               191:191,12,ZD,ADD,+1,
                               203:203,3,
                               206:206,12,ZD,ADD,+1,
                               218:218,811),VLFILL=C' '
ICE201I H RECORD TYPE IS V - DATA STARTS IN POSITION 5
ICE150I 1 VLSHRT NOT USED FOR SORT, MERGE, INCLUDE, OMIT OR SUM STATEMENT FIELDS
ICE126A 9 INCONSISTENT REFORMATTING FOR SORTOUT : REASON CODE 04, IFTHEN 0
ICE751I 0 C5-K76982 C6-K90026 C7-K58148 C8-K67572 E9-K60824 E7-K70685
ICE052I 3 END OF DFSORT
******************************** BOTTOM OF DATA ********************************


What could be the problem?
i/p & o/p files are - VB 1024
Back to top
View user's profile Send private message

Bill Woodger

DFSORT Moderator


Joined: 09 Mar 2011
Posts: 7315

PostPosted: Mon Aug 26, 2013 1:33 pm    Post subject: Reply to: Copy a VB file of length 446 to VB file of length
Reply with quote

New question, new topic. Please don't tailgate old topics.

Have you looked at the ICE126A message? There's a manual, there's IBM Lookat. There's google. No excuses.

Whilst there, look at ICE150I.

Also, how about telling us what you are trying to do?
Back to top
View user's profile Send private message
abdul.faras

New User


Joined: 29 Feb 2008
Posts: 49
Location: Pune

PostPosted: Mon Aug 26, 2013 3:23 pm    Post subject:
Reply with quote

Hi Bill,
Sorry! I didn't know the rule of starting a new thread! I thought, since it is similar problem, the solution should remain at the same thread.

Anyways,
I already searched for the error
"ICE126A 9 INCONSISTENT REFORMATTING FOR SORTOUT : REASON CODE 04, IFTHEN 0";

I got this explaination.

Quote:

4.A column overlapped the previous output field in the reformatted record.
Example (fixed-length input):

INREC IFTHEN=(WHEN=INIT,
BUILD=(81:SEQNUM,8,ZD)),
IFTHEN=(WHEN=(81,8,ZD,EQ,+1),
BUILD=(3,20,20:C'ABC'))


But I don't see any overlapping column in my sort card. icon_sad.gif That is why I approched for the help.

For the error ICE201I I got this expaination -

Quote:

Explanation: Indicates whether DFSORT processes the input records as
fixed-length (without an RDW) or variable-length (with an RDW).
Programmer Response: None, unless you are using VSAM input


But I have given:
Code:
OUTFIL BUILD=(1:1,4,


What am I trying to do?
i/p file VB 1024
o/p file VB 1024
1. copy all records as it is
2. only 2 columns- from 187,12 and 202,12 have value, which I need to increase by "+1".

Please let me know if I am making any mistake.
I have tried UFF in place of ZD as well. It failed with the same error,
Back to top
View user's profile Send private message
Bill Woodger

DFSORT Moderator


Joined: 09 Mar 2011
Posts: 7315

PostPosted: Mon Aug 26, 2013 4:29 pm    Post subject: Reply to: Copy a VB file of length 446 to VB file of length
Reply with quote

This is not to fix your problem, but to help you diagnose your problem.

Code:
  OPTION COPY,STOPAFT=10
  OUTFIL BUILD=(1,4,
                C'>',
                191,12,ZD,ADD,+1,
                C'<',
                C'>',
                206,12,ZD,ADD,+1,
                C'<')


Run this, and look carefully at the output.

The manual does explain why this has happened, as it is supposed to happen when you don't tell it otherwise. You are getting a default behaviour.
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 Subtract the ZD fields to provide neg... Balaryan DFSORT/ICETOOL 4 Wed Oct 11, 2017 10:51 pm
No new posts Addition of two records on 2 fields amar143 SYNCSORT 8 Tue Oct 03, 2017 11:14 am
No new posts LMINIT problem - not finding DDNAME Danielle.Filteau CLIST & REXX 7 Tue Sep 19, 2017 9:57 pm
No new posts Split file based on comparsion to 2 f... Div Grad DFSORT/ICETOOL 3 Thu Jul 27, 2017 9:16 pm
No new posts Problem commiting to DB2 from IMS MPP Ole Soerensen IMS DB/DC 2 Wed Jul 26, 2017 5:19 pm

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