Gesamtanzahl" der Rechnung oder Gutschrift"ist ungültig in der Schweizer Version von Microsoft Dynamics NAV 2009

Vorlage: CPR - Navision Fiacx Vorlage

Fehler #: 211717 (Content Maintenance)

Deutsch (Schweiz) Verwendung den Bericht von 11584 in der Schweizer Version von Microsoft Dynamics NAV 2009 "Gesamtanzahl 11587 starten der Rechnung oder Gutschrift"wird immer als Null angezeigt. Dieses Problem tritt in den folgenden Produkten:

  • Die Schweizer Version von Microsoft Dynamics NAV 2009 R2

  • Die Schweizer Version von Microsoft Dynamics NAV 2009 SP1

Problemlösung

Hotfix-Informationen

Ein unterstützter Hotfix ist inzwischen von Microsoft erhältlich. Allerdings ist es lediglich zur Behebung dieses Problems. Wenden Sie es nur auf Systeme an, bei denen dieses spezielle Problem auftritt. Dieser Hotfix wird möglicherweise noch getestet. Wenn Ihr System durch dieses Problem nicht schwerwiegend beeinträchtigt ist, empfehlen wir, dass Sie warten auf das nächste Servicepack für Microsoft Dynamics NAV 2009 oder die nächste Microsoft Dynamics NAV-Version, die diesen Hotfix enthält.

Hinweis In besonderen Fällen bestimmt Gebühren fallen normalerweise Support aufrufen Wenn Experte Support für Microsoft Dynamics und zugehörige Produkte storniert werden können, dass ein bestimmtes Update Ihr Problem behebt. Die normalen Supportkosten gilt für zusätzliche Supportfragen und Probleme, die nicht für das betreffende Update qualifizieren.

Dieser Hotfix nicht öffentlich zum Download (d. h. eine öffentliche URL für diesen Hotfix nicht in diesem Artikel bereitgestellt wird) gebucht, Verteilung erfordert technische Eskalation Teammitglied oder Genehmigung eines Managers und Folgendes gilt:

  • Um den Hotfix zu erhalten, müssen Kunden den Fehler, der im Abschnitt "Symptome" genannt.

  • Sie müssen die Kunden aufzeichnen zu senden und sie mit dem nächsten Servicepack angeben, wenn es verfügbar wird (wenn ein Servicepack veröffentlicht wird).

Dieser Hotfix wird in einer spanischen Version von Microsoft Dynamics NAV 2013 oder Microsoft Dynamics NAV 2013 R2 Service Pack enthalten sein.

Informationen zur Installation

Microsoft bietet Programmierbeispiele lediglich zur Veranschaulichung, ohne ausdrückliche oder konkludente Gewährleistung. Dies beinhaltet, ist jedoch nicht beschränkt auf, konkludente Gewährleistungen der Tauglichkeit oder Eignung für einen bestimmten Zweck. Dieser Artikel setzt voraus, dass Sie mit der von Beispielen verwendeten Programmiersprache und den Tools, die zum Erstellen und Debuggen von Prozeduren verwendet werden, vertraut sind. Microsoft-Supporttechniker helfen der Erläuterung der Funktionalität bestimmter Prozeduren. Allerdings werden sie diese Beispiele nicht ändern, um zusätzliche Funktionalität bereitzustellen oder Prozeduren erstellen, die Ihren spezifischen Bedürfnisse erfüllen.

Hinweis Bevor Sie diesen Hotfix installieren, stellen Sie sicher, dass alle Microsoft Dynamics NAV-Clientbenutzer vom System abgemeldet werden. Hierzu gehören Dienste Microsoft Dynamics NAV Application Server (NAS). Sie sollte nur-Client-Benutzers, der angemeldet ist, wenn Sie diesen Hotfix installieren.

Muss eine Entwicklerlizenz verfügen, um diesen Hotfix installieren können.

Es wird empfohlen, das Benutzerkonto im Fenster Windows-Benutzernamen oder im Fenster Datenbank-Anmeldenamen "SUPER" Rollen-ID zugewiesen werden Wenn das Benutzerkonto die Rollen-ID "SUPER" nicht zugeordnet werden kann, müssen Sie sicherstellen, dass das Benutzerkonto die folgenden Berechtigungen verfügt:

  • Änderungsberechtigung für das Objekt, das Sie ändern.

  • Ausführungsberechtigung für System Object ID 5210 und System Object ID 9015

    Objekt.

