סכומי התשלום וסכומי התשלום הפתוחים מעורבים ויוצגו בסעיף "תשלומים מחוץ למגבלה המשפטית" בדוח ספק-תאריך היעד של תשלומים (10748) באופן שגוי בגירסה הספרדית של Microsoft Dynamics NAV

חל על
Dynamics NAV 2009 Microsoft Dynamics NAV 5.0

מאמר זה חל על Microsoft Dynamics NAV עבור האזור ספרד (es).

סימפטומים

נניח שיש לך שני חשבונות עבור ספק בגירסה הספרדית של Microsoft Dynamics NAV. אתה מפרסם תשלום עבור חשבון אחד. במצב זה, כאשר אתה מפעיל את דוח תשלומים הספק שתאריך היעד שלו חלף (10748), סכומי התשלום וסכומים התשלום הפתוחים עבור הספק מעורבים, מוצגים באופן שגוי בסעיף "תשלומים מחוץ למגבלה המשפטית (LYC)". 
בעיה זו מתרחשת במוצרים הבאים:

  • הגירסה הספרדית של Microsoft Dynamics NAV 2009 R2
  • הגירסה הספרדית של Microsoft Dynamics NAV 2009 Service Pack 1
  • הגירסה הספרדית של Microsoft Dynamics NAV 5.0 Service Pack 1

      

פתרון

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

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

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

            
          

מידע התקנה

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

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

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

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

  • ההרשאה Modify עבור האובייקט שאתה תשנה.
  • ההרשאה Execute עבור אובייקט System Object ID 5210 ולאובייקט System Object ID 9015.

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

שינויי קוד

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

  1. שנה את הקוד בפריט הנתונים מספר 1 בספק - חלף תשלומים הדוח (10748) באופן הבא:
    קוד קיים 1

    ...
}
{ PROPERTIES
{
SectionType=GroupFooter;
SectionWidth=17850;

// Delete the following line.
SectionHeight=2538;

OnPreSection=BEGIN
CurrReport.SHOWOUTPUT(VendTotalAmount <> 0);
END;
}
...

    קוד חלופי 1

    ...
}
{ PROPERTIES
{
SectionType=GroupFooter;
SectionWidth=17850;

// Add the following line.
SectionHeight=2961;

OnPreSection=BEGIN
CurrReport.SHOWOUTPUT(VendTotalAmount <> 0);
END;
}
...

    קוד קיים 2

    ...
DataSetFieldName=Vend_WeightedExceededAmount }
{ 1170000000;TextBox;13800;0 ;450 ;423 ;Visible=No;
ForeColor=65535;
SourceExpr=[VendWeightedExceededAmount ];
DataSetFieldName=WeightedExceededAmount1 }
}
}
{ PROPERTIES
{
SectionType=Footer;
...

    קוד חלופי 2

    ...
DataSetFieldName=Vend_WeightedExceededAmount }
{ 1170000000;TextBox;13800;0 ;450 ;423 ;Visible=No;
ForeColor=65535;
SourceExpr=[VendWeightedExceededAmount ];
DataSetFieldName=WeightedExceededAmount1 }

// Add the following lines.
{ 1000000000;Label ;5250 ;2115 ;4950 ;423 ;ParentControl=1000000001;
DataSetFieldName=ABS_OpenTotalPaymentOutsideDueDate_Caption }
{ 1000000001;TextBox;10350;2115 ;1800 ;423 ;CaptionML=[ENU=Open Payments outside the legal limit (LCY);
ESP=Pagos fuera del l¡mite legal (DL):];
SourceExpr=ABS(OpenVendPaymentOutsideDueDate);
DataSetFieldName=OpenVend_PaymentOutsideDueDate }
{ 1000000004;TextBox;12600;2115 ;1800 ;423 ;SourceExpr=FormatRatio(OpenVendPaymentOutsideDueDate,VendTotalAmount);
DataSetFieldName=OpenVend_PaymentOutsideDueDateRatio }
// End of the lines.

}
}
{ PROPERTIES
{
SectionType=Footer;
...

    קוד קיים 3

    ...
}
{ PROPERTIES
{
SectionType=Footer;
SectionWidth=17850;

// Delete the following line.
SectionHeight=2115;

OnPreSection=BEGIN
CurrReport.SHOWOUTPUT(TotalAmount <> 0);
END;
}
...

    קוד חלופי 3

    ...
}
{ PROPERTIES
{
SectionType=Footer;
SectionWidth=17850;

// Add the following line.
SectionHeight=2538;

OnPreSection=BEGIN
CurrReport.SHOWOUTPUT(TotalAmount <> 0);
END;
}
...

    קוד קיים 4

    ...
DataSetFieldName=Total_PaymentOutsideDueDateRatio }
{ 1100057;TextBox ;10350;846 ;1800 ;423 ;CaptionML=[ENU=Weighted average term exceeded:;
ESP=Plazo medio ponderado superado:];
SourceExpr=TotalWeightedExceededAmount / ABS(TotalAmount);
DataSetFieldName=Total_WeightedExceededAmount }
}
}
}
}
{ PROPERTIES
...

    קוד חלופי 4

    ...
DataSetFieldName=Total_PaymentOutsideDueDateRatio }
{ 1100057;TextBox ;10350;846 ;1800 ;423 ;CaptionML=[ENU=Weighted average term exceeded:;
ESP=Plazo medio ponderado superado:];
SourceExpr=TotalWeightedExceededAmount / ABS(TotalAmount);
DataSetFieldName=Total_WeightedExceededAmount }

