Ajouter un epace dans un nombre

Version imprimable

05/01/2016, 06h22
DelNC

Ajouter un epace dans un nombre

Bonjour à tous et toutes,

j'ai un petit soucis et je ne vois pas du tout comment m'y prendre alors je viens vous demander de l'aide.
Voilà, après mettre pris la tête toute la journée pour retirer des espaces des nombres afin de pouvoir réaliser une division, il faut malheureusement que je remette les espaces.

Voilà mon résultat actuel
T0047 ;Tuyau 1m;Marque2;jardinage;124500 ;promo
T00747;Tuyau 1m;Marque2;jardinage;49800 ;promo
T0047 ;Tuyau 1m;Marque2;jardinage;124500 ;promo
T00747;Tuyau 1m;Marque2;jardinage;49800 ;promo

J'aimerai au final avoir ceci
T0047 ;Tuyau 1m;Marque2;jardinage;12 4500 ;promo
T00747;Tuyau 1m;Marque2;jardinage;49 800 ;promo
T0047 ;Tuyau 1m;Marque2;jardinage;124 500 ;promo
T00747;Tuyau 1m;Marque2;jardinage;49 800 ;promo

Quelqu'un pourraitme donner un coup de main s'il vous plaît.
Merci de l'aide que vous m'apporterez.
05/01/2016, 08h11
hackoofr

:salut: et soyez le bienvenue sur DVP ;)
Si vous pouvez nous reformuler votre requête dés le début et de :tagcode: pour insérer votre code
Donnez-nous un exemple d'un fichier d'entré, puis le résultat attendu.
:merci:

Pourquoi ne pas remplacer l'espace par un point ça te permettrait de faire des calculs sans problèmes :

Code:

1
2
3
4
5
6
7
8
9
@echo off   
setlocal enabledelayedexpansion
 
(for /f "tokens=1-6 delims=;" %%a in (sort.txt) do (
   set "$Num=%%e"
   set "$Num=!$Num: =!
   set "$Num=!$Num:~0,-3!.!$Num:~-3!"
   echo %%a;%%b;%%c;%%d;!$Num!;%%f
))>sortie.csv

Ensuite si tu veux faire des calculs en virgule flottante directement :

Code:

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
@echo off&cls
::On cree le calculateur virgule flottante VBS
if not exist "Math.vbs" echo Wscript.echo replace(eval(WScript.Arguments(0)),",",".")>Math.vbs
 
setlocal enabledelayedexpansion
::On envoie une division par 2 sur tout les articles ==> call:Math %%b / 2
 
for /f "tokens=2,5 delims=;" %%a in (sortie.csv) do (
  call:Math %%b/2
  Echo %%a =^> !$Result!
  echo . . .
)
 
echo fini
pause
exit/b
 
:Math
Echo Traitement de l'operation : [%*]
for /f %%x in ('cscript //nologo Math.vbs "%*"') do set $result=%%x

On peu encore simplifier en prenant directement un argument sur le bat, que tu lançeras avec en argument l'opération mathématique a effectué :

exemple :

Calcul.bat /2
Calcul.bat *3.35

Le code :

Calcul.bat

Code:

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
 
@echo off&cls
::On cree le calculateur virgule flottante VBS
if not exist "Math.vbs" echo Wscript.echo replace(eval(WScript.Arguments(0)),",",".")>Math.vbs
 
setlocal enabledelayedexpansion
::On envoie une division par 2 sur tout les articles ==> call:Math %%b / 2
 
for /f "tokens=2,5 delims=;" %%a in (sort.txt) do (
  call:Math %%b%1
  Echo %%a =^> !$Result!
  echo . . .
)
 
echo fini
pause
exit/b
 
:Math
Echo Traitement de l'operation : [%*]
for /f %%x in ('cscript //nologo Math.vbs "%*"') do set $result=%%x

;)

Plus de détails sur mon problème

