Cet article s’applique à Microsoft Dynamics NAV pour les paramètres régionaux de la langue norvégienne (sans).
Symptômes
Lorsque vous exécutez le port de données « Envoi de fonds - importation (BBS) » (15000060) pour importer des données dans la version norvégienne de Microsoft Dynamics NAV, les entrées de solde sont toujours créées pour chaque transaction de paiement. Le port de données « Envoi de fonds - importation (BBS) » (15000060) ne prend pas en compte les paramètres de la boîte de dialogue Carte de contrat de transfert de fonds ou de la boîte de dialogue Carte de compte de transfert de fonds.
Ce problème se produit dans les produits suivants :
- La version norvégienne de Microsoft Dynamics NAV 2009 R2
- La version norvégienne de Microsoft Dynamics NAV 2009 Service Pack 1 (SP1)
- La version norvégienne de Microsoft Dynamics NAV 5.0 Service Pack 1 (SP1)
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 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 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 :
Modifiez le code dans la fonction ProcessBETFOR23and04 dans le port de données Transfert de fonds - importation (banque) (15000050) comme suit :
Code existant... // Update Waiting journal WaitingJournal.VALIDATE(WaitingJournal."Payment Order ID - Settled",PaymOrder.ID); WaitingJournal.VALIDATE("Journal, Settlement Template",GenJournalLine."Journal Template Name"); WaitingJournal.VALIDATE("Journal - Settlement",GenJournalLine."Journal Batch Name"); WaitingJournal.MODIFY(TRUE); // Update round off END ELSE // This error should not occur. ERROR(Text026,ReturnCode); ...Code de remplacement
... // Update Waiting journal WaitingJournal.VALIDATE(WaitingJournal."Payment Order ID - Settled",PaymOrder.ID); WaitingJournal.VALIDATE("Journal, Settlement Template",GenJournalLine."Journal Template Name"); WaitingJournal.VALIDATE("Journal - Settlement",GenJournalLine."Journal Batch Name"); // Add the following line. WaitingJournal."Remittance Status" := WaitingJournal."Remittance Status"::Sent; WaitingJournal.MODIFY(TRUE); // Update round off END ELSE // This error should not occur. ERROR(Text026,ReturnCode); ...Modifiez le code dans la fonction CreateBalanceEntry dans le port de données De transfert de fonds - importation (banque) (15000050) comme suit :
Code existant... BalanceEntryAmount := BalanceEntryAmountLCY ELSE BalanceEntryAmount := ROUND(BalanceEntryAmountLCY * GenJournalLine."Currency Factor"); GenJournalLine.VALIDATE(Amount,-BalanceEntryAmount); GenJournalLine.VALIDATE("Document No.",TransDocumentNo); CASE LatestRemAgreement."New Document Per." OF LatestRemAgreement."New Document Per."::Date: GenJournalLine.VALIDATE( Description,STRSUBSTNO(Text031,LatestDate)); LatestRemAgreement."New Document Per."::Vendor: ...Code de remplacement
... BalanceEntryAmount := BalanceEntryAmountLCY ELSE BalanceEntryAmount := ROUND(BalanceEntryAmountLCY * GenJournalLine."Currency Factor"); GenJournalLine.VALIDATE(Amount,-BalanceEntryAmount); GenJournalLine.VALIDATE("Document No.",TransDocumentNo); // Add the following lines. GenJournalLine.VALIDATE("Remittance Account Code",WaitingJournal."Remittance Account Code"); GenJournalLine.VALIDATE("Remittance Agreement Code",WaitingJournal."Remittance Agreement Code"); // End of the lines. CASE LatestRemAgreement."New Document Per." OF LatestRemAgreement."New Document Per."::Date: GenJournalLine.VALIDATE( Description,STRSUBSTNO(Text031,LatestDate)); LatestRemAgreement."New Document Per."::Vendor: ...Modifiez le code de l’élément de données numéro 1 dans le port de données Envoi de fonds - importation (BBS) (15000060) comme suit :
Code existant... ERROR(Text005,FileImp,Recordtype); END; END; OnPostDataItem=BEGIN // Recordtype89 must be read by the end of import: IF NOT Recordtype89IsRead THEN ERROR( Text006 + Text007,FileImp); ...Code de remplacement
... ERROR(Text005,FileImp,Recordtype); END; END; OnPostDataItem=BEGIN // Add the following line. CreateBalanceEntry(TransBBSDate,'',WaitingJournal."Account No.",RemAccount,RemAgreement); // Recordtype89 must be read by the end of import: IF NOT Recordtype89IsRead THEN ERROR( Text006 + Text007,FileImp); ...Modifiez le code dans la fonction ProcessTransaction dans le port de données Transfert de fonds - importation (BBS) (15000060) comme suit :
Code existant... WaitingJournal.VALIDATE("BBS Shipment No.",ShipmentNo); WaitingJournal.VALIDATE("BBS Payment Order No.",PaymOrderNo); WaitingJournal.VALIDATE("BBS Transaction No.",TransNo); WaitingJournal.VALIDATE("Journal, Settlement Template",GenJnlLine."Journal Template Name"); WaitingJournal.VALIDATE("Journal - Settlement",GenJnlLine."Journal Batch Name"); // Delete the following lines. WaitingJournal.MODIFY(TRUE); UNTIL WaitingJournal.NEXT = 0; CreateBalanceEntry(TransBBSDate,'',WaitingJournal."Account No.",RemAccount,RemAgreement); // End of the lines. END; LOCAL PROCEDURE CreatePaymOrder@6(); VAR NextPaymOrderID@1000000000 : Integer; ...Code de remplacement
... WaitingJournal.VALIDATE("BBS Shipment No.",ShipmentNo); WaitingJournal.VALIDATE("BBS Payment Order No.",PaymOrderNo); WaitingJournal.VALIDATE("BBS Transaction No.",TransNo); WaitingJournal.VALIDATE("Journal, Settlement Template",GenJnlLine."Journal Template Name"); WaitingJournal.VALIDATE("Journal - Settlement",GenJnlLine."Journal Batch Name"); // Add the following lines. WaitingJournal."Remittance Status" := WaitingJournal."Remittance Status"::Sent; WaitingJournal.MODIFY(TRUE); UNTIL WaitingJournal.NEXT = 0; // End of the lines. END; LOCAL PROCEDURE CreatePaymOrder@6(); VAR NextPaymOrderID@1000000000 : Integer; ...Modifiez le code dans la fonction CreateBalanceEntry dans le port de données Transfert de fonds - importation (BBS) (15000060) comme suit :
Code existant... GenJnlLine.VALIDATE("Posting Date",LatestDate); GenJnlLine.VALIDATE("Account Type",LatestRemAccount."Account Type"); GenJnlLine.VALIDATE("Account No.",LatestRemAccount."Account No."); GenJnlLine.VALIDATE(Amount,-BalanceEntryAmountLCY); GenJnlLine.VALIDATE("Document No.",TransDocumentNo); CASE LatestRemAgreement."New Document Per." OF LatestRemAgreement."New Document Per."::Date: GenJnlLine.VALIDATE( Description,STRSUBSTNO(Text012,LatestDate)); LatestRemAgreement."New Document Per."::Vendor: ...Code de remplacement
... GenJnlLine.VALIDATE("Posting Date",LatestDate); GenJnlLine.VALIDATE("Account Type",LatestRemAccount."Account Type"); GenJnlLine.VALIDATE("Account No.",LatestRemAccount."Account No."); GenJnlLine.VALIDATE(Amount,-BalanceEntryAmountLCY); GenJnlLine.VALIDATE("Document No.",TransDocumentNo); // Add the following lines. GenJnlLine.VALIDATE("Remittance Account Code",WaitingJournal."Remittance Account Code"); GenJnlLine.VALIDATE("Remittance Agreement Code",WaitingJournal."Remittance Agreement Code"); // End of the lines. CASE LatestRemAgreement."New Document Per." OF LatestRemAgreement."New Document Per."::Date: GenJnlLine.VALIDATE( Description,STRSUBSTNO(Text012,LatestDate)); LatestRemAgreement."New Document Per."::Vendor: ...Modifiez le code dans la fonction NewTransaction dans le port de données Transfert de fonds - importation (BBS) (15000060) comme suit :
Code existant... BEGIN // Initialize transaction import. // Called before import is started, after a transaction in the file is closed (BETFOR99) // and before the next transaction from the same file starts. First := TRUE; //Control of balance entry; // Delete the following line. BalanceEntryAmountLCY := 0; LatestDate := 0D; LatestVend := ''; CLEAR(LatestRemAccount); END; ...Code de remplacement
... BEGIN // Initialize transaction import. // Called before import is started, after a transaction in the file is closed (BETFOR99) // and before the next transaction from the same file starts. First := TRUE; //Control of balance entry; LatestDate := 0D; LatestVend := ''; CLEAR(LatestRemAccount); END; ...Modifiez le code dans la fonction FindFiles dans le rapport d’importation d’ordre de paiement rem. (15000003) comme suit :
Code existant... FilePath := RemTools.FindPath(ReturnFileSetup."Return File Name"); File.SETFILTER(Path,FilePath); // not case-sensitive File.SETRANGE("Is a file",TRUE); // Copy all these files to a temporary table with file name in lower-case letters: FileCopy.DELETEALL; // Delete the following lines. IF File.FIND('-') THEN REPEAT FileCopy.Name := LOWERCASE(File.Name); FileCopy.Size := File.Size; FileCopy.Date := File.Date; FileCopy.Time := File.Time; FileCopy.INSERT; UNTIL File.NEXT = 0; // End of the lines. // From now on use copies of file names : FileCopy.SETFILTER(Name,LOWERCASE(RemTools.FindFilename(ReturnFileSetup."Return File Name"))); IF FileCopy.FIND('-') THEN REPEAT ReturnFiles.INIT; ...Code de remplacement
... FilePath := RemTools.FindPath(ReturnFileSetup."Return File Name"); File.SETFILTER(Path,FilePath); // not case-sensitive File.SETRANGE("Is a file",TRUE); // Copy all these files to a temporary table with file name in lower-case letters: FileCopy.DELETEALL; // Add the following lines. IF EXISTS(FilePath) THEN BEGIN IF File.FIND('-') THEN REPEAT FileCopy.Name := LOWERCASE(File.Name); FileCopy.Size := File.Size; FileCopy.Date := File.Date; FileCopy.Time := File.Time; FileCopy.INSERT; UNTIL File.NEXT = 0; END; // End of the lines. // From now on use copies of file names : FileCopy.SETFILTER(Name,LOWERCASE(RemTools.FindFilename(ReturnFileSetup."Return File Name"))); IF FileCopy.FIND('-') THEN REPEAT ReturnFiles.INIT; ...
Configuration requise
L’un des produits suivants doit être installé pour appliquer ce correctif :
- La version norvégienne de Microsoft Dynamics NAV 2009 R2
- La version norvégienne de Microsoft Dynamics NAV 2009 Service Pack 1 (SP1)
- La version norvégienne de Microsoft Dynamics NAV 5.0 Service Pack 1 (SP1)
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.