AlonsoYSal_FactuGES2/Source/Modulos/Formas de pago/Data/uDataModuleFormasPago.dfm

inherited DataModuleFormasPago: TDataModuleFormasPago
  OnCreate = DAClientDataModuleCreate
  Height = 264
  Width = 483
  object RORemoteService: TRORemoteService
    Message = dmConexion.ROMessage
    Channel = dmConexion.ROChannel
    ServiceName = 'srvFormasPago'
    Left = 48
    Top = 24
  end
  object Bin2DataStreamer: TDABin2DataStreamer
    Left = 48
    Top = 104
  end
  object rda_FormasPago: TDARemoteDataAdapter
    DataStreamer = Bin2DataStreamer
    GetSchemaCall.RemoteService = RORemoteService
    GetDataCall.RemoteService = RORemoteService
    UpdateDataCall.RemoteService = RORemoteService
    GetScriptsCall.RemoteService = RORemoteService
    RemoteService = RORemoteService
    Left = 208
    Top = 24
  end
  object tbl_FormasPago: TDAMemDataTable
    RemoteUpdatesOptions = []
    Fields = <
      item
        Name = 'ID'
        DataType = datAutoInc
        GeneratorName = 'GEN_FORMAS_PAGO_ID'
        Required = True
        ServerAutoRefresh = True
        DictionaryEntry = 'FormasPago_ID'
        InPrimaryKey = True
      end
      item
        Name = 'REFERENCIA'
        DataType = datString
        Size = 255
        DisplayLabel = 'Referencia'
        DictionaryEntry = 'FormasPago_REFERENCIA'
      end
      item
        Name = 'DESCRIPCION'
        DataType = datString
        Size = 255
        DisplayLabel = 'Descripci'#243'n'
        DictionaryEntry = 'FormasPago_DESCRIPCION'
      end
      item
        Name = 'TITULAR'
        DataType = datString
        Size = 255
        DisplayLabel = 'Titular'
        DictionaryEntry = 'FormasPago_TITULAR'
      end
      item
        Name = 'ENTIDAD'
        DataType = datString
        Size = 15
        DisplayLabel = 'C'#243'd. Entidad'
        DictionaryEntry = 'FormasPago_ENTIDAD'
      end
      item
        Name = 'SUCURSAL'
        DataType = datString
        Size = 15
        DisplayLabel = 'C'#243'd. Sucusal'
        DictionaryEntry = 'FormasPago_SUCURSAL'
      end
      item
        Name = 'DC'
        DataType = datString
        Size = 15
        DictionaryEntry = 'FormasPago_DC'
      end
      item
        Name = 'CUENTA'
        DataType = datString
        Size = 15
        DisplayLabel = 'C'#243'd. Cuenta'
        DictionaryEntry = 'FormasPago_CUENTA'
      end
      item
        Name = 'ID_SUBCUENTA'
        DataType = datInteger
      end
      item
        Name = 'IGNORAR_CONTABILIDAD'
        DataType = datSmallInt
      end>
    Params = <>
    StreamingOptions = [soDisableEventsWhileStreaming]
    RemoteDataAdapter = rda_FormasPago
    LogicalName = 'FormasPago'
    IndexDefs = <>
    Left = 208
    Top = 104
  end
  object ds_FormasPago: TDADataSource
    DataSet = tbl_FormasPago.Dataset
    DataTable = tbl_FormasPago
    Left = 208
    Top = 176
  end
  object tbl_FormasPagoPlazos: TDAMemDataTable
    RemoteUpdatesOptions = []
    Fields = <
      item
        Name = 'ID'
        DataType = datAutoInc
        GeneratorName = 'GEN_FORMAS_PAGO_PLAZOS_ID'
        Required = True
        DisplayLabel = 'FormasPagoPlazos_ID'
        ServerAutoRefresh = True
        DictionaryEntry = 'FormasPagoPlazos_ID'
        InPrimaryKey = True
      end
      item
        Name = 'ID_FORMA_PAGO'
        DataType = datInteger
        Required = True
        DisplayLabel = 'FormasPagoPlazos_ID_FORMA_PAGO'
        DictionaryEntry = 'FormasPagoPlazos_ID_FORMA_PAGO'
      end
      item
        Name = 'NUM_DIAS'
        DataType = datSmallInt
        DisplayLabel = 'Num. d'#237'as'
        DictionaryEntry = 'FormasPagoPlazos_NUM_DIAS'
      end
      item
        Name = 'PORCENTAJE'
        DataType = datFloat
        DisplayLabel = '% aplazado'
        Alignment = taRightJustify
        DictionaryEntry = 'FormasPagoPlazos_PORCENTAJE'
      end>
    Params = <>
    MasterMappingMode = mmWhere
    StreamingOptions = [soDisableEventsWhileStreaming]
    RemoteDataAdapter = rda_FormasPago
    MasterSource = ds_FormasPago
    MasterFields = 'ID'
    DetailFields = 'ID_FORMA_PAGO'
    LogicalName = 'FormasPagoPlazos'
    IndexDefs = <>
    Left = 344
    Top = 104
  end
  object ds_FormasPagoPlazos: TDADataSource
    DataSet = tbl_FormasPagoPlazos.Dataset
    DataTable = tbl_FormasPagoPlazos
    Left = 344
    Top = 176
  end
end