Newsgroup: it.comp.appl.access
Titolo: Calcolo percentuali su vendite

Come posso applicare un calcolo variabile su delle percentuali? (Va bene
anche una routine su casella)
Faccio un esempio che è meglio:
Se il venditore effettua una vendita di un prodotto di Lit. 1.000.000  a
Lit. 1.000.000 avrà una % del 10% quindi Lit. 100.000
Se il venditore effettua una vendita di un prodotto di Lit. 1.000.000  a
Lit.    800.000 avrà una % del   7% quindi Lit.   56.000
Se il venditore effettua una vendita di un prodotto di Lit. 1.000.000  a
Lit.    700.000 avrà una % del   5% quindi Lit.   35.000
Spero di essere stato chiaro.
Grazie Marco M.

Lit.    700.000 avrà una % del   5% quindi Lit.   35.000
qual e' la regola che lega vendite a percentuali?
se questa regola c'e' si puo' scrivere una funzione che calcoli la
percentuale.
senno' si fa un select case con tanti piu' case quanto precisa vuoi
che sia l'approssimazione.
lo so che e' generico, ma se dai qualche altra indicazione se ne
riparla.
perche' i venditori vendono i prodotti a meno del loro costo?
-------------------------------------
notepad solution provider
------------------------------------
rimuovere NOSPAM.! - remove NOSPAM.!
------------------------------------

Ok
tappeto Kerman da vendere a Lit. 1.000.000 (prezzo listino)
mettiamo il caso che la sig. Laura lo venda ad 800.000
ora io dovrei calcolare la percentuale in base ad una tabella predefinita
che nel caso della
suddetta vendita, essendo del -20% dal prezzo di listino corrisponde all'7%
per la sig.Laura.
Ora non ho la minima idea di come possa impostare dei parametri variabili
sul prezzo di listino.
Parametri da applicare sul prezzo di listino:
   0% = 10%
-10% = 9%
-20% = 7%
-30% = 5%
-35% = 3%
Se non sono stato chiaro fammi sapere
grazie Lbo
Marco M.

Dim PrezzoListino as Variant,PrezzoScontato as variant,Provvigione as
Variant,Sconto as Variant,Valore as Variant
PrezzoListino=1.000.000
PrezzoScontato=750.000
(Prezzo Scontato)/(Prezzo Listino)=Sconto
If Sconto >0.4 and Sconto <=0.5 then Provvigione=??
If Sconto >0.5 and Sconto <=0.65 then Provvigione=3 "Sconto da 50% a 35%"
If Sconto >0.65 and Sconto <=0.7 then Provvigione=5 "Sconto da 30% a 34%"
If Sconto >0.7 and Sconto <=0.8 then Provvigione =7 "Sconto da 20% a 29%"
If Sconto >0.8 and Sconto <=0.9 then Provvigione =9 "Sconto da 10% a 19%"
If Sconto >0.9 and Sconto <=1 then  Provvigione=10 "Sconto da 0% a 9%"
If Sconto >1 then Provvigione=50 "Bravissimo"
Valore=PrezzoScontato/100*Provvigione
Mancano Altri Valori pensaci tu
Saluti

sul prezzo di listino.
ammettiamo che tu abbia una maschera in cui c'e' una casella di testo
per il prezzo del tappeto e una per il prezzo che il venditore e'
riuscito a spuntare.
per prima cosa occorre calcolare la percentuale di sconto praticata
dal venditore, poi compararla con la tabella provvigioni per ottenere
quella che potremmo chiamare aliquota di provvigione, indi calcolare
la provvigione effettiva.
per quello che riguarda la tabella provvigioni, io direi che e' il
caso di metterla proprio in una tabella di access.  in questo modo
potrai variarla senza grosse difficolta' e anche il codice ne
risultera' piu' snello.  ipotizzo che questa tabella ci sia gia', che
si chiami tAliquoteProvv e che abbia due campi: Sconto e Provvigione.
chiamiamo i due controlli PrezzoListino e PrezzoVendita.  ci sara'
anche un controllo Provvigione.  facciamo eseguire le operazioni di
cui sopra in seguito all'evento dopoaggiornamento del controllo
PrezzoVendita, cioe' quando si e' scritto qualcosa e lo si conferma in
tale controllo (ma potremmo anche mettere un pulsante calcola
provvigioni e usare il suo evento clic...).  sei pratico di scrivere
codice da eseguire in conseguenza di eventi?  se no c'e' un thread
poco prima che si intitola Serena II la vendetta dove trovi una
speigazione elementare sul come fare.
ecco il codice, vado a braccio:
dim PercentualeSconto as double
dim AliqProvv as double
' calcolo la precentuale di sconto effettuato dal venditore
' ad es. listino 1.000.000, vendo a 800.000, ho praticato
' uno sconto del 20%
PercentualeSconto=(me.PrezzoListino-me.PrezzoVendita)/(me.prezzoVendita/100)
' trovo l'aliquota di provvigione da applicare, sempre ipotizzando
' che esista la tabella tAliquoteProvv che dicevo sopra
AliqProvv=dmin("Provvigione", "tAliquoteProvv", "Sconto <=" &
PercentualeSconto)
me.Provvigione = (me.PrezzoListino/100)*AliqProvv
il calcolo della provvigione effettuato da dmin funziona cosi': prendi
solo i record per i quali il valore del campo Sconto e' minore o
uguale alla variabile PercentualeSconto; da questi record prendi il
valore piu' basso che trovi per il campo Provvigione.
ad es., ammettiamo di avere venduto a 800mila un tappeto listato ad 1
milione e di avere una tabella di aliquote provvigioni con questi
valori (copiati dai tuoi):
tAliquoteProvv
Sconto	Provvigione
0	10
10	9
20	7
30	5
35	3
lo sconto praticato e' del 20, allora si considereranno solo questi
record:
0	10
10	9
20	7
e si prendera' l'aliquota piu' bassa e cioe' il 7.  se lo sconto fosse
stato intermedio, diciamo del 15%, si sarebbero presi solo i primi due
record e si sarebbe ottenuta una percentuale di provvigione del 9%.
nell'ultima riga ho anche supposto che tu calcoli la provvigione in
base al prezzo di listino e non al prezzo di vendita.


speigazione elementare sul come fare.
dove lo trovo?
Aiutatemi Grazie
Marco M.


http://www.penguinpowered.com/~ecesena
Ferrovie:
	Secondo stime di un osservatorio economico, l'Alta Velocita'
ferroviaria costera' troppo e sara' inutile e dannosa.  Portare la velocita'
massima a 300 km/h significa infatti: costruire curve piu' ampie mangiando
piu' territorio; rendere piu' difficile l'intreccio con i trasporti urbani;
costruire un parco treni ex-novo non intercambiabile col vecchio; aumentare
l'impatto acustico facendo salire i costi delle barriere antirumore; e creare
una rete di alimentazione ad alta tensione che e' incompatibile con l'attuale.
Il tutto per guadagnare 20 minuti tra Roma e Milano.  Conclusione: non ne vale
la pena.  Anche perche', se arrivi 20 minuti prima, non ci sono taxi.
		-- Panfilo Maria Lippi, "TABLOID TABLOID"@"Mai Dire Gol"