pn == 2012230015 ? 0xff0000 : \
pn == 2009210010 ? 0x00ff00 : \
pn == 2008050077 ? 0x0000ff : \
+pn == 2012230026 ? 0x0000ff : \
pn == 2012230028 ? 0xff00ff : \
+pn == 2012230018 ? 0xff00ff : \
pn == 2012230011 ? 0x00ffff : \
0xff00ff )
close($o);
my $sql;
+my @sql_location;
my $view2number;
open(my $n, '<', 'subvision-numbers.txt');
};
}
+ push @sql_location, qq{
+select
+ to_char(time, 'YYYY-MM-DD HH24:MI:SS') as time, x_axis_angle + $offset_x as x_axis_angle, y_axis_angle + $offset_y as y_axis_angle, sensor_temperature, power_source_voltage, zc.pn
+from zc
+where pn = $pn $time
+};
+
}
close($n);
</body>
};
+print $sql_fh qq{
+drop view sub_$filter ;
+create or replace view sub_$filter as
+}, join(' union ', @sql_location) . qq{
+ order by 1 asc
+};
#set > /dev/shm/$pn.env
-cat $dir/location.sql | psql --username=dpavlin -A -F "," -t zc > /dev/shm/location.txt
+#cat $dir/location.sql | psql --username=dpavlin -A -F "," -t zc > /dev/shm/location.txt
+echo "select * from sub_bakaceva" | psql --username=dpavlin -A -F "," -t zc > /dev/shm/location.txt
if [ -s /dev/shm/location.txt ] ; then
cat $dir/location.gnuplot | sed -e "s|^set terminal.*$|set terminal svg size 1200,800|" -e "s,^set output.*$,set output," > /dev/shm/location.gnuplot