Something I need to add to the Information Module

New-LoggingCommand.ps1

[CmdletBinding()]
param(
    [System.Management.Automation.CommandMetadata]
    $Command
)
begin {
    $ProxyFactory = [System.Management.Automation.ProxyCommand]
<#
class TraceInformation {
    [String]$Message

    [Hashtable]$BoundParameters

    TraceInformation([string]$Message, [Hashtable]$BoundParameters) {
        $this.Message = $Message
        $this.BoundParameters = $BoundParameters
    }

    [string] ToString() {
        return $this.Message + " " + $($(
            foreach($param in $this.BoundParameters.GetEnumerator()) {
                "-{0}:{1}" -f $param.Key, $($param.Value -join ", ")
            }
        ) -join " ")
    }
}
#>
}

process {
    $CommandName = $Command.Name
    if($Help = $Command | Get-Help) {
        $HelpComments = $ProxyFactory::GetHelpComments(@($Help)[0])
    }
    $CmdletBindingAttribute = $ProxyFactory::GetCmdletBindingAttribute($Command)
    $ParamBlock = $ProxyFactory::GetParamBlock($Command)
    $Begin = $ProxyFactory::GetBegin($Command)
    $Process = $ProxyFactory::GetProcess($Command)
    $End = $ProxyFactory::GetEnd($Command)

    if($DynamicParam = $ProxyFactory::GetDynamicParam($Command)) {
        $DynamicParam = "dynamicparam {`n$DynamicParam}"
    }

Invoke-Expression @"
function global:$CommandName {
$CmdletBindingAttribute
param(
    $ParamBlock
)
$DynamicParam
begin {
    [TraceInformation]::new("BEGIN $CommandName", `$PSBoundParameters) | Write-Info -Tag Trace, Enter, Begin
    $Begin
}
process {
    [TraceInformation]::new("PROCESS $CommandName", `$PSBoundParameters) | Write-Info -Tag Trace, Enter, Process
    $Process
}
end {
    [TraceInformation]::new("END $CommandName", `$PSBoundParameters) | Write-Info -Tag Trace, Leave, End
    $End
}
<#
.ForwardHelpTargetName $($Command.ModuleName)\$CommandName
.ForwardHelpCategory $($Command.Commandtime)
#>
}
"@

}