Table 612 IC Outgoing Notification

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

/// <summary>
/// Stores outgoing notification records for intercompany transaction delivery via API data exchange.
/// Manages notification lifecycle, delivery status, and error tracking for partner communication.
/// </summary>
table 612 "IC Outgoing Notification"
{
    DataClassification = SystemMetadata;
    ReplicateData = false;

    fields
    {
        /// <summary>
        /// Unique identifier linking this outgoing notification to a specific intercompany operation.
        /// </summary>
        field(1; "Operation ID"; Guid)
        {
            Caption = 'Operation ID';
        }
        /// <summary>
        /// Code of the intercompany partner sending this notification.
        /// </summary>
        field(2; "Source IC Partner Code"; Code[20])
        {
            Caption = 'Source Intercompany Partner Code';
        }
        /// <summary>
        /// Code of the intercompany partner receiving this notification.
        /// </summary>
        field(3; "Target IC Partner Code"; Code[20])
        {
            Caption = 'Target Intercompany Partner Code';
        }
        /// <summary>
        /// Date and time when the notification was sent or last processed.
        /// </summary>
        field(10; "Notified DateTime"; DateTime)
        {
            Caption = 'Notified DateTime';
        }
        /// <summary>
        /// Current processing status of the outgoing notification including delivery confirmation.
        /// </summary>
        field(20; Status; Option)
        {
            Caption = 'Processed';
            OptionCaption = 'Created,Failed,Notified,Scheduled for deletion,Scheduled for deletion failed';
            OptionMembers = Created,Failed,Notified,"Scheduled for deletion","Scheduled for deletion failed";
        }
        /// <summary>
        /// Error message details for failed notification delivery stored as BLOB for extended text.
        /// </summary>
        field(21; "Error Message"; Blob)
        {
            Caption = 'Error Message';
        }
    }

    keys
    {
        key(Key1; "Operation ID")
        {
            Clustered = true;
        }
    }

    /// <summary>
    /// Stores error message text in the BLOB field for detailed delivery error tracking.
    /// Handles extended error messages that exceed standard text field limits.
    /// </summary>
    /// <param name="value">Error message text to store in the notification record</param>
    procedure SetErrorMessage(value: Text)
    var
        outStr: OutStream;
    begin
        Rec."Error Message".CreateOutStream(outStr);
        outStr.WriteText(value);
    end;

    /// <summary>
    /// Retrieves error message text from the BLOB field for display or processing.
    /// Returns empty string if no error message is stored.
    /// </summary>
    /// <param name="value">Variable to receive the error message text</param>
    procedure GetErrorMessage(value: Text)
    var
        inStr: InStream;
    begin
        CalcFields(Rec."Error Message");
        if Rec."Error Message".HasValue() then begin
            Rec."Error Message".CreateInStream(inStr);
            inStr.ReadText(value);
        end
        else
            value := '';
    end;
}