Benchmarking P6 (Primavera v6)

Clear-Host
Read-Host "P6 XER Benchmarking tool made by Marcus.`nBefore continuing please save & close any open P6 windows. (Continuing will force close all P6 sessions). `nPress Enter to continue..."
Clear-Host

#Close open P6 Windows.
Stop-Process -Name Primavera.CacheService -ErrorAction SilentlyContinue 
Stop-Process -Name PM -ErrorAction SilentlyContinue

#Prompt the user for information about the XER Import & save to variables.
$failedState = $false
$P6Path = "C:\Program Files\Oracle\Primavera P6\P6 Professional\"
$XERCount = 0
$DBName = Read-Host("Enter the database alias/name. Tip: Right click the mouse to paste into the terminal.")
$Username = Read-Host("Enter your username that you connect to the database with")
$Password = Read-Host("Enter your password.")
$XERPath = Read-Host("Enter the full PATH to the folder where the XERs you wish to import are. Tip: Right click the mouse to paste into the terminal.")
$EPSElement = Read-Host("Enter the EPS ID you wish to add the project to. (Example: EPS)")
$ImportConfig = Read-Host("Enter the Import Configuration you wish to use. (Example: default)")
$XERArray = @()
$ResultArray = @()

#Get an array of all XERs in the folder path provided
$XERArray += Get-ChildItem -Path "$XERPath\*.xer" -Name
$XERArrayLength = $XERArray.Length
Clear-Host

#Prompt user for confirmation that they want to execute using the information given.
Write-Host("Script found $XERArrayLength XER files in $XERPath.")
Write-Host("ArrayDEBUG: $XERArray")
$Response = Read-Host("Script will import those XER files to $DBName\$EPSElement using the $ImportConfig import configuration. OK to continue? (Enter `"y`" to continue or `"n`" to cancel.)")
if($XERArrayLength -eq 0){
    $Response = "n"
    Write-Host("WARNING, NO XERs FOUND AT THIS LOCATION.") -ForegroundColor Red
}
if(($Response -eq 'y') -or ($Response -eq 'Y') -or ($Response -eq 'yes') -or ($Response -eq 'Yes') -or ($Response -eq 'ok') -or ($Response -eq 'OK') -and ($XERArrayLength -gt 0)){
    
    #For each XER in the XER array we create an XML. The XML is used during the command line call of the P6 executible. 
    #The XML tells P6 what to do, in this case we're doing an import action.
    #Each part of the XML is filled with the information provided above.
    #Once the XER is imported, I delete the XML used and move onto the next XER in the array.

        Write-Host("Starting process, please wait. Advanced output should be here: $P6Path\PrimaveraCmdLineLog.txt")
        foreach ($XERName in $XERArray){
            $XERCount = $XERCount + 1 #Increment counter for progress updates.
            $failedState = $false

            #Set XML Settings
            $xmlsettings = New-Object System.Xml.XmlWriterSettings
            $xmlsettings.Indent = $true
            $xmlsettings.IndentChars = "    "

            # Set the file name w/Date
            $timestamp = Get-Date -Format o | ForEach-Object { $_ -replace ":", "." }
            #$XMLName = "ActionsXML$timestamp.xml"
            $XMLName = "ActionsXML.xml"
            $XmlWriter = [System.XML.XmlWriter]::Create("$XERPath\$XMLName", $xmlsettings)

            # Write the XML Decleration and set the XSL
            $xmlWriter.WriteStartDocument()

            # Start the Root Element & fill in all the elements with information provided by the user
            $xmlWriter.WriteStartElement("actions")
        
            $xmlWriter.WriteStartElement("action")
            $xmlWriter.WriteElementString("type","import")
            $xmlWriter.WriteElementString("importFormat","XER")
            $xmlWriter.WriteElementString("importType","PROJECT")
            $xmlWriter.WriteElementString("importAction","CREATE")
            $xmlWriter.WriteElementString("importTo","$EPSElement")
            $xmlWriter.WriteElementString("importConfiguration","$ImportConfig")
            $xmlWriter.WriteElementString("importFile","$XERPath\$XERName")
            $xmlWriter.WriteEndElement() # <-- End <action>
            $xmlWriter.WriteEndElement() # <-- End <actions> 

            # End, Finalize and close the XML Document
            $xmlWriter.WriteEndDocument()
            $xmlWriter.Flush()
            $xmlWriter.Close()

            #This will build the .bat to be executed, saved to the XER root.
            "@Echo Please leave this window open, script is running!`r`n@Echo If your username or password is incorrect close the P6 Window and wait for script to close.`r`ncd `"$P6Path`"`r`nPrimavera.cacheservice.exe /username=$Username /password=$Password /alias=$DBName /actionScript=`"$XERPath\$XMLName`"" | Out-File "$XERPath\run.bat" -Encoding ascii


            #This is the actual call to the batch. Tracks the process below.
            $startTime = Get-Date
            Write-Host("Importing: $XERName")
            $runningPMProcess = Start-Process "$XERPath\run.bat" -PassThru
            $isRunning = $true
            while($isRunning){
                try{
                    Start-Sleep 1 #Checks for the spawned process every second.
                    if((Get-Process -Id $runningPMProcess.id -ErrorAction SilentlyContinue) -eq $null){
                        $isRunning = $false        
                    }
                }
                catch{
                    $isRunning = $false
                    $failedState = $true
                }
            }
            $endTime = Get-Date
            Remove-Item -Path "$XERPath\run.bat" #Remove used bat
            Remove-Item -Path "$XERPath\$XMLName" #Remove used XML
            $resultTime = $endTime - $startTime
            Write-Host $resultTime
            $ResultArray += "$XERName : $resultTime"
            Write-Host("Import complete.")
            
        }
    }

else{
    Write-Host("Aborting. Check for errors above.") -ForegroundColor Red
}

Write-Host("Results:")
foreach($result in $ResultArray){
    Write-Host $result
    }
Read-Host("Paused.")