#!/usr/bin/perl
# $Id: forminlog,v 1.1 2001/02/07 13:22:49 stes Exp $

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

$flag=$ARGV[0];
$chain=$ARGV[1];
$num=$ARGV[2];

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

formselect($form,'logrule',$flag,$chain,$num,'Log on Incoming Interface',1,0,1,0);

print "open $form\n";

