"You must not specify Applies to Id in Vendor Ledger entry No. [Number]" error message when you run the Suggest Vendor Payments report in Microsoft Dynamics NAV

Hotfix information

A supported hotfix is now available from Microsoft. However, it is only intended to correct the problem that is described in this article. Apply it only to systems that are experiencing this specific problem. This hotfix may receive additional testing. Therefore, if you are not severely affected by this problem, we recommend that you wait for the next Microsoft Dynamics NAV 2009 service pack or the next Microsoft Dynamics NAV version that contains this hotfix.

Note In special cases, charges that are ordinarily incurred for support calls may be canceled if a Technical Support Professional for Microsoft Dynamics and related products determines that a specific update will resolve your problem. The usual support costs will apply to additional support questions and issues that do not qualify for the specific update in question.

Code changes

Note Always test code fixes in a controlled environment before you apply the fixes to your production computers.
To resolve this problem, follow these steps:

1. Add the HideValidationDialog global variable as the Boolean type in the Gen. Journal Line table (81).

2. Change the code in the Account No. - OnValidate trigger in the Gen. Journal Line table (81) as follows:
   Existing code

   ...
         "VAT Bus. Posting Group" := '';
         "VAT Prod. Posting Group" := '';
         IF (Vend."Pay-to Vendor No." <> '') AND (Vend."Pay-to Vendor No." <> "Account No.")  THEN BEGIN
           OK := CONFIRM(Text014,FALSE,Vend.TABLECAPTION,Vend."No.",Vend.FIELDCAPTION("Pay-to Vendor No."),
           Vend."Pay-to Vendor No.");
           IF NOT OK THEN
             ERROR('');
         END;
         VALIDATE("Payment Terms Code");
       END;
     "Account Type"::"Bank Account":
   ...
   

   Replacement code

   ...
         "VAT Bus. Posting Group" := '';
         "VAT Prod. Posting Group" := '';
         IF (Vend."Pay-to Vendor No." <> '') AND (Vend."Pay-to Vendor No." <> "Account No.") AND
           NOT HideValidationDialog
         THEN BEGIN
           OK := CONFIRM(Text014,FALSE,Vend.TABLECAPTION,Vend."No.",Vend.FIELDCAPTION("Pay-to Vendor No."),
           Vend."Pay-to Vendor No.");
           IF NOT OK THEN
             ERROR('');
         END;
         VALIDATE("Payment Terms Code");
       END;
     "Account Type"::"Bank Account":
   ...
   

3. Add the SetHideValidation procedure in the Gen. Journal Line table (81). To do this, follow these steps:

   1. Add the NewHideValidationDialog local variable as the Boolean type.

   2. Add the code in the SetHideValidation procedure as follows:

      HideValidationDialog := NewHideValidationDialog;

4. Add a text constant in the Suggest Vendor Payments report (393), and then specify the text constant as follows:

   • Name: Text025

   • ConstValue: 'ENU="The %1 %2 has a %3 %4. "

5. Add a local variable in the MakeGenJnlLines function in the Suggest Vendor Payments report (393), and the specify the variable as follows:

   • Name:Vendor

   • DataType:Record

   • Length:23

6. Change the code in the MakeGenJnlLines function in the Suggest Vendor Payments report (393) as follows:
   Existing code

   ...
               OldTempPaymentBuffer."Document No." := "Document No.";
             END;
           END;
         "Account Type" := "Account Type"::Vendor;
         VALIDATE("Account No.",TempPaymentBuffer."Vendor No.");
         "Bal. Account Type" := BalAccType;
         VALIDATE("Bal. Account No.",BalAccNo);
         VALIDATE("Currency Code",TempPaymentBuffer."Currency Code");
   ...
   

   Replacement code

   ...
               OldTempPaymentBuffer."Document No." := "Document No.";
             END;
           END;
         "Account Type" := "Account Type"::Vendor;
         SetHideValidation(TRUE);
         VALIDATE("Account No.",TempPaymentBuffer."Vendor No.");
         Vendor.GET(TempPaymentBuffer."Vendor No.");
         IF (Vendor."Pay-to Vendor No." <> '') AND (Vendor."Pay-to Vendor No." <> "Account No.") THEN
           MESSAGE(Text025,Vendor.TABLECAPTION,Vendor."No.",Vendor.FIELDCAPTION("Pay-to Vendor No."),
             Vendor."Pay-to Vendor No.");
         "Bal. Account Type" := BalAccType;
         VALIDATE("Bal. Account No.",BalAccNo);
         VALIDATE("Currency Code",TempPaymentBuffer."Currency Code");
   ...