AvailableTeamNumbersReport.ps1
|
<#PSScriptInfo .VERSION 2.0 .GUID be53af09-7831-40cc-92a2-0a72b3fa7c1b .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-CsPhoneNumberAssignment -Top 100000 | Select TelephoneNumber,NumberType,ActivationState,City,IsoCountryCode,IsoSubdivision,PortInOrderStatus,PstnAssignmentStatus,PstnPartnerName Write-Log -message "Fetched Phonenumbers $($allnumbers.count) from Teams" -path $log $allassignednumbers = $allnumbers | where{$_.PstnAssignmentStatus -ne 'Unassigned'} Write-Log -message "Fetched Assigned Phonenumbers $($allassignednumbers.count) from Teams" -path $log $allunassignednumbers = $allnumbers | where{$_.PstnAssignmentStatus -eq 'Unassigned'} 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 TelephoneNumber,TargetType,NumberType, ActivationState, City,IsoCountryCode,IsoSubdivision,PortInOrderStatus, PstnAssignmentStatus,PstnPartnerName $mcoll.TelephoneNumber = $voicenumber.TelephoneNumber $mcoll.NumberType = $voicenumber.NumberType $mcoll.ActivationState = $voicenumber.ActivationState $mcoll.City = $voicenumber.City $mcoll.IsoCountryCode = $voicenumber.IsoCountryCode $mcoll.IsoSubdivision = $voicenumber.IsoSubdivision $mcoll.PortInOrderStatus = $voicenumber.PortInOrderStatus $mcoll.PstnAssignmentStatus = $voicenumber.PstnAssignmentStatus $mcoll.PstnPartnerName = $voicenumber.PstnPartnerName if($voicenumber.PstnAssignmentStatus -eq "UserAssigned"){ $lineuri = $assigneduser = $null $lineuri = "tel:" + $voicenumber.TelephoneNumber $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 ############################################################################################# |