// Add the following lines.
{ 1000000002;Label ;5250 ;2115 ;4950 ;423 ;ParentControl=1000000003;
DataSetFieldName=ABS_OpenTotalPaymentOutsideDueDate__Control1100045Caption }
{ 1000000003;TextBox;10350;2115 ;1800 ;423 ;CaptionML=[ENU=Open Payments outside the legal limit (LCY);
ESP=Pagos fuera del l¡mite legal (DL):];
SourceExpr=ABS(TotalOpenPaymentOutsideDueDate);
DataSetFieldName=OpenTotal_PaymentOutsideDueDate }
{ 1000000005;TextBox;12600;2115 ;1800 ;423 ;SourceExpr=FormatRatio(TotalOpenPaymentOutsideDueDate,TotalAmount);
DataSetFieldName=OpenTotal_PaymentOutsideDueDateRatio }
// End of the lines.

}
}
}
}
{ PROPERTIES
...

  2. שנה את הקוד בפריט הנתונים מספר 3 בספק - עדכון מתאריך היעד תשלומים (10748) באופן הבא:
    קוד קיים 1

    ...
IF AppldVendLedgEntryTmp.NEXT = 0 THEN
CurrReport.BREAK;
IF AppldVendLedgEntryTmp."Posting Date" > AppldVendLedgEntryTmp."Initial Entry Due Date" THEN BEGIN
DaysOverdue := AppldVendLedgEntryTmp."Posting Date" - AppldVendLedgEntryTmp."Initial Entry Due Date";

// Delete the following lines.
VendPaymentOutsideDueDate += AppldVendLedgEntryTmp."Amount (LCY)";
TotalPaymentOutsideDueDate += AppldVendLedgEntryTmp."Amount (LCY)";
// End of the lines.

END ELSE BEGIN
DaysOverdue := 0;
VendPaymentWithinDueDate += AppldVendLedgEntryTmp."Amount (LCY)";
TotalPaymentWithinDueDate += AppldVendLedgEntryTmp."Amount (LCY)";
END;
...

    קוד חלופי 1

    ...
IF AppldVendLedgEntryTmp.NEXT = 0 THEN
CurrReport.BREAK;
IF AppldVendLedgEntryTmp."Posting Date" > AppldVendLedgEntryTmp."Initial Entry Due Date" THEN BEGIN
DaysOverdue := AppldVendLedgEntryTmp."Posting Date" - AppldVendLedgEntryTmp."Initial Entry Due Date";

// Add the following lines.
IF AppldVendLedgEntryTmp."Applied Vend. Ledger Entry No." = 0 THEN BEGIN 
OpenVendPaymentOutsideDueDate += AppldVendLedgEntryTmp."Amount (LCY)"; 
TotalOpenPaymentOutsideDueDate += AppldVendLedgEntryTmp."Amount (LCY)"; 
END ELSE BEGIN 
VendPaymentOutsideDueDate += AppldVendLedgEntryTmp."Amount (LCY)";
TotalPaymentOutsideDueDate += AppldVendLedgEntryTmp."Amount (LCY)";
END; 
// End of the lines.

END ELSE BEGIN
DaysOverdue := 0;
VendPaymentWithinDueDate += AppldVendLedgEntryTmp."Amount (LCY)";
TotalPaymentWithinDueDate += AppldVendLedgEntryTmp."Amount (LCY)";
END;
...

    קוד קיים 2

    ...
IF AppldVendLedgEntryTmp."Entry Type" = AppldVendLedgEntryTmp."Entry Type"::"Initial Entry" THEN
AppldVendLedgEntryTmp."Posting Date" := 0D;
VendDaysOverdue += DaysOverdue;
VendWeightedExceededAmount += DaysOverdue * ABS(AppldVendLedgEntryTmp."Amount (LCY)");

// Delete the following lines.
VendTotalAmount := VendPaymentOutsideDueDate + VendPaymentWithinDueDate;
TotalDaysOverdue += DaysOverdue;
TotalWeightedExceededAmount += DaysOverdue * ABS(AppldVendLedgEntryTmp."Amount (LCY)");
TotalAmount := TotalPaymentOutsideDueDate + TotalPaymentWithinDueDate;
// End of the lines.

END;
}
SECTIONS
{
...

    קוד חלופי 2

    ...
IF AppldVendLedgEntryTmp."Entry Type" = AppldVendLedgEntryTmp."Entry Type"::"Initial Entry" THEN
AppldVendLedgEntryTmp."Posting Date" := 0D;
VendDaysOverdue += DaysOverdue;
VendWeightedExceededAmount += DaysOverdue * ABS(AppldVendLedgEntryTmp."Amount (LCY)");

// Add the following lines.
VendTotalAmount := VendPaymentOutsideDueDate + VendPaymentWithinDueDate + OpenVendPaymentOutsideDueDate; 
TotalDaysOverdue += DaysOverdue;
TotalWeightedExceededAmount += DaysOverdue * ABS(AppldVendLedgEntryTmp."Amount (LCY)");
TotalAmount := TotalPaymentOutsideDueDate + TotalPaymentWithinDueDate+TotalOpenPaymentOutsideDueDate; 
// End of the lines.

END;
}
SECTIONS
{
...

  3. שנה את הקוד במשתנים כלליים בספק - עדכון מתאריך היעד תשלומים (10748) באופן הבא:
    קוד קיים

    ...
VendPaymentWithinDueDate@1100016 : Decimal;
VendDaysOverdue@1100017 : Decimal;
TotalDaysOverdue@1100018 : Decimal;
TotalWeightedExceededAmount@1100019 : Decimal;
ShowPayments@1100012 : 'Overdue,Legally Overdue,All';
LOCAL PROCEDURE FindAppliedPayments@1210013(VendLedgEntryNo@1210000 : Integer);
VAR
DtldVendLedgEntry@1210001 : Record 380;
InvVendLedgEntry@1100000 : Record 25;
...

    קוד חלופי

    ...
VendPaymentWithinDueDate@1100016 : Decimal;
VendDaysOverdue@1100017 : Decimal;
TotalDaysOverdue@1100018 : Decimal;
TotalWeightedExceededAmount@1100019 : Decimal;
ShowPayments@1100012 : 'Overdue,Legally Overdue,All';

// Add the following lines.
OpenVendPaymentOutsideDueDate@1000000000 : Decimal;
TotalOpenPaymentOutsideDueDate@1000000001 : Decimal;
// End of the lines.

LOCAL PROCEDURE FindAppliedPayments@1210013(VendLedgEntryNo@1210000 : Integer);
VAR
DtldVendLedgEntry@1210001 : Record 380;
InvVendLedgEntry@1100000 : Record 25;
...

  4. שנה את הקוד בפונקציה ClearVendAmountבדוח ספק - תאריך היעד תשלומים (10748) באופן הבא:
    קוד קיים

    ...
VendTotalAmount := 0;
VendDaysOverdue := 0;
VendWeightedExceededAmount := 0;
VendPaymentOutsideDueDate := 0;
VendPaymentWithinDueDate := 0;
END;
BEGIN
END.
}
...

    קוד חלופי

    ...
VendTotalAmount := 0;
VendDaysOverdue := 0;
VendWeightedExceededAmount := 0;
VendPaymentOutsideDueDate := 0;
VendPaymentWithinDueDate := 0;

// Add the following line.
OpenVendPaymentOutsideDueDate := 0;

END;
BEGIN
END.
}
...

            
          

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

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

  • הגירסה הספרדית של Microsoft Dynamics NAV 2009 R2
  • הגירסה הספרדית של Microsoft Dynamics NAV 2009 Service Pack 1
  • הגירסה הספרדית של Microsoft Dynamics NAV 5.0 Service Pack 1

מידע על הסרה

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

מצב

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

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