rm ES/*
awk  -F"^" ' BEGIN {
}
$1+0 {
file="ES/B"NR
printf "H01%3.3s\n",$2 > file
print "H02"$3> file
print "H03"substr($4,1,2) > file
print "H04"$5 > file
print "H0600" > file
print "" >file
 }
 ' Materiales.csv 
>../data/mater/H
>../data/mater/HEAD
>../data/mater/DOC
echo -n "    0     0">../data/mater/INFO

for i in ES/*
do
../ihd/bin/ihmu mater ../../import/$i -N1
done
exit
00097;ALUC;ALUMINIO COMPUESTO 122X244 5MM                             ;"03|cm&sup2;  ";2,2;                                                  ;00|ABIERTO   
00086;ALUC;ALUMINIO COMPUESTO 122X244 NEGRO 3MM                          ;"03|cm&sup2;  ";1,2;                                                  ;00|ABIERTO   
00108;ALUC;ALUMINIO COMPUESTO 122X244 SILVER 3MM                      ;"03|cm&sup2;  ";1,2;                                                  ;00|ABIERTO   
00046;BRO;BRONCE DE 1MM                                 ;04|c/u       ;660;                                                  ;00|ABIERTO   
00055;CAL-LED;CALUGA LED                                        ;01|m         ;1000;                                                  ;00|ABIERTO   
