Při spuštění sestava 11584 11587 v švýcarskou verzi aplikace Microsoft Dynamics NAV 2009 "celkové číslo pomocí jazyk němčina (Švýcarsko) z faktur nebo dobropisů"se vždy zobrazí jako nula. K tomuto problému dochází v následujících produktů:

  • Švýcarskou verzi aplikace Microsoft Dynamics NAV 2009 R2

  • Švýcarskou verzi aplikace Microsoft Dynamics NAV 2009 SP1

Řešení

Informace o opravě hotfix

Podporovaná oprava hotfix je nyní k dispozici od společnosti Microsoft. Však je určena pouze k odstranění problému popsaného v tomto článku. Použijte ji pouze u systémů, ve kterých dochází k tomuto konkrétnímu problému. Tato oprava hotfix může být dále testována. Proto pokud jste závažně tento problém, doporučujeme počkat na další aktualizaci service pack produktu Microsoft Dynamics NAV 2009 nebo další verze produktu Microsoft Dynamics NAV, která obsahuje tuto opravu hotfix.

Poznámka: Ve zvláštních případech poplatky, které jsou třeba obvykle zaplatit za telefonní hovory mohou být stornovány, jestliže pracovník technické podpory společnosti Microsoft Dynamics a souvisejících produktů Určuje, že konkrétní aktualizace odstraní váš problém. Výdaje na technickou podporu použije dalších otázek a problémů, které nelze vyřešit konkrétní aktualizací.

Informace o instalaci

Společnost Microsoft poskytuje ukázky programování pouze pro ilustraci bez žádné záruky výslovně uvedené nebo odvozené. To zahrnuje, ale není omezen pouze na předpokládané záruky obchodovatelnosti nebo vhodnosti pro určitý účel. Tento článek předpokládá, že jste obeznámeni s programovacím jazykem, který je předmětem ukázky a s nástroji, které slouží k vytvoření a ladění skriptu. Pracovníci podpory společnosti Microsoft mohou vysvětlit funkce určitého postupu. Nemohou však následující příklady rozšířit o další funkce nebo konstrukce podle konkrétních požadavků.

Poznámka: Před instalací této opravy hotfix ověřte, že všichni uživatelé klienta Microsoft Dynamics NAV odhlášeni systému. To zahrnuje služby Microsoft Dynamics NAV Application Server (NAS). Je třeba klienta pouze uživatel přihlášený při implementaci opravy hotfix.

Chcete-li implementovat tuto opravu hotfix, musí mít licenci vývojáře.

Doporučujeme, aby uživatelský účet v okně přihlášení systému Windows nebo v okně přihlášení databáze přidělí "SUPER" ID role. Pokud uživatelský účet nelze přiřadit ID role "SUPER", musíte ověřit, že uživatelský účet má následující oprávnění:

  • Změnit oprávnění pro objekt, který budete měnit.

  • Oprávnění ke spuštění pro System Object ID 5210 objekt a System Object ID 9015

    objektu.

Poznámka: Nemáte práva k úložištím dat. Pokud nebudete provádět opravu dat.

Změny kódu

Poznámka: vždy otestujte opravy kódu v kontrolovaném prostředí před instalací opravy v provozních počítačích. Před použitím změnu, importujte všechny aktualizace SEPA.

Chcete-li vyřešit tento problém, postupujte takto:

  1. Změňte kód v částech 1 číslo položky dat v SR zák. Standardní sestava (11584) seznam faktur:
    Existující kód

    ...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;
    ...

    Změněný kód

    ...   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. Změňte kód ve funkci CalcExrate v SR zák. Standardní sestava (11584) seznam faktur:
    Existující kód 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>
    ...

    Změněný kód 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>
    ...

    Existující kód 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

    ...

    Náhradní kód 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

    ...

    Existující kód 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

    ...

    Změněný kód 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

    ...

    Existující kód 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>
    ...

    Náhradní kód 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. Změňte kód v částech 1 číslo položky dat v SR zák. CM sestava seznam faktur (11585):
    Existující kód

    ...  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;
    ...

    Změněný kód

    ... 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. Změňte kód ve funkci CalcExrate v SR zák. CM sestava seznam faktur (11585):
    Existující kód 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>
    ...

    Změněný kód 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>
    ...


    Existující kód 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


    ...

    Náhradní kód 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


    ...

    Existující kód 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


    ...

    Změněný kód 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


    ...

    Existující kód 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_">
    ...

    Náhradní kód 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_">
    ...

    Existující kód 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>
    ...

    Změněný kód 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>
    ...

    Existující kód 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>
    ...

    Náhradní kód 6

    ...</Fields>
    <Query>
    <CommandText />
    <DataSourceName>DummyDataSource</DataSourceName>
    </Query>
    </DataSet>
    </DataSets>
    <DataSources>
    <DataSource Name="DummyDataSource">
    <ConnectionProperties>
    ...
  5. Změňte kód v částech 1 číslo položky dat v SR zák. Seznam faktur, zaúčtování sestavy (11586):
    Existující kód

    ...  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;
    ...

    Změněný kód

    ...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. Změňte kód ve funkci CalcExrate v SR zák. Seznam faktur, zaúčtování sestavy (11586):
    Existující kód 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>
    ...

    Změněný kód 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>
    ...

    Existující kód 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


    ...

    Náhradní kód 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


    ...

    Existující kód 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


    ...

    Změněný kód 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


    ...

    Existující kód 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>
    ...

    Náhradní kód 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. Změňte kód v částech 1 číslo položky dat v SR zák. Platební sestavu seznamu faktur (11587):
    Existující kód

    ... 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;
    ...

    Změněný kód

    ... 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. Změňte kód ve funkci CalcExrate v SR zák. Platební sestavu seznamu faktur (11587):
    Existující kód 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>
    ...

    Změněný kód 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>
    ...

    Existující kód 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


    ...

    Náhradní kód 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


    ...

    Existující kód 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


    ...

    Změněný kód 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


    ...

    Existující kód 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>
    ...

    Náhradní kód 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>
    ...






Předpoklady

Musí mít jednu z následujících produktů nainstalovali tuto opravu hotfix:

  • Švýcarskou verzi aplikace Microsoft Dynamics NAV 2009 R2

  • Švýcarskou verzi aplikace Microsoft Dynamics NAV 2009 SP1

Informace o odinstalaci

Tato oprava hotfix nelze odebrat.

Stav

Společnost Microsoft potvrdila, že se jedná o problém v produktech společnosti Microsoft, které jsou uvedeny v části "Platí pro".

Poznámka: Toto je článek "Rychlé publikování" vytvářen přímo v rámci odborné pomoci společnosti Microsoft. Informace obsažené v tomto dokumentu jsou poskytovány tak, jak je v reakci na vznikající problémy. V důsledku rychlosti v jeho zpřístupnění materiály, mohou obsahovat typografické chyby a mohou být upraveny kdykoli bez předchozího upozornění. Viz Podmínky použitípro další aspekty.

Potřebujete další pomoc?

Rozšiřte své znalosti a dovednosti
Projít školení
Získejte nové funkce jako první
Připojit se k programu Microsoft Insider

Byly tyto informace užitečné?

Jak jste spokojeni s kvalitou jazyka?
Co ovlivnilo váš názor?

Děkujeme vám za zpětnou vazbu.

×