| 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; | 
|  |