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
 

 

Datetimestamp subtraction

 
Post new topic   This topic is locked: you cannot edit posts or make replies.    IBMMAINFRAMES.com Support Forums -> DFSORT/ICETOOL
View previous topic :: :: View next topic  
Author Message
radhakrishnan82

Active User


Joined: 31 Mar 2005
Posts: 436
Location: chennai, India

PostPosted: Sat Feb 19, 2011 1:53 pm    Post subject: Datetimestamp subtraction
Reply with quote

My requirement is to subtract 10 days from DATE timestamp. will it be possible in DFSORT.

datetimestamp x(26).
Position 34 to 59 .
LRECL 80 FB.
Value: 2011-02-18-11.01.54.972002
Back to top
View user's profile Send private message

radhakrishnan82

Active User


Joined: 31 Mar 2005
Posts: 436
Location: chennai, India

PostPosted: Sat Feb 19, 2011 1:53 pm    Post subject:
Reply with quote

My requirement is to subtract 10 days from DATE timestamp. will it be possible in DFSORT.

datetimestamp x(26).
Position 34 to 59 .
LRECL 80 FB.
Value: 2011-02-18-11.01.54.972002
_________________
regds,
radhakrishnan v

"Doubt your doubts and believe your belief
And don?t doubt your belief and believe in your doubts"
Back to top
View user's profile Send private message
radhakrishnan82

Active User


Joined: 31 Mar 2005
Posts: 436
Location: chennai, India

PostPosted: Sat Feb 19, 2011 2:10 pm    Post subject:
Reply with quote

Code:
OUTREC IFTHEN=(WHEN=INIT,BUILD=(1,33,34,10,UFF,TO=ZD,LENGTH=8, 
                                  44,2,46,35))                 
*                                                                 



Results to 20110218-11.01.54.972002

Then if i try to subtract days,
Code:
OVERLAY=(234:234,8,Y4T,SUBDAYS,+10,TOGREG=Y4T(-)) 

I am not able to get the correct syntax for rebuilding. Pls help.
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: Sat Feb 19, 2011 3:13 pm    Post subject:
Reply with quote

What is the error that you are getting.
Saying that it doesn't work is not really much help at all.
Please post the output from the run with all of the error messages AND codes.
Back to top
View user's profile Send private message
radhakrishnan82

Active User


Joined: 31 Mar 2005
Posts: 436
Location: chennai, India

PostPosted: Sat Feb 19, 2011 4:31 pm    Post subject:
Reply with quote

SUBDAYS is not accepted in my shop.
can you please give me some other option to fix this.
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: Mon Feb 21, 2011 11:55 pm    Post subject:
Reply with quote

Please run the following job and show the messages you receive in //SYSOUT so we can see what level you're at:

Code:

//S1    EXEC  PGM=SORT
//SYSOUT    DD  SYSOUT=*
//SORTIN DD *
RECORD
//SORTOUT DD DUMMY
//SYSIN    DD    *
    OPTION COPY
/*
Back to top
View user's profile Send private message
radhakrishnan82

Active User


Joined: 31 Mar 2005
Posts: 436
Location: chennai, India

PostPosted: Wed Feb 23, 2011 1:47 pm    Post subject:
Reply with quote

I ran the job and sysout resulted below.

Code:
1ICE143I 0 BLOCKSET     COPY  TECHNIQUE SELECTED                               
 ICE250I 0 VISIT http://www.ibm.com/storage/dfsort FOR DFSORT PAPERS, EXAMPLES A
 ICE000I 1 - CONTROL STATEMENTS FOR 5694-A01, Z/OS DFSORT V1R10 - 03:16 ON WED F
0              OPTION COPY                                                     
 ICE201I G RECORD TYPE IS F - DATA STARTS IN POSITION 1                         
 ICE751I 0 C5-K51707 C6-K51707 C7-K54603 C8-K51707 E9-K51707 C9-BASE   E5-K55337
 ICE193I 0 ICEAM1 INVOCATION ENVIRONMENT IN EFFECT - ICEAM1 ENVIRONMENT SELECTED
 ICE252I 1 PARMLIB OPTIONS WERE MERGED WITH INSTALLATION MODULE DEFAULTS       
 ICE088I 0 VCGPVALD.S1      .        , INPUT LRECL = 80, BLKSIZE = 80, TYPE = F
 ICE093I 0 MAIN STORAGE = (MAX,4194304,4181086)                                 
 ICE156I 0 MAIN STORAGE ABOVE 16MB = (4063966,4063966)                         
 ICE127I 0 OPTIONS: OVFLO=RC0 ,PAD=RC0 ,TRUNC=RC0 ,SPANINC=RC16,VLSCMP=N,SZERO=Y
 ICE128I 0 OPTIONS: SIZE=4194304,MAXLIM=1048576,MINLIM=450560,EQUALS=N,LIST=Y,ER
 ICE129I 0 OPTIONS: VIO=N,RESDNT=NONE,SMF=SHORT,WRKSEC=Y,OUTSEC=Y,VERIFY=N,CHALT
 ICE130I 0 OPTIONS: RESALL=4096,RESINV=0,SVC=109 ,CHECK=N,WRKREL=N,OUTREL=Y,CKPT
 ICE131I 0 OPTIONS: TMAXLIM=4194304,ARESALL=0,ARESINV=0,OVERRGN=65536,CINV=N,CFW
 ICE132I 0 OPTIONS: VLSHRT=N,ZDPRINT=Y,IEXIT=Y,TEXIT=N,LISTX=N,EFS=NONE    ,EXIT
 ICE133I 0 OPTIONS: HIPRMAX=OPTIMAL,DSPSIZE=0   ,ODMAXBF=0,SOLRF=N,VLLONG=N,VSAM
 ICE235I 0 OPTIONS: NULLOUT=RC0                                                 
 ICE084I 0 BSAM ACCESS METHOD USED FOR SORTOUT                                 
 ICE084I 0 BSAM ACCESS METHOD USED FOR SORTIN                                   
 ICE751I 1 EF-K49535 F0-K62421 E8-K51707                                       
 ICE090I 0 OUTPUT LRECL = 80, BLKSIZE = 80, TYPE = F                           
 ICE055I 0 INSERT 0, DELETE 0                                                   
 ICE054I 0 RECORDS - IN: 1, OUT: 1                                             
 ICE052I 0 END OF DFSORT                                                       
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 Feb 23, 2011 11:55 pm    Post subject:
Reply with quote

You asked the same question on another board and received an answer.

Please don't post the same question on more than one board.
Back to top
View user's profile Send private message
View previous topic :: :: View next topic  
Post new topic   This topic is locked: you cannot edit posts or make replies.    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 Build record according subtraction re... witsche SYNCSORT 5 Fri Oct 02, 2015 12:53 pm
No new posts Subtraction through DFSORT useit DFSORT/ICETOOL 17 Thu Apr 26, 2012 12:43 pm
No new posts Addition and subtraction of dates in ... dejunzhu COBOL Programming 8 Thu Mar 15, 2012 12:26 pm
No new posts Syncsort - Subtraction using SORT dick scherrer JCL & VSAM 7 Fri Sep 09, 2011 6:24 pm
No new posts Way to get the absolute value of subt... theone1987 DB2 1 Thu Apr 01, 2010 2:11 pm


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