ข้อความแสดงข้อผิดพลาด "เอกสารไม่เป็นยังไม่ได้ถูกนำไปใช้เป็นเครดิตภาษีการบริมีการใช้อยู่แล้ว" เมื่อคุณเรียกใช้ฟังก์ชันยกเลิกรายการบนใบแจ้งหนี้การซื้อที่ลงรายการบัญชีสำหรับผู้จัดจำหน่าย GTA ที่ระบุไว้ใน Microsoft Dynamics NAV 2009 รุ่นอินเดีย

ข้อมูลโปรแกรมแก้ไขด่วน

โปรแกรมแก้ไขด่วนจะพร้อมใช้งานได้ในขณะนี้จาก Microsoft อย่างไรก็ตาม มีเป้าหมายเพียงเพื่อการแก้ไขปัญหาที่อธิบายไว้ในบทความนี้ นำวิธีนี้ไปใช้กับระบบที่ประสบกับปัญหาที่เฉพาะเจาะจงเท่านั้น โปรแกรมแก้ไขด่วนนี้อาจได้รับการทดสอบเพิ่มเติม ดังนั้น ถ้าคุณจะไม่รุนแรงได้รับผลกระทบจากปัญหานี้ เราขอแนะนำให้ คุณรอ service pack ถัดไปของ Microsoft Dynamics NAV 2009 หรือเวอร์ชันถัดไป Microsoft Dynamics NAV ที่ประกอบด้วยโปรแกรมแก้ไขด่วนนี้

หมายเหตุ ในกรณีพิเศษ ค่าธรรมเนียมค่าใช้จ่ายสำหรับการสนับสนุนโทรศัพท์อาจถูกยกเลิกถ้า Technical Support Professional สำหรับ Microsoft Dynamics และผลิตภัณฑ์ที่เกี่ยวข้องตรวจพบว่าการปรับปรุงเฉพาะจะแก้ปัญหาของคุณ ค่าใช้จ่ายในการสนับสนุนตามปกติจะใช้กับคำถามและปัญหาในการสนับสนุนเพิ่มเติมซึ่งไม่สอดคล้องตามเกณฑ์สำหรับโปรแกรมปรับปรุงเฉพาะที่เกี่ยวข้อง

การเปลี่ยนแปลงรหัส

หมายเหตุ เสมอทดสอบรหัสแก้ไขในสภาพแวดล้อมการควบคุมก่อนที่คุณนำไปใช้แก้ไขปัญหากับคอมพิวเตอร์ของคุณผลิต
เมื่อต้องการแก้ไขปัญหานี้ ให้ทำตามขั้นตอนเหล่านี้:

1. เพิ่มตัวแปรส่วนกลางต่อไปนี้ในการทั่วไปงานสมุดรายวัน-ลงรายการบัญชีบรรทัดโค้ดยูนิต (12):

   • TempServiceTaxEntry3@1500076: ระเบียนชั่วคราว 16473

2. เพิ่มตัวแปรท้องถิ่นดังต่อไปนี้ในฟังก์ชันUnApplyVendSTEntriesในแบบทั่วไปงานสมุดรายวัน-ลงรายการบัญชีบรรทัดโค้ดยูนิต (12):

   • STEntryDetail2@1500000: เรกคอร์ 16474

3. เปลี่ยนแปลงรหัสนี้ในฟังก์ชันUnApplyVendSTEntriesในแบบทั่วไปงานสมุดรายวัน-ลงรายการบัญชีบรรทัดโค้ดยูนิต (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ในแบบทั่วไปงานสมุดรายวัน-ลงรายการบัญชีบรรทัดโค้ดยูนิต (12):

   • VAR ServiceTaxEntry@1002: เรกคอร์ 16473

5. เปลี่ยนแปลงรหัสนี้ในฟังก์ชันFillSvcTaxApplication4ในแบบทั่วไปงานสมุดรายวัน-ลงรายการบัญชีบรรทัดโค้ดยูนิต (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ในโค้ดยูนิตการจัดการภาษีบริการ (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;
   ...