Portal | Manuals | References | Downloads | Info | Programs | JCLs | Master the Mainframes
IBM Mainframe Computers Forums Index
 
Register
 
IBM Mainframe Computers Forums Index Mainframe: Search IBM Mainframe Forum: FAQ Memberlist Usergroups Profile Log in to check your private messages Log in
 

 

COMPARISON FIELD ERROR

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

Active User


Joined: 20 May 2010
Posts: 101
Location: canada

PostPosted: Wed Jun 29, 2011 7:46 pm    Post subject: COMPARISON FIELD ERROR
Reply with quote

Hi, I have ICE113A E COMPARISON FIELD ERROR - maybe the number of fields is more than allowed , but in documentation it says:
Programmer Response: Make sure that all fields and constants are specified correctly. Make sure that the position plus the length of each field does not exceed 32753

Here is the error:
Code:
  SORT FIELDS=COPY                                                             
  OUTFIL FNAMES=GENER,OMIT=(05,2,SS,EQ,                                 X     
                C'04,05,06,07,1A,1B,1C,1F,1G,1H,1K,10,11,12,16,         X     
                17,19,2B,2C,20,21,24,25,26,27,29,3A,3B,3C,3D,3E,3F,     X     
                3G,3H,3J,3K,3L,30,35,36,37,38,39,4A,4D,4H,4L,4M,4Q,     X     
                40,42,43,44,45,47,48,49,5D,5E,5G,50,51,52,53,54,55,     X     
                58,59,6B,60,64,66,69,7C,7D,7J,70,72,73,74,75,76,        X     
                                                  $                           
 COMPARISON FIELD ERROR                                                       
                78,79,8A,8B,81,86,87,89,93,94,97)                             
  OUTFIL FNAMES=BROK,SAVE                                                     
 C5-K90025 C6-K90025 C7-K54603 C8-K62201 E7-K62201                             
 END OF DFSORT                                                                 


any suggestion?
Thanks.
Back to top
View user's profile Send private message

anatol

Active User


Joined: 20 May 2010
Posts: 101
Location: canada

PostPosted: Wed Jun 29, 2011 8:01 pm    Post subject: Reply to: COMPARISON FIELD ERROR
Reply with quote

actually this worked:
Code:
SORT FIELDS=COPY                                                       
OUTFIL FNAMES=GENER,OMIT=(05,2,SS,EQ,                                 X
              C'04,05,06,07,1A,1B,1C,1F,1G,1H,1K,10,11,12,16,         X
              17,19,2B,2C,20,21,24,25,26,27,29,3A,3B,3C,3D,3E,3F,     X
              3G,3H,3J,3K,3L,30,35,36,37,38,39,4A,4D,4H,4L,4M,4Q,     X
              40,42,43,44,45,47,48,49,5D,5E,5G,50,51,52,53,54,55,     X
              58,59,6B,60,64,66,69,7C,7D,7J,70',OR,                   X
              05,2,SS,EQ,                                             X
              C'72,73,74,75,76,78,79,8A,8B,81,86,87,89,94,97')         
OUTFIL FNAMES=BROK,SAVE                                               
anks

Th
Back to top
View user's profile Send private message
sqlcode1

Active Member


Joined: 08 Apr 2010
Posts: 578
Location: USA

PostPosted: Wed Jun 29, 2011 8:39 pm    Post subject:
Reply with quote

anatol,
I think this is because SS only support comparison of upto 256 bytes(one byte length field/TRT!!??) at one go,but I am not able to locate any reference of this limit in dfsort manuals.

However, I could be wrong and above is just assumption. Still searching...

Thanks,
Back to top
View user's profile Send private message
Frank Yaeger

DFSORT Moderator


Joined: 15 Feb 2005
Posts: 7130
Location: San Jose, CA

PostPosted: Wed Jun 29, 2011 9:00 pm    Post subject:
Reply with quote

Quote:
actually this worked


Well, it didn't get a syntax error, but it's NOT doing what you think it is. You're not continuing the string correctly, so the embedded blanks are actually included in the string.

The ICE113A error is due to using more than 256 characters for the string.
That is documented as the limit. But using incorrect continuation made it even worse.

Here are DFSORT control statements that will do what you want:

Code:

 SORT FIELDS=COPY                                                       
 OUTFIL FNAMES=GENER,OMIT=(05,2,SS,EQ,                                 
   C'04,05,06,07,1A,1B,1C,1F,1G,1H,1K,10,11,12,16,17,19,2B,2C,20,21,24,*
 25,26,27,29,3A,3B,3C,3D,3E,3F,3G,3H,3J,3K,3L,30,35,36,37,38,39,4A,4D,4*
 H,4L,4M,4Q,40,42,43,44,45,47,48,49,5D,5E,5G,50,51,52,53,54,55,58,59,6B*
 ,60,64,66,69,7C,7D,7J,70,72,73,74,75,76,78,79,8A',OR,                 
 5,2,SS,EQ,C'8B,81,86,87,89,93,94,97')                                 


Notice that the correct way of continuing a string across lines is to go right up to 71, put a non-blank in 72 and then continue on the next line in 2.
Back to top
View user's profile Send private message
anatol

Active User


Joined: 20 May 2010
Posts: 101
Location: canada

PostPosted: Wed Jun 29, 2011 9:07 pm    Post subject: Reply to: COMPARISON FIELD ERROR
Reply with quote

Thank you all ... sort is just amazing utility
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 DB2 Program abending without giving a... rahulgarg14 DB2 1 Mon May 29, 2017 8:10 pm
No new posts Getting error while opening a variabl... apandey1 COBOL Programming 5 Fri May 05, 2017 12:22 pm
No new posts READ A PACKED "NEGATIVE" FI... jdesouza CA Products 3 Tue May 02, 2017 11:43 pm
No new posts Alter &DATENS field in HEADER1 Angad DFSORT/ICETOOL 4 Mon Apr 24, 2017 11:49 am
No new posts IDC2902I Error tzeche ABENDS & Debugging 2 Tue Mar 28, 2017 11:39 am


Facebook
Back to Top
 
Mainframe Wiki | Forum Rules | Bookmarks | Subscriptions | FAQ | Tutorials | Contact Us