Come realizzare un database con Access 2007 per gestire i reclami


Questo database è un semplice esempio di come si possono registrare e gestire i reclami in una azienda.
Abbiamo sintetizzato le operazioni necessarie per lo sviluppo perche' le tecniche sono le medesime che avrete visto nel Come Fare le Azioni Correttive.

Il database d'esempio si apre con il pannello comandi principale (Fig.1)


Fig.1

Cliccando su Reclami - Elenco si apre la maschera in Fig.2 con l'elenco che riassume tutti i reclami registrati.


Fig.2

Cliccando sul tasto a fianco a destra (...) e' possibile aprire la maschera per la visualizzazione dei dettagli dei reclami (Fig.3) o per inserirne di nuovi.


Fig.3

Questa maschera permette la registrazione dei reclami aziendali che vengono analizzati, vengono elencati i pezzi difettosi e si procede per risolvere il problema.

Cliccando su Stampa è possibile ottenere un report del reclamo (Fig.4)
 


Fig.4

Cliccando su Tipo registrazione si apre una maschera in cui sono registrati i tipi di reclami (Fig.5)


Fig.5

Cliccando su Prodotti/Servizi si apre una maschera in cui sono memorizzati i prodotti e/o i servizi che fornisce l'azienda (Fig.6)


Fig.6

Scegliendo Decisioni si apre la maschera sotto riportata (Fig.7) in cui sono inserite le decisioni da prendere sui pezzi difettosi.



Fig.7

Infine, scegliendo Nominativi si apre una maschera in cui sono presenti i nomi dei responsabili addetti ai reclami (Fig.8)


Fig.8

Come vedete non abbiamo spiegato come realizzare le maschere perche' sono argomenti già trattati in altri come fare.
Diamo pero' qualche spiegazione sul tasto STAMPA.

Il tasto STAMPA e' un oggetto che quando viene cliccato esegue un semplice programma in Visual Basic che apre il report del reclamo. Il programma deve aprire solo quel report.
Come fa?

Se vediamo l'evento Su clik del tasto ci appare il seguente programma (uno shock per i non esperti):

Riga Visual Basic Commento
   
Private Sub Comando11_Click() Dice che questa routine e' del Comando11 (il tastino)
 
 
On Error GoTo Errore Questa riga fa si che in caso di errore il programma vada alla riga Errore:
 
Dim stDocName As String, Filtro As String Riga per dichiarare le variabili utilizzate
 
 
Filtro = "[RC_ID]=" & Me.RC_ID La variabile Filtro assume un valore che dice che quando aprirò il report dei reclami dovro' visualizzare il reclamo uguale al valore ID della maschera aperta
stDocName = "RC_Report_Testa" Definisce il nome del report da aprire
 
 
DoCmd.OpenReport stDocName, acViewPreview, , Filtro Apre il report con il filtro sopra impostato
 
 
Errore: Riga raggiunta in caso di errore
 
 
Exit Sub Uscita dalla routine
 
 
End Sub Fine della routine
 
 

Se volete imparare ad utilizzare Visual Basic con Access provate a vedere i tutorial dedicati.

 

  Scarica database d'esempio