B-MOBILI

INVENTARIO BENI MOBILI (B-Mobili)

Applicazione:

B-MOBILI

Utente

 USL 24 Cortona (Arezzo)

Anno

1993

Autore:

Claudio Maccherani

Computer:

PC AT IBM , Olivetti M 24, "IBM compatibili"

Sistema Operativo:

MS-DOS

Linguaggio:

Clipper'87 + DBF

Realizzata nel 1993 da Claudio Maccherani, per conto di "Future Office" di Camucia (AR), per l'UNIT� SANITARIA LOCALE N.24 �VAL DI CHIANA EST� di CORTONA (unitamente ad altre applicazioni - Appalti, Ticket, Invalidi, Concorsi), l'applicazione INVENTARIO BENI MOBILI (B-Mobili) gestisce l'INVENTARIO, il PATRIMONIO MOBILIARE, della USL 24 per quanto concerne Beni, Materiali, Servizi, Unit� Operative, Unit� Immobiliari, Dismissioni, etc.

I beni sono raggruppati per Ubicazione, Servizio, Tipo, Stato, Unit� Immobiliare e altro, � gestito l'archivio STORICO (che contiene tutti i Beni "Alienati", cos� da mantenere traccia dell'intera "vita" dei beni inventariati) e vengono fornite STATISTICHE selezionabili dinamicamente. A ogni Scheda dell'Inventario pu� essere allegato un ELENCO di fino a 999 Beni; questo serve a inventariare dettagliatamente insiemi di Libri, Riviste, Programmi, etc., ma potendo dare un valore globale a tutto l'insieme.

I dati iniziali dell'applicazione derivano dagli archivi di un precedente programma COBOL trasferiti nel database di B-Mobili tramite il programma Quick Basic 4.5 Trasf.bas (#).

INVENTARIO - ARCINVE.DBF - per ogni bene, una scheda descrittiva, comprensiva di eventuale

                           ELENCO allegati

STORICO    - ARCSTOR.DBF - stessa struttura di Inventario, per i "Beni ALIENATI"

TABELLE    - ARCTABE.DBF - valori predefiniti per l'inventario
 

MENU

 

 

 

 

1 - INVENTARIO

1 - Inserimento

2 - Variazione/Cancellazione

3 - Elenchi (Visualizzazione/Stampa)

 

 

 

 

 

 

2 - STORICO

1 - Trasferimento Inventario --> Storico

2 - Variazione/Cancellazione

3 - Elenchi (Visualizzazione/Stampa)

4 - Trasferimento Inventario <-- Storico

 

 

3 - Gestione Tabelle

1 - Servizi

2 - Unit� Operative

3 - Unit� Immobiliari

4 - Comuni

5 - Enti Provenienza

6 - Rilevatori

7 - Classificazione Regionale

8 - Beni

9 - Materiali

A - Stati

B - Causali Trasferimento

 

 

 

 

 

 

4 - Programmi  di Servizio

1 - Ambiente di Lavoro Corrente

2 - Creazione Iniziale/Azzeramento Archivi

3 - Reindicizzazione/Compattamento Archivi

4 - Numero Ultima Matricola

5 - Salvataggio Archivi (HD --> FD)

6 - Ripristino  Archivi (HD <-- FD)

7 - Elenco 'buchi' numerazione schede

8 - Variazione Password

 

 

 

 

 

L'applicazione � costituita da circa 3.000 istruzioni Clipper'87
 

(#) TRASFERIMENTO DATI:

1) con Trasf.bas (mio programma Quick Basic 4.5) si copiano i file INVENT, ELENCHI e TABELLE (in formato COBOL)

    in INV.DAT, ELE.DAT e TAB.DAT (in formato SDF-Ascii)

2) da B-Mobili - Programmi di Servizio si creano le tabelle ArcInve (con date di 8 caratteri), ArcEle, ArcTabe

3) da dB3 si inseriscono i dati di Elenchi e Tabelle (USE ArcEle - APPEND FROM Ele.dat TYPE SDF)

4) da dB3 si trasformano le date di ArcInve.dbf da tipo Carattere a tipo Data

    e con ClaMa.prg (mio programma Clipper) si ridefinisce il file struttura StruInve.dbf con i campi di tipo Data

Claudio Maccherani, Perugia