XmlPort 5901 Import IRIS to Fault Codes, source in 29

Source29

src/Layers/W1/BaseApp/Service/Maintenance/ImportIRIStoFaultCodes.XmlPort.al52 lines, Copyright (c) Microsoft Corporation. MIT

// ------------------------------------------------------------------------------------------------
// Copyright (c) Microsoft Corporation. All rights reserved.
// Licensed under the MIT License. See License.txt in the project root for license information.
// ------------------------------------------------------------------------------------------------
namespace Microsoft.Service.Maintenance;

xmlport 5901 "Import IRIS to Fault Codes"
{
    Caption = 'Import IRIS to Fault Codes';
    Direction = Import;
    FieldDelimiter = '<None>';
    FieldSeparator = '<TAB>';
    Format = VariableText;
    UseRequestPage = false;

    schema
    {
        textelement(Root)
        {
            tableelement("Fault Code"; "Fault Code")
            {
                XmlName = 'FaultCode';
                fieldelement(Code; "Fault Code".Code)
                {
                }
                fieldelement(Description; "Fault Code".Description)
                {
                }

                trigger OnBeforeInsertRecord()
                begin
                    "Fault Code"."Fault Area Code" := CopyStr("Fault Code".Code, 1, 1);
                    "Fault Code"."Symptom Code" := CopyStr("Fault Code".Code, 2, 1);
                end;
            }
        }
    }

    requestpage
    {

        layout
        {
        }

        actions
        {
        }
    }
}