$clitburbano = new cl_itburbano();
$clitbimatric = new cl_itbimatric();
$clitbipropriold = new cl_itbipropriold();
$clpropri = new cl_propri();
$clitbidadosimovel = new cl_itbidadosimovel();
$clitbinome = new cl_itbinome();
$clitbinomecgm = new cl_itbinomecgm();
parse_str($HTTP_SERVER_VARS["QUERY_STRING"]);
postmemory($HTTP_POST_VARS);
//echo "tipo = $tipo ";
if ($cod != "") {
echo "\n\t\t\t<script>\n \t\tparent.document.form1.disabilitado.value='nao';\n\t\t\t\tparent.trocacor('1');\n\t\t\t</script>\n\t\t";
}
if (isset($incluir)) {
if ($incluir == "Incluir") {
db_inicio_transacao();
// inclui na itbi..................................................
$sqlerro = false;
$clitbi->it01_data = date("Y-m-d");
$clitbi->it01_hora = date("H:i");
$clitbi->it01_tipotransacao = $it01_tipotransacao;
$clitbi->it01_areaterreno = $it01_areaterreno;
$clitbi->it01_areaedificada = $it01_areaedificada;
$clitbi->it01_obs = $it01_obs;
$clitbi->it01_valortransacao = $it01_valortransacao;
$clitbi->it01_areatrans = $it01_areatrans;
$clitbi->it01_mail = $it01_mail;
$clitbi->it01_valortransacaofinanc = $it01_valortransacaofinanc;
$clitbi->it01_finalizado = false;
$clitbi->incluir(null);
if ($clitbi->erro_status == 0) {
function db_anulaPlanilha($planilha, $motivo, $ip)
{
$clissplananula = new cl_issplananula();
$clissplan = new cl_issplan();
$clarrecad = new cl_arrecad();
$clcancdebitos = new cl_cancdebitos();
$data = date("Y-m-d");
$hora = date("H:i");
$usuario = db_getsession("id");
if ($usuario == "") {
$usuario = 1;
}
$sql = "select * from issplan where q20_planilha = {$planilha}";
$result = pg_query($sql);
$linhas = pg_num_rows($result);
if ($linhas > 0) {
$q20_numpre = pg_result($result, 0, "q20_numpre");
}
$sqlerro = false;
db_inicio_transacao();
//gravar na issplananula: os dados da anulação
$clissplananula->q76_planilha = $planilha;
$clissplananula->q76_data = $data;
$clissplananula->q76_hora = $hora;
$clissplananula->q76_motivo = "Planilha anulada DBPref. " . $motivo;
$clissplananula->q76_ip = $ip;
$clissplananula->q76_id_usuario = $usuario;
$clissplananula->incluir(null);
if ($clissplananula->erro_status == 0) {
$sqlerro = true;
//die($clissplananula->erro_sql);
$erro_msg = $clissplananula->erro_msg;
}
//alterar a situação da issplan para anulada
$clissplan->q20_planilha = $planilha;
$clissplan->q20_situacao = 5;
$clissplan->alterar($planilha);
if ($clissplan->erro_status == 0) {
$sqlerro = true;
$erro_msg = $clissplan->erro_msg;
}
if ($q20_numpre > 0) {
//gravar na cancdebitos, cancdebitosreg, cancdebitosproc, cancdebitosprocreg
$sqltipo = "select w10_tipo from db_confplan ";
$resulttipo = pg_query($sqltipo);
$linhastipo = pg_num_rows($resulttipo);
if ($linhastipo > 0) {
//db_fieldsmemory($resulttipo,0);
$w10_tipo = pg_result($resulttipo, 0, "w10_tipo");
} else {
$sqlerro = true;
$erro_msg = "Deve-se configurar a planilha (db_confplan)";
}
$clcancdebitos->k20_descr = "anulação de planilha no dbpref.";
$clcancdebitos->k20_hora = $hora;
$clcancdebitos->k20_data = $data;
$clcancdebitos->k20_usuario = $usuario;
$clcancdebitos->k20_instit = db_getsession("DB_instit");
$clcancdebitos->numpre = $q20_numpre;
$clcancdebitos->numpar = 1;
$clcancdebitos->k21_obs = "Planilha anulada DBPref. " . $motivo;
$clcancdebitos->usuario = $usuario;
$clcancdebitos->tipo = $w10_tipo;
$clcancdebitos->planilha = $planilha;
$clcancdebitos->incluir_cancelamento(true);
if ($clcancdebitos->erro_status == "0") {
$sqlerro = true;
$erro_msg = $clcancdebitos->erro_msg;
}
//grava na cancdebitosissplan
//deletar da arrecad e gravar na arrecant
$clarrecad->excluir_arrecad_inc_arrecant($q20_numpre, 1, true);
if ($clarrecad->erro_status == 0) {
$sqlerro = true;
$erro_msg = $clarrecad->erro_msg;
}
}
db_fim_transacao($sqlerro);
return $sqlerro;
}
/**
* Cria L.O. Vazio no Banco de dados e retorna se OID
* @param integer $lTemTransacaoAtiva
*/
public static function criaOID($lTemTransacaoAtiva = false)
{
global $conn;
if (!$lTemTransacaoAtiva) {
db_inicio_transacao();
}
$iOidGerado = pg_lo_create($conn);
if (!$lTemTransacaoAtiva) {
db_fim_transacao();
}
return $iOidGerado;
}
/**
* Funçao que retorna o número + 1 do ultimo alvará cadastrado para evitar descontinuidade na sequence.
* O numero estará armazenado na tabela de parâmetro issbasenumeracao
* No momento da chamada da função esse número será atualizado para o próximo (q133_numeracaoatual + 1)
* e atribuido a váriavel q02_inscr da classe
*
* @return boolean
*/
function getNumeroContinuo()
{
$lTransacaoInterna = false;
$lErro = false;
if (!db_utils::inTransaction()) {
$lTransacaoInterna = true;
db_inicio_transacao();
}
$sUpdate = "update issbasenumeracao \t\t\t\t\t\t\t\t\t\t\t\t\t\t\t";
$sUpdate .= " set q133_numeracaoatual = q133_numeracaoatual + 1 ";
if (db_query($sUpdate)) {
$sSql = "select q133_numeracaoatual ";
$sSql .= " from issbasenumeracao \t\t\t ";
$sSql .= " order by q133_sequencial desc ";
$sSql .= " limit 1\t\t\t\t\t\t\t\t\t\t\t ";
$rsNumeroContinuo = db_query($sSql);
if ($rsNumeroContinuo and pg_num_rows($rsNumeroContinuo) > 0) {
$this->q02_inscr = db_utils::fieldsMemory($rsNumeroContinuo, 0)->q133_numeracaoatual;
} else {
$lErro = true;
}
}
if ($lTransacaoInterna) {
db_fim_transacao($lErro);
}
if (!$lErro) {
if (!db_query("select setval('issbase_q02_inscr_seq', {$this->q02_inscr})")) {
return false;
}
return true;
} else {
return false;
}
}