Hinweis Sie müssen keine Rechte für die Datenspeicher haben, es sei denn, Sie müssen eine Datenreparatur durchführen.

Ändern von Code

Hinweis testen Code-Updates immer in einer kontrollierten Umgebung, bevor Sie Updates auf Ihrem Computer anwenden. Importieren Sie bevor Sie die Änderung anwenden alle SEPA-Updates.

Gehen Sie folgendermaßen vor, um dieses Problem zu beheben:

  1. Ändern Sie den Code in den Abschnitten in der Tabelle Debitorenposten SR Daten Element Nummer 1. Rechnungsliste Std Bericht (11584):
    Vorhandener code

    ...ForeColor=65535;
    SourceExpr="Sales (LCY)";
    DataSetFieldName=Cust__Ledger_Entry__Sales__LCY__ }
    { 1150005;TextBox ;17250;0 ;150 ;423 ;Visible=No;
    ForeColor=65535;

    // Delete the following lines.
    SourceExpr="Document Type";
    DataSetFieldName=Cust__Ledger_Entry__Document_Type_ }
    // End of the deleted lines.

    }
    }
    { PROPERTIES
    {
    SectionType=Body;
    ...

    Neuer code

    ...   ForeColor=65535;
    SourceExpr="Sales (LCY)";
    DataSetFieldName=Cust__Ledger_Entry__Sales__LCY__ }
    { 1150005;TextBox ;17250;0 ;150 ;423 ;Visible=No;
    ForeColor=65535;

    // Add the following lines.
    SourceExpr=[ ("Document Type" = "Document Type"::Invoice)];
    DataSetFieldName=Cust__Ledger_Entry__Document_Type_ }
    { 1150010;TextBox ;17100;0 ;150 ;423 ;Visible=No;
    SourceExpr=("Document Type" = "Document Type"::"Credit Memo");
    DataSetFieldName=Cust__Ledger_Entry__Document_Type_1 }
    // End of the added lines.

    }
    }
    { PROPERTIES
    {
    SectionType=Body;
    ...



  2. Ändern Sie den Code in der Funktion CalcExrate SR Cust. Rechnungsliste Std Bericht (11584):
    Vorhandener Code 1

    ...<PaddingLeft>2pt</PaddingLeft>
    <PaddingRight>2pt</PaddingRight>
    </Style>
    <Value>=iif(True,
    CStr(Code.CalcNoOfInvoices(Fields!Cust__Ledger_Entry__Document_Type_.Value))+Chr(177)

    // Delete the following line.
    +CStr(Code.CalcNoOfCredMemos(Fields!Cust__Ledger_Entry__Document_Type_.Value))+Chr(177)
    // End of the deleted line.

    +CStr(Code.CalcProfit(Fields!Cust__Ledger_Entry__Profit__LCY__.Value))+chr(177)
    +CStr(Code.CalcFooterProfitPct(Fields!Cust__Ledger_Entry__Profit__LCY__.Value,Fields!Cust__Ledger_Entry__Sales__LCY__.Value))+chr(177)
    +CStr(Code.CalcAmountLCY(Fields!Cust__Ledger_Entry__Amount__LCY__.Value)),"")</Value>
    </Textbox>
    </ReportItems>
    ...

    Neuer Code 1

    ...<PaddingLeft>2pt</PaddingLeft>
    <PaddingRight>2pt</PaddingRight>
    </Style>
    <Value>=iif(True,
    CStr(Code.CalcNoOfInvoices(Fields!Cust__Ledger_Entry__Document_Type_.Value))+Chr(177)

    // Add the following line.
    +CStr(Code.CalcNoOfCredMemos(Fields!Cust__Ledger_Entry__Document_Type_1.Value))+Chr(177)
    // End of the added line.

    +CStr(Code.CalcProfit(Fields!Cust__Ledger_Entry__Profit__LCY__.Value))+chr(177)
    +CStr(Code.CalcFooterProfitPct(Fields!Cust__Ledger_Entry__Profit__LCY__.Value,Fields!Cust__Ledger_Entry__Sales__LCY__.Value))+chr(177)
    +CStr(Code.CalcAmountLCY(Fields!Cust__Ledger_Entry__Amount__LCY__.Value)),"")</Value>
    </Textbox>
    </ReportItems>
    ...

    Vorhandener Code 2

    ...TotalProfitLCY = 0
    TotalProfitPct = 0
    TotalAmountLCY = 0
    End Function


    // Delete the following lines.
    Function CalcNoOfInvoices(DocumentType as string)
    if DocumentType = "Invoice"
    // End of the deleted lines.
    NoOfInvoices += 1
    end if
    return NoOfInvoices
    End Function

    ...

    Neuer Code 2

    ...TotalProfitLCY = 0
    TotalProfitPct = 0
    TotalAmountLCY = 0
    End Function


    // Add the following lines.
    Function CalcNoOfInvoices(DocumentType as Boolean)
    if DocumentType
    // End of the added lines.

    NoOfInvoices += 1
    end if
    return NoOfInvoices
    End Function

    ...

    Vorhandenen Code 3

    ...NoOfInvoices += 1
    end if
    return NoOfInvoices
    End Function


    // Delete the following lines.
    Function CalcNoOfCredMemos(DocumentType as string)
    if DocumentType = "Credit Memo"
    // End of the deleted lines.

    NoOfCredMemos += 1
    end if
    return NoOfCredMemos
    End Function

    ...

    Neuer Code 3

    ...NoOfInvoices += 1
    end if
    return NoOfInvoices
    End Function


    // Add the following lines.
    Function CalcNoOfCredMemos(DocumentType as Boolean)
    if DocumentType
    // End of the added lines.

    NoOfCredMemos += 1
    end if
    return NoOfCredMemos
    End Function

    ...

    Vorhandenen Code 4

    ...<DataField>Cust__Ledger_Entry__Sales__LCY__Format</DataField>
    </Field>
    <Field Name="Cust__Ledger_Entry__Document_Type_">
    <DataField>Cust__Ledger_Entry__Document_Type_</DataField>
    </Field>
    <Field Name="Cust__Ledger_Entry__Amount__LCY__">
    <DataField>Cust__Ledger_Entry__Amount__LCY__</DataField>
    </Field>
    <Field Name="Cust__Ledger_Entry__Amount__LCY__Format">
    <DataField>Cust__Ledger_Entry__Amount__LCY__Format</DataField>
    ...

    Neuer Code 4

    ...<DataField>Cust__Ledger_Entry__Sales__LCY__Format</DataField>
    </Field>
    <Field Name="Cust__Ledger_Entry__Document_Type_">
    <DataField>Cust__Ledger_Entry__Document_Type_</DataField>
    </Field>

    // Add the following lines.
    <Field Name="Cust__Ledger_Entry__Document_Type_1">
    <DataField>Cust__Ledger_Entry__Document_Type_1</DataField>
    </Field>
    // End of the added lines.

    <Field Name="Cust__Ledger_Entry__Amount__LCY__">
    <DataField>Cust__Ledger_Entry__Amount__LCY__</DataField>
    </Field>
    <Field Name="Cust__Ledger_Entry__Amount__LCY__Format">
    <DataField>Cust__Ledger_Entry__Amount__LCY__Format</DataField>
    ...
  3. Ändern Sie den Code in den Abschnitten in der Tabelle Debitorenposten SR Daten Element Nummer 1. Liste FW Bericht (11585):
    Vorhandener code

    ...  ForeColor=65535;
    SourceExpr="Sales (LCY)";
    DataSetFieldName=Cust__Ledger_Entry__Sales__LCY__ }
    { 1150005;TextBox ;17250;0 ;150 ;423 ;Visible=No;
    ForeColor=65535;

    // Delete the following lines.
    SourceExpr="Document Type";
    DataSetFieldName=Cust__Ledger_Entry__Document_Type_ }
    // End of the deleted lines.

    }
    }
    { PROPERTIES
    {
    SectionType=Body;
    ...

    Neuer code

    ... ForeColor=65535;
    SourceExpr="Sales (LCY)";
    DataSetFieldName=Cust__Ledger_Entry__Sales__LCY__ }
    { 1150005;TextBox ;17250;0 ;150 ;423 ;Visible=No;
    ForeColor=65535;

    // Add the following lines.
    SourceExpr=("Document Type" = "Document Type"::Invoice);
    DataSetFieldName=Cust__Ledger_Entry__Document_Type_ }
    { 1150011;TextBox ;17100;0 ;150 ;423 ;Visible=No;
    ForeColor=65535;
    SourceExpr=("Document Type" = "Document Type"::"Credit Memo");
    DataSetFieldName=Cust__Ledger_Entry__Document_Type_1 }
    // End of the added lines.

    }
    }
    { PROPERTIES
    {
    SectionType=Body;
    ...
  4. Ändern Sie den Code in der Funktion CalcExrate SR Cust. Liste FW Bericht (11585):
    Vorhandener Code 1

    ...<TextAlign>Right</TextAlign>
    <VerticalAlign>Middle</VerticalAlign>
    </Style>
    <Value>=iif(True
    ,CStr(Code.CalcNoOfInvoices(Fields!Cust__Ledger_Entry__Document_Type_.Value))+Chr(177)

    // Delete the following line.
    +CStr(Code.CalcNoOfCredMemos(Fields!Cust__Ledger_Entry__Document_Type_.Value))+chr(177)
    // End of the deleted line.

    +CStr(Code.CalcProfitPct(Fields!Cust__Ledger_Entry__Profit__LCY___Control33.Value,Fields!Cust__Ledger_Entry__Sales__LCY__.Value))+chr(177)
    +CStr(Code.CalcAmountLCY(Fields!Cust__Ledger_Entry__Amount__LCY___Control56.Value)),"")</Value>
    </Textbox>
    </ReportItems>
    </TableCell>
    ...

    Neuer Code 1

    ...<TextAlign>Right</TextAlign>
    <VerticalAlign>Middle</VerticalAlign>
    </Style>
    <Value>=iif(True
    ,CStr(Code.CalcNoOfInvoices(Fields!Cust__Ledger_Entry__Document_Type_.Value))+Chr(177)

    // Add the following line.
    +CStr(Code.CalcNoOfCredMemos(Fields!Cust__Ledger_Entry__Document_Type_1.Value))+chr(177)
    // End of the added line.

    +CStr(Code.CalcProfitPct(Fields!Cust__Ledger_Entry__Profit__LCY___Control33.Value,Fields!Cust__Ledger_Entry__Sales__LCY__.Value))+chr(177)
    +CStr(Code.CalcAmountLCY(Fields!Cust__Ledger_Entry__Amount__LCY___Control56.Value)),"")</Value>
    </Textbox>
    </ReportItems>
    </TableCell>
    ...


    Vorhandener Code 2

     TotalProfitLCY = 0      TotalProfitPct  = 0
    TotalAmountLCY = 0
    End Function


    // Delete the following lines.
    Function CalcNoOfInvoices(DocumentType as string)
    if DocumentType = "Invoice"
    // End of the deleted lines.

    NoOfInvoices += 1
    end if
    return NoOfInvoices
    End Function


    ...

    Neuer Code 2

    ...TotalProfitLCY = 0
    TotalProfitPct = 0
    TotalAmountLCY = 0
    End Function


    // Add the following lines.
    Function CalcNoOfInvoices(DocumentType as Boolean)
    if DocumentType
    // End of the added lines.

    NoOfInvoices += 1
    end if
    return NoOfInvoices
    End Function


    ...

    Vorhandenen Code 3

    ...NoOfInvoices += 1
    end if
    return NoOfInvoices
    End Function


    // Delete the following lines.
    Function CalcNoOfCredMemos(DocumentType as string)
    if DocumentType = "Credit Memo"
    // Add of the deleted lines.

    NoOfCredMemos += 1
    end if
    return NoOfCredMemos
    End Function


    ...

    Neuer Code 3

    ...NoOfInvoices += 1
    end if
    return NoOfInvoices
    End Function


    // Add the following lines.
    Function CalcNoOfCredMemos(DocumentType as Boolean)
    if DocumentType
    // End of the added lines.

    NoOfCredMemos += 1
    end if
    return NoOfCredMemos
    End Function


    ...

    Vorhandenen Code 4

    ...TotalAmountLCY = TotalAmountLCY + AmountLCY 
    return TotalAmountLCY
    End Function</Code>
    <DataSets>
    <DataSet Name="DataSet_Result">
    <Fields>
    <Field Name="Customer_Invoices_ListCaption">
    <DataField>Customer_Invoices_ListCaption</DataField>
    </Field>
    <Field Name="FORMAT_TODAY_0_4_">
    ...

    Neuer Code 4

    ...TotalAmountLCY = TotalAmountLCY + AmountLCY 
    return TotalAmountLCY
    End Function</Code>
    <DataSets>
    <DataSet Name="DataSet_Result">

    // Add the following lines.
    <DataSetInfo xmlns="http://schemas.microsoft.com/SQLServer/reporting/reportdesigner">
    <DataSetName>DataSet</DataSetName>
    <TableName>Result</TableName>
    </DataSetInfo>
    // End of the added lines.

    <Fields>
    <Field Name="Customer_Invoices_ListCaption">
    <DataField>Customer_Invoices_ListCaption</DataField>
    </Field>
    <Field Name="FORMAT_TODAY_0_4_">
    ...

    Vorhandenen Code 5

    ...<DataField>Cust__Ledger_Entry__Sales__LCY__Format</DataField>
    </Field>
    <Field Name="Cust__Ledger_Entry__Document_Type_">
    <DataField>Cust__Ledger_Entry__Document_Type_</DataField>
    </Field>
    <Field Name="Cust__Ledger_Entry__Document_No___Control11">
    <DataField>Cust__Ledger_Entry__Document_No___Control11</DataField>
    </Field>
    <Field Name="COPYSTR_FORMAT__Document_Type___1_1__Control13">
    <DataField>COPYSTR_FORMAT__Document_Type___1_1__Control13</DataField>
    ...

    Neuer Code 5

    ...<DataField>Cust__Ledger_Entry__Sales__LCY__Format</DataField>
    </Field>
    <Field Name="Cust__Ledger_Entry__Document_Type_">
    <DataField>Cust__Ledger_Entry__Document_Type_</DataField>
    </Field>

    // Add the following lines.
    <Field Name="Cust__Ledger_Entry__Document_Type_1">
    <DataField>Cust__Ledger_Entry__Document_Type_1</DataField>
    </Field>
    // End of the added linds.

    <Field Name="Cust__Ledger_Entry__Document_No___Control11">
    <DataField>Cust__Ledger_Entry__Document_No___Control11</DataField>
    </Field>
    <Field Name="COPYSTR_FORMAT__Document_Type___1_1__Control13">
    <DataField>COPYSTR_FORMAT__Document_Type___1_1__Control13</DataField>
    ...

    Vorhandenen Code 6

    ... </Fields>
    <Query>
    <CommandText />
    <DataSourceName>DummyDataSource</DataSourceName>
    </Query>

    // Delete the following lines.
    <rd:DataSetInfo>
    <rd:DataSetName>DataSet</rd:DataSetName>
    <rd:TableName>Result</rd:TableName>
    </rd:DataSetInfo>
    // End of the deleted lines.

    </DataSet>
    </DataSets>
    <DataSources>
    <DataSource Name="DummyDataSource">
    <ConnectionProperties>
    ...

    Ersetzungscode 6

    ...</Fields>
    <Query>
    <CommandText />
    <DataSourceName>DummyDataSource</DataSourceName>
    </Query>
    </DataSet>
    </DataSets>
    <DataSources>
    <DataSource Name="DummyDataSource">
    <ConnectionProperties>
    ...
  5. Ändern Sie den Code in den Abschnitten in der Tabelle Debitorenposten SR Daten Element Nummer 1. Rechnungsliste Buchungsbericht (11586):
    Vorhandener code

    ...  ForeColor=65535;
    SourceExpr="Sales (LCY)";
    DataSetFieldName=Cust__Ledger_Entry__Sales__LCY__ }
    { 1150005;TextBox ;17250;0 ;150 ;423 ;Visible=No;
    ForeColor=65535;

    // Delete the following lines.
    SourceExpr="Document Type";
    DataSetFieldName=Cust__Ledger_Entry__Document_Type_ }
    // End of the deleted lines.

    }
    }
    { PROPERTIES
    {
    SectionType=Body;
    ...

    Neuer code

    ...ForeColor=65535;
    SourceExpr="Sales (LCY)";
    DataSetFieldName=Cust__Ledger_Entry__Sales__LCY__ }
    { 1150005;TextBox ;17250;0 ;150 ;423 ;Visible=No;
    ForeColor=65535;

    // Add the following lines.
    SourceExpr=("Document Type" = "Document Type"::Invoice);
    DataSetFieldName=Cust__Ledger_Entry__Document_Type_ }
    { 1150012;TextBox ;17100;0 ;150 ;423 ;Visible=No;
    ForeColor=65535;
    SourceExpr=("Document Type" = "Document Type"::"Credit Memo");
    DataSetFieldName=Cust__Ledger_Entry__Document_Type_1 }
    // End of the added lines.

    }
    }
    { PROPERTIES
    {
    SectionType=Body;
    ...
  6. Ändern Sie den Code in der Funktion CalcExrate SR Cust. Rechnungsliste Buchungsbericht (11586):
    Vorhandener Code 1

    ...TextAlign>Right</TextAlign>
    <VerticalAlign>Middle</VerticalAlign>
    </Style>
    <Value>=iif(True
    ,CStr(Code.CalcNoOfInvoices(Fields!Cust__Ledger_Entry__Document_Type_.Value))+Chr(177)

    // Delete the following line.
    +CStr(Code.CalcNoOfCredMemos(Fields!Cust__Ledger_Entry__Document_Type_.Value))+chr(177)
    // End of the deleted lines.

    +CStr(Code.CalcProfitPct(Fields!Cust__Ledger_Entry__Profit__LCY___Control33.Value,Fields!Cust__Ledger_Entry__Sales__LCY__.Value))+chr(177)
    +CStr(Code.CalcAmountLCY(Fields!Cust__Ledger_Entry__Amount__LCY___Control41.Value)),"")</Value>
    </Textbox>
    </ReportItems>
    </TableCell>
    ...

    Neuer Code 1

    ... <TextAlign>Right</TextAlign>
    <VerticalAlign>Middle</VerticalAlign>
    </Style>
    <Value>=iif(True
    ,CStr(Code.CalcNoOfInvoices(Fields!Cust__Ledger_Entry__Document_Type_.Value))+Chr(177)

    // Add of the following line.
    +CStr(Code.CalcNoOfCredMemos(Fields!Cust__Ledger_Entry__Document_Type_1.Value))+chr(177)
    // End of the added line.

    +CStr(Code.CalcProfitPct(Fields!Cust__Ledger_Entry__Profit__LCY___Control33.Value,Fields!Cust__Ledger_Entry__Sales__LCY__.Value))+chr(177)
    +CStr(Code.CalcAmountLCY(Fields!Cust__Ledger_Entry__Amount__LCY___Control41.Value)),"")</Value>
    </Textbox>
    </ReportItems>
    </TableCell>
    ...

    Vorhandener Code 2

    ...TotalProfitLCY = 0
    TotalProfitPct = 0
    TotalAmountLCY = 0
    End Function


    // Delete the following lines.
    Function CalcNoOfInvoices(DocumentType as string)
    if DocumentType = "Invoice"
    // End of the deleted lines.

    NoOfInvoices += 1
    end if
    return NoOfInvoices
    End Function


    ...

    Neuer Code 2

    ... TotalProfitLCY = 0
    TotalProfitPct = 0
    TotalAmountLCY = 0
    End Function


    // Add the following lines.
    + Function CalcNoOfInvoices(DocumentType as Boolean)
    + if DocumentType
    // End of the added lines.

    NoOfInvoices += 1
    end if
    return NoOfInvoices
    End Function


    ...

    Vorhandenen Code 3

    ...end if
    return NoOfInvoices
    End Function

    Function CalcNoOfCredMemos(DocumentType as string)

    // Delete the following line.
    if DocumentType = "Credit Memo"
    // End of the deleted line.

    NoOfCredMemos += 1
    end if
    return NoOfCredMemos
    End Function


    ...

    Neuer Code 3

    ...end if
    return NoOfInvoices
    End Function

    Function CalcNoOfCredMemos(DocumentType as string)

    // Add the following line.
    if DocumentType
    // End of the added line.

    NoOfCredMemos += 1
    end if
    return NoOfCredMemos
    End Function


    ...

    Vorhandenen Code 4

    ...<DataField>Cust__Ledger_Entry__Sales__LCY__Format</DataField>
    </Field>
    <Field Name="Cust__Ledger_Entry__Document_Type_">
    <DataField>Cust__Ledger_Entry__Document_Type_</DataField>
    </Field>
    <Field Name="Cust__Ledger_Entry__Amount__LCY___Control41">
    <DataField>Cust__Ledger_Entry__Amount__LCY___Control41</DataField>
    </Field>
    <Field Name="Cust__Ledger_Entry__Amount__LCY___Control41Format">
    <DataField>Cust__Ledger_Entry__Amount__LCY___Control41Format</DataField>
    ...

    Neuer Code 4

    ...<DataField>Cust__Ledger_Entry__Sales__LCY__Format</DataField>
    </Field>
    <Field Name="Cust__Ledger_Entry__Document_Type_">
    <DataField>Cust__Ledger_Entry__Document_Type_</DataField>
    </Field>

    // Add the following lines.
    <Field Name="Cust__Ledger_Entry__Document_Type_1">
    <DataField>Cust__Ledger_Entry__Document_Type_1</DataField>
    </Field>
    // End of the added lines.

    <Field Name="Cust__Ledger_Entry__Amount__LCY___Control41">
    <DataField>Cust__Ledger_Entry__Amount__LCY___Control41</DataField>
    </Field>
    <Field Name="Cust__Ledger_Entry__Amount__LCY___Control41Format">
    <DataField>Cust__Ledger_Entry__Amount__LCY___Control41Format</DataField>
    ...


  7. Ändern Sie den Code in den Abschnitten in der Tabelle Debitorenposten SR Daten Element Nummer 1. Liste Zahlungsbericht (11587):
    Vorhandener code

    ... ForeColor=65535;
    SourceExpr="Sales (LCY)";
    DataSetFieldName=Cust__Ledger_Entry__Sales__LCY__ }
    { 1150005;TextBox ;17250;0 ;150 ;423 ;Visible=No;
    ForeColor=65535;

    // Delete the following lines.
    SourceExpr="Document Type";
    DataSetFieldName=Cust__Ledger_Entry__Document_Type_ }
    // End of the deleted lines.

    }
    }
    { PROPERTIES
    {
    SectionType=Body;
    ...

    Neuer code

    ... ForeColor=65535;
    SourceExpr="Sales (LCY)";
    DataSetFieldName=Cust__Ledger_Entry__Sales__LCY__ }
    { 1150005;TextBox ;17250;0 ;150 ;423 ;Visible=No;
    ForeColor=65535;

    // Add the following lines.
    SourceExpr=("Document Type" = "Document Type"::Invoice);
    DataSetFieldName=Cust__Ledger_Entry__Document_Type_ }
    { 1150013;TextBox ;17100;0 ;150 ;423 ;Visible=No;
    ForeColor=65535;
    SourceExpr=("Document Type" = "Document Type"::"Credit Memo");
    DataSetFieldName=Cust__Ledger_Entry__Document_Type_1 }
    // End of the added lines.

    }
    }
    { PROPERTIES
    {
    SectionType=Body;
    ...
  8. Ändern Sie den Code in der Funktion CalcExrate SR Cust. Liste Zahlungsbericht (11587):
    Vorhandener Code 1

    ...<TextAlign>Right</TextAlign>
    <VerticalAlign>Middle</VerticalAlign>
    </Style>
    <Value>=iif(True
    ,CStr(Code.CalcNoOfInvoices(Fields!Cust__Ledger_Entry__Document_Type_.Value))+Chr(177)

    //Delete the following line.
    +CStr(Code.CalcNoOfCredMemos(Fields!Cust__Ledger_Entry__Document_Type_.Value))+chr(177)
    // End of the deleted line.

    +CStr(Code.CalcProfitPct(Fields!Cust__Ledger_Entry__Profit__LCY___Control33.Value,Fields!Cust__Ledger_Entry__Sales__LCY__.Value))+chr(177)
    +CStr(Code.CalcAmountLCY(Fields!Cust__Ledger_Entry__Amount__LCY___Control100.Value)),"")</Value>
    </Textbox>
    </ReportItems>
    </TableCell>
    ...

    Neuer Code 1

    ...<TextAlign>Right</TextAlign>
    <VerticalAlign>Middle</VerticalAlign>
    </Style>
    <Value>=iif(True
    ,CStr(Code.CalcNoOfInvoices(Fields!Cust__Ledger_Entry__Document_Type_.Value))+Chr(177)

    // Add the following line.
    + +CStr(Code.CalcNoOfCredMemos(Fields!Cust__Ledger_Entry__Document_Type_1.Value))+chr(177)
    // End of the added line.

    +CStr(Code.CalcProfitPct(Fields!Cust__Ledger_Entry__Profit__LCY___Control33.Value,Fields!Cust__Ledger_Entry__Sales__LCY__.Value))+chr(177)
    +CStr(Code.CalcAmountLCY(Fields!Cust__Ledger_Entry__Amount__LCY___Control100.Value)),"")</Value>
    </Textbox>
    </ReportItems>
    </TableCell>
    ...

    Vorhandener Code 2

    ...TotalProfitLCY = 0
    TotalProfitPct = 0
    TotalAmountLCY = 0
    End Function


    // Delete the following lines.
    Function CalcNoOfInvoices(DocumentType as string)
    if DocumentType = "Invoice"
    // End of the deleted lines.

    NoOfInvoices += 1
    end if
    return NoOfInvoices
    End Function


    ...

    Neuer Code 2

    ...TotalProfitLCY = 0
    TotalProfitPct = 0
    TotalAmountLCY = 0
    End Function


    // Add the following lines.
    Function CalcNoOfInvoices(DocumentType as Boolean)
    if DocumentType
    // End of the added lines.

    NoOfInvoices += 1
    end if
    return NoOfInvoices
    End Function


    ...

    Vorhandenen Code 3

    ...NoOfInvoices += 1
    end if
    return NoOfInvoices
    End Function


    // Delete the following lines.
    Function CalcNoOfCredMemos(DocumentType as string)
    if DocumentType = "Credit Memo"
    // End of the deleted lines.

    NoOfCredMemos += 1
    end if
    return NoOfCredMemos
    End Function


    ...

    Neuer Code 3

    ... NoOfInvoices += 1
    end if
    return NoOfInvoices
    End Function


    // Add the following lines.
    Function CalcNoOfCredMemos(DocumentType as Boolean)
    if DocumentType
    // End of the added lines.

    NoOfCredMemos += 1
    end if
    return NoOfCredMemos
    End Function


    ...

    Vorhandenen Code 4

    ...<DataField>Cust__Ledger_Entry__Sales__LCY__Format</DataField>
    </Field>
    <Field Name="Cust__Ledger_Entry__Document_Type_">
    <DataField>Cust__Ledger_Entry__Document_Type_</DataField>
    </Field>
    <Field Name="Cust__Ledger_Entry__Amount__LCY___Control100">
    <DataField>Cust__Ledger_Entry__Amount__LCY___Control100</DataField>
    </Field>
    <Field Name="Cust__Ledger_Entry__Amount__LCY___Control100Format">
    <DataField>Cust__Ledger_Entry__Amount__LCY___Control100Format</DataField>
    ...

    Neuer Code 4

    ... <DataField>Cust__Ledger_Entry__Sales__LCY__Format</DataField>
    </Field>
    <Field Name="Cust__Ledger_Entry__Document_Type_">
    <DataField>Cust__Ledger_Entry__Document_Type_</DataField>
    </Field>

    // Add the following lines.
    <Field Name="Cust__Ledger_Entry__Document_Type_1">
    <DataField>Cust__Ledger_Entry__Document_Type_1</DataField>
    </Field>
    // End of the added lines.

    <Field Name="Cust__Ledger_Entry__Amount__LCY___Control100">
    <DataField>Cust__Ledger_Entry__Amount__LCY___Control100</DataField>
    </Field>
    <Field Name="Cust__Ledger_Entry__Amount__LCY___Control100Format">
    <DataField>Cust__Ledger_Entry__Amount__LCY___Control100Format</DataField>
    ...






Voraussetzungen

Sie müssen eines der folgenden Produkte verfügen, um diesen Hotfix installieren:

  • Die Schweizer Version von Microsoft Dynamics NAV 2009 R2

  • Die Schweizer Version von Microsoft Dynamics NAV 2009 SP1

Informationen zur Deinstallation

Dieser Hotfix kann nicht entfernt werden.

Status

Microsoft hat bestätigt, dass es sich um ein Problem bei den Microsoft-Produkten handelt, die im Abschnitt „Eigenschaften“ aufgeführt sind.

Referenzen

VSFT DynamicsNAVSE: 337170

Hinweis Dies ist ein im Schnellverfahren veröffentlichter Artikel, der direkt in der Microsoft Support-Organisation erstellt wurde. Die hierin enthaltenen Informationen werden ohne Mängelgewähr in Reaktion auf neue Probleme bereitgestellt. Aufgrund der schnellen Bereitstellung kann das Material möglicherweise typografische Fehler enthalten und jederzeit ohne vorherige Ankündigung geändert werden. Weitere Hinweise finden Sie unter Geschäftsbedingungen.

Author: Vanessa.Garcia
Writer: v-luzo
Technische Überprüfung: Vanessa.Garcia
Editor:

Benötigen Sie weitere Hilfe?

Ihre Office-Fähigkeiten erweitern
Schulungen erkunden
Neue Funktionen als Erster erhalten
Microsoft Insider beitreten

War diese Information hilfreich?

Vielen Dank für Ihr Feedback!

Vielen Dank für Ihr Feedback. Es klingt, als ob es hilfreich sein könnte, Sie mit einem unserer Office-Supportmitarbeiter zu verbinden.

×