הצהרת מע מ 349 ספרדית מייצא את סכומי מטבע בו נעשה שימוש במסמך למרות החלת תיקון חם 254942 ב- Microsoft Dynamics ניווט

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

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

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

שינויי קוד

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

1. שנה את הקוד בפונקציה GetPostedCountryLocCode כדלקמן:
   קוד קיים 1

   ...                            REPEAT
                                 IF SalesInvLines."Location Code" <> '' THEN BEGIN
                                   IF Location.GET(SalesInvLines."Location Code") THEN
                                     EUCountryLinesLocationCode := FindEUCountryRegionCode(Location."Country/Region Code");
                                   IF EUCountryLinesLocationCode THEN BEGIN
   
   // Delete the following line.
                                     AmountToIncludeIn349 := AmountToIncludeIn349 + SalesInvLines.Amount;
   
                                     IF GetCountryfromLocation(SalesInvLines."Location Code") <> CountryCode THEN
                                       LocationDifferentCountryCode := TRUE;
                                     TempSalesInvLines := SalesInvLines;
                                     TempSalesInvLines.INSERT;
                                   END;
   ...
   
   

   קוד החלפה 1

   ...                            REPEAT
                                 IF SalesInvLines."Location Code" <> '' THEN BEGIN
                                   IF Location.GET(SalesInvLines."Location Code") THEN
                                     EUCountryLinesLocationCode := FindEUCountryRegionCode(Location."Country/Region Code");
                                   IF EUCountryLinesLocationCode THEN BEGIN
   
   // Add the following lines.
                                     AmountToIncludeIn349 +=
                                       GetExportedAmountIn349(SalesInvHeader."Currency Code",
                                       SalesInvHeader."Currency Factor",SalesInvLines."Line Amount");
   // End of the lines.
   
                                     IF GetCountryfromLocation(SalesInvLines."Location Code") <> CountryCode THEN
                                       LocationDifferentCountryCode := TRUE;
                                     TempSalesInvLines := SalesInvLines;
                                     TempSalesInvLines.INSERT;
                                   END;
   ...
   
   

   קוד קיים 2

   ...                                  TempSalesInvLines.INSERT;
                                   END;
                                 END ELSE
                                   IF CompInforShipToCountryCode THEN BEGIN
                                     EUCountryLinesLocationCode := TRUE;
   
   // Delete the following line.
                                     AmountToIncludeIn349 := AmountToIncludeIn349 + SalesInvLines.Amount;
   
                                     TempSalesInvLines := SalesInvLines;
                                     TempSalesInvLines.INSERT;
                                   END;
                               UNTIL SalesInvLines.NEXT = 0;
                           END;
   ...
   
   

   קוד החלפה 2

   ...                                  TempSalesInvLines.INSERT;
                                   END;
                                 END ELSE
                                   IF CompInforShipToCountryCode THEN BEGIN
                                     EUCountryLinesLocationCode := TRUE;
   
   // Add the following lines.
                                     AmountToIncludeIn349 +=
                                       GetExportedAmountIn349(SalesInvHeader."Currency Code",
                                       SalesInvHeader."Currency Factor",SalesInvLines."Line Amount");
   // End of the lines.
   
                                     TempSalesInvLines := SalesInvLines;
                                     TempSalesInvLines.INSERT;
                                   END;
                               UNTIL SalesInvLines.NEXT = 0;
                           END;
   ...
   
   

   קוד קיים 3

   ...                          REPEAT
                               IF PurchInvLines."Location Code" <> '' THEN BEGIN
                                 IF Location.GET(PurchInvLines."Location Code") THEN
                                   EUCountryLinesLocationCode := FindEUCountryRegionCode(Location."Country/Region Code");
                                 IF EUCountryLinesLocationCode THEN BEGIN
   
   // Delete the following line.
                                   AmountToIncludeIn349 := AmountToIncludeIn349 + PurchInvLines.Amount;
   
                                   IF GetCountryfromLocation(PurchInvLines."Location Code") <> CountryCode THEN
                                     LocationDifferentCountryCode := TRUE;
                                   TempPurchInvLines := PurchInvLines;
                                   TempPurchInvLines.INSERT;
                                 END;
   ...
   

   קוד החלפה 3

   ...                          REPEAT
                               IF PurchInvLines."Location Code" <> '' THEN BEGIN
                                 IF Location.GET(PurchInvLines."Location Code") THEN
                                   EUCountryLinesLocationCode := FindEUCountryRegionCode(Location."Country/Region Code");
                                 IF EUCountryLinesLocationCode THEN BEGIN
   
   // Add the following lines.
                                   AmountToIncludeIn349 +=
                                     GetExportedAmountIn349(PurchInvHeader."Currency Code",
                                     PurchInvHeader."Currency Factor",PurchInvLines."Line Amount");
   // End of the lines.
   
                                   IF GetCountryfromLocation(PurchInvLines."Location Code") <> CountryCode THEN
                                     LocationDifferentCountryCode := TRUE;
                                   TempPurchInvLines := PurchInvLines;
                                   TempPurchInvLines.INSERT;
                                 END;
   ...
   
   

   קוד קיים 4

   ...                                TempPurchInvLines.INSERT;
                                 END;
                               END ELSE
                                 IF CompInforShipToCountryCode THEN BEGIN
                                   EUCountryLinesLocationCode := TRUE;
   
   // Delete the following line.
                                   AmountToIncludeIn349 := AmountToIncludeIn349 + PurchInvLines.Amount;
   
                                   TempPurchInvLines := PurchInvLines;
                                   TempPurchInvLines.INSERT;
                                 END;
                             UNTIL PurchInvLines.NEXT = 0;
                         END;
   ...
   
   

   קוד החלפה 4

   ...                                TempPurchInvLines.INSERT;
                                 END;
                               END ELSE
                                 IF CompInforShipToCountryCode THEN BEGIN
                                   EUCountryLinesLocationCode := TRUE;
   
   // Add the following lines.
                                   AmountToIncludeIn349 +=
                                     GetExportedAmountIn349(PurchInvHeader."Currency Code",
                                     PurchInvHeader."Currency Factor",PurchInvLines."Line Amount");
   // End of the lines.
   
                                   TempPurchInvLines := PurchInvLines;
                                   TempPurchInvLines.INSERT;
                                 END;
                             UNTIL PurchInvLines.NEXT = 0;
                         END;
   ...
   
   

2. שנה את הקוד בפונקציה GetExportedAmountIn349 כדלקמן:
   קוד קיים

   ...      BEGIN
           IF DeliveryOperationCode = DeliveryOperationCode::" " THEN
             DeliveryOperationCode := DeliveryOperationCode::E;
         END;
   
         BEGIN
         END.
       }
       RDLDATA
       {
   ...
   
   

   קוד החלפה

   ...      BEGIN
           IF DeliveryOperationCode = DeliveryOperationCode::" " THEN
             DeliveryOperationCode := DeliveryOperationCode::E;
         END;
   
   // Add the following lines.  
         LOCAL PROCEDURE GetExportedAmountIn349@1100014(CurrencyCode@1100008 : Code[20];CurrencyFactor@1100009 : Decimal;LineAmount@1100010 : Decimal) : Decimal;
         VAR
           Currency@1100001 : Record 4;
         BEGIN
           IF CurrencyCode <> '' THEN BEGIN
             Currency.GET(CurrencyCode);
             EXIT(ROUND(LineAmount / CurrencyFactor,Currency."Amount Rounding Precision"))
           END;
           EXIT(LineAmount);
         END;
   
   // End of the lines.
   
         BEGIN
         END.
       }
       RDLDATA
       {
   ...