รายงานรายการบิลของลูกค้าแสดงใบลดหนี้ใน Microsoft Dynamics NAV 2009 รุ่นภาษาอิตาลี

บทความนี้นำไปใช้กับ Microsoft Dynamics NAV สำหรับระบบภาษาอิตาลี (it)

ปัญหานี้เกิดขึ้นถ้าคุณลงรายการบัญชี และใช้การคืนเงินกับใบลดหนี้ของลูกค้า ปัญหานี้เกิดขึ้นในผลิตภัณฑ์ต่อไปนี้:

Microsoft Dynamics NAV 2009 R2 รุ่นภาษาอิตาลี
รุ่นภาษาอิตาลีของ Microsoft Dynamics NAV 2009 Service Pack 1

การแก้ปัญหา

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

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

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

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

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

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

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

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

สิทธิ์การปรับเปลี่ยนสำหรับออปเจ็กต์ที่คุณจะสามารถเปลี่ยน
สิทธิ์ Execute สำหรับออบเจ็กต์5210 รหัสวัตถุของระบบและ สำหรับออบเจ็กต์ระบบ 9015 ID ของวัตถุ

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

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

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

รหัสที่อยู่ 1

...        OnAfterGetRecord=BEGIN
                           CALCFIELDS("Amount (LCY)","Remaining Amt. (LCY)");

// Delete the following line.
                           IF ((OnlyOpened) OR ("Document Type" IN ["Document Type"::Payment,"Document Type"::"Credit Memo","Document Type"::" "])) AND

                             ("Remaining Amt. (LCY)" = 0)
                           THEN
                             CurrReport.SKIP;
...

รหัสแทนที่ 1

...        OnAfterGetRecord=BEGIN
                           CALCFIELDS("Amount (LCY)","Remaining Amt. (LCY)");

// Add the following line.
                           IF ((OnlyOpened) OR ("Document Type" IN ["Document Type"::Payment,"Document Type"::Refund,"Document Type"::" "])) AND

                             ("Remaining Amt. (LCY)" = 0)
                           THEN
                             CurrReport.SKIP;
...

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

...                           RemainingAmountLCY := 0;
                           ExposureAmount := 0;

// Delete the following lines.
                            IF ("Document Type" = "Document Type"::Invoice) OR
                               ("Document Type" = "Document Type"::"Finance Charge Memo") OR
                               ("Document Type" = "Document Type"::Reminder)

                           THEN BEGIN
                             IF ("Bank Receipt Issued") AND
                                ("Due Date" > ExposureDate)
...

รหัสแทนที่ 2

...                           RemainingAmountLCY := 0;
                           ExposureAmount := 0;

// Add the following lines.
                            IF "Document Type" IN
                               ["Document Type"::Invoice,
                                "Document Type"::"Credit Memo",
                                "Document Type"::"Finance Charge Memo",
                                "Document Type"::Reminder]
// End of the lines.

                           THEN BEGIN
                             IF ("Bank Receipt Issued") AND
                                ("Due Date" > ExposureDate)
...

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

...                      END;

        OnAfterGetRecord=BEGIN
                           // IT0015.begin
                           //VSTF275923 begin
                           // VSTF305887.begin
...

รหัสแทนที่ 3

...        OnAfterGetRecord=BEGIN

// Add the following lines.
                            IF ("Entry No." = 0) OR ("Unapplied by Entry No." <> 0) OR
                               ("Document Type" IN
                               ["Document Type"::Payment,"Document Type"::Refund,"Document Type"::Dishonored,"Document Type"::" "])
                            THEN
                              ShowDetailedCustLedgerEntry := TRUE
                            ELSE
                              ShowDetailedCustLedgerEntry := FALSE;
// End of the lines.

                           // IT0015.begin
                           //VSTF275923 begin
                           // VSTF305887.begin
...

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

...            SectionWidth=24450;
            SectionHeight=846;
            OnPreSection=BEGIN

