object Form2: TForm2
  Left = 0
  Top = 0
  Caption = 'AGRIGEST ----  REPLICADOR'
  ClientHeight = 347
  ClientWidth = 486
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'Tahoma'
  Font.Style = []
  OldCreateOrder = False
  Position = poDesktopCenter
  WindowState = wsMinimized
  OnShow = FormShow
  PixelsPerInch = 96
  TextHeight = 13
  object PCONEXION: TPanel
    Left = 0
    Top = 0
    Width = 486
    Height = 347
    Align = alClient
    Caption = 'SIN CONEXION'
    Color = clRed
    ParentBackground = False
    TabOrder = 0
    Visible = False
    object Panel1: TPanel
      Left = 464
      Top = 0
      Width = 24
      Height = 23
      AutoSize = True
      BevelOuter = bvNone
      TabOrder = 0
      object SpeedButton1: TSpeedButton
        Left = 0
        Top = 0
        Width = 24
        Height = 23
        Flat = True
        OnClick = SpeedButton1Click
      end
    end
  end
  object tsincronizar: TTimer
    Interval = 10000
    OnTimer = tsincronizarTimer
    Left = 200
    Top = 56
  end
  object DBagrigest: TZConnection
    ControlsCodePage = cCP_UTF16
    ClientCodepage = 'utf8'
    Catalog = ''
    Properties.Strings = (
      'codepage=utf8')
    Connected = True
    HostName = 'localhost'
    Port = 3306
    Database = 'agrigest'
    User = 'asesoft'
    Password = 'Pantera1'
    Protocol = 'mysqld-5'
    LibraryLocation = 'C:\MESAS\libmysql.dll'
    Left = 24
    Top = 258
  end
  object dbservidor: TZConnection
    ControlsCodePage = cCP_UTF16
    ClientCodepage = 'utf8'
    Catalog = ''
    Properties.Strings = (
      'codepage=utf8')
    HostName = '192.168.1.10'
    Port = 3306
    Database = 'agrigest'
    User = 'asesoft'
    Password = 'Pantera1'
    Protocol = 'mysqld-5'
    LibraryLocation = 'C:\MESAS\libmysql.dll'
    Left = 88
    Top = 258
  end
  object sv_movimientos_mesa: TZTable
    Connection = dbservidor
    TableName = 'movimiento_mesas'
    Left = 40
    Top = 72
    object sv_movimientos_mesaid: TLargeintField
      FieldName = 'id'
      Required = True
    end
    object sv_movimientos_mesafecha: TDateField
      FieldName = 'fecha'
      Required = True
    end
    object sv_movimientos_mesamesa: TWideStringField
      FieldName = 'mesa'
      Required = True
      Size = 30
    end
    object sv_movimientos_mesaidt: TIntegerField
      FieldName = 'idt'
      Required = True
    end
    object sv_movimientos_mesaTRABAJADOR: TWideStringField
      FieldName = 'TRABAJADOR'
      Required = True
      Size = 100
    end
    object sv_movimientos_mesaENTRADA_REAL: TTimeField
      FieldName = 'ENTRADA_REAL'
    end
    object sv_movimientos_mesaSALIDA_REAL: TTimeField
      FieldName = 'SALIDA_REAL'
    end
    object sv_movimientos_mesaENTRADA_AJUSTADA: TTimeField
      FieldName = 'ENTRADA_AJUSTADA'
    end
    object sv_movimientos_mesaSALIDA_AJUSTADA: TTimeField
      FieldName = 'SALIDA_AJUSTADA'
    end
    object sv_movimientos_mesaHORASREALES: TTimeField
      FieldName = 'HORASREALES'
    end
    object sv_movimientos_mesaHORASAJUSTADAS: TTimeField
      FieldName = 'HORASAJUSTADAS'
    end
    object sv_movimientos_mesaPUESTO: TWideStringField
      FieldName = 'PUESTO'
      Required = True
      Size = 40
    end
    object sv_movimientos_mesaTIPOTRABAJO: TWideStringField
      FieldName = 'TIPOTRABAJO'
      Required = True
      Size = 30
    end
    object sv_movimientos_mesaARTICULO: TWideStringField
      FieldName = 'ARTICULO'
      Required = True
      Size = 30
    end
    object sv_movimientos_mesaPARCELA: TWideStringField
      FieldName = 'PARCELA'
      Required = True
      Size = 40
    end
    object sv_movimientos_mesanum_limpiadora: TIntegerField
      FieldName = 'num_limpiadora'
    end
  end
  object sv_trabajo_diario: TZTable
    Connection = dbservidor
    TableName = 'trabajo_diario'
    Left = 40
    Top = 24
    object sv_trabajo_diarioid: TIntegerField
      FieldName = 'id'
      Required = True
    end
    object sv_trabajo_diariofecha: TDateField
      FieldName = 'fecha'
    end
    object sv_trabajo_diarioparcela: TWideStringField
      FieldName = 'parcela'
      Size = 30
    end
    object sv_trabajo_diarioidt: TIntegerField
      FieldName = 'idt'
    end
    object sv_trabajo_diariotrabajador: TWideStringField
      FieldName = 'trabajador'
      Size = 100
    end
    object sv_trabajo_diariotypework: TWideStringField
      FieldName = 'typework'
      Size = 40
    end
    object sv_trabajo_diarioarticulo: TWideStringField
      FieldName = 'articulo'
      Size = 100
    end
    object sv_trabajo_diarioqhoras: TFloatField
      FieldName = 'qhoras'
    end
    object sv_trabajo_diarioprecio: TFloatField
      FieldName = 'precio'
      Required = True
    end
    object sv_trabajo_diariototal: TFloatField
      FieldName = 'total'
      Required = True
    end
    object sv_trabajo_diarioestado: TWideStringField
      FieldName = 'estado'
      Required = True
      Size = 2
    end
    object sv_trabajo_diarioorigen: TWideStringField
      FieldName = 'origen'
      Size = 100
    end
  end
  object sv_rendimiento: TZTable
    Connection = dbservidor
    TableName = 'rendimiento'
    Left = 40
    Top = 120
    object sv_rendimientoid: TIntegerField
      FieldName = 'id'
      Required = True
    end
    object sv_rendimientofecha: TDateField
      FieldName = 'fecha'
      Required = True
    end
    object sv_rendimientohora: TTimeField
      FieldName = 'hora'
      Required = True
    end
    object sv_rendimientoidt: TIntegerField
      FieldName = 'idt'
      Required = True
    end
    object sv_rendimientotrabajador: TWideStringField
      FieldName = 'trabajador'
      Required = True
      Size = 100
    end
    object sv_rendimientomateria_prima: TWideStringField
      FieldName = 'materia_prima'
      Required = True
      Size = 40
    end
    object sv_rendimientopeso_bruto: TFloatField
      FieldName = 'peso_bruto'
      Required = True
    end
    object sv_rendimientotara: TFloatField
      FieldName = 'tara'
    end
    object sv_rendimientopesoneto: TFloatField
      FieldName = 'pesoneto'
    end
    object sv_rendimientonum_limpiadora: TIntegerField
      FieldName = 'num_limpiadora'
    end
  end
  object sv_produccion: TZTable
    Connection = dbservidor
    TableName = 'produccion'
    Left = 40
    Top = 164
    object sv_produccionid: TLargeintField
      FieldName = 'id'
      Required = True
    end
    object sv_produccionfecha: TDateField
      FieldName = 'fecha'
      Required = True
    end
    object sv_produccionhora: TTimeField
      FieldName = 'hora'
      Required = True
    end
    object sv_produccionmesa: TWideStringField
      FieldName = 'mesa'
      Required = True
      Size = 40
    end
    object sv_produccionbascula: TWideStringField
      FieldName = 'bascula'
      Required = True
      Size = 40
    end
    object sv_produccionidt: TIntegerField
      FieldName = 'idt'
      Required = True
    end
    object sv_produccionembasadora: TWideStringField
      FieldName = 'embasadora'
      Required = True
      Size = 70
    end
    object sv_produccionmateria_prima: TWideStringField
      FieldName = 'materia_prima'
      Required = True
      Size = 40
    end
    object sv_produccionproducto: TWideStringField
      FieldName = 'producto'
      Required = True
      Size = 40
    end
    object sv_producciontara: TFloatField
      FieldName = 'tara'
      Required = True
    end
    object sv_produccionpeso_teorico: TFloatField
      FieldName = 'peso_teorico'
      Required = True
    end
    object sv_produccionpeso_real: TFloatField
      FieldName = 'peso_real'
      Required = True
    end
  end
  object qaux3: TZReadOnlyQuery
    Connection = DBagrigest
    SQL.Strings = (
      'select * from rendimiento_local where estado=1'
      '')
    Params = <>
    Left = 277
    Top = 197
  end
  object qaux4: TZReadOnlyQuery
    Connection = DBagrigest
    SQL.Strings = (
      ''
      '')
    Params = <>
    Left = 325
    Top = 205
  end
  object qserv: TZReadOnlyQuery
    Connection = dbservidor
    SQL.Strings = (
      ''
      '')
    Params = <>
    Left = 253
    Top = 258
  end
  object qserv2: TZReadOnlyQuery
    Connection = dbservidor
    SQL.Strings = (
      'select * from produccion')
    Params = <>
    Left = 333
    Top = 266
  end
  object qaux: TZReadOnlyQuery
    Connection = DBagrigest
    Params = <>
    Left = 168
    Top = 197
  end
  object qaux2: TZReadOnlyQuery
    Connection = DBagrigest
    SQL.Strings = (
      ''
      '')
    Params = <>
    Left = 224
    Top = 197
  end
  object qaux5: TZReadOnlyQuery
    Connection = DBagrigest
    SQL.Strings = (
      'select * from movimiento_mesas_local')
    Params = <>
    Left = 360
    Top = 205
    object qaux5id: TLargeintField
      FieldName = 'id'
      Required = True
    end
    object qaux5fecha: TDateField
      FieldName = 'fecha'
      Required = True
    end
    object qaux5mesa: TWideStringField
      FieldName = 'mesa'
      Required = True
      Size = 30
    end
    object qaux5idt: TIntegerField
      FieldName = 'idt'
      Required = True
    end
    object qaux5TRABAJADOR: TWideStringField
      FieldName = 'TRABAJADOR'
      Required = True
      Size = 100
    end
    object qaux5ENTRADA_REAL: TTimeField
      FieldName = 'ENTRADA_REAL'
    end
    object qaux5SALIDA_REAL: TTimeField
      FieldName = 'SALIDA_REAL'
    end
    object qaux5ENTRADA_AJUSTADA: TTimeField
      FieldName = 'ENTRADA_AJUSTADA'
    end
    object qaux5SALIDA_AJUSTADA: TTimeField
      FieldName = 'SALIDA_AJUSTADA'
    end
    object qaux5HORASREALES: TTimeField
      FieldName = 'HORASREALES'
    end
    object qaux5HORASAJUSTADAS: TTimeField
      FieldName = 'HORASAJUSTADAS'
    end
    object qaux5PUESTO: TWideStringField
      FieldName = 'PUESTO'
      Required = True
      Size = 40
    end
    object qaux5TIPOTRABAJO: TWideStringField
      FieldName = 'TIPOTRABAJO'
      Required = True
      Size = 30
    end
    object qaux5ARTICULO: TWideStringField
      FieldName = 'ARTICULO'
      Required = True
      Size = 30
    end
    object qaux5PARCELA: TWideStringField
      FieldName = 'PARCELA'
      Required = True
      Size = 40
    end
    object qaux5estado: TIntegerField
      FieldName = 'estado'
      Required = True
    end
    object qaux5num_limpiadora: TIntegerField
      FieldName = 'num_limpiadora'
    end
  end
  object qserv3: TZSQLProcessor
    Params = <>
    Connection = dbservidor
    Delimiter = ';'
    Left = 368
    Top = 264
  end
  object qpesadas: TZReadOnlyQuery
    Connection = DBagrigest
    SQL.Strings = (
      
        'select count(id) as pesadas from produccion_local where fecha=cu' +
        'rrent_date()')
    Params = <>
    Left = 424
    Top = 120
    object qpesadaspesadas: TLargeintField
      FieldName = 'pesadas'
      ReadOnly = True
    end
  end
  object sv_desbloqueos: TZTable
    Connection = dbservidor
    TableName = 'desbloqueos'
    Left = 40
    Top = 208
    object sv_desbloqueosid: TIntegerField
      FieldName = 'id'
      Required = True
    end
    object sv_desbloqueosfecha: TDateField
      FieldName = 'fecha'
      Required = True
    end
    object sv_desbloqueoshora: TTimeField
      FieldName = 'hora'
      Required = True
    end
    object sv_desbloqueosenvasadora: TWideStringField
      FieldName = 'envasadora'
      Size = 100
    end
    object sv_desbloqueosmesa: TWideStringField
      FieldName = 'mesa'
      Required = True
      Size = 40
    end
    object sv_desbloqueosbascula: TWideStringField
      FieldName = 'bascula'
      Required = True
      Size = 40
    end
  end
  object qmovimientos_mesa: TZReadOnlyQuery
    Connection = DBagrigest
    SQL.Strings = (
      'select * from movimiento_mesas_local where estado=:PESTADO')
    Params = <
      item
        DataType = ftUnknown
        Name = 'PESTADO'
        ParamType = ptUnknown
      end>
    Left = 344
    Top = 29
    ParamData = <
      item
        DataType = ftUnknown
        Name = 'PESTADO'
        ParamType = ptUnknown
      end>
    object qmovimientos_mesaid: TLargeintField
      FieldName = 'id'
      Required = True
    end
    object qmovimientos_mesafecha: TDateField
      FieldName = 'fecha'
      Required = True
    end
    object qmovimientos_mesamesa: TWideStringField
      FieldName = 'mesa'
      Required = True
      Size = 30
    end
    object qmovimientos_mesaidt: TIntegerField
      FieldName = 'idt'
      Required = True
    end
    object qmovimientos_mesaTRABAJADOR: TWideStringField
      FieldName = 'TRABAJADOR'
      Required = True
      Size = 100
    end
    object qmovimientos_mesaENTRADA_REAL: TTimeField
      FieldName = 'ENTRADA_REAL'
    end
    object qmovimientos_mesaSALIDA_REAL: TTimeField
      FieldName = 'SALIDA_REAL'
    end
    object qmovimientos_mesaENTRADA_AJUSTADA: TTimeField
      FieldName = 'ENTRADA_AJUSTADA'
    end
    object qmovimientos_mesaSALIDA_AJUSTADA: TTimeField
      FieldName = 'SALIDA_AJUSTADA'
    end
    object qmovimientos_mesaHORASREALES: TTimeField
      FieldName = 'HORASREALES'
    end
    object qmovimientos_mesaHORASAJUSTADAS: TTimeField
      FieldName = 'HORASAJUSTADAS'
    end
    object qmovimientos_mesaPUESTO: TWideStringField
      FieldName = 'PUESTO'
      Required = True
      Size = 40
    end
    object qmovimientos_mesaTIPOTRABAJO: TWideStringField
      FieldName = 'TIPOTRABAJO'
      Required = True
      Size = 30
    end
    object qmovimientos_mesaARTICULO: TWideStringField
      FieldName = 'ARTICULO'
      Required = True
      Size = 30
    end
    object qmovimientos_mesaPARCELA: TWideStringField
      FieldName = 'PARCELA'
      Required = True
      Size = 40
    end
    object qmovimientos_mesaestado: TIntegerField
      FieldName = 'estado'
      Required = True
    end
    object qmovimientos_mesanum_limpiadora: TIntegerField
      FieldName = 'num_limpiadora'
    end
  end
end
