Public/Set-P1Adapter.ps1

function Set-P1Adapter {
    <#
    .Synopsis
    Configuration of the adapter for the ERP.

    .Description
    Configure the adapter for PlannerOne.

    .Parameter Tenant
    The tenant name.

    .Parameter Server
    The ERP host server name.

    .Parameter SOAPPort
    The ERP Web service SOAP port.

    .Parameter RESTPort
    The ERP Web service SOAP port.

    .Parameter AuthenticationMode
    The ERP authentication mode (Certificate, Negotiate, NTLM, Digest, Basic).

    .Parameter SSL
    Does the ERP server use SSL.

    .Parameter ClientPort
    The port for external client software (RTC...)

    .Parameter InstanceName
    The ERP server instance name.

    .Parameter ERPTenantName
    The ERP tenant name.

    .Parameter ServiceDomain
    The PlannerOne technical account domain.

    .Parameter ServiceLogin
    The PlannerOne technical account login.

    .Parameter ServicePassword
    The PlannerOne technical account password.

    .Parameter AutoPort
    Read ports from ERP configuration provided with InstanceName

    .Parameter WebServer
    The ERP web server host

    .Parameter WebPort
    The ERP web server port

    .Parameter WebSite
    The ERP web site

    .Parameter BulkPath
    The ERP bulk path for data

    .Parameter ExtraParameter
    Extra parameter specific for ERP.
    For NAV, to specify NAVVersion of Powershell module tools to use: -ExtraParameter "NAVVersion=90"

    .Example
    # Configure an adapter
    Set-P1Adapter -Tenant nodb -ServiceDomain ORTEMS -ServiceLogin PlannerOne -ServicePassword Planner1 -Server locahost -InstanceName ERPInstance -SOAPPort 9047

    "Configure for AP
    Set-P1Adapter -Tenant APTenant -Server localhost -SOAPPort 2039 -ServiceLogin "ap\planadm" -ServicePassword planadm -WebServer loalhost -WebPort 80 -WebSite APPlus -BulkPath "c:\temp\p1data"
    #>

    [cmdletbinding()]
    param(
        [Parameter(Mandatory=$true)]
        [string] $Tenant,
        [string] $Server,
        [int] $SOAPPort,
        [int] $RESTPort,
        [string] $AuthenticationMode,
        [bool] $SSL,
        [int] $ClientPort,
        [string] $InstanceName,
        [string] $ERPTenantName,
        [string] $ServiceDomain,
        [string] $ServiceLogin,
        [string] $ServicePassword,
        [switch] $AutoPort,
        [string] $WebServer,
        [int] $WebPort,
        [string] $WebSite,
        [string] $BulkPath,
        [string] $ExtraParameter
    )
    Process
    {
        if (!(Test-Tenant $Tenant)) {
            Write-Warning "Tenant $Tenant does not exist."
            Write-Warning "Operation canceled."
            return
        }

        $tenantInfo = Get-TenantInfo $Tenant
        if ($tenantInfo -eq $null) {
                Write-Warning "No tenant information available"
                Write-Warning "Configuration cancel"
                return
        }

        $Adapter = $tenantInfo.Adapter

        if ($Adapter -eq "" -or $Adapter -eq $null) {
            Write-Warning "Adapter is not defined"
            return
        }

        if ($Adapter -ne "NAV" -and $Adapter -ne "REST" -and $Adapter -ne "AP") {
            Write-Warning "Adapter $Adapter not recognized"
            return
        }


        if ($AuthenticationMode -eq "Certificate") {
            if ($Adapter -ne "REST") {
                Write-Warning "Certificate authentication is only available for REST adapter."
                return
            }

            $SSL = $true
        }

        if ($Adapter -eq "NAV") {
            Write-Section "Configuring NAV Adapter..."

            if ($InstanceName -eq "") {
                Write-Warning "Microsoft Dynamics NAV Instance name is missing."
                return
            }

            [string] $NAVVersion = ""
            if ($ExtraParameter -ne "") {
                Write-Verbose "Parsing ExtraParameter $ExtraParameter"
                $splited = $ExtraParameter.Split("=")
                if ($splited[0] -eq "NAVVersion" -and $splited.Length -ge 2) {
                    $NAVVersion = $splited[1]
                    Write-Verbose "NAVVersion is set to $NAVVersion"
                }
            }

            $NAVConfig = Get-NAVParametersFromConfig -InstanceName $InstanceName -NAVVersion $NAVVersion
            if ($AutoPort) {
                if ($NAVConfig -eq $null) {
                    Write-Warning "No NAV configuration. PlannerOne AutoPort Configuration canceled."
                    return
                }

                $InstanceName = $NAVConfig.InstanceName
                $SOAPPort = $NAVConfig.SOAPPort
                $ClientPort = $NAVConfig.ClientPort
            }

            if ($NAVConfig -ne $null) {
                if ($NAVConfig.SOAPPort -ne $SOAPPort) {
                    $port = $NAVConfig.SOAPPort
                    Write-Warning "SOAP Port $SOAPPort is not the one set for Microsoft Dynamics NAV instance $InstanceName`: $port"
                    Write-Warning "You can use -AutoPort switch to automatically use the ports configured in Microsoft Dynamics NAV."
                    Write-Warning "PlannerOne adapter configuration canceled."
                    return;
                }

                if ($NAVConfig.SOAPServicesEnabled -ne "true") {
                    Write-Warning "SOAP service is not enabled in Microsoft Dynamics NAV instance $InstanceName"
                    Write-Warning "PlannerOne adapter configuration canceled."
                    return;
                }

                if ($NAVConfig.ServicesDefaultTimeZone -ne "Server Time Zone") {
                    $timezone = $NAVConfig.ServicesDefaultTimeZone
                    Write-Warning "SOAP service time zone should be 'Server Time Zone'. Current value in Microsoft Dynamics NAV instance $InstanceName`: $timezone"
                    Write-Warning "PlannerOne adapter configuration canceled."
                    return;
                }
            } else {
                Write-Warning "Cannot read Microsoft Dynamics NAV configuration: parameters won't be validated. Run with -verbose for more technical informations."
            }

            Set-NAVParameters $Tenant $Server $SOAPPort $AuthenticationMode $SSL $ClientPort $InstanceName $ServiceDomain $ServiceLogin $ServicePassword $ERPTenantName
        }

        if ($Adapter -eq "REST") {
            Write-Section "Configuring REST Adapter..."
            if ($AuthenticationMode -eq "") {
                $AuthenticationMode = "Basic"
            }

            if ($RESTPort -eq 0 -and $SOAPPort -ne 0) {
                $RESTPort = $SOAPPort
            }

            Set-RESTParameters $Tenant $Server $RESTPort $AuthenticationMode $SSL $InstanceName $ServiceDomain $ServiceLogin $ServicePassword $ERPTenantName
        }

        if ($Adapter -eq "AP") {
            Write-Section "Configuring AP Adapter..."
            if ($Login -eq "") {
                Write-Warning "Login is missing. Operation canceled"
                return
            }
            if ($Password -eq "") {
                Write-Warning "Password is missing. Operation canceled"
                return
            }
            if ($WebSite -eq "") {
                Write-Warning "WebSite is missing. Operation canceled"
                return
            }
            if ($BulkPath -eq "") {
                Write-Warning "BulkPath is missing. Operation canceled"
                return
            }

            Set-APParameters $Tenant $Server $SOAPPort $ServiceLogin $ServicePassword $WebServer $WebPort $WebSite $BulkPath
        }

        $serviceName = Get-ServiceNameFromTenant $Tenant
        Write-Output "Restarting PlannerOne service $serviceName..."

        Stop-Service -Name $ServiceName -Force

        Write-Output "Waiting 5 seconds for service to really stop."
        Start-Sleep -seconds 5

        Start-Service -Name $serviceName
        Write-OK "Configuration done"
    }
}