Re: Re: Conditional Processing with NoPass Parameters

Bill, 
 
>"When OPTIONS(*OMIT) is specified, then the value 
>*OMIT is allowed for that 
>parameter. *OMIT is only allowed for CONST 
>parameters and parameters which 
>are passed by reference." 
> 
>To me, this says that Value is not allowed. 
 
OPTIONS(*OMIT) and OPTIONS(*NOPASS) are not the 
same thing... *NOPASS will allow you to use value 
and you don't have to pass anything in it's place 
unlike *OMIT which requires you to pass *OMIT as a 
place holder. 
 
 
>> P.S. Have you checked out the Date service 
>program 
>> in my free xRPG library? 
>> 
>> http://www.rpgnext.com/docs/rnbdates.php 
>> 
>> It may have what you are looking for already... 
>if 
>> not let me know and I may be able to add it. 
> 
>No, I hadn't.  The program's already written, 
>thanks for the offer - and - 
>yes, what this program does you don't have.  It's 
>a date offset by a number 
>of days calculator with optional date format 
>translation. eg:  calculate 30 
>days ago and translate from *MDY to *CYMD0. 
> 
>Bill 
 
Actually, I think you could accomplish this with 
my library like so: 
 
yourDate = createDate( MDYdateString : '*MDY' ); 
adjustedDate = yourDate - %days( 30 ); 
adjustedDateString = %char( getDateCYMD( 
adjustedDate ) ); 
 
*yourDate and adjustedDate are defined as date 
fields, adjustedDateString is 10a. 
 
:-) 
 
 
Joel 
http://www.rpgnext.com 
 
>To post a message email: RPG400-L@xxxxxxxxxxxx