setExercicio ( Sessao::getExercicio() ); $obRRelatorio->setCodigoEntidade( Sessao::getCodEntidade($boTransacao) ); $obRRelatorio->setExercicioEntidade( Sessao::getExercicio() ); $obRRelatorio->recuperaCabecalho( $arConfiguracao ); $obPDF->setModulo ( "Pessoal" ); $obPDF->setTitulo ( "Relatório de Erros do Cálculo da Folha Férias" ); $obPDF->setSubTitulo ( Sessao::getExercicio() ); $obPDF->setUsuario ( Sessao::getUsername() ); $obPDF->setEnderecoPrefeitura( $arConfiguracao ); $rsRecordSet = Sessao::read("rsErros") ; while ( !$rsRecordSet->eof() ) { $rsContrato = new Recordset; $rsContrato->preenche($rsRecordSet->getCampo('contrato')); $obPDF->addRecordSet($rsContrato); $obPDF->setAlinhamento ( "R" ); $obPDF->addCabecalho ( "", 10, 10); $obPDF->addCabecalho ( "", 100, 10); $obPDF->setAlinhamento ( "R" ); $obPDF->addCampo ( "campo1", 8 ); $obPDF->setAlinhamento ( "L" ); $obPDF->addCampo ( "campo2", 8 ); $rsLogErro = new Recordset; $rsLogErro->preenche($rsRecordSet->getCampo('erros')); $obPDF->addRecordSet($rsLogErro); $obPDF->setQuebraPaginaLista( false ); $obPDF->setAlinhamento ( "C" ); $obPDF->addCabecalho ( "Evento", 10, 10 ); $obPDF->addCabecalho ( "Descrição", 40, 10 ); $obPDF->addCabecalho ( "Erro do Cálculo", 40, 10 ); $obPDF->setAlinhamento ( "R" ); $obPDF->addCampo ( "evento", 8 ); $obPDF->setAlinhamento ( "L" ); $obPDF->addCampo ( "descricao", 8 ); $obPDF->setAlinhamento ( "L" ); $obPDF->addCampo ( "erro", 8 ); $rsRecordSet->proximo(); } $obPDF->show(); ?>