$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 {
        if (!empty($inscr)) {
            $result_teste = debitos_inscricao($inscr, 0, 0, $DB_DATACALC, $DB_anousu, '', 'k00_tipo,k00_numpre,k00_numpar,k00_receit');
            $result = debitos_inscricao($inscr, 0, 0, $DB_DATACALC, $DB_anousu, '', 'k00_tipo,k00_numpre,k00_numpar,k00_receit', $where);
            $outros = "Inscrição: " . $inscr;
            $clissbase = new cl_issbase();
            $result_inf = pg_exec("select * from empresa where q02_inscr = {$inscr}");
            //      if($clissbase->numrows!=0){
            if (pg_numrows($result_inf) != 0) {
if ($k03_tipo == 1 && $impmodelo != 1 && $impmodelo != 30) {
    if (!isset($matric)) {
        db_redireciona('db_erros.php?fechar=true&db_erro=Para Emissão de Carnê do IPTU Consulte Dados Pela Matrícula.');
        exit;
    }
    $cliptubase = new cl_iptubase();
    $rstipo = db_query("select * from arretipo where k00_tipo = {$tipo_debito}");
    db_fieldsmemory($rstipo, 0);
    try {
        $oRegraEmissao = new regraEmissao($tipo_debito, 22, db_getsession('DB_instit'), date("Y-m-d", db_getsession("DB_datausu")), db_getsession('DB_ip'));
    } catch (Exception $eExeption) {
        db_redireciona("db_erros.php?fechar=true&db_erro={$eExeption->getMessage()}");
        exit;
    }
    $pdf2 = $oRegraEmissao->getObj();
    $resultpro = $cliptubase->proprietario_record($cliptubase->proprietario_query($matric));
    db_fieldsmemory($resultpro, 0);
    $pdf2->uf_config = $db12_uf;
    $pdf2->iptj01_matric = $j01_matric;
    $pdf2->iptz01_cidade = $munic2;
    $pdf2->iptprefeitura = $nomeinst2;
    $pdf2->iptz01_ender = $z01_ender;
    $pdf2->iptbql = $j34_setor . "/" . $j34_quadra . "/" . $j34_lote;
    $pdf2->iptnomepri = $nomepri;
    $pdf2->iptcodpri = $j39_numero;
    $pdf2->iptproprietario = $proprietario;
    $pdf2->iptz01_nome = $z01_nome;
    $pdf2->iptz01_numcgm = $z01_numcgm;
    $pdf2->iptz01_cgccpf = $z01_cgccpf;
    $pdf2->iptz01_bairro = $z01_bairro;
    $pdf2->iptbairroimo = $j13_descr;