//---------------------------------------------------------------------------
#ifndef TpvBlcDVntH
#define TpvBlcDVntH
//---------------------------------------------------------------------------
#include <Classes.hpp>
#include <Controls.hpp>
#include <StdCtrls.hpp>
#include <Forms.hpp>
#include <Buttons.hpp>
#include <ComCtrls.hpp>
#include <DBCtrls.hpp>
#include <DBGrids.hpp>
#include <ExtCtrls.hpp>
#include <Grids.hpp>
#include <Mask.hpp>
#include <Db.hpp>
#include <DBTables.hpp>
#include <Chart.hpp>
#include <TeEngine.hpp>
#include <TeeProcs.hpp>
#include <Series.hpp>
#include "ElastFrm.hpp"
//---------------------------------------------------------------------------
class TTpvBlDVnt : public TForm
{
__published:	// IDE-managed Components
    TStatusBar *StatusBar1;
    TGroupBox *GroupBox1;
    TLabel *Label1;
    TLabel *Label2;
    TLabel *Label3;
    TLabel *Label4;
    TLabel *Label5;
    TLabel *Label6;
    TLabel *Label7;
    TLabel *Label8;
    TLabel *Label9;
    TLabel *Label10;
    TLabel *Label11;
    TDBEdit *DBEdit1;
    TDBEdit *DBEdit2;
    TDBEdit *DBEdit3;
    TDBEdit *DBEdit4;
    TDBEdit *DBEdit5;
    TDBEdit *DBEdit6;
    TDBEdit *DBEdit7;
    TDBEdit *DBEdit8;
    TDBEdit *DBEdit9;
    TDBEdit *DBEdit10;
    TDBEdit *DBEdit11;
    TDBEdit *DBEdit12;
    TLabel *Label12;
    TDBEdit *DBEdit13;
    TDBEdit *DBEdit14;
    TDBEdit *DBEdit15;
    TDBEdit *DBEdit16;
    TDBEdit *DBEdit17;
    TDBEdit *DBEdit18;
    TDBEdit *DBEdit19;
    TDBEdit *DBEdit20;
    TDBEdit *DBEdit21;
    TDBEdit *DBEdit22;
    TDBEdit *DBEdit23;
    TDBEdit *DBEdit24;
    TDBEdit *DBEdit25;
    TLabel *Label13;
    TDBEdit *DBEdit26;
    TBevel *Bevel1;
    TLabel *Label14;
    TLabel *Label15;
    TLabel *Label16;
    TLabel *Label17;
    TLabel *Label18;
    TLabel *Label19;
    TLabel *Label20;
    TLabel *Label21;
    TLabel *Label22;
    TBevel *Bevel2;
    TDBMemo *DBMemo1;
    TPanel *Panel2;
    TSpeedButton *SpeedButton1;
    TSpeedButton *SpeedButton2;
    TSpeedButton *BusqSig;
    TSpeedButton *SpeedButton4;
    TSpeedButton *BusqAnt;
    TSpeedButton *SpeedButton6;
    TDateTimePicker *FechaCaja;
    TDataSource *DsVentasI;
    TTable *TbVentasI;
    TLabel *Label29;
    TDBText *DBText1;
    TDBText *DBText2;
    TDBText *DBText3;
    TDBText *DBText4;
    TDBText *DBText5;
    TDBText *DBText6;
    TDBText *DBText7;
    TSmallintField *TbVentasICantidadx1;
    TIntegerField *TbVentasITotalx1;
    TSmallintField *TbVentasICantidadx5;
    TIntegerField *TbVentasITotalx5;
    TSmallintField *TbVentasICantidadx10;
    TIntegerField *TbVentasITotalx10;
    TSmallintField *TbVentasICantidadx25;
    TIntegerField *TbVentasITotalx25;
    TSmallintField *TbVentasICantidadx50;
    TIntegerField *TbVentasITotalx50;
    TSmallintField *TbVentasICantidadx100;
    TIntegerField *TbVentasITotalx100;
    TSmallintField *TbVentasICantidadx200;
    TIntegerField *TbVentasITotalx200;
    TSmallintField *TbVentasICantidadx500;
    TIntegerField *TbVentasITotalx500;
    TSmallintField *TbVentasICantidadx1000;
    TIntegerField *TbVentasITotalx1000;
    TSmallintField *TbVentasICantidadx2000;
    TIntegerField *TbVentasITotalx2000;
    TSmallintField *TbVentasICantidadx5000;
    TIntegerField *TbVentasITotalx5000;
    TSmallintField *TbVentasICantidadx10000;
    TIntegerField *TbVentasITotalx10000;
    TSmallintField *TbVentasICantidadxvarios;
    TIntegerField *TbVentasITotalxvarios;
    TDateField *TbVentasIFechaCaja;
    TTimeField *TbVentasIInicio;
    TTimeField *TbVentasIFin;
    TSmallintField *TbVentasIIntentosSalir;
    TSmallintField *TbVentasIExitoSalir;
    TSmallintField *TbVentasITickets;
    TSmallintField *TbVentasICancelados;
    TSmallintField *TbVentasICambios;
    TMemoField *TbVentasINotas;
    TChart *Chart1;
    TScrollBox *ScrollBox1;
    TLabel *Label23;
    TLabel *Label24;
    TLabel *Label25;
    TBevel *Bevel3;
    TMemo *MDatos;
    TSpeedButton *Clientes;
    TSpeedButton *Productos;
    TAreaSeries *Series2;
    TDataSource *DsVentasC;
    TTable *TbVentasC;
    TTable *TbFacturasC;
    TDataSource *DsFacturasC;
    TSpeedButton *Empleados;
    TLabel *LVentasT;
    TLabel *LGastos;
    TLabel *LBeneficio;
    TLabel *Label26;
    TLabel *Label27;
        TSpeedButton *SpeedButton7;
        TLabel *Label28;
        TLabel *EnCaja;
        TBevel *Bevel4;
        TLabel *Label30;
        TLabel *Label31;
        TLabel *LVentasE;
        TLabel *LGastosE;
        TLabel *LBeneficioE;
        TLabel *Label35;
        TElasticForm *ElasticForm1;
    void __fastcall SpeedButton1Click(TObject *Sender);
    
