Livre de cave compacté en élimant le svins à stock nul

27/01/2008 Répondre	Livre de cave compacté en élimant le svins à stock nul
Jean-Pierre VARNIER 189 posts	Bonsoir, Il me semble avoir vu un script permettant d'éditer le livre de cave compacté sans les vins à stock zéro, avec le format des bouteilles et le nombre de bouteilles. Pouvez-vous l'éditer de nouveau? Merci. Jean-Pierre

28/01/2008
Répondre

Re : Livre de cave compacté en élimant le svins à stock nul

Administrateur Voir son blog

3099 posts

Bonjour,

Voici le script (pas de mérite j'ai accés au moteur de recherche ;-)))

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

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

//
// 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];

if((!wine.ManualManagement)
      && (wine.RackItems.Count == 0))
  {
        continue;
  }

if((wine.ManualManagement)
     && (wine.Bottles == 0))
  {
     continue;
  }

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();

Matthieu

05/02/2008 Répondre	Re : Livre de cave compacté en élimant le svins à stock nul
Jean-Pierre VARNIER 189 posts	Merci pour la réponse. Jean-Pierre

26/02/2008
Répondre

Re : Livre de cave compacté en élimant le svins à stock nul

MoustH
4 posts

Bonjour,

J'ai ajouté au livre de cave ci-dessus les colonnes : Valeur (estimée), Apogée de et Apogée à.

Si çà peut intéresser quelqu'un ...

================================

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

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

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

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

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

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

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

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

//
// 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;

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

//
// Estimation
//
ReportColumn rcEstimate = rt.NewColumn("Valeur");
rcEstimate.Size = 45;
rcEstimate.ContentAlignment = ReportContentAlignment.Right;
rcEstimate.DataType = ReportColumnType.Numeric;

//
// ApogéeMin
//
ReportColumn rcApogéeMin = rt.NewColumn("Apogée-");
rcApogéeMin.Size = 50;
rcApogéeMin.ContentAlignment = ReportContentAlignment.Right;
rcApogéeMin.DataType = ReportColumnType.Numeric;

//
// ApogéeMax
//
ReportColumn rcApogéeMax = rt.NewColumn("Apogée+");
rcApogéeMax.Size = 50;
rcApogéeMax.ContentAlignment = ReportContentAlignment.Right;
rcApogéeMax.DataType = ReportColumnType.Numeric;

//
// 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];

if((!wine.ManualManagement)
&& (wine.RackItems.Count == 0))
{
continue;
}

if((wine.ManualManagement)
&& (wine.Bottles == 0))
{
continue;
}

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;
row[8] = wine.EvaluatePrice.ToString();
row[9] = wine.BestMin.ToString();
row[10] = wine.BestMax.ToString();
}

//
// 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();

==========================