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
 

 

Interchange the position of date.

 
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> JCL & VSAM
View previous topic :: :: View next topic  
Author Message
thilakvs
Warnings : 1

New User


Joined: 07 Aug 2007
Posts: 27
Location: chennai

PostPosted: Wed Feb 27, 2008 12:42 pm    Post subject: Interchange the position of date.
Reply with quote

I want the date should be in following format

38-39 - YEAR
40-41 - MONTH
42-43 - DATE

Actual format : yymmdd

expected format : mmddyy

OUTREC FIELDS=(1:1,37,38:40,2,40:42,2,42:38,2,44:44,200)

This sort is not working...

how can i get the expected output..???


Thanks
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: Wed Feb 27, 2008 12:55 pm    Post subject:
Reply with quote

Is your input record FB or VB.

If VB are you sure that you are taking into account the 4 bytes RDW at the start of every record.

What results are you getting - please post
Back to top
View user's profile Send private message
thilakvs
Warnings : 1

New User


Joined: 07 Aug 2007
Posts: 27
Location: chennai

PostPosted: Wed Feb 27, 2008 1:09 pm    Post subject:
Reply with quote

The record is in FB format.

I am getting the Message "FIELD OUTSIDE RANGE".

I guess here is the error

OUTREC FIELDS=(1:1,37,38:40,2,40:42,2,42:38,2,44:44,200)

thanks
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: Wed Feb 27, 2008 1:26 pm    Post subject:
Reply with quote

What is the LRECL of your record ?
Back to top
View user's profile Send private message
CICS Guy

Senior Member


Joined: 18 Jul 2007
Posts: 2150
Location: At my coffee table

PostPosted: Wed Feb 27, 2008 2:36 pm    Post subject:
Reply with quote

thilakvs wrote:
I am getting the Message "FIELD OUTSIDE RANGE".
Do a favor for all of us, please post the entire sysout......
Back to top
View user's profile Send private message
thilakvs
Warnings : 1

New User


Joined: 07 Aug 2007
Posts: 27
Location: chennai

PostPosted: Wed Feb 27, 2008 3:21 pm    Post subject:
Reply with quote

This is the SYSOUT which i got

SORT FIELDS=(1,4,ZD,A,5,6,ZD,A,11,3,ZD,A)
OUTREC FIELDS=(1:1,37,38:40,2,40:42,2,42:38,2,44:44,200)
WER276B SYSDIAG= 1223610, 2729806, 2729806, 2521063
WER164B 2,384K BYTES OF VIRTUAL STORAGE AVAILABLE, MAX REQUESTED,
WER164B 0 BYTES RESERVE REQUESTED, 992K BYTES USED
WER146B 32K BYTES OF EMERGENCY SPACE ALLOCATED
WER108I SORTIN : RECFM=FB ; LRECL= 200; BLKSIZE= 27800
WER230A OUTREC FIELD OUTSIDE RANGE
WER211B SYNCSMF CALLED BY SYNCSORT; RC=0000
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: Wed Feb 27, 2008 3:48 pm    Post subject:
Reply with quote

OUTREC FIELDS=(1:1,37,38:40,2,40:42,2,42:38,2,44:44,200)

Might help you. If the LRECL is only 200 you can not move 200 bytes from byte 44, only the remainder of the record.

You could try 44:200 instead of 44:44,200
Back to top
View user's profile Send private message
thilakvs
Warnings : 1

New User


Joined: 07 Aug 2007
Posts: 27
Location: chennai

PostPosted: Wed Feb 27, 2008 3:58 pm    Post subject:
Reply with quote

ok i got it..Thank you... icon_biggrin.gif
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 -> JCL & VSAM All times are GMT + 6 Hours
Page 1 of 1

 

Search our Forum:

Similar Topics
Topic Author Forum Replies Posted
No new posts Date and time format in CICS Chandru3183 CICS 2 Sat Mar 18, 2017 12:46 pm
No new posts How to get current date -1 and curren... murali.andaluri DFSORT/ICETOOL 3 Wed Mar 08, 2017 2:09 pm
No new posts Overlay the system date Danielle.Filteau SYNCSORT 4 Fri Mar 03, 2017 1:16 am
No new posts Checking Current date vickey_dw DFSORT/ICETOOL 1 Wed Feb 08, 2017 11:14 pm
No new posts TOT & DATE parameter in ICEMAN hemanthj642 DFSORT/ICETOOL 4 Mon Nov 14, 2016 5:19 am


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