Get20thOfNextMonth

Declaration

Function Get20thOfNextMonth( const aNow : TDateTime) : TDateTime

Example

procedure OnMapEvent(var Value:Variant);
begin
  Value := Get20thOfNextMonth(Date); //if date is 2009-06-25 then result is 2009-07-20
end;

Description

Returns a date that is the 20th of the following month. Useful in accounting situations - pass the invoice date to the function to work out the payment due date.