Public/Get-NewPatientDeviceNeeds.ps1

<#
    .SYNOPSIS
    Queries the patients in the org to determine new device needs and returns the fields required for ordering of those devices.

    .DESCRIPTION
    The new device is determined by getting the patient measurement requirements and comparing that against the previous
    measurement requirements. Only the newly added requirements are reported as a need.

    The needs of each patient is persisted into json files named using the CDR identifier in the folder specified with the -Folder parameter.

    .INPUTS
    None. You cannot pipe objects to Get-NewPatientDeviceNeeds.

    .OUTPUTS
    An array of PSCustomObject. Each object contains the following keys:
        PostalCode
        MRN
        HomePhone
        TierOfService
        Needs
        Country
        CdrId
        District
        DeliveryChannel
        GivenName
        DOB
        FamilyName
        State
        MobilePhone
        City
        Preferences
        Address

    .PARAMETER Patients
    The patients to retrieve needs. See Get-Patients. If not supplied then get Get-Patients will be called with the value of supplied in the -Status parameter

    .PARAMETER Def
    The metric metadata definitions from Get-MetricDefinitions. If not supplied then it will be called.

    .PARAMETER Folder
    The folder where to create the persistent need files per patient. Defaults to "./temp"

    .PARAMETER Status
    The status to query patients. Default to $null which indicates that needs will be generated for all patients.

    .EXAMPLE
    PS> $needs = Get-NewPatientDeviceNeeds

    .LINK
    Set-Config
    Get-Patients

    .NOTES
    Assumes config is initialized for org access.
    The folder will be created if it does not exist.
    You can force generation of new needs by deleting the specified folder or specifying a different empty folder.
#>

