Microsoft Dynamics NAV 5.0 Service Pack 1 (SP1) ne copie pas les informations du travail lorsque vous exécutez la fonction Déplacer les lignes négatives pour créer une facture de vente à partir des lignes de tâches d’un travail

Cet article s’applique à Microsoft Dynamics NAV pour tous les paramètres régionaux de langue.

Lorsque vous exécutez la fonction Déplacer les lignes négatives pour créer une facture de vente à partir des lignes de tâches d’un travail dans Microsoft Dynamics NAV 5.0 Service Pack 1 (SP1), les informations du travail ne sont pas copiées dans la démonstration de crédit créée.

Symptômes

Informations sur le correctif logiciel

Un correctif logiciel pris en charge est désormais disponible auprès de Microsoft. Toutefois, il est uniquement destiné à corriger le problème décrit dans cet article. Appliquez-la uniquement aux systèmes qui rencontrent ce problème spécifique. Ce correctif logiciel peut recevoir des tests supplémentaires. Par conséquent, si vous n’êtes pas gravement affecté par ce problème, nous vous recommandons d’attendre le prochain Service Pack Microsoft Dynamics NAV 5.0 ou la prochaine version de Microsoft Dynamics NAV qui contient ce correctif logiciel.

Remarque Dans des cas particuliers, les frais habituellement engagés pour les appels de support peuvent être annulés si un professionnel du support technique pour Microsoft Dynamics et les produits associés détermine qu’une mise à jour spécifique permettra de résoudre votre problème. Les coûts habituels du support technique s’appliqueront aux autres questions et problèmes non directement liés à la mise à jour en question.

Résolution

Informations sur l’installation

Microsoft fournit des exemples de programmation à des fins d’illustration uniquement, sans garantie exprimée ou implicite. Cela inclut, sans s’y limiter, les garanties implicites de qualité commerciale ou d’adéquation à un usage particulier. Cet article part du principe que vous êtes familiarisé avec le langage de programmation présenté et avec les outils utilisés pour créer et déboguer des procédures. Les techniciens du Support technique Microsoft peuvent vous expliquer les fonctionnalités d'une procédure particulière, mais ils ne peuvent pas modifier les exemples en vue de vous fournir des fonctionnalités supplémentaires ou de créer des procédures répondant à vos besoins spécifiques.

Remarque Avant d’installer ce correctif logiciel, vérifiez que tous les utilisateurs du client Microsoft Navision sont déconnectés du système. Cela inclut les utilisateurs du client Nas (Microsoft Navision Application Services). Vous devez être le seul utilisateur client connecté lorsque vous implémentez ce correctif logiciel.

Pour implémenter ce correctif logiciel, vous devez disposer d’une licence de développeur.

Nous vous recommandons d’attribuer au compte d’utilisateur dans la fenêtre Connexions Windows ou dans la fenêtre Connexions de base de données l’ID de rôle « SUPER ». Si l’ID de rôle « SUPER » ne peut pas être attribué au compte d’utilisateur, vous devez vérifier que le compte d’utilisateur dispose des autorisations suivantes :

  • Autorisation Modifier pour l’objet que vous allez modifier.
  • Autorisation Exécuter pour l’objet ID d’objet système 5210 et pour l’objet ID d’objet système 9015.

            
Remarque Vous n’avez pas besoin de disposer de droits sur les magasins de données, sauf si vous devez effectuer une réparation des données.

Modifications du code

