Discussion :

[XenaMPP]

Bonjour,

Je suis débutante (actuellement en V15 express...autoformation )
La semaine prochaine je dois recevoir la V17 (SANS l'accès natif AS400).

Ma question est la suivante : je dois importer sur windev une BDD qui est actuellement sur AS400 et j'aimerais savoir comment faire sans utiliser pour autant l'accès natif wd AS400. Quels sont les moyens d'y parvenir...et comment procéder

Toutes vos propositions sont les bienvenues.Merci d'avance.

XenaMPP

[frenchsting]

Je suis arrêté à la version 12 mais je pense que la version 17 n'a pas changé grand-chose...

Il faudra que tu installes le pilote pour ton AS/400 (OLEDB/ODBC). Il doit être livré avec les cd d'install de la bête (et/ou des émulateurs 5250 ou client access express).
Pour aller modifier les paramêtres : dans windows -> panneau de configuration/outils d'administration/sources de données.

Tu crées ton projet. Il va te demander si tu veux créer une analyse. Tu réponds oui et pour le type de base de données, tu réponds AS/400 (accès natif ou OLEDB). Ensuite, décoche HF classic. Clic sur suivant -> Accès ODBC par OLEDB. Après tu peux rentrer dans les paramètres avancés et sélectionner ta config.

[hpascal]

Bonjour

En effet ça ne pose aucun problème, j'utilise Windev 17 sur des bases DB2/400 via l'accès OLEDB
Comme provider OLEDB j'utilise IBMDA400 qui est installé avec "Client Access ou iSeries"

Je préfère OLEDB à ODBC car il n'y a pas de paramétrage à faire sur les postes utilisateurs (par de source ODBC à créer) et ça marche plutôt bien

Une chose chose : évites les HLitRecherche et compagnie car tu auras des surprises au niveau des performances, privilégies au maximum le SQL

[mnw.william]

Bonjour

En effet ça ne pose aucun problème, j'utilise Windev 17 sur des bases DB2/400 via l'accès OLEDB
Comme provider OLEDB j'utilise IBMDA400 qui est installé avec "Client Access ou iSeries"

Je préfère OLEDB à ODBC car il n'y a pas de paramétrage à faire sur les postes utilisateurs (par de source ODBC à créer) et ça marche plutôt bien

Une chose chose : évites les HLitRecherche et compagnie car tu auras des surprises au niveau des performances, privilégies au maximum le SQL

+1

[hpascal]

Je ne peux plus éditer mon message, donc je corrige ici :

"Client Access pour iSeries"

[frenchsting]

@hpascal
Je plussoie pour l'info sur les requêtes SQL. Je ne pensais pas qu'on pouvait perdre en performances à ce point.

[hpascal]

En passant en OLEDB des anciennes applications chez un client on est tombé sur des traitements HlitRecherchePremier+boucle HlitSuivant qui mettaient plus de 30 mn !
Bon ça c'était sur un site distant (connecté via ligne dédiée, je ne sais pas de quel type) et avec des tables de plusieurs millions d'enregistrements

La même chose en SQL ne prend plus qu'une dizaine de secondes

Du coup même sur le site principal on a tout à y gagner à passer en SQL

Par contre ça m'arrive d’utiliser les ordres H... en lecture sur des petites tables et de faire des HAjoute (bien pratique

[SevenSoftware]

Bonjour,

Petite précision (surtout pour XenaMPP): on se parle bien-sûr d'instruction SQL natives AS400 (avec l'option hRequeteSansCorrection) pour profiter pleinement de toutes les possibilité de SQL/400 et son optimiseur

[hpascal]

Oui bien sur, HExecuteRequeteSQL+hRequeteSansCorrection ou SQLExec
Mais tu as raison il vaut mieux préciser

[XenaMPP]

Merci beaucoup à tous pour vos réponses.
Ca y est je viens de recevoir la version 17 .... je me lance dans les tests avec vos explications ;-)
Merci encore.

[hpascal]

Juste une info importante , dans les infos étendues tu peux te positionner directement sur une bibliothèque avec Default Collection=TABIB
Ce qui n'empêche pas de nommer explicitement d'autres bibliothèques dans tes requêtes

Exemple pour utilisation des ordres H.. :

Code :

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

1
2
3
4
5
6
7
8
9
cnxTest est une Connexion
 