    void __fastcall TbVentasICantidadx1SetText(TField *Sender,
          const AnsiString Text);
    void __fastcall TbVentasICantidadx5SetText(TField *Sender,
          const AnsiString Text);
    void __fastcall TbVentasICantidadx10SetText(TField *Sender,
          const AnsiString Text);
    void __fastcall TbVentasICantidadx25SetText(TField *Sender,
          const AnsiString Text);
    void __fastcall TbVentasICantidadx50SetText(TField *Sender,
          const AnsiString Text);
    void __fastcall TbVentasICantidadx100SetText(TField *Sender,
          const AnsiString Text);
    void __fastcall TbVentasICantidadx200SetText(TField *Sender,
          const AnsiString Text);
    void __fastcall TbVentasICantidadx500SetText(TField *Sender,
          const AnsiString Text);
    void __fastcall TbVentasICantidadx1000SetText(TField *Sender,
          const AnsiString Text);
    void __fastcall TbVentasICantidadx2000SetText(TField *Sender,
          const AnsiString Text);
    void __fastcall TbVentasICantidadx5000SetText(TField *Sender,
          const AnsiString Text);
    void __fastcall TbVentasICantidadx10000SetText(TField *Sender,
          const AnsiString Text);
    void __fastcall TbVentasITotalx1SetText(TField *Sender,
          const AnsiString Text);
    void __fastcall TbVentasITotalx5SetText(TField *Sender,
          const AnsiString Text);
    void __fastcall TbVentasITotalx10SetText(TField *Sender,
          const AnsiString Text);
    void __fastcall TbVentasITotalx25SetText(TField *Sender,
          const AnsiString Text);
    void __fastcall TbVentasITotalx50SetText(TField *Sender,
          const AnsiString Text);
    void __fastcall TbVentasITotalx100SetText(TField *Sender,
          const AnsiString Text);
    void __fastcall TbVentasITotalx200SetText(TField *Sender,
          const AnsiString Text);
    void __fastcall TbVentasITotalx500SetText(TField *Sender,
          const AnsiString Text);
    void __fastcall TbVentasITotalx1000SetText(TField *Sender,
          const AnsiString Text);
    void __fastcall TbVentasITotalx2000SetText(TField *Sender,
          const AnsiString Text);
    void __fastcall TbVentasITotalx5000SetText(TField *Sender,
          const AnsiString Text);
    void __fastcall TbVentasITotalx10000SetText(TField *Sender,
          const AnsiString Text);
    void __fastcall DBEdit1KeyPress(TObject *Sender, char &Key);
    void __fastcall DBEdit2KeyPress(TObject *Sender, char &Key);
    void __fastcall DBEdit3KeyPress(TObject *Sender, char &Key);
    void __fastcall DBEdit4KeyPress(TObject *Sender, char &Key);
    void __fastcall DBEdit5KeyPress(TObject *Sender, char &Key);
    void __fastcall DBEdit6KeyPress(TObject *Sender, char &Key);
    void __fastcall DBEdit7KeyPress(TObject *Sender, char &Key);
    void __fastcall DBEdit8KeyPress(TObject *Sender, char &Key);
    void __fastcall DBEdit9KeyPress(TObject *Sender, char &Key);
    void __fastcall DBEdit10KeyPress(TObject *Sender, char &Key);
    void __fastcall DBEdit11KeyPress(TObject *Sender, char &Key);
    void __fastcall DBEdit12KeyPress(TObject *Sender, char &Key);
    void __fastcall DBEdit25KeyPress(TObject *Sender, char &Key);
    void __fastcall DBEdit13KeyPress(TObject *Sender, char &Key);
    void __fastcall DBEdit14KeyPress(TObject *Sender, char &Key);
    void __fastcall DBEdit15KeyPress(TObject *Sender, char &Key);
    void __fastcall DBEdit16KeyPress(TObject *Sender, char &Key);
    void __fastcall DBEdit17KeyPress(TObject *Sender, char &Key);
    void __fastcall DBEdit18KeyPress(TObject *Sender, char &Key);
    void __fastcall DBEdit19KeyPress(TObject *Sender, char &Key);
    void __fastcall DBEdit20KeyPress(TObject *Sender, char &Key);
    void __fastcall DBEdit21KeyPress(TObject *Sender, char &Key);
    void __fastcall DBEdit22KeyPress(TObject *Sender, char &Key);
    void __fastcall DBEdit23KeyPress(TObject *Sender, char &Key);
    void __fastcall DBEdit24KeyPress(TObject *Sender, char &Key);
    void __fastcall DBEdit26KeyPress(TObject *Sender, char &Key);
    void __fastcall FechaCajaChange(TObject *Sender);
    TDateTime __fastcall BuscaFecha( TDateTime FechaInicio );

    
    void __fastcall ClientesClick(TObject *Sender);
    void __fastcall EmpleadosClick(TObject *Sender);
    void __fastcall ProductosClick(TObject *Sender);
    void __fastcall FormClose(TObject *Sender, TCloseAction &Action);
    
    void __fastcall DsVentasIDataChange(TObject *Sender, TField *Field);
        void __fastcall SpeedButton7Click(TObject *Sender);
    
    
    
    
private:	// User declarations
public:		// User declarations
    __fastcall TTpvBlDVnt(TComponent* Owner);
    void __fastcall DineroEnCajaAyer(void);
    void __fastcall CalculaVentaGasto(void);

    Currency VentasHora[26], VentasE;
    Currency Gastos, EnCajaAyer;
};
//---------------------------------------------------------------------------
extern PACKAGE TTpvBlDVnt *TpvBlDVnt;
//---------------------------------------------------------------------------
#endif