david
12013bdc69
git-svn-id: https://192.168.0.254/svn/Proyectos.ConstruccionesCNJ_FactuGES/trunk@4 6cb6b671-b4a0-dd4c-8bdc-3006503d97e9
670 lines
19 KiB
Plaintext
670 lines
19 KiB
Plaintext
object srvEmpresas: TsrvEmpresas
|
|
OldCreateOrder = True
|
|
OnCreate = DARemoteServiceCreate
|
|
RequiresSession = True
|
|
AcquireConnection = True
|
|
ConnectionName = 'IBX'
|
|
ServiceSchema = schEmpresas
|
|
ServiceAdapter = BINAdapter
|
|
OnBeforeAcquireConnection = DARemoteServiceBeforeAcquireConnection
|
|
OnBeforeGetDatasetData = DARemoteServiceBeforeGetDatasetData
|
|
Height = 300
|
|
Width = 300
|
|
object schEmpresas: TDASchema
|
|
ConnectionManager = dmServer.ConnectionManager
|
|
DataDictionary = DataDictionary
|
|
Diagrams = Diagrams
|
|
Datasets = <
|
|
item
|
|
Params = <>
|
|
Statements = <
|
|
item
|
|
Connection = 'IBX'
|
|
TargetTable = 'EMPRESAS'
|
|
SQL =
|
|
'SELECT'#10' ID, NIF_CIF, NOMBRE, RAZON_SOCIAL, CALLE, POBLACION, ' +
|
|
#10' PROVINCIA, CODIGO_POSTAL, TELEFONO_1, TELEFONO_2, MOVIL_1, ' +
|
|
#10' MOVIL_2, FAX, EMAIL_1, EMAIL_2, PAGINA_WEB, NOTAS, '#10' FEC' +
|
|
'HA_ALTA, FECHA_MODIFICACION, USUARIO, LOGOTIPO,'#10' REGISTRO_MER' +
|
|
'CANTIL, IVA'#10' FROM'#10' EMPRESAS'
|
|
StatementType = stSQL
|
|
ColumnMappings = <
|
|
item
|
|
DatasetField = 'ID'
|
|
TableField = 'ID'
|
|
end
|
|
item
|
|
DatasetField = 'NIF_CIF'
|
|
TableField = 'NIF_CIF'
|
|
end
|
|
item
|
|
DatasetField = 'NOMBRE'
|
|
TableField = 'NOMBRE'
|
|
end
|
|
item
|
|
DatasetField = 'RAZON_SOCIAL'
|
|
TableField = 'RAZON_SOCIAL'
|
|
end
|
|
item
|
|
DatasetField = 'CALLE'
|
|
TableField = 'CALLE'
|
|
end
|
|
item
|
|
DatasetField = 'POBLACION'
|
|
TableField = 'POBLACION'
|
|
end
|
|
item
|
|
DatasetField = 'PROVINCIA'
|
|
TableField = 'PROVINCIA'
|
|
end
|
|
item
|
|
DatasetField = 'CODIGO_POSTAL'
|
|
TableField = 'CODIGO_POSTAL'
|
|
end
|
|
item
|
|
DatasetField = 'TELEFONO_1'
|
|
TableField = 'TELEFONO_1'
|
|
end
|
|
item
|
|
DatasetField = 'TELEFONO_2'
|
|
TableField = 'TELEFONO_2'
|
|
end
|
|
item
|
|
DatasetField = 'MOVIL_1'
|
|
TableField = 'MOVIL_1'
|
|
end
|
|
item
|
|
DatasetField = 'MOVIL_2'
|
|
TableField = 'MOVIL_2'
|
|
end
|
|
item
|
|
DatasetField = 'FAX'
|
|
TableField = 'FAX'
|
|
end
|
|
item
|
|
DatasetField = 'EMAIL_1'
|
|
TableField = 'EMAIL_1'
|
|
end
|
|
item
|
|
DatasetField = 'EMAIL_2'
|
|
TableField = 'EMAIL_2'
|
|
end
|
|
item
|
|
DatasetField = 'PAGINA_WEB'
|
|
TableField = 'PAGINA_WEB'
|
|
end
|
|
item
|
|
DatasetField = 'NOTAS'
|
|
TableField = 'NOTAS'
|
|
end
|
|
item
|
|
DatasetField = 'FECHA_ALTA'
|
|
TableField = 'FECHA_ALTA'
|
|
end
|
|
item
|
|
DatasetField = 'FECHA_MODIFICACION'
|
|
TableField = 'FECHA_MODIFICACION'
|
|
end
|
|
item
|
|
DatasetField = 'USUARIO'
|
|
TableField = 'USUARIO'
|
|
end
|
|
item
|
|
DatasetField = 'LOGOTIPO'
|
|
TableField = 'LOGOTIPO'
|
|
end
|
|
item
|
|
DatasetField = 'REGISTRO_MERCANTIL'
|
|
TableField = 'REGISTRO_MERCANTIL'
|
|
end
|
|
item
|
|
DatasetField = 'IVA'
|
|
TableField = 'IVA'
|
|
end>
|
|
end>
|
|
Name = 'Empresas'
|
|
Fields = <
|
|
item
|
|
Name = 'ID'
|
|
DataType = datInteger
|
|
BlobType = dabtUnknown
|
|
DictionaryEntry = 'Empresas_ID'
|
|
InPrimaryKey = True
|
|
Calculated = False
|
|
Lookup = False
|
|
LookupCache = False
|
|
end
|
|
item
|
|
Name = 'NIF_CIF'
|
|
DataType = datString
|
|
Size = 15
|
|
BlobType = dabtUnknown
|
|
DictionaryEntry = 'Empresas_NIF_CIF'
|
|
InPrimaryKey = False
|
|
Calculated = False
|
|
Lookup = False
|
|
LookupCache = False
|
|
end
|
|
item
|
|
Name = 'NOMBRE'
|
|
DataType = datString
|
|
Size = 255
|
|
BlobType = dabtUnknown
|
|
DictionaryEntry = 'Empresas_NOMBRE'
|
|
InPrimaryKey = False
|
|
Calculated = False
|
|
Lookup = False
|
|
LookupCache = False
|
|
end
|
|
item
|
|
Name = 'RAZON_SOCIAL'
|
|
DataType = datString
|
|
Size = 255
|
|
BlobType = dabtUnknown
|
|
DictionaryEntry = 'Empresas_RAZON_SOCIAL'
|
|
InPrimaryKey = False
|
|
Calculated = False
|
|
Lookup = False
|
|
LookupCache = False
|
|
end
|
|
item
|
|
Name = 'CALLE'
|
|
DataType = datString
|
|
Size = 255
|
|
BlobType = dabtUnknown
|
|
DictionaryEntry = 'Empresas_CALLE'
|
|
InPrimaryKey = False
|
|
Calculated = False
|
|
Lookup = False
|
|
LookupCache = False
|
|
end
|
|
item
|
|
Name = 'POBLACION'
|
|
DataType = datString
|
|
Size = 255
|
|
BlobType = dabtUnknown
|
|
DictionaryEntry = 'Empresas_POBLACION'
|
|
InPrimaryKey = False
|
|
Calculated = False
|
|
Lookup = False
|
|
LookupCache = False
|
|
end
|
|
item
|
|
Name = 'PROVINCIA'
|
|
DataType = datString
|
|
Size = 255
|
|
BlobType = dabtUnknown
|
|
DictionaryEntry = 'Empresas_PROVINCIA'
|
|
InPrimaryKey = False
|
|
Calculated = False
|
|
Lookup = False
|
|
LookupCache = False
|
|
end
|
|
item
|
|
Name = 'CODIGO_POSTAL'
|
|
DataType = datString
|
|
Size = 10
|
|
BlobType = dabtUnknown
|
|
DictionaryEntry = 'Empresas_CODIGO_POSTAL'
|
|
InPrimaryKey = False
|
|
Calculated = False
|
|
Lookup = False
|
|
LookupCache = False
|
|
end
|
|
item
|
|
Name = 'TELEFONO_1'
|
|
DataType = datString
|
|
Size = 25
|
|
BlobType = dabtUnknown
|
|
DictionaryEntry = 'Empresas_TELEFONO_1'
|
|
InPrimaryKey = False
|
|
Calculated = False
|
|
Lookup = False
|
|
LookupCache = False
|
|
end
|
|
item
|
|
Name = 'TELEFONO_2'
|
|
DataType = datString
|
|
Size = 25
|
|
BlobType = dabtUnknown
|
|
DictionaryEntry = 'Empresas_TELEFONO_2'
|
|
InPrimaryKey = False
|
|
Calculated = False
|
|
Lookup = False
|
|
LookupCache = False
|
|
end
|
|
item
|
|
Name = 'MOVIL_1'
|
|
DataType = datString
|
|
Size = 25
|
|
BlobType = dabtUnknown
|
|
DictionaryEntry = 'Empresas_MOVIL_1'
|
|
InPrimaryKey = False
|
|
Calculated = False
|
|
Lookup = False
|
|
LookupCache = False
|
|
end
|
|
item
|
|
Name = 'MOVIL_2'
|
|
DataType = datString
|
|
Size = 25
|
|
BlobType = dabtUnknown
|
|
DictionaryEntry = 'Empresas_MOVIL_2'
|
|
InPrimaryKey = False
|
|
Calculated = False
|
|
Lookup = False
|
|
LookupCache = False
|
|
end
|
|
item
|
|
Name = 'FAX'
|
|
DataType = datString
|
|
Size = 25
|
|
BlobType = dabtUnknown
|
|
DictionaryEntry = 'Empresas_FAX'
|
|
InPrimaryKey = False
|
|
Calculated = False
|
|
Lookup = False
|
|
LookupCache = False
|
|
end
|
|
item
|
|
Name = 'EMAIL_1'
|
|
DataType = datString
|
|
Size = 255
|
|
BlobType = dabtUnknown
|
|
DictionaryEntry = 'Empresas_EMAIL_1'
|
|
InPrimaryKey = False
|
|
Calculated = False
|
|
Lookup = False
|
|
LookupCache = False
|
|
end
|
|
item
|
|
Name = 'EMAIL_2'
|
|
DataType = datString
|
|
Size = 255
|
|
BlobType = dabtUnknown
|
|
DictionaryEntry = 'Empresas_EMAIL_2'
|
|
InPrimaryKey = False
|
|
Calculated = False
|
|
Lookup = False
|
|
LookupCache = False
|
|
end
|
|
item
|
|
Name = 'PAGINA_WEB'
|
|
DataType = datString
|
|
Size = 255
|
|
BlobType = dabtUnknown
|
|
DictionaryEntry = 'Empresas_PAGINA_WEB'
|
|
InPrimaryKey = False
|
|
Calculated = False
|
|
Lookup = False
|
|
LookupCache = False
|
|
end
|
|
item
|
|
Name = 'NOTAS'
|
|
DataType = datMemo
|
|
BlobType = dabtUnknown
|
|
DictionaryEntry = 'Empresas_NOTAS'
|
|
InPrimaryKey = False
|
|
Calculated = False
|
|
Lookup = False
|
|
LookupCache = False
|
|
end
|
|
item
|
|
Name = 'FECHA_ALTA'
|
|
DataType = datDateTime
|
|
BlobType = dabtUnknown
|
|
DictionaryEntry = 'Empresas_FECHA_ALTA'
|
|
InPrimaryKey = False
|
|
Calculated = False
|
|
Lookup = False
|
|
LookupCache = False
|
|
end
|
|
item
|
|
Name = 'FECHA_MODIFICACION'
|
|
DataType = datDateTime
|
|
BlobType = dabtUnknown
|
|
DictionaryEntry = 'Empresas_FECHA_MODIFICACION'
|
|
InPrimaryKey = False
|
|
Calculated = False
|
|
Lookup = False
|
|
LookupCache = False
|
|
end
|
|
item
|
|
Name = 'USUARIO'
|
|
DataType = datString
|
|
Size = 20
|
|
BlobType = dabtUnknown
|
|
DictionaryEntry = 'Empresas_USUARIO'
|
|
InPrimaryKey = False
|
|
Calculated = False
|
|
Lookup = False
|
|
LookupCache = False
|
|
end
|
|
item
|
|
Name = 'LOGOTIPO'
|
|
DataType = datBlob
|
|
BlobType = dabtBlob
|
|
DictionaryEntry = 'Empresas_LOGOTIPO'
|
|
InPrimaryKey = False
|
|
Calculated = False
|
|
Lookup = False
|
|
LookupCache = False
|
|
end
|
|
item
|
|
Name = 'REGISTRO_MERCANTIL'
|
|
DataType = datString
|
|
Size = 255
|
|
BlobType = dabtUnknown
|
|
DictionaryEntry = 'Empresas_REGISTRO_MERCANTIL'
|
|
InPrimaryKey = False
|
|
Calculated = False
|
|
Lookup = False
|
|
LookupCache = False
|
|
end
|
|
item
|
|
Name = 'IVA'
|
|
DataType = datFloat
|
|
BlobType = dabtUnknown
|
|
DictionaryEntry = 'Empresas_IVA'
|
|
InPrimaryKey = False
|
|
Calculated = False
|
|
Lookup = False
|
|
LookupCache = False
|
|
end>
|
|
BusinessRulesClient.ScriptLanguage = rslPascalScript
|
|
BusinessRulesServer.ScriptLanguage = rslPascalScript
|
|
end>
|
|
Commands = <>
|
|
RelationShips = <>
|
|
UpdateRules = <
|
|
item
|
|
Name = 'Insert Contactos'
|
|
DoUpdate = False
|
|
DoInsert = True
|
|
DoDelete = False
|
|
DatasetName = 'Contactos'
|
|
FailureBehaviour = fbRaiseException
|
|
end
|
|
item
|
|
Name = 'Update Contactos'
|
|
DoUpdate = True
|
|
DoInsert = False
|
|
DoDelete = False
|
|
DatasetName = 'Contactos'
|
|
FailureBehaviour = fbRaiseException
|
|
end
|
|
item
|
|
Name = 'Insert DatosBancarios'
|
|
DoUpdate = False
|
|
DoInsert = True
|
|
DoDelete = False
|
|
DatasetName = 'DatosBancarios'
|
|
FailureBehaviour = fbRaiseException
|
|
end
|
|
item
|
|
Name = 'Update DatosBancarios'
|
|
DoUpdate = True
|
|
DoInsert = False
|
|
DoDelete = False
|
|
DatasetName = 'DatosBancarios'
|
|
FailureBehaviour = fbRaiseException
|
|
end
|
|
item
|
|
Name = 'Insert ContactosCategorias'
|
|
DoUpdate = False
|
|
DoInsert = True
|
|
DoDelete = False
|
|
DatasetName = 'ContactosCategorias'
|
|
FailureBehaviour = fbRaiseException
|
|
end
|
|
item
|
|
Name = 'Update ContactosCategorias'
|
|
DoUpdate = True
|
|
DoInsert = False
|
|
DoDelete = False
|
|
DatasetName = 'ContactosCategorias'
|
|
FailureBehaviour = fbRaiseException
|
|
end
|
|
item
|
|
Name = 'Delete DatosBancarios'
|
|
DoUpdate = False
|
|
DoInsert = False
|
|
DoDelete = True
|
|
DatasetName = 'DatosBancarios'
|
|
FailureBehaviour = fbRaiseException
|
|
end
|
|
item
|
|
Name = 'Delete ContactosCategorias'
|
|
DoUpdate = False
|
|
DoInsert = False
|
|
DoDelete = True
|
|
DatasetName = 'ContactosCategorias'
|
|
FailureBehaviour = fbRaiseException
|
|
end
|
|
item
|
|
Name = 'Delete Contactos'
|
|
DoUpdate = False
|
|
DoInsert = False
|
|
DoDelete = True
|
|
DatasetName = 'Contactos'
|
|
FailureBehaviour = fbRaiseException
|
|
end>
|
|
Left = 30
|
|
Top = 14
|
|
end
|
|
object BINAdapter: TDABINAdapter
|
|
Left = 30
|
|
Top = 82
|
|
end
|
|
object DataDictionary: TDADataDictionary
|
|
Fields = <
|
|
item
|
|
Name = 'Empresas_ID'
|
|
DataType = datInteger
|
|
BlobType = dabtUnknown
|
|
DisplayWidth = 0
|
|
DisplayLabel = 'ID'
|
|
Alignment = taLeftJustify
|
|
end
|
|
item
|
|
Name = 'Empresas_NIF_CIF'
|
|
DataType = datString
|
|
Size = 15
|
|
BlobType = dabtUnknown
|
|
DisplayWidth = 0
|
|
DisplayLabel = 'CIF'
|
|
Alignment = taLeftJustify
|
|
end
|
|
item
|
|
Name = 'Empresas_NOMBRE'
|
|
DataType = datString
|
|
Size = 255
|
|
BlobType = dabtUnknown
|
|
DisplayWidth = 0
|
|
DisplayLabel = 'Nombre'
|
|
Alignment = taLeftJustify
|
|
end
|
|
item
|
|
Name = 'Empresas_RAZON_SOCIAL'
|
|
DataType = datString
|
|
Size = 255
|
|
BlobType = dabtUnknown
|
|
DisplayWidth = 0
|
|
DisplayLabel = 'Raz'#243'n Social'
|
|
Alignment = taLeftJustify
|
|
end
|
|
item
|
|
Name = 'Empresas_CALLE'
|
|
DataType = datString
|
|
Size = 255
|
|
BlobType = dabtUnknown
|
|
DisplayWidth = 0
|
|
DisplayLabel = 'Calle'
|
|
Alignment = taLeftJustify
|
|
end
|
|
item
|
|
Name = 'Empresas_POBLACION'
|
|
DataType = datString
|
|
Size = 255
|
|
BlobType = dabtUnknown
|
|
DisplayWidth = 0
|
|
DisplayLabel = 'Poblaci'#243'n'
|
|
Alignment = taLeftJustify
|
|
end
|
|
item
|
|
Name = 'Empresas_PROVINCIA'
|
|
DataType = datString
|
|
Size = 255
|
|
BlobType = dabtUnknown
|
|
DisplayWidth = 0
|
|
DisplayLabel = 'Provincia'
|
|
Alignment = taLeftJustify
|
|
end
|
|
item
|
|
Name = 'Empresas_CODIGO_POSTAL'
|
|
DataType = datString
|
|
Size = 10
|
|
BlobType = dabtUnknown
|
|
DisplayWidth = 0
|
|
DisplayLabel = 'C'#243'd. postal'
|
|
Alignment = taLeftJustify
|
|
end
|
|
item
|
|
Name = 'Empresas_TELEFONO_1'
|
|
DataType = datString
|
|
Size = 25
|
|
BlobType = dabtUnknown
|
|
DisplayWidth = 0
|
|
DisplayLabel = 'Tel'#233'fono 1'
|
|
Alignment = taLeftJustify
|
|
end
|
|
item
|
|
Name = 'Empresas_TELEFONO_2'
|
|
DataType = datString
|
|
Size = 25
|
|
BlobType = dabtUnknown
|
|
DisplayWidth = 0
|
|
DisplayLabel = 'Tel'#233'fono 2'
|
|
Alignment = taLeftJustify
|
|
end
|
|
item
|
|
Name = 'Empresas_MOVIL_1'
|
|
DataType = datString
|
|
Size = 25
|
|
BlobType = dabtUnknown
|
|
DisplayWidth = 0
|
|
DisplayLabel = 'M'#243'vil 1'
|
|
Alignment = taLeftJustify
|
|
end
|
|
item
|
|
Name = 'Empresas_MOVIL_2'
|
|
DataType = datString
|
|
Size = 25
|
|
BlobType = dabtUnknown
|
|
DisplayWidth = 0
|
|
DisplayLabel = 'M'#243'vil 2'
|
|
Alignment = taLeftJustify
|
|
end
|
|
item
|
|
Name = 'Empresas_FAX'
|
|
DataType = datString
|
|
Size = 25
|
|
BlobType = dabtUnknown
|
|
DisplayWidth = 0
|
|
DisplayLabel = 'Fax'
|
|
Alignment = taLeftJustify
|
|
end
|
|
item
|
|
Name = 'Empresas_EMAIL_1'
|
|
DataType = datString
|
|
Size = 255
|
|
BlobType = dabtUnknown
|
|
DisplayWidth = 0
|
|
DisplayLabel = 'E-mail 1'
|
|
Alignment = taLeftJustify
|
|
end
|
|
item
|
|
Name = 'Empresas_EMAIL_2'
|
|
DataType = datString
|
|
Size = 255
|
|
BlobType = dabtUnknown
|
|
DisplayWidth = 0
|
|
DisplayLabel = 'E-mail 2'
|
|
Alignment = taLeftJustify
|
|
end
|
|
item
|
|
Name = 'Empresas_PAGINA_WEB'
|
|
DataType = datString
|
|
Size = 255
|
|
BlobType = dabtUnknown
|
|
DisplayWidth = 0
|
|
DisplayLabel = 'P'#225'gina web'
|
|
Alignment = taLeftJustify
|
|
end
|
|
item
|
|
Name = 'Empresas_NOTAS'
|
|
DataType = datMemo
|
|
BlobType = dabtUnknown
|
|
DisplayWidth = 0
|
|
DisplayLabel = 'Notas'
|
|
Alignment = taLeftJustify
|
|
end
|
|
item
|
|
Name = 'Empresas_FECHA_ALTA'
|
|
DataType = datDateTime
|
|
BlobType = dabtUnknown
|
|
DisplayWidth = 0
|
|
Alignment = taLeftJustify
|
|
end
|
|
item
|
|
Name = 'Empresas_FECHA_MODIFICACION'
|
|
DataType = datDateTime
|
|
BlobType = dabtUnknown
|
|
DisplayWidth = 0
|
|
Alignment = taLeftJustify
|
|
end
|
|
item
|
|
Name = 'Empresas_USUARIO'
|
|
DataType = datString
|
|
Size = 20
|
|
BlobType = dabtUnknown
|
|
DisplayWidth = 0
|
|
Alignment = taLeftJustify
|
|
end
|
|
item
|
|
Name = 'Empresas_LOGOTIPO'
|
|
DataType = datBlob
|
|
BlobType = dabtBlob
|
|
DisplayWidth = 0
|
|
DisplayLabel = 'Logotipo'
|
|
Alignment = taLeftJustify
|
|
end
|
|
item
|
|
Name = 'Empresas_REGISTRO_MERCANTIL'
|
|
DataType = datString
|
|
Size = 255
|
|
BlobType = dabtUnknown
|
|
DisplayWidth = 0
|
|
DisplayLabel = 'Registro mercantil'
|
|
Alignment = taLeftJustify
|
|
end
|
|
item
|
|
Name = 'Empresas_IVA'
|
|
DataType = datFloat
|
|
BlobType = dabtUnknown
|
|
DisplayWidth = 0
|
|
DisplayLabel = 'IVA'
|
|
Alignment = taLeftJustify
|
|
end>
|
|
Left = 126
|
|
Top = 14
|
|
end
|
|
object Diagrams: TDADiagrams
|
|
Left = 126
|
|
Top = 82
|
|
DiagramData =
|
|
'<Diagrams>'#13#10' <Diagram Name="New Diagram" Left="200" Top="200" W' +
|
|
'idth="400" Height="300">'#13#10' </Diagram>'#13#10'</Diagrams>'#13#10
|
|
end
|
|
end
|