To implement this hotfix, you must have a developer license.
You do not have to have rights to the data stores unless you have to perform data repair.
To resolve this problem, change the code in Properties in the Contribution report (12102) as follows:
...
NOT CurrReport.PREVIEW
THEN BEGIN
Payment.SETCURRENTKEY("Contribution Type",Year,Month);
// Delete the following lines.
Payment.SETFILTER("Contribution Type",'%1',Payment."Contribution Type"::INPS);
Payment.SETRANGE(Year,ParamYear);
Payment.SETRANGE(Month,ParamMonth);
IF Payment.FIND('-') THEN BEGIN
IF NOT CONFIRM(Text1033,FALSE,ParamMonth,ParamYear)
THEN
CurrReport.QUIT
ELSE BEGIN
Payment.DELETEALL;
MODIFYALL("INPS Paid",FALSE);
END;
// End of the deleted lines.
END;
END;
...
NOT CurrReport.PREVIEW
THEN BEGIN
Payment.SETCURRENTKEY("Contribution Type",Year,Month);
// Add the following lines.
Payment.SETFILTER("Contribution Type",'%1',ContributionType);
Payment.SETRANGE(Year,ParamYear);
CASE ContributionType OF
ContributionType::INPS:
BEGIN
Payment.SETRANGE(Month,ParamMonth);
IF Payment.FINDFIRST THEN
IF NOT CONFIRM(Text1033,FALSE,ParamMonth,ParamYear) THEN
CurrReport.QUIT;
Payment.DELETEALL;
MODIFYALL("INPS Paid",FALSE);
END;
ContributionType::INAIL:
BEGIN
IF Payment.FINDFIRST THEN
IF NOT CONFIRM(Text1033,FALSE,ParamMonth,ParamYear) THEN
CurrReport.QUIT;
Payment.DELETEALL;
MODIFYALL("INAIL Paid",FALSE);
END;
// End of the added lines.
END;
END;
...
...
SETRANGE(Year,ParamYear);
SETRANGE(Month,ParamMonth);
// Delete the following lines.
IF FinalPrinting AND
NOT CurrReport.PREVIEW
THEN BEGIN
Payment.SETCURRENTKEY("Contribution Type",Year);
Payment.SETFILTER("Contribution Type",'%1',Payment."Contribution Type"::INAIL);
Payment.SETRANGE(Year,ParamYear);
IF Payment.FIND('-') THEN BEGIN
IF NOT CONFIRM(Text1033,FALSE,ParamYear)
THEN
CurrReport.QUIT
ELSE BEGIN
Payment.DELETEALL;
MODIFYALL("INAIL Paid",FALSE);
END;
END;
END;
CLEAR(Payment);
// End of the deleted lines.
// IT0004.begin
PrevINAILCode := '';
PrevVendorNo := '';
...
...
SETRANGE(Year,ParamYear);
SETRANGE(Month,ParamMonth);
// IT0004.begin
PrevINAILCode := '';
PrevVendorNo := '';
...