cnxTest..Serveur = "MonServeur"      // Nom ou IP du serveur
cnxTest..Provider = "IBMDA400"       // Nom du provider OLEDB
cnxTest..Utilisateur = "ton_login"    // Login
cnxTest..MotDePasse = "ton_pwd"     // Mot de passe
cnxTest..InfosEtendues = "Default Collection=TABIB"	  // Positionnement sur une bibliothèque
 
SI HOuvreConnexion(cnxTest) ALORS ...

et pour les ordres SQL... :

Code :

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

SI SQLConnecte("ASTEST", "ton_login", "ton_pwd", "", "OLEDB", "IBMDA400", "Default Collection=TABIB") <> 0 ALORS ...

Autres infos étendues utilisables :

Code :

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

Persist Security Info=True;Prompt=4;Protection Level=0;Extended Properties=;Locale Identifier=1036;OLE DB Services=-1;Transport Product=Client Access;SSL=DEFAULT;Force Translate=65535;Default Collection=;Convert Date Time To Char=TRUE;Catalog Library List=;Cursor Sensitivity=1;Use SQL Packages=False;SQL Package Library Name=;SQL Package Name=;Add Statements To SQL Package=False;Unusable SQL Package Action=1;Block Fetch=True;Data Compression=True;Sort Sequence=0;Sort Table=;Sort Language ID=;Query Options File Library=;Trace=0;Hex Parser Option=0;Maximum Decimal Precision=31;Maximum Decimal Scale=31;Minimum Divide Scale=0;Job Name=

[XenaMPP]

Bonjour à tous,

Ca y est structures des fichiers et BDD importées :cool:
Merci beaucoup à vous tous.

Maintenant que j'ai cela...faut que je fasse la suite (analyse, fenêtres et code....)

Rien que ça

Même pas peur

Merci encore

[hpascal]

A noter : si tu ne codes qu'en SQL tu peux même te passer d'analyse

Ceci dit, même quand c'est le cas, je l'importe quand même pour avoir le référentiel sous les yeux et profiter du F11 dans le code

[XenaMPP]

Je viens de me rendre compte via le WDmap que j'ai un fichier de données "mal organisé" cad que les entêtes de colonnes ne correspondent pas aux données, il y a un décalage. Comment puis je y remédier ?

Merci d'avance

Ps : moins débutante qu'hier mais toujours plus que demain....

[frenchsting]

Ton fichier est sur l'as/400 ? Ou tu parles d'un tableau sur une fenêtre ?
Dans le premier cas, c'est sur ton AS/400 que tu dois intervenir.
Dans le second, cela dépend de ta méthode de remplissage.

[XenaMPP]

Le fichier est importé d'une bibliothèque de l'As/400.
Et sous WD je fais l'import sous le menu - Structure de fichiers - Importer des données d'une autre base.

[frenchsting]

D'après ce que tu me dis, cela vient de la table sur l'AS/400. C'est plutôt à l'admin système de faire la modif, non ?

[philippe30]

Bonjour ,

Hpascal j'ai vu que tu connais bien les accès ODBC sur AS400 , je connais bien l'AS400 de mon coté mais j'ai un problème de syntaxe dans la requete SQL pour définir la bibliothèque ou se trouve le fichier

Code :

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

Var_chaine ="SELECT * FROM BIBLIO/FICHIER WHERE COLLAB = 'PHILIPPE'"

J'ai une erreur sur le caractère / définissant la séparation entre la bibliothèque et le fichier

J'ai essayé avec un point , avec \ , je ne vois pas quelle syntaxe utilisé

Connais tu la syntaxe à mettre en place ?

Merci par avance

Philippe

[hpascal]

Je n'utilisais pas ODBC mais OLEDB
Et le séparateur entre bibliothèque et fichier était le point (MABIB.MONFICHIER)
Ceci dit, ce séparateur était paramétrable au niveau du driver OLEDB, mais par défaut c'était le point

[philippe30]

Merci pour ta réponse Hpascal ,

J'ai indiqué la bibliothèque dans le default collection "Default Collection=BIBLIO" ce qui me permet de me connecter sans utiliser la syntaxe avec le point qui ne semble pas fonctionner.
Avec cette méthode , je suis limité a une seule bibliothèque de l'AS400 mais les données d'une application sont souvent regroupés dans une bibliothèque , actuellement cette solution me convient.

Je vais regarder du coté des drivers OLEDB

Philippe