Table 5489 Dimension Set Entry Buffer

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

/// <summary>
/// Temporary buffer table for dimension set entry processing and manipulation during dimension operations.
/// Stores dimension set entry data with extended information for dimension processing workflows.
/// </summary>
/// <remarks>
/// Used for dimension set modifications, consolidation processing, and API operations.
/// Includes both legacy ID fields and modern GUID identifiers for system integration.
/// </remarks>
table 5489 "Dimension Set Entry Buffer"
{
    Caption = 'Dimension Set Entry Buffer';
    ReplicateData = false;
    TableType = Temporary;
    DataClassification = CustomerContent;

    fields
    {
        /// <summary>
        /// Identifier of the dimension set containing this dimension entry.
        /// </summary>
        field(1; "Dimension Set ID"; Integer)
        {
            Caption = 'Dimension Set ID';
            DataClassification = SystemMetadata;
        }
        /// <summary>
        /// Code of the dimension associated with this dimension set entry.
        /// </summary>
        field(2; "Dimension Code"; Code[20])
        {
            Caption = 'Dimension Code';
            DataClassification = SystemMetadata;
            NotBlank = true;
            TableRelation = Dimension;
        }
        /// <summary>
        /// Code of the dimension value for this dimension set entry.
        /// </summary>
        field(3; "Dimension Value Code"; Code[20])
        {
            Caption = 'Dimension Value Code';
            DataClassification = SystemMetadata;
            NotBlank = true;
            TableRelation = "Dimension Value".Code where("Dimension Code" = field("Dimension Code"));
        }
        /// <summary>
        /// Internal identifier of the dimension value for system references.
        /// </summary>
        field(4; "Dimension Value ID"; Integer)
        {
            Caption = 'Dimension Value ID';
            DataClassification = SystemMetadata;
        }
        /// <summary>
        /// Display name of the dimension for user interface presentation.
        /// </summary>
        field(5; "Dimension Name"; Text[30])
        {
            CalcFormula = lookup(Dimension.Name where(Code = field("Dimension Code")));
            Caption = 'Dimension Name';
            Editable = false;
            FieldClass = FlowField;
        }
        /// <summary>
        /// Display name of the dimension value for user interface presentation.
        /// </summary>
        field(6; "Dimension Value Name"; Text[50])
        {
            CalcFormula = lookup("Dimension Value".Name where("Dimension Code" = field("Dimension Code"),
                                                               Code = field("Dimension Value Code")));
            Caption = 'Dimension Value Name';
            Editable = false;
            FieldClass = FlowField;
        }
        /// <summary>
        /// Type of parent entity for API and integration scenarios.
        /// </summary>
        field(7; "Parent Type"; Enum "Dimension Set Entry Buffer Parent Type")
        {
            Caption = 'Parent Type';
            DataClassification = SystemMetadata;
        }
        /// <summary>
        /// Consolidation code from the dimension master for consolidation reporting.
        /// </summary>
        field(8; "Dimension Consolidation Code"; Code[20])
        {
            Caption = 'Dimension Consolidation Code';
            FieldClass = FlowField;
            Editable = false;
            CalcFormula = lookup(Dimension."Consolidation Code" where(Code = field("Dimension Code")));
        }
        /// <summary>
        /// Consolidation code from the dimension value for consolidation reporting.
        /// </summary>
        field(9; "Dim. Val. Consolidation Code"; Code[20])
        {
            Caption = 'Dimension Value Consolidation Code';
            FieldClass = FlowField;
            Editable = false;
            CalcFormula = lookup("Dimension Value"."Consolidation Code" where("Dimension Code" = field("Dimension Code"), Code = field("Dimension Value Code")));
        }
        /// <summary>
        /// GUID identifier of the dimension for API and modern integration scenarios.
        /// </summary>
        field(8000; "Dimension Id"; Guid)
        {
            Caption = 'Dimension Id';
            DataClassification = SystemMetadata;
        }
        /// <summary>
        /// GUID identifier of the dimension value for API and modern integration scenarios.
        /// </summary>
        field(8001; "Value Id"; Guid)
        {
            Caption = 'Value Id';
            DataClassification = SystemMetadata;
        }
        /// <summary>
        /// GUID identifier of the parent entity for API and modern integration scenarios.
        /// </summary>
        field(8002; "Parent Id"; Guid)
        {
            Caption = 'Parent Id';
            DataClassification = SystemMetadata;
        }
    }

    keys
    {
        key(Key1; "Parent Id", "Dimension Id")
        {
            Clustered = true;
        }
    }

    fieldgroups
    {
    }

    trigger OnDelete()
    begin
        UpdateIntegrationIds();
    end;

    trigger OnInsert()
    begin
        UpdateIntegrationIds();
    end;

    trigger OnModify()
    begin
        UpdateIntegrationIds();
    end;

    trigger OnRename()
    begin
        UpdateIntegrationIds();
    end;

    var
        IdOrCodeShouldBeFilledErr: Label 'The ID or Code field must be filled in.', Locked = true;
        ValueIdOrValueCodeShouldBeFilledErr: Label 'The valueID or valueCode field must be filled in.', Locked = true;

    local procedure UpdateIntegrationIds()
    var
        Dimension: Record Dimension;
        DimensionValue: Record "Dimension Value";
    begin
        if IsNullGuid("Dimension Id") then begin
            if "Dimension Code" = '' then
                Error(IdOrCodeShouldBeFilledErr);
            Dimension.Get("Dimension Code");
            "Dimension Id" := Dimension.SystemId;
        end;

        if IsNullGuid("Value Id") then begin
            if "Dimension Value Code" = '' then
                Error(ValueIdOrValueCodeShouldBeFilledErr);
            DimensionValue.Get("Dimension Code", "Dimension Value Code");
            "Value Id" := DimensionValue.SystemId;
        end;
    end;
}