AppuntiMania.com » Informatica » Appunti di computer » Supermercati e informatica

Supermercati e informatica

Gradito:

[ Picolo appunti ]

La ricerca delle prestazioni

La ricerca delle prestazioni La contesa per ottenere una sempre maggiore

La codifica delle informazioni

La codifica delle informazioni Nell'elaboratore tutte le informazioni

Il computer al servizio del progresso dell'umanità

Il computer al servizio del progresso dell'umanità La nostra era moderna,

SUPERMERCATI

INFORMATICA

Indice:

Introduzione

Cenni storici

Il supermercato oggi

Database ordini

Interrogazione Database

Pagina HTM

Codice HTM

Pagina ASP

Codice ASP

Progettazione Top Down

Funzionigramma

Il supermercato è un grande negozio di tipo self-service, diviso in reparti, dove si ha la possibilità di trovare migliaia di generi alimentari e non solo; vi si trovano prodotti per la pulizia, casalinghi, hi-fi, giocattoli e altro.

Cenni storici

Nel primo dopoguerra l'economia degli Stati Uniti ebbe un forte incremento. Infatti, dal 1922 al 1929, la produzione industriale aumentò del 64%, la produttività del lavoro del 43%, i profitti del 76% e i salari del 30%. La forte differenza tra l'aumento dei profitti e della produzione, con quello dei salari creò un evidente squilibrio nella distribuzione dei redditi.
Per queste ragioni, il sistema si stava costruendo su se stesso e accentuava le tendenze di mercato. Ma al crescere dei titoli di borsa corrispondeva il calo della produzione e nell'ottobre del 1929, si ebbe il crollo della borsa di Wall Street.

Quindi nell'autunno, gli Stati Uniti tenevano in piedi il sistema economico internazionale.

Sempre negli U.S.A.,dopo la crisi, sorsero i primi supermercati su un'idea di Michael Kullen.

Il "King Kullen" fu il primo della serie di empori che praticavano una politica di prezzi contenuti e offrivano il servizio self-service.

Fu aperto nel 1930 nel quartiere di Queens a New York.

La loro crescita fu istantanea grazie alla varietà di prodotti, con conseguente possibilità di comprare tutto ciò che occorre in una volta sola, e avere così la convenienza dei prezzi rispetto ad un negozio specializzato.

Il supermercato oggi

Partendo dai primi anni '80 sino ad oggi, si ha lo sviluppo, su scala mondiale, dei più grandi e complessi sistemi di comunicazione.

Fin dalla nascita dei primi supermercati,per gestire il magazzino veniva utilizzata carta e penna e successivamente si utilizzò la macchina per scrivere che venne prodotta dall'Olivetti per la prima volta nel 1932.

Con l'invenzione del processore e quindi del Personal Computer, le attività terziarie furono rivoluzionate e tuttora gestire un supermercato è divenuto molto più semplice e veloce.

Nei primi supermercati si utilizzava, come registratori di cassa, un modello a tasti che venne sostituito da un altro, di tipo elettronico. Oggi viene impiegato un vero e proprio registratore di cassa digitale.

Ai giorni nostri il supermercato viene gestito da un'ampia e complessa rete informatica, dove più sedi vengono collegate fra loro, per registrare gli ordini e le vendite giornaliere (ad esempio la sede amministrativa e il magazzino).

Anche il sistema delle casse si sta sempre più automatizzando, infatti oltre a quelle tradizionali, in alcuni centri commerciali, sono state installate delle casse "fai da te", nelle quali i consumatori con poca spesa, non sono più costretti a sopportare code e perdite di tempo inutili.

Una cassa automatica per il self checkout (scannerizzare, imbustare e pagare da soli).

Database Ordini

Interrogazione Database

Query 1: Fatturato totale annuo

SELECT sum(dett_ordini.q*prodotti.costo_q) as fatt_tot

FROM from ordini,dett_ordini,prodotti

WHERE (ordini.cod_ordini=dett_ordini.cod_ordini) and (prodotti.cod_prodotto=dett_ordini.cod_prodotto) and (year(ordini.data)='&ann&');

Query 2: Elenco Prodotti

SELECT prodotti.reparto,prodotti.nome

FROM ordini,dett_ordini,prodotti

WHERE (ordini.cod_ordini=dett_ordini.cod_ordini) and (prodotti.cod_prodotto=dett_ordini.cod_prodotto) and (year(ordini.data)='&ann&');

order by prodotti.reparto

Query 3: Elenco Fornitori

SELECT fornitori.cod_fornitori,fornitori.cognome

FROM ordini,fornitori

WHERE (fornitori.cod_fornitori=ordini.cod_fornitori) and (year(ordini.data)='&ann&');

Pagina HTM

Codice HTM

<html>

<head>

<title>SUPERMERCATO ON LINE</title>

</head>

<h1 align="center">CONSULTAZIONE DATABASE</h1><hr><hr><br><br><br><br><br>

ANNO<br>

<p>SELEZIONA DALL'ELENCO SOTTOSTANTE LA RICHIESTA:</p>

<h2><input type="radio" name="elenco" value="Fatturato"> Fatturato totale annuo<br><br></input>

<h2><input type="radio" name="elenco" value="Elenco"> Elenco prodotti<br><br></input>

<h2><input type="radio" name="elenco" value="Fornitori"> Elenco fornitori<br><br></input>

</h2>

</form>

</body>

</html>

Pagina ASP

Codice ASP

<html>

<head>

<title>SUPERMERCATO ON LINE</title>

</head>

<h1 align='center'>CONSULTAZIONE DATABASE</h1><hr><hr><br><br>

'dimensiono variabili

dim db,rs,strconn,conn

dim ann,fatt_tot,ele_prod,ele_forn,scelta,query1,query2,query3

ann=cint(request.form('anno'))

scelta=request.form('elenco')

<% 'visualizzazione scelta e anno

response.write scelta %>  <%response.write ann%>

'sviluppo query

query1='select sum(dett_ordini.q*prodotti.costo_q) as fatt_tot from ordini,dett_ordini,prodotti where (ordini.cod_ordini=dett_ordini.cod_ordini) and (prodotti.cod_prodotto=dett_ordini.cod_prodotto) and (year(ordini.data)='&ann&');'

query2='select prodotti.reparto,prodotti.nome from ordini,dett_ordini,prodotti where (ordini.cod_ordini=dett_ordini.cod_ordini) and (prodotti.cod_prodotto=dett_ordini.cod_prodotto) and (year(ordini.data)='&ann&') order by prodotti.reparto;'

query3='select fornitori.cod_fornitori,fornitori.cognome from ordini,fornitori where (fornitori.cod_fornitori=ordini.cod_fornitori) and (year(ordini.data)='&ann&');'

'connessione db

strconn='provider=microsoft.jet.oledb.4.0;data source='&server.mappath('gigante.mdb')

set conn=server.createobject('adodb.connection')

set rs=server.createobject('adodb.recordset')

conn.Open strconn

'ciclo scelta

if scelta='Fatturato' then

set rs=conn.execute(query1)

a=1

else

if scelta='Elenco' then

set rs=conn.execute(query2)