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;
}
    $io_modcmpret->io_sqlaux = $io_cmpret->io_sqlaux;
    $io_sqlaux = $io_cmpret->io_sqlaux;
}
uf_limpiarvariables();
$ls_basdatcmp = $_SESSION["la_empresa"]["basdatcmp"];
switch ($ls_operacion) {
    case "NEW":
        uf_load_variables();
        $ls_ano = date('Y');
        $ls_mes = date('m');
        $io_cmpret->uf_get_nrocomprobante($ls_codret, $ls_ano . $ls_mes, &$ls_numcom);
        uf_load_data(&$ls_parametros);
        break;
    case "GUARDAR":
        uf_load_variables();
        $io_sql->begin_transaction();
        $lb_flag = true;
        if ($ls_existe == "FALSE") {
            $ls_fecha = date('Y-m-d');
            if ($ls_basdatcmp != "") {
                $lb_flag = $io_cmpret->uf_crear_comprobante_consolida($ls_codret, &$ls_numcom, $ls_fecha, $ls_ano . $ls_mes, $ls_codigo, $ls_nomsujret, $ls_dirsujret, $ls_rif, "", "1", $ls_logusr, "", "M", $la_seguridad);
            }
            $lb_flag = $io_cmpret->uf_crear_comprobante($ls_codret, $ls_numcom, $ls_fecha, $ls_ano . $ls_mes, $ls_codigo, $ls_nomsujret, $ls_dirsujret, $ls_rif, "", "1", $ls_logusr, "", "M", $la_seguridad);
        }
        if ($lb_flag) {
            // $lb_flag=$io_modcmpret->uf_liberar_rd($ls_codret,$ls_probene,$ls_codigo,$li_totrowrecepciones);
            $lb_flag = $io_modcmpret->uf_liberar_recepciones($ls_codret, $ls_numcom, $ls_probene, $ls_codigo);
        }
        if ($lb_flag) {
            $lb_flag = $io_modcmpret->uf_update_cmpret($ls_numcom, $ls_codret, $li_totrowrecepciones, $ls_probene, $ls_codigo, $la_seguridad);
        }
 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;
 }
	         $msg->message("El Total es mayor al monto asignado. Por favor revise los montos ");  
	       }
		   else
		   {
	          $lb_valido=$class_progrep->uf_spg_guardar_progrep($ls_codemp,$ls_status,$ld_asignado,$ls_distribuir,$ls_modrep,$ld_enero,$ld_febrero,$ld_marzo,$ld_abril,$ld_mayo,$ld_junio,$ld_julio,$ld_agosto,$ld_septiembre,$ld_octubre,$ld_noviembre,$ld_diciembre,$ls_cuenta,$ls_codrep,$ls_codestpro1,$ls_codestpro2,$ls_codestpro3);
		      if ($lb_valido)
	          {
			     $cont_insert=$cont_insert+1;
	          }
		   }  
	 }//for 		
     $class_grid->makegrid($li_num,$title,$object,800,'PROGRAMACION DE REPORTE TRIMESTRAL',$ls_nombre);

	if($cont_insert==$li_num)
	{
          $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  ");