Discussion :

[christeldum]

Bonjour,
j'ai une table access contenant les champs : nom, adresse, cp... code banque, code guichet, rib, montant...
Je dois extraire des données pour créer un fichier texte en format fixe. Je ne sais pas si je dois passer par du code ou si des requêtes de mise à jour sont possibles.
Je vous éclaire un peu sur les contraintes que je rencontre :
* dans la table, seuls les champs concernant les coordonnées bancaires m'intéressent
* je dois, en plus, ajouter des champs qui ne sont pas dans la table
* les champs doivent avoir un nombre de caractère bien précis
* les montants sont sous forme #,## alors qu'il faut que je les mette sous 16 caractères, sans virgule et à droite du champ (le début sera complété par des 0)
* la première ligne de données doit être différente
* je dois avoir la somme de tous les montants dans la dernière ligne
* et il faut que j'exporte le tout dans un fichier texte, tout ça pour envoyer à la banque...

J'ai l'impression de me noyer dans un verre d'eau. Je n'arrive pas à savoir si c'est faisable ou pas.
Merci de m'éclairer

CD

[mout1234]

Bonsoir,

Parmi les contraintes que tu mentionnes, je note deux points qui compliquent un peu la donne:
* la première ligne de données doit être différente
* je dois avoir la somme de tous les montants dans la dernière ligne

Une requête peut bien souvent répondre à toutes les autres contraintes mentionnées, mais cela deviendra plus délicat à cause de ces lignes au format différent.

Dans ce cas, tu peux exporter les données principales (via l'export d'une requête) puis ajouter par code VBA les lignes d'entete et de fin de fichier (par ouverture du fichier....).

Tu peux aussi t'en sortir via une table temporaire dans laquelle tu places les données à exporter.
Compte tenu des formats de lignes différents de ton fichier à générer, une solution que j'ai déjà exploitée consiste à utiliser une table temporaire composée essentiellement d'un champ de type Mémo. Il "suffit" alors de construire (VBA + SQL) les lignes de ton fichier texte (selon le format attendu) dans le champ mémo, puis d'exporter la table. Cette solution m'a permis notamment de générer des fichiers texte dont le format varie d'une ligne à l'autre.

[Jannus]

Bonjour,

Une requete pour récupérer les données, "un peu" de code pour mettre en forme et exporter.
Ça me paraît tout à fait faisable

[christeldum]

Merci de vous intéresser à mon problème.
La nuit m'a permis de trouver quelques solutions.
En fait, Mout1234, la première ligne n'est pas vraiment un souci car ce sera des données qui seront toujours fixes (nom et rib du client). Je peux donc les intégrer via une requête mise à jour.
La dernière ligne me pose un peu plus de souci mais je pense que je peux faire entrer le montant total par l'utilisatrice qui ira le chercher dans un état (qui existe déjà).
Ce qui me gène plus est le champ avec les montants qui ne doivent pas avoir de virgule pour les décimales (je fais une requête calcul), qui doivent être cadrés à droite, sur 16 car et complétés par des 0. Là, je bloque.

Sinon, qu'entends-tu par :
"utiliser une table temporaire composée essentiellement d'un champ de type Mémo. Il "suffit" alors de construire (VBA + SQL) les lignes de ton fichier texte (selon le format attendu) dans le champ mémo, puis d'exporter la table. Cette solution m'a permis notamment de générer des fichiers texte dont le format varie d'une ligne à l'autre."

Guardian, merci de me dire que c'est faisable.

CD

[mout1234]

Bonsoir,

Ton montant doit être multiplié par cent (suppression de la virgule et deux derniers chiffres correspondent au cents) ou sans décimales (arrondi)?

Pour faire cette mise en forme, tu peux créer une petite fonction en vba qui s'en charge et que tu utilises alors dans ta requête. Ceci dit, tu devrais pouvoir traiter cela directement en SQL, avec l'aide de quelques fonctions d'Access:
(Je suppose ici qu'il te fallait enlever le séparateur de décimales tout en gardant les cents...)

Essaies quelque chose du genre (je viens de l'écrire dans ce message... non testé

Code :

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

1
2
3
 
SELECT RIGHT$(string(16,"0") & cStr(LeMontant*100),16)
FROM Matable

[christeldum]

Merci beaucoup pour ta requête SQL, c'est exactement ce qu'il me fallait. Je vais essayer de finir le reste seule comme une grande avec certainement encore des questions.
Bonne soirée

CD