#!/usr/bin/perl
# $Id: formfwdlog,v 1.2 2001/02/07 14:10:29 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',0,0,1,0);

print "open $form\n";

