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

מאמר זה חל על ' ניווט ב-Microsoft Dynamics ' עבור אזור השפה ' ספרדית ' (es).

תופעות

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

הגירסה הספרדית של Microsoft Dynamics ניווט 2009 Service Pack 1 (SP1)
הגירסה הספרדית של Microsoft Dynamics ניווט 5.0 Service Pack 1 (SP1)

פתרון הבעיה

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

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

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

מידע אודות התקנה

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

הערה לפני התקנת תיקון חם זה, ודא שכל משתמשי הלקוח של Microsoft Navision מנותקים מהמערכת. פעולה זו כוללת את משתמשי הלקוח של Microsoft Navision Application Services (NAS). אתה אמור להיות משתמש הלקוח היחיד שמחובר כשאתה מיישם תיקון חם זה.

כדי ליישם תיקון חם זה, דרוש לך רשיון למפתחים.

מומלץ להקצות את חשבון המשתמש בחלון הכניסה של Windows או בחלון הכניסה למסד הנתונים את מזהה התפקיד "SUPER". אם לא ניתן להקצות לחשבון המשתמש את מזהה התפקיד "SUPER", עליך לוודא שחשבון המשתמש כולל את ההרשאות הבאות:

הרשאת השינוי עבור האובייקט שברצונך לשנות.
הרשאת הביצוע עבור האובייקט מזהה אובייקט מערכת של 5210 ועבור אובייקט המערכת של מזהה אובייקט 9015.

הערה אין לך זכויות עבור מאגרי הנתונים, אלא אם עליך לבצע תיקון נתונים.

שינויים בקוד

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

שינוי הקוד במקטעים ' פריט נתונים 5 ' בדוח ' יצירת הצהרת 349 ' (88) באופן הבא:
קוד קיים 1

                              BEGIN
                                REPEAT

                                  //Delete the following line.
                                  VATInvSales.RESET;

                                  VATInvSales.SETRANGE(VATInvSales.Type,VATInvSales.Type::Sale);
                                  VATInvSales.SETRANGE(VATInvSales."Document Type",VATInvSales."Document Type"::Invoice);

החלפת קוד 1

                              BEGIN
                                REPEAT

                                  //Add the follwing lines.
                                  LastTransactionNo := 0;
                                  VATInvSales.RESET;
                                  VATInvSales.SETCURRENTKEY("Transaction No."); 
                                  //End of the lines.                               

                                  VATInvSales.SETRANGE(VATInvSales.Type,VATInvSales.Type::Sale);
                                  VATInvSales.SETRANGE(VATInvSales."Document Type",VATInvSales."Document Type"::Invoice);

קוד קיים 2

                                          IF "VAT Registration No." <> '' THEN BEGIN
                                            IF AmountToIncludein349 <> 0 THEN BEGIN

                                              //Delete the following lines.
                                              OpTriang := 'X';
                                              AmountOpTri := AmountOpTri + AmountToIncludein349
                                              //End of the lines.                                           

                                            END ELSE BEGIN
                                              OpTriang := 'X';

החלפת קוד 2

                                          IF "VAT Registration No." <> '' THEN BEGIN
                                            IF AmountToIncludein349 <> 0 THEN BEGIN

                                              //Add the following lines.
                                              IF VATInvSales."Transaction No." <> LastTransactionNo THEN BEGIN
                                                OpTriang := 'X';
                                                AmountOpTri := AmountOpTri + AmountToIncludein349;
                                              END;
                                              //End of the lines.                                           

                                            END ELSE BEGIN
                                              OpTriang := 'X';

קוד 3 קיים

                                      // OpTriang := 'X';
                                      // AmountOpTri := AmountOpTri + VATInvSales.Base;
                                    UNTIL VATInvSales.NEXT = 0;
                                  END;

החלפת קוד 3

                                      // OpTriang := 'X';
                                      // AmountOpTri := AmountOpTri + VATInvSales.Base;

                                      //Add the following line.
                                      LastTransactionNo := VATInvSales."Transaction No.";

                                    UNTIL VATInvSales.NEXT = 0;
                                  END;

קוד קיים 4

                                    UNTIL VATInvSales.NEXT = 0;
                                  END;

                                  //Delete the following line.
                                  VATInvSales.RESET;

                                  VATInvSales.SETRANGE(VATInvSales.Type,VATInvSales.Type::Sale);
                                  VATInvSales.SETRANGE(VATInvSales."Document Type",VATInvSales."Document Type"::Invoice);

