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
 

 

problem in difference of dates

 
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> DFSORT/ICETOOL
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    Post subject: problem in difference of dates
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: 8593
Location: Back in jolly old England

PostPosted: Fri Oct 25, 2013 12:16 pm    Post subject:
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

Moderator


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

PostPosted: Fri Oct 25, 2013 1:47 pm    Post subject:
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: 8593
Location: Back in jolly old England

PostPosted: Fri Oct 25, 2013 1:58 pm    Post subject:
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    Post subject: Virt 10 version
Reply with quote


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

DFSORT Moderator


Joined: 09 Mar 2011
Posts: 7225

PostPosted: Sat Oct 26, 2013 5:06 pm    Post subject: Reply to: problem in difference of dates
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

Senior Member


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

PostPosted: Tue Oct 29, 2013 11:16 pm    Post subject:
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    Post subject: Reply to: problem in difference of dates
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    Post subject:
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    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 Problem in writing Output file vickey_dw COBOL Programming 5 Mon Nov 14, 2016 11:14 pm
No new posts Problem in Running Query via JCL vickey_dw DB2 3 Tue Oct 18, 2016 11:11 pm
No new posts Sticky: difference between ... DUMMY ... and ... enrico-sorichetti JCL & VSAM 0 Mon Oct 17, 2016 4:31 pm
No new posts DB2 Streaming Batch Processing Problem Manshadi DB2 4 Sat Sep 24, 2016 12:14 pm
No new posts Problem with GETMAIN command amitc23 CICS 6 Thu Sep 01, 2016 1:01 pm


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