function uf_valida_cuenta($as_cuenta )
	{
		$li_nivel =0;
		$lb_valido=true;
		$ls_pad_cuenta="";$ls_denominacion="";$ls_status="";$ls_NextCuenta="";$ls_mensaje_error="";
		$int_scg=new class_sigesp_int_scg();
		$msg=new class_mensajes();
		$dat=$_SESSION["la_empresa"];
		$ls_formplan=$dat["formplan"];
		$is_codemp=$dat["CodEmp"];
		
		$ls_pad_cuenta = $int_scg->uf_pad_cuenta_plan($ls_formplan ,$as_cuenta); 

		if(!$int_scg->uf_select_plan_unico_cuenta($ls_pad_cuenta,$ls_denominacion))
		{
			$msg->message("La cuenta no existe en el Plan Unico de Cuentas.");		
			return false;
		}
		
		/*if($int_scg->uf_scg_select_cuenta($is_codemp,$as_cuenta,$ls_status,$ls_denominacion))      
		{
			$msg->message("La cuenta ya existe en el Plan de Cuentas.");	
			return false;	
		}*/
		
		// verifico si el nivel es el apropiado
		//$msg->message($as_cuenta);	
		$int_scg->uf_init_niveles();
		$li_nivel = $int_scg->uf_scg_obtener_nivel($as_cuenta);
			
		if($li_nivel<=1)
		{
		   $msg->message("Las cuentas de nivel 1 no son validas.");				
		   return false;
		}
		// verifico si no hay cuentas con movimientos de nivel superior
		if($li_nivel > 1)
		{
		   $ls_NextCuenta = $int_scg->uf_scg_next_cuenta_nivel($as_cuenta);
			
			do
			{
			  
			  if($int_scg->uf_scg_select_cuenta($is_codemp,$ls_NextCuenta,$ls_status,$ls_denominacion))
			  {
					if ($ls_status == "C")
					{
						$msg_message("Existen cuentas de nivel superior con Movimiento.");			      
						return false;				
					}
			  }
		   $ls_NextCuenta = $int_scg->uf_scg_next_cuenta_nivel($ls_NextCuenta);
		   $li_nivel=$int_scg->uf_scg_obtener_nivel($ls_NextCuenta);
		   
		   }while( $li_nivel > 1);
		}
		
		return $lb_valido;
	
	}//uf_valida_cuenta
$io_plauni = new sigesp_scg_class_definicion();
$ls_format = $_SESSION["la_empresa"]["formplan"];
$ls_format = str_replace("-", "", $ls_format);
$li_size_form = strlen(trim($ls_format));
if (array_key_exists("operacion", $_POST)) {
    $ls_operacion = $_POST["operacion"];
    $ls_status = $_POST["status"];
    $ls_cuenta = $_POST["txtcuenta"];
    $ls_dencta = $_POST["txtdenominacion"];
} else {
    $ls_operacion = $ls_cuenta = $ls_dencta = "";
}
if ($ls_operacion == "GUARDAR") {
    $lb_valido = $int_scg->uf_insert_plan_unico_cuenta($ls_cuenta, $ls_dencta, $ls_status);
    if ($lb_valido) {
        $lb_existe = $int_scg->uf_select_plan_unico_cuenta($ls_cuenta, $ls_dencta);
        if ($lb_existe) {
            $io_msg->message("Registro Actualizado !!!");
            $ls_evento = "UPDATE";
            $ls_descripcion = "Actualizo la cuenta de plan unico {$ls_cuenta}, con denominacion {$ls_dencta}";
        } else {
            $io_msg->message("Registro Incluido !!!");
            $ls_evento = "INSERT";
            $ls_descripcion = "Inserto la cuenta de plan unico {$ls_cuenta}, con denominacion {$ls_dencta}";
        }
        $io_seguridad->uf_sss_insert_eventos_ventana($ls_empresa, $ls_sistema, $ls_evento, $ls_logusr, $ls_ventanas, $ls_descripcion);
        $ls_cuenta = $ls_dencta = "";
    } else {
        $io_msg->message("" . $int_scg->is_msg_error);
    }
}