z/OS DFSORT: Getting Started
Previous topic | Next topic | Contents | Contact z/OS | Library | PDF


Converting date fields

z/OS DFSORT: Getting Started
SC23-6880-00

Suppose you had input records that looked like this:
03212009 Sacramento
05172008 Los Angeles
12302008 Morgan Hill
08132009 Palo Alto
The first field is a gregorian date in 'mmddccyy' form, but you'd actually like to reformat it into a julian date in 'ccyy/ddd' form. You can use the following statements to convert the date field to the form you want:
  OUTREC BUILD=(1,8,Y4W,TOJUL=Y4T(/),X,10,15)
The results produced for this OUTREC statement are:
2009/080 Sacramento    
2008/138 Los Angeles   
2008/365 Morgan Hill   
2009/225 Palo Alto     
Y4W and Y4T are two of DFSORT's 4-digit year date field formats. Y4W indicates a date value with the year (ccyy) last such as 'mmddccyy' or 'dddccyy' whereas Y4T indicates a date value with the year first such as 'ccyymmdd' or 'ccyyddd'. TOJUL is one of the conversion keywords that can be used with date fields. You can use any of the following after p,m,Y4x or p,m,Y2x to convert a CH, ZD or PD 4-digit or 2-digit year date in one form to a corresponding CH, ZD or PD 4-digit or 2-digit year date in another form or to a corresponding day of the week:
  • TOJUL=Yaa - converts to a julian date without a separator (for example, P'2009007').
  • TOJUL=Yaa(s) - converts to a julian date with a separator (for example, C'325-2008').
  • TOGREG=Yaa - converts to a gregorian date without separators (for example, Z'091121').
  • TOGREG=Yaa(s) - converts to a gregorian date with separators (for example, C'2009.09.21').
  • WEEKDAY=CHAR3 - converts to a 3 character day of the week (for example, C'WED' for Wednesday).
  • WEEKDAY=CHAR9 - converts to a 9 character day of the week (for example, C'THURSDAY ' for Thursday).
  • WEEKDAY=DIGIT1 - converts to a 1 digit indicator for the day of the week (for example, C'2' for Monday).

For complete details on converting from one type of date field to another, see z/OS DFSORT Application Programming Guide.

Go to the previous page Go to the next page




Copyright IBM Corporation 1990, 2014