Bonjour sachadee & hackoofr :)

Excusez-moi, j'avais pas vu qu'on pouvait mettre des balises pour le code.
Mais je vais y penser maintenant

Je vous donne mon code d'origine depuis le début

Je part d'un document au départ de ce format dans le document objet.txt
"T0047" ;"Tuyau 1km";"Marque2";"jardinage";"75000";"promo"
"T00747";"Tuyau 1m";Marque2";"jardinage";"30000";"promo"

je fais un script qui retire les guillemets
Code:

1 2 3 4 5 6 7 8 @echo off setlocal enabledelayedexpansion for /F "delims=" %%a in (objet.txt) do ( set a=%%a set a=!a:"=! echo !a! echo !a! >>resultat.txt )
Je retire les espaces qui sont présents dans la colonne e (cinquième) sinon çà me réalise pas la division du script 3)
Code:

1 2 3 4 5 6 7 8 @echo off setlocal enabledelayedexpansion for /F "delims=; tokens=1-6" %%a in (resultat.txt) do ( set a=%%e set a=!a: =! echo %%a;%%b;%%c;%%d;!a!;%%f echo %%a;%%b;%%c;%%d;!a!;%%f>>resultat2.txt )
:: on ne peut pas diviser par 0.6 donc on multiplie par 1666 puis divise par 1000
Code:

1 2 3 4 5 6 7 8 9 10 11 @echo off setlocal enabledelayedexpansion for /F "delims=; tokens=1-6" %%a in (resultat2.txt) do ( set a=%%e :: set /a a=!a!/0.6 set /a a=!a!*16666/10000 echo %%a;%%b;%%c;%%d;!a!;%%f echo %%a;%%b;%%c;%%d;!a!;%%f >>resultat3.txt )
Au final pour l'instant j'ai
Code:

1 2 3 T0047 ;Tuyau 1km;Marque2;jardinage;124995;promo T00747;Tuyau 1m;Marque2;jardinage;49998;promo
NB Si je ne retire pas les espace de la colonne e j'ai ce résultat
Code:

1 2 T0047 ;Tuyau 1m;Marque2;jardinage;75 ;promo T00747;Tuyau 1m;Marque2;jardinage;30 ;promo
Je voudrais avoir
Code:

1 2 3 T0047 ;Tuyau 1m;Marque2;jardinage;124 500 ;promo T00747;Tuyau 1m;Marque2;jardinage;49 800 ;promo
J'ai essayé le code que vous m'avez proposé.
J'ai juste modifié le fichier cible
Code:

1 2 3 4 5 6 7 8 @echo off setlocal enabledelayedexpansion (for /f "tokens=1-6 delims=;" %%a in (resultat.txt) do ( set "$Num=%%e" set "$Num=!$Num: =! set "$Num=!$Num:~0,-3!.!$Num:~-3!" echo %%a;%%b;%%c;%%d;!$Num!;%%f ))>resultat2.txt
Et j'ai le résultat suivant:(
Code:

1 2 T0047 ;MAGASIN_1;T;Tuyau 1km;Marque2;jardinage;75;promo T00747;MAGASIN_1;T;Tuyau 1m;Marque2;jardinage;30;promo
Maintenant si je remplace les espaces par des points par le code ci-dessous
Code:

1 2 3 4 5 6 7 8 @echo off setlocal enabledelayedexpansion for /F "delims=; tokens=1-8" %%a in (resultat.txt) do ( set a=%%e set a=!a: =.! echo %%a;%%b;%%c;%%d;!a!;%%f;%%g;%%h echo %%a;%%b;%%c;%%d;!a!;%%f;%%g;%%h >>resultat2.txt )
j'obtiens ceci
Code:

1 2 3 T0047 ;Tuyau 1m;Marque2;jardinage;124500 ;promo T00747;Tuyau 1m;Marque2;jardinage;49800 ;promo
:( ya toujours pas les espaces

Je continue de chercher une solution à mon problème.
Merci et @+

Voilà en prenant ton fichier initial objet.txt :

Citation:

"T0047";"Tuyau 1km";"Marque2";"jardinage";"75000";"promo"
"T00747";"Tuyau 1m";"Marque2";"jardinage";"30000";"promo"

Il te suffit de mettre l'operation desiré dans la variable $OP (ici *0.6). Tu ne t'occupes plus des strings. Ton fichiers est traité avec les strings et ils sont remis en fin de code.
Code:

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 @echo off ::On cree le calculateur virgule flottante VBS if not exist "Math.vbs" echo Wscript.echo Replace(FormatNumber(eval(WScript.Arguments(0)),3),",",".")>Math.vbs Set "$OP=*0.6" setlocal enabledelayedexpansion for /f "tokens=1-6 delims=;" %%a in (sort.txt) do ( set "$Num=%%~e" set "$Num=!$Num: =! set "$Num=!$Num:~0,-3!.!$Num:~-3!" call:Math !$Num!%$OP% echo "%%~a";"%%~b";"%%~c";"%%~d";"!$result!";"%%~f" ) echo FIN Exit/b :Math Echo Traitement de l'operation : [%*] for /f %%x in ('cscript //nologo Math.vbs "%*"') do set "$result=%%x
En sortie :

Citation:

Traitement de l'operation : [75.000*0.6]
"T0047";"Tuyau 1km";"Marque2";"jardinage";"45.000";"promo"
Traitement de l'operation : [30.000*0.6]
"T00747";"Tuyau 1m";"Marque2";"jardinage";"18.000";"promo"
FIN

;)

06/01/2016, 22h24
DelNC

Merci

Merci beaucoup sachadee

C'est bien le résultat que je voulais.
Le seul problème c'est que sur mon ordi çà prends environ 10 secondes par lignes à traiter.

Je vais voir si je trouver un moyen que çà aille un peu plus vite.
Sinon galère pour traiter plus de 12 000 par jours.

@+;)
07/01/2016, 02h06
sachadee

10 secondes par ligne 8O

T'as quoi comme bécane ?

vraiment bizarre !

;)
07/01/2016, 09h02
DelNC

Sachadee

pour l'instant je teste sur une VM avec un windows XP.

Je fera des tests sur une machine physique en Windows8.

Quand je lance ton code tout seul çà marche nickel.

Mais si j'aoute les autres scripts , dans la console, il y a plein de lignes qui s'affiche avec des messages d'erreur.

J'essaye de voir d'où çà vient

@+
07/01/2016, 18h40
sachadee

Quels autres scipts ?

;)

Autres sripts utilisés

Bonjour sachadee

je mets en-dessous les autres scripts que j'utilise sur le même documents

Document articles.txt à l'origine

Code:

1
2
"T0047" ;"Tuyau 1km";"Marque2";"jardinage";"75 000";"promo"
"T00747";"Tuyau 1m";Marque2";"jardinage";"30 000";"promo"

Partie du script qui retire tous les guillemets

Code:

1
2
3
4
5
6
7
8
@echo off
setlocal enabledelayedexpansion
for /F "delims=" %%a in (articles.txt) do (
        set a=%%a
        set a=!a:"=!
        echo !a!
 	echo !a! >>resultat.txt
)

Résultat ok

Code:

1
2
T0047 ;Tuyau 1km;Marque2;jardinage;75 000;promo 
T00747;Tuyau 1m;Marque2;jardinage;30 000;promo

Partie du script qui ajouter la chaîne MAGASIN_1;T

Code:

1
2
3
4
5
set champ2=MAGASIN_1;T
for /F "delims=; tokens=1,*" %%a in (resultat.txt) do (
        echo %%a;%champ2%;%%b
        echo %%a;%champ2%;%%b >>resultat2.txt
)

Resultat ok

Code:

