#!/bin/sh

# disable filename globbing

{
BASE=`pwd`
HOME=$BASE
APPLDIR=$BASE/appl
DATADIR=$BASE/data
PATH=$PATH:$BASE/ihd/bin:.
export PATH APPLDIR DATADIR HOME
cp $1 ./ihd/etc/pp
awk ' BEGIN {
print "<html>"
print "<head>"
print "<meta http-equiv=\"Content-Type\" content=\"text/html\">"
print "<meta name=\"GENERATOR\" content=\"Inhedo 4gt 1.0\">"
print "<meta name=\"ProgId\" content=\"Inhedo Form Generator\">"
print "<META HTTP-EQUIV=\"refresh\" content=\"0;URL=../cgi-bin/produccionpedidos\">"
print "</head>"
print "</body>"
print "</head>"
}
'
}
