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.
...
Country.TESTFIELD("Intrastat Code");
IF OK THEN
IntraFile.WRITE(
FORMAT(
'02' +
TextZeroFormat(DELCHR(NoOfEntries),3) +
FORMAT(COPYSTR(IntrastatJnlLine3."Internal Ref. No.",1,7) + '000',10) +
FORMAT(VATRegNo,8) + FORMAT(ImportExport,1) + FORMAT(IntraReferenceNo,4),
80));
IntraFile.WRITE(
FORMAT(
'03' +
TextZeroFormat(COPYSTR("Internal Ref. No.",8,3),3) +
FORMAT("Internal Ref. No.",10) + FORMAT(Country."Intrastat Code",3) + FORMAT("Transaction Type",2) +
'0' + FORMAT("Transport Method",1) + PADSTR("Tariff No.",9,'0') +
DecimalNumeralZeroFormat(ROUND(TotalWeightAmt,1,'>'),15) +
DecimalNumeralZeroFormat(QuantityAmt,10) +
DecimalNumeralZeroFormat(StatisticalValueAmt,15),
80));
END;
END;
...
...
Country.TESTFIELD("Intrastat Code");
IntraFile.WRITE(
FORMAT(Country."Intrastat Code",2) + ';' +
FORMAT("Transaction Type",1) + ';' +
PADSTR("Tariff No.",8,'0') + ';' +
FORMAT(QuantityAmt,0,'<Sign><Integer><Decimals>') + ';' +
FORMAT(ROUND(TotalWeightAmt,1),0,'<Sign><Integer><Decimals>') + ';' +
FORMAT(StatisticalValueAmt,0,'<Sign><Integer><Decimals>'));
END;
END;
...