รายการตั๋วบัญชีผู้จัดจำหน่ายไม่สามารถแสดงรายละเอียดการชำระเงินของใบแจ้งหนี้ใน Microsoft Dynamics NAV 2009 รุ่นภาษาอิตาลี

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

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

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

ข้อมูลการติดตั้ง

Microsoft ให้ตัวอย่างการเขียนโปรแกรมไว้สำหรับประกอบการอธิบายเท่านั้นโดยไม่มีการรับประกันไม่ว่าจะโดยชัดแจ้งหรือโดยนัย กรณีนี้รวมถึงแต่มิได้จำกัดเพียงแค่การการรับประกันโดยนัยเกี่ยวกับการจำหน่ายเป็นสินค้าหรือความเหมาะสำหรับวัตถุประสงค์เฉพาะ บทความนี้ตั้งสมมติฐานว่าคุณมีความคุ้นเคยกับภาษาการเขียนโปรแกรมที่กำลังแสดงและคุ้นเคยกับเครื่องมือที่ใช้ใน การสร้างและแก้จุดบกพร่องของขั้นตอนการดำเนินการ วิศวกรฝ่ายสนับสนุนของ Microsoft สามารถช่วยอธิบายเกี่ยวกับหน้าที่การใช้งานของกระบวนการเฉพาะ อย่างไรก็ตาม จะไม่แก้ไขตัวอย่างเหล่านี้เพื่อเพิ่มฟังก์ชัน หรือสร้างขั้นตอนเพื่อตอบสนองความต้องการเฉพาะของคุณ

หมายเหตุ ก่อนที่คุณติดตั้งโปรแกรมแก้ไขด่วนนี้ โปรดตรวจสอบว่า ผู้ใช้ไคลเอนต์ของ Microsoft Dynamics NAV ทั้งหมดเข้าสู่ระบบออกจากระบบ ข้อมูลนี้รวมถึงบริการ Microsoft Dynamics NAV แอพพลิเคชันเซิร์ฟเวอร์ (NAS) คุณควรไคลเอ็นต์เฉพาะผู้ใช้ที่เข้าสู่ระบบเมื่อคุณใช้โปรแกรมแก้ไขด่วนนี้

เมื่อต้องการใช้โปรแกรมแก้ไขด่วนนี้ คุณต้องมีสิทธิ์การใช้งานสำหรับนักพัฒนา

เราขอแนะนำว่า บัญชีผู้ใช้ ในหน้าต่างล็อกอินของ Windows หรือ ในหน้าต่างล็อกอินฐานข้อมูลสามารถกำหนดรหัสการเข้าถึงข้อมูล "ขั้นสูง" ถ้าบัญชีผู้ใช้ไม่สามารถกำหนดรหัสการบทบาท "SUPER" คุณต้องตรวจสอบว่า บัญชีผู้ใช้มีสิทธิ์ต่อไปนี้:

• สิทธิ์การปรับเปลี่ยนสำหรับออปเจ็กต์ที่คุณจะสามารถเปลี่ยน

• สิทธิ์ในการดำเนินการ สำหรับออบเจ็กต์5210 รหัสวัตถุของระบบและระบบ 9015 ID ของวัตถุ
  
  วัตถุ

หมายเหตุ คุณไม่จำเป็นต้องมีสิทธิ์ไปยังร้านค้าข้อมูลยกเว้นว่าคุณจำเป็นต้องซ่อมแซมข้อมูล

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

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

เมื่อต้องการแก้ไขปัญหานี้ ให้ทำตามขั้นตอนเหล่านี้:

1. เปลี่ยนรหัสในรายงานรายการบิลของบัญชีผู้จัดจำหน่าย (12116) เป็นดังนี้:
   รหัสที่อยู่ 1

   ...DataItemTableView=SORTING(Vendor Ledger Entry No.,Entry Type,Posting Date)
                             WHERE(Entry Type=CONST(Application));
           OnPreDataItem=BEGIN
   
   // Delete the following line.
   VendLedgEntry1.COPYFILTER("Posting Date", "Detailed Vendor Ledg. Entry"."Posting Date");
   // End of the deleted line.
   
                         END;
   
           OnAfterGetRecord=BEGIN
   ...
   

   รหัสแทนที่ 1

   ...DataItemTableView=SORTING(Vendor Ledger Entry No.,Entry Type,Posting Date)
                             WHERE(Entry Type=CONST(Application));
           OnPreDataItem=BEGIN
   
   // Add the following line.
   FindAppliedDtldVendLedgEntry(VendLedgEntry1."Entry No.");
   // End of the added line.
   
                         END;
   
           OnAfterGetRecord=BEGIN
   ...
   

   รหัสที่มีอยู่ 2

   ... END;
   
           OnAfterGetRecord=BEGIN
   
   // Delete the following lines.
   VendLedgEntry3.GET("Applied Vend. Ledger Entry No.");
   VendLedgEntry3.CALCFIELDS("Original Amt. (LCY)");
   ClosedByAmountLCY := "Amount (LCY)";
   TotalForVendor += "Amount (LCY)";
    TotalClosedByAmntLCY += "Amount (LCY)";
   END;
   
   DataItemLink=Vendor Ledger Entry No.=FIELD(Entry No.);
   // End of the deleted lines.
   
         }
         SECTIONS
         {
   ...
   

   รหัสแทนที่ 2

   ... END;
   
           OnAfterGetRecord=BEGIN
   
   // Add the following lines.
   IF NOT TempDetailedVendorLedgEntryApplied.GET("Entry No.") THEN
   CurrReport.SKIP;
   VendLedgEntry3.GET("Vendor Ledger Entry No.");
   VendLedgEntry3.CALCFIELDS("Original Amt. (LCY)");
   AppliedDocumentTypeText := FORMAT(VendLedgEntry3."Document Type");
   ClosedByAmountLCY := "Amount (LCY)";
   TotalForVendor -= "Amount (LCY)";
   TotalClosedByAmntLCY -= "Amount (LCY)";
   END;
   
   // End of the added lines.
   
         }
         SECTIONS
         {
   ...
   

   รหัสที่มีอยู่ 3

   ...SectionWidth=27750;
               SectionHeight=846;
               OnPreSection=BEGIN
   IF (VendLedgEntry1."Document Type" = VendLedgEntry1."Document Type"::Payment)
   OR (VendLedgEntry1."Document Type" = VendLedgEntry1."Document Type"::" ") THEN
   CurrReport.SHOWOUTPUT(FALSE)
   ELSE
   CurrReport.SHOWOUTPUT(TRUE);
                              IF ("Unapplied by Entry No." <> 0) THEN
                                CurrReport.SHOWOUTPUT(FALSE);
                            END;
   ...
   

   รหัสแทนที่ 3

   ...SectionWidth=27750;
               SectionHeight=846;
               OnPreSection=BEGIN
   
   // Delete the following lines.
   IF (VendLedgEntry1."Document Type" = VendLedgEntry1."Document Type"::Payment)
   OR (VendLedgEntry1."Document Type" = VendLedgEntry1."Document Type"::" ") THEN
   CurrReport.SHOWOUTPUT(FALSE)
   ELSE
   CurrReport.SHOWOUTPUT(TRUE);
   // End of the deleted lines.
   
                              IF ("Unapplied by Entry No." <> 0) THEN
                                CurrReport.SHOWOUTPUT(FALSE);
                            END;
   ...
   

   รหัสที่มีอยู่ 4

   ... { 1130070;TextBox   ;19200;0    ;1800 ;423  ;SourceExpr=ClosedByAmountLCY;
                                                            DataSetFieldName=ClosedByAmountLCY_Control1130070 }
               { 1130071;TextBox   ;5550 ;0    ;1500 ;423  ;HorzAlign=Right;
   
   // Delete the following lines.
   SourceExpr="Document No.";
   DataSetFieldName=Detailed_Vendor_Ledg__Entry__Document_No__ }
   { 1130072;TextBox   ;1950 ;0    ;1350 ;423  ;SourceExpr="Document Type";
   // End of the deleted lines.
   
                                                            DataSetFieldName=Detailed_Vendor_Ledg__Entry__Document_Type_ }
               { 1130073;TextBox   ;0    ;0    ;1800 ;423  ;CaptionML=[ENU=PostingDate;
                                                                       ITA=Data di registrazione];
   ...
   

   รหัสแทนที่ 4

   ...{ 1130070;TextBox   ;19200;0    ;1800 ;423  ;SourceExpr=ClosedByAmountLCY;
                                                            DataSetFieldName=ClosedByAmountLCY_Control1130070 }
               { 1130071;TextBox   ;5550 ;0    ;1500 ;423  ;HorzAlign=Right;
   
   // Add the following lines.
   SourceExpr=VendLedgEntry3."Document No.";
   DataSetFieldName=Detailed_Vendor_Ledg__Entry__Document_No__ }
   { 1130072;TextBox   ;1950 ;0    ;1350 ;423  ;SourceExpr=AppliedDocumentTypeText;
   // End of the added lines.
   
                                                            DataSetFieldName=Detailed_Vendor_Ledg__Entry__Document_Type_ }
               { 1130073;TextBox   ;0    ;0    ;1800 ;423  ;CaptionML=[ENU=PostingDate;
                                                                       ITA=Data di registrazione];
   ...
   

   รหัสที่มีอยู่ 5

   ... DataSetFieldName=Detailed_Vendor_Ledg__Entry__Document_Type_ }
               { 1130073;TextBox   ;0    ;0    ;1800 ;423  ;CaptionML=[ENU=PostingDate;
                                                                       ITA=Data di registrazione];
   
   // Delete the following line.
   SourceExpr=FORMAT("Posting Date");
   // End of the deleted line.
   
                                                            DataSetFieldName=Detailed_Vendor_Ledg__Entry__Posting_Date_ }
               { 1130074;TextBox   ;7200 ;0    ;1650 ;423  ;SourceExpr=VendLedgEntry3."Document Occurrence";
                                                            DataSetFieldName=VendLedgEntry3__Document_Occurrence_ }
   ...
   

   รหัสแทนที่ 5

   ...DataSetFieldName=Detailed_Vendor_Ledg__Entry__Document_Type_ }
               { 1130073;TextBox   ;0    ;0    ;1800 ;423  ;CaptionML=[ENU=PostingDate;
                                                                       ITA=Data di registrazione];
   
   // Add the following line.
   SourceExpr=FORMAT(VendLedgEntry3."Posting Date");
   // End of the added line.
   
                                                            DataSetFieldName=Detailed_Vendor_Ledg__Entry__Posting_Date_ }
               { 1130074;TextBox   ;7200 ;0    ;1650 ;423  ;SourceExpr=VendLedgEntry3."Document Occurrence";
                                                            DataSetFieldName=VendLedgEntry3__Document_Occurrence_ }
   ...
   

   รหัสที่มีอยู่ 6

   ...ForeColor=65535;
                                                            SourceExpr="Unapplied by Entry No.";
                                                            DataSetFieldName=Detailed_Vendor_Ledg__Entry__Unapplied_by_Entry_No__ }
             }
              }
           { PROPERTIES
   ...
   

   รหัสแทน 6

   ... ForeColor=65535;
                                                            SourceExpr="Unapplied by Entry No.";
                                                            DataSetFieldName=Detailed_Vendor_Ledg__Entry__Unapplied_by_Entry_No__ }
   
   // Add the following lines.
   { 1130178;TextBox   ;21150;0    ;1800 ;423  ;Visible=No;
   SourceExpr="Vendor Ledger Entry No.";
   DataSetFieldName=Detailed_Vendor_Ledg__Entry_Vendor_Ledger_Entry_No_ }
   // End of the added lines.
   
             }
              }
           { PROPERTIES
   ...
   

2. เปลี่ยนแปลงรหัสนี้ในตัวแปรส่วนกลางในรายงานรายการบิลของบัญชีผู้จัดจำหน่าย (12116) เป็นดังนี้:
   รหัสที่อยู่ 1

   ...VAR
         Text000@1130000 : TextConst 'ENU=Please specify the Ending Date;ITA=Specificare Data fine';
         VendorBillLine@1130001 : Record 12182;
         EndingDate@1130002 : Date;
         OnlyOpened@1130003 : Boolean;
         RemainingAmountLCY@1130004 : Decimal;
   ...
   

   รหัสแทนที่ 1

   ...VAR
         Text000@1130000 : TextConst 'ENU=Please specify the Ending Date;ITA=Specificare Data fine';
         VendorBillLine@1130001 : Record 12182;
   
   // Add the following line.
   TempDetailedVendorLedgEntryApplied@1130013 : TEMPORARY Record 380;
   // End of the added line.
   
         EndingDate@1130002 : Date;
         OnlyOpened@1130003 : Boolean;
         RemainingAmountLCY@1130004 : Decimal;
   ...
   

   รหัสที่มีอยู่ 2

   ...TotalVendorBillAmnt@1130010 : Decimal;
         VendLedgEntry3@1130011 : Record 25;
         VendorLedgerEmtryTypeINT@1102601000 : Integer;
   
       BEGIN
       END.
   ...
   

   รหัสแทนที่ 2

   ...TotalVendorBillAmnt@1130010 : Decimal;
         VendLedgEntry3@1130011 : Record 25;
         VendorLedgerEmtryTypeINT@1102601000 : Integer;
   
   // Add the following lines.
   AppliedDocumentTypeText@1170000000 : Text[30];
   
   LOCAL PROCEDURE FindAppliedDtldVendLedgEntry@1130007(VendorLedgerEntryNo@1130000 : Integer);
   VAR
   DetailedVendorLedgEntry@1130001 : Record 380;
   DetailedVendorLedgEntryApplied@1130003 : Record 380;
   BEGIN
   TempDetailedVendorLedgEntryApplied.RESET;
   TempDetailedVendorLedgEntryApplied.DELETEALL;
   
   DetailedVendorLedgEntry.SETRANGE("Vendor Ledger Entry No.",VendorLedgerEntryNo);
   DetailedVendorLedgEntry.SETRANGE("Entry Type",DetailedVendorLedgEntry."Entry Type"::Application);
   DetailedVendorLedgEntry.SETRANGE(Unapplied,FALSE);
   
   DetailedVendorLedgEntryApplied.SETRANGE(
   "Entry Type",DetailedVendorLedgEntryApplied."Entry Type"::Application);
   
   IF DetailedVendorLedgEntry.FINDSET THEN
   REPEAT
   DetailedVendorLedgEntryApplied.SETRANGE(
   "Applied Vend. Ledger Entry No.",DetailedVendorLedgEntry."Applied Vend. Ledger Entry No.");
   DetailedVendorLedgEntryApplied.SETFILTER(
   "Vendor Ledger Entry No.",'<>%1',VendorLedgerEntryNo);
   DetailedVendorLedgEntryApplied.SETRANGE(
   "Vendor No.",DetailedVendorLedgEntry."Vendor No.");
   DetailedVendorLedgEntryApplied.SETRANGE(
   "Transaction No.",DetailedVendorLedgEntry."Transaction No.");
   IF DetailedVendorLedgEntryApplied.FINDSET THEN
   REPEAT
   TempDetailedVendorLedgEntryApplied := DetailedVendorLedgEntryApplied;
   IF TempDetailedVendorLedgEntryApplied.INSERT THEN;
   UNTIL DetailedVendorLedgEntryApplied.NEXT = 0;
   UNTIL DetailedVendorLedgEntry.NEXT = 0;
   END;
   // End of the added lines.
   
       BEGIN
       END.
   ...
   

3. เปลี่ยนรหัสในรายงานรายการบิลของบัญชีผู้จัดจำหน่าย (12116) เป็นดังนี้:
   รหัสที่มีอยู่

   ...</TableCell>
                     </TableCells>
                     <Visibility>
   
   // Delete the following line.
   <Hidden>=IIF((Count(Fields!Detailed_Vendor_Ledg__Entry_Vendor_Ledger_Entry_No_.Value)=Rownumber("table1_Group3")),
   // End of the deleted line.
   
           FALSE,TRUE)</Hidden>
                     </Visibility>
                   </TableRow>
   ...
   

   รหัสแทน

   ... </TableCell>
                     </TableCells>
                     <Visibility>
   
   // Add the following line.
   <Hidden>=IIF((Count(Fields!Detailed_Vendor_Ledg__Entry_Entry_No_.Value)=Rownumber("table1_Group3")),
   // End of the added line.
   
           FALSE,TRUE)</Hidden>
                     </Visibility>
                   </TableRow>
   ...
   
   

ข้อกำหนดเบื้องต้น

คุณต้องมีหนึ่งผลิตภัณฑ์ต่อไปนี้ติดตั้งอยู่เพื่อใช้โปรแกรมแก้ไขด่วนนี้:

• Microsoft Dynamics NAV 2009 R2 รุ่นภาษาอิตาลี

• SP1 2009 นำทางของ Dynamics Microsoft รุ่นภาษาอิตาลี

ข้อมูลการเอาออก

คุณไม่สามารถเอาโปรแกรมแก้ไขด่วนนี้