החלפת קוד 4

                                    UNTIL VATInvSales.NEXT = 0;
                                  END;

                                  //Add the following lines.
                                  LastTransactionNo := 0;
                                  VATInvSales.RESET;
                                  VATInvSales.SETCURRENTKEY("Transaction No."); 
                                  //End of the lines.

                                  VATInvSales.SETRANGE(VATInvSales.Type,VATInvSales.Type::Sale);
                                  VATInvSales.SETRANGE(VATInvSales."Document Type",VATInvSales."Document Type"::Invoice);

קוד 5 קיים

                                          ((VATInvSales."Country/Region Code" = CountryCode) AND LocationDiffCountryCode) THEN BEGIN
                                          IF "VAT Registration No." <> '' THEN BEGIN

                                           //Delete the following lines.
                                           IF AmountToIncludein349 <> 0 THEN
                                             NormalAmount := NormalAmount + AmountToIncludein349
                                           ELSE
                                           //End of the lines.

                                             NormalAmount := NormalAmount + VATInvSales.Base;
                                          END ELSE

החלפת קוד 5

                                          ((VATInvSales."Country/Region Code" = CountryCode) AND LocationDiffCountryCode) THEN BEGIN
                                          IF "VAT Registration No." <> '' THEN BEGIN

                                           //Add the following lines.
                                           IF AmountToIncludein349 <> 0 THEN BEGIN
                                             IF VATInvSales."Transaction No." <> LastTransactionNo THEN
                                               NormalAmount := NormalAmount + AmountToIncludein349;
                                           END ELSE
                                           //End of the lines.                                        

                                             NormalAmount := NormalAmount + VATInvSales.Base;
                                          END ELSE

קוד 6 קיים

                                      END;
                                      // NormalAmount := NormalAmount + VATInvSales.Base;
                                    UNTIL VATInvSales.NEXT = 0;
                                  END;

החלפת קוד 6

                                      END;
                                      // NormalAmount := NormalAmount + VATInvSales.Base;

                                      //Add the following line.
                                      LastTransactionNo := VATInvSales."Transaction No.";

                                    UNTIL VATInvSales.NEXT = 0;
                                  END;

קוד 7 קיים

                                  END;

                                  //Delete the following line.
                                  VATInvSales.RESET;

                                  VATInvSales.SETRANGE(Type,VATInvSales.Type::Sale);
                                  VATInvSales.SETRANGE("Document Type",VATInvSales."Document Type"::Invoice);

החלפת קוד 7

                                  END;

                                  //Add the following lines.
                                  LastTransactionNo := 0; 
                                  VATInvSales.RESET;
                                  VATInvSales.SETCURRENTKEY("Transaction No."); 
                                  //End of the lines.

                                  VATInvSales.SETRANGE(Type,VATInvSales.Type::Sale);
                                  VATInvSales.SETRANGE("Document Type",VATInvSales."Document Type"::Invoice);

קוד 8 קיים

                                          ((VATInvSales."Country/Region Code" = CountryCode) AND LocationDiffCountryCode) THEN BEGIN
                                          IF "VAT Registration No." <> '' THEN BEGIN

                                            //Delete the following lines.
                                            IF AmountToIncludein349 <> 0 THEN
                                              AmountEUService := AmountEUService + AmountToIncludein349
                                            ELSE
                                            //End of the lines.                                         

                                              AmountEUService := AmountEUService + VATInvSales.Base;
                                          END ELSE

החלפת קוד 8

                                          ((VATInvSales."Country/Region Code" = CountryCode) AND LocationDiffCountryCode) THEN BEGIN
                                          IF "VAT Registration No." <> '' THEN BEGIN

                                            //Add the following lines.
                                            IF AmountToIncludein349 <> 0 THEN BEGIN
                                              IF VATInvSales."Transaction No." <> LastTransactionNo THEN
                                                AmountEUService := AmountEUService + AmountToIncludein349;
                                            END ELSE
                                            //End of the lines.                                         

                                              AmountEUService := AmountEUService + VATInvSales.Base;
                                          END ELSE

קוד 9 קיים

                                        END;
                                      END;
                                    UNTIL VATInvSales.NEXT = 0;

החלפת קוד 9

                                        END;
                                      END;

                                      //Add the following line.
                                      LastTransactionNo := VATInvSales."Transaction No.";

                                    UNTIL VATInvSales.NEXT = 0;

