split vdr routines to Tracovdr.pm
fixes