Código PHP:
<?php
require_once 'classes/Detalle.class.php';
include("fpdf17/fpdf.php");/* incluimos primeramente el archivo que contiene la clase fpdf */
$encuestanro=$_POST["encuestanro"];
$idioma=$_POST["idioma"];
$name_booking=$_POST["name_booking"];
$travel_date=$_POST["travel_date"];
$travel_agent=$_POST["travel_agent"];
if (isset($_POST["full_reference"])) {$pvft=$_POST["full_reference"];}else{$pvft='0';}
if (isset($_POST["reg"])) {$reg=$_POST["reg"];}else{$reg='5';}
$detalle = new Detalle();
$pdf = new FPDF();/* tenemos que generar una instancia de la clase */
$pdf->Open();//Open file
$pdf->SetAutoPageBreak(false);//Disable automatic page break
//$pdf->AddPage();
$pdf ->AddPage('P', 'Letter');
$pdf->SetFont('Helvetica', 'B', 12);/* seleccionamos el tipo, estilo y tamaño de la letra a utilizar */
$pdf->Cell(140,6,"FEEDBACK QUESTIONNAIRE",1);/*celda con titulo*/
$pdf->AliasNbPages();
$pdf->Cell(50,6,"",1);/*celda para Folio*/
$pdf->Ln(); //salto de linea
$pdf->SetFont('Arial','',6);/* seleccionamos el tipo, estilo y tamaño de la letra a utilizar*/
$pdf->Multicell(190,4,"Your feedback is very important to us and we would greatly appreciate hearing your opinion as it may help us with the improvement of quality and future services.After completing the questionnaire please fold it and seal it with the adhesive tape at the bottom of the page. Please leave it with the guide or driver on your last service provided by Protours.",1,'J');
$pdf->Ln(); //salto de linea
$pdf->SetFont('Arial','',7);/* seleccionamos el tipo, estilo y tamaño de la letra a utilizar para el membrete del booking*/
$pdf->SetTextColor(0,0,250);/* cambiamos el color de la letra*/
$pdf->Write (3,"Booking Name:");$pdf->Write (3,$_POST['name_booking']);
$pdf->Ln(); //salto de linea
$pdf->Write (3,"Travel Date:");$pdf->Write(3,$_POST['travel_date']);
$pdf->Ln(); //salto de linea
$pdf->Write (3,"Your Travel Agent:");$pdf->Write(3,$_POST['travel_agent']);
$pdf->Ln(); //salto de linea
$pdf->Write (3,"Protours Booking Reference:");$pdf->Write(3,$_POST['full_reference']);
$pdf->Ln(5); //salto de linea
$pdf->Cell(190,6,"Please evaluate from 1 to 5 according to the following:",0);/*celda para Folio*/
$pdf->Ln(8);//salto de linea
$pdf->Cell(38,6,"1=Poor",0);/*celda para Folio*/
$pdf->Cell(38,6,"2=Average",0);/*celda para Folio*/
$pdf->Cell(38,6,"3=Good",0);/*celda para Folio*/
$pdf->Cell(38,6,"4=Very Good",0);/*celda para Folio*/
$pdf->Cell(38,6,"5=Excellent",0);/*celda para Folio*/
$pdf->Ln(8); //salto de linea
/////////////////////////////////////////////////////////////////////////////////////////////////////////////
$pdf->SetFont('Arial','B',8);/* seleccionamos el tipo, estilo y tamaño de la letra a utilizar para el membrete del booking*/
$pdf->SetFillColor(0, 0, 255); //Gris tenue de cada fila
$pdf->SetTextColor(0,0,250);/* cambiamos el color de la letra*/
$pdf->Cell(150,5,"PROTOURS",1);
$pdf->Cell(40,5,"RATE",1);
$pdf->Ln(5);//ahora salta 5 lineas
$grupo='1';
$preguntas = $detalle->BuscaPreguntas($grupo);
while ($row = odbc_fetch_array($preguntas)) {
$pdf->SetFont('Arial','',6);
$pdf->SetFillColor(229, 229, 229); //Gris tenue de cada fila
$pdf->SetTextColor(3,3,3);/* cambiamos el color de la letra*/
$pdf->Cell(150, 4, utf8_encode($row['Pregunta']), 1);
$pdf->Cell(40,4,"",1);
$pdf->Ln(); //salto de linea
}
$pdf->SetFont('Arial','',6);
$pdf->SetFillColor(229, 229, 229); //Gris tenue de cada fila
$pdf->SetTextColor(3,3,3);/* cambiamos el color de la letra*/
$pdf->Cell(190,4,"Additional Comments:",1);
$pdf->Ln(); //salto de linea
$pdf->Multicell(190,20,"",1,'C');
$pdf->Ln(5); //salto de linea
////////////////////////////////////GRUPO 2///////////////////////////////////
$pdf->SetFont('Arial','B',8);/* seleccionamos el tipo, estilo y tamaño de la letra a utilizar para el membrete del booking*/
$pdf->SetFillColor(229, 229, 229); //Gris tenue de cada fila
$pdf->SetTextColor(0,0,250);/* cambiamos el color de la letra*/
$pdf->Cell(150,5,"ACCOMMODATION",1);
$pdf->Cell(40,5,"RATE",1);
$pdf->Ln(5);//ahora salta 5 lineas
$grupo='2';
$service='AC';
$servicios = $detalle->BuscaServicios($pvft,$service,$reg);
while ($servicio = odbc_fetch_array($servicios))
{
$preguntas = $detalle->BuscaPreguntas($grupo);
while ($row = odbc_fetch_array($preguntas)) {
$pdf->SetFont('Arial','',6);
$pdf->SetFillColor(229, 229, 229); //Gris tenue de cada fila
$pdf->SetTextColor(3,3,3);/* cambiamos el color de la letra*/
$pdf->Cell(150, 4, utf8_encode($row['Pregunta'].''.$servicio['NAME_LOCATION'].' - '.utf8_encode($servicio['SUPPLIER']).''), 1);
$pdf->Cell(40,4,"",1);
$pdf->Ln(); //salto de linea
}
}
$pdf->SetFont('Arial','',6);
$pdf->SetFillColor(229, 229, 229); //Gris tenue de cada fila
$pdf->SetTextColor(3,3,3);/* cambiamos el color de la letra*/
$pdf->Cell(190,4,"Additional Comments:",1);
$pdf->Ln(); //salto de linea
$pdf->Multicell(190,20,"",1,'C');
$pdf->Ln(5); //salto de linea
////////////////////////////////////GRUPO 3///////////////////////////////////
$pdf->SetFont('Arial','B',8);/* seleccionamos el tipo, estilo y tamaño de la letra a utilizar para el membrete del booking*/
$pdf->SetFillColor(229, 229, 229); //Gris tenue de cada fila
$pdf->SetTextColor(0,0,250);/* cambiamos el color de la letra*/
$pdf->Cell(150,5,"GUIDES",1);
$pdf->Cell(40,5,"RATE",1);
$pdf->Ln(5);//ahora salta 5 lineas
$grupo='3';
$service='GS';
$servicios = $detalle->BuscaServicios($pvft,$service,$reg);
while ($servicio = odbc_fetch_array($servicios))
{
$preguntas = $detalle->BuscaPreguntas($grupo);
while ($row = odbc_fetch_array($preguntas)) {
$pdf->SetFont('Arial','',6);
$pdf->SetFillColor(229, 229, 229); //Gris tenue de cada fila
$pdf->SetTextColor(3,3,3);/* cambiamos el color de la letra*/
$pdf->Cell(150, 4, utf8_encode($row['Pregunta'].''.$servicio['NAME_LOCATION'].' - '.utf8_encode($servicio['SUPPLIER']).'('.$servicio['GUIDE'].')'), 1);
$pdf->Cell(40,4,"",1);
$pdf->Ln(); //salto de linea
}
}
$pdf->SetFont('Arial','',6);
$pdf->SetFillColor(229, 229, 229); //Gris tenue de cada fila
$pdf->SetTextColor(3,3,3);/* cambiamos el color de la letra*/
$pdf->Cell(190,4,"Additional Comments:",1);
$pdf->Ln(); //salto de linea
$pdf->Multicell(190,20,"",1,'C');
$pdf->Ln(5); //salto de linea
////////////////////////////////////GRUPO 4///////////////////////////////////
$pdf->SetFont('Arial','B',8);/* seleccionamos el tipo, estilo y tamaño de la letra a utilizar para el membrete del booking*/
$pdf->SetFillColor(229, 229, 229); //Gris tenue de cada fila
$pdf->SetTextColor(0,0,250);/* cambiamos el color de la letra*/
$pdf->Cell(150,5,"TRANSPORTATION",1);
$pdf->Cell(40,5,"RATE",1);
$pdf->Ln(5);//ahora salta 5 lineas
$grupo='4';
$service='TR';
$servicios = $detalle->BuscaServicios($pvft,$service,$reg);
while ($servicio = odbc_fetch_array($servicios))
{
$preguntas = $detalle->BuscaPreguntas($grupo);
while ($row = odbc_fetch_array($preguntas)) {
$pdf->SetFont('Arial','',6);
$pdf->SetFillColor(229, 229, 229); //Gris tenue de cada fila
$pdf->SetTextColor(3,3,3);/* cambiamos el color de la letra*/
$pdf->Cell(150, 4, utf8_encode($row['Pregunta'].''.$servicio['NAME_LOCATION'].' - '.utf8_encode($servicio['SUPPLIER']).'('.$servicio['DRIVER'].')'), 1);
$pdf->Cell(40,4,"",1);
$pdf->Ln(); //salto de linea
}
}
$pdf->SetFont('Arial','',6);
$pdf->SetFillColor(229, 229, 229); //Gris tenue de cada fila
$pdf->SetTextColor(3,3,3);/* cambiamos el color de la letra*/
$pdf->Cell(190,4,"Additional Comments:",1);
$pdf->Ln(); //salto de linea
$pdf->Multicell(190,20,"",1,'C');
$pdf->Ln(5); //salto de linea
////////////////////////////////////GRUPO 5///////////////////////////////////
$pdf->SetFont('Arial','B',8);/* seleccionamos el tipo, estilo y tamaño de la letra a utilizar para el membrete del booking*/
$pdf->SetFillColor(229, 229, 229); //Gris tenue de cada fila
$pdf->SetTextColor(0,0,250);/* cambiamos el color de la letra*/
$pdf->Cell(150,5,"RENTAL CAR",1);
$pdf->Cell(40,5,"RATE",1);
$pdf->Ln(5);//ahora salta 5 lineas
$grupo='5';
$service='RC';
$servicios = $detalle->BuscaServicios($pvft,$service,$reg);
while ($servicio = odbc_fetch_array($servicios))
{
$preguntas = $detalle->BuscaPreguntas($grupo);
while ($row = odbc_fetch_array($preguntas)) {
$pdf->SetFont('Arial','',6);
$pdf->SetFillColor(229, 229, 229); //Gris tenue de cada fila
$pdf->SetTextColor(3,3,3);/* cambiamos el color de la letra*/
$pdf->Cell(150, 4, utf8_encode($row['Pregunta'].''.$servicio['NAME_LOCATION'].' - '.utf8_encode($servicio['SUPPLIER']).''), 1);
$pdf->Cell(40,4,"",1);
$pdf->Ln(); //salto de linea
}
}
$pdf->SetFont('Arial','',6);
$pdf->SetFillColor(229, 229, 229); //Gris tenue de cada fila
$pdf->SetTextColor(3,3,3);/* cambiamos el color de la letra*/
$pdf->Cell(190,4,"Additional Comments:",1);
$pdf->Ln(); //salto de linea
$pdf->Multicell(190,20,"",1,'C');
$pdf->Ln(5); //salto de linea
//$pdf->Output("$pvft.pdf");
$pdf->Output("Encuesta.pdf");
echo "<script language='javascript'>window.open('Encuesta.pdf','_ self','');</script>";//para ver el archivo pdf generado
exit;
?>