Get-StaReductions_ChartHtml.ps1

#Requires -Version 5.0

<#
    .SYNOPSIS
        Generates a chart report about the reductions

    .DESCRIPTION

    .NOTES
        This PowerShell script was developed and optimized for ScriptRunner. The use of the scripts requires ScriptRunner. 
        The customer or user is authorized to copy the script from the repository and use them in ScriptRunner. 
        The terms of use for ScriptRunner do not apply to this script. In particular, ScriptRunner Software GmbH assumes no liability for the function, 
        the use and the consequences of the use of this freely available script.
        PowerShell is a product of Microsoft Corporation. ScriptRunner is a product of ScriptRunner Software GmbH.
        © ScriptRunner Software GmbH

    .COMPONENT
        Requires the library script StatisticLib.ps1
        Requires Library Script SRReportsLib from the Action Pack Reporting\_LIB_
        
    .LINK
        https://github.com/scriptrunner/ActionPacks/tree/master/Statistics/_REPORTS_

    .Parameter StartDate
        [sr-en] Start date of the report
        [sr-de] Startdatum des Reports

    .Parameter EndDate
        [sr-en] End date of the report
        [sr-de] Endedatum des Reports

    .Parameter ActionName
        [sr-en] Only executions of this action
        [sr-de] Nur Ausführungen dieser Aktion

    .Parameter TargetName
        [sr-en] Only executions on this target
        [sr-de] Nur Ausführungen auf diesem Zielsystem

    .Parameter ReportLanguage
        [sr-en] Display language and Datie formation culture
        [sr-de] Anzeige-Sprache und Datums-Formatierung
#>

[CmdLetBinding()]
Param(
    [Parameter(HelpMessage="ASRDisplay(Date)")]
    [datetime]$StartDate,
    [Parameter(HelpMessage="ASRDisplay(Date)")]
    [datetime]$EndDate,
    [string]$ActionName,
    [string]$TargetName,
    [ValidateSet('en','de','fr','es','it','hu')]
    [string]$ReportLanguage = 'en'
)

$con = $null
[string]$Script:ReductionColor = '#4C81B5' # bar color to use remove AutoBarColors in line 110
[string]$Script:ReductionBorderColor = '#195DA0'

try{
    $Script:rep = New-Object 'System.Collections.Generic.List[System.Object]'
    
    OpenSqlConnection -SqlCon ([ref]$con)

    if($null -eq $StartDate){
        $StartDate = Get-Date -Year 2019 -Month 1 -Day 1
    }
    if($null -eq $EndDate){
        $EndDate = Get-Date
    }

    $rep.Add((Open-REPDocument -Language $ReportLanguage)) # Get document Html code 
    [hashtable]$cmdArgs = @{
                        'ActionName' = $SRXEnv.SRXDisplayName
                        'StartedBy' =  $SRXEnv.SRXStartedBy
                        'TimeStamp' = $SRXEnv.SRXStarted   
                        'DateTimeCulture' = $ReportLanguage
    }    
    if($PSBoundParameters.ContainsKey('ActionName') -eq $true){
        $cmdArgs.Add("Action filter:",$ActionName)
    }
    if($PSBoundParameters.ContainsKey('TargetName') -eq $true){
        $cmdArgs.Add("Target filter:",$TargetName)
    }
    $rep.Add((GET-REPHeader @cmdArgs)) # get header html

    # execute stored procedure
    $sqlCmd = New-Object System.Data.SqlClient.SqlCommand
    $sqlDS = New-Object System.Data.DataSet    
    $sqlAdapter = New-Object System.Data.SqlClient.SqlDataAdapter
    $sqlCmd.CommandText = 'GetExecutions'
    $sqlCmd.CommandType = [System.Data.CommandType]::StoredProcedure
    $null = $sqlCmd.Parameters.AddWithValue('StartDate',$StartDate.Date.ToFileTimeUtc())
    $null = $sqlCmd.Parameters.AddWithValue('EndDate',$EndDate.AddDays(1).Date.ToFileTimeUtc())
    if($PSBoundParameters.ContainsKey('ActionName') -eq $true){
        $null = $sqlCmd.Parameters.AddWithValue('Action',$ActionName)
    }
    if($PSBoundParameters.ContainsKey('TargetName') -eq $true){
        $null = $sqlCmd.Parameters.AddWithValue('Target',$TargetName)
    }
    $sqlCmd.Connection = $con
    $sqlAdapter.SelectCommand = $sqlCmd
    $null = $sqlAdapter.Fill($sqlDS) # fill dataset

    if(($null -ne $sqlDS) -and ($sqlDS.Tables.Count -gt 0) -and ($sqlDS.Tables[0].Rows.Count -gt 0)){
        $acGrouped = ($sqlDS.Tables[0].rows | Sort-Object ActionName | Group-Object Action | Select-Object Name)
        $bars = New-Object System.Collections.Generic.Queue[BarChartProperties]
        # create bar for action
        foreach($item in $acGrouped){
            $acObj = $sqlDS.Tables[0].rows | Where-Object {$_.Action -eq $item.Name}
            $bars.Enqueue(([BarChartProperties]::New( ($acObj | Select-Object -ExpandProperty ActionName -Unique),
                                                                ([math]::Round((($acObj | Measure-Object -Property CostReduction -Sum).Sum /60),0)),
                                                                $Script:ReductionColor,$Script:ReductionBorderColor)))
        }
        # get bar chart Html
        $Script:rep.Add((Get-BarChart -AutoBarColors -Bars $bars -LabelXAxis 'Time saved' -LabelYAxis 'Min.' -WidthPx 750 -HeightPx 750))
        $sqlDS.Dispose()
    }
    $sqlAdapter.Dispose()
    $sqlCmd.Dispose()

    $Script:rep.Add((Close-REPDocument)) # close document tags
    if($SRXEnv){
        $SRXEnv.ResultHTML = $Script:rep | Out-String
    }
    else {
        Write-Output "Not running on ScriptRunner PowerShell Host"
    }
}
catch{
    throw
}
finally{
    CloseSqlConnection -SqlCon $con
}