AvailableTeamNumbersReport.ps1
|
<#PSScriptInfo .VERSION 1.0 .GUID 869b92e8-cab8-4870-be59-6451a0b18d90 .AUTHOR Vikas Sukhija .COMPANYNAME Techwizard.cloud .COPYRIGHT Techwizard.cloud .TAGS .LICENSEURI https://techwizard.cloud/2021/05/31/available-team-numbers-report/ .PROJECTURI https://techwizard.cloud/2021/05/31/available-team-numbers-report/ .ICONURI .EXTERNALMODULEDEPENDENCIES MicrosoftTeams .REQUIREDSCRIPTS .EXTERNALSCRIPTDEPENDENCIES .RELEASENOTES https://techwizard.cloud/2021/05/31/available-team-numbers-report/ .PRIVATEDATA #> #Requires -Module MicrosoftTeams <# .DESCRIPTION This will report the available phone numbers in Microsoft Teams #> param ( [string]$smtpserver, [string]$erroremail, [string]$from ) ###################Functions############################ function New-FolderCreation { [CmdletBinding()] param ( [Parameter(Mandatory = $true)] [string]$foldername ) $logpath = (Get-Location).path + "\" + "$foldername" $testlogpath = Test-Path -Path $logpath if($testlogpath -eq $false) { #Start-ProgressBar -Title "Creating $foldername folder" -Timer 10 $null = New-Item -Path (Get-Location).path -Name $foldername -Type directory } } function Write-Log { [CmdletBinding()] param ( [Parameter(Mandatory = $true,ParameterSetName = 'Create')] [array]$Name, [Parameter(Mandatory = $true,ParameterSetName = 'Create')] [string]$Ext, [Parameter(Mandatory = $true,ParameterSetName = 'Create')] [string]$folder, [Parameter(ParameterSetName = 'Create',Position = 0)][switch]$Create, [Parameter(Mandatory = $true,ParameterSetName = 'Message')] [String]$message, [Parameter(Mandatory = $true,ParameterSetName = 'Message')] [String]$path, [Parameter(Mandatory = $false,ParameterSetName = 'Message')] [ValidateSet('Information','Warning','Error')] [string]$Severity = 'Information', [Parameter(ParameterSetName = 'Message',Position = 0)][Switch]$MSG ) switch ($PsCmdlet.ParameterSetName) { "Create" { $log = @() $date1 = Get-Date -Format d $date1 = $date1.ToString().Replace("/", "-") $time = Get-Date -Format t $time = $time.ToString().Replace(":", "-") $time = $time.ToString().Replace(" ", "") New-FolderCreation -foldername $folder foreach ($n in $Name) {$log += (Get-Location).Path + "\" + $folder + "\" + $n + "_" + $date1 + "_" + $time + "_.$Ext"} return $log } "Message" { $date = Get-Date $concatmessage = "|$date" + "| |" + $message +"| |" + "$Severity|" switch($Severity){ "Information"{Write-Host -Object $concatmessage -ForegroundColor Green} "Warning"{Write-Host -Object $concatmessage -ForegroundColor Yellow} "Error"{Write-Host -Object $concatmessage -ForegroundColor Red} } Add-Content -Path $path -Value $concatmessage } } } #Function Write-Log #####################logs and reports################### $log = Write-Log -Name "AvailableTeamNumbersReport-Log" -folder "logs" -Ext "log" $Report1 = Write-Log -Name "AvailableTeamNumbersReport-Report" -folder "Report" -Ext "csv" $collection = @() ######connect to Skob and import modules ################################### Write-Log -message "Start..................Script" -path $log try { Connect-MicrosoftTeams Write-Log -Message "Connected to Teams module" -path $log } catch { $exception = $($_.Exception.Message) Write-Log -Message "$exception" -path $log -Severity Error Write-Log -Message "Exception has occured in connecting to Teams module" -path $log -Severity Error Send-MailMessage -SmtpServer $smtpserver -From $from -To $erroremail -Subject "Error occured in connecting to Teams module - AvailableTeamNumbersReport" -Body $($_.Exception.Message) Exit; } ##################start processing users################## try { $allnumbers = Get-CsOnlineTelephoneNumber -ResultSize 100000 | Select Id, ActivationState, CityCode,O365Region,InventoryType, TargetType, PortInOrderStatus Write-Log -message "Fetched Phonenumbers $($allnumbers.count) from Teams" -path $log $allassignednumbers = $allnumbers | where{$_.TargetType -ne $null} Write-Log -message "Fetched Assigned Phonenumbers $($allassignednumbers.count) from Teams" -path $log $allunassignednumbers = $allnumbers | where{$_.TargetType -eq $null} Write-Log -message "Fetched unAssigned Phonenumbers $($allunassignednumbers.count) from Teams" -path $log $getllcsonlineusernumbers = Get-CsOnlineUser -Filter {LineURI -ne $null} | Select UserprincipalName, LineURI Write-Log -message "Fetched all assigned users $($getllcsonlineusernumbers.count) from Teams" -path $log ############## adding as error is not geteingr eported and less numbers are fetched############# if($($allnumbers.count) -lt "8000"){ Send-MailMessage -SmtpServer $smtpserver -From $from -To $erroremail -Subject "Error occured getting details from TEAMS AvailableTeamNumbersReport" -Body "Error occured getting details from TEAMS AvailableTeamNumbersReport" exit } } catch { $exception = $($_.Exception.Message) Write-Log -Message "$exception" -path $log -Severity Error Write-Log -Message "Exception has occured getting details from TEAMS" -path $log -Severity Error Send-MailMessage -SmtpServer $smtpserver -From $from -To $erroremail -Subject "Error occured getting details from TEAMS AvailableTeamNumbersReport" -Body $($_.Exception.Message) Exit; } ##########Export to Report################################# Write-Log -Message "Start exporting Report" -path $log [System.Collections.ArrayList]$collection = @() ForEach($voicenumber in $allnumbers) { $mcoll = "" | Select-Object Id, ActivationState, CityCode,O365Region,InventoryType, TargetType, PortInOrderStatus $mcoll.ID = $voicenumber.Id $mcoll.ActivationState = $voicenumber.ActivationState $mcoll.CityCode = $voicenumber.CityCode $mcoll.O365Region = $voicenumber.O365Region $mcoll.InventoryType = $voicenumber.InventoryType $mcoll.PortInOrderStatus = $voicenumber.PortInOrderStatus if($voicenumber.TargetType -eq "user") { $lineuri = $assigneduser = $null $lineuri = "tel:+" + $voicenumber.Id $assigneduser = $getllcsonlineusernumbers | where{$_.LineURI -eq $lineuri} | select userprincipalname $mcoll.TargetType = $assigneduser.userprincipalname } $collection.Add($mcoll) | out-null } Write-Log -Message "Data collected, export to CSV" -path $log $collection | Export-Csv $Report1 -NoTypeInformation Disconnect-MicrosoftTeams ##############################Recycle Logs########################## Write-Log -Message "Recycle Logs" -path $log -Severity Information Write-Log -message "Finish..................Script" -path $log Send-MailMessage -SmtpServer $smtpserver -From $from -To $erroremail -Subject "Report - AvailableTeamNumbersReport" -Body "Report - AvailableTeamNumbersReport" -Attachments $report1 ############################################################################################# |