DOW2ISODOW Function |
Unit
QESBPCSDateTime
Declaration
Function DOW2ISODOW(const DOW: Byte): Byte;
Parameters |
DOW | Day of Week where Sunday is 1 through Saturday is 7. |
Returns
Day of Week where Monday is 1 through Sunday is 7.
Category
Date/Time Arithmetic Routines
Week Based Arithmetic RoutinesImplementation
function DOW2ISODOW (const DOW: Byte): Byte; begin if (DOW < 1) or (DOW > 7) then raise EConvertError.Create (rsInvalidDOW); Result := Dow - 1; if Result = 0 then Result := 7; End; |
|