echo "<script> numcgm = '{$numcgm}'; </script>\n"; } else { db_redireciona("cai3_gerfinanc007.php?erro1=1"); } } else { if (isset($numpre) && !empty($numpre)) { if ($result = debitos_numpre_var($numpre, 0, $tipo, $DB_DATACALC, db_getsession("DB_anousu"))) { echo "<script> numpre = '{$numpre}'; </script>\n"; } else { db_redireciona("cai3_gerfinanc007.php?erro1=1"); } } } } else { if (isset($numcgm) && !empty($numcgm) && (isset($matric) && empty($matric)) && (isset($inscr) && empty($inscr))) { if ($result = debitos_numcgm($numcgm, 0, $tipo, $DB_DATACALC, db_getsession("DB_anousu"))) { echo "<script> numcgm = '{$numcgm}'; </script>\n"; } else { db_redireciona("cai3_gerfinanc007.php?erro1=1"); } } else { if (isset($matric) && !empty($matric)) { if ($result = debitos_matricula($matric, 0, $tipo, $DB_DATACALC, db_getsession("DB_anousu"))) { echo "<script> matric = '{$matric}'; </script>\n"; } else { db_redireciona("cai3_gerfinanc007.php?erro1=1"); } } else { if (isset($inscr) && !empty($inscr)) { if ($result = debitos_inscricao($inscr, 0, $tipo, $DB_DATACALC, db_getsession("DB_anousu"))) { echo "<script> inscr = '{$inscr}'; </script>\n";
$tipos = split(",", $tipos); $tipostodos = split(",", $tipostodos); //echo array_search(8,$tipos); //exit; //echo $tipos[1]; $head6 = "Débitos Calculados até: " . db_formatar($db_datausu, 'd'); $where = ""; $and = " and "; $head5 = @$info; $head6 = @$info1; if (!empty($numcgm)) { $clcgm = new cl_cgm(); $result = $clcgm->sql_record($clcgm->sql_query_file($numcgm, "z01_nome")); db_fieldsmemory($result, 0); $result_teste = debitos_numcgm($numcgm, 0, 0, $DB_DATACALC, $DB_anousu, '', 'k00_origem,k00_tipo,k00_numpre,k00_numpar,k00_receit'); $result = debitos_numcgm($numcgm, 0, 0, $DB_DATACALC, $DB_anousu, '', 'k00_origem,k00_tipo,k00_numpre,k00_numpar,k00_receit', $where); $outros = ''; $z01_numcgm = $numcgm; } else { if (!empty($matric)) { $result_teste = debitos_matricula($matric, 0, 0, $DB_DATACALC, $DB_anousu, '', 'k00_tipo,k00_numpre,k00_numpar,k00_receit'); $result = debitos_matricula($matric, 0, 0, $DB_DATACALC, $DB_anousu, '', 'k00_tipo,k00_numpre,k00_numpar,k00_receit', $where); $outros = "Matrícula: " . $matric . ($cliptubase = new cl_iptubase()); $result_inf = $cliptubase->proprietario_record($cliptubase->proprietario_query($matric, "j34_setor#j34_quadra#j34_lote#tipopri#j39_numero#j39_compl#nomepri#z01_nome#z01_numcgm#z01_cgmpri")); if ($cliptubase->numrows != 0) { db_fieldsmemory($result_inf, 0); $z01_numcgm = $z01_cgmpri; $outros = "Matrícula: " . $matric . " - SQL: " . $j34_setor . "/" . $j34_quadra . "/" . $j34_lote . " - Logradouro: " . $tipopri . " " . $nomepri . ", " . $j39_numero . " " . $j39_compl; } else { } } else {
} else { if (isset($inscricao)) { $acesso = "2"; $campo = $inscricao; $result = debitos_inscricao_var($inscricao, 0, $tipo, time(), date("Y")); } else { if (isset($numpre)) { $result = debitos_numpre_var($numpre, 0, $tipo, time(), date("Y")); } } } } else { if (isset($numcgm) && $numcgm != "") { $acesso = "1"; $campo = $numcgm; $result = debitos_numcgm($numcgm, 0, $tipo, time(), date("Y")); } else { if (isset($matricula) && $matricula != "") { $acesso = "3"; $campo = $matricula; $result = debitos_matricula($matricula, 0, $tipo, time(), date("Y")); } else { if (isset($inscricao) && $inscricao != "") { $acesso = "2"; $campo = $inscricao; $result = debitos_inscricao($inscricao, 0, $tipo, time(), date("Y")); } else { if (isset($numpre)) { $result = debitos_numpre($numpre, 0, $tipo, time(), date("Y")); } }
$ttvlrcor = 0; $ttvlrjuros = 0; $ttvlrmulta = 0; $ttvlrdesconto = 0; $tttotal = 0; for ($x = 0; $x < pg_numrows($result); $x++) { db_fieldsmemory($result, $x, true); if (in_array($k00_tipo, $tipos) == true) { if (isset($matric)) { $debitos = debitos_matricula($matric, 0, $k00_tipo, $DB_DATACALC, db_getsession("DB_anousu"), "", "", $where); } else { if (isset($inscr)) { $debitos = debitos_inscricao($inscr, 0, $k00_tipo, $DB_DATACALC, db_getsession("DB_anousu"), "", "", $where); } else { if (isset($numcgm)) { $debitos = debitos_numcgm($numcgm, 0, $k00_tipo, $DB_DATACALC, db_getsession("DB_anousu"), "", "", $where); } else { if (isset($numpre)) { $debitos = debitos_numpre($numpre, 0, $k00_tipo, $DB_DATACALC, db_getsession("DB_anousu"), "", "", $where); } else { break; } } } } if ($debitos == false || $debitos == 1) { continue; } if (pg_numrows($debitos) > 0) { $tvlrhis = 0; $tvlrcor = 0;