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 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: 1542
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: 7315

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 Difference in SORT & ICETOOL Mohan Kothakota DFSORT/ICETOOL 5 Fri Sep 22, 2017 4:56 pm
No new posts LMINIT problem - not finding DDNAME Danielle.Filteau CLIST & REXX 7 Tue Sep 19, 2017 9:57 pm
No new posts Problem commiting to DB2 from IMS MPP Ole Soerensen IMS DB/DC 2 Wed Jul 26, 2017 5:19 pm
No new posts Strings with double quotes having pro... raja Arumugam All Other Mainframe Topics 11 Thu Mar 30, 2017 10:34 am
No new posts Problem reading GTF trace output danik56 ABENDS & Debugging 7 Thu Mar 16, 2017 1:02 pm

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