UnitQESBPCSDateTime
DeclarationFunction ESBDayOfWeek2DOW(const DOW: TESBDayOfWeek): Integer;Implementation
function ESBDayOfWeek2DOW (const DOW: TESBDayOfWeek): Integer; begin Result := Integer (DOW) + 1; End;