Tecsitel_FactuGES2/Source/Modulos/Empresas/Data/uDataModuleEmpresas.dfm

231 lines
5.7 KiB
Plaintext

object DataModuleEmpresas: TDataModuleEmpresas
OldCreateOrder = True
OnCreate = DAClientDataModuleCreate
Height = 267
Width = 402
object RORemoteService: TRORemoteService
Message = dmConexion.ROMessage
Channel = dmConexion.ROChannel
ServiceName = 'srvEmpresas'
Left = 48
Top = 24
end
object rda_Empresas: TDARemoteDataAdapter
GetSchemaCall.RemoteService = RORemoteService
GetDataCall.RemoteService = RORemoteService
UpdateDataCall.RemoteService = RORemoteService
GetScriptsCall.RemoteService = RORemoteService
RemoteService = RORemoteService
DataStreamer = Bin2DataStreamer
Left = 176
Top = 24
end
object Bin2DataStreamer: TDABin2DataStreamer
Left = 48
Top = 96
end
object tbl_Empresas: TDAMemDataTable
RemoteUpdatesOptions = []
Fields = <
item
Name = 'ID'
DataType = datInteger
LogChanges = False
Required = True
ReadOnly = True
InPrimaryKey = True
end
item
Name = 'NIF_CIF'
DataType = datString
Size = 15
end
item
Name = 'NOMBRE'
DataType = datString
Size = 255
end
item
Name = 'RAZON_SOCIAL'
DataType = datString
Size = 255
end
item
Name = 'CALLE'
DataType = datString
Size = 255
end
item
Name = 'POBLACION'
DataType = datString
Size = 255
end
item
Name = 'PROVINCIA'
DataType = datString
Size = 255
end
item
Name = 'CODIGO_POSTAL'
DataType = datString
Size = 10
end
item
Name = 'TELEFONO_1'
DataType = datString
Size = 25
end
item
Name = 'TELEFONO_2'
DataType = datString
Size = 25
end
item
Name = 'MOVIL_1'
DataType = datString
Size = 25
end
item
Name = 'MOVIL_2'
DataType = datString
Size = 25
end
item
Name = 'FAX'
DataType = datString
Size = 25
end
item
Name = 'EMAIL_1'
DataType = datString
Size = 255
end
item
Name = 'EMAIL_2'
DataType = datString
Size = 255
end
item
Name = 'PAGINA_WEB'
DataType = datString
Size = 255
end
item
Name = 'NOTAS'
DataType = datMemo
end
item
Name = 'FECHA_ALTA'
DataType = datDateTime
end
item
Name = 'FECHA_MODIFICACION'
DataType = datDateTime
end
item
Name = 'USUARIO'
DataType = datString
Size = 20
end
item
Name = 'LOGOTIPO'
DataType = datBlob
end
item
Name = 'REGISTRO_MERCANTIL'
DataType = datString
Size = 255
end
item
Name = 'IVA'
DataType = datFloat
end>
Params = <>
StreamingOptions = [soDisableEventsWhileStreaming]
RemoteDataAdapter = rda_Empresas
DetailOptions = [dtCascadeOpenClose, dtCascadeApplyUpdates, dtAutoFetch, dtCascadeDelete, dtCascadeUpdate, dtDisableLogOfCascadeDeletes, dtDisableLogOfCascadeUpdates, dtIncludeInAllInOneFetch]
MasterOptions = [moCascadeOpenClose, moCascadeApplyUpdates, moCascadeDelete, moCascadeUpdate, moDisableLogOfCascadeDeletes, moDisableLogOfCascadeUpdates]
LogicalName = 'Empresas'
Left = 176
Top = 96
end
object ds_Empresas: TDADataSource
DataSet = tbl_Empresas.Dataset
DataTable = tbl_Empresas
Left = 176
Top = 168
end
object tbl_EmpresasDatosBanco: TDAMemDataTable
RemoteUpdatesOptions = []
Fields = <
item
Name = 'ID'
DataType = datInteger
LogChanges = False
Required = True
ReadOnly = True
InPrimaryKey = True
end
item
Name = 'ID_EMPRESA'
DataType = datInteger
LogChanges = False
Required = True
ReadOnly = True
end
item
Name = 'NOMBRE'
DataType = datString
Size = 255
end
item
Name = 'ENTIDAD'
DataType = datString
Size = 15
end
item
Name = 'SUCURSAL'
DataType = datString
Size = 15
end
item
Name = 'DC'
DataType = datString
Size = 15
end
item
Name = 'CUENTA'
DataType = datString
Size = 15
end
item
Name = 'SUFIJO_N19'
DataType = datString
Size = 3
end
item
Name = 'SUFIJO_N58'
DataType = datString
Size = 3
end>
Params = <>
MasterMappingMode = mmWhere
StreamingOptions = [soDisableEventsWhileStreaming]
RemoteDataAdapter = rda_Empresas
MasterSource = ds_Empresas
MasterFields = 'ID'
DetailFields = 'ID_EMPRESA'
DetailOptions = [dtCascadeOpenClose, dtCascadeApplyUpdates, dtAutoFetch, dtCascadeDelete, dtCascadeUpdate, dtDisableLogOfCascadeDeletes, dtDisableLogOfCascadeUpdates, dtIncludeInAllInOneFetch]
MasterOptions = [moCascadeOpenClose, moCascadeApplyUpdates, moCascadeDelete, moCascadeUpdate, moDisableLogOfCascadeDeletes, moDisableLogOfCascadeUpdates]
LogicalName = 'EmpresasDatosBanco'
Left = 288
Top = 96
end
object ds_EmpresasDatosBanco: TDADataSource
DataSet = tbl_EmpresasDatosBanco.Dataset
DataTable = tbl_EmpresasDatosBanco
Left = 288
Top = 168
end
end