שינוי הקוד במקטע מספר הנתונים מס ' 6 בסעיף ' צור דוח הצהרת 349 ' (88) באופן הבא:
קוד קיים 1

                              BEGIN
                                REPEAT

                                  //Delete the following line.
                                  VATInvPurch.RESET;

                                  VATInvPurch.SETRANGE(VATInvPurch.Type,VATInvPurch.Type::Purchase);
                                  VATInvPurch.SETRANGE(VATInvPurch."Document Type",VATInvPurch."Document Type"::Invoice);

החלפת קוד 1

                              BEGIN
                                REPEAT

                                  //Add the following lines.
                                  LastTransactionNo := 0;
                                  VATInvPurch.RESET;
                                  VATInvPurch.SETCURRENTKEY("Transaction No.");
                                  //End of the lines.                          

                                  VATInvPurch.SETRANGE(VATInvPurch.Type,VATInvPurch.Type::Purchase);
                                  VATInvPurch.SETRANGE(VATInvPurch."Document Type",VATInvPurch."Document Type"::Invoice);

קוד קיים 2

                                          IF "VAT Registration No." <> '' THEN BEGIN
                                            IF AmountToIncludein349 <> 0 THEN BEGIN

                                              //Delete the following lines.
                                              OpTriang := 'X';
                                              AmountOpTri := AmountOpTri + AmountToIncludein349;
                                              //End of the lines.                                           

                                            END ELSE BEGIN
                                              OpTriang := 'X';

החלפת קוד 2

                                          IF "VAT Registration No." <> '' THEN BEGIN
                                            IF AmountToIncludein349 <> 0 THEN BEGIN

                                              //Add the following lines.
                                              IF VATInvPurch."Transaction No." <> LastTransactionNo THEN BEGIN
                                                OpTriang := 'X';
                                                AmountOpTri := AmountOpTri + AmountToIncludein349;
                                              END;
                                              //End of the lines.

                                            END ELSE BEGIN
                                              OpTriang := 'X';

קוד 3 קיים

                                      // OpTriang := 'X';
                                      // AmountOpTri := AmountOpTri + VATInvPurch.Base;
                                    UNTIL VATInvPurch.NEXT = 0;
                                  END;

החלפת קוד 3

                                      // OpTriang := 'X';
                                      // AmountOpTri := AmountOpTri + VATInvPurch.Base;

                                      //Add the following line.
                                      LastTransactionNo := VATInvPurch."Transaction No.";

                                    UNTIL VATInvPurch.NEXT = 0;
                                  END;

קוד קיים 4

                                    UNTIL VATInvPurch.NEXT = 0;
                                  END;

                                  //Delete the following line.
                                  VATInvPurch.RESET;

                                  VATInvPurch.SETRANGE(VATInvPurch.Type,VATInvPurch.Type::Purchase);
                                  VATInvPurch.SETRANGE(VATInvPurch."Document Type",VATInvPurch."Document Type"::Invoice);

החלפת קוד 4

                                    UNTIL VATInvPurch.NEXT = 0;
                                  END;

                                  //Add the following lines.
                                  LastTransactionNo := 0;
                                  VATInvPurch.RESET;
                                  VATInvPurch.SETCURRENTKEY("Transaction No.");
                                  //End of the lines.                               

                                  VATInvPurch.SETRANGE(VATInvPurch.Type,VATInvPurch.Type::Purchase);
                                  VATInvPurch.SETRANGE(VATInvPurch."Document Type",VATInvPurch."Document Type"::Invoice);

קוד 5 קיים

                                          ((VATInvPurch."Country/Region Code" = CountryCode) AND LocationDiffCountryCode) THEN BEGIN
                                          IF "VAT Registration No." <> '' THEN BEGIN

                                            //Delete the following lines.
                                            IF AmountToIncludein349 <> 0 THEN
                                              NormalAmount := NormalAmount + AmountToIncludein349
                                            ELSE
                                            //End of the lines.

                                              NormalAmount := NormalAmount + VATInvPurch.Base;
                                          END ELSE

החלפת קוד 5

                                          ((VATInvPurch."Country/Region Code" = CountryCode) AND LocationDiffCountryCode) THEN BEGIN
                                          IF "VAT Registration No." <> '' THEN BEGIN

                                            //Add the following lines.
                                            IF AmountToIncludein349 <> 0 THEN BEGIN
                                              IF VATInvPurch."Transaction No." <> LastTransactionNo THEN
                                                NormalAmount := NormalAmount + AmountToIncludein349;
                                            END ELSE
                                            //End of the lines.

                                              NormalAmount := NormalAmount + VATInvPurch.Base;
                                          END ELSE

