Nombre de bouteilles sur Livre de cave compacté

28/11/2007 Répondre	Nombre de bouteilles sur Livre de cave compacté
chloe5972 2 posts	Est il possible d'avoir le nbre de bouteilles correspondant à un vin sur le livre de cave compacté??? Un bug : La recherche "Centre d'aide et de support" ne fonctionne pas !!! Sinon merci et encore bravo !!! J'adoooooooooore !!! Chloe5972

29/11/2007
Répondre

Re : Nombre de bouteilles sur Livre de cave compacté

Administrateur Voir son blog

3099 posts

Bonjour,

Copiez/collez le script suivant dans l'éditeur (menu Préférences -> Editeur de scripts)

App.Animate(AnimationType.Work, true);
App.SetCursor(true);

//
// Modifiez ici le titre du report
//
string reportName = "Liste des vins";

//
// Creation entete report
//
ReportTable rt = new ReportTable(reportName);

//
// Région
//
ReportColumn rcArea = rt.NewColumn("Région");
rcArea.Size = 100;

//
// Appellation
//
ReportColumn rcApp = rt.NewColumn("Appellation");
rcApp.Size = 140;

//
// Classement
//
ReportColumn rcCl = rt.NewColumn("Classement");
rcCl.Size = 100;

//
// Nom
//
ReportColumn rcName = rt.NewColumn("Nom");
rcName.Size = 215;

//
// Couleur
//
ReportColumn rcColor = rt.NewColumn("Couleur");
rcColor.Size = 75;

//
// Année
//
ReportColumn rcYear = rt.NewColumn("Année");
rcYear.Size = 40;
rcYear.ContentAlignment = ReportContentAlignment.Right;
rcYear.DataType = ReportColumnType.Numeric;

//
// Nombre bouteilles
//
ReportColumn rcBottles = rt.NewColumn("Btles");
rcBottles.Size = 40;
rcBottles.ContentAlignment = ReportContentAlignment.Right;
rcBottles.DataType = ReportColumnType.Numeric;

//
// Format
//
ReportColumn rcFormat = rt.NewColumn("Format");
rcFormat.Size = 70;

//
// Alimentation de la source
//
ObjectCollection wines = App.ActiveCellar.GetCollection((ushort)ObjectType.Wine);

for (int i = 0; i < wines.Count; i++)
{
  Wine wine = (Wine)wines[i];
  ReportRow row = rt.NewRow();
  
  row[0] = wine.Area.Name;
  row[1] = wine.Appellation.Name;
  row[2] = wine.Classification.Name;
  row[3] = wine.Name;
  row[4] = "Champagne";
  
  if(wine.WineColor == ColorType.Red)
  {
    row[4] = "Rouge";     
  }
  else if(wine.WineColor == ColorType.White)
  {
    row[4] = "Blanc";     
  }
  else if(wine.WineColor == ColorType.Rosy)
  {
    row[4] = "Rosé";     
  }
  else if(wine.WineColor == ColorType.Yellow)
  {
    row[4] = "Champagne";     
  }
  else if(wine.WineColor == ColorType.LiqueurLike)
  {
    row[4] = "Liquoreux";     
  }
  else if(wine.WineColor == ColorType.Misc)
  {
    row[4] = "Autre";     
  }

if(wine.Year != 0)
  {
     row[5] = wine.Year.ToString();
  }

// 
  // Gestion manuelle
  //
  if(wine.ManualManagement)
  {
    row[6] = wine.Bottles.ToString();
  }
  else
  {
    row[6] = wine.RackItems.Count.ToString();
  }
  row[7] = wine.BottleType.Name;
}

//
// Tri des elements
//
rt.Sort("0-0;1-0;3-0;4-0;5-1");

//
// Génération
//
System.Collections.ArrayList list = new System.Collections.ArrayList();
list.Add(rt);

IReport report = App.ReportEngine.GetSystemReport(PredefinedReport.Grid);

string destFileName = App.Path + "Cache\\UserWinesGrid.pdf";
bool success = false;
try
{
   report.Create(list, destFileName);
   success = true;
}
catch(Exception ex)
{
  MessageBox.Show("Erreur (1)");
}

//
// Affichage du report
//
if(success)
{
   IShellWindow shellWindow = (IShellWindow)App.GetWindow(WindowType.Shell, null);
   if(shellWindow != null)
   {
      shellWindow.Start(destFileName);
   }
}

App.SetCursor(false);
App.StopAnimate();

Pour ce qui est de la recherche, le nouveau site d'OC est en cours de développement et integrera un moteur somme toute assez sympathique ;-)

Matthieu

29/11/2007 Répondre	Re : Nombre de bouteilles sur Livre de cave compacté
chloe5972 2 posts	Whaaaaa merciiiiiiiiiiiii !!! Quelle rapidité !!! Je suis épatée !! Et pi je m'épate moi même !!! J'arrive à modifier le code pour obtenir les champs et l'ordre que je veux ))) Encore Merci !!