Le rapport récapitulatif de la commande client (107) affiche les totaux incorrectes dans Microsoft Dynamics NAV

Informations sur le correctif

Un correctif pris en charge est désormais disponible auprès de Microsoft. Toutefois, il est conçu uniquement pour corriger le problème décrit dans cet article. Il s’applique uniquement aux systèmes rencontrant ce problème spécifique. Ce correctif peut subir des tests supplémentaires. Par conséquent, si vous n’êtes pas sérieusement concerné par ce problème, nous vous recommandons d’attendre le prochain service pack Microsoft Dynamics NAV 2009 ou la prochaine version de Microsoft Dynamics NAV qui comprendra ce correctif.

Remarque Dans certains cas, les frais généralement encourus pour la prise en charge des appels peuvent être annulés si un technicien du Support technique pour Microsoft Dynamics et les produits associés détermine qu’une mise à jour spécifique peut résoudre votre problème. Les coûts habituels du support technique s’appliqueront aux autres questions et problèmes qui ne relèvent pas de la mise à jour spécifique en question.

Modifications du code

Remarque Toujours tester le code des correctifs dans un environnement contrôlé, avant d'appliquer les correctifs à vos ordinateurs de production.
Pour résoudre ce problème, procédez comme suit :

1. Modifiez le code dans les propriétés dans le rapport « Synthèse de commande client – » (107) comme suit :
   Code existant 1

   ...SalesAmtOnOrderLCY[PeriodNo] := 0;
   END;
   IF SalesLine.FINDSET THEN
   ...
   

   Code de substitution 1

   ...SalesAmtOnOrderLCY[PeriodNo] := 0;
   END;
   
   // Add the following lines.
   TotalSalesAmtOnOrder := 0;
   TotalSalesAmtOnOrderLCY := 0;
   // End of the linesl
   
   IF SalesLine.FINDSET THEN
   ...
   

   Code existant 2

   ...ELSE
   CurrReport.SKIP;
   END;
   ...
   

   Code de substitution 2

   ...ELSE
   CurrReport.SKIP;
   
   // Add the following lines.
   FOR PeriodNo := 1 TO 5 DO BEGIN
   TotalSalesAmtOnOrder += SalesAmtOnOrder[PeriodNo];
   TotalSalesAmtOnOrderLCY += SalesAmtOnOrderLCY[PeriodNo];
   END;
   // End of the lines.
   
   END;
   ...
   

   Code existant 3

   ...AutoFormatExpr="Currency Code" }
   { 45 ;1 ;Column ;Name_Cust ;
   IncludeCaption=Yes;
   ...
   

   Code de substitution 3

   ...AutoFormatExpr="Currency Code" }
   
   // Add the following lines.
   { 5 ;1 ;Column ;TotalSalesAmtOnOrder;
   SourceExpr=TotalSalesAmtOnOrder }
   { 6 ;1 ;Column ;TotalSalesAmtOnOrderLCY;
   SourceExpr=TotalSalesAmtOnOrderLCY }
   // End of the lines.
   
   { 45 ;1 ;Column ;Name_Cust ;
   IncludeCaption=Yes;
   ...
   

2. Modifiez le code dans les Variables globales dans le rapport « Synthèse de commande client – » (107) comme suit :
   Code existant

   ...TotalLCYCaptionLbl@5808 : TextConst 'ENU=Total (LCY)';
   CurrencyFilter@1012 : Code[10];
   PROCEDURE InitializeRequest@1(StartingDate@1000 : Date;ShowAmountInLCY@1002 : Boolean);
   ...
   

   Code de remplacement

   ...TotalLCYCaptionLbl@5808 : TextConst 'ENU=Total (LCY)';
   CurrencyFilter@1012 : Code[10];
   
   // Add the following lines.
   TotalSalesAmtOnOrder@1013 : Decimal;
   TotalSalesAmtOnOrderLCY@1014 : Decimal;
   // End of the lines.
   
   PROCEDURE InitializeRequest@1(StartingDate@1000 : Date;ShowAmountInLCY@1002 : Boolean);
   ...
   

3. Modifiez le code dans la fonction InitializeRequest dans le rapport « Synthèse de commande client – » (107) comme suit :
   Code existant 1

   ...<DataField>SalesAmtOnOrder1Format</DataField>
   </Field>
   <Field Name="Name_Cust">
   <DataField>Name_Cust</DataField>
   ...
   

   Code de substitution 1

   ...<DataField>SalesAmtOnOrder1Format</DataField>
   </Field>
   <Field Name="TotalSalesAmtOnOrder">
   
   // Add the following lines.
   <DataField>TotalSalesAmtOnOrder</DataField>
   </Field>
   <Field Name="TotalSalesAmtOnOrderFormat">
   <DataField>TotalSalesAmtOnOrderFormat</DataField>
   </Field>
   <Field Name="TotalSalesAmtOnOrderLCY">
   <DataField>TotalSalesAmtOnOrderLCY</DataField>
   </Field>
   <Field Name="TotalSalesAmtOnOrderLCYFormat">
   <DataField>TotalSalesAmtOnOrderLCYFormat</DataField>
   </Field>
   // End of the lines.
   
   <Field Name="Name_Cust">
   <DataField>Name_Cust</DataField>
   ...
   

   Code existant 2

   ...<TextRuns>
   <TextRun>
   
   // Delete the following line.
   <Value>=Sum(Fields!SalesOrderAmountLCY.Value)</Value>
   
   <Style>
   <FontSize>7pt</FontSize>
   ...
   

   Code de substitution 2

   ...<TextRuns>
   <TextRun>
   
   // Add the following line.
   <Value>=Sum(Fields!TotalSalesAmtOnOrderLCY.Value)</Value>
   
   <Style>
   <FontSize>7pt</FontSize>
   ...
   

   Code existant 3

   ...<TextRuns>
   <TextRun>
   
   // Delete the following line.
   <Value>=Sum(Fields!SalesOrderAmount.Value)</Value>
   
   <Style>
   <FontSize>7pt</FontSize>
   ...
   

   Code de substitution 3

   ...<TextRuns>
   <TextRun>
   
   // Add the following line.
   <Value>=Sum(Fields!TotalSalesAmtOnOrder.Value)</Value>
   
   <Style>
   <FontSize>7pt</FontSize>
   ...
   

   4 le code existant

   ...<TextRuns>
   <TextRun>
   
   // Delete the following line.
   <Value>=Sum(Fields!SalesOrderAmount.Value)</Value>
   
   <Style>
   <FontSize>7pt</FontSize>
   ...
   

   Code de remplacement 4

   ...<TextRuns>
   <TextRun>
   
   // Add the following line.
   <Value>=Sum(Fields!TotalSalesAmtOnOrder.Value)</Value>
   
   <Style>
   <FontSize>7pt</FontSize>
   ...
   

   Code existant 5

   ...<TextRuns>
   <TextRun>
   
   // Delete the following line.
   <Value>=Sum(Fields!SalesOrderAmountLCY.Value)</Value>
   
   <Style>
   <FontSize>7pt</FontSize>
   ...
   

   Code de remplacement 5

   ...<TextRuns>
   <TextRun>
   
   // Add the following line.
   <Value>=Sum(Fields!TotalSalesAmtOnOrderLCY.Value)</Value>
   
   <Style>
   <FontSize>7pt</FontSize>
   ...