Thanks Elardus.  I did not search KC, I was browsing and searching downloaded 
PDF's.  I do think I have that "Smart Tricks" PDF on my hard drive, just have 
to go find it.

Gracias.

Peter

-----Original Message-----
From: IBM Mainframe Discussion List [mailto:[email protected]] On Behalf 
Of Elardus Engelbrecht
Sent: Thursday, July 13, 2017 3:07 AM
To: [email protected]
Subject: Re: Is there a SORT day-of-week function?

Farley, Peter x23353 wrote:

>Is there any way in SORT control cards (either DFSORT or SYNCSORT) to test for 
>a certain day of the week?  Something like this, assuming '3' represents the 
>DOW value for Wednesday:

Yes, there is. At least for DFSORT.

>OUTREC IFTHEN=(WHEN=(DOW(&DATE1),EQ,3),
>                                    BUILD=(C'WEDNESDAY=DATE VALUE + 
> 5',&DATE1+5)),
>                 IFTHEN=(WHEN=(DOW(&DATE1),NE,3),
>                                    BUILD=(C'NOT-WEDNESDAY=DATE VALUE + 
>3',&DATE1+3))

>I have searched in both vendors' FM's but I did not find any indication of 
>such a function.

Did you searched the KC? I did that (go to www.ibm.com and search for 'DFSORT 
day of week') and there are some useful hits:

https://www.ibm.com/support/knowledgecenter/en/SSLTBW_2.1.0/com.ibm.zos.v2r1.iceg200/pawdf.htm
https://www.ibm.com/support/knowledgecenter/en/SSLTBW_2.1.0/com.ibm.zos.v2r1.iceg200/cvtdf.htm

PDF book: 'Smart DFSORT Tricks'

ftp://ftp.software.ibm.com/storage/dfsort/mvs/sorttrck.pdf 

Groete / Greetings
Elardus Engelbrecht

----------------------------------------------------------------------


This message and any attachments are intended only for the use of the addressee 
and may contain information that is privileged and confidential. If the reader 
of the message is not the intended recipient or an authorized representative of 
the intended recipient, you are hereby notified that any dissemination of this 
communication is strictly prohibited. If you have received this communication 
in error, please notify us immediately by e-mail and delete the message and any 
attachments from your system.


----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [email protected] with the message: INFO IBM-MAIN

Reply via email to