print qq|<input type="hidden" name="doctyp" value=$doctyp>\n|;