Boa tarde,
Estou utilizando a a biblioteca TCPDF para fazer um relatório, a primeira página está funcionando perfeitamente, mas a partir dai as configurações de layout são perdidas.
Se alguém puder me ajudar a identificar algum erro.
Estou anexando o PDF gerado.
[code]sc_include_lib(“tcpdf”);
$pdf = new tcpdf(‘L’,‘mm’,‘A4’);
$pdf->Open();
$pdf->AddPage();
$pdf->SetPrintHeader(false);
$pdf->SetPrintFooter(false);
$relatorio_name = “Respostas da Empresa”;
$pdf->Write(0, $relatorio_name, ‘’, 0, ‘C’, true, 0, false, false, 0);
$empresa_name = “[empresa]”;
$pdf->Write(0, $empresa_name, ‘’, 0, ‘C’, true, 0, false, false, 0);
$x = array(“ano_0”=>150, “ano_1”=>170, “ano_2”=>190, “ano_3”=>210, “ano_4”=>230, “ano_5”=>250, “ano_6”=>270);
$y = 30;
$ano = list_of_years();
$pdf->SetFont(‘courier’,‘B’,10);
$pdf->SetXY($x[‘ano_0’], $y);
$pdf->Write(0, $ano[0][‘ano’], ‘’, 0, ‘L’, true, 0, false, false, 0);
$pdf->SetXY($x[‘ano_1’], $y);
$pdf->Write(0, $ano[1][‘ano’], ‘’, 0, ‘L’, true, 0, false, false, 0);
$pdf->SetXY($x[‘ano_2’], $y);
$pdf->Write(0, $ano[2][‘ano’], ‘’, 0, ‘L’, true, 0, false, false, 0);
$pdf->SetXY($x[‘ano_3’], $y);
$pdf->Write(0, $ano[3][‘ano’], ‘’, 0, ‘L’, true, 0, false, false, 0);
$pdf->SetXY($x[‘ano_4’], $y);
$pdf->Write(0, $ano[4][‘ano’], ‘’, 0, ‘L’, true, 0, false, false, 0);
$pdf->SetXY($x[‘ano_5’], $y);
$pdf->Write(0, $ano[5][‘ano’], ‘’, 0, ‘L’, true, 0, false, false, 0);
$pdf->SetXY($x[‘ano_6’], $y);
$pdf->Write(0, $ano[6][‘ano’], ‘’, 0, ‘L’, true, 0, false, false, 0);
$informacoes = list_of_information();
$y += 10;
$i = 1;
foreach($informacoes as $inf){
$informacao = $i."- ".$inf['informacao'];
$pdf->SetFont('courier','B',10);
$pdf->SetXY(5, $y);
$pdf->Write(0, $informacao, '', 0, 'L', true, 0, false, false, 0);
$i++;
[id_informacao] = $inf['id_informacao'];
$dados = list_data();
$y +=7;
$pdf->SetFont('courier','',10);
foreach($dados as $d){
$y +=5;
$j=0;
$pdf->SetXY(10, $y);
$pdf->Write(0, $d['planta'], '', 0, 'L', true, 0, false, false, 0);
while($j < 7){
$pdf->SetXY($x['ano_'.$j], $y);
$pdf->Write(0, $d['ano_'.$j], '', 0, 'L', true, 0, false, false, 0);
$j++;
}
}
$y += 15;
}
$pdf->Output();
[/code]
doc2-1-50.pdf (30.1 KB)