awk -F"^" '
/Noviembre 2012/ { flag=1 }
flag=="" { next }
$1+0 >0 { dd=sprintf("%.2d/11/2012",$1) }
dd=="" { next }
$3+0 > 0 {
GL=toupper($2" "$4)
rr=index(GL," CH ")
CH=""
if (rr>0 ) { CH=substr(GL,rr) ; GL=substr(GL,1,rr-1)}
print dd":BSS:"GL":"$3"::"CH
}
$9+0 > 0 {
GL=toupper($8" "$10)
rr=index(GL," CH ")
CH=""
if (rr>0 ) { CH=substr(GL,rr) ; GL=substr(GL,1,rr-1)}
print dd":BCI:"GL":"$9"::"CH
}
$15+0 > 0 {
GL=toupper($14" "$16)
rr=index(GL," CH ")
CH=""
if (rr>0 ) { CH=substr(GL,rr) ; GL=substr(GL,1,rr-1)}
	print dd":BCH:"GL":"$15"::"CH
}
$5+0 > 0 {
GL=toupper($6)
print dd":BSS:"GL":"$5
}
$11+0 > 0 {
GL=toupper($12)
print dd":BCI:"GL":"$11
}
$17+0 > 0 {
GL=toupper($18)
print dd":BCH:"GL":"$17
}

' Flujos.csv >FLU

