bcquality/microsoft/knowledge/security/keep-recordref-open-callers-non-public.good.al

codeunit 50242 "Sec Sample RecordRef Good"
{
    internal procedure ArchiveRecord(RecId: RecordId)
    var
        RecRef: RecordRef;
    begin
        RecRef.Open(RecId.TableNo);
        RecRef.Get(RecId);
        RecRef.Delete();
        RecRef.Close();
    end;
}