1
2
T0047 ;MAGASIN_1;T;Tuyau 1km;Marque2;jardinage;75 000;promo  
T00747;MAGASIN_1;T;Tuyau 1m;Marque2;jardinage;30 000;promo

Je mets le script que tu m'a donné

Code:

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
@echo off
::On cree le calculateur virgule flottante VBS
if not exist "Math.vbs" echo Wscript.echo Replace(FormatNumber(eval(WScript.Arguments(0)),3),",",".")>Math.vbs
 
Set "$OP=*1666/1000"
setlocal enabledelayedexpansion
 
for /f "tokens=1-6 delims=;" %%a in (resultat2.txt) do (
   set "$Num=%%~e"
   set "$Num=!$Num: =!
   set "$Num=!$Num:~0,-3!.!$Num:~-3!"
   call:Math !$Num!%$OP%
   echo "%%~a";"%%~b";"%%~c";"%%~d";"!$result!";"%%~f"
   echo "%%~a";"%%~b";"%%~c";"%%~d";"!$result!";"%%~f" >>resultat3.txt
)
 
echo FIN
Exit/b
 
:Math
::Echo Traitement de l'operation : [%*]
for /f %%x in ('cscript //nologo Math.vbs "%*"') do set "$result=%%x

Resultat

Code:

1
2
"T0047 ";"MAGASIN_1";"T";"Tuyau 1km";"Marque2";"jardinage; ""; 
"T00747";"MAGASIN_1";"T";"Tuyau 1m";"Marque2";"jardinage; "";

08/01/2016, 00h44
itasoft

java

String sx="123456";

s1=sx.substring(0,sx.length()-3);
s2=sx.substring(sx.length()-3);

String result=s1+" "+s2;

Comme je te l'ai déjà dis tu n'as pas besoin du script qui enlève les guillemets.

Ensuite si tu change les lignes c'est clair que ça va pas marcher.

Voilà le derniers script qui part d'un fichier, qui a cette structure :

Code:

1
2
3
T0047 ;MAGASIN_1;T;Tuyau 1km;Marque2;jardinage;75 000;promo  
T00747;MAGASIN_1;T;Tuyau 1m;Marque2;jardinage;30 000;promo

le BAT

Code:

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
 
@echo off
::On cree le calculateur virgule flottante VBS
if not exist "Math.vbs" echo Wscript.echo Replace(FormatNumber(eval(WScript.Arguments(0)),3),",",".")>Math.vbs
 
Set "$OP=*0.66"
setlocal enabledelayedexpansion
 
for /f "tokens=1-8 delims=;" %%a in (input.txt) do (
   set "$Num=%%~g"
   set "$Num=!$Num: =!
   set "$Num=!$Num:~0,-3!.!$Num:~-3!"
   call:Math !$Num!%$OP%
   echo "%%~a";"%%~b";"%%~c";"%%~d";"%%~e","%%~f","!$result!";"%%~h"
   echo "%%~a";"%%~b";"%%~c";"%%~d";"%%~e","%%~f","!$result!";"%%~h">>resultat3.txt
)
 
echo FIN
Exit/b
 
:Math
::Echo Traitement de l'operation : [%*]
for /f %%x in ('cscript //nologo Math.vbs "%*"') do set "$result=%%x

Et évite les *1666/1000 pour l'opération met directement *0.6 (c'est pour ça que j'ai inclu le math.vbs)

;)

10/01/2016, 21h18
DelNC

Bonjour sachadee

dans mon cas, je dois retirer les guillemets sinon j'ai un message d'erreur quand j'importe mes informations dans la base de données.
10/01/2016, 23h22
sachadee

Ok !

Alors prend le dernier code et enlève les guillemets de sortie .

;)
11/01/2016, 06h09
DelNC

Bonjour sachadee

Tout est ok maintenant, il n'y a plus du tout de guillemets, j'ai réussi à remettre les espaces à la place des points dans la colonnes g.

Merci;)
@+