Docs  /  NAVAX Drag & Drop Beleganhänge  /  Informationen für Entwickler

 Dropzone

2024/12/03 • 1 Min. Lesedauer
Wenn die Beleganhänge in Business Central über eine Individualprogrammierung um zusätzliche Tabellen erweitert werden, muss auch die Dropzone erweitert werden. Dafür steht in Codeunit "NVXDD Event Mgt." das Event OnAfterGetRecRefFromDocumentAttachment zur Verfügung. Beispiel Das folgende Beispiel zeigt, wie Tabellen aus einer Individualprogrammierung hinzugefügt werden müssen, wobei Standardtabellen als Beispiel dienen.

[EventSubscriber(ObjectType::Codeunit, Codeunit::"NVXDD Event Mgt.", 'OnAfterGetRecRefFromDocumentAttachment', '', false, false)]
local procedure NVXDDEventMgt_OnAfterGetRecRefFromDocumentAttachment(DocumentAttachment: Record "Document Attachment"; var RecordRef: RecordRef)
begin
    case RecordRef.Number of
        Database::Customer:
            begin
                FieldRef := RecordRef.Field(1);
                FieldRef.Value := DocumentAttachment."No.";
            end;
        Database::"Sales Header":
            begin
                FieldRef := RecordRef.Field(1);
                FieldRef.Value := DocumentAttachment."Document Type";
                FieldRef := RecordRef.Field(3);
                FieldRef.Value := DocumentAttachment."No.";
            end;
        Database::"Sales Line":
            begin
                FieldRef := RecordRef.Field(1);
                FieldRef.Value := DocumentAttachment."Document Type";
                FieldRef := RecordRef.Field(3);
                FieldRef.Value := DocumentAttachment."No.";
                FieldRef := RecordRef.Field(4);
                FieldRef.Value := DocumentAttachment."Line No.";
            end;
    end;
end;