21 lines
816 B
Plaintext
21 lines
816 B
Plaintext
#include <basico.h>
|
|
|
|
algoritmo
|
|
|
|
número de campos correcto = `awk 'NF != 49' basica/readings.txt`
|
|
|
|
fechas repetidas = `awk '++count[$1] >= 2{print $1, "(",count[$1],")"}' basica/readings.txt`
|
|
|
|
resultados buenos = `awk '{rec++;ok=1; for(i=0;i<24;i++){if($(2*i+3)<1){ok=0}}; recordok += ok} END {print "Total records",rec,"OK records", recordok, "or", recordok/rec*100,"%"}' basica/readings.txt`
|
|
|
|
|
|
"Check field number by line: ", #( !(number(número de campos correcto)) ? "Ok\n" : "Nok\n";),\
|
|
"\nCheck duplicated dates:\n", fechas repetidas,NL, \
|
|
"Number of records have good readings for all instruments:\n",resultados buenos,\
|
|
"(including "
|
|
fijar separador( NL )
|
|
contar tokens en 'fechas repetidas'
|
|
" duplicated records)\n", luego imprime todo
|
|
|
|
terminar
|