[Event Request] codeunit 31102 "VAT Ctrl. Report Mgt. CZL" (Czech)

[M4fin]

Describe the request

Hello,

we need an event in fuction ExportInternalDocCheckToExcel in this codeunit:

if Temp3VATCtrlReportBufferCZL.FindSet() then begin
            i := 1;
            AddToExcelBuffer(TempExcelBuffer, i, 1, CopyStr(Temp1VATCtrlReportBufferCZL.FieldCaption("Bill-to/Pay-to No."), 1, 250));
            AddToExcelBuffer(TempExcelBuffer, i, 2, CopyStr(Temp1VATCtrlReportBufferCZL.FieldCaption("VAT Registration No."), 1, 250));
            AddToExcelBuffer(TempExcelBuffer, i, 3, CopyStr(Temp1VATCtrlReportBufferCZL.FieldCaption("Document No."), 1, 250));
            AddToExcelBuffer(TempExcelBuffer, i, 4, CopyStr(Temp1VATCtrlReportBufferCZL.FieldCaption("Document No.") + ' 2', 1, 250));
            AddToExcelBuffer(TempExcelBuffer, i, 5, AmountTxt);
            AddToExcelBuffer(TempExcelBuffer, i, 6, AmountTxt + ' 2');
            if GeneralLedgerSetup."Additional Reporting Currency" <> '' then begin
                AddToExcelBuffer(TempExcelBuffer, i, 7, AdditionalCurrencyAmountTxt);
                AddToExcelBuffer(TempExcelBuffer, i, 8, AdditionalCurrencyAmountTxt + ' 2');
            end;
            repeat
                i += 1;
                AddToExcelBuffer(TempExcelBuffer, i, 1, Temp3VATCtrlReportBufferCZL."Bill-to/Pay-to No.");
                AddToExcelBuffer(TempExcelBuffer, i, 2, Temp3VATCtrlReportBufferCZL."VAT Registration No.");
                AddToExcelBuffer(TempExcelBuffer, i, 3, Temp3VATCtrlReportBufferCZL."Document No.");
                AddToExcelBuffer(TempExcelBuffer, i, 4, Temp3VATCtrlReportBufferCZL."External Document No.");
                AddToExcelBuffer(TempExcelBuffer, i, 5, Format(Temp3VATCtrlReportBufferCZL."Total Amount"));
                AddToExcelBuffer(TempExcelBuffer, i, 6, Format(Temp3VATCtrlReportBufferCZL."Total Base"));
                if GeneralLedgerSetup."Additional Reporting Currency" <> '' then begin
                    AddToExcelBuffer(TempExcelBuffer, i, 7, Format(Temp3VATCtrlReportBufferCZL."Add.-Currency Total Amount"));
                    AddToExcelBuffer(TempExcelBuffer, i, 8, Format(Temp3VATCtrlReportBufferCZL."Add.-Currency Total Base"));
                end;
            // START
           OnAfterFillExcelLineFromVATCtrlReportBufferCZL(TempExcelBuffer, Temp3VATCtrlReportBufferCZL);
           // STOP
            until Temp3VATCtrlReportBufferCZL.Next() = 0;

[IntegrationEvent(false, false)]
local procedure OnAfterFillExcelLineFromVATCtrlReportBufferCZL(var TempExcelBufferTemp: Record "Excel Buffer"; TempVATCtrlReportBufferCZL: Record "VAT Ctrl. Report Buffer CZL")
begin
end;

Additional context

The standard work in the control report with documents that probably need to be excluded is insufficient (complicated manual search in the report lines based on the excel file provided by the program). Internal work item: AB#542013

[hodnot]

@JesperSchulz Hi Jesper, please look at this, please

[JesperSchulz]

Thanks for reporting this. We agree, and we’ll publish a fix asap, either in an update for the current version or in the next major release. Please do not reply to this, as we do not monitor closed issues. If you have follow-up questions or requests, please create a new issue where you reference this one.

Build ID: 22154.

[JesperSchulz]

Availability update: We will publish a fix for this issue in the next update for release 24.

Build ID to track: 22293.