$io_report = new sigesp_scg_class_bal_generalbsf(); $ls_bolivares ="Bs.F."; break; } require_once("../../shared/class_folder/class_fecha.php"); $io_fecha=new class_fecha(); require_once("../class_funciones_scg.php"); $io_fun_scg=new class_funciones_scg(); $ia_niveles_scg[0]=""; uf_init_niveles(); $li_total=count($ia_niveles_scg)-1; //--------------------------------------------------------------------------------------------------------------------------- //Parámetros para Filtar el Reporte $ls_cmbmes=$_GET["cmbmes"]; $ls_cmbagno=$_GET["cmbagno"]; $ls_last_day=$io_fecha->uf_last_day($ls_cmbmes,$ls_cmbagno); $fechas=$ls_last_day; $ldt_fechas=$io_funciones->uf_convertirdatetobd($ls_last_day)." 00:00:00"; $li_nivel=$_GET["cmbnivel"]; //--------------------------------------------------------------------------------------------------------------------------- //Parámetros del encabezado $ldt_periodo=$_SESSION["la_empresa"]["periodo"]; $ls_nombre=$_SESSION["la_empresa"]["nombre"]; $li_ano=substr($ldt_periodo,0,4); $ld_fechas=$io_funciones->uf_convertirfecmostrar($fechas); $ls_titulo="BALANCE GENERAL"; $ls_titulo1=" ".$ls_nombre." "; $ls_titulo2=" al ".$ld_fechas.""; $ls_titulo3="(Expresado en ".$ls_bolivares.")"; //---------------------------------------------------------------------------------------------------------------------------
$io_msg->message("El activo no ha sido incorporado"); uf_limpiarvariables(); uf_agregarlineablanca($lo_object, $li_totrows); } else { for ($ls_anio = $ls_annioinc; $ls_anio <= $ls_annioinc + $li_vidautil; $ls_anio++) { if ($ls_anio == $ls_annioinc + $li_vidautil) { $ls_mest = $ls_mesf - 1; if ($ls_mest == 0) { $ls_mest = $ls_mesinc; } } else { $ls_mest = 12; } for ($li_i = $ls_mesf; $li_i <= $ls_mest; $li_i++) { $li_i = str_pad($li_i, 2, "0", 0); $ld_fecdep = $io_fec->uf_last_day($li_i, $ls_anio); if ($ls_anio == $ls_annioinc) { $ls_dia = 30 - $ls_diainc + 1; } else { $ls_dia = 0; } if ($ls_anio == $ls_annioinc + $li_vidautil) { $ls_dia = $ls_diainc - 1; } $li_j = $li_j + 1; $ls_mesd = $li_j; $ls_diasd = 0; if ($lb_mes1) { $li_j = $li_j - 1; $li_depmes = $li_depmen / 30 * $ls_dia; $ls_diasd = 30 - $ls_diainc + 1;
$la_config=array('showHeadings'=>0, // Mostrar encabezados 'showLines'=>0, // Mostrar Líneas 'fontSize' => 9, // Tamaño de Letras 'shaded'=>0, // Sombra entre líneas 'width'=>530, // Ancho Máximo de la tabla 'colGap'=>1, // separacion entre tablas 'xOrientation'=>'center', // Orientación de la tabla 'cols'=>array('total'=>array('justification'=>'right','width'=>290), // Justificación y ancho de la columna 'totalgen'=>array('justification'=>'right','width'=>240))); // Justificación y ancho de la columna $io_pdf->ezTable($la_data,$la_columna,'',$la_config); }// end function uf_print_pie_cabecera $ls_mesdes=substr($ls_combo,0,2); $ls_meshas=substr($ls_combo,2,2); $ls_diades="01"; $ls_diahas=$io_fecha->uf_last_day($ls_meshas,$li_ano); $ldt_fecdes=$ls_diades."/".$ls_mesdes."/".$li_ano; $ldt_fechas=$ls_diahas; $ld_fechas=$io_funciones->uf_convertirfecmostrar($ldt_fechas); $ls_titulo="<b>COMPARADO ORIGEN Y APLICACION DE FONDOS FORMA 0719</b>"; $ls_titulo1="<b>".$ls_titulo." (En ".$ls_bolivares.".) al </b>"."<b>".$ld_fechas."</b>"; //-------------------------------------------------------------------------------------------------------------------------------- // Cargar datastore con los datos del reporte $lb_valido=uf_insert_seguridad("<b>Instructivo 07 Comparado Origen y aplicación de Fondos</b>"); // Seguridad de Reporte if($lb_valido) { $lb_valido=$io_report->uf_crear_reporte_oaf($li_nivel,$ldt_fecdes,$ldt_fechas,$ls_agno); } if($lb_valido==false) // Existe algún error ó no hay registros { print("<script language=JavaScript>");
$ls_codestpro2h = $ls_codestpro2h_max; $ls_codestpro3h = $ls_codestpro3h_max; } $cmbnivel=$_GET["cmbnivel"]; if($cmbnivel=="s1") { $li_cmbnivel="1"; } else { $li_cmbnivel=$cmbnivel; } $ls_cmbmes=$_GET["cmbmes"]; $li_mes=substr($ls_cmbmes,0,2); $ldt_fecdes=$li_ano."-".$li_mes."-01"; $ldt_ult_dia=$io_fecha->uf_last_day($li_mes,$li_ano); $fechas=$ldt_ult_dia; $ldt_fechas=$io_funciones->uf_convertirdatetobd($fechas); $ls_mes=$io_fecha->uf_load_nombre_mes($li_mes); //---------------------------------------------------- Parámetros del encabezado ----------------------------------------------- $ls_titulo=" <b>EJECUCION FINANCIERA MENSUAL DEL PRESUPUESTO DE GASTOS (FORMA 0514)</b>"; //-------------------------------------------------------------------------------------------------------------------------------- // Cargar el dts_cab con los datos de la cabecera del reporte( Selecciono todos comprobantes ) $lb_valido=$io_report->uf_spg_reportes_select_ejecucion_financiera_forma0514($ls_codestpro1,$ls_codestpro2, $ls_codestpro3,$ls_codestpro4, $ls_codestpro5,$ls_codestpro1h, $ls_codestpro2h,$ls_codestpro3h, $ls_codestpro4h,$ls_codestpro5h); if($lb_valido==false) // Existe algún error ó no hay registros { print("<script language=JavaScript>");
$li_mes_ant = $li_mes_act - 1; } else { $li_mes_ant = 1; } settype($li_mes_act,'string'); settype($li_mes_ant,'string'); $li_mes_act = $io_funciones->uf_cerosizquierda($li_mes_act,2); $li_mes_ant = $io_funciones->uf_cerosizquierda($li_mes_ant,2); $ls_nommesact = $io_fecha->uf_load_nombre_mes($li_mes_act); $ls_nommesant = $io_fecha->uf_load_nombre_mes($li_mes_ant); $ld_fecdesant = $io_funciones->uf_convertirdatetobd("01/01/".$ls_agno); $ld_hasant = $io_fecha->uf_last_day($li_mes_ant,$ls_agno); $ld_fechasant = $io_funciones->uf_convertirdatetobd($ld_hasant); $ld_fecdesact = $io_funciones->uf_convertirdatetobd("01/".$li_mes_act."/".$ls_agno); $ld_hasact = $io_fecha->uf_last_day($li_mes_act,$ls_agno); $ld_fechasact = $io_funciones->uf_convertirdatetobd($ld_hasact); //*********************************************************************************************** $ls_consol=$io_report->DS->data["consol"][$li_i]; $li_monto=$io_report->DS->data["monto"][$li_i]; $li_monbasimptot=$io_report->DS->data["monbasinm"][$li_i]; $li_montotcar=$io_report->DS->data["montotcar"][$li_i]; $numalet->setNumero($li_monto); $ls_monto= $numalet->letra(); $li_monto=number_format($li_monto,2,",","."); $li_monbasimptot=number_format($li_monbasimptot,2,",",".");
$io_report = new sigesp_scg_reporte(); $ls_bolivares ="Bs."; break; case "1": require_once("sigesp_scg_reportebsf.php"); $io_report = new sigesp_scg_reportebsf(); $ls_bolivares ="Bs.F."; break; } $ia_niveles_scg[0]=""; uf_init_niveles(); $li_total=count($ia_niveles_scg)-1; //-------------------------------------------------- Par�metros para Filtar el Reporte ----------------------------------------- $ls_fecha=$_GET["fecha"]; $ls_fechasta=$io_fecha->uf_last_day(substr($ls_fecha,3,2),substr($ls_fecha,6,4)); $ls_cuentadesde_min=$_GET["cuentadesde"]; $ls_cuentahasta_max=$_GET["cuentahasta"]; if(($ls_cuentadesde_min=="")&&($ls_cuentahasta_max=="")) { if($io_report->uf_spg_reporte_select_cuenta_min_max($ls_cuentadesde_min,$ls_cuentahasta_max)) { $ls_cuentadesde=$ls_cuentadesde_min; $ls_cuentahasta=$ls_cuentahasta_max; } } else { $ls_cuentadesde=$ls_cuentadesde_min; $ls_cuentahasta=$ls_cuentahasta_max; }
$io_report = new sigesp_saf_class_report(); $ls_titulo_report = "Bs."; } //---------------------------------------------------- Parámetros del encabezado ----------------------------------------------- $ls_titulo = "Reporte de Depreciación Mensual en " . $ls_titulo_report . " "; $ls_fecha = ""; //-------------------------------------------------- Parámetros para Filtar el Reporte ----------------------------------------- $ls_codemp = $_SESSION["la_empresa"]["codemp"]; $ls_nomemp = $_SESSION["la_empresa"]["nombre"]; $ls_mes = $io_fun_activos->uf_obtenervalor_get("mes", ""); $li_anio = $io_fun_activos->uf_obtenervalor_get("anio", ""); $li_ordenact = $io_fun_activos->uf_obtenervalor_get("ordenact", ""); $li_auxmes = $io_fec->uf_load_numero_mes($ls_mes); $ls_fecha = "Periodo: " . $ls_mes . " " . $li_anio; //-------------------------------------------------------------------------------------------------------------------------------- $ld_fecdep = $io_fec->uf_last_day($li_auxmes, $li_anio); $lb_valido = $io_report->uf_saf_load_depmensual($ls_codemp, $li_ordenact, $ld_fecdep); // Cargar el DS con los datos de la cabecera del reporte if ($lb_valido == false) { print "<script language=JavaScript>"; print " alert('No hay nada que Reportar');"; print " close();"; print "</script>"; } else { ///////////////////////////////// SEGURIDAD //////////////////////////////////////////////////////// $ls_desc_event = " Generó el reporte de Depreciacion Mensual de Activos. "; $io_fun_activos->uf_load_seguridad_reporte("SAF", "sigesp_saf_r_depmensual.php", $ls_desc_event); //////////////////////////////// SEGURIDAD ///////////////////////////////////////////////////////// error_reporting(E_ALL); set_time_limit(1800); $io_pdf = new Cezpdf('LEGAL', 'landscape');
function uf_obtener_mov_conciliacion($ls_mesano,$ls_codban,$ls_ctaban,$ldec_salseglib,$ldec_salsegbco) { $io_fecha=new class_fecha(); $ds_mov=new class_datastore(); $ds_movimientos=new class_datastore(); $ls_codemp=$this->dat_emp["codemp"]; $ld_fechasta=$io_fecha->uf_last_day(substr($ls_mesano,0,2),substr($ls_mesano,2,4)); $ld_fechasta=$this->fun->uf_convertirdatetobd($ld_fechasta); $ld_fecdesde="01/".substr($ls_mesano,0,2)."/".substr($ls_mesano,2,4); $ld_fecdesde=$this->fun->uf_convertirdatetobd($ld_fecdesde); $ls_sql="SELECT * FROM scb_movbco WHERE codemp='".$ls_codemp."' AND codban='".$ls_codban."' AND ctaban='".$ls_ctaban."' AND fecmov <='".$ld_fechasta."' AND (estreglib=' ' OR (estreglib<>' ' AND feccon<>'".$ld_fecdesde."'))"; $rs_data=$this->SQL->select($ls_sql); if($rs_data===false) { return false; } else { while($row=$this->SQL->fetch_row($rs_data)) { $ls_codban=$row["codban"]; $ds_mov->insertRow("codban",$ls_codban); $ls_ctaban=$row["ctaban"]; $ds_mov->insertRow("ctaban",$ls_ctaban); $ls_numdoc=$row["numdoc"]; $ds_mov->insertRow("numdoc",$ls_numdoc); $ls_nomproben=$row["nomproben"]; $ds_mov->insertRow("nomproben",$ls_nomproben); $ld_fecmov=$row["fecmov"]; $ds_mov->insertRow("fecmov",$ld_fecmov); $ldec_monto=$row["monto"]; $ds_mov->insertRow("monto",$ldec_monto); $ls_conmov=$row["conmov"]; $ds_mov->insertRow("conmov" ,$ls_conmov); $ls_estmov=$row["estmov"]; $ds_mov->insertRow("estmov" ,$ls_estmov); } $this->SQL->free_result($rs_data); } //$ldec_saldo_ant=$this->uf_calcular($ds_movimientos->data,$ls_mesano); $ldec_saldo_ant=$this->uf_calcular_saldolibro($ls_codban,$ls_ctaban,$ld_fechasta); if(abs($ldec_saldo_ant-$ldec_salseglib)>0.01) { $this->io_msg->message("Vuelva a modulo conciliación ya que hay movimientos no registrados"); return false; } else { $this->io_msg->message("Todo Bien"); } $ls_sql= "SELECT '01' as tipo, '-' as suma, numdoc , nomproben, fecmov , monto-monret as monto, codope FROM scb_movbco WHERE fecmov <='".$ld_fechasta."' AND codban='".$ls_codban."' AND ctaban='".$ls_ctaban."' AND estreglib='' AND ((feccon > '".$ld_fecdesde."' ) OR (feccon='1900-01-01')) AND (((codope='CH' or codope='ND' or codope='RE') and estmov<>'A') or ((codope='DP' or codope='NC') and estmov='A'))"; $rs_data= $this->SQL->select($ls_sql); if($rs_data===false) { print $this->SQL->message; $this->io_msg->message($this->uf_convertirmsg($this->SQL->message)); return false; } else { while($row=$this->SQL->fetch_row($rs_data)) { $ls_tipo=$row["tipo"]; $ds_movimientos->insertRow("tipo",$ls_tipo); $ls_suma=$row["suma"]; $ds_movimientos->insertRow("suma",$ls_suma); $ls_numdoc=$row["numdoc"]; $ds_movimientos->insertRow("numdoc",$ls_numdoc); $ls_cedbene=$row["nomproben"]; $ds_movimientos->insertRow("nomproben",$ls_cedbene); $ls_fecha=$this->fun->uf_convertirfecmostrar($row["fecmov"]); $ds_movimientos->insertRow("fecmov",$ls_fecha); $ldec_monto=$row["monto"]; $ds_movimientos->insertRow("monto",$ldec_monto); $ls_codope=$row["codope"]; $ds_movimientos->insertRow("codope",$ls_tipo); } $this->SQL->free_result($rs_data); } $ls_sql= "SELECT '02' as tipo, '+' as suma, numdoc, nomproben, fecmov, monto-monret as monto, codope FROM scb_movbco WHERE fecmov <='".$ld_fechasta."' AND codban='".$ls_codban."' AND ctaban='".$ls_ctaban."' AND estreglib='' AND ((feccon > '".$ld_fecdesde."' ) OR (feccon='1900-01-01')) AND (((codope='CH' OR codope='ND' OR codope='RE') AND estmov='A') OR ((codope='DP' OR codope='NC') AND estmov<>'A'))"; $rs_data= $this->SQL->select($ls_sql); if($rs_data===false) { $this->io_msg->message($this->uf_convertirmsg($this->SQL->message)); return false; } else { while($row=$this->SQL->fetch_row($rs_data)) { $ls_tipo=$row["tipo"]; $ds_movimientos->insertRow("tipo",$ls_tipo); $ls_suma=$row["suma"]; $ds_movimientos->insertRow("suma",$ls_suma); $ls_numdoc=$row["numdoc"]; $ds_movimientos->insertRow("numdoc",$ls_numdoc); $ls_cedbene=$row["nomproben"]; $ds_movimientos->insertRow("nomproben",$ls_cedbene); $ls_fecha=$this->fun->uf_convertirfecmostrar($row["fecmov"]); $ds_movimientos->insertRow("fecmov",$ls_fecha); $ldec_monto=$row["monto"]; $ds_movimientos->insertRow("monto",$ldec_monto); $ls_codope=$row["codope"]; $ds_movimientos->insertRow("codope",$ls_tipo); } $this->SQL->free_result($rs_data); } // No Registradas en Libros $ls_sql = "SELECT 'A1' as tipo, '+' as suma, numdoc, conmov as nomproben,fecmov, monto-monret as monto, codope FROM scb_movbco WHERE fecmov <='".$ld_fechasta."' AND codban='".$ls_codban."' AND ctaban='".$ls_ctaban."' AND feccon='".$ld_fecdesde."' AND estreglib='A' AND (((codope='CH' OR codope='ND' OR codope='RE') AND estmov<>'A') OR ((codope='DP' OR codope='NC') AND estmov='A'))"; $rs_data= $this->SQL->select($ls_sql); if($rs_data===false) { print $this->SQL->message; return false; } else { while($row=$this->SQL->fetch_row($rs_data)) { $ls_tipo=$row["tipo"]; $ds_movimientos->insertRow("tipo",$ls_tipo); $ls_suma=$row["suma"]; $ds_movimientos->insertRow("suma",$ls_suma); $ls_numdoc=$row["numdoc"]; $ds_movimientos->insertRow("numdoc",$ls_numdoc); $ls_cedbene=$row["nomproben"]; $ds_movimientos->insertRow("nomproben",$ls_cedbene); $ls_fecha=$this->fun->uf_convertirfecmostrar($row["fecmov"]); $ds_movimientos->insertRow("fecmov",$ls_fecha); $ldec_monto=$row["monto"]; $ds_movimientos->insertRow("monto",$ldec_monto); $ls_codope=$row["codope"]; $ds_movimientos->insertRow("codope",$ls_tipo); } $this->SQL->free_result($rs_data); } $ls_sql="SELECT 'A2' as tipo, '-' as suma, numdoc, conmov as nomproben, fecmov, monto-monret as monto, codope FROM scb_movbco WHERE fecmov <='".$ld_fechasta."' AND codban='".$ls_codban."' AND ctaban='".$ls_ctaban."' AND feccon='".$ld_fecdesde."' AND estreglib='A' AND (((codope='CH' OR codope='ND' OR codope='RE') AND estmov='A') OR ((codope='DP' OR codope='NC') AND estmov<>'A'))"; $rs_data= $this->SQL->select($ls_sql); if($rs_data===false) { print $this->SQL->message; return false; } else { while($row=$this->SQL->fetch_row($rs_data)) { $ls_tipo=$row["tipo"]; $ds_movimientos->insertRow("tipo",$ls_tipo); $ls_suma=$row["suma"]; $ds_movimientos->insertRow("suma",$ls_suma); $ls_numdoc=$row["numdoc"]; $ds_movimientos->insertRow("numdoc",$ls_numdoc); $ls_cedbene=$row["nomproben"]; $ds_movimientos->insertRow("nomproben",$ls_cedbene); $ls_fecha=$this->fun->uf_convertirfecmostrar($row["fecmov"]); $ds_movimientos->insertRow("fecmov",$ls_fecha); $ldec_monto=$row["monto"]; $ds_movimientos->insertRow("monto",$ldec_monto); $ls_codope=$row["codope"]; $ds_movimientos->insertRow("codope",$ls_tipo); } $this->SQL->free_result($rs_data); } // Error Libro $ls_sql="SELECT 'B1' as tipo, '+' as suma, numdoc, conmov as nomproben, fecmov , monto-monret as monto, codope FROM scb_movbco WHERE fecmov <='".$ld_fechasta."' AND codban='".$ls_codban."' AND ctaban='".$ls_ctaban."' AND feccon='".$ld_fecdesde."' AND estreglib='B' AND (((codope='CH' OR codope='ND' OR codope='RE') AND estmov<>'A') OR ((codope='DP' OR codope='NC') AND estmov='A')) "; $rs_data= $this->SQL->select($ls_sql); if($rs_data===false) { print $this->SQL->message; return false; } else { while($row=$this->SQL->fetch_row($rs_data)) { $ls_tipo=$row["tipo"]; $ds_movimientos->insertRow("tipo",$ls_tipo); $ls_suma=$row["suma"]; $ds_movimientos->insertRow("suma",$ls_suma); $ls_numdoc=$row["numdoc"]; $ds_movimientos->insertRow("numdoc",$ls_numdoc); $ls_cedbene=$row["nomproben"]; $ds_movimientos->insertRow("nomproben",$ls_cedbene); $ls_fecha=$this->fun->uf_convertirfecmostrar($row["fecmov"]); $ds_movimientos->insertRow("fecmov",$ls_fecha); $ldec_monto=$row["monto"]; $ds_movimientos->insertRow("monto",$ldec_monto); $ls_codope=$row["codope"]; $ds_movimientos->insertRow("codope",$ls_tipo); } $this->SQL->free_result($rs_data); } $ls_sql="SELECT 'B2' as tipo, '-' as suma, numdoc, conmov as nomproben, fecmov , monto-monret as monto, codope FROM scb_movbco WHERE fecmov <='".$ld_fechasta."' AND codban='".$ls_codban."' AND ctaban='".$ls_ctaban."' AND feccon='".$ld_fecdesde."' AND estreglib='B' AND (((codope='CH' OR codope='ND' OR codope='RE') AND estmov='A') OR ((codope='DP' OR codope='NC') AND estmov<>'A')) "; $rs_data= $this->SQL->select($ls_sql); if($rs_data===false) { print $this->SQL->message; return false; } else { while($row=$this->SQL->fetch_row($rs_data)) { $ls_tipo=$row["tipo"]; $ds_movimientos->insertRow("tipo",$ls_tipo); $ls_suma=$row["suma"]; $ds_movimientos->insertRow("suma",$ls_suma); $ls_numdoc=$row["numdoc"]; $ds_movimientos->insertRow("numdoc",$ls_numdoc); $ls_cedbene=$row["nomproben"]; $ds_movimientos->insertRow("nomproben",$ls_cedbene); $ls_fecha=$this->fun->uf_convertirfecmostrar($row["fecmov"]); $ds_movimientos->insertRow("fecmov",$ls_fecha); $ldec_monto=$row["monto"]; $ds_movimientos->insertRow("monto",$ldec_monto); $ls_codope=$row["codope"]; $ds_movimientos->insertRow("codope",$ls_tipo); } $this->SQL->free_result($rs_data); } // Error Banco $ls_sql="SELECT 'C1' as tipo, '-' as suma, numdoc, conmov as nomproben, fecmov, monmov as monto, codope FROM scb_errorconcbco WHERE fecmov <='".$ld_fechasta."' AND codban='".$ls_codban."' AND ctaban='".$ls_ctaban."' AND fecmesano='".$ld_fecdesde."' AND esterrcon='C' AND (((codope='CH' OR codope='ND' OR codope='RE') AND estmov<>'A') OR ((codope='DP' OR codope='NC') AND estmov='A')) "; $rs_data= $this->SQL->select($ls_sql); if($rs_data===false) { print $this->SQL->message; return false; } else { while($row=$this->SQL->fetch_row($rs_data)) { $ls_tipo=$row["tipo"]; $ds_movimientos->insertRow("tipo",$ls_tipo); $ls_suma=$row["suma"]; $ds_movimientos->insertRow("suma",$ls_suma); $ls_numdoc=$row["numdoc"]; $ds_movimientos->insertRow("numdoc",$ls_numdoc); $ls_cedbene=$row["nomproben"]; $ds_movimientos->insertRow("nomproben",$ls_cedbene); $ls_fecha=$this->fun->uf_convertirfecmostrar($row["fecmov"]); $ds_movimientos->insertRow("fecmov",$ls_fecha); $ldec_monto=$row["monto"]; $ds_movimientos->insertRow("monto",$ldec_monto); $ls_codope=$row["codope"]; $ds_movimientos->insertRow("codope",$ls_tipo); } $this->SQL->free_result($rs_data); } $ls_sql="SELECT 'C2' as tipo, '+' as suma, numdoc, conmov as nomproben, fecmov , monmov as monto, codope FROM scb_errorconcbco WHERE fecmov <='".$ld_fechasta."' AND codban='".$ls_codban."' AND ctaban='".$ls_ctaban."' AND fecmesano='".$ld_fecdesde."' and esterrcon='C' AND (((codope='CH' OR codope='ND' OR codope='RE') AND estmov='A') OR ((codope='DP' OR codope='NC') AND estmov<>'A')) "; $rs_data= $this->SQL->select($ls_sql); if($rs_data===false) { print $this->SQL->message; return false; } else { while($row=$this->SQL->fetch_row($rs_data)) { $ls_tipo=$row["tipo"]; $ds_movimientos->insertRow("tipo",$ls_tipo); $ls_suma=$row["suma"]; $ds_movimientos->insertRow("suma",$ls_suma); $ls_numdoc=$row["numdoc"]; $ds_movimientos->insertRow("numdoc",$ls_numdoc); $ls_cedbene=$row["nomproben"]; $ds_movimientos->insertRow("nomproben",$ls_cedbene); $ls_fecha=$this->fun->uf_convertirfecmostrar($row["fecmov"]); $ds_movimientos->insertRow("fecmov",$ls_fecha); $ldec_monto=$row["monto"]; $ds_movimientos->insertRow("monto",$ldec_monto); $ls_codope=$row["codope"]; $ds_movimientos->insertRow("codope",$ls_tipo); } $this->SQL->free_result($rs_data); } return $ds_movimientos->data; }
case '10': $lb_selOctubre="selected"; break; case '11': $lb_selNoviembre="selected"; break; case '12': $lb_selDiciembre="selected"; break; } if($ls_operacion=="NUEVO") { uf_mantener_grid(); $ls_numcom = ""; $ld_fecdesde = $io_function->uf_convertirdatetobd("01/".$ls_mes."/".$ls_agno); $ld_hasta = $fec->uf_last_day($ls_mes,$ls_agno); $ld_fechasta = $io_function->uf_convertirdatetobd($ld_hasta); $ls_periodofiscal = $io_function->uf_cerosizquierda(substr($ld_fecdesde,0,4),4).$io_function->uf_cerosizquierda(substr($ld_fecdesde,5,2),2) ; $lb_valido = $io_cmpret->uf_ccr_get_nro($ls_periodofiscal,&$ls_numcom); if(!$lb_valido) { $msg->message("Error al generar el numero del Comprobante"); } } if($ls_operacion=="CAMBIO_PERIODO") { $io_cmpret->uf_ccr_get_nro($ls_agno.$ls_mes,$ls_numcom); uf_mantener_grid(); }
{ $ls_cmbmesdes=$_GET["cmbmesdes"]; $ls_cmbagnodes=$_GET["cmbagnodes"]; if($_SESSION["ls_gestor"]=='INFORMIX') { $fecdes=$ls_cmbagnodes."-".$ls_cmbmesdes."-01"; $ldt_fecdes=$ls_cmbagnodes."-".$ls_cmbmesdes."-01"; } else { $fecdes=$ls_cmbagnodes."-".$ls_cmbmesdes."-01"." 00:00:00"; $ldt_fecdes=$ls_cmbagnodes."-".$ls_cmbmesdes."-01"." 00:00:00"; } $ls_cmbmeshas=$_GET["cmbmeshas"]; $ls_cmbagnohas=$_GET["cmbagnohas"]; $ls_last_day=$io_fecha->uf_last_day($ls_cmbmeshas,$ls_cmbagnohas); $fechas=$ls_last_day; $ldt_fechas=$io_funciones->uf_convertirdatetobd($ls_last_day); } elseif($ls_hidbot==false) { $fecdes=$_GET["txtfecdes"]; $ldt_fecdes=$io_funciones->uf_convertirdatetobd($fecdes); $fechas=$_GET["txtfechas"]; $ldt_fechas=$io_funciones->uf_convertirdatetobd($fechas); } $li_nivel=$_GET["cmbnivel"]; //---------------------------------------------------- Par�metros del encabezado ----------------------------------------------- $ldt_periodo=$_SESSION["la_empresa"]["periodo"]; $li_ano=substr($ldt_periodo,0,4); $ls_nombre=$_SESSION["la_empresa"]["nombre"];
//------------Data-----------------// $ls_codemp=$_SESSION["la_empresa"]["codemp"]; $ls_nomemp=$_SESSION["la_empresa"]["nombre"]; $ls_rifemp=$_SESSION["la_empresa"]["rifemp"]; if(array_key_exists("numlicemp",$_SESSION["la_empresa"])) $ls_licemp=$_SESSION["la_empresa"]["numlicemp"]; else $ls_licemp=""; $ls_diremp = $_SESSION["la_empresa"]["direccion"]; $ls_codcom = $_GET["documentos"]; $ls_mes = $_GET["mes"]; $ls_agno = $_GET["agno"]; $la_comprobantes = explode("-",$ls_codcom); $ls_fechainicio = $ls_agno."-".$ls_mes."-01"; $ls_fechafin = $io_funciones->uf_convertirdatetobd($io_fecha->uf_last_day($ls_mes,$ls_agno)); $ls_tipbol = 'Bs.'; $ls_tiporeporte = 0; $ls_tiporeporte = $_GET["tiporeporte"]; global $ls_tiporeporte; if($ls_tiporeporte==1) { require_once("sigesp_scb_reportbsf.php"); $io_report = new sigesp_scb_reportbsf($con); $ls_tipbol = 'Bs.F.'; } //------------------------------------------------// for($li_k=0;$li_k<count($la_comprobantes);$li_k++) {
$title[5]="<a href=javascript:cargar_detalle('monto');><font color=#FFFFFF>Monto</font></a>"; $title[6]="<a href=javascript:cargar_detalle('codope');><font color=#FFFFFF>Operacion</font></a>"; $title[7]="Estatus Mov."; $title[8]="Fecha Concil."; $title[9]="Reg.Libro"; $grid="grid"; if($ls_operacion == "NUEVO") { $ls_operacion= "" ; uf_nuevo(); }//fin NUEVO if($ls_operacion=="ABRIR_CONCILIACION") { $ld_desde="01/".$ld_fecha; $ld_hasta=$in_classfecha->uf_last_day(substr($ld_fecha,0,2),substr($ld_fecha,3,4)); $lb_valido=$in_classconciliacion->uf_abrir_conciliacion($ls_codban,$ls_cuenta_banco,$ld_desde,$ld_hasta); if($lb_valido) { $in_classconciliacion->io_sql->commit(); $lb_chkconcil=""; $msg->message("La conciliación fue abierta"); } else { $in_classconciliacion->io_sql->rollback(); $msg->message("Error al intentar abrir la conciliación"); } $ls_operacion="CARGAR_DT";
break; case "12": $ls_mes="diciembre"; break; } $fecIni=$ano."-".$mes."-01"; $fecFin=$fun->uf_convertirdatetobd($fecha); } else { switch ($mes) { case "01": $ls_mes="marzo"; $fecIni=$ano."-01-01";// primer mes del I Trimestre $diames=$io_fecha->uf_last_day(3,$ano);// ultimo mes del I trimestre $fechaFinal=$diames; break; case "02": $ls_mes="marzo"; $fecIni=$ano."-01-01"; $diames=$io_fecha->uf_last_day(3,$ano);// ultimo mes del I trimestre $fechaFinal=$diames; break; case "03": $ls_mes="marzo"; $fecIni=$ano."-01-01"; $diames=$io_fecha->uf_last_day(3,$ano);// ultimo mes del I trimestre $fechaFinal=$diames; break; case "04":
function uf_print_retencionesmunicipales() { //////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////// // Function: uf_print_retencionesmunicipales // Access: private // Arguments: // Description: Función que obtiene e imprime los resultados de la busqueda de retenciones de iva // Creado Por: Ing. Yesenia Moreno/ Ing. Luis Lang // Fecha Creación: 15/07/2007 Fecha Última Modificación : //////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////// global $io_grid; require_once("../../shared/class_folder/sigesp_include.php"); $io_include=new sigesp_include(); $io_conexion=$io_include->uf_conectar(); require_once("../../shared/class_folder/class_sql.php"); $io_sql=new class_sql($io_conexion); require_once("../../shared/class_folder/class_mensajes.php"); $io_mensajes=new class_mensajes(); require_once("../../shared/class_folder/class_funciones.php"); $io_funciones=new class_funciones(); require_once("../../shared/class_folder/class_fecha.php"); $io_fecha=new class_fecha(); $ls_codemp=$_SESSION["la_empresa"]["codemp"]; $ls_mes=$_POST['mes']; $ls_anio=$_POST['anio']; $ld_fecdesde=$ls_anio."-".$ls_mes."-01"; $ld_fechasta=$ls_anio."-".$ls_mes."-".substr($io_fecha->uf_last_day($ls_mes,$ls_anio),0,2); $ls_sql="SELECT numcom, codsujret, nomsujret, dirsujret, rif ". " FROM scb_cmp_ret ". " WHERE codemp = '".$ls_codemp."' ". " AND fecrep>='".$ld_fecdesde."' ". " AND fecrep<='".$ld_fechasta."' ". " AND codret='0000000003' ". " ORDER BY numcom"; $rs_data=$io_sql->select($ls_sql); if($rs_data===false) { $io_mensajes->uf_mensajes_ajax("Error al cargar Retenciones Muncipales ","ERROR->".$io_funciones->uf_convertirmsg($io_sql->message),false,""); } else { $lo_title[1]=" "; $lo_title[2]="Comprobante"; $lo_title[3]="Codigo Proveedor/Beneficiario"; $lo_title[4]="Nombre Proveedor/Beneficiario"; $lo_title[5]="Dirección"; $lo_title[6]="R.I.F."; $li_totrow=0; $lo_object[$li_totrow][1]=""; $lo_object[$li_totrow][2]=""; $lo_object[$li_totrow][3]=""; $lo_object[$li_totrow][4]=""; $lo_object[$li_totrow][5]=""; $lo_object[$li_totrow][6]=""; while($row=$io_sql->fetch_row($rs_data)) { $li_totrow++; $ls_numcom=$row["numcom"]; $ls_codsujret=$row["codsujret"]; $ls_nomsujret=$row["nomsujret"]; $ls_dirsujret=$row["dirsujret"]; $ls_rif=$row["rif"]; $lo_object[$li_totrow][1]="<input type=checkbox name=checkcmp".$li_totrow." id=checkcmp".$li_totrow." value=1 size=10 style=text-align:left class=sin-borde>"; $lo_object[$li_totrow][2]="<div align=center><input type=text name=txtnumcom".$li_totrow." id=txtnumcom".$li_totrow." value='".$ls_numcom."' class=sin-borde readonly style=text-align:center size=15 maxlength=15></div>"; $lo_object[$li_totrow][3]="<div align=center><input type=text name=txtcodsujret".$li_totrow." id=txtcodsujret".$li_totrow." value='".$ls_codsujret."' class=sin-borde readonly style=text-align:center size=10 maxlength=10></div>"; $lo_object[$li_totrow][4]="<div align=left><input type=text name=txtnomsujret".$li_totrow." id=txtnomsujret".$li_totrow." value='".$ls_nomsujret."' class=sin-borde readonly style=text-align:left size=25 maxlength=80></div>"; $lo_object[$li_totrow][5]="<div align=left><input type=text name=txtdirsujret".$li_totrow." id=txtdirsujret".$li_totrow." value='".$ls_dirsujret."' class=sin-borde readonly style=text-align:left size=35 maxlength=200></div>"; $lo_object[$li_totrow][6]="<div align=center><input type=text name=txtrif".$li_totrow." id=txtrif".$li_totrow." value='".$ls_rif."' class=sin-borde readonly style=text-align:center size=15 maxlength=15></div>"; } $io_sql->free_result($rs_data); $io_grid->makegrid($li_totrow,$lo_title,$lo_object,750,'Comprobantes de Retención Municipal','grid'); } unset($io_include); unset($io_conexion); unset($io_sql); unset($io_mensajes); unset($io_funciones); unset($ls_codemp); }// end function uf_print_retencionesmunicipales
$ls_logusr=$_SESSION["la_logusr"]; require_once("class_folder/class_funciones_scf.php"); $io_fun_scf=new class_funciones_scf("../"); $io_fun_scf->uf_load_seguridad("SCF","sigesp_scf_r_hoja_trabajo.php",$ls_permisos,$la_seguridad,$la_permisos); ////////////////////////////////////////////// SEGURIDAD ///////////////////////////////////////////// require_once("../shared/class_folder/class_fecha.php"); $io_fecha=new class_fecha(); //$ld_fecdes="01/01/".substr($_SESSION["la_empresa"]["periodo"],0,4); $fecha=date("d/m/Y"); $mes=substr($fecha,3,2); $ano=substr($fecha,6,4); $ld_fecdes= "01/".$mes."/".$ano; //$ld_fecdes= "01/01/".$ano; $ls_last_day=$io_fecha->uf_last_day($mes,$ano); $ld_fechas=$ls_last_day; //$lb_valido=$io_fun_scf->uf_convertir_scgsaldos($la_seguridad); ?> <!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN" "http://www.w3.org/TR/html4/loose.dtd"> <html> <head> <script type="text/javascript" language="JavaScript1.2" src="../shared/js/disabled_keys.js"></script> <script language="javascript"> if(document.all) { //ie document.onkeydown = function(){ if(window.event && (window.event.keyCode == 122 || window.event.keyCode == 116 || window.event.ctrlKey)){ window.event.keyCode = 505; }
require_once "../../shared/class_folder/class_sql.php"; require_once "../../shared/class_folder/class_fecha.php"; $io_fecha = new class_fecha(); $io_in = new sigesp_include(); $con = $io_in->uf_conectar(); $io_sql = new class_sql($con); $io_report = new sigesp_cxp_class_report("../../"); require_once "../../shared/class_folder/class_funciones.php"; $io_funciones = new class_funciones(); require_once "../class_folder/class_funciones_cxp.php"; $io_fun_cxp = new class_funciones_cxp(); //---------------------------------------------------- Parmetros del encabezado ----------------------------------------------- $ls_mes = $_GET["mes"]; $ls_agno = $_GET["agno"]; $ls_titulo = "<b>Libro de Compras</b>"; $li_lastday = $io_fecha->uf_last_day($ls_mes, $ls_agno); $li_lastday = substr($li_lastday, 0, 2); $as_fechadesde = $ls_agno . '/' . $ls_mes . '/01'; $as_fechahasta = $ls_agno . '/' . $ls_mes . '/' . $li_lastday; $ls_mesletras = $io_fecha->uf_load_nombre_mes($ls_mes); $ls_periodo = "MES: " . $ls_mesletras . " AÑO" . $ls_agno . ""; //-------------------------------------------------------------------------------------------------------------------------------- $ld_monto = 0; $ld_impuesto = 0; $ld_sumcom = 0; $ld_baseimp = 0; $arremp = $_SESSION["la_empresa"]; $ls_codemp = $arremp["codemp"]; error_reporting(E_ALL); set_time_limit(1800); $io_pdf = new Cezpdf('LEGAL', 'landscape');
error_reporting(E_ALL); set_time_limit(1800); $li_totrow=$ds_concil->getRowCount("numdoc"); if(($data===false)) { ?> <script language="javascript"> alert("Error al buscar datos de la conciliación"); close(); </script> <?php } $io_pdf=new class_pdf('LETTER','portrait'); // Instancia de la clase PDF $io_pdf->selectFont('../../shared/ezpdf/fonts/Helvetica.afm'); // Seleccionamos el tipo de letra $io_pdf->set_margenes(2,30,3,3); // Configuración de los margenes en centímetros $ld_fechasta=$io_fecha->uf_last_day(substr($ls_mesano,0,2),substr($ls_mesano,2,4)); $ls_mes=$io_fecha->uf_load_nombre_mes(substr($ls_mesano,0,2)); $ls_anio=substr($ls_mesano,2,4); uf_print_encabezado_pagina($ls_nomban,$ls_mes,$ls_anio,&$io_pdf); //Se imprime la tabla de la cabecera $li_temp=1; uf_print_cabecera($ls_nomban,$ls_ctaban,$ls_tipo_cuenta,'',$io_pdf); // Se imprime la cuenta del reporte uf_print_saldo_libro ($ld_fechasta,number_format($ldec_salseglib,2,",","."),&$io_pdf);// Se imprime el saldo segun libro $la_data=array(); $la_data_cheque_mas = array(); $la_data_cheque_menos = array(); $la_data_nota_deb_mas = array(); $la_data_nota_deb_menos = array(); $la_data_nota_cred_mas = array(); $la_data_nota_cred_menos = array(); $la_data_retiro_mas = array(); $la_data_retiro_menos = array();
{ $ls_codestpro1h = $ls_codestpro1h_max; $ls_codestpro2h = $ls_codestpro2h_max; $ls_codestpro3h = $ls_codestpro3h_max; $ls_codestpro4h = $ls_codestpro4h_max; $ls_codestpro5h = $ls_codestpro5h_max; } } $ls_cmbmesdes = $_GET["cmbmesdes"]; $ldt_fecini=$li_ano."-".$ls_cmbmesdes."-01"; $ldt_fecini_rep="01/".$ls_cmbmesdes."/".$li_ano; $ls_cmbmeshas = $_GET["cmbmeshas"]; $ls_mes=$ls_cmbmeshas; $ls_ano=$li_ano; $fecfin=$io_fecha->uf_last_day($ls_mes,$ls_ano); $ldt_fecfin=$io_funciones->uf_convertirdatetobd($fecfin); $cmbnivel=$_GET["cmbnivel"]; if($cmbnivel=="s1") { $ls_cmbnivel="1"; } else { $ls_cmbnivel=$cmbnivel; } $ls_subniv=$_GET["checksubniv"]; if($ls_subniv==1) { $lb_subniv=true;
$ls_estclades = $_GET["estclades"]; $ls_estclahas = $_GET["estclahas"]; $ld_tipper = $_GET["tipper"]; $ld_periodo = $_GET["periodo"]; $ls_cuentades = $_GET["txtcuentades"]; $ls_cuentahas = $_GET["txtcuentahas"]; switch($ld_tipper) { case 1: $ld_per01 = intval($ld_periodo); $ld_per02 = ""; $ld_per03 = ""; $ls_desper = "MENSUAL"; $ld_fecfinrep=$io_fecha->uf_last_day($ld_periodo,$li_ano); break; case 2: $ld_per01 = intval(substr($ld_periodo,0,2)); $ld_per02 = intval(substr($ld_periodo,2,2)); $ls_desper = "BIMENSUAL"; $ld_fecfinrep=$io_fecha->uf_last_day(substr($ld_periodo,2,2),$li_ano); $ld_per03 = ""; break; case 3: $ld_per01 = intval(substr($ld_periodo,0,2)); $ld_per02 = intval(substr($ld_periodo,2,2)); $ld_per03 = intval(substr($ld_periodo,4,2)); $ls_desper = "TRIMESTRAL";