Tecsitel_FactuGES2/Source/Modulos/Recibos de proveedor/Data/uDataModuleRecibosProveedor.dfm

inherited DataModuleRecibosProveedor: TDataModuleRecibosProveedor
  OnCreate = DAClientDataModuleCreate
  Height = 311
  Width = 518
  object RORemoteService: TRORemoteService
    Message = dmConexion.ROMessage
    Channel = dmConexion.ROChannel
    ServiceName = 'srvRecibosProveedor'
    Left = 56
    Top = 24
  end
  object Bin2DataStreamer: TDABin2DataStreamer
    Left = 48
    Top = 84
  end
  object rda_RecibosProveedor: TDARemoteDataAdapter
    DataStreamer = Bin2DataStreamer
    GetSchemaCall.RemoteService = RORemoteService
    GetDataCall.RemoteService = RORemoteService
    UpdateDataCall.RemoteService = RORemoteService
    GetScriptsCall.RemoteService = RORemoteService
    RemoteService = RORemoteService
    Left = 51
    Top = 151
  end
  object tbl_PagosProveedor: TDAMemDataTable
    RemoteUpdatesOptions = []
    Fields = <
      item
        Name = 'ID'
        DataType = datAutoInc
        GeneratorName = 'GEN_PAGOS_PROVEEDOR_ID'
        Required = True
        DictionaryEntry = 'PagosProveedor_ID'
        InPrimaryKey = True
      end
      item
        Name = 'ID_RECIBO'
        DataType = datInteger
        DisplayLabel = 'PagosCliente_ID_RECIBO'
        DictionaryEntry = 'PagosProveedor_ID_RECIBO'
      end
      item
        Name = 'TIPO'
        DataType = datString
        Size = 255
        DisplayLabel = 'PagosCliente_TIPO'
        DictionaryEntry = 'PagosProveedor_TIPO'
      end
      item
        Name = 'FECHA_PAGO'
        DataType = datDateTime
        DisplayLabel = 'PagosCliente_FECHA_PAGO'
        DictionaryEntry = 'PagosProveedor_FECHA_PAGO'
      end
      item
        Name = 'TITULAR'
        DataType = datString
        Size = 255
        DisplayLabel = 'PagosCliente_TITULAR'
        DictionaryEntry = 'PagosProveedor_TITULAR'
      end
      item
        Name = 'ENTIDAD'
        DataType = datString
        Size = 15
        DisplayLabel = 'PagosCliente_ENTIDAD'
        DictionaryEntry = 'PagosProveedor_ENTIDAD'
      end
      item
        Name = 'SUCURSAL'
        DataType = datString
        Size = 15
        DisplayLabel = 'PagosCliente_SUCURSAL'
        DictionaryEntry = 'PagosProveedor_SUCURSAL'
      end
      item
        Name = 'DC'
        DataType = datString
        Size = 15
        DisplayLabel = 'PagosCliente_DC'
        DictionaryEntry = 'PagosProveedor_DC'
      end
      item
        Name = 'CUENTA'
        DataType = datString
        Size = 15
        DisplayLabel = 'PagosCliente_CUENTA'
        DictionaryEntry = 'PagosProveedor_CUENTA'
      end
      item
        Name = 'FECHA_ALTA'
        DataType = datDateTime
        DisplayLabel = 'PagosCliente_FECHA_ALTA'
        DictionaryEntry = 'PagosProveedor_FECHA_ALTA'
      end
      item
        Name = 'FECHA_MODIFICACION'
        DataType = datDateTime
        DisplayLabel = 'PagosCliente_FECHA_MODIFICACION'
        DictionaryEntry = 'PagosProveedor_FECHA_MODIFICACION'
      end
      item
        Name = 'USUARIO'
        DataType = datString
        Size = 20
        DisplayLabel = 'PagosCliente_USUARIO'
        DictionaryEntry = 'PagosProveedor_USUARIO'
      end>
    Params = <>
    MasterMappingMode = mmWhere
    StreamingOptions = [soDisableEventsWhileStreaming]
    RemoteDataAdapter = rda_RecibosProveedor
    MasterSource = ds_RecibosProveedor
    MasterFields = 'ID'
    DetailFields = 'ID_RECIBO'
    LogicalName = 'PagosProveedor'
    IndexDefs = <>
    Left = 280
    Top = 104
  end
  object ds_PagosProveedor: TDADataSource
    DataSet = tbl_PagosProveedor.Dataset
    DataTable = tbl_PagosProveedor
    Left = 280
    Top = 48
  end
  object tbl_RecibosCompensadosProv: TDAMemDataTable
    RemoteUpdatesOptions = []
    Fields = <
      item
        Name = 'ID'
        DataType = datInteger
        Required = True
        ServerAutoRefresh = True
        InPrimaryKey = True
      end
      item
        Name = 'ID_RECIBO_COMPENSADO'
        DataType = datInteger
      end
      item
        Name = 'REFERENCIA_REC_COMPENSADO'
        DataType = datString
        Size = 255
      end
      item
        Name = 'REFERENCIA'
        DataType = datString
        Size = 255
      end
      item
        Name = 'REFERENCIA_PROVEEDOR'
        DataType = datString
        Size = 255
      end
      item
        Name = 'SITUACION'
        DataType = datString
        Size = 9
      end
      item
        Name = 'ID_FACTURA'
        DataType = datInteger
      end
      item
        Name = 'ID_REMESA'
        DataType = datInteger
      end
      item
        Name = 'REFERENCIA_REMESA'
        DataType = datString
        Size = 255
      end
      item
        Name = 'FECHA_EMISION'
        DataType = datDateTime
      end
      item
        Name = 'FECHA_VENCIMIENTO'
        DataType = datDateTime
      end
      item
        Name = 'DESCRIPCION'
        DataType = datString
        Size = 255
      end
      item
        Name = 'OBSERVACIONES'
        DataType = datString
        Size = 255
      end
      item
        Name = 'IMPORTE'
        DataType = datCurrency
      end
      item
        Name = 'OTROS_GASTOS'
        DataType = datCurrency
      end
      item
        Name = 'IMPORTE_TOTAL'
        DataType = datCurrency
      end
      item
        Name = 'REFERENCIA_FACTURA_PROV'
        DataType = datString
        Size = 255
      end
      item
        Name = 'FECHA_FACTURA'
        DataType = datDateTime
      end
      item
        Name = 'FORMA_PAGO_FACTURA'
        DataType = datString
        Size = 255
      end
      item
        Name = 'IMPORTE_FACTURA'
        DataType = datCurrency
      end
      item
        Name = 'ID_EMPRESA'
        DataType = datInteger
      end
      item
        Name = 'DATOS_BANCARIOS'
        DataType = datString
        Size = 255
      end
      item
        Name = 'ID_PROVEEDOR'
        DataType = datInteger
      end
      item
        Name = 'NOMBRE_PROVEEDOR'
        DataType = datString
        Size = 255
      end
      item
        Name = 'NIF_CIF_PROVEEDOR'
        DataType = datString
        Size = 15
      end
      item
        Name = 'FECHA_ALTA'
        DataType = datDateTime
      end
      item
        Name = 'FECHA_MODIFICACION'
        DataType = datDateTime
      end
      item
        Name = 'USUARIO'
        DataType = datString
        Size = 30
      end>
    Params = <>
    MasterMappingMode = mmWhere
    StreamingOptions = [soDisableEventsWhileStreaming]
    RemoteDataAdapter = rda_RecibosProveedor
    MasterSource = ds_RecibosProveedor
    MasterFields = 'ID'
    DetailFields = 'ID_RECIBO_COMPENSADO'
    LogicalName = 'RecibosCompensadosProv'
    IndexDefs = <>
    Left = 416
    Top = 104
  end
  object ds_RecibosCompensadosProv: TDADataSource
    DataSet = tbl_RecibosCompensadosProv.Dataset
    DataTable = tbl_RecibosCompensadosProv
    Left = 416
    Top = 48
  end
  object tbl_RecibosProveedor: TDAMemDataTable
    RemoteUpdatesOptions = []
    Fields = <
      item
        Name = 'ID'
        DataType = datAutoInc
        GeneratorName = 'GEN_RECIBOS_PROVEEDOR_ID'
        Required = True
        DictionaryEntry = 'RecibosProveedor_ID'
        InPrimaryKey = True
      end
      item
        Name = 'ID_RECIBO_COMPENSADO'
        DataType = datInteger
        DisplayLabel = 'RecibosProveedor_ID_RECIBO_COMPENSADO'
        DictionaryEntry = 'RecibosProveedor_ID_RECIBO_COMPENSADO'
      end
      item
        Name = 'REFERENCIA_REC_COMPENSADO'
        DataType = datString
        Size = 255
        DisplayLabel = 'RecibosProveedor_REFERENCIA_REC_COMPENSADO'
        DictionaryEntry = 'RecibosProveedor_REFERENCIA_REC_COMPENSADO'
      end
      item
        Name = 'REFERENCIA'
        DataType = datString
        Size = 255
        DictionaryEntry = 'RecibosProveedor_REFERENCIA'
      end
      item
        Name = 'REFERENCIA_PROVEEDOR'
        DataType = datString
        Size = 255
        DictionaryEntry = 'RecibosProveedor_REFERENCIA_PROVEEDOR'
      end
      item
        Name = 'SITUACION'
        DataType = datString
        Size = 9
        DictionaryEntry = 'RecibosProveedor_SITUACION'
      end
      item
        Name = 'ID_FACTURA'
        DataType = datInteger
        DictionaryEntry = 'RecibosProveedor_ID_FACTURA'
      end
      item
        Name = 'ID_REMESA'
        DataType = datInteger
        DictionaryEntry = 'RecibosProveedor_ID_REMESA'
      end
      item
        Name = 'REFERENCIA_REMESA'
        DataType = datString
        Size = 255
        DictionaryEntry = 'RecibosProveedor_REFERENCIA_REMESA'
      end
      item
        Name = 'FECHA_EMISION'
        DataType = datDateTime
        DisplayLabel = 'RecibosCliente_FECHA_EMISION'
        DictionaryEntry = 'RecibosProveedor_FECHA_EMISION'
      end
      item
        Name = 'FECHA_VENCIMIENTO'
        DataType = datDateTime
        DictionaryEntry = 'RecibosProveedor_FECHA_VENCIMIENTO'
      end
      item
        Name = 'DESCRIPCION'
        DataType = datString
        Size = 255
        DictionaryEntry = 'RecibosProveedor_DESCRIPCION'
      end
      item
        Name = 'OBSERVACIONES'
        DataType = datString
        Size = 255
        DictionaryEntry = 'RecibosProveedor_OBSERVACIONES'
      end
      item
        Name = 'IMPORTE'
        DataType = datCurrency
        Alignment = taRightJustify
        DictionaryEntry = 'RecibosProveedor_IMPORTE'
      end
      item
        Name = 'OTROS_GASTOS'
        DataType = datCurrency
        DisplayLabel = 'RecibosCliente_OTROS_GASTOS'
        Alignment = taRightJustify
        DictionaryEntry = 'RecibosProveedor_OTROS_GASTOS'
      end
      item
        Name = 'IMPORTE_TOTAL'
        DataType = datCurrency
        Alignment = taRightJustify
        DictionaryEntry = 'RecibosProveedor_IMPORTE_TOTAL'
      end
      item
        Name = 'REFERENCIA_FACTURA_PROV'
        DataType = datString
        Size = 255
        DisplayLabel = 'Ref. factura prov.'
        DictionaryEntry = 'RecibosProveedor_REFERENCIA_FACTURA_PROV'
      end
      item
        Name = 'FECHA_FACTURA'
        DataType = datDateTime
        DictionaryEntry = 'RecibosProveedor_FECHA_FACTURA'
      end
      item
        Name = 'FORMA_PAGO_FACTURA'
        DataType = datString
        Size = 255
        DictionaryEntry = 'RecibosProveedor_FORMA_PAGO_FACTURA'
      end
      item
        Name = 'IMPORTE_FACTURA'
        DataType = datCurrency
        Alignment = taRightJustify
        DictionaryEntry = 'RecibosProveedor_IMPORTE_FACTURA'
      end
      item
        Name = 'ID_EMPRESA'
        DataType = datInteger
        DictionaryEntry = 'RecibosProveedor_ID_EMPRESA'
      end
      item
        Name = 'DATOS_BANCARIOS_FACTURA'
        DataType = datString
        Size = 255
      end
      item
        Name = 'DATOS_BANCARIOS'
        DataType = datString
        Size = 255
      end
      item
        Name = 'ID_PROVEEDOR'
        DataType = datInteger
        DisplayLabel = 'RecibosProveedor_ID_PROVEEDOR'
        DictionaryEntry = 'RecibosProveedor_ID_PROVEEDOR'
      end
      item
        Name = 'NOMBRE_PROVEEDOR'
        DataType = datString
        Size = 255
        DisplayLabel = 'RecibosProveedor_NOMBRE_PROVEEDOR'
        DictionaryEntry = 'RecibosProveedor_NOMBRE_PROVEEDOR'
      end
      item
        Name = 'NIF_CIF_PROVEEDOR'
        DataType = datString
        Size = 15
        DisplayLabel = 'RecibosProveedor_NIF_CIF_PROVEEDOR'
        DictionaryEntry = 'RecibosProveedor_NIF_CIF_PROVEEDOR'
      end
      item
        Name = 'FECHA_ALTA'
        DataType = datDateTime
        DictionaryEntry = 'RecibosProveedor_FECHA_ALTA'
      end
      item
        Name = 'FECHA_MODIFICACION'
        DataType = datDateTime
        DictionaryEntry = 'RecibosProveedor_FECHA_MODIFICACION'
      end
      item
        Name = 'USUARIO'
        DataType = datString
        Size = 20
        DictionaryEntry = 'RecibosCliente_USUARIO'
      end>
    Params = <>
    StreamingOptions = [soDisableEventsWhileStreaming]
    RemoteDataAdapter = rda_RecibosProveedor
    LogicalName = 'RecibosProveedor'
    IndexDefs = <>
    Left = 160
    Top = 104
  end
  object ds_RecibosProveedor: TDADataSource
    DataSet = tbl_RecibosProveedor.Dataset
    DataTable = tbl_RecibosProveedor
    Left = 160
    Top = 48
  end
  object tbl_ListaAnosRecibos: TDAMemDataTable
    RemoteUpdatesOptions = []
    Fields = <
      item
        Name = 'ANO'
        DataType = datString
        Size = 254
      end>
    Params = <>
    StreamingOptions = [soDisableEventsWhileStreaming]
    RemoteDataAdapter = rda_RecibosProveedor
    LogicalName = 'ListaAnosRecibos'
    IndexDefs = <>
    Left = 160
    Top = 216
  end
  object ds_ListaAnosRecibos: TDADataSource
    DataSet = tbl_ListaAnosRecibos.Dataset
    DataTable = tbl_ListaAnosRecibos
    Left = 160
    Top = 160
  end
end