Tecsitel_FactuGES2/Source/Modulos/Albaranes de cliente/Data/uDataModuleAlbaranesCliente.dfm

inherited DataModuleAlbaranesCliente: TDataModuleAlbaranesCliente
  OnCreate = DAClientDataModuleCreate
  Height = 234
  Width = 484
  object RORemoteService: TRORemoteService
    Message = dmConexion.ROMessage
    Channel = dmConexion.ROChannel
    ServiceName = 'srvAlbaranesCliente'
    Left = 40
    Top = 16
  end
  object rda_AlbaranesCliente: TDARemoteDataAdapter
    GetSchemaCall.RemoteService = RORemoteService
    GetDataCall.RemoteService = RORemoteService
    UpdateDataCall.RemoteService = RORemoteService
    GetScriptsCall.RemoteService = RORemoteService
    RemoteService = RORemoteService
    DataStreamer = Bin2DataStreamer
    Left = 43
    Top = 151
  end
  object Bin2DataStreamer: TDABin2DataStreamer
    Left = 40
    Top = 84
  end
  object tbl_AlbaranesCliente: TDAMemDataTable
    RemoteUpdatesOptions = []
    Fields = <
      item
        Name = 'ID'
        DataType = datAutoInc
        GeneratorName = 'GEN_ALBARANES_CLI_ID'
        Required = True
        ServerAutoRefresh = True
        DictionaryEntry = 'AlbaranesCliente_ID'
        InPrimaryKey = True
      end
      item
        Name = 'ID_EMPRESA'
        DataType = datInteger
        DictionaryEntry = 'AlbaranesCliente_ID_EMPRESA'
      end
      item
        Name = 'ID_CLIENTE'
        DataType = datInteger
        DictionaryEntry = 'AlbaranesCliente_ID_CLIENTE'
      end
      item
        Name = 'NOMBRE'
        DataType = datString
        Size = 255
        DisplayLabel = 'Nombre del cliente'
        ServerAutoRefresh = True
        DictionaryEntry = 'AlbaranesCliente_NOMBRE'
      end
      item
        Name = 'FECHA_ALBARAN'
        DataType = datDateTime
        DisplayLabel = 'Fecha albar'#225'n'
        DictionaryEntry = 'AlbaranesCliente_FECHA_ALBARAN'
      end
      item
        Name = 'REFERENCIA'
        DataType = datString
        Size = 255
        DisplayLabel = 'Referencia'
        ServerAutoRefresh = True
        DictionaryEntry = 'AlbaranesCliente_REFERENCIA'
      end
      item
        Name = 'REFERENCIA_CLIENTE'
        DataType = datString
        Size = 255
        DisplayLabel = 'AlbaranesCliente_REFERENCIA_CLIENTE'
        ServerAutoRefresh = True
        DictionaryEntry = 'AlbaranesCliente_REFERENCIA_CLIENTE'
      end
      item
        Name = 'TIPO'
        DataType = datString
        Size = 1
        DisplayLabel = 'Tipo'
        DictionaryEntry = 'AlbaranesCliente_TIPO'
      end
      item
        Name = 'SITUACION'
        DataType = datString
        Size = 255
        DisplayLabel = 'Situaci'#243'n'
        DictionaryEntry = 'AlbaranesCliente_SITUACION'
      end
      item
        Name = 'ID_ALMACEN'
        DataType = datInteger
        DictionaryEntry = 'AlbaranesCliente_ID_ALMACEN'
      end
      item
        Name = 'NOMBRE_ALMACEN'
        DataType = datString
        Size = 255
        DisplayLabel = 'Almac'#233'n'
        ServerAutoRefresh = True
        DictionaryEntry = 'AlbaranesCliente_NOMBRE_ALMACEN'
      end
      item
        Name = 'ID_PEDIDO'
        DataType = datInteger
        DictionaryEntry = 'AlbaranesCliente_ID_PEDIDO'
      end
      item
        Name = 'REF_PEDIDO'
        DataType = datString
        Size = 255
        DisplayLabel = 'Ref. pedido cliente'
        ServerAutoRefresh = True
        DictionaryEntry = 'AlbaranesCliente_REF_PEDIDO'
      end
      item
        Name = 'ID_FACTURA'
        DataType = datInteger
        DictionaryEntry = 'AlbaranesCliente_ID_FACTURA'
      end
      item
        Name = 'REF_FACTURA'
        DataType = datString
        Size = 255
        DisplayLabel = 'Ref. factura cliente'
        ServerAutoRefresh = True
        DictionaryEntry = 'AlbaranesCliente_REF_FACTURA'
      end
      item
        Name = 'CALLE'
        DataType = datString
        Size = 255
        DisplayLabel = 'Calle'
        DictionaryEntry = 'AlbaranesCliente_CALLE'
      end
      item
        Name = 'CODIGO_POSTAL'
        DataType = datString
        Size = 10
        DisplayLabel = 'C'#243'd. postal'
        DictionaryEntry = 'AlbaranesCliente_CODIGO_POSTAL'
      end
      item
        Name = 'POBLACION'
        DataType = datString
        Size = 255
        DisplayLabel = 'Poblaci'#243'n'
        DictionaryEntry = 'AlbaranesCliente_POBLACION'
      end
      item
        Name = 'PROVINCIA'
        DataType = datString
        Size = 255
        DisplayLabel = 'Provincia'
        DictionaryEntry = 'AlbaranesCliente_PROVINCIA'
      end
      item
        Name = 'PERSONA_CONTACTO'
        DataType = datString
        Size = 255
        DisplayLabel = 'Persona de contacto'
        DictionaryEntry = 'AlbaranesCliente_PERSONA_CONTACTO'
      end
      item
        Name = 'TELEFONO'
        DataType = datString
        Size = 25
        DisplayLabel = 'Tel'#233'fono'
        DictionaryEntry = 'AlbaranesCliente_TELEFONO'
      end
      item
        Name = 'IMPORTE_NETO'
        DataType = datCurrency
        DisplayLabel = 'Importe neto'
        Alignment = taRightJustify
        DictionaryEntry = 'AlbaranesCliente_IMPORTE_NETO'
      end
      item
        Name = 'IMPORTE_PORTE'
        DataType = datCurrency
        DisplayLabel = 'Importe del porte'
        Alignment = taRightJustify
        DictionaryEntry = 'AlbaranesCliente_IMPORTE_PORTE'
      end
      item
        Name = 'DESCUENTO'
        DataType = datFloat
        DisplayLabel = 'Descuento'
        DisplayFormat = ',0.00 %;-,0.00 %'
        Alignment = taRightJustify
        DictionaryEntry = 'AlbaranesCliente_DESCUENTO'
      end
      item
        Name = 'IMPORTE_DESCUENTO'
        DataType = datCurrency
        DisplayLabel = 'Importe dto.'
        Alignment = taRightJustify
        DictionaryEntry = 'AlbaranesCliente_IMPORTE_DESCUENTO'
      end
      item
        Name = 'BASE_IMPONIBLE'
        DataType = datCurrency
        DisplayLabel = 'Base imponible'
        Alignment = taRightJustify
        DictionaryEntry = 'AlbaranesCliente_BASE_IMPONIBLE'
      end
      item
        Name = 'IVA'
        DataType = datFloat
        DisplayFormat = ',0.00 %;-,0.00 %'
        Alignment = taRightJustify
        DictionaryEntry = 'AlbaranesCliente_IVA'
      end
      item
        Name = 'IMPORTE_IVA'
        DataType = datCurrency
        DisplayLabel = 'Importe IVA'
        Alignment = taRightJustify
        DictionaryEntry = 'AlbaranesCliente_IMPORTE_IVA'
      end
      item
        Name = 'IMPORTE_TOTAL'
        DataType = datCurrency
        DisplayLabel = 'Importe total'
        Alignment = taRightJustify
        DictionaryEntry = 'AlbaranesCliente_IMPORTE_TOTAL'
      end
      item
        Name = 'OBSERVACIONES'
        DataType = datMemo
        DisplayLabel = 'Observaciones'
        DictionaryEntry = 'AlbaranesCliente_OBSERVACIONES'
      end
      item
        Name = 'INCIDENCIAS'
        DataType = datMemo
        DictionaryEntry = 'AlbaranesCliente_INCIDENCIAS'
      end
      item
        Name = 'INCIDENCIAS_ACTIVAS'
        DataType = datInteger
        DictionaryEntry = 'AlbaranesCliente_INCIDENCIAS_ACTIVAS'
      end
      item
        Name = 'FECHA_ALTA'
        DataType = datDateTime
        DictionaryEntry = 'AlbaranesCliente_FECHA_ALTA'
      end
      item
        Name = 'FECHA_MODIFICACION'
        DataType = datDateTime
        DictionaryEntry = 'AlbaranesCliente_FECHA_MODIFICACION'
      end
      item
        Name = 'USUARIO'
        DataType = datString
        Size = 20
        DictionaryEntry = 'AlbaranesCliente_USUARIO'
      end
      item
        Name = 'ID_FORMA_PAGO'
        DataType = datInteger
        DictionaryEntry = 'AlbaranesCliente_ID_FORMA_PAGO'
      end
      item
        Name = 'FECHA_PREVISTA_ENVIO'
        DataType = datDateTime
        DisplayLabel = 'Fecha prevista de envio'
        DictionaryEntry = 'AlbaranesCliente_FECHA_PREVISTA_ENVIO'
      end
      item
        Name = 'FECHA_ENVIO'
        DataType = datDateTime
        DisplayLabel = 'Fecha de env'#237'o'
        DictionaryEntry = 'AlbaranesCliente_FECHA_ENVIO'
      end
      item
        Name = 'FECHA_RECEPCION'
        DataType = datDateTime
        DisplayLabel = 'Fecha de recepci'#243'n'
        DictionaryEntry = 'AlbaranesCliente_FECHA_RECEPCION'
      end>
    Params = <>
    StreamingOptions = [soDisableEventsWhileStreaming]
    RemoteDataAdapter = rda_AlbaranesCliente
    DetailOptions = [dtCascadeOpenClose, dtCascadeApplyUpdates, dtAutoFetch, dtCascadeDelete, dtCascadeUpdate, dtDisableLogOfCascadeDeletes, dtDisableLogOfCascadeUpdates, dtIncludeInAllInOneFetch]
    MasterOptions = [moCascadeOpenClose, moCascadeApplyUpdates, moCascadeDelete, moCascadeUpdate, moDisableLogOfCascadeDeletes, moDisableLogOfCascadeUpdates]
    LogicalName = 'AlbaranesCliente'
    IndexDefs = <>
    Left = 232
    Top = 128
  end
  object ds_AlbaranesCliente: TDADataSource
    DataSet = tbl_AlbaranesCliente.Dataset
    DataTable = tbl_AlbaranesCliente
    Left = 232
    Top = 56
  end
  object tbl_AlbaranesCliente_Detalles: TDAMemDataTable
    RemoteUpdatesOptions = []
    Fields = <
      item
        Name = 'ID'
        DataType = datAutoInc
        GeneratorName = 'GEN_ALBARANES_CLI_DETALLES_ID'
        Required = True
        DictionaryEntry = 'AlbaranesCliente_Detalles_ID'
        InPrimaryKey = True
      end
      item
        Name = 'ID_ALBARAN'
        DataType = datInteger
        DictionaryEntry = 'AlbaranesCliente_Detalles_ID_ALBARAN'
      end
      item
        Name = 'POSICION'
        DataType = datInteger
        DictionaryEntry = 'POSICIONCONCEPTO'
      end
      item
        Name = 'TIPO_DETALLE'
        DataType = datString
        Size = 10
        DictionaryEntry = 'AlbaranesCliente_Detalles_TIPO_DETALLE'
      end
      item
        Name = 'CONCEPTO'
        DataType = datString
        Size = 2000
        DictionaryEntry = 'AlbaranesCliente_Detalles_CONCEPTO'
      end
      item
        Name = 'CANTIDAD'
        DataType = datInteger
        Alignment = taRightJustify
        DictionaryEntry = 'CANTIDAD'
      end
      item
        Name = 'UNIDAD_MEDIDA'
        DataType = datString
        Size = 255
      end
      item
        Name = 'IMPORTE_UNIDAD'
        DataType = datCurrency
        DisplayLabel = 'Importe unidad'
        Alignment = taRightJustify
        DictionaryEntry = 'AlbaranesCliente_Detalles_IMPORTE_UNIDAD'
      end
      item
        Name = 'DESCUENTO'
        DataType = datFloat
        DisplayLabel = 'Descuento'
        DisplayFormat = ',0.00 %;-,0.00 %'
        Alignment = taRightJustify
        DictionaryEntry = 'AlbaranesCliente_Detalles_DESCUENTO'
      end
      item
        Name = 'IMPORTE_PORTE'
        DataType = datCurrency
        DisplayLabel = 'Importe porte'
        Alignment = taRightJustify
        DictionaryEntry = 'AlbaranesCliente_Detalles_IMPORTE_PORTE'
      end
      item
        Name = 'IMPORTE_TOTAL'
        DataType = datCurrency
        DisplayLabel = 'Importe total'
        Alignment = taRightJustify
        DictionaryEntry = 'AlbaranesCliente_Detalles_IMPORTE_TOTAL'
      end
      item
        Name = 'VISIBLE'
        DataType = datInteger
        DictionaryEntry = 'AlbaranesCliente_Detalles_VISIBLE'
      end
      item
        Name = 'ID_ARTICULO'
        DataType = datInteger
        DictionaryEntry = 'AlbaranesCliente_Detalles_ID_ARTICULO'
      end
      item
        Name = 'REFERENCIA'
        DataType = datString
        Size = 255
      end
      item
        Name = 'REFERENCIA_PROVEEDOR'
        DataType = datString
        Size = 255
        DisplayLabel = 'Ref. proveedor'
        DictionaryEntry = 'AlbaranesCliente_Detalles_REFERENCIA_PROVEEDOR'
      end
      item
        Name = 'ID_PEDIDO'
        DataType = datInteger
      end>
    Params = <>
    MasterMappingMode = mmWhere
    StreamingOptions = [soDisableEventsWhileStreaming]
    RemoteDataAdapter = rda_AlbaranesCliente
    MasterSource = ds_AlbaranesCliente
    MasterFields = 'ID'
    DetailFields = 'ID_ALBARAN'
    DetailOptions = [dtCascadeOpenClose, dtCascadeApplyUpdates, dtAutoFetch, dtCascadeDelete, dtCascadeUpdate, dtDisableLogOfCascadeDeletes, dtDisableLogOfCascadeUpdates, dtIncludeInAllInOneFetch]
    MasterOptions = [moCascadeOpenClose, moCascadeApplyUpdates, moCascadeDelete, moCascadeUpdate, moDisableLogOfCascadeDeletes, moDisableLogOfCascadeUpdates]
    LogicalName = 'AlbaranesCliente_Detalles'
    IndexDefs = <>
    Left = 384
    Top = 128
  end
  object ds_AlbaranesCliente_Detalles: TDADataSource
    DataSet = tbl_AlbaranesCliente_Detalles.Dataset
    DataTable = tbl_AlbaranesCliente_Detalles
    Left = 384
    Top = 56
  end
end