קוד 6 קיים

                                      END;
                                      // NormalAmount := NormalAmount + VATInvPurch.Base;
                                    UNTIL VATInvPurch.NEXT = 0;
                                  END;

החלפת קוד 6

                                      END;
                                      // NormalAmount := NormalAmount + VATInvPurch.Base;

                                      //Add the following line.
                                      LastTransactionNo := VATInvPurch."Transaction No.";

                                    UNTIL VATInvPurch.NEXT = 0;
                                  END;

קוד 7 קיים

                                    UNTIL VATInvPurch.NEXT = 0;
                                  END;

                                  //Delete the following line.
                                  VATInvPurch.RESET;

                                  VATInvPurch.SETRANGE(Type,VATInvPurch.Type::Purchase);
                                  VATInvPurch.SETRANGE("Document Type",VATInvPurch."Document Type"::Invoice);

החלפת קוד 7

                                    UNTIL VATInvPurch.NEXT = 0;
                                  END;

                                  //Add the following lines.
                                  LastTransactionNo := 0;
                                  VATInvPurch.RESET;
                                  VATInvPurch.SETCURRENTKEY("Transaction No.");
                                  //End of the lines.                            

                                  VATInvPurch.SETRANGE(Type,VATInvPurch.Type::Purchase);
                                  VATInvPurch.SETRANGE("Document Type",VATInvPurch."Document Type"::Invoice);

קוד 8 קיים

                                        THEN BEGIN
                                          IF "VAT Registration No." <> '' THEN BEGIN

                                            //Delete the following lines.
                                            IF AmountToIncludein349 <> 0 THEN
                                              AmountEUService := AmountEUService + AmountToIncludein349
                                            ELSE
                                            //End of the lines.                                         

                                              AmountEUService := AmountEUService + VATInvPurch.Base;
                                          END ELSE

החלפת קוד 8

                                        THEN BEGIN
                                          IF "VAT Registration No." <> '' THEN BEGIN

                                            //Add the following lines.
                                            IF AmountToIncludein349 <> 0 THEN BEGIN
                                              IF VATInvPurch."Transaction No." <> LastTransactionNo THEN
                                                AmountEUService := AmountEUService + AmountToIncludein349;
                                            END ELSE
                                            //End of the lines.                                         

                                              AmountEUService := AmountEUService + VATInvPurch.Base;
                                          END ELSE

קוד 9 קיים

                                        END;
                                      END;
                                    UNTIL VATInvPurch.NEXT = 0;

החלפת קוד 9

                                        END;
                                      END;

                                      //Add the following line.
                                      LastTransactionNo := VATInvPurch."Transaction No.";

                                    UNTIL VATInvPurch.NEXT = 0;

הוסף משתנה כללי חדש בדוח יצירת הצהרת 349 (88) ולאחר מכן ציין את המשתנה באופן הבא:
- שם: LastTransactionNo@1100072
- סוג נתונים: מספר שלם

דרישות מוקדמות

דרוש לך אחד מהמוצרים הבאים כדי להחיל תיקון חם זה:

הגירסה הספרדית של Microsoft Dynamics ניווט 2009 Service Pack 1 (SP1)
הגירסה הספרדית של Microsoft Dynamics ניווט 5.0 Service Pack 1 (SP1)

עליך להתקין את דוח 349 הספרדי כדי להחיל תיקון חם זה.
לקבלת מידע נוסף, בקר באתר האינטרנט הבא של Microsoft:
הדוח הספרדי של 349
בנוסף, עליך להתקין את חבילת מע 2010 כדי להחיל תיקון חם זה.
לקבלת מידע נוסף, בקר באתר האינטרנט הבא של Microsoft:
ניווט ב-microsoft Dynamics עבור מע 2010

מידע להסרת

אין באפשרותך להסיר תיקון חם זה.

מצב

Microsoft אישרה שזוהי בעיה במוצרי Microsoft המופיעים בסעיף "חל על".

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

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

תופעות

פתרון הבעיה

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

מידע אודות התקנה

שינויים בקוד

דרישות מוקדמות

מידע להסרת

מצב

זקוק לעזרה נוספת?

מעוניין באפשרויות נוספות?

האם מידע זה היה שימושי?

תודה על המשוב!