#!/usr/bin/perl
# $Id: addtbf,v 1.1 2001/02/16 17:07:21 stes Exp $

$IPMENU=$ENV{'IPMENU'};
require "$IPMENU/ipmenu.lib";

$dev=$ARGV[0];

$form="$TMP/Form.$$";

formtbf($form,"$dev");

print "open $form\n";

