$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);
    }
}
if ($ls_operacion == "ELIMINAR") {
    $lb_tiene = $io_plauni->uf_load_relacion($ls_cuenta);
    if (!$lb_tiene) {
        $lb_valido = $io_plauni->uf_delete_planunico($ls_cuenta, $ls_dencta);
        if ($lb_valido) {
            $io_msg->message("Registro Eliminado !!!");
            $ls_descripcion = "Elimino la cuenta de plan unico {$ls_cuenta}, con denominacion {$ls_dencta}";
            $io_seguridad->uf_sss_insert_eventos_ventana($ls_empresa, $ls_sistema, "DELETE", $ls_logusr, $ls_ventanas, $ls_descripcion);
        } else {
            $io_msg->message("No se encontro el registro !!!");
        }
        $ls_cuenta = "";
        $ls_dencta = "";
    } else {
        $io_msg->message("Error en Eliminación, Existen Registro asociados a esta Cuenta en el Plan de Cuentas Contable !!!");
    }
}
if ($ls_operacion == "NUEVO") {
    $ls_cuenta = "";
Exemplo n.º 2
0
        $ls_denominacion=" ";
		$msg->message("Registro Actualizado");
	 }
		
	 if($li_return==1)
	 {
	    $ls_cuenta=" ";
        $ls_denominacion=" ";
	    $msg->message("Registro Incluido"); 
     }
}

if($ls_operacion=="ELIMINAR")
{
   $msg->message("Esta seguro de Eliminar este Registro");  //terminarlo cuando tengamos la clase de menssage preguntar por la respuesta 
   $lb_valido=$def->uf_delete_planunico($ls_cuenta,$ls_denominacion);
   $ls_cuenta=" ";
   $ls_denominacion=" ";
   
   if ($lb_valido)
   {   
	  $msg->message("Registro  Eliminado");            	
   }
   else 
   {
     $msg->message("No se encontro el registro");
   }
}

if($ls_operacion=="NUEVO")
{