Ir para conteúdo
Fórum Script Brasil
  • 0

Problema com fpdf e pdf


cabron

Pergunta

Preciso saber o comando que indica a libha em q estou!!

vou utilizar a linha q estou aqui

if (is_null($resultado1['RESULT']))

if ($tp <$ta+$soma[count($CONTADOR)])

if ($resultado1['TIPO']==T'){

$pdf->AliasNbPages();

$pdf->AddPage();//add uma página do pdf

$pdf->Ln(5);

}

<?php

require('../relatorios/fpdf.php');//configuração da classe

include("config.php");//configuração do banco

include 'cabecalho.php';

$cod_lab=$_POST['escolha];

//////////consulta do cabecalho////////////////////////////

$sql=mysql_query("select * from pacexa where PROTOCOLO='$cod_lab'");

$resulta=mysql_fetch_assoc($sql);

$pdf=new PDF("P","mm");//cria o pdf

$pdf->AliasNbPages();

$pdf->AddPage();//add uma página do pdf

$pdf->Ln(5);

$pdf->SetFont("Arial","b","10");

$pdf->Cell(20,1,"Paciente:");

$pdf->GetX();

$pdf->SetFont("Arial","b","10");

$pdf->Cell(15,1,$resulta['NO_PACIENTE']);

$pdf->SetX(170);

$pdf->SetFont("Arial","b","10");

$pdf->Cell(15,1,"Data:");

$pdf->SetFont("Arial","b","10");

$data=explode("-",$resulta['IMP_DATA']);

$pdf->SetX(181);

$pdf->Cell(15,1,$data[2]."/".$data[1]."/".$data[0]);

$pdf->Ln(5);

$pdf->SetFont("Arial","b","10");

$pdf->Cell(20,1,"Médico:");

$pdf->SetFont("Arial","b","10");

$pdf->Cell(15,1,$resulta['MEDICO']);

$pdf->SetX(168);

$pdf->SetFont("Arial","b","10");

$pdf->Cell(15,1,"Idade:");

$pdf->SetX(181);

$pdf->SetFont("Arial","b","10");

$pdf->Cell(15,1,$resulta['IDADE']);

$pdf->SetX(190);

$pdf->Cell(15,1,"ANOS");

$pdf->Ln(5);

$pdf->SetFont("Arial","b","10");

$pdf->Cell(20,1,"Convênio:");

$pdf->SetFont("Arial","B","10");

$pdf->Cell(15,1,$resulta[CONVENIO]);

$pdf->SetX(169);

$pdf->SetFont("Arial","b","10");

$pdf->Cell(15,1,"Sexo:");

$pdf->SetX(181);

$pdf->SetFont("Arial","B","10");

if ($resulta['SEXO_PACIENTE']==M'){

$pdf->Cell(15,1,"Masculino");

}else{

$pdf->Cell(15,1,"Feminino");

}

$pdf->Ln(5);

$pdf->SetFont("Arial","B","8");

$pdf->Cell(20,1,"Emitido em:");

$pdf->Cell(20,1,$data[2]."/".$data[1]."/".$data[0]);

$pdf->Cell(15,1,$resulta['IMP_HORA]);

$pdf->Ln(5);

$pdf->SetFont("Arial","B","12");

$sqli=mysql_query("select * from pacexa where PROTOCOLO='$cod_lab'");

while ($resultado=mysql_fetch_assoc($sqli)){

////////////////consulta dos resultados/////////////////////////////

$sql1=mysql_query("select TEXTO,RESULT,UNIDADE,UNIFOR,

NORMAL,TIPO from resitem where CONTADOR='$resultado[CONTADOR]'");

$resultado1=mysql_fetch_assoc($sql1);

$verifica=mysql_query("select count(CONTADOR)from resitem where CONTADOR=$resultado[CONTADOR]'");

$soma=mysql_fetch_assoc($verifica);

$pdf->SetFont("Arial","B","12");

$pdf->Cell(200,1,$resultado['NOME],0,0,'C');

$pdf->Ln(10);

$pdf->SetFont("Arial","b","8");

while ($resultado1=mysql_fetch_assoc($sql1)){

if ($resultado1['UNIDADE']!="){

$posicao='R';

}else{

$posicao="L";

}

$pdf->SetX(5);

$pdf->Cell(20,1,$resultado1['TEXTO]);

$pdf->SetX(65);

$pdf->Cell(15,1,$resultado1['RESULT'],0,0,$posicao);

$pdf->SetX(80);

$pdf->Cell(15,1,$resultado1['UNIDADE']);

$pdf->SetX(110);

$pdf->Cell(15,1,$resultado1['UNIFOR']);

$pdf->SetX(140);

$pdf->Cell(15,1,$resultado1['NORMAL']);

$pdf->Ln(5);

if (is_null($resultado1['RESULT']))

if ($tp <$ta+$soma[count($CONTADOR)])

if ($resultado1['TIPO']=='T'){

$pdf->AliasNbPages();

$pdf->AddPage();//add uma página do pdf

$pdf->Ln(5);

}

}

}

$pdf->output();

?>

Link para o comentário
Compartilhar em outros sites

1 resposta a esta questão

Posts Recomendados

  • 0

amigao tem um forma de ver txt não sei se funciona com pdf mais vou postar aqui

<? 
//abro o arquivo para leitura 
$arquivo = fopen ("meuarquivo.txt", "r"); 

//inicio uma variavel para levar a conta das linhas e dos caracteres 
$num_linhas = 0; 
$caracteres = 0; 

//faco um loop para percorrer o arquivo linha a linha ate o final do arquivo 
while (!feof ($arquivo)) { 
    //se extraio uma linha do arquivo e não é false 
    if ($linha = fgets($arquivo)){ 
          //acumulo uma na variavel número de linhas 
       $num_linhas++; 
          //acumulo o número de caracteres desta linha 
          $caracteres += strlen($linha); 
    } 
} 
fclose ($arquivo); 
echo "
Linhas: " . $num_linhas; 
echo "
Caracteres: " . $caracteres; 
?>

Link para o comentário
Compartilhar em outros sites

Participe da discussão

Você pode postar agora e se registrar depois. Se você já tem uma conta, acesse agora para postar com sua conta.

Visitante
Responder esta pergunta...

×   Você colou conteúdo com formatação.   Remover formatação

  Apenas 75 emoticons são permitidos.

×   Seu link foi incorporado automaticamente.   Exibir como um link em vez disso

×   Seu conteúdo anterior foi restaurado.   Limpar Editor

×   Você não pode colar imagens diretamente. Carregar ou inserir imagens do URL.



  • Estatísticas dos Fóruns

    • Tópicos
      152,1k
    • Posts
      651,7k
×
×
  • Criar Novo...