ProGestion/Modulos/Contactos/Cliente/uViewContactos.dfm

inherited frViewContactos: TfrViewContactos
  Anchors = [akLeft, akTop]
  inherited cxGrid: TcxGrid
    inherited cxGridView: TcxGridDBTableView
      DataController.KeyFieldNames = 'CODIGO'
      DataController.Summary.FooterSummaryItems = <
        item
          Format = 'Total: 0 contactos'
          Kind = skCount
          Column = cxGridViewNOMBRE
        end>
      OptionsCustomize.ColumnMoving = False
      object cxGridViewRecID: TcxGridDBColumn
        DataBinding.FieldName = 'RecID'
        Visible = False
      end
      object cxGridViewCODIGOEMPRESA: TcxGridDBColumn
        DataBinding.FieldName = 'CODIGOEMPRESA'
        Visible = False
        Width = 20
      end
      object cxGridViewCODIGO: TcxGridDBColumn
        DataBinding.FieldName = 'CODIGO'
        OnCustomDrawCell = cxGridViewCODIGOCustomDrawCell
        Width = 20
        IsCaptionAssigned = True
      end
      object cxGridViewFECHAALTA: TcxGridDBColumn
        DataBinding.FieldName = 'FECHAALTA'
        Visible = False
      end
      object cxGridViewUSUARIO: TcxGridDBColumn
        DataBinding.FieldName = 'USUARIO'
        Visible = False
      end
      object cxGridViewNIFCIF: TcxGridDBColumn
        DataBinding.FieldName = 'NIFCIF'
        Visible = False
      end
      object cxGridViewNOMBRE: TcxGridDBColumn
        DataBinding.FieldName = 'NOMBRE'
        Width = 250
      end
      object cxGridViewCALLE: TcxGridDBColumn
        DataBinding.FieldName = 'CALLE'
        Visible = False
      end
      object cxGridViewPROVINCIA: TcxGridDBColumn
        DataBinding.FieldName = 'PROVINCIA'
        Visible = False
      end
      object cxGridViewCODIGOPOSTAL: TcxGridDBColumn
        DataBinding.FieldName = 'CODIGOPOSTAL'
        Visible = False
      end
      object cxGridViewPOBLACION: TcxGridDBColumn
        DataBinding.FieldName = 'POBLACION'
        Visible = False
      end
      object cxGridViewTELEFONO1: TcxGridDBColumn
        DataBinding.FieldName = 'TELEFONO1'
        Width = 90
      end
      object cxGridViewTELEFONO2: TcxGridDBColumn
        DataBinding.FieldName = 'TELEFONO2'
        Width = 90
      end
      object cxGridViewMOVIL: TcxGridDBColumn
        DataBinding.FieldName = 'MOVIL'
        Width = 90
      end
      object cxGridViewFAX: TcxGridDBColumn
        DataBinding.FieldName = 'FAX'
        Width = 90
      end
      object cxGridViewCORREO1: TcxGridDBColumn
        DataBinding.FieldName = 'CORREO1'
        Visible = False
      end
      object cxGridViewCORREO2: TcxGridDBColumn
        DataBinding.FieldName = 'CORREO2'
        Visible = False
      end
      object cxGridViewPAGINAWEB: TcxGridDBColumn
        DataBinding.FieldName = 'PAGINAWEB'
        Visible = False
      end
      object cxGridViewPUESTO: TcxGridDBColumn
        DataBinding.FieldName = 'PUESTO'
        Visible = False
        Width = 100
      end
      object cxGridViewTRABAJO: TcxGridDBColumn
        Caption = 'Trabajo'
        DataBinding.FieldName = 'TRABAJO'
        Width = 100
      end
      object cxGridViewLISTACATEGORIAS: TcxGridDBColumn
        DataBinding.FieldName = 'LISTACATEGORIAS'
        Visible = False
        Width = 200
      end
      object cxGridViewCATEGORIAS: TcxGridDBColumn
        Caption = 'Categor'#237'a'
        DataBinding.FieldName = 'CATEGORIAS'
        Visible = False
        Width = 100
      end
    end
  end
  inherited ActionList1: TActionList
    object actVistaTodos: TAction
      Caption = 'VistaTodos'
      OnExecute = actVistaTodosExecute
    end
    object actVistaCategorias: TAction
      Caption = 'VistaCategorias'
      OnExecute = actVistaCategoriasExecute
    end
  end
  inherited dxComponentPrinter: TdxComponentPrinter
    inherited dxComponentPrinterLink: TdxGridReportLink
      ReportDocument.CreationDate = 38700.537567430550000000
      BuiltInReportLink = True
    end
  end
  object FContactosMem: TDACDSDataTable
    RemoteUpdatesOptions = []
    Fields = <
      item
        Name = 'CODIGOEMPRESA'
        DataType = datInteger
        BlobType = dabtUnknown
        DisplayWidth = 0
        DisplayLabel = 'Cod. empresa'
        Alignment = taLeftJustify
        DictionaryEntry = 'CODIGOSEMPRESAS'
        InPrimaryKey = False
        Calculated = False
        Lookup = False
        LookupCache = False
      end
      item
        Name = 'CODIGO'
        DataType = datInteger
        BlobType = dabtUnknown
        Required = True
        DisplayWidth = 0
        DisplayLabel = 'C'#243'd. contacto'
        Alignment = taLeftJustify
        InPrimaryKey = True
        Calculated = False
        Lookup = False
        LookupCache = False
      end
      item
        Name = 'FECHAALTA'
        DataType = datDateTime
        BlobType = dabtUnknown
        Required = True
        DisplayWidth = 0
        DisplayLabel = 'Fecha de alta'
        Alignment = taLeftJustify
        DictionaryEntry = 'FECHAALTA'
        InPrimaryKey = False
        Calculated = False
        Lookup = False
        LookupCache = False
      end
      item
        Name = 'USUARIO'
        DataType = datString
        Size = 100
        BlobType = dabtUnknown
        Required = True
        DisplayWidth = 0
        DisplayLabel = 'Usuario de alta'
        Alignment = taLeftJustify
        DictionaryEntry = 'USUARIO'
        InPrimaryKey = False
        Calculated = False
        Lookup = False
        LookupCache = False
      end
      item
        Name = 'NIFCIF'
        DataType = datString
        Size = 10
        BlobType = dabtUnknown
        DisplayWidth = 0
        DisplayLabel = 'NIF/CIF'
        Alignment = taLeftJustify
        DictionaryEntry = 'NIFCIF'
        InPrimaryKey = False
        Calculated = False
        Lookup = False
        LookupCache = False
      end
      item
        Name = 'NOMBRE'
        DataType = datString
        Size = 100
        BlobType = dabtUnknown
        Required = True
        DisplayWidth = 0
        DisplayLabel = 'Nombre'
        Alignment = taLeftJustify
        DictionaryEntry = 'NOMBRE'
        InPrimaryKey = False
        Calculated = False
        Lookup = False
        LookupCache = False
      end
      item
        Name = 'CALLE'
        DataType = datString
        Size = 150
        BlobType = dabtUnknown
        DisplayWidth = 0
        DisplayLabel = 'Calle'
        Alignment = taLeftJustify
        DictionaryEntry = 'CALLE'
        InPrimaryKey = False
        Calculated = False
        Lookup = False
        LookupCache = False
      end
      item
        Name = 'PROVINCIA'
        DataType = datString
        Size = 30
        BlobType = dabtUnknown
        DisplayWidth = 0
        DisplayLabel = 'Provincia'
        Alignment = taLeftJustify
        DictionaryEntry = 'PROVINCIA'
        InPrimaryKey = False
        Calculated = False
        Lookup = False
        LookupCache = False
      end
      item
        Name = 'CODIGOPOSTAL'
        DataType = datString
        Size = 5
        BlobType = dabtUnknown
        DisplayWidth = 0
        DisplayLabel = 'C'#243'd. postal'
        Alignment = taLeftJustify
        DictionaryEntry = 'CODIGOPOSTAL'
        InPrimaryKey = False
        Calculated = False
        Lookup = False
        LookupCache = False
      end
      item
        Name = 'POBLACION'
        DataType = datString
        Size = 40
        BlobType = dabtUnknown
        DisplayWidth = 0
        DisplayLabel = 'Poblaci'#243'n'
        Alignment = taLeftJustify
        DictionaryEntry = 'POBLACION'
        InPrimaryKey = False
        Calculated = False
        Lookup = False
        LookupCache = False
      end
      item
        Name = 'TELEFONO1'
        DataType = datString
        Size = 30
        BlobType = dabtUnknown
        DisplayWidth = 0
        DisplayLabel = 'Tlf. particular'
        Alignment = taLeftJustify
        DictionaryEntry = 'TELEFONOPARTICULAR'
        InPrimaryKey = False
        Calculated = False
        Lookup = False
        LookupCache = False
      end
      item
        Name = 'TELEFONO2'
        DataType = datString
        Size = 30
        BlobType = dabtUnknown
        DisplayWidth = 0
        DisplayLabel = 'Tlf. trabajo'
        Alignment = taLeftJustify
        DictionaryEntry = 'TELEFONOTRABAJO'
        InPrimaryKey = False
        Calculated = False
        Lookup = False
        LookupCache = False
      end
      item
        Name = 'MOVIL'
        DataType = datString
        Size = 30
        BlobType = dabtUnknown
        DisplayWidth = 0
        DisplayLabel = 'M'#243'vil'
        Alignment = taLeftJustify
        DictionaryEntry = 'MOVIL'
        InPrimaryKey = False
        Calculated = False
        Lookup = False
        LookupCache = False
      end
      item
        Name = 'FAX'
        DataType = datString
        Size = 30
        BlobType = dabtUnknown
        DisplayWidth = 0
        DisplayLabel = 'Fax'
        Alignment = taLeftJustify
        DictionaryEntry = 'FAX'
        InPrimaryKey = False
        Calculated = False
        Lookup = False
        LookupCache = False
      end
      item
        Name = 'CORREO1'
        DataType = datString
        Size = 60
        BlobType = dabtUnknown
        DisplayWidth = 0
        DisplayLabel = 'E-mail'
        Alignment = taLeftJustify
        DictionaryEntry = 'CORREO1'
        InPrimaryKey = False
        Calculated = False
        Lookup = False
        LookupCache = False
      end
      item
        Name = 'CORREO2'
        DataType = datString
        Size = 60
        BlobType = dabtUnknown
        DisplayWidth = 0
        DisplayLabel = 'E-mail'
        Alignment = taLeftJustify
        DictionaryEntry = 'CORREO2'
        InPrimaryKey = False
        Calculated = False
        Lookup = False
        LookupCache = False
      end
      item
        Name = 'PAGINAWEB'
        DataType = datString
        Size = 100
        BlobType = dabtUnknown
        DisplayWidth = 0
        DisplayLabel = 'P'#225'gina web'
        Alignment = taLeftJustify
        DictionaryEntry = 'PAGINAWEB'
        InPrimaryKey = False
        Calculated = False
        Lookup = False
        LookupCache = False
      end
      item
        Name = 'PUESTO'
        DataType = datString
        Size = 100
        BlobType = dabtUnknown
        DisplayWidth = 0
        DisplayLabel = 'Puesto'
        Alignment = taLeftJustify
        DictionaryEntry = 'PUESTO'
        InPrimaryKey = False
        Calculated = False
        Lookup = False
        LookupCache = False
      end
      item
        Name = 'TRABAJO'
        DataType = datString
        Size = 300
        BlobType = dabtUnknown
        DisplayWidth = 0
        DisplayLabel = 'Trabajo'
        Alignment = taLeftJustify
        DictionaryEntry = 'TRABAJO'
        InPrimaryKey = False
        Calculated = False
        Lookup = False
        LookupCache = False
      end
      item
        Name = 'DATOSFACTURACION'
        DataType = datString
        Size = 2000
        BlobType = dabtUnknown
        DisplayWidth = 0
        Alignment = taLeftJustify
        InPrimaryKey = False
        Calculated = False
        Lookup = False
        LookupCache = False
      end
      item
        Name = 'DATOSBANCARIOS'
        DataType = datString
        Size = 2000
        BlobType = dabtUnknown
        DisplayWidth = 0
        Alignment = taLeftJustify
        InPrimaryKey = False
        Calculated = False
        Lookup = False
        LookupCache = False
      end
      item
        Name = 'LISTACATEGORIAS'
        DataType = datString
        Size = 1000
        BlobType = dabtUnknown
        DisplayWidth = 0
        Alignment = taLeftJustify
        InPrimaryKey = False
        Calculated = False
        Lookup = False
        LookupCache = False
      end
      item
        Name = 'CATEGORIAS'
        DataType = datString
        Size = 100
        BlobType = dabtUnknown
        DisplayWidth = 0
        Alignment = taLeftJustify
        InPrimaryKey = True
        Calculated = False
        Lookup = False
        LookupCache = False
      end>
    Params = <>
    MasterMappingMode = mmDataRequest
    LogChanges = False
    StreamingOptions = [soDisableEventsWhileStreaming]
    RemoteFetchEnabled = False
    SchemaCall.MethodName = 'GetDatasetSchema'
    SchemaCall.Params = <
      item
        Name = 'Result'
        ParamType = fResult
        DataType = rtBinary
      end
      item
        Name = 'aDatasetName'
        ParamType = fIn
        DataType = rtString
        Value = 'CONTACTOS'
      end>
    DataRequestCall.Params = <>
    DataUpdateCall.Params = <>
    ScriptCall.MethodName = 'GetDatasetScripts'
    ScriptCall.Params = <
      item
        Name = 'Result'
        ParamType = fResult
        DataType = rtString
        Value = ''
      end
      item
        Name = 'DatasetNames'
        ParamType = fIn
        DataType = rtString
        Value = 'CONTACTOS'
      end>
    ReadOnly = False
    DetailOptions = [dtCascadeOpenClose, dtCascadeApplyUpdates, dtAutoFetch, dtCascadeDelete, dtCascadeUpdate, dtDisableLogOfCascadeDeletes, dtDisableLogOfCascadeUpdates, dtIncludeInAllInOneFetch]
    MasterOptions = [moCascadeOpenClose, moCascadeApplyUpdates, moCascadeDelete, moCascadeUpdate, moDisableLogOfCascadeDeletes, moDisableLogOfCascadeUpdates]
    IndexDefs = <>
    Left = 400
    Top = 96
  end
  object PngImageList: TPngImageList
    PngImages = <
      item
        PngImage.Data = {
          89504E470D0A1A0A0000000D49484452000000100000001008060000001FF3FF
          610000000970485973000017120000171201679FD252000001EC4944415478DA
          A5934B6813511486BF541B88CD26620DA262A51BDB8520158308D5852055B01B
          A3E8CEBD2E7CE063512852D09D2E82E04604AB1B5D4451B059D8A6010D84D842
          5B6B6B1A8D414A4C9B18EB4C27F3F466D41943ED4233309C3BDC39DFFFDF9F7B
          3C9665D1C8E379323CD510C1061C3DD0697F48C531BEE7A7EDB57F6B072DADBB
          9C1F4DE154D74D34DD70DE43272FB9805AF3975484E56F1A856289C2D23CFB4F
          44D8D4BE17DD30B932A8D629B7358D70F7C1D39F8023FBB6917B35C0D78F590C
          43EC5A06954A8505A5C4B1CB2947F14F07D158D205F48436F03E761E640FEB7C
          3ED660204B3263B9597A2F24ED866B8F59DD414F28C8E7443FDE6A55A883AAA9
          28F232F3FA7ABA8EDFAC53FEBD1E1A4DBB805A0685370F91E65E0880084BD358
          9255CCB65EDAF784571E413378F97ABC1E90C8C6C88EDC6687E9150EAAA415D8
          BCFB14DD9D875734D76A2235E102B674A85C1CEEA3B498E374F020A666727F21
          4E662ECFDBAB19BBB9EFD6B3BA0C423B37BA80A4F188E733A32881327EA91991
          22924FA7B9E427373B45FADCB4A3ACFD72929E78E702EE1506C8E68B18AD0AEA
          5A595C2F44A02D3495BD7CF8344EF2CC24D7EFC4567770361EA65C2EFCF5AA06
          0241A2E1215BD5302DBB9AA24ECE645C4077D77606A3F17F9E0307D07F23F2FF
          C3D4E838FF008E7263BE13CA147C0000000049454E44AE426082}
        Name = 'PngImage5'
        Background = clWindow
      end>
    PngOptions = [pngBlendOnDisabled, pngGrayscaleOnDisabled]
    Left = 308
    Top = 16
    Bitmap = {}
  end
end