IBM Mainframe Forum Index
 
Log In
 
IBM Mainframe Forum Index Mainframe: Search IBM Mainframe Forum: FAQ Register
 

problem in difference of dates


IBM Mainframe Forums -> DFSORT/ICETOOL
Post new topic   Reply to topic
View previous topic :: View next topic  
Author Message
Kmr.deepakcs

New User


Joined: 11 Oct 2013
Posts: 37
Location: India

PostPosted: Fri Oct 25, 2013 10:19 am
Reply with quote

Dear experts
i ran this code i got this error
the code is as follows.




Code:
//SHRDV02T JOB NOTIFY=&SYSUID               
//STEP1    EXEC PGM=SORT                     
//SYSOUT   DD SYSOUT=*                       
//SORTIN   DD *                             
AEEPAKRTY2013010120130105                   
BEEPAKRTY2013010120130105                   
CEEPAKRTY0000000020130105                   
DEEPAKRTY2013010120130105                   
EEEPAKRTY2013010100000000                   
FEEPAKRTY2013010120130105                   
//SORTOUT  DD SYSOUT=*                       
//SYSOUT DD SYSOUT=*                         
//SYSIN DD *                                 
   OPTION COPY                               
   OMIT COND=(10,8,UFF,EQ,0,OR,18,8,UFF,EQ,0)
   INREC BUILD=(18,8,Y4T,DATEDIFF,10,8,Y4T) 
//                   


Code:
1ICE143I 0 BLOCKSET     COPY  TECHNIQUE SELECTED                       
 ICE250I 0 VISIT http://www.ibm.com/storage/dfsort FOR DFSORT PAPERS, EX
 ICE000I 1 - CONTROL STATEMENTS FOR 5694-A01, Z/OS DFSORT V1R10 - 12:24
0             OPTION COPY                                               
              OMIT COND=(10,8,UFF,EQ,0,OR,18,8,UFF,EQ,0)               
              INREC BUILD=(18,8,Y4T,DATEDIFF,10,8,Y4T)                 
                                $                                       
 ICE006A 0 OPERAND DEFINER ERROR                                       
 ICE751I 0 C5-K90014 C6-K90014 C7-BASE   C8-K90014 E7-BASE             
 ICE052I 3 END OF DFSORT               
[/b]
Back to top
View user's profile Send private message
expat

Global Moderator


Joined: 14 Mar 2007
Posts: 8797
Location: Welsh Wales

PostPosted: Fri Oct 25, 2013 12:16 pm
Reply with quote

What are you trying to achieve here.

Please give an example of the expected output
Back to top
View user's profile Send private message
Pandora-Box

Global Moderator


Joined: 07 Sep 2006
Posts: 1592
Location: Andromeda Galaxy

PostPosted: Fri Oct 25, 2013 1:47 pm
Reply with quote

Also What version of DFSORT do you have?
Back to top
View user's profile Send private message
expat

Global Moderator


Joined: 14 Mar 2007
Posts: 8797
Location: Welsh Wales

PostPosted: Fri Oct 25, 2013 1:58 pm
Reply with quote

Also tell us the RECFM
Back to top
View user's profile Send private message
Kmr.deepakcs

New User


Joined: 11 Oct 2013
Posts: 37
Location: India

PostPosted: Sat Oct 26, 2013 12:20 am
Reply with quote


Virt 10 version
Back to top
View user's profile Send private message
Bill Woodger

Moderator Emeritus


Joined: 09 Mar 2011
Posts: 7309
Location: Inside the Matrix

PostPosted: Sat Oct 26, 2013 5:06 pm
Reply with quote

You need to show the whole sysoiut for the step, so we can see what version and level of DFSORT that you have.

I guess you don't have support for Y4T.

Code:
   OPTION COPY
   OMIT COND=(10,8,ZD,EQ,0,OR,18,8,ZD,EQ,0)
   INREC BUILD=(18,8,Y4T,DATEDIFF,10,8,Y4T)


The above on your data works (your dates are not Free Fromat numbers, so I changed the definitions from UFF to ZD, but it does not affect the Y4T problem).
Back to top
View user's profile Send private message
Anuj Dhawan

Superior Member


Joined: 22 Apr 2006
Posts: 6250
Location: Mumbai, India

PostPosted: Tue Oct 29, 2013 11:16 pm
Reply with quote

As Bill has said, check if you've ICE201I H RECORD TYPE displayed in somewhere in SYSOUT - if it is not there, support for Y4T and DATEDIFF is not yet available at your shop and you should be asking your site-support to install it. They are available since Oct, 2010.
Back to top
View user's profile Send private message
Skolusu

Senior Member


Joined: 07 Dec 2007
Posts: 2205
Location: San Jose

PostPosted: Mon Nov 04, 2013 11:32 pm
Reply with quote

Kmr.deepakcs,

DFSORT V1R10 is out of service. If your shop has an extended service contract your systems programmer can install PTF UK90025 for z/OS DFSORT V1R10 which supports DATEDIFF
Back to top
View user's profile Send private message
Kmr.deepakcs

New User


Joined: 11 Oct 2013
Posts: 37
Location: India

PostPosted: Tue Nov 05, 2013 3:10 pm
Reply with quote

THANKS KOLUSU
Back to top
View user's profile Send private message
View previous topic :: :: View next topic  
Post new topic   Reply to topic View Bookmarks
All times are GMT + 6 Hours
Forum Index -> DFSORT/ICETOOL

 


Similar Topics
Topic Forum Replies
No new posts Map Vols and Problem Dataset All Other Mainframe Topics 2
No new posts Timestamp difference and its average ... DB2 11
No new posts Difference when accessing dataset in ... JCL & VSAM 7
No new posts Amount of days between two dates PL/I & Assembler 8
No new posts z/vm installation problem All Other Mainframe Topics 0
Search our Forums:

Back to Top