Suivez et participez au développement du nouvel OpenCellar : PLOC.co
> Open Cellar for Windows
> Help Center
> FAQ
> Download Center
> Enter the Forum
> Version history
> Developers resources
> Open Cellar for Mobile
> Help Center
> FAQ
> Download Center
> Enter the Forum
> Version history
> Open Cellar for Mac/Linux
> Help Center
> FAQ
> Download Center
> Enter the Forum
> Version history
> Developers resources
> My Account
> My Live services
> My pages
> My library
> My published wines
> My labels
> My posted messages
> Write a page
> Open Cellar Forum Index
> Windows Forum
> Mac/Linux Forum
> Mobile Forum
> Search for and import wines
> Search for labels
> Compare prices (Sniffer)
Search:
> Search with all engines
> Search in forums
> Search in personal pages
> Search on open-cellar.com
> Search in wine cards
> Search in labels
> Search in price comparison tool (Sniffer)
Welcome (
connect
-
create an account
)
Home
»
The forum
»
Open Cellar Home Edition (Windows)
Nuage de tags
Open Cellar
Scripts
Etiquette
PPP
Cellar book
Mac
Vista
Synchronisation
Excel export
vinoXml
usb
sniffer
backup
import
printing
chardonnet
palm
statistics
Linux
affichage cave mode texte - estimation
14/02/2007
Reply
affichage cave mode texte - estimation
yvb
36 posts
il y a la valeur estimative de la cave...
il serait intéressant d'avoir la valeur d'achat aussi
cordialement
14/02/2007
Reply
Re : affichage cave mode texte - estimation
Administrateur
3099 posts
Ce petit script devrait vous convenir
// Début du script
//
// Verifie qu'une cave est bien ouverte
//
if(App.ActiveCellar == null)
{
MessageBox.Show("Aucune cave n'est ouverte");
}
else
{
//
// Recupere la liste des vins de la cave
//
ObjectCollection wines = App.ActiveCellar.GetCollection((ushort)ObjectType.Wine);
float bottles = 0;
float evaluatePrice = 0;
float buyPrice = 0;
for (int i = 0; i < wines.Count; i++)
{
Wine w = (Wine)wines[i];
if(w.ManualManagement)
{
bottles+= w.RackItems.Count;
evaluatePrice+= (w.EvaluatePrice * w.RackItems.Count);
}
else
{
bottles+= w.Bottles;
evaluatePrice+= (w.EvaluatePrice * w.Bottles);
}
// Fiche achats consos
for (int j = 0; j < w.Purchases.Count; j++)
{
PurchaseSales psales = (PurchaseSales)w.Purchases[j];
buyPrice += psales.Amount;
}
}
//
// Affichage
//
MessageBox.Show("Nombre de bouteilles en cave : " + bottles.ToString() + "\n" + "Valeur estimation : " + evaluatePrice.ToString("F") + " €" + "\n" + "Total achat : " + buyPrice.ToString("F") + " €");
}
// Fin du script
Matthieu
14/02/2007
Reply
Re : affichage cave mode texte - estimation
yvb
36 posts
il me mets 0€ sur votre base de test ...oups....
14/02/2007
Reply
Re : affichage cave mode texte - estimation
bitos
38 posts
Pour ma part, il affiche la valeur totale des achats, par contre le nombre de bouteilles est de 0 5au lieu d'une centaine et l'estimation est aussi égale à 0
14/02/2007
Reply
Re : affichage cave mode texte - estimation
Administrateur
3099 posts
oops m'a gourré
// Début du script
//
// Verifie qu'une cave est bien ouverte
//
if(App.ActiveCellar == null)
{
MessageBox.Show("Aucune cave n'est ouverte");
}
else
{
//
// Recupere la liste des vins de la cave
//
ObjectCollection wines = App.ActiveCellar.GetCollection((ushort)ObjectType.Wine);
float bottles = 0;
float evaluatePrice = 0;
float buyPrice = 0;
for (int i = 0; i < wines.Count; i++)
{
Wine w = (Wine)wines[i];
if(!w.ManualManagement)
{
bottles+= w.RackItems.Count;
evaluatePrice+= (w.EvaluatePrice * w.RackItems.Count);
}
else
{
bottles+= (int)w.Bottles;
evaluatePrice+= (w.EvaluatePrice * w.Bottles);
}
// Fiche achats consos
for (int j = 0; j < w.Purchases.Count; j++)
{
PurchaseSales psales = (PurchaseSales)w.Purchases[j];
buyPrice += psales.Amount;
}
}
//
// Affichage
//
MessageBox.Show("Nombre de bouteilles en cave : " + bottles.ToString() + "\n" + "Valeur estimation : " + evaluatePrice.ToString("F") + " €" + "\n" + "Total achat : " + buyPrice.ToString("F") + " €");
}
// Fin du script
Le total achat est la somme de fiches achats consos et non le prix d'achat * nombre de bouteilles.
Matthieu
15/02/2007
Reply
Re : affichage cave mode texte - estimation
bitos
38 posts
Merci Matthieu cela marche cette fois parfaitement
15/02/2007
Reply
Re : affichage cave mode texte - estimation
bitos
38 posts
Merci Matthieu cela marche cette fois parfaitement
16/02/2007
Reply
Re : affichage cave mode texte - estimation
yvb
36 posts
merci encore !!!
© 2006-2014
Matthieu DUCROCQ
- All rights reserved - Last update: january 2014 |
|
Support Open Cellar
|
Contact
|
About