Tecsitel_FactuGES2/Source/Modulos/Articulos/Data/uDataModuleArticulos.dfm

inherited DataModuleArticulos: TDataModuleArticulos
  OnCreate = DAClientDataModuleCreate
  Height = 414
  Width = 518
  object RORemoteService: TRORemoteService
    Message = dmConexion.ROMessage
    Channel = dmConexion.ROChannel
    ServiceName = 'srvArticulos'
    Left = 48
    Top = 24
  end
  object Bin2DataStreamer: TDABin2DataStreamer
    Left = 48
    Top = 84
  end
  object rda_Articulos: TDARemoteDataAdapter
    GetSchemaCall.RemoteService = RORemoteService
    GetDataCall.RemoteService = RORemoteService
    UpdateDataCall.RemoteService = RORemoteService
    GetScriptsCall.RemoteService = RORemoteService
    RemoteService = RORemoteService
    DataStreamer = Bin2DataStreamer
    Left = 51
    Top = 151
  end
  object tbl_Articulos: TDAMemDataTable
    RemoteUpdatesOptions = []
    Fields = <
      item
        Name = 'ID'
        DataType = datInteger
        InPrimaryKey = True
      end
      item
        Name = 'ID_EMPRESA'
        DataType = datInteger
      end
      item
        Name = 'REFERENCIA'
        DataType = datString
        Size = 255
      end
      item
        Name = 'DESCRIPCION'
        DataType = datString
        Size = 255
      end
      item
        Name = 'FAMILIA'
        DataType = datString
        Size = 255
      end
      item
        Name = 'IMAGEN'
        DataType = datBlob
      end
      item
        Name = 'COMISIONABLE'
        DataType = datInteger
      end
      item
        Name = 'FECHA_ALTA'
        DataType = datDateTime
      end
      item
        Name = 'FECHA_MODIFICACION'
        DataType = datDateTime
      end
      item
        Name = 'USUARIO'
        DataType = datString
        Size = 20
      end
      item
        Name = 'REFERENCIA_PROV'
        DataType = datString
        Size = 255
      end
      item
        Name = 'PRECIO_COSTE'
        DataType = datFloat
      end
      item
        Name = 'PRECIO_PORTE'
        DataType = datFloat
      end
      item
        Name = 'DESCUENTO'
        DataType = datFloat
      end
      item
        Name = 'PRECIO_NETO'
        DataType = datFloat
      end
      item
        Name = 'INVENTARIABLE'
        DataType = datInteger
      end
      item
        Name = 'ID_PROVEEDOR'
        DataType = datInteger
      end
      item
        Name = 'NOMBRE_PROVEEDOR'
        DataType = datString
        Size = 255
      end
      item
        Name = 'ELIMINADO'
        DataType = datInteger
        DisplayLabel = 'Eliminado'
      end>
    Params = <>
    StreamingOptions = [soDisableEventsWhileStreaming]
    RemoteDataAdapter = rda_Articulos
    DetailOptions = [dtCascadeOpenClose, dtCascadeApplyUpdates, dtAutoFetch, dtCascadeDelete, dtCascadeUpdate, dtDisableLogOfCascadeDeletes, dtDisableLogOfCascadeUpdates, dtIncludeInAllInOneFetch]
    MasterOptions = [moCascadeOpenClose, moCascadeApplyUpdates, moCascadeDelete, moCascadeUpdate, moDisableLogOfCascadeDeletes, moDisableLogOfCascadeUpdates]
    LogicalName = 'Articulos'
    Left = 232
    Top = 112
  end
  object ds_Articulos: TDADataSource
    DataSet = tbl_Articulos.Dataset
    DataTable = tbl_Articulos
    Left = 232
    Top = 32
  end
  object tbl_ArticulosParaCliente: TDAMemDataTable
    RemoteUpdatesOptions = []
    Fields = <
      item
        Name = 'ID'
        DataType = datInteger
        InPrimaryKey = True
      end
      item
        Name = 'ID_EMPRESA'
        DataType = datInteger
      end
      item
        Name = 'REFERENCIA'
        DataType = datString
        Size = 255
      end
      item
        Name = 'DESCRIPCION'
        DataType = datString
        Size = 255
      end
      item
        Name = 'FAMILIA'
        DataType = datString
        Size = 255
      end
      item
        Name = 'IMAGEN'
        DataType = datBlob
      end
      item
        Name = 'COMISIONABLE'
        DataType = datInteger
      end
      item
        Name = 'FECHA_ALTA'
        DataType = datDateTime
      end
      item
        Name = 'FECHA_MODIFICACION'
        DataType = datDateTime
      end
      item
        Name = 'USUARIO'
        DataType = datString
        Size = 20
      end
      item
        Name = 'REFERENCIA_PROV'
        DataType = datString
        Size = 255
      end
      item
        Name = 'PRECIO_COSTE'
        DataType = datFloat
      end
      item
        Name = 'PRECIO_PORTE'
        DataType = datFloat
      end
      item
        Name = 'DESCUENTO'
        DataType = datFloat
      end
      item
        Name = 'PRECIO_NETO'
        DataType = datFloat
      end
      item
        Name = 'ID_PROVEEDOR'
        DataType = datInteger
      end
      item
        Name = 'INVENTARIABLE'
        DataType = datInteger
      end
      item
        Name = 'NOMBRE_PROVEEDOR'
        DataType = datString
        Size = 255
      end
      item
        Name = 'ELIMINADO'
        DataType = datInteger
        DisplayLabel = 'Eliminado'
      end>
    Params = <
      item
        Name = 'ID_CLIENTE'
        Value = ''
        ParamType = daptInput
      end>
    StreamingOptions = [soDisableEventsWhileStreaming]
    RemoteDataAdapter = rda_Articulos
    DetailOptions = [dtCascadeOpenClose, dtCascadeApplyUpdates, dtAutoFetch, dtCascadeDelete, dtCascadeUpdate, dtDisableLogOfCascadeDeletes, dtDisableLogOfCascadeUpdates, dtIncludeInAllInOneFetch]
    MasterOptions = [moCascadeOpenClose, moCascadeApplyUpdates, moCascadeDelete, moCascadeUpdate, moDisableLogOfCascadeDeletes, moDisableLogOfCascadeUpdates]
    LogicalName = 'ArticulosParaCliente'
    Left = 400
    Top = 112
  end
  object ds_ArticulosParaCliente: TDADataSource
    DataSet = tbl_ArticulosParaCliente.Dataset
    DataTable = tbl_ArticulosParaCliente
    Left = 400
    Top = 32
  end
end