Le système efface de manière inattendue les Tâches dans la boîte de dialogue Liste de tâches pour un contact spécifique carte après avoir affecté un code d’équipe à la Procédure dans le client RoleTailored (RTC) dans Microsoft Dynamics NAV 2009

S’applique à
Dynamics NAV 2009

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

Symptômes

Supposons que vous appliquez des correctifs logiciels 2476183 dans Microsoft Dynamics NAV 2009 R2 et Dans Microsoft Dynamics NAV 2009 Service Pack 1 (SP1). Après avoir affecté un code d’équipe à une action dans la boîte de dialogue Carte de tâches du client RoleTailored (RTC), le système efface les tâches dans la boîte de dialogue Liste de tâches pour un contact spécifique carte. Toutefois, le système répertorie les tâches à faire dans la boîte de dialogue Liste des tâches du client classique comme prévu.
  Pour plus d’informations sur les correctifs logiciels 2476183 , cliquez sur le numéro ci-dessous pour afficher l’article dans la Base de connaissances Microsoft :

2476183 Une tâche d’équipe n’est pas terminée comme prévu après la fermeture de la tâche d’équipe pour un vendeur dans le client RoleTailored dans Microsoft Dynamics NAV 2009 Service Pack 1

Résolution

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

          

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 ingénieurs du support Microsoft peuvent vous aider à expliquer les fonctionnalités d’une procédure particulière. Toutefois, ils ne modifient pas ces exemples pour fournir des fonctionnalités supplémentaires ou créer des procédures pour répondre à 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. Modifiez le code de la fonction UpdateAttendeeTodos dans la table To-do (5080) comme suit :
    Code existant

    ...
    BEGIN
    
    //Delete the following lines.
    Todo2.SETCURRENTKEY("Organizer To-do No.","System To-do Type");
    Todo3.RESET;
    Todo2.SETRANGE("Organizer To-do No.",OldTodoNo);
    IF "Team Code" = '' THEN
    Todo2.SETFILTER(
    "System To-do Type",
    '%1|%2',
    Todo2."System To-do Type"::"Salesperson Attendee",
    Todo2."System To-do Type"::"Contact Attendee")
    ELSE
    Todo2.SETFILTER("System To-do Type",'<>%1',Todo2."System To-do Type"::Team);
    IF Todo2.FIND('-') THEN
    REPEAT
    TodoBuffer.INIT;
    TodoBuffer.TRANSFERFIELDS(Todo2,FALSE);
    TodoBuffer.INSERT;
    Todo2.TRANSFERFIELDS(Rec,FALSE);
    Todo2."System To-do Type" := TodoBuffer."System To-do Type";
    IF Todo2."System To-do Type" = Todo2."System To-do Type"::"Contact Attendee" THEN
    Todo2.VALIDATE("Contact No.",TodoBuffer."Contact No.")
    ELSE
    Todo2."Salesperson Code" := TodoBuffer."Salesperson Code";
    Todo2.MODIFY(TRUE);
    TodoBuffer.DELETE;
    UNTIL Todo2.NEXT = 0;
    
    IF ISSERVICETIER THEN BEGIN
    // End of the deleted lines.
    
    Todo3.SETCURRENTKEY("Organizer To-do No.","System To-do Type");
    Todo3.SETRANGE("Organizer To-do No.","Organizer To-do No.");
    IF Todo3.FINDSET THEN
    REPEAT
    IF Todo3."No." <> "No." THEN BEGIN
    TodoBuffer.INIT;
    TodoBuffer.TRANSFERFIELDS(Todo3,FALSE);
    TodoBuffer.INSERT;
    Todo3.TRANSFERFIELDS(Rec,FALSE);
    Todo3."System To-do Type" := TodoBuffer."System To-do Type";
    IF Todo3."System To-do Type" = Todo3."System To-do Type"::"Contact Attendee" THEN
    Todo3.VALIDATE("Contact No.",TodoBuffer."Contact No.")
    ELSE
    Todo3."Salesperson Code" := TodoBuffer."Salesperson Code";
    SearchManagement.ParseToDo(Todo3,FALSE);
    Todo3."Last Date Modified" := TODAY;
    Todo3."Last Time Modified" := TIME;
    MobSalesMgt.TodoOnModify(Todo3);
    Todo3.MODIFY;
    TodoBuffer.DELETE;
    END;
    UNTIL Todo3.NEXT = 0;
    END;
    END;
    ...
    

    Code de remplacement 1

    ...
    BEGIN 
    // Add the following lines.
    IF ISSERVICETIER THEN BEGIN
    Todo3.RESET;
    // End of the added lines.
    
    Todo3.SETCURRENTKEY("Organizer To-do No.","System To-do Type");
    Todo3.SETRANGE("Organizer To-do No.","Organizer To-do No.");
    IF Todo3.FINDSET THEN
    REPEAT
    IF Todo3."No." <> "No." THEN BEGIN
    TodoBuffer.INIT;
    TodoBuffer.TRANSFERFIELDS(Todo3,FALSE);
    TodoBuffer.INSERT;
    Todo3.TRANSFERFIELDS(Rec,FALSE);
    Todo3."System To-do Type" := TodoBuffer."System To-do Type";
    IF Todo3."System To-do Type" = Todo3."System To-do Type"::"Contact Attendee" THEN
    Todo3.VALIDATE("Contact No.",TodoBuffer."Contact No.")
    ELSE
    Todo3."Salesperson Code" := TodoBuffer."Salesperson Code";
    SearchManagement.ParseToDo(Todo3,FALSE);
    Todo3."Last Date Modified" := TODAY;
    Todo3."Last Time Modified" := TIME;
    MobSalesMgt.TodoOnModify(Todo3);
    Todo3.MODIFY;
    TodoBuffer.DELETE;
    END;
    UNTIL Todo3.NEXT = 0;
    
    // Add the following lines.
    END ELSE BEGIN
    Todo2.SETCURRENTKEY("Organizer To-do No.","System To-do Type");
    Todo2.SETRANGE("Organizer To-do No.",OldTodoNo);
    IF "Team Code" = '' THEN
    Todo2.SETFILTER(
    "System To-do Type",
    '%1|%2',
    Todo2."System To-do Type"::"Salesperson Attendee",
    Todo2."System To-do Type"::"Contact Attendee")
    ELSE
    Todo2.SETFILTER("System To-do Type",'<>%1',Todo2."System To-do Type"::Team);
    IF Todo2.FIND('-') THEN
    REPEAT
    TodoBuffer.INIT;
    TodoBuffer.TRANSFERFIELDS(Todo2,FALSE);
    TodoBuffer.INSERT;
    Todo2.TRANSFERFIELDS(Rec,FALSE);
    Todo2."System To-do Type" := TodoBuffer."System To-do Type";
    IF Todo2."System To-do Type" = Todo2."System To-do Type"::"Contact Attendee" THEN
    Todo2.VALIDATE("Contact No.",TodoBuffer."Contact No.")
    ELSE
    Todo2."Salesperson Code" := TodoBuffer."Salesperson Code";
    Todo2.MODIFY(TRUE);
    TodoBuffer.DELETE;
    UNTIL Todo2.NEXT = 0;
    // End of the added lines.
    
    END;
    END;
    ...
    
  2. Modifiez le code action des propriétés dans la page Liste des tâches (5096) comme suit :

    ...
    { 33      ;1   ;Action    ;
                          CaptionML=ENU=&Create To-do;
                          Promoted=Yes;
                          PromotedCategory=Process;
                          OnAction=VAR
                                     TempToDo@1001 : TEMPORARY Record 5080;
                                   BEGIN
                                     TempToDo.CreateToDoFromToDo(Rec);
                                   END;
                                    }
    
    // Add the following lines.
    { 1034 ;1 ;Action ;
    Name=<Action1034>;
    CaptionML=ENU=Edit Organizer To-Do;
    RunObject=Page 5098;
    RunFormLink=No.=FIELD(Organizer To-do No.);
    Image=Edit;
    PromotedCategory=Process }
    // End of the added lines.
    
    ...
    
  3. Modifiez le code de Propriétés dans la page Carte à faire (5098) comme suit :

    ... 
    RecurringDateIntervalEditable := TRUE;
    "Contact No.Editable" := TRUE;
    END;
    
    // Add the following lines.
    OnOpenPage()
    IF (GETFILTER("No.") = '' ) AND ISSERVICETIER THEN
    CurrPage.EDITABLE := FALSE;
    END;
    // End of the added lines.
    
    ...
    

Configuration requise

L’un des produits suivants doit être installé pour appliquer ce correctif :

  • Microsoft Dynamics NAV 2009 R2
  • Microsoft Dynamics NAV 2009 Service Pack 1

Informations sur la suppression

Vous ne pouvez pas supprimer ce correctif logiciel.

État

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

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.