Discussion :

[argoet]

Aidez moi siou plait
je doit faire une concatenation conditionnée de fichiers sous WIndows

(Sous UNIX j'ai aucun pB pour faire ce genre de manip mais sous windows , je métrise pas )

En résumé : le synoptique est le suivant :

Code :

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

1
2
3
4
5
6
7
8
9
pour chaque fichiers de Type PRD****** (**** = Un numero)
faire    
         nnnnnn = Noméro du ficher PRD courant   
         Si Présence du fichier FAC{nnnnn} 
         Alors
                  Ajoute PRD{nnnnnn} à PRDTOTAL
                  Ajoute FAC{nnnnnn} à FACTOTAL
         Fin Si
Fin Pour

Sous UNIX ça peut donner un truc comme ça :

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
#!/bin/ksh

# -------------------------------------------------
# -- Pour l'ensemble des fichiers de Type PRD{nnnnn}
# -------------------------------------------------
for LE_PRD in PRD[0-9][0-9][0-9][0-9][0-9]
do
     NUMERO=`echo "$LE_PRD" | cut -c 4-8`
     echo $LE_PRD $NUMERO
     # ---------------------------------------------
     # -- Si Le Fichier FAC de meme numero que PRD est Present
     # -- Alors J'ajoute le contenu du PRD courant Dans PRDTOTAL
     # --       J'ajoute le contenu de FAC courant Dans FACTOTAL
     # ---------------------------------------------
     if [ -f FAC${NUMERO} ]
     then
         echo $NUMERO
         cat $LE_PRD >> PRDTOTAL
         cat FAC${NUMERO} >> FACTOTAL
     fi
done

Comment faire ça sous Windows :

Merci pour aide

[Jedai]

Tu télécharge ActivePerl et tu fais :

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
# ! /usr/bin/perl
use strict; # use warnings;

for my $filePRD ( glob("PRD*") ) {
   my $num = substr $filePRD, 3, 5;
   print $filePRD, $num, "\n";
   if( -e  "./FAC$num") {
      print $num, "\n";
      cat( "./$filePRD", "./PRDTOTAL");
      cat( "./FAC$num", "./FACTOTAL");
   }
}

sub cat ($$) {
   open IN, '<&#58;raw', $_&#91;0&#93;;
   open OUT, '>>&#58;raw', $_&#91;1&#93;;
   local $/;
   print OUT <IN>;
&#125;

L'avantage, c'est que ça fonctionnera aussi pour Linux...
(si je n'ai pas fait d'erreurs, mais ça fait longtemps que je n'ai plus codé)

EDIT : Code corrigé et testé.

--
Jedaï

[alveric]

Ca fait bien longtemps que je n'ai pas codé de .BAT ( ), mais il me semble que remplacer tes "cat" par du "type" devrait aider. Par contre, les "cut", je sais pas...

[Luc Hermitte]

Si tu as l'option d'installer des outils *nix, cela serait encore plus simple.

(on ne devrait pas plutôt être dans le forum dev. windows ?)
EDIT Gnux: si voilà qui est fait merci

[Laurent Dardenne]

Salut, je peux te proposer un début de solutions mais il me manque qq info :
Quelles version de Windows ?
Peux-tu installer des outils additionnelle sur les machines cible ?
Existe-t-il ou existera-t-il des fichiers de type PRD***** contenant des lettres ?

Cela semble réalisable mais les scripts NT ne permettent pas l'utilisation des expressions réguliéres.

Code :

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

for LE_PRD in PRD[0-9][0-9][0-9][0-9][0-9]

Perl est trés bonne solution si on connait le Perl

[argoet]

Merci à Tous Pour vos réponses :

Effectivement : en telechargeant les Outils POSX : ça fonctionne à merveille

Perl : je connais pas : mais jvé voir ça !!!