LibreOffice Base

Buona sera,

ho terminato un db che funge da rubrica telefonica da usare dove lavoro
e ne sto scrivendo uno per la gestione dei collaboratori.

Funzionerebbe e farebbe tutto se non fosse per due problemi.

1. il formulario principale si apre a tutto schermo e se voglio
cancellare un record di un contatto telefonico o mail, il messaggio di
sistema che mi chiede la conferma della cancellazione rimane nascosto
dietro il formulario, se lo stesso formulario non è aperto a tutto
schermo il messaggio compare sopra il formulario ed è possibile operare
la scelta se cancellare o no. Di seguito la macro che uso per aprire a
tutto schermo durante il caricamento.

Sub ATuttoSchermo(Event As Object)

Dim oFrame As Object

Dim oDispatchHelper

oFrame=Event.Source.Parent.Parent.CurrentController.Frame

oDispatchHelper=CreateUnoService("com.sun.star.frame.DispatchHelper")

oDispatchHelper.ExecuteDispatch(oFrame,".uno:FullScreen","",0,Array())

End Sub

2. Il formulario MENU recupera i dati da T_STRUTTURE-SERVIZI e a questo
è collegato un SUBFormulario che recupera i dati da da T_UFFICI e a
questo sono collegati due SUBSUBFormulari T_TELEFONI e T_MAIL.
Le due tabelle contenute in questi due SUBSUBFormulari contengono un
campo ID_TIPO che è una casella di riepilogo la quale alla sua apertura
visualizza dei dati (es. UFFICIO, CELLULARE ...) ma nelle tabelle
inserisce il valore reale quindi l'ID, il problema è che l'utilizzatore
è obbligato a fare una scelta, se lo lascia vuoto si crea un errore.
Vorrei che nel campo comparisse un messaggio tipo SCEGLI UN VALORE
assegnando in realtà un ID provvisorio. Di seguito il codice SQL della
casella di riepilogo ora in uso.

SELECT "DESCRIZIONI_TEL-MAIL", "ID_DESCRIZIONI" FROM
"T_DESCRIZIONI_TEL-MAIL" ORDER BY "DESCRIZIONI_TEL-MAIL" ASC

Gli stessi problemi gli dovrò affrontare con il secondo db.

Non riesco a spiegarmi meglio, per questo ho inserito il link dove
recuperare il db
https://cloud.openmailbox.org/index.php/s/l0jwZGHfX6s1gT1

Buona serata

grazie

andrea

Buona sera,

il problema 2 è stato risolto, appena verrà risolto anche il primo (se
mai lo sarà), scriverò le soluzioni e allegherò il link del db corretto.

Saluti

andrea

Non so come hai risolto il punto 2.
Avrei questo suggerimento:

SELECT
  "DESCRIZIONI_TEL-MAIL",
  "ID_DESCRIZIONI"
FROM "T_DESCRIZIONI_TEL-MAIL"
union
select
  '-=SCEGLI UN VALORE=-' as "DESCRIZIONI_TEL-MAIL",
  0 as "ID_DESCRIZIONI"
from "DUAL"
ORDER BY 1 ASC
;

attachment.htm (4.49 KB)