get("pg") and $request->get("pos") ) { $stLink.= "&pg=".$request->get("pg")."&pos=".$_GET["pos"]; $link["pg"] = $request->get("pg"); $link["pos"] =$request->get("pos"); } Sessao::write("link",$link); //USADO QUANDO EXISTIR FILTRO //NA FL O VAR LINK DEVE SER RESETADA if ( is_array(Sessao::read("link")) ) { $_REQUEST = Sessao::read("link"); } else { foreach ($_REQUEST as $key => $valor) { $link[$key] = $valor; } Sessao::write("link",$link); } $stNomBase = $_REQUEST['stNomBase']; if (trim($stNomBase)!="") { $stCondicao = " WHERE nom_base ilike ('%".trim($stNomBase)."%')"; } $stOrdem = " ORDER BY nom_base"; $obTFolhaPagamentoBases = new TFolhaPagamentoBases(); $obTFolhaPagamentoBases->recuperaTodos($rsLista, $stCondicao, $stOrdem); $obLista = new Lista; $obLista->setRecordSet( $rsLista ); $obLista->addCabecalho(); $obLista->ultimoCabecalho->addConteudo(" "); $obLista->ultimoCabecalho->setWidth( 2 ); $obLista->commitCabecalho(); $obLista->addCabecalho(); $obLista->ultimoCabecalho->addConteudo( "Descrição" ); $obLista->ultimoCabecalho->setWidth( 55 ); $obLista->commitCabecalho(); $obLista->addCabecalho(); $obLista->ultimoCabecalho->addConteudo(" "); $obLista->ultimoCabecalho->setWidth( 2 ); $obLista->commitCabecalho(); $obLista->addDado(); $obLista->ultimoDado->setCampo( "nom_base" ); $obLista->commitDado(); $obLista->addAcao(); $obLista->ultimaAcao->setAcao( $stAcao ); $obLista->ultimaAcao->addCampo( "&inCodBase", "cod_base"); if ($stAcao == "excluir") { $obLista->ultimaAcao->addCampo( "&stDescQuestao" , "nom_base" ); $obLista->ultimaAcao->setLink( $stCaminho.$pgProx."?".Sessao::getId().$stLink ); } else { $obLista->ultimaAcao->setLink( $pgProx."?".Sessao::getId().$stLink ); } $obLista->commitAcao(); $obLista->show(); ?>