// Delete the following lines.
                            // IT0009.begin
                            // IT0012.begin
                            IF (CustLedgEntry1."Document Type" = CustLedgEntry1."Document Type"::Payment) OR
                               (CustLedgEntry1."Document Type" = CustLedgEntry1."Document Type"::"Credit Memo") OR
                               //VSTF275923 begin
                               (CustLedgEntry1."Document Type" = CustLedgEntry1."Document Type"::Dishonored) OR
                               //VSTF275923 end
                               (CustLedgEntry1."Document Type" = CustLedgEntry1."Document Type"::" ") OR
                               ("Unapplied by Entry No." <> 0)
                            THEN
                            // IT0012.end
                              CurrReport.SHOWOUTPUT(FALSE)
                            ELSE
                              CurrReport.SHOWOUTPUT(TRUE);
                            // IT0009.end
                            // IT0010.begin
                            //IF ("Unapplied by Entry No." <> 0) THEN
                            //  CurrReport.SHOWOUTPUT(FALSE);
                            // IT0010.end
// End of the lines.

                         END;

          }
...

รหัสแทนที่ 4

...            SectionWidth=24450;
            SectionHeight=846;
            OnPreSection=BEGIN

// Add the following line.
                           CurrReport.SHOWOUTPUT(ShowDetailedCustLedgerEntry)

                         END;

          }
...

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

...                                                         ForeColor=65535;
                                                         SourceExpr="Document Type" = "Document Type"::Dishonored;
                                                         DataSetFieldName=Document_Type_____Document_Type___Dishonored }
          }
           }
        { PROPERTIES
...

รหัสแทนที่ 5

...                                                         ForeColor=65535;
                                                         SourceExpr="Document Type" = "Document Type"::Dishonored;
                                                         DataSetFieldName=Document_Type_____Document_Type___Dishonored }

// add the following lines.
             { 1130123;TextBox   ;24000;0    ;150  ;423  ;Visible=No;
                                                          SourceExpr=ShowDetailedCustLedgerEntry;
                                                          DataSetFieldName=ShowDetailedCustLedgerEntry }
// End of the lines.

          }
           }
        { PROPERTIES
...

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

...      NULL@1130013 : DateFormula;
      CustLedgEntry3@1130130 : Record 21;
      PrintCustLedgEntry2@1130014 : Boolean;

    BEGIN
    {
...

รหัสแทน 6

...      NULL@1130013 : DateFormula;
      CustLedgEntry3@1130130 : Record 21;
      PrintCustLedgEntry2@1130014 : Boolean;

// Add the following line.
      ShowDetailedCustLedgerEntry@1130015 : Boolean INDATASET;


    BEGIN
    {
...

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

...                  </TableRows>
                </Header>
                <Visibility>

// Delete the following line.
                  <Hidden>=IIF(Fields!Detailed_Cust__Ledg__Entry_Cust__Ledger_Entry_No_.Value = 0,true,false)</Hidden>

                </Visibility>
              </TableGroup>
            </TableGroups>
...

รหัสแทนที่ 7

...                  </TableRows>
                </Header>
                <Visibility>

// Add the following line.
                  <Hidden>=IIF(Fields!ShowDetailedCustLedgerEntry.Value,TRUE,FALSE)</Hidden>

                </Visibility>
              </TableGroup>
            </TableGroups>
...

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

...        <Field Name="Detailed_Cust__Ledg__Entry_Cust__Ledger_Entry_No_">
          <DataField>Detailed_Cust__Ledg__Entry_Cust__Ledger_Entry_No_</DataField>
        </Field>
      </Fields>
      <Query>
        <CommandText />
...

รหัสแทนที่ 8

...        <Field Name="Detailed_Cust__Ledg__Entry_Cust__Ledger_Entry_No_">
          <DataField>Detailed_Cust__Ledg__Entry_Cust__Ledger_Entry_No_</DataField>
        </Field>

// Add the following lines.
         <Field Name="ShowDetailedCustLedgerEntry">
           <DataField>ShowDetailedCustomerLedgerEntry</DataField>
         </Field>
// end of the lines.

      </Fields>
      <Query>
        <CommandText />
...

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

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

Microsoft Dynamics NAV 2009 R2 รุ่นภาษาอิตาลี
รุ่นภาษาอิตาลีของ Microsoft Dynamics NAV 2009 Service Pack 1

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

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

สถานะ

Microsoft ยืนยันว่านี่เป็นปัญหาในผลิตภัณฑ์ของ Microsoft ซึ่งแสดงไว้ในส่วน "นำไปใช้กับ"

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