PDF_end_page($p);
PDF_close($p);
$mybuf = PDF_get_buffer($p);
$mylen = strlen($mybuf);

file_put_contents("pdf/T.pdf", $mybuf);

header("Content-type: application/pdf");
header("Content-Length: $mylen");
header("Content-Disposition: inline; filename=\"T".$q_t["tamenr"].".pdf\"");
print $mybuf;
PDF_delete($p);