Migrate Windows Time Period code to separate function

[rebelinux]

Description

$Days = 'Sunday', 'Monday', 'Tuesday', 'Wednesday', 'Thursday', 'Friday', 'Saturday'
$Hours24 = [ordered]@{
    0 = 12
    1 = 1
    2 = 2
    3 = 3
    4 = 4
    5 = 5
    6 = 6
    7 = 7
    8 = 8
    9 = 9
    10 = 10
    11 = 11
    12 = 12
    13 = 1
    14 = 2
    15 = 3
    16 = 4
    17 = 5
    18 = 6
    19 = 7
    20 = 8
    21 = 9
    22 = 10
    23 = 11
}
$ScheduleTimePeriod = $TrafficRule.ThrottlingWindowOptions -split '(.{48})' | Where-Object {$_}

foreach ($OBJ in $Hours24.GetEnumerator()) {

    $inObj = [ordered] @{
        'H' = $OBJ.Value
        'Sun' = $ScheduleTimePeriod[0].Split(',')[$OBJ.Key]
        'Mon' = $ScheduleTimePeriod[1].Split(',')[$OBJ.Key]
        'Tue' = $ScheduleTimePeriod[2].Split(',')[$OBJ.Key]
        'Wed' = $ScheduleTimePeriod[3].Split(',')[$OBJ.Key]
        'Thu' = $ScheduleTimePeriod[4].Split(',')[$OBJ.Key]
        'Fri' = $ScheduleTimePeriod[5].Split(',')[$OBJ.Key]
        'Sat' = $ScheduleTimePeriod[6].Split(',')[$OBJ.Key]
    }
    $OutObj += $inobj
}

$TableParams = @{
    Name = "Throttling Windows - $($TrafficRule.Name)"
    List = $true
    ColumnWidths = 6,4,3,4,4,4,4,4,4,4,4,4,4,4,3,4,4,4,4,4,4,4,4,4,4
    Key = 'H'
}
if ($Report.ShowTableCaptions) {
    $TableParams['Caption'] = "- $($TableParams.Name)"
}
if ($OutObj) {
    $OutObj2 = Table -Hashtable $OutObj @TableParams
    $OutObj2.Rows | Where-Object {$_.Sun -eq "0"} | Set-Style -Style OFF -Property "Sun"
    $OutObj2.Rows | Where-Object {$_.Mon -eq "0"} | Set-Style -Style OFF -Property "Mon"
    $OutObj2.Rows | Where-Object {$_.Tue -eq "0"} | Set-Style -Style OFF -Property "Tue"
    $OutObj2.Rows | Where-Object {$_.Wed -eq "0"} | Set-Style -Style OFF -Property "Wed"
    $OutObj2.Rows | Where-Object {$_.Thu -eq "0"} | Set-Style -Style OFF -Property "Thu"
    $OutObj2.Rows | Where-Object {$_.Fri -eq "0"} | Set-Style -Style OFF -Property "Fri"
    $OutObj2.Rows | Where-Object {$_.Sat -eq "0"} | Set-Style -Style OFF -Property "Sat"

    $OutObj2.Rows | Where-Object {$_.Sun -eq "1"} | Set-Style -Style ON -Property "Sun"
    $OutObj2.Rows | Where-Object {$_.Mon -eq "1"} | Set-Style -Style ON -Property "Mon"
    $OutObj2.Rows | Where-Object {$_.Tue -eq "1"} | Set-Style -Style ON -Property "Tue"
    $OutObj2.Rows | Where-Object {$_.Wed -eq "1"} | Set-Style -Style ON -Property "Wed"
    $OutObj2.Rows | Where-Object {$_.Thu -eq "1"} | Set-Style -Style ON -Property "Thu"
    $OutObj2.Rows | Where-Object {$_.Fri -eq "1"} | Set-Style -Style ON -Property "Fri"
    $OutObj2.Rows | Where-Object {$_.Sat -eq "1"} | Set-Style -Style ON -Property "Sat"
    $OutObj2
}

Additional Context

No response

Before submitting

• I have read the documentation, and referred to the known issues before submitting this change request.
• I have checked for previously opened & closed issues before submitting this change request.