שדות החובה לא נבדקים בעת יצירת קובץ SEPA בגירסת Microsoft Dynamics NAV 2009 בלגי

מידע על תיקונים חמים

תיקון חם נתמך זמין כעת מ- Microsoft. עם זאת, הוא מיועד רק לתיקון הבעיה המתוארת במאמר זה. יש להחיל אותו רק במערכות שהתעוררה בהן בעיה ספציפית זו. תיקון חם זה עשוי לעבור בדיקות נוספות. לכן, אם המערכת שברשותך לא נפגעה באופן חמור מבעיה זו, מומלץ להמתין ל- Microsoft Dynamics NAV 2009 service pack הבאה או גירסת Microsoft Dynamics NAV הבא המכיל תיקון חם זה.

הערה במקרים מיוחדים, שהצגת עבור שיחות עשויים לבטל אם מומחה תמיכה טכנית עבור Microsoft Dynamics ומוצרים קשורים יקבע שעדכון ספציפי יפתור את הבעיה. דמי התמיכה המקובלים יחולו על נוספים שאלות וסוגיות תמיכה אשר אינן מצריכות העדכון הספציפי האמור.

שינויי קוד

הערה תמיד קוד מחשב פותר בסביבה מבוקרת לפני החלת התיקונים למחשבים הייצור שלך.
o לפתור בעיה זו, בצע את הפעולות הבאות:

1. שנה את הקוד של המאפיינים ב- codeunit בדיקת תשלומי SEPA (2000004) באופן הבא:
   קוד קיים 1

   ...                    CheckExportProtocol(Rec);
                       ExportProtocolChecked := TRUE;
                     END;
                     CheckOwnBankAccount(Rec);
                     CheckBenBAN(Rec);
                     CheckCurrencyEuro(Rec);
   ...
   
   

   קוד החלפה 1

   ...                    CheckExportProtocol(Rec);
                       ExportProtocolChecked := TRUE;
                     END;
   
   // Add the following line.
                       CheckCustVendName(Rec);
   
                     CheckOwnBankAccount(Rec);
                     CheckBenBAN(Rec);
                     CheckCurrencyEuro(Rec);
   ...
   
   

   קוד קיים 2

   ...                    END;
                   UNTIL NEXT = 0;
   
                 CheckForOnlyOneBankAcc;
                 CheckPaymJnlLine.ShowErrorLog;
               END;
   ...
   
   

   קוד החלפה 2

   ...                    END;
                   UNTIL NEXT = 0;
   
   // Add the following line.  
                   CheckCompanyName;
   
                 CheckForOnlyOneBankAcc;
                 CheckPaymJnlLine.ShowErrorLog;
               END;
   ...
   
   

2. תוספת כללית במשתנה codeunit בדיקת תשלומי SEPA (2000004):

    Text007@1010013 : TextConst 'ENU=Company name cannot be blank.';

3. שנה את הקוד בפונקציה CheckForOnlyOneBankAcc ב codeunit בדיקת תשלומי SEPA (2000004) באופן הבא:
   קוד קיים

   ...          END;
         END;
   
   // Delete the following line.  
           BEGIN
   
         END.
       }
     }
   ...
   
   

   קוד החלפה

   ...          END;
         END;
   
   // Add the following lines.  
           LOCAL PROCEDURE CheckCompanyName@1010007();
           VAR
             CompanyInfo@1010000 : Record 79;
           BEGIN
             CompanyInfo.GET;
             IF DELCHR(CompanyInfo.Name) = '' THEN
               CheckPaymJnlLine.InsertErrorLog(Text007);
           END;
   
           LOCAL PROCEDURE CheckCustVendName@1010008(VAR PmtJnlLine@1010000 : Record 2000001);
           VAR
             Vendor@1010001 : Record 23;
             Customer@1010002 : Record 18;
           BEGIN
             CASE PmtJnlLine."Account Type" OF
               PmtJnlLine."Account Type"::Vendor:
                 IF Vendor.GET(PmtJnlLine."Account No.") THEN
                   IF DELCHR(Vendor.Name) = '' THEN
                     CheckPaymJnlLine.InsertErrorLog(STRSUBSTNO(Text001,Vendor.FIELDCAPTION(Name),Vendor.TABLECAPTION,
                       Vendor."No.",PmtJnlLine.TABLECAPTION,PmtJnlLine.FIELDCAPTION("Line No."),PmtJnlLine."Line No."));
               PmtJnlLine."Account Type"::Customer: 
                 IF Customer.GET(PmtJnlLine."Account No.") THEN
                   IF DELCHR(Customer.Name) = '' THEN
                     CheckPaymJnlLine.InsertErrorLog(STRSUBSTNO(Text001,Customer.FIELDCAPTION(Name),Customer.TABLECAPTION,
                       Customer."No.",PmtJnlLine.TABLECAPTION,PmtJnlLine.FIELDCAPTION("Line No."),PmtJnlLine."Line No."));
             END;
           END;
   
           BEGIN
   // End of the lines.
   
         END.
       }
     }
   ...