Discussion :

[TomDuBouchon]

Bonjour,

Je viens de développer une macro complémentaire pour DeskI en VBA permettant de réaliser des copies de fournisseurs de données entre documents, ou un sein d'un même document.

Elle devrait fonctionner sans souci sur les versions 5 et 6. Cela reste assez conditionnel concernant les versions XI.

Quoi qu'il en soit, je fais appel à vous tous pour tester cette macro, et me faire vos remontées sur d'éventuels bugs rencontrés (merci de m'indiquer les messages d'erreur dans ce cas, avec votre version de BO) mais également sur les différentes évolutions à apporter.

La macro se nomme "CopieDP". A son ouverture, apparaîtra une nouvelle barre d'outils avec une icône correspondant à celle des fournisseurs de données. Il faut cliquer sur cette icône pour démarrer la macro.

Rappel : pour installer une macro complémentaire, il suffit de copier le fichier .rea sur votre poste. Puis, dans BO, d'aller dans "Outils > Macros complémentaires", cliquer sur parcourir pour indiquer l'emplacement du fichier, et enfin de cocher la case correspondant à cette macro.

En vous remerciant par avance pour vos contributions...

Historique des versions :

v1.0 : 13/08/2010

• Document initial

v1.0.1 : 17/08/2010

• Détermination de la version de BO en début de procédure
• Possibilité de lancer la macro avec un seul document ouvert
• Gestion du Domaine / Enterprise en fonction de la version de BO

[doc malkovich]

Merci Tom

[LEGAPH]

Bonjour,

Je n'arrive pas a installer la macro complementaire,
je suis en version BOXI

merci

[TomDuBouchon]

Bonjour,

A quel niveau cela bloque ? Vous n'avez pas le menu "Macros complémentaires" ? Ou celui-ci est-il grisé ?
Ou alors y a-t-il un message d'erreur une fois que vous avez coché la case correspondant à la macro ?

[doc malkovich]

Hello

Moi j'arrive à l'installer

Aie, sous BO XI il n'y a plus les domaines mais des EnterpriseFolder
Chez moi ça bloque à

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

Set DPDest = DocDest.DataProviders.AddQueryTechnique(DPSource.UniverseName,DPSource.Universe.DomainName)

Je regarde dès que j'ai le temps

[TomDuBouchon]

OK, je vais regarder ça

[doc malkovich]

Sous Xi avec

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

Set DPDest = DocDest.DataProviders.AddQueryTechnique(DPSource.UniverseName,DPSource.Universe.FolderName)

ça marche

--> tu fais 2 versions Tom ?

[TomDuBouchon]

Je vais essayer de ne faire qu'une version avec un test sur les versions...
Mais les méthodes n'étant pas nécessairement les mêmes, je vais voir si le debugger râle.

[TomDuBouchon]

Je viens de remplacer le document joint par sa nouvelle version.
Le premier message comprend maintenant un historique des versions, avec les modifications effectuées.

[LEGAPH]

Bonjour,

Tous marche bien, il y avait des problemes de version et de droit

merci

[TomDuBouchon]

il y avait des problemes de version et de droit

C'est à dire ? Ces informations m'intéressent

[LEGAPH]

je ne peut pas accéder au lecteur "C:"

de plus j'ai une erreur 20: pour certaine copie

l'icone de reste pas si reouvre bo

[TomDuBouchon]

je ne peut pas accéder au lecteur "C:"

Je ne fais pas appel à une valeur en dur dans mon code

de plus j'ai une erreur 20: pour certaine copie

Ca oui ça m'intéresse, quelle est la description pour l'erreur 20, peux-tu m'en dire plus ?

l'icone de reste pas si reouvre bo

Ca aussi c'est surprenant... La case à cocher correspondant à la macro complémentaire reste cochée ?

[LEGAPH]

pour l'erreur 20 : No universe with this name and repository


Pour l'icone, la case reste bien cocher

[TomDuBouchon]

Concernant l'erreur 20 : l'univers est-il bien rapatrié en local ?

Pour l'icône, je ne comprends pas, car il est recréé à l'ouverture de la macro complémentaire (et donc à l'ouverture de BO)

[maju0906]

Déjà merci Tom car ca va m'être vraiment utile.

Moi j'ai une erreur qui me dis :

"Ce fichier ne peut être ouvert qu'avec la version 6.0.0.0 ou supérieure de cette appplication."

alors que tu l'a faite pour la version 5 et 6 à la base.

Ma version de BO est la 5.1.9.

Merci

[TomDuBouchon]

Bonjour et merci pour ce retour.

A quel moment obtiens-tu ce message d'erreur ? As-tu suivi le mode d'emploi décrit dans le premier message pour l'installer ?

Si tu peux néanmoins accéder à BO une fois la macro installée, va dans "Outils > Macro > Visual Basic Editor".
De là, dans "Outils > Références", vérifies que tu as bien la référence "Business Objects x.x Object Library" de cochée. (Où "x.x" correspond à ta version de BO)
En effet, ayant développée la macro sous la version 6, il est possible que la référence n'ait pas été retrouvée.

EDIT : Après réflexion, il est possible que ce soit le header du fichier qui bloque l'exécution d'un rapport sur une version plus ancienne que celle sur laquelle il a été développé.
Auquel cas, ça va être plus problématique car il faudrait le redévelopper sur une version 5... Que je n'ai pas sous la main
Si la solution évoquée ne fonctionne pas, précise le moi et je verrai comment je peux me débrouiller...

[schkrumble]

Bonjour,

Je suis sous XIr2.
Je n'ai eu aucun pb pour installer la macro (un double-click sur le fichier .REA, deux messagebox d'avertissement épicétou)
J'ai donc un nouvelle barre d'outils avec un joli bouton.

Je clique et ça m'ouvre la boite de dialogue dont je trouve l'ergonomie super intuitive

Quand tous les champs sont bien renseignés je lance la copie mais là j'ai ce message d'erreur :

Erreur 20 :
No Universe with this name and Repository

PS1 : Ce test m'a pris moins d'une minute, c'est super facile, même pour quelqu'un qui n'avait jamais touché à une macro sous BO. Faites-le.

PS2 : Si ça marchait ça me rendrait un rûdement beau service, particulièrement en ce moment...

[TomDuBouchon]

C'est noté, je vais me pencher dessus.

As-tu vérifié que l'univers est bien présent en local sur ton poste ?

[schkrumble]

C'est noté, je vais me pencher dessus.

As-tu vérifié que l'univers est bien présent en local sur ton poste ?

Oui, il l'est, puisqu'il y a déjà plusieurs requêtes existantes dessus dans mes documents et qu'elles se raffraîchissent normalement...

NB J'ai vérifié avec divers requêtes issues de divers univers ça me envoie systématiqement la même erreur.