Suivez et participez au développement du nouvel OpenCellar : PLOC.co
Home Page
 
Français  English  
Open Cellar Home Edition - 1.2 - Windows 98, Me, 2000, XP and Vista. The free Windows wine cellar management software. Open Cellar Mobile Edition - Beta 2 (French version) - Pocket PC. The free Pocket PC wine cellar management software. Open Cellar Cross Platform - Beta 1 (French version) - Mac OSX and Linux. The free MacOS/Linux wine cellar management software. My Open Cellar Open Cellar Forums Place des vins
Search: Welcome (connect - create an account )
Page settings

Nuage de tags
Afficher les vins non placés et avec fiche achats-consos
Le script suivant vous permet d'afficher dans la fenêtre liste l'ensemble des vins ayant un stock à 0 et possedant au moins une fiche achats-consos
Pour l'éxécuter allez dans le menu "Préférences" -> "Editeurs de scripts"

if(App.ActiveCellar == null)
{
   MessageBox.Show("Aucune cave ouverte"); 
   return;
}


App.SetCursor(true);

IWineListWindow listWindow = (IWineListWindow)App.GetWindow(WindowType.WineList);
if(listWindow != null)
{
        BindingList list = new BindingList();
        ObjectCollection oc = App.ActiveCellar.GetCollection((ushort)ObjectType.Wine);
        for (int i = 0; i < oc.Count; i++)
	{
                Wine w = (Wine)oc[i];
		
                if(!w.ManualManagement)
                {
                        continue;
                }

                if((w.ManualManagement)
                    && (w.Bottles <= w.RackItems.Count))
                {
                        continue;
                }

		for (int j = 0; j < w.Purchases.Count; j++)
	        {
		PurchaseSales ps = (PurchaseSales)w.Purchases[j];
	        if((ps.PurchaseBottles > 0)
		   && (ps.Date.Year >= YEAR))
		{
		  list.Add(w);	 
		  break;
		}
  		}
	
        list.Add(w);
	}
listWindow.Wines = list;
listWindow.Show();
}

App.SetCursor(false);
© 2006-2014 Matthieu DUCROCQ  Open Cellar official blog - All rights reserved - Last update: january 2014 | twitter