Remarque Toujours tester les correctifs de code 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. Modifier le code dans la fonction CopySalesDoc (FromDocType : Option ; FromDocNo : Code[20] ; VAR ToSalesHeader : Enregistrez « Sales Header ») codeunit (6620) comme suit :
    Code existant

    ...
       END;
    
    IF MoveNegLines THEN 
      DeleteSalesLinesWithNegQty(FromSalesHeader,FALSE);
    
    CASE TRUE OF
    ...
    

    Code de remplacement

    ...
       END;
    
    IF MoveNegLines THEN BEGIN   
      DeleteSalesLinesWithNegQty(FromSalesHeader,FALSE);
      LinkJobPlanningLine(ToSalesHeader);
    END;
    
    CASE TRUE OF
    ...
    
  2. Modifier le code dans la fonction CopySalesLine ((VAR ToSalesHeader : Record « Sales Header » ; VAR ToSalesLine : Enregistrer « Sales Line » ; VAR FromSalesHeader : Enregistrez « Sales Header ») codeunit (6620) comme suit :
    Code existant

    ...
     IF MoveNegLines AND (ToSalesLine.Type <> ToSalesLine.Type::" ") THEN BEGIN
      ToSalesLine.VALIDATE(Quantity,-FromSalesLine.Quantity);
      ToSalesLine.VALIDATE("Line Discount %", FromSalesLine."Line Discount %");
      ToSalesLine."Appl.-to Item Entry" := FromSalesLine."Appl.-to Item Entry";
      ToSalesLine."Appl.-from Item Entry" := FromSalesLine."Appl.-from Item Entry";
    END;
    ...
    

    Code de remplacement

    ...
       IF MoveNegLines AND (ToSalesLine.Type <> ToSalesLine.Type::" ") THEN BEGIN
      ToSalesLine.VALIDATE(Quantity,-FromSalesLine.Quantity);
      ToSalesLine.VALIDATE("Line Discount %", FromSalesLine."Line Discount %");
      ToSalesLine."Appl.-to Item Entry" := FromSalesLine."Appl.-to Item Entry";
      ToSalesLine."Appl.-from Item Entry" := FromSalesLine."Appl.-from Item Entry";
    
    // Add the following lines.
      ToSalesLine."Job No." := FromSalesLine."Job No."; 
      ToSalesLine."Job Task No." := FromSalesLine."Job Task No."; 
      ToSalesLine."Job Contract Entry No." := FromSalesLine."Job Contract Entry No.";
    // End of the added lines.
    
    END;
    ...
    
  3. Cliquez sur Globals C/AL dans le menu Affichage, ajoutez la fonction LinkJobPlanningLine sous l’onglet Fonction.
    Ajoutez un paramètre local comme suit :

    • Nom : SalesHeader
    • DataType : Record
    • Sous-type : En-tête Sales

    Ajoutez les variables locales comme suit :

    • Nom : SalesLine ; DataType : Record ; SubType : Sales Line
    • Nom : JobPlanningLine ; DataType : Record ; SubType : Ligne de planification du travail

    Ajoutez le code suivant dans la fonction LinkJobPlanningLine créée :

    JobPlanningLine.SETCURRENTKEY("Job Contract Entry No.");
    SalesLine.SETRANGE("Document Type",SalesHeader."Document Type");
    SalesLine.SETRANGE("Document No.",SalesHeader."No.");
      REPEAT
        JobPlanningLine.SETRANGE("Job Contract Entry No.",SalesLine."Job Contract Entry No.");
        JobPlanningLine.SETRANGE(Transferred,FALSE);
        IF JobPlanningLine.FINDFIRST THEN BEGIN
          IF SalesHeader."Document Type" = SalesHeader."Document Type"::Invoice THEN
            JobPlanningLine."Invoice Type" := JobPlanningLine."Invoice Type"::Invoice;
          IF SalesHeader."Document Type" = SalesHeader."Document Type"::"Credit Memo" THEN
            JobPlanningLine."Invoice Type" := JobPlanningLine."Invoice Type"::"Credit Memo";
          JobPlanningLine."Invoice No." := SalesHeader."No.";
          JobPlanningLine.Transferred := TRUE;
          JobPlanningLine."Transferred Date" := SalesHeader."Posting Date";
          JobPlanningLine.MODIFY;
        END;
      UNTIL SalesLine.NEXT = 0;
    
    

          

Configuration requise

Microsoft Dynamics NAV 5.0 SP1 doit être installé pour appliquer ce correctif.

Informations sur la suppression

Vous ne pouvez pas supprimer ce correctif logiciel.

Microsoft a confirmé qu’il s’agissait d’un problème dans les produits Microsoft répertoriés dans la section « S’applique à ».

État

VSTF DynamicsNAV SE : 233671

Références

Remarque Il s’agit d'un article de « dernière minute » créé directement à partir de l’organisation de support technique Microsoft. Les informations présentées ici sont fournies telles quelles en réponse à des problèmes nouveaux. En raison de la rapidité de leur mise à disposition, les documents peuvent contenir des erreurs typographiques et être modifiés à tout moment sans préavis. Consultez les Conditions d’utilisation pour d’autres considérations.