Re: Identify the 1st Friday of the Month

["Lim Hock-Chai" <Lim.Hock-Chai@xxxxxxxxxxxxxxx>]

if %rem(%abs(%diff (myDate: d'1800-01-05': *days)): 7) = 5 and  
   %subdt(myDate :*D) <=7;                               
     // it is the first Friday of the month, do stuff                 
endif;                                                    


Note:
%rem(%abs(%diff (myDate: d'1800-01-05': *days)): 7) = 5 <== determine if
it is Friday.

%subdt(myDate :*D) <=7  <== determine if the Friday date is the first
Friday of the month


Note: Not an existing code on our system ==> Has not fully tested.



<ewart.desouza@xxxxxxxxxxx> wrote in message
news:<mailman.11382.1230029892.13295.rpg400-l@xxxxxxxxxxxx>...
> Hello All,
>
> Anyone have a code snippet to identify if a date is the 1st Friday of
the 
> month ?
>
> Thanks & best regards
> Ewart