session_start();
include "libs/db_conecta.php";
include "libs/db_stdlib.php";
include "libs/db_sql.php";
include "dbforms/db_funcoes.php";
include "classes/db_issplan_classe.php";
include "classes/db_issplanit_classe.php";
include "classes/db_issplananula_classe.php";
include "classes/db_arrecad_classe.php";
include "classes/db_cancdebitos_classe.php";
include "classes/db_cancdebitosreg_classe.php";
include "classes/db_cancdebitosproc_classe.php";
include "classes/db_cancdebitosprocreg_classe.php";
include "classes/db_cancdebitosissplan_classe.php";
$sqlerro = false;
$clissplanit = new cl_issplanit();
$ip = $HTTP_SERVER_VARS['REMOTE_ADDR'];
if (isset($anular)) {
    if (isset($ultima) and $ultima == "sim") {
        //db_msgbox("entrou na ultima");
        $clissplanit->q21_sequencial = $q21_sequencial;
        $clissplanit->q21_status = 3;
        $clissplanit->alterar($q21_sequencial);
        if ($clissplanit->erro_status == 0) {
            $sqlerro = true;
            $erro_msg = $clissplanit->erro_msg;
        }
    }
    if ($sqlerro == false) {
        $sqlerro = db_anulaPlanilha($planilha, $motivo, $ip);
    }
 *                         e-cidade@dbseller.com.br                   
 *                                                                    
 *  Este programa e software livre; voce pode redistribui-lo e/ou     
 *  modifica-lo sob os termos da Licenca Publica Geral GNU, conforme  
 *  publicada pela Free Software Foundation; tanto a versao 2 da      
 *  Licenca como (a seu criterio) qualquer versao mais nova.          
 *                                                                    
 *  Este programa e distribuido na expectativa de ser util, mas SEM   
 *  QUALQUER GARANTIA; sem mesmo a garantia implicita de              
 *  COMERCIALIZACAO ou de ADEQUACAO A QUALQUER PROPOSITO EM           
 *  PARTICULAR. Consulte a Licenca Publica Geral GNU para obter mais  
 *  detalhes.                                                         
 *                                                                    
 *  Voce deve ter recebido uma copia da Licenca Publica Geral GNU     
 *  junto com este programa; se nao, escreva para a Free Software     
 *  Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA          
 *  02111-1307, USA.                                                  
 *  
 *  Copia da licenca no diretorio licenca/licenca_en.txt 
 *                                licenca/licenca_pt.txt 
 */
include "libs/db_conecta.php";
include "libs/db_stdlib.php";
include "libs/db_sql.php";
include "classes/db_issplanit_classe.php";
$cl_issplanit = new cl_issplanit();
//die($cl_issplanit->sql_query_file(null,"*", null, "q21_cnpj= '$cnpj' and q21_nota = '$nota' and q21_serie='$serie'"));
$result = $cl_issplanit->sql_record($cl_issplanit->sql_query_file(null, "*", null, "q21_cnpj= '{$cnpj}' and q21_nota = '{$nota}' and q21_serie='{$serie}' and q21_status = 1"));
if ($cl_issplanit->numrows > 0) {
    echo " <script> alert('CNPJ, Nota e Série ja lançadas');\n  \tparent.js_notaexiste()\n \t </script>";
}
 if ($linhasop > 0) {
     //verifica se tem nota
     $sqlnota = "select * from pagordemnota where e71_codord= {$codord} ";
     $resultnota = pg_query($sqlnota);
     $linhasnota = pg_num_rows($resultnota);
     if ($linhasnota > 0) {
         // tem nota
         $sql = "  select e50_codord,e60_numemp,e60_numcgm,e69_dtnota, e69_numero as nota,e70_valor as valornota,\n\t\t\t\ta.z01_nome as nome_emp,a.z01_cgccpf as cnpj_emp, b.z01_nome as nome_pag,b.z01_cgccpf as cnpj_pag\n\t\t\t\tfrom  pagordem\n\t\t\t\tinner join empempenho    on e50_numemp   = e60_numemp\n\t\t\t\tinner join cgm a         on a.z01_numcgm = e60_numcgm\n\t\t\t\tleft  join pagordemconta on e49_codord   = e50_codord\n\t\t\t\tleft join cgm b         on b.z01_numcgm = e49_numcgm\n\t\t\t\tinner join pagordemnota  on e71_codord   = e50_codord\n\t\t\t\tinner join empnota       on e69_codnota  = e71_codnota\n\t\t\t\tinner join empnotaele    on e70_codnota  = e71_codnota\n\t\t\t\twhere e50_codord = {$codord} ";
         $result = pg_query($sql);
         $linhas = pg_num_rows($result);
         if ($linhas > 0) {
             include "classes/db_issplan_classe.php";
             include "classes/db_issplanit_classe.php";
             include "classes/db_issplanitop_classe.php";
             $cl_issplan = new cl_issplan();
             $cl_issplanit = new cl_issplanit();
             $cl_issplanitop = new cl_issplanitop();
             $sqlpref = "select numcgm,codigo,nomeinst,telef,cgc from db_config where prefeitura is true";
             $resultpref = pg_query($sqlpref);
             db_fieldsmemory($resultpref, 0);
             if ($planilha == "") {
                 $cl_issplan->q20_numcgm = $numcgm;
                 $cl_issplan->q20_ano = $ano;
                 $cl_issplan->q20_mes = $mes;
                 $cl_issplan->q20_nomecontri = @$nomeinst;
                 $cl_issplan->q20_fonecontri = @$telef;
                 $cl_issplan->q20_numpre = 0;
                 $cl_issplan->q20_numbco = 0;
                 $cl_issplan->q20_situacao = 1;
                 $cl_issplan->incluir(null);
                 if ($cl_issplan->erro_status == 0) {
 */
session_start();
include "libs/db_conecta.php";
include "libs/db_stdlib.php";
include "libs/db_sql.php";
include "classes/db_issplan_classe.php";
include "classes/db_issplanit_classe.php";
include "classes/db_issplaninscr_classe.php";
include "classes/db_issplanitinscr_classe.php";
include "classes/db_issplanitop_classe.php";
include "classes/db_issplanitold_classe.php";
include "dbforms/db_funcoes.php";
include "libs/db_libtributario.php";
$clissplanitold = new cl_issplanitold();
$cl_issplan = new cl_issplan();
$cl_issplanit = new cl_issplanit();
$cl_issplaninscr = new cl_issplaninscr();
$cl_issplanitinscr = new cl_issplanitinscr();
$cl_issplanitop = new cl_issplanitop();
parse_str(base64_decode($HTTP_SERVER_VARS["QUERY_STRING"]));
db_postmemory($_POST);
db_postmemory($_GET);
if (isset($planilha)) {
    // retorna o nomecontri e o fonecontri
    $recordIssplan = $cl_issplan->sql_record($cl_issplan->sql_query_file(null, "q20_nomecontri, q20_fonecontri", null, "q20_planilha = '{$planilha}'"));
    if ($cl_issplan->numrows > 0) {
        $sSql = pg_fetch_assoc($recordIssplan);
        $q20_nomecontri = $sSql["q20_nomecontri"];
        $q20_fonecontri = $sSql["q20_fonecontri"];
        $nomecontri = $sSql["q20_nomecontri"];
        $fonecontri = $sSql["q20_fonecontri"];