Quando você usa o idioma alemão (Suíça) para iniciar o relatório de 11584 de 11587 na versão Suíça do Microsoft Dynamics NAV 2009, no "Total. de notas fiscais ou notas de crédito"é sempre mostradas como zero. Esse problema ocorre nos seguintes produtos:
-
A versão do Microsoft Dynamics NAV 2009 R2 Suíça
-
A versão do Microsoft Dynamics NAV 2009 SP1 Suíça
Resolução
Informações sobre o hotfix
Um hotfix suportado está disponível agora na Microsoft. No entanto, apenas destina-se a corrigir o problema descrito neste artigo. Aplique-o somente aos sistemas que apresentarem esse problema específico. Esta correção poderá ser submetida a testes adicionais. Portanto, se esse problema não o prejudicar, recomendamos que você aguarde o próximo service pack do Microsoft Dynamics NAV 2009 ou a próxima versão do Microsoft Dynamics NAV que contém esse hotfix.
Observação: Em alguns casos, as taxas cobradas para suporte a chamadas podem ser canceladas se um profissional de suporte técnico do Microsoft Dynamics e produtos relacionados determina que uma atualização específica resolverá o problema. Os custos normais de suporte serão aplicados para questões de suporte adicionais e problemas que não se qualificam à atualização específica em questão.
Informações sobre a instalação
A Microsoft fornece exemplos de programação somente para ilustração, sem garantia expressa ou implícita. Isso inclui, mas não está limitado a, garantias implícitas de comercialização ou adequação a um propósito específico. Este artigo presume que você esteja familiarizado com a linguagem de programação que está sendo demonstrada e com as ferramentas usadas para criar e depurar procedimentos. Os engenheiros de suporte da Microsoft podem ajudar a explicar a funcionalidade de um determinado procedimento. No entanto, eles não modificarão esses exemplos para fornecer funcionalidades adicionais ou construir procedimentos para atender às suas necessidades específicas.
Observação: Antes de instalar esse hotfix, verifique se todos os usuários do cliente do Microsoft Dynamics NAV estiver desconectados do sistema. Isso inclui os serviços do Microsoft Dynamics NAV Application Server (NAS). Você deve ser o único usuário do cliente conectado ao implementar esse hotfix.
Para implementar esse hotfix, você deve ter uma licença de desenvolvedor.
É recomendável que a conta de usuário na janela de Logins do Windows ou na janela banco de dados seja atribuída a ID de função "SUPER". Se a conta de usuário não pode ser atribuída a ID de função "SUPER", você deverá verificar se a conta de usuário tem as seguintes permissões:
-
A permissão Modificar para o objeto que será alterado.
-
A permissão de execução para o objeto 5210 de identificação de objeto de sistema e o sistema 9015 de identificação de objeto
objeto.
Observação: Você não precisa ter direitos para os armazenamentos de dados, a menos que você precise executar o reparo de dados.
Alterações de código
Observação sempre testar código correções em um ambiente controlado, antes de aplicar as correções para os computadores de produção. Antes de aplicar a alteração, importe todas as atualizações SEPA.
Para resolver esse problema, execute as seguintes etapas:
-
Altere o código na seção dados Item número 1 em Cust o SR. Lista de faturas Std relatório (11584):
Código existente...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;
...Código de substituição
... 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;
...
-
Altere o código na função CalcExrate Cust o SR. Lista de faturas Std relatório (11584):
1 de código existente...<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>
...1 código de substituição
...<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>
...2 de código existente
...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
...Código de substituição 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
...3 de código existente
...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
...Código de substituição 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
...4 de código existente
...<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>
...Código de substituição 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>
... -
Altere o código na seção dados Item número 1 em Cust o SR. Relatório de faturas lista FCY (11585):
Código existente... 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;
...Código de substituição
... 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;
... -
Altere o código na função CalcExrate Cust o SR. Relatório de faturas lista FCY (11585):
1 de código existente...<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>
...1 código de substituição
...<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>
...
2 de código existenteTotalProfitLCY = 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
...Código de substituição 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
...3 de código existente
...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
...Código de substituição 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
...4 de código existente
...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_">
...Código de substituição 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_">
...5 de código existente
...<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>
...Código de substituição 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>
...6 de código existente
... </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>
...Código de substituição 6
...</Fields>
<Query>
<CommandText />
<DataSourceName>DummyDataSource</DataSourceName>
</Query>
</DataSet>
</DataSets>
<DataSources>
<DataSource Name="DummyDataSource">
<ConnectionProperties>
... -
Altere o código na seção dados Item número 1 em Cust o SR. Lista de notas fiscais lançamento de relatório (11586):
Código existente... 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;
...Código de substituição
...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;
... -
Altere o código na função CalcExrate Cust o SR. Lista de notas fiscais lançamento de relatório (11586):
1 de código existente...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>
...1 código de substituição
... <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>
...2 de código existente
...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
...Código de substituição 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
...3 de código existente
...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
...Código de substituição 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
...4 de código existente
...<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>
...Código de substituição 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>
...
-
Altere o código na seção dados Item número 1 em Cust o SR. Relatório de pagamento de lista faturas (11587):
Código existente... 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;
...Código de substituição
... 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;
... -
Altere o código na função CalcExrate Cust o SR. Relatório de pagamento de lista faturas (11587):
1 de código existente...<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>
...1 código de substituição
...<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>
...2 de código existente
...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
...Código de substituição 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
...3 de código existente
...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
...Código de substituição 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
...4 de código existente
...<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>
...Código de substituição 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>
...
Pré-requisitos:
Você deve ter um dos seguintes produtos instalados para aplicar esse hotfix:
-
A versão do Microsoft Dynamics NAV 2009 R2 Suíça
-
A versão do Microsoft Dynamics NAV 2009 SP1 Suíça
Informações sobre remoção
Você não pode remover esse hotfix.
Status
A Microsoft confirma que este é um problema em seus produtos listados na seção "Aplica-se a".
Observação: Este é um artigo de "PUBLICAÇÃO RÁPIDA" criado diretamente de dentro da organização de suporte da Microsoft. As informações contidas neste documento são fornecidas desta maneira, em resposta a problemas emergentes. Como um dos resultados da velocidade da publicação, os materiais podem incluir erros tipográficos e podem ser revisados a qualquer momento sem aviso prévio. Consulte os Termos de usopara outras considerações.
