Document no. of the transaction declared is not reported in the Italian version of Microsoft Dynamics NAV 2009

Installation information

Code changes

1. Change the code in the GetDocNoDocDateServTariffNo function in the Intrastat - Make Disk Tax Auth report (593) as follows:
   Existing code

   ...
   // IT0007.end
       END;
   
   // Delete the following lines.
      PROCEDURE GetDocNoDocDateServTariffNo@1130023() : Text[27];
      VAR
        OutText@1130000 : Text[27];
      BEGIN
        // IT0007.begin
        OutText += FormatAlphaNum("Intra - form Buffer"."Document No.",15);
        OutText += FORMAT("Intra - form Buffer".Date,0,'<Day,2><Month,2><Year,2>');
        OutText += FormatNum(GetNumericVal("Intra - form Buffer"."Service Tariff No."),6);
        EXIT(OutText);
        // IT0007.end
   // End of the deleted lines.
   
       END;
   
       PROCEDURE GetPmtMthdCompCountry@1130034() : Text[3];
   ...

   Replacement code

   ...
   // IT0007.end
       END;
   
   // Add the following lines.
      PROCEDURE GetDocNoDocDateServTariffNo@1130023() OutText : Text[27];
      VAR
        DocumentNo@1130000 : Code[20];
        DocumentDate@1130001 : Date;
      BEGIN
        GetDocNoDocDate(DocumentNo,DocumentDate);
        OutText += FormatAlphaNum(DocumentNo,15);
        OutText += FORMAT(DocumentDate,0,'<Day,2><Month,2><Year,2>');
        OutText += FormatNum(GetNumericVal("Intra - form Buffer"."Service Tariff No."),6);
      END;
   
      LOCAL PROCEDURE GetDocNoDocDate@1130006(VAR DocumentNo@1130001 : Code[20];VAR DocumentDate@1130000 : Date);
      VAR
        IntrastatJnlLine@1130002 : Record 263;
        CorrDocNo@1130003 : Code[20];
      BEGIN
        CorrDocNo := FindCorrectiveDocNo;
        IF CorrDocNo <> '' THEN BEGIN
          DocumentNo := CorrDocNo;
          IntrastatJnlLine.SETRANGE("Journal Template Name","Intra - form Buffer"."Journal Template Name");
          IntrastatJnlLine.SETRANGE("Journal Batch Name","Intra - form Buffer"."Corrected Intrastat Report No.");
          IntrastatJnlLine.SETRANGE("Document No.",CorrDocNo);
          IF IntrastatJnlLine.FINDFIRST THEN
            DocumentDate := IntrastatJnlLine.Date;
        END ELSE BEGIN
          DocumentNo := "Intra - form Buffer"."Document No.";
          DocumentDate := "Intra - form Buffer".Date;
        END;
   // End of the added lines.
   
       END;
   
       PROCEDURE GetPmtMthdCompCountry@1130034() : Text[3];
   ...

2. Change the code in the FindCorrectiveDocNo function in the Intrastat - Make Disk Tax Auth report (593) as follows:
   Existing code

   ...
   // IT0007.end
       END;
   
       BEGIN
       {
         <changelog>
   ...

   Replacement code

   ...
   // IT0007.end
       END;
   
   // Add the following lines.
      LOCAL PROCEDURE FindCorrectiveDocNo@1130013() : Code[20];
      VAR
        IntrastatJnlLine@1130000 : Record 263;
      BEGIN
        WITH IntrastatJnlLine DO BEGIN
          SETRANGE("Journal Template Name","Intra - form Buffer"."Journal Template Name");
          SETRANGE("Journal Batch Name","Intra - form Buffer"."Journal Batch Name");
          SETRANGE("Document No.","Intra - form Buffer"."Document No.");
          IF FINDFIRST THEN
            EXIT("Corrected Document No.");
        END;
      END;
   // End of the added lines.
   
       BEGIN
       {
         <changelog>
   ...

Prerequisites

• The Italian version of Microsoft Dynamics NAV 2009 R2
• The Italian version of Microsoft Dynamics NAV 2009 SP1

Removal information