LuisLeon_FactuGES2/Source/Modulos/Comisiones/Data/uDataModuleComisiones.dfm

inherited DataModuleComisiones: TDataModuleComisiones
  OnCreate = DAClientDataModuleCreate
  Height = 248
  Width = 390
  object RORemoteService: TRORemoteService
    Message = dmConexion.ROMessage
    Channel = dmConexion.ROChannel
    ServiceName = 'srvComisiones'
    Left = 48
    Top = 24
  end
  object rda_Comisiones: TDARemoteDataAdapter
    DataStreamer = Bin2DataStreamer
    GetSchemaCall.RemoteService = RORemoteService
    GetDataCall.RemoteService = RORemoteService
    UpdateDataCall.RemoteService = RORemoteService
    GetScriptsCall.RemoteService = RORemoteService
    RemoteService = RORemoteService
    Left = 43
    Top = 151
  end
  object Bin2DataStreamer: TDABin2DataStreamer
    Left = 48
    Top = 88
  end
  object tbl_Comisiones: TDAMemDataTable
    RemoteUpdatesOptions = []
    Fields = <
      item
        Name = 'ID'
        DataType = datAutoInc
        GeneratorName = 'GEN_COMISIONES_LIQUID_ID'
        ServerAutoRefresh = True
        DictionaryEntry = 'Comisiones_ID'
        InPrimaryKey = True
      end
      item
        Name = 'ID_EMPRESA'
        DataType = datInteger
        DictionaryEntry = 'Comisiones_ID_EMPRESA'
      end
      item
        Name = 'REFERENCIA'
        DataType = datString
        Size = 255
        DictionaryEntry = 'Comisiones_REFERENCIA'
      end
      item
        Name = 'ID_AGENTE'
        DataType = datInteger
        DisplayLabel = 'Comisiones_ID_AGENTE'
        DictionaryEntry = 'Comisiones_ID_AGENTE'
      end
      item
        Name = 'DESCRIPCION'
        DataType = datString
        Size = 255
        DictionaryEntry = 'Comisiones_DESCRIPCION'
      end
      item
        Name = 'FECHA'
        DataType = datDateTime
        DictionaryEntry = 'Comisiones_FECHA'
      end
      item
        Name = 'IMPORTE_TOTAL'
        DataType = datCurrency
        DisplayLabel = 'Comisiones_IMPORTE_TOTAL'
        DictionaryEntry = 'Comisiones_IMPORTE_TOTAL'
      end
      item
        Name = 'USUARIO'
        DataType = datString
        Size = 30
        DictionaryEntry = 'Comisiones_USUARIO'
      end
      item
        Name = 'NOMBRE'
        DataType = datString
        Size = 255
        DisplayLabel = 'Comisiones_NOMBRE'
        DictionaryEntry = 'Comisiones_NOMBRE'
      end>
    Params = <>
    StreamingOptions = [soDisableEventsWhileStreaming]
    RemoteDataAdapter = rda_Comisiones
    LogicalName = 'Comisiones'
    IndexDefs = <>
    Left = 176
    Top = 16
  end
  object ds_Comisiones: TDADataSource
    DataSet = tbl_Comisiones.Dataset
    DataTable = tbl_Comisiones
    Left = 176
    Top = 64
  end
  object tbl_Facturas_Comision: TDAMemDataTable
    RemoteUpdatesOptions = []
    Fields = <
      item
        Name = 'ID_EMPRESA'
        DataType = datInteger
        DictionaryEntry = 'Comisiones_Detalles_ID_EMPRESA'
      end
      item
        Name = 'ID_AGENTE'
        DataType = datInteger
        DictionaryEntry = 'Comisiones_Detalles_ID_AGENTE'
      end
      item
        Name = 'AGENTE'
        DataType = datString
        Size = 255
        DictionaryEntry = 'Comisiones_Detalles_AGENTE'
      end
      item
        Name = 'ID_FACTURA'
        DataType = datInteger
        DictionaryEntry = 'Facturas_Comision_ID_FACTURA'
      end
      item
        Name = 'ID_COMISION_LIQUIDADA'
        DataType = datInteger
        DictionaryEntry = 'Facturas_Comision_ID_COMISION_LIQUIDADA'
      end
      item
        Name = 'FECHA'
        DataType = datDateTime
        DictionaryEntry = 'Comisiones_Detalles_FECHA'
      end
      item
        Name = 'REFERENCIA'
        DataType = datString
        Size = 255
        DictionaryEntry = 'Comisiones_Detalles_REFERENCIA'
      end
      item
        Name = 'SITUACION'
        DataType = datString
        Size = 19
        DictionaryEntry = 'Comisiones_Detalles_SITUACION'
      end
      item
        Name = 'ID_CLIENTE'
        DataType = datInteger
        DictionaryEntry = 'Facturas_Comision_ID_CLIENTE'
      end
      item
        Name = 'CLIENTE'
        DataType = datString
        Size = 255
        DictionaryEntry = 'Facturas_Comision_CLIENTE'
      end
      item
        Name = 'ID_PROVEEDOR'
        DataType = datInteger
        DictionaryEntry = 'Comisiones_Detalles_ID_PROVEEDOR'
      end
      item
        Name = 'PROVEEDOR'
        DataType = datString
        Size = 255
        DictionaryEntry = 'Comisiones_Detalles_PROVEEDOR'
      end
      item
        Name = 'COMISION'
        DataType = datFloat
        DictionaryEntry = 'Comisiones_Detalles_COMISION'
      end
      item
        Name = 'IMPORTE_COMISIONABLE'
        DataType = datCurrency
        DictionaryEntry = 'Facturas_Comision_IMPORTE_COMISIONABLE'
      end
      item
        Name = 'IMPORTE_COMISION'
        DataType = datCurrency
        DictionaryEntry = 'Facturas_Comision_IMPORTE_COMISION'
      end>
    Params = <
      item
        Name = 'ID_COMISION'
        Value = ''
        ParamType = daptInput
      end>
    MasterMappingMode = mmWhere
    StreamingOptions = [soDisableEventsWhileStreaming]
    RemoteDataAdapter = rda_Comisiones
    MasterSource = ds_Comisiones
    MasterFields = 'ID'
    DetailFields = 'ID_COMISION_LIQUIDADA'
    LogicalName = 'Facturas_Comision'
    IndexDefs = <>
    Left = 312
    Top = 16
  end
  object ds_Facturas_Comision: TDADataSource
    DataSet = tbl_Facturas_Comision.Dataset
    DataTable = tbl_Facturas_Comision
    Left = 312
    Top = 64
  end
  object tbl_V_Detalles_Facturas_Comision: TDAMemDataTable
    RemoteUpdatesOptions = []
    Fields = <
      item
        Name = 'ID_EMPRESA'
        DataType = datInteger
        DictionaryEntry = 'Comisiones_Detalles_ID_EMPRESA'
      end
      item
        Name = 'ID_AGENTE'
        DataType = datInteger
        DictionaryEntry = 'Comisiones_Detalles_ID_AGENTE'
      end
      item
        Name = 'AGENTE'
        DataType = datString
        Size = 255
        DictionaryEntry = 'Comisiones_Detalles_AGENTE'
      end
      item
        Name = 'ID_FACTURA'
        DataType = datInteger
      end
      item
        Name = 'ID_COMISION_LIQUIDADA'
        DataType = datInteger
        DictionaryEntry = 'V_Detalles_Facturas_Comision_ID_COMISION_LIQUIDADA'
      end
      item
        Name = 'FECHA'
        DataType = datDateTime
        DictionaryEntry = 'Comisiones_Detalles_FECHA'
      end
      item
        Name = 'REFERENCIA'
        DataType = datString
        Size = 255
        DictionaryEntry = 'Comisiones_Detalles_REFERENCIA'
      end
      item
        Name = 'SITUACION'
        DataType = datString
        Size = 19
        DictionaryEntry = 'Comisiones_Detalles_SITUACION'
      end
      item
        Name = 'ID_CLIENTE'
        DataType = datInteger
        DictionaryEntry = 'Facturas_Comision_ID_CLIENTE'
      end
      item
        Name = 'CLIENTE'
        DataType = datString
        Size = 255
        DictionaryEntry = 'Facturas_Comision_CLIENTE'
      end
      item
        Name = 'ID_PROVEEDOR'
        DataType = datInteger
        DictionaryEntry = 'Comisiones_Detalles_ID_PROVEEDOR'
      end
      item
        Name = 'PROVEEDOR'
        DataType = datString
        Size = 255
        DictionaryEntry = 'Comisiones_Detalles_PROVEEDOR'
      end
      item
        Name = 'COMISION'
        DataType = datFloat
        DictionaryEntry = 'Comisiones_Detalles_COMISION'
      end
      item
        Name = 'IMPORTE_COMISIONABLE'
        DataType = datCurrency
        DictionaryEntry = 'V_Detalles_Facturas_Comision_IMPORTE_COMISIONABLE'
      end
      item
        Name = 'IMPORTE_COMISION'
        DataType = datCurrency
        DictionaryEntry = 'V_Detalles_Facturas_Comision_IMPORTE_COMISION'
      end>
    Params = <>
    StreamingOptions = [soDisableEventsWhileStreaming]
    RemoteDataAdapter = rda_Comisiones
    LogicalName = 'V_Detalles_Facturas_Comision'
    IndexDefs = <>
    Left = 232
    Top = 128
  end
  object ds_V_Detalles_Facturas_Comision: TDADataSource
    DataSet = tbl_V_Detalles_Facturas_Comision.Dataset
    DataTable = tbl_V_Detalles_Facturas_Comision
    Left = 232
    Top = 176
  end
end