הודעת השגיאה "לא ניתן לבטל את ההחלה של מסמכים כי זיכוי מס שירות כבר נוצל" בעת הפעלת הפונקציה Unapply Entries בחשבונית רכישה שפורסמו עבור ספקי GTA שצוינו בגירסה ההודית של Microsoft Dynamics NAV 2009

חל על
Dynamics NAV 2009

מאמר זה חל על Microsoft Dynamics NAV עבור אזור השפה ההודית (ב).

סימפטומים

בעת הפעלת הפונקציה Unapply Entries בחשבונית רכישה שפורסם בעל מס שירות עבור ספקי GTA שצוינו בגירסה ההודית של Microsoft Dynamics NAV 2009 R2 ו- Microsoft Dynamics NAV 2009 Service Pack 1 (SP1), תקבל את הודעת השגיאה הבאה:

הערה

לא ניתן לבטל את ההחלה של מסמכים, כי כבר נוצל זיכוי מס שירות.

פתרון

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

תיקון חם נתמך זמין כעת מ- 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. הוסף את המשתנה הכללי הבא ב- Gen. Jnl.-Post Line codeunit (12):

    • TempServiceTaxEntry3@1500076 : רשומה זמנית 16473
  2. הוסף את המשתנה המקומי הבא בפונקציה UnApplyVendSTEntries בפונקציה Gen. Jnl.-Post Line codeunit (12):

    • STEntryDetail2@1500000 : רשומה 16474
  3. שנה את הקוד בפונקציה UnApplyVendSTEntries בפונקציה Gen. Jnl.-Post Line codeunit (12) באופן הבא:
    קוד קיים 1

    ...
            STaxApplBuffer[1].DELETEALL;
            WITH DtldVendLedgEntry2 DO BEGIN
    ...
    
    

    קוד חלופי 1

    ...
            STaxApplBuffer[1].DELETEALL;
    
    // Add the following line.
             TempServiceTaxEntry3.DELETEALL; 
    // End of the line.
    
            WITH DtldVendLedgEntry2 DO BEGIN
    ...
    
    

    קוד קיים 2

    ...
                  ServiceTaxMgt.UnApplyVendPmtEntries(STEntryDetail,NextTransactionNo);
    
    // Delete the following line.
                 Sign := -1;
                 FillSvcTaxApplication4(STEntryDetail,Sign); 
                 Sign := 1; 
                 FillSvcTaxApplication4(STEntryDetail,Sign); 
                 ServiceTaxEntry.GET(STEntryDetail."Service Tax Entry No."); 
                  IF ServiceTaxEntry."Serv. Tax on Advance Payment" THEN BEGIN 
    // End of the line.
    ...
    
    

    קוד חלופי 2

    ...
                  ServiceTaxMgt.UnApplyVendPmtEntries(STEntryDetail,NextTransactionNo);
    
    // Add the following lines.
                 ServiceTaxEntry.GET(STEntryDetail."Service Tax Entry No."); 
                 ServiceTaxSetup.RESET; 
                 ServiceTaxSetup.SETRANGE(Code,STEntryDetail."Service Tax Group Code"); 
                 ServiceTaxSetup.SETRANGE("From Date",0D,STEntryDetail."Posting Date"); 
                 TempServiceTaxEntry3.TRANSFERFIELDS(ServiceTaxEntry); 
                 IF NOT STEntryDetail.GTA THEN BEGIN 
                   TempServiceTaxEntry3.INSERT; 
                   Sign := -1; 
                 END ELSE BEGIN 
                   TempServiceTaxEntry3."G/L Account" := STEntryDetail."GL Account"; 
                   TempServiceTaxEntry3.INSERT; 
                   Sign := 1; 
                 END; 
    
                 FillSvcTaxApplication4(STEntryDetail,Sign); 
    
                 STEntryDetail2 := STEntryDetail; 
                 IF NOT STEntryDetail.GTA THEN 
                   Sign := 1 
                 ELSE BEGIN 
                   IF ServiceTaxSetup.FINDLAST THEN 
                     STEntryDetail2."GL Account" := ServiceTaxSetup."Payables Account (Interim)"; 
                   Sign := -1; 
                 END; 
    
                 FillSvcTaxApplication4(STEntryDetail2,Sign);
                  IF ServiceTaxEntry."Serv. Tax on Advance Payment" THEN BEGIN 
    // End of the lines.
    ...
    
    

    קוד קיים 3

    ...
                      ServiceTaxEntry."From Excise" := STEntryDetail."From Excise";
    
    // Delete the following lines.
                     ServiceTaxSetup.RESET; 
                     ServiceTaxSetup.SETRANGE(Code,STEntryDetail."Service Tax Group Code"); 
                     ServiceTaxSetup.SETRANGE("From Date",0D,STEntryDetail."Posting Date");
    // End of the lines.
    
                      IF ServiceTaxSetup.FINDLAST THEN BEGIN
    ...
    
    

    קוד חלופי 3

    ...
                      ServiceTaxEntry."From Excise" := STEntryDetail."From Excise";
                      IF ServiceTaxSetup.FINDLAST THEN BEGIN
    ...
    
    
  4. מחק את המשתנה המקומי הבא בפונקציה FillSvcTaxApplication4 ב- Gen. Jnl.-Post Line codeunit (12):

    • VAR ServiceTaxEntry@1002 : רשומה 16473
  5. שנה את הקוד בפונקציה FillSvcTaxApplication4 בפונקציה Gen. Jnl.-Post Line codeunit (12) באופן הבא:
    קוד קיים

    ...
              IF Sign < 0 THEN
    
    // Delete the following lines.
               STaxApplBuffer[1]."G/L Account" := "GL Account" 
             ELSE BEGIN 
               ServiceTaxEntry.GET("Service Tax Entry No."); 
               STaxApplBuffer[1]."G/L Account" := ServiceTaxEntry."G/L Account"; 
             END;
    // End of the lines.
    
              STaxApplBuffer[1]."Amount to Apply (LCY)" := Sign * ("Service Tax Amount" + "Service Tax eCess Amount" +
    ...
    
    

    קוד חלופי

    ...
    IF Sign < 0 THEN
    
             // Add the following lines.
               STaxApplBuffer[1]."G/L Account" := "GL Account" 
             ELSE 
               STaxApplBuffer[1]."G/L Account" := TempServiceTaxEntry3."G/L Account"; 
             // End of the lines.
    
              STaxApplBuffer[1]."Amount to Apply (LCY)" := Sign * ("Service Tax Amount" + "Service Tax eCess Amount" +
    ...
    
    
  6. שנה את הקוד בפונקציה UnApplyVendPmtEntries ב- codeunit של ניהול מס שירות (16471) באופן הבא:
    קוד קיים 1

    ...
            WITH STEntryDetail DO BEGIN
    
    // Delete the following lines.
             IF ("Service Tax Amount" <> "Remaining Credit") OR ("Service Tax eCess Amount" <> "Remaining Credit (eCess)") OR 
               ("Service Tax SHE Cess Amount" <> "Remaining Credit (SHECess)") 
             THEN 
               ERROR(Text16535,"Document No."); 
    // End of the lines.
    
              STEntryDetail2.RESET;
    ...
    
    

    קוד חלופי 1

    ...
            WITH STEntryDetail DO BEGIN
    
             // Add the following lines.
             IF GTA THEN BEGIN 
               IF ("Service Tax Amount" <> "GTA Remaining Credit") OR ("Service Tax eCess Amount" <> "GTA Remaining Credit (eCess)") OR 
                 ("Service Tax SHE Cess Amount" <> "GTA Remaining Credit (SHECess)") 
               THEN 
                 ERROR(Text16535,"Document No."); 
             END ELSE BEGIN 
               IF ("Service Tax Amount" <> "Remaining Credit") OR ("Service Tax eCess Amount" <> "Remaining Credit (eCess)") OR 
                 ("Service Tax SHE Cess Amount" <> "Remaining Credit (SHECess)") 
               THEN 
                 ERROR(Text16535,"Document No."); 
             END; 
             // End of the lines.
    
              STEntryDetail2.RESET;
    ...
    
    

    קוד קיים 2

    ...
              STEntryDetail2."Remaining S.T. Base Amount" := - STEntryDetail2."Remaining S.T. Base Amount";
              STEntryDetail2.INSERT;
    ...
    
    

    קוד חלופי 2

    ...
              STEntryDetail2."Remaining S.T. Base Amount" := - STEntryDetail2."Remaining S.T. Base Amount";
    
             // Add the following lines.
             STEntryDetail2."GTA Remaining Credit" := - STEntryDetail2."GTA Remaining Credit"; 
             STEntryDetail2."GTA Remaining Credit (eCess)" := - STEntryDetail2."GTA Remaining Credit (eCess)"; 
             STEntryDetail2."GTA Remaining Credit (SHECess)" := - STEntryDetail2."GTA Remaining Credit (SHECess)"; 
             // End of the lines.
    
              STEntryDetail2.INSERT;
    ...
    
    

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

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

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

מידע על הסרה

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

מצב

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

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