function Get-NewPatientDeviceNeeds {

    [CmdletBinding()]
    [OutputType([PSCustomObject[]])]
    param(
        [Parameter(Mandatory = $false, Position = 0, ValueFromPipeline)]
        [PSCustomObject[]]
        $Patients,

        [Parameter(Mandatory = $false, Position = 1)]
        [PSCustomObject]
        $Def,

        [Parameter(Mandatory = $false, Position = 2)]
        [String]
        $Folder = "./temp",

        [Parameter(Mandatory = $false, Position = 3)]
        [ValidateSet("Pending - Activation", "Active", "Suspended", "Pending - Removal", "Removed", "All", "Deleted")]
        [String]
        $Status = "Pending - Activation"
    )

    begin {
        Write-Verbose "[$($MyInvocation.MyCommand.Name)] Function started"
    }

    end {
        Write-Verbose "[$($MyInvocation.MyCommand.Name)] Complete"
    }

    process {
        Write-Debug "[$($MyInvocation.MyCommand.Name)] PSBoundParameters: $($PSBoundParameters | Out-String)"
        New-Item -ItemType Directory -Force -Path $Folder | Out-Null

        if (-not $PSBoundParameters.ContainsKey('Def')) {
            $Def = Get-MetricDefinitions
        }

        if (-not $PSBoundParameters.ContainsKey('Patients')) {
            $Patients = Get-Patients -Status $Status
        }

        $Sites = $null
        $patientDevices = Get-PatientMeasurementRequirements -Patients $Patients -Def $Def

        foreach ($next in $patientDevices) {
            $fileName = "$($next.patient.cdrPatient.resource.id).json"
            Write-Debug "Reading file: $($fileName)"
            $PatientFile = Join-Path -Path $Folder -ChildPath $fileName
            $persist = $false
            $needs = $null
            $replace = $null
            if ((Test-Path $PatientFile -PathType Leaf)) {
                $persistedPatient = Get-Content -Path $PatientFile | ConvertFrom-Json
                # Find ids of new measurement needs
                $new = $next.needs | Select-Object Id -ExpandProperty Id | Where-Object { $_ -notin ($persistedPatient.needs | Select-Object Id -ExpandProperty Id) }
                if ($new) {
                    $persist = $true
                    # Just the 'new' needs
                    $needs = $Def.measurements | Where-Object { $_.Id -in $new }
                }
                # find id of new replacement needs
                $newReplace = $next.replace | Select-Object Id -ExpandProperty Id | Where-Object { $_ -notin ($persistedPatient.replace | Select-Object Id -ExpandProperty Id) }
                if ($newReplace) {
                    $persist = $true
                    # Just the 'new' replace
                    $replace = $Def.measurements | Where-Object { $_.Id -in $newReplace }
                }
            }
            else {
                $persist = $true
                if ($next.needs) {
                    # All needs are new
                    $needs = $Def.measurements | Where-Object { $_.Id -in ($next.needs | Select-Object Id -ExpandProperty Id) }
                }
                if ($next.replace) {
                    # All replace are new
                    $replace = $Def.measurements | Where-Object { $_.Id -in ($next.replace | Select-Object Id -ExpandProperty Id) }
                }
            }
            if ($needs -or $replace) {
                Write-Debug "Processing CDRID: $($next.patient.cdrPatient.resource.id)"
                # Look up patient site name
                if (-not $Sites) {
                    $Sites = Get-SfSites
                }
                $siteName = $Sites | Where-Object { $_.Id -eq $next.patient.sfPatient.phecc__Site__c } | Select-Object -Expand Name
                [PSCustomObject]@{
                    CdrId           = $next.patient.cdrPatient.resource.id
                    Site            = $siteName
                    GivenName       = ($next.patient.cdrPatient.resource.name | Where-Object { $_.use -eq 'usual' } | Select-Object -Property given | Where-Object { $null -ne $_ } | Select-Object -ExpandProperty given) -Join " "
                    FamilyName      = ($next.patient.cdrPatient.resource.name | Where-Object { $_.use -eq 'usual' } | Select-Object -Property family | Where-Object { $null -ne $_ } | Select-Object -ExpandProperty family) -Join " "
                    MRN             = $next.patient.cdrpatient.resource.identifier | Where-Object { $_.system -eq 'MRN' } | Where-Object { $null -ne $_.value } | Select-Object value | Where-Object { $null -ne $_ } | Select-Object -expand value
                    DOB             = $next.patient.cdrPatient.resource.birthDate
                    Address         = $next.patient.cdrpatient.resource.address.line -replace "`n", " "
                    City            = $next.patient.cdrpatient.resource.address | Where-Object { $null -ne $_ } | Select-Object city | Where-Object { $null -ne $_ } | Select-Object -Expand city
                    State           = $next.patient.cdrpatient.resource.address | Where-Object { $null -ne $_ } | Select-Object state | Where-Object { $null -ne $_ } | Select-Object -Expand state
                    PostalCode      = $next.patient.cdrpatient.resource.address | Where-Object { $null -ne $_ } | Select-Object postalCode | Where-Object { $null -ne $_ } | Select-Object -Expand postalCode
                    District        = $next.patient.cdrpatient.resource.address | Where-Object { $null -ne $_ } | Select-Object district | Where-Object { $null -ne $_ } | Select-Object -Expand district
                    Country         = $next.patient.cdrpatient.resource.address | Where-Object { $null -ne $_ } | Select-Object country | Where-Object { $null -ne $_ } | Select-Object -Expand country
                    HomePhone       = $next.patient.cdrpatient.resource.telecom | Where-Object { $_.system -eq 'phone' -and $_.use -eq 'home' } | Where-Object { $null -ne $_.value } | Select-Object value | Where-Object { $null -ne $_ } | Select-Object -Expand value
                    MobilePhone     = $next.patient.cdrpatient.resource.telecom | Where-Object { $_.system -eq 'phone' -and $_.use -eq 'mobile' } | Where-Object { $null -ne $_.value } | Select-Object value | Where-Object { $null -ne $_ } | Select-Object -Expand value
                    TierOfService   = $next.patient.sfPatient.phecc__Tier_of_Service__c
                    DeliveryChannel = $next.patient.sfPatient.phecc__Delivery_Channel__c
                    Needs           = ($needs | Select-Object phecc__Device_Type__c -ExpandProperty phecc__Device_Type__c) -Join "|"
                    Replace         = ($replace | Select-Object phecc__Device_Type__c -ExpandProperty phecc__Device_Type__c) -Join "|"
                    Preferences     = [String](($next.preferences | Select-Object -Property Name -ExpandProperty Name) -Join "|")
                }
            }
            if ($persist) {
                $next | ConvertTo-Json -Depth 100 | Set-Content -Path $PatientFile -Force | Out-Null
            }
        }
    }
}