Suivez et participez au développement du nouvel OpenCellar : PLOC.co
Page d'accueil
 
Français  English  
Open Cellar Home Edition - 1.2 - Le logiciel gratuit pour gérér efficacement votre cave à vins sous Windows. Open Cellar Mobile Edition - Beta 2 - La gestion de cave à vins a enfin sa solution Mobile sur Pocket PC. Open Cellar Cross Platform - Beta 1 - La gestion gratuite de vins disponible sous Mac OSX et Linux. Mon Open Cellar Les forums d'Open Cellar Place des vins
Rechercher : Bienvenue (se connecter - créer un compte)
Facebook


Nuage de tags
affichage cave mode texte - estimation
14/02/2007
Répondre
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
Répondre
Re : affichage cave mode texte - estimation
AdministrateurVoir son blog
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
Répondre
Re : affichage cave mode texte - estimation
yvb
36 posts
il me mets 0€ sur votre base de test ...oups....
 

14/02/2007
Répondre
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
Répondre
Re : affichage cave mode texte - estimation
AdministrateurVoir son blog
3099 posts
oops m'a gourré :-p

// 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
Répondre
Re : affichage cave mode texte - estimation
bitos
38 posts
Merci Matthieu cela marche cette fois parfaitement
 

15/02/2007
Répondre
Re : affichage cave mode texte - estimation
bitos
38 posts
Merci Matthieu cela marche cette fois parfaitement
 

16/02/2007
Répondre
Re : affichage cave mode texte - estimation
yvb
36 posts
merci encore !!!
 

© 2006-2014 Matthieu DUCROCQ Blog officiel d'Open Cellar - Tous droits réservés - Dernière mise à jour : janvier 2014 | twitter | facebook