echo "insert into table1 values ('$1',sysdate,null,null,null,'OP',null,'$5','IR',$2,$4,$3);" >> $OPONE
}

COW ()
{
echo "insert into COLL values ('$1',sysdate,null,null,null,'OP',null,'$5','$2','$3','$4','$6','0');" >> $OPCOW
L_FILE
}

MONKS ()
{
echo "insert into monks values ('$1',sysdate,null,null,null,'OP',null,'$8','$5',2329,$2,$4,$3);" >> $OPTHREE
}


ARAMPSBADJ ()
{
echo "insert into aramp values ('$1',sysdate,null,null,null,'OP',null,'B');" >> $OP
}



##</code><code>##

MONKS ()
{
echo "insert into monks values ('$1',sysdate,null,null,null,'OP',null,'$8','$5',9999,$2,$4,$3);" >> $OPTHREE
}

##</code><code>##


while(<INPUT>)
{
if ( $flag == 1 ) {
s/MONKSPART/MONKSPART$newchanges/ if /MONKS ()/;
$flag = 0 if /^fi/;
                }
                $flag = 1 if /^}/;

}