#! /bin/sh

DB=${1:-tdn}

#monitor -TN -c "retrieve (the_oid= weg.oid, frompnt= PointSelector(weg.pln2, 1), topnt= PointSelector(weg.pln2, -1), length= Length2Pln(weg.pln2)) from weg in wegen* where weg.geo_bbox && \"(191000,480700,197400,487000)\"::box" $DB > net.data

monitor -TN -c "retrieve (the_oid= weg.oid, frompnt= PointSelector(weg.pln2, 1), topnt= PointSelector(weg.pln2, -1), length= Length2Pln(weg.pln2)) from weg in wegen*" $DB | awk '
NF == 4 { print $1, $2, $3, int($4) }' > net.data