Tecsitel_FactuGES2/Source/Modulos/Albaranes de proveedor/Data/uDataModuleAlbaranesProveedor.dfm

inherited DataModuleAlbaranesProveedor: TDataModuleAlbaranesProveedor
  OnCreate = DAClientDataModuleCreate
  Height = 365
  Width = 462
  object RORemoteService: TRORemoteService
    Message = dmConexion.ROMessage
    Channel = dmConexion.ROChannel
    ServiceName = 'srvAlbaranesProveedor'
    Left = 48
    Top = 32
  end
  object Bin2DataStreamer: TDABin2DataStreamer
    Left = 48
    Top = 92
  end
  object rda_AlbaranesProveedor: TDARemoteDataAdapter
    DataStreamer = Bin2DataStreamer
    GetSchemaCall.RemoteService = RORemoteService
    GetDataCall.RemoteService = RORemoteService
    UpdateDataCall.RemoteService = RORemoteService
    GetScriptsCall.RemoteService = RORemoteService
    RemoteService = RORemoteService
    Left = 51
    Top = 151
  end
  object tbl_AlbaranesProveedor: TDAMemDataTable
    RemoteUpdatesOptions = []
    Fields = <
      item
        Name = 'ID'
        DataType = datAutoInc
        GeneratorName = 'GEN_ALBARANES_PRO_ID'
        Required = True
        ServerAutoRefresh = True
        DictionaryEntry = 'AlbaranesProveedor_ID'
        InPrimaryKey = True
      end
      item
        Name = 'ID_EMPRESA'
        DataType = datInteger
        DictionaryEntry = 'AlbaranesProveedor_ID_EMPRESA'
      end
      item
        Name = 'ID_PROVEEDOR'
        DataType = datInteger
        DictionaryEntry = 'AlbaranesProveedor_ID_PROVEEDOR'
      end
      item
        Name = 'NOMBRE'
        DataType = datString
        Size = 255
        DisplayLabel = 'Proveedor'
        ServerAutoRefresh = True
        DictionaryEntry = 'AlbaranesProveedor_NOMBRE'
      end
      item
        Name = 'ID_DIRECCION'
        DataType = datInteger
        DictionaryEntry = 'AlbaranesProveedor_ID_DIRECCION'
      end
      item
        Name = 'PERSONA_CONTACTO_PROV'
        DataType = datString
        Size = 255
        DisplayLabel = 'Contacto del proveedor'
        DictionaryEntry = 'AlbaranesProveedor_PERSONA_CONTACTO_PROV'
      end
      item
        Name = 'FECHA_ALBARAN'
        DataType = datDateTime
        DisplayLabel = 'Fecha albar'#225'n'
        DictionaryEntry = 'AlbaranesProveedor_FECHA_ALBARAN'
      end
      item
        Name = 'REFERENCIA'
        DataType = datString
        Size = 255
        DisplayLabel = 'Referencia'
        DictionaryEntry = 'AlbaranesProveedor_REFERENCIA'
      end
      item
        Name = 'REFERENCIA_PROVEEDOR'
        DataType = datString
        Size = 255
        DisplayLabel = 'Ref. provedor'
        DictionaryEntry = 'AlbaranesProveedor_REFERENCIA_PROVEEDOR'
      end
      item
        Name = 'TIPO'
        DataType = datString
        Size = 1
        DisplayLabel = 'Tipo'
        DictionaryEntry = 'AlbaranesProveedor_TIPO'
      end
      item
        Name = 'ID_ALMACEN'
        DataType = datInteger
        DictionaryEntry = 'AlbaranesProveedor_ID_ALMACEN'
      end
      item
        Name = 'TIPO_ALMACEN'
        DataType = datString
        Size = 10
        DisplayLabel = 'AlbaranesProveedor_TIPO_ALMACEN'
        ServerAutoRefresh = True
        DictionaryEntry = 'AlbaranesProveedor_TIPO_ALMACEN'
      end
      item
        Name = 'NOMBRE_ALMACEN'
        DataType = datString
        Size = 255
        DisplayLabel = 'Almac'#233'n'
        ServerAutoRefresh = True
        DictionaryEntry = 'AlbaranesProveedor_NOMBRE_ALMACEN'
      end
      item
        Name = 'ID_PEDIDO'
        DataType = datInteger
        DictionaryEntry = 'AlbaranesProveedor_ID_PEDIDO'
      end
      item
        Name = 'REF_PED_PROVEEDOR'
        DataType = datString
        Size = 255
        DisplayLabel = 'Ped. proveedor'
        ServerAutoRefresh = True
        DictionaryEntry = 'AlbaranesProveedor_REF_PED_PROVEEDOR'
      end
      item
        Name = 'ID_FACTURA'
        DataType = datInteger
        DictionaryEntry = 'AlbaranesProveedor_ID_FACTURA'
      end
      item
        Name = 'REF_FACTURA'
        DataType = datString
        Size = 255
        DisplayLabel = 'Referencia factura'
        DictionaryEntry = 'AlbaranesProveedor_REF_FACTURA'
      end
      item
        Name = 'REF_FACTURA_PROV'
        DataType = datString
        Size = 255
        DisplayLabel = 'Ref. factura prov'
        ServerAutoRefresh = True
        DictionaryEntry = 'AlbaranesProveedor_REF_FACTURA_PROV'
      end
      item
        Name = 'CALLE'
        DataType = datString
        Size = 255
        DisplayLabel = 'Calle'
        DictionaryEntry = 'AlbaranesProveedor_CALLE'
      end
      item
        Name = 'CODIGO_POSTAL'
        DataType = datString
        Size = 10
        DisplayLabel = 'C'#243'd. postal'
        DictionaryEntry = 'AlbaranesProveedor_CODIGO_POSTAL'
      end
      item
        Name = 'POBLACION'
        DataType = datString
        Size = 255
        DisplayLabel = 'Poblaci'#243'n'
        DictionaryEntry = 'AlbaranesProveedor_POBLACION'
      end
      item
        Name = 'PROVINCIA'
        DataType = datString
        Size = 255
        DisplayLabel = 'Provincia'
        DictionaryEntry = 'AlbaranesProveedor_PROVINCIA'
      end
      item
        Name = 'PERSONA_CONTACTO'
        DataType = datString
        Size = 255
        DisplayLabel = 'Persona de contacto'
        DictionaryEntry = 'AlbaranesProveedor_PERSONA_CONTACTO'
      end
      item
        Name = 'TELEFONO'
        DataType = datString
        Size = 25
        DisplayLabel = 'Tel'#233'fono'
        DictionaryEntry = 'AlbaranesProveedor_TELEFONO'
      end
      item
        Name = 'IMPORTE_NETO'
        DataType = datCurrency
        DisplayLabel = 'Importe neto'
        Alignment = taRightJustify
        DictionaryEntry = 'AlbaranesProveedor_IMPORTE_NETO'
      end
      item
        Name = 'IMPORTE_PORTE'
        DataType = datCurrency
        DisplayLabel = 'Importe del porte'
        Alignment = taRightJustify
        DictionaryEntry = 'AlbaranesProveedor_IMPORTE_PORTE'
      end
      item
        Name = 'DESCUENTO'
        DataType = datFloat
        DisplayLabel = 'Descuento'
        DisplayFormat = ',0.00 %;-,0.00 %'
        Alignment = taRightJustify
        DictionaryEntry = 'AlbaranesProveedor_DESCUENTO'
      end
      item
        Name = 'IMPORTE_DESCUENTO'
        DataType = datCurrency
        DisplayLabel = 'Importe dto.'
        Alignment = taRightJustify
        DictionaryEntry = 'AlbaranesProveedor_IMPORTE_DESCUENTO'
      end
      item
        Name = 'BASE_IMPONIBLE'
        DataType = datCurrency
        DisplayLabel = 'Base imponible'
        Alignment = taRightJustify
        DictionaryEntry = 'AlbaranesProveedor_BASE_IMPONIBLE'
      end
      item
        Name = 'IVA'
        DataType = datFloat
        DisplayFormat = ',0.00 %;-,0.00 %'
        Alignment = taRightJustify
        ServerAutoRefresh = True
        DictionaryEntry = 'AlbaranesProveedor_IVA'
      end
      item
        Name = 'IMPORTE_IVA'
        DataType = datCurrency
        DisplayLabel = 'Importe IVA'
        Alignment = taRightJustify
        DictionaryEntry = 'AlbaranesProveedor_IMPORTE_IVA'
      end
      item
        Name = 'IMPORTE_TOTAL'
        DataType = datCurrency
        DisplayLabel = 'Importe total'
        Alignment = taRightJustify
        DictionaryEntry = 'AlbaranesProveedor_IMPORTE_TOTAL'
      end
      item
        Name = 'OBSERVACIONES'
        DataType = datMemo
        DisplayLabel = 'Observaciones'
        DictionaryEntry = 'AlbaranesProveedor_OBSERVACIONES'
      end
      item
        Name = 'INCIDENCIAS'
        DataType = datMemo
        DictionaryEntry = 'AlbaranesProveedor_INCIDENCIAS'
      end
      item
        Name = 'INCIDENCIAS_ACTIVAS'
        DataType = datInteger
        DictionaryEntry = 'AlbaranesProveedor_INCIDENCIAS_ACTIVAS'
      end
      item
        Name = 'FECHA_ALTA'
        DataType = datDateTime
        DictionaryEntry = 'AlbaranesProveedor_FECHA_ALTA'
      end
      item
        Name = 'FECHA_MODIFICACION'
        DataType = datDateTime
        DictionaryEntry = 'AlbaranesProveedor_FECHA_MODIFICACION'
      end
      item
        Name = 'USUARIO'
        DataType = datString
        Size = 20
        DictionaryEntry = 'AlbaranesProveedor_USUARIO'
      end
      item
        Name = 'ID_FORMA_PAGO'
        DataType = datInteger
        DictionaryEntry = 'AlbaranesProveedor_ID_FORMA_PAGO'
      end
      item
        Name = 'ID_ALBARAN'
        DataType = datInteger
        DisplayLabel = 'AlbaranesProveedor_ID_ALBARAN'
        DictionaryEntry = 'AlbaranesProveedor_ID_ALBARAN'
      end
      item
        Name = 'REFERENCIA_ALBARAN'
        DataType = datString
        Size = 255
        DisplayLabel = 'AlbaranesProveedor_REFERENCIA_ALBARAN'
        ServerAutoRefresh = True
        DictionaryEntry = 'AlbaranesProveedor_REFERENCIA_ALBARAN'
      end>
    Params = <>
    StreamingOptions = [soDisableEventsWhileStreaming]
    RemoteDataAdapter = rda_AlbaranesProveedor
    LogicalName = 'AlbaranesProveedor'
    IndexDefs = <>
    Left = 168
    Top = 104
  end
  object ds_AlbaranesProveedor: TDADataSource
    DataSet = tbl_AlbaranesProveedor.Dataset
    DataTable = tbl_AlbaranesProveedor
    Left = 168
    Top = 40
  end
  object tbl_AlbaranesProveedor_Detalles: TDAMemDataTable
    RemoteUpdatesOptions = []
    Fields = <
      item
        Name = 'ID'
        DataType = datAutoInc
        GeneratorName = 'GEN_ALBARANES_PRO_DETALLES_ID'
        Required = True
        ServerAutoRefresh = True
        DictionaryEntry = 'AlbaranesProveedor_Detalles_ID'
        InPrimaryKey = True
      end
      item
        Name = 'ID_ALBARAN'
        DataType = datInteger
        DictionaryEntry = 'AlbaranesProveedor_Detalles_ID_ALBARAN'
      end
      item
        Name = 'POSICION'
        DataType = datInteger
        DictionaryEntry = 'POSICIONCONCEPTO'
      end
      item
        Name = 'TIPO_DETALLE'
        DataType = datString
        Size = 25
        DictionaryEntry = 'AlbaranesProveedor_Detalles_TIPO_DETALLE'
      end
      item
        Name = 'CONCEPTO'
        DataType = datString
        Size = 2000
        DictionaryEntry = 'AlbaranesProveedor_Detalles_CONCEPTO'
      end
      item
        Name = 'CANTIDAD'
        DataType = datFloat
        DictionaryEntry = 'CANTIDAD'
      end
      item
        Name = 'UNIDAD_MEDIDA'
        DataType = datString
        Size = 255
      end
      item
        Name = 'IMPORTE_UNIDAD'
        DataType = datCurrency
        DisplayLabel = 'Importe unidad'
        Alignment = taRightJustify
        DictionaryEntry = 'AlbaranesProveedor_Detalles_IMPORTE_UNIDAD'
      end
      item
        Name = 'IMPORTE_TOTAL'
        DataType = datCurrency
        DisplayLabel = 'Importe total'
        Alignment = taRightJustify
        DictionaryEntry = 'AlbaranesProveedor_Detalles_IMPORTE_TOTAL'
      end
      item
        Name = 'VISIBLE'
        DataType = datInteger
        DictionaryEntry = 'AlbaranesProveedor_Detalles_VISIBLE'
      end
      item
        Name = 'ID_ARTICULO'
        DataType = datInteger
        DictionaryEntry = 'AlbaranesProveedor_Detalles_ID_ARTICULO'
      end
      item
        Name = 'DESCUENTO'
        DataType = datFloat
        DisplayLabel = 'Descuento'
        DisplayFormat = ',0.00 %;-,0.00 %'
        Alignment = taRightJustify
        DictionaryEntry = 'AlbaranesProveedor_Detalles_DESCUENTO'
      end
      item
        Name = 'IMPORTE_PORTE'
        DataType = datCurrency
        DisplayLabel = 'Importe porte'
        Alignment = taRightJustify
        DictionaryEntry = 'AlbaranesProveedor_Detalles_IMPORTE_PORTE'
      end
      item
        Name = 'REFERENCIA'
        DataType = datString
        Size = 255
        DisplayLabel = 'Referencia'
        DictionaryEntry = 'AlbaranesProveedor_Detalles_REFERENCIA'
      end
      item
        Name = 'REFERENCIA_PROVEEDOR'
        DataType = datString
        Size = 255
        DisplayLabel = 'Ref. proveedor'
        DictionaryEntry = 'AlbaranesProveedor_Detalles_REFERENCIA_PROVEEDOR'
      end
      item
        Name = 'ID_PEDIDO'
        DataType = datInteger
      end
      item
        Name = 'REFERENCIA_FABRICANTE'
        DataType = datString
        Size = 255
      end>
    Params = <>
    MasterMappingMode = mmWhere
    StreamingOptions = [soDisableEventsWhileStreaming]
    RemoteDataAdapter = rda_AlbaranesProveedor
    MasterSource = ds_AlbaranesProveedor
    MasterFields = 'ID'
    DetailFields = 'ID_ALBARAN'
    LogicalName = 'AlbaranesProveedor_Detalles'
    IndexDefs = <>
    Left = 328
    Top = 104
  end
  object ds_AlbaranesProveedor_Detalles: TDADataSource
    DataSet = tbl_AlbaranesProveedor_Detalles.Dataset
    DataTable = tbl_AlbaranesProveedor_Detalles
    Left = 328
    Top = 40
  end
  object tbl_ListaAnosAlbaranes: TDAMemDataTable
    RemoteUpdatesOptions = []
    Fields = <
      item
        Name = 'ANO'
        DataType = datString
        Size = 254
      end>
    Params = <>
    StreamingOptions = [soDisableEventsWhileStreaming]
    RemoteDataAdapter = rda_AlbaranesProveedor
    LogicalName = 'ListaAnosAlbaranes'
    IndexDefs = <>
    Left = 168
    Top = 224
  end
  object ds_ListaAnosAlbaranes: TDADataSource
    DataSet = tbl_ListaAnosAlbaranes.Dataset
    DataTable = tbl_ListaAnosAlbaranes
    Left = 168
    Top = 168
  end
end