function uf_delete_planunicore($as_cuenta,$as_denominacion)
{      
		require_once("../shared/class_folder/sigesp_include.php");
		$inc=new sigesp_include();
		$con=$inc->uf_conectar();
		$SQL=new class_sql($con);
		$ls_sql="";
		$lb_valido=true;

		$ls_sql = "DELETE FROM sigesp_plan_unico WHERE sig_cuenta='".$as_cuenta."' AND denominacion='".$as_denominacion."'";
		$SQL->begin_transaction();
		$numrows=$SQL->execute($ls_sql);
		if($numrows>0)
	    {
		    $lb_valido=true;
			$SQL->commit();
        }
	    else
	    {
		   $this->is_msg_error="Error al eliminar";
		   $lb_valido = false;
		   $SQL->rollback();
		   $this->ib_db_error = true ;
	    }
	 return $lb_valido;
}
 $ls_codestp4 = $io_funcion->uf_cerosizquierda($ls_codestpro4, 25);
 $ls_clasificacion = $_POST["txtclasificacion"];
 $lb_encontrado = $io_estpro3->uf_spg_select_estprog3($ls_codemp, $ls_codestp1, $ls_codestp2, $ls_codestp3, $ls_clasificacion);
 if ($lb_encontrado) {
     $lb_existe = $io_estpro4->uf_spg_select_estprog4($ls_codemp, $ls_codestp1, $ls_codestp2, $ls_codestp3, $ls_codestp4, $ls_clasificacion);
     if (!$lb_existe) {
         $lb_valido = $io_estpro4->uf_spg_insert_estprog4($ls_codemp, $ls_codestp1, $ls_codestp2, $ls_codestp3, $ls_codestp4, $ls_denestpro4, $li_estmodest, $ls_clasificacion, $la_seguridad);
         if ($lb_valido) {
             $io_sql->commit();
             $io_msg->message("Registro Incluido !!!");
             $ls_codestpro4 = "";
             $ls_denestpro4 = "";
             $ls_status = "NUEVO";
             $readonly = "";
         } else {
             $io_sql->rollback();
             $io_msg->message($io_estpro4->is_msg_error);
         }
     } else {
         $lb_valido = $io_estpro4->uf_spg_update_estprog4($ls_codemp, $ls_codestp1, $ls_codestp2, $ls_codestp3, $ls_codestp4, $ls_denestpro4, $ls_clasificacion, $la_seguridad);
         if ($lb_valido) {
             $io_sql->commit();
             $io_msg->message("Registro Actualizado !!!");
             $ls_codestpro4 = "";
             $ls_denestpro4 = "";
             $ls_status = "NUEVO";
             $readonly = "";
         } else {
             $io_sql->rollback();
             $io_msg->message($io_estpro4->is_msg_error);
         }
 function uf_insert_config($as_sistema, $as_seccion, $as_variable, $as_valor, $as_tipo)
 {
     /////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
     //	     Function: uf_insert_config
     //		   Access: public
     //	    Arguments: as_sistema  // Sistema al que pertenece la variable
     //				   as_seccion  // Sección a la que pertenece la variable
     //				   as_variable  // Variable nombre de la variable a buscar
     //				   as_valor  // valor por defecto que debe tener la variable
     //				   as_tipo  // tipo de la variable
     //	      Returns: $lb_valido True si se ejecuto el insert ó False si hubo error en el insert
     //	  Description: Función que inserta la variable de configuración
     //	   Creado Por: Ing. Yesenia Moreno
     // Fecha Creación: 01/01/2006 								Fecha Última Modificación :
     /////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
     require_once "../shared/class_folder/class_sql.php";
     require_once "../shared/class_folder/sigesp_include.php";
     require_once "../shared/class_folder/sigesp_c_seguridad.php";
     require_once "../shared/class_folder/class_funciones.php";
     require_once "../shared/class_folder/class_mensajes.php";
     $io_msg = new class_mensajes();
     $in = new sigesp_include();
     $con = $in->uf_conectar();
     $io_sql = new class_sql($con);
     $io_funcion = new class_funciones();
     $lb_valido = true;
     $io_sql->begin_transaction();
     $this->ls_codemp = $_SESSION["la_empresa"]["codemp"];
     $ls_sql = "DELETE " . "  FROM sigesp_config " . " WHERE codemp='" . $this->ls_codemp . "' " . "   AND codsis='" . $as_sistema . "' " . "   AND seccion='" . $as_seccion . "' " . "   AND entry='" . $as_variable . "' ";
     $li_row = $io_sql->execute($ls_sql);
     if ($li_row === false) {
         $lb_valido = false;
         $io_msg->message("CLASE->SAF MÉTODO->uf_insert_config ERROR->" . $this->io_funciones->uf_convertirmsg($this->io_sql->message));
         $io_sql->rollback();
     } else {
         switch ($as_tipo) {
             case "C":
                 //Caracter
                 $valor = $as_valor;
                 break;
             case "D":
                 //Double
                 $as_valor = str_replace(".", "", $as_valor);
                 $as_valor = str_replace(",", ".", $as_valor);
                 $valor = $as_valor;
                 break;
             case "B":
                 //Boolean
                 $valor = $as_valor;
                 break;
             case "I":
                 //Integer
                 $valor = intval($as_valor);
                 break;
         }
         $ls_sql = "INSERT INTO sigesp_config(codemp, codsis, seccion, entry, value, type)VALUES " . "('" . $this->ls_codemp . "','" . $as_sistema . "','" . $as_seccion . "','" . $as_variable . "','" . $valor . "','" . $as_tipo . "')";
         $li_row = $io_sql->execute($ls_sql);
         if ($li_row === false) {
             $lb_valido = false;
             $io_msg->message("CLASE->SNO MÉTODO->uf_insert_config ERROR->" . $this->io_funciones->uf_convertirmsg($this->io_sql->message));
             $io_sql->rollback();
         } else {
             $io_sql->commit();
         }
     }
     return $lb_valido;
 }
 function uf_transferir_proveedores($codpro, $as_hostname, $as_login, $as_password, $as_database, $as_gestor)
 {
     /////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
     //	Funcion        uf_transferir_proveedores
     //	Access        public
     //	Arguments	  ai_totrows  // total de filas del detalle
     //				  ao_object  // objetos del detalle
     //	Returns	      lb_valido. Retorna una variable booleana
     //	Description   Busca registros de proveedores dada una base de datos.
     /////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
     $lb_valido = true;
     $lb_existe = false;
     require_once "../shared/class_folder/sigesp_include.php";
     $io_conect = new sigesp_include();
     $io_conexion_destino = $io_conect->uf_conectar_otra_bd($as_hostname, $as_login, $as_password, $as_database, $as_gestor);
     $io_sql_destino = new class_sql($io_conexion_destino);
     $this->io_sql->begin_transaction();
     $lb_existe = $this->uf_select_proveedores_bd($codpro, $as_hostname, $as_login, $as_password, $as_database, $as_gestor);
     if (!$lb_existe) {
         $lb_valido = true;
         $li_total_select = 0;
         $li_total_insert = 0;
         $ls_sql = "SELECT codemp, cod_pro, nompro, dirpro, telpro, faxpro, nacpro, rifpro, nitpro, fecreg, capital, sc_cuenta," . "       obspro, estpro, estcon, estaso, ocei_fec_reg, ocei_no_reg, monmax, cedrep, nomreppro, emailrep, carrep," . "       registro, nro_reg, tomo_reg, folreg, fecregmod, regmod, nummod, tommod, folmod, inspector, foto," . "       codbansig, codban, codmon, codtipoorg, codesp, ctaban, numlic, fecvenrnc, numregsso, fecvensso," . "       numregince, fecvenince, estprov, pagweb, email, codpai, codest, codmun, codpar, graemp, tipconpro, tipperpro " . "  FROM rpc_proveedor " . "  WHERE cod_pro = '{$codpro}' ";
         $io_recordset = $this->io_sql->select($ls_sql);
         if ($io_recordset === false) {
             $lb_valido = false;
             $this->io_msg->message("Error al seleccionar Proveedor de la Base de Datos.");
         } else {
             $li_total_select = $this->io_sql->num_rows($io_recordset);
             while ($row = $this->io_sql->fetch_row($io_recordset)) {
                 $ls_codemp = $this->io_validacion->uf_valida_texto($row["codemp"], 0, 4, "");
                 $ls_cod_pro = $this->io_validacion->uf_valida_texto($row["cod_pro"], 0, 10, "");
                 $ls_nompro = $this->io_validacion->uf_valida_texto($row["nompro"], 0, 100, "");
                 $ls_dirpro = $this->io_validacion->uf_valida_texto($row["dirpro"], 0, 254, "");
                 $ls_telpro = $this->io_validacion->uf_valida_texto($row["telpro"], 0, 50, "");
                 $ls_faxpro = $this->io_validacion->uf_valida_texto($row["faxpro"], 0, 30, "");
                 $ls_nacpro = $this->io_validacion->uf_valida_texto($row["nacpro"], 0, 1, "");
                 $ls_rifpro = $this->io_validacion->uf_valida_texto($row["rifpro"], 0, 15, "");
                 $ls_nitpro = $this->io_validacion->uf_valida_texto($row["nitpro"], 0, 15, "");
                 $ld_fecreg = $this->io_validacion->uf_valida_fecha($row["fecreg"], "1900-01-01");
                 $li_capital = $row["capital"];
                 $ls_sc_cuenta = $this->io_validacion->uf_valida_texto($row["sc_cuenta"], 0, 25, "");
                 $ls_obspro = $this->io_validacion->uf_valida_texto($row["obspro"], 0, 8000, "");
                 $ls_estpro = $this->io_validacion->uf_valida_monto($row["estpro"], 0);
                 $ls_estcon = $this->io_validacion->uf_valida_monto($row["estcon"], 0);
                 $ls_estaso = $this->io_validacion->uf_valida_monto($row["estaso"], 0);
                 $ld_ocei_fec_reg = $this->io_validacion->uf_valida_fecha($row["ocei_fec_reg"], "1900-01-01");
                 $ls_ocei_no_reg = $this->io_validacion->uf_valida_texto($row["ocei_no_reg"], 0, 17, "");
                 $li_monmax = $row["monmax"];
                 $ls_cedrep = $this->io_validacion->uf_valida_texto($row["cedrep"], 0, 10, "");
                 $ls_nomreppro = $this->io_validacion->uf_valida_texto($row["nomreppro"], 0, 50, "");
                 $ls_emailrep = $this->io_validacion->uf_valida_texto($row["emailrep"], 0, 100, "");
                 $ls_carrep = $this->io_validacion->uf_valida_texto($row["carrep"], 0, 35, "");
                 $ls_registro = $this->io_validacion->uf_valida_texto($row["registro"], 0, 35, "");
                 $ls_nro_reg = $this->io_validacion->uf_valida_texto($row["nro_reg"], 0, 15, "");
                 $ls_tomo_reg = $this->io_validacion->uf_valida_texto($row["tomo_reg"], 0, 5, "");
                 $ls_folreg = $this->io_validacion->uf_valida_texto($row["folreg"], 0, 5, "");
                 $ld_fecregmod = $this->io_validacion->uf_valida_fecha($row["fecregmod"], "1900-01-01");
                 $ls_regmod = $this->io_validacion->uf_valida_texto($row["regmod"], 0, 35, "");
                 $ls_nummod = $this->io_validacion->uf_valida_texto($row["nummod"], 0, 15, "");
                 $ls_tommod = $this->io_validacion->uf_valida_texto($row["tommod"], 0, 5, "");
                 $ls_folmod = $this->io_validacion->uf_valida_texto($row["folmod"], 0, 5, "");
                 $ls_inspector = $this->io_validacion->uf_valida_monto($row["estprov"], 0);
                 $ls_foto = $row["foto"];
                 $ls_codbansig = $this->io_validacion->uf_valida_texto($row["codbansig"], 0, 3, "");
                 $ls_codban = $this->io_validacion->uf_valida_texto($row["codban"], 0, 3, "");
                 $ls_codmon = $this->io_validacion->uf_valida_texto($row["codmon"], 0, 3, "");
                 $ls_codtipoorg = $this->io_validacion->uf_valida_texto($row["codtipoorg"], 0, 2, "--");
                 $ls_codesp = $this->io_validacion->uf_valida_texto($row["codesp"], 0, 3, "");
                 $ls_ctaban = $this->io_validacion->uf_valida_texto($row["ctaban"], 0, 25, "");
                 $ls_numlic = $this->io_validacion->uf_valida_texto($row["numlic"], 0, 25, "");
                 $ld_fecvenrnc = $this->io_validacion->uf_valida_fecha($row["fecvenrnc"], "1900-01-01");
                 $ls_numregsso = $this->io_validacion->uf_valida_texto($row["numregsso"], 0, 15, "");
                 $ld_fecvensso = $this->io_validacion->uf_valida_fecha($row["fecvensso"], "1900-01-01");
                 $ls_numregince = $this->io_validacion->uf_valida_texto($row["numregince"], 0, 15, "");
                 $ld_fecvenince = $this->io_validacion->uf_valida_fecha($row["fecvenince"], "1900-01-01");
                 $ls_estprov = $this->io_validacion->uf_valida_monto($row["estprov"], 0);
                 $ls_pagweb = $this->io_validacion->uf_valida_texto($row["pagweb"], 0, 200, "");
                 $ls_email = $this->io_validacion->uf_valida_texto($row["email"], 0, 200, "");
                 $ls_codpai = $this->io_validacion->uf_valida_texto($row["codpai"], 0, 3, "---");
                 $ls_codest = $this->io_validacion->uf_valida_texto($row["codest"], 0, 3, "---");
                 $ls_codmun = $this->io_validacion->uf_valida_texto($row["codmun"], 0, 3, "---");
                 $ls_codpar = $this->io_validacion->uf_valida_texto($row["codpar"], 0, 3, "---");
                 if ($ls_codpai == "---") {
                     $ls_codest = "---";
                     $ls_codmun = "---";
                     $ls_codpar = "---";
                 }
                 if ($ls_codest == "---") {
                     $ls_codmun = "---";
                     $ls_codpar = "---";
                 }
                 if ($ls_codmun == "---") {
                     $ls_codpar = "---";
                 }
                 $ls_graemp = $this->io_validacion->uf_valida_texto($row["graemp"], 0, 4, "");
                 $ls_tipconpro = $this->io_validacion->uf_valida_texto($row["tipconpro"], 0, 1, "");
                 $ls_tipperpro = $this->io_validacion->uf_valida_texto($row["tipperpro"], 0, 1, "");
                 if ($ls_codtipoorg != "") {
                     $ls_sql = "INSERT INTO rpc_proveedor(codemp, cod_pro, nompro, dirpro, telpro, faxpro, nacpro, rifpro, nitpro," . "                          fecreg, capital, sc_cuenta, obspro, estpro, estcon, estaso, ocei_fec_reg," . "                          ocei_no_reg, monmax, cedrep, nomreppro, emailrep, carrep, registro," . "                          nro_reg, tomo_reg, folreg, fecregmod, regmod, nummod, tommod, folmod," . "                          inspector, foto, codbansig, codban, codmon, codtipoorg, codesp, ctaban," . "                          numlic, fecvenrnc, numregsso, fecvensso, numregince, fecvenince, estprov," . "                          pagweb, email, codpai, codest, codmun, codpar, graemp, tipconpro,tipperpro)" . "\t  VALUES ('" . $ls_codemp . "','" . $ls_cod_pro . "','" . $ls_nompro . "','" . $ls_dirpro . "','" . $ls_telpro . "'," . "             '" . $ls_faxpro . "','" . $ls_nacpro . "','" . $ls_rifpro . "','" . $ls_nitpro . "','" . $ld_fecreg . "'," . "             " . $li_capital . ",'" . $ls_sc_cuenta . "','" . $ls_obspro . "','" . $ls_estpro . "'," . "             '" . $ls_estcon . "','" . $ls_estaso . "','" . $ld_ocei_fec_reg . "','" . $ls_ocei_no_reg . "'," . "             " . $li_monmax . ",'" . $ls_cedrep . "','" . $ls_nomreppro . "','" . $ls_emailrep . "','" . $ls_carrep . "'," . "             '" . $ls_registro . "','" . $ls_nro_reg . "','" . $ls_tomo_reg . "','" . $ls_folreg . "'," . "             '" . $ld_fecregmod . "','" . $ls_regmod . "','" . $ls_nummod . "','" . $ls_tommod . "','" . $ls_folmod . "'," . "             '" . $ls_inspector . "','" . $ls_foto . "','" . $ls_codbansig . "','" . $ls_codban . "','" . $ls_codmon . "'," . "             '" . $ls_codtipoorg . "','" . $ls_codesp . "','" . $ls_ctaban . "','" . $ls_numlic . "','" . $ld_fecvenrnc . "'," . "             '" . $ls_numregsso . "','" . $ld_fecvensso . "','" . $ls_numregince . "','" . $ld_fecvenince . "'," . "             '" . $ls_estprov . "','" . $ls_pagweb . "','" . $ls_email . "','" . $ls_codpai . "','" . $ls_codest . "'," . "             '" . $ls_codmun . "','" . $ls_codpar . "','" . $ls_graemp . "','" . $ls_tipconpro . "','" . $ls_tipperpro . "')";
                     $li_row = $io_sql_destino->execute($ls_sql);
                     if ($li_row === false) {
                         $lb_valido = false;
                         $io_sql_destino->rollback();
                         $this->io_msg->message("Error al insertar Proveedor  " . $codpro);
                     } else {
                         $io_sql_destino->commit();
                         $li_total_insert++;
                     }
                 } else {
                     $io_sql_destino->rollback();
                     $this->io_msg->message("Hay data inconsistente en los Proveedores");
                 }
             }
         }
     }
     return $lb_valido;
 }
	{
          $SQL->begin_transaction();
		    //////////////////////////////////         SEGURIDAD               /////////////////////////////		
			$ls_evento="INSERT";
			$ls_descripcion =" Guardar la programacion de reportes ";
			$ls_variable= $io_seguridad->uf_sss_insert_eventos_ventana($la_seguridad["empresa"],
											$la_seguridad["sistema"],$ls_evento,$la_seguridad["logusr"],
											$la_seguridad["ventanas"],$ls_descripcion);
  		 /////////////////////////////////         SEGURIDAD               /////////////////////////////	
			
		 $SQL->commit();
	     $msg->message(" Los Datos fueron guardados con  exito ");
	 }
	 else
	 {
	 	$SQL->rollback();  
		$msg->message(" Error en los datos en el guardar  ");
	 }	  
}//GUARDAR	
?>
    <input name="operacion" type="hidden" id="operacion" value="<?php $_POST["operacion"]?>">
    <input name="li_totnum" type="hidden" id="li_totnum" value="<?php print $li_totnum; ?>">
    <input name="fila" type="hidden" id="fila">
</p>
  <p>&nbsp;</p>
</form>
</body>
<script language="javascript">

function uf_cambio_estpro1()
{
	function uf_transferir_usuarios($codemp, $codusu, $as_hostname, $as_login, $as_password,$as_database,$as_gestor)
	{
	/////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
	//	Funcion       uf_transferir_usuarios
	//	Access        public
	//	Arguments	  ai_totrows  // total de filas del detalle
	//				  ao_object  // objetos del detalle
	//	Returns	      lb_valido. Retorna una variable booleana
	//	Description   Busca registros de usuarios dada una base de datos. 
/////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
		$lb_valido=true;
		$lb_existe=false;
		require_once("../shared/class_folder/sigesp_include.php");
		$io_conect=new sigesp_include();
		$in=new sigesp_include();
		$this->con=$in->uf_conectar();
		$this->io_sql=new class_sql($this->con);
		$io_conexion_destino   = $io_conect->uf_conectar_otra_bd ($as_hostname, $as_login, $as_password,$as_database,$as_gestor);
		$io_sql_destino = new class_sql($io_conexion_destino);
		$lb_existe=$this->uf_select_usuarios_bd($codemp, $codusu, $as_hostname, $as_login, $as_password,$as_database,$as_gestor);
		if (!$lb_existe)
		{
			$lb_valido= true;
			$li_total_select= 0;
			$li_total_insert= 0;
			$this->io_sql->begin_transaction();
			$ls_sql="SELECT cedusu, nomusu, apeusu, pwdusu, telusu, nota, ". 
       				"       actusu, blkusu, admusu, ultingusu, fotousu ".
      				"	FROM sss_usuarios".
					"  WHERE codemp = '".$codemp."' AND codusu = '".$codusu."' ";	
			$rs_data=$this->io_sql->select($ls_sql);
			if($rs_data===false)
			{
				$lb_valido=false;
				$this->io_msg->message(" Error en la Seleccion de Usuario ".$this->io_funcion->uf_convertirmsg($this->io_sql->message));
			}
			else
			{   
			 $li_total_select = $this->io_sql->num_rows($rs_data);
			 while(($row=$this->io_sql->fetch_row($rs_data))&&($lb_valido))
			 {
				$ls_cedusu= $this->io_validacion->uf_valida_texto($row["cedusu"],0,8,"");
				$ls_nomusu= $this->io_validacion->uf_valida_texto($row["nomusu"],0,50,"");
				$ls_apeusu= $this->io_validacion->uf_valida_texto($row["apeusu"],0,50,"");
				$ls_pwdusu= $this->io_validacion->uf_valida_texto($row["pwdusu"],0,50,"");
				$ls_telusu= $this->io_validacion->uf_valida_texto($row["telusu"],0,20,"");
				$ls_nota  = $this->io_validacion->uf_valida_texto($row["nota"],0,5000,"");
				$li_actusu= $this->io_validacion->uf_valida_monto($row["actusu"],0);
				$li_blkusu= $this->io_validacion->uf_valida_monto($row["blkusu"],0);
				$li_admusu= $this->io_validacion->uf_valida_monto($row["admusu"],0);
				$ld_ultingusu=$this->io_validacion->uf_valida_fecha($row["ultingusu"],"1900-01-01");
				$ls_fotousu= $this->io_validacion->uf_valida_texto($row["fotousu"],0,254,"");
				
				if(($codemp!="")&&($codusu!=""))
				{
								
					$ls_sql="INSERT INTO sss_usuarios(codemp, codusu, cedusu, nomusu, apeusu, pwdusu, telusu, nota, ".
                  			"						  actusu, blkusu, admusu, ultingusu, fotousu) ".
    						"     VALUES ('".$codemp."','".$codusu."','".$ls_cedusu."','".$ls_nomusu."','".$ls_apeusu."',".
							"             '".$ls_pwdusu."','".$ls_telusu."','".$ls_nota."',".$li_actusu.",".$li_blkusu.",".
							"             ".$li_admusu.",'".$ld_ultingusu."','".$ls_fotousu."')";					
					$li_row=$io_sql_destino->execute($ls_sql);
					if($li_row===false)
					{
						$lb_valido=false;
						$this->io_msg->message("Error al insertar el Usuario  ".$codusu);
					}
					else
					{ 
					  $lb_valido = $this->uf_procesar_permisos_internos($codemp, $codusu, $as_hostname, $as_login, $as_password,$as_database,$as_gestor);
					  if ($lb_valido)
					  {
					    $lb_valido = $this->uf_procesar_derechos_usuario($codemp, $codusu, $as_hostname, $as_login, $as_password,$as_database,$as_gestor);
						
						if ($lb_valido)
						{
						 $ls_descripcion = "Usuario Nuevo Transferido: ".$codusu." - ".$ls_nomusu." ".$ls_apeusu.", con los permisos asociados ";
						 $lb_result = $this->uf_insertar_resultado($this->dat_bdorigen,$as_database,$ls_descripcion);
						}
					  }
						$li_total_insert++;
					 }
				}
				else
				{
					   $lb_valido = false;
					   $this->io_msg->message("Hay data inconsistente en los Usuarios");
				}
			}
			}	
		}
		else // Si existe el Usuario
		{
		 $lb_valido = $this->uf_procesar_permisos_internos($codemp, $codusu, $as_hostname, $as_login, $as_password,$as_database,$as_gestor);
		 if ($lb_valido)
		 {
		  $lb_valido = $this->uf_procesar_derechos_usuario($codemp, $codusu, $as_hostname, $as_login, $as_password,$as_database,$as_gestor);
		  
		  if ($lb_valido)
		  {
		   $ls_descripcion = "El Usuario ".$codusu." no fue transferido, ya se encuentra en la base de datos destino, se actualizaron sus permisos ";
		   $lb_result = $this->uf_insertar_resultado($this->dat_bdorigen,$as_database,$ls_descripcion);
		  }
		 }
		}	
		
		if ($lb_valido )
		{
		 $io_sql_destino->commit();
		 $this->io_sql->close();
		}
		else
		{
		 $io_sql_destino->rollback();
		 $this->io_sql->close();
		}
		
		return $lb_valido;
	}