Tecistel/Tecsitel_FactuGES2
0
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity
c3bd63fefa
Tecsitel_FactuGES2/Source/Modulos/Contactos/Servidor/srvContactos_Impl.dfm

5091 lines
153 KiB
Plaintext
Raw Blame History

object srvContactos: TsrvContactos
OldCreateOrder = True
OnCreate = DARemoteServiceCreate
RequiresSession = True
AcquireConnection = True
ConnectionName = 'IBX'
ServiceSchema = schContactos
ServiceAdapter = BINAdapter
OnBeforeAcquireConnection = DARemoteServiceBeforeAcquireConnection
OnBeforeGetDatasetData = DARemoteServiceBeforeGetDatasetData
Height = 347
Width = 444
object schContactos: TDASchema
ConnectionManager = dmServer.ConnectionManager
DataDictionary = DataDictionary
Diagrams = Diagrams
Datasets = <
item
Params = <
item
Name = 'ID_CATEGORIA'
DataType = datInteger
BlobType = dabtUnknown
Value = '22'
ParamType = daptInput
end>
Statements = <
item
Connection = 'IBX'
TargetTable = 'CONTACTOS'
SQL =
'SELECT '#10' ID, ID_CATEGORIA, NIF_CIF, NOMBRE, PERSONA_CONTACTO,' +
' CALLE, POBLACION,'#10' PROVINCIA, CODIGO_POSTAL, TELEFONO_1, TEL' +
'EFONO_2, MOVIL_1, '#10' MOVIL_2, FAX, EMAIL_1, EMAIL_2, PAGINA_WE' +
'B, NOTAS, '#10' USUARIO, ID_EMPRESA, REFERENCIA'#10' FROM'#10' V_CONT' +
'ACTOS'#10' WHERE'#10' ID_CATEGORIA = :ID_CATEGORIA'
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 = '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 = 'USUARIO'
TableField = 'USUARIO'
end
item
DatasetField = 'ID_CATEGORIA'
TableField = 'ID_CATEGORIA'
SQLOrigin = 'CONTACTOS_CATEGORIAS.ID_CATEGORIA'
end
item
DatasetField = 'ID_EMPRESA'
TableField = 'ID_EMPRESA'
SQLOrigin = 'EMPRESAS_CONTACTOS.ID_EMPRESA'
end
item
DatasetField = 'REFERENCIA'
TableField = 'REFERENCIA'
end
item
DatasetField = 'PERSONA_CONTACTO'
TableField = 'PERSONA_CONTACTO'
end>
end>
Name = 'Contactos'
Fields = <
item
Name = 'ID'
DataType = datAutoInc
BlobType = dabtUnknown
DictionaryEntry = 'Contactos_ID'
InPrimaryKey = True
Calculated = False
Lookup = False
LookupCache = False
end
item
Name = 'ID_CATEGORIA'
DataType = datInteger
BlobType = dabtUnknown
DictionaryEntry = 'Contactos_ID_CATEGORIA'
InPrimaryKey = False
Calculated = False
Lookup = False
LookupCache = False
end
item
Name = 'NIF_CIF'
DataType = datString
Size = 15
BlobType = dabtUnknown
DictionaryEntry = 'Contactos_NIF_CIF'
InPrimaryKey = False
Calculated = False
Lookup = False
LookupCache = False
end
item
Name = 'NOMBRE'
DataType = datString
Size = 255
BlobType = dabtUnknown
DictionaryEntry = 'Contactos_NOMBRE'
InPrimaryKey = False
Calculated = False
Lookup = False
LookupCache = False
end
item
Name = 'PERSONA_CONTACTO'
DataType = datString
Size = 255
BlobType = dabtUnknown
DictionaryEntry = 'Contactos_PERSONA_CONTACTO'
InPrimaryKey = False
Calculated = False
Lookup = False
LookupCache = False
end
item
Name = 'CALLE'
DataType = datString
Size = 255
BlobType = dabtUnknown
DictionaryEntry = 'Contactos_CALLE'
InPrimaryKey = False
Calculated = False
Lookup = False
LookupCache = False
end
item
Name = 'POBLACION'
DataType = datString
Size = 255
BlobType = dabtUnknown
DictionaryEntry = 'Contactos_POBLACION'
InPrimaryKey = False
Calculated = False
Lookup = False
LookupCache = False
end
item
Name = 'PROVINCIA'
DataType = datString
Size = 255
BlobType = dabtUnknown
DictionaryEntry = 'Contactos_PROVINCIA'
InPrimaryKey = False
Calculated = False
Lookup = False
LookupCache = False
end
item
Name = 'CODIGO_POSTAL'
DataType = datString
Size = 10
BlobType = dabtUnknown
DictionaryEntry = 'Contactos_CODIGO_POSTAL'
InPrimaryKey = False
Calculated = False
Lookup = False
LookupCache = False
end
item
Name = 'TELEFONO_1'
DataType = datString
Size = 25
BlobType = dabtUnknown
DictionaryEntry = 'Contactos_TELEFONO_1'
InPrimaryKey = False
Calculated = False
Lookup = False
LookupCache = False
end
item
Name = 'TELEFONO_2'
DataType = datString
Size = 25
BlobType = dabtUnknown
DictionaryEntry = 'Contactos_TELEFONO_2'
InPrimaryKey = False
Calculated = False
Lookup = False
LookupCache = False
end
item
Name = 'MOVIL_1'
DataType = datString
Size = 25
BlobType = dabtUnknown
DictionaryEntry = 'Contactos_MOVIL_1'
InPrimaryKey = False
Calculated = False
Lookup = False
LookupCache = False
end
item
Name = 'MOVIL_2'
DataType = datString
Size = 25
BlobType = dabtUnknown
DictionaryEntry = 'Contactos_MOVIL_2'
InPrimaryKey = False
Calculated = False
Lookup = False
LookupCache = False
end
item
Name = 'FAX'
DataType = datString
Size = 25
BlobType = dabtUnknown
DictionaryEntry = 'Contactos_FAX'
InPrimaryKey = False
Calculated = False
Lookup = False
LookupCache = False
end
item
Name = 'EMAIL_1'
DataType = datString
Size = 255
BlobType = dabtUnknown
DictionaryEntry = 'Contactos_EMAIL_1'
InPrimaryKey = False
Calculated = False
Lookup = False
LookupCache = False
end
item
Name = 'EMAIL_2'
DataType = datString
Size = 255
BlobType = dabtUnknown
DictionaryEntry = 'Contactos_EMAIL_2'
InPrimaryKey = False
Calculated = False
Lookup = False
LookupCache = False
end
item
Name = 'PAGINA_WEB'
DataType = datString
Size = 255
BlobType = dabtUnknown
DictionaryEntry = 'Contactos_PAGINA_WEB'
InPrimaryKey = False
Calculated = False
Lookup = False
LookupCache = False
end
item
Name = 'NOTAS'
DataType = datMemo
BlobType = dabtMemo
DictionaryEntry = 'Contactos_NOTAS'
InPrimaryKey = False
Calculated = False
Lookup = False
LookupCache = False
end
item
Name = 'USUARIO'
DataType = datString
Size = 20
BlobType = dabtUnknown
DictionaryEntry = 'Contactos_USUARIO'
InPrimaryKey = False
Calculated = False
Lookup = False
LookupCache = False
end
item
Name = 'ID_EMPRESA'
DataType = datInteger
BlobType = dabtUnknown
DictionaryEntry = 'Contactos_ID_EMPRESA'
InPrimaryKey = False
Calculated = False
Lookup = False
LookupCache = False
end
item
Name = 'REFERENCIA'
DataType = datString
Size = 255
BlobType = dabtUnknown
DictionaryEntry = 'Contactos_REFERENCIA'
InPrimaryKey = False
Calculated = False
Lookup = False
LookupCache = False
end>
BusinessRulesClient.ScriptLanguage = rslPascalScript
BusinessRulesServer.ScriptLanguage = rslPascalScript
end
item
Params = <>
Statements = <
item
Connection = 'IBX'
TargetTable = 'CLIENTES_GRUPOS'
SQL = 'SELECT DESCRIPCION'#10'FROM CLIENTES_GRUPOS'
StatementType = stSQL
ColumnMappings = <
item
DatasetField = 'DESCRIPCION'
TableField = 'DESCRIPCION'
end>
end>
Name = 'GruposCliente'
Fields = <
item
Name = 'DESCRIPCION'
DataType = datString
Size = 255
BlobType = dabtUnknown
DisplayWidth = 0
Alignment = taLeftJustify
InPrimaryKey = False
Calculated = False
Lookup = False
LookupCache = False
end>
BusinessRulesClient.ScriptLanguage = rslPascalScript
BusinessRulesServer.ScriptLanguage = rslPascalScript
end
item
Params = <
item
Name = 'ID_CONTACTO'
DataType = datInteger
BlobType = dabtUnknown
Value = ''
ParamType = daptInput
end>
Statements = <
item
Connection = 'IBX'
TargetTable = 'CONTACTOS_DATOS_BANCO'
SQL =
'SELECT'#10' ID, ID_CONTACTO, TITULAR, ENTIDAD, SUCURSAL, DC, CUEN' +
'TA'#10' FROM'#10' CONTACTOS_DATOS_BANCO'#10' WHERE ID_CONTACTO = :ID_CO' +
'NTACTO'
StatementType = stSQL
ColumnMappings = <
item
DatasetField = 'ID'
TableField = 'ID'
end
item
DatasetField = 'ID_CONTACTO'
TableField = 'ID_CONTACTO'
end
item
DatasetField = 'TITULAR'
TableField = 'TITULAR'
end
item
DatasetField = 'ENTIDAD'
TableField = 'ENTIDAD'
end
item
DatasetField = 'SUCURSAL'
TableField = 'SUCURSAL'
end
item
DatasetField = 'DC'
TableField = 'DC'
end
item
DatasetField = 'CUENTA'
TableField = 'CUENTA'
end>
end>
Name = 'DatosBancarios'
Fields = <
item
Name = 'ID'
DataType = datAutoInc
BlobType = dabtUnknown
DictionaryEntry = 'DatosBancarios_ID'
InPrimaryKey = True
Calculated = False
Lookup = False
LookupCache = False
end
item
Name = 'ID_CONTACTO'
DataType = datInteger
BlobType = dabtUnknown
DictionaryEntry = 'DatosBancarios_ID_CONTACTO'
InPrimaryKey = False
Calculated = False
Lookup = False
LookupCache = False
end
item
Name = 'TITULAR'
DataType = datString
Size = 255
BlobType = dabtUnknown
DictionaryEntry = 'DatosBancarios_TITULAR'
InPrimaryKey = False
Calculated = False
Lookup = False
LookupCache = False
end
item
Name = 'ENTIDAD'
DataType = datString
Size = 15
BlobType = dabtUnknown
DictionaryEntry = 'DatosBancarios_ENTIDAD'
InPrimaryKey = False
Calculated = False
Lookup = False
LookupCache = False
end
item
Name = 'SUCURSAL'
DataType = datString
Size = 15
BlobType = dabtUnknown
DictionaryEntry = 'DatosBancarios_SUCURSAL'
InPrimaryKey = False
Calculated = False
Lookup = False
LookupCache = False
end
item
Name = 'DC'
DataType = datString
Size = 15
BlobType = dabtUnknown
DictionaryEntry = 'DatosBancarios_DC'
InPrimaryKey = False
Calculated = False
Lookup = False
LookupCache = False
end
item
Name = 'CUENTA'
DataType = datString
Size = 15
BlobType = dabtUnknown
DictionaryEntry = 'DatosBancarios_CUENTA'
InPrimaryKey = False
Calculated = False
Lookup = False
LookupCache = False
end>
BusinessRulesClient.ScriptLanguage = rslPascalScript
BusinessRulesServer.ScriptLanguage = rslPascalScript
end
item
Params = <
item
Name = 'ID_CONTACTO'
DataType = datInteger
BlobType = dabtUnknown
Value = '444'
ParamType = daptInput
end>
Statements = <
item
Connection = 'IBX'
TargetTable = 'CONTACTOS_CATEGORIAS'
SQL =
'SELECT '#10' ID_CONTACTO, ID_CATEGORIA'#10' FROM'#10' CONTACTOS_CATEG' +
'ORIAS'#10' WHERE'#10' ID_CONTACTO = :ID_CONTACTO'
StatementType = stSQL
ColumnMappings = <
item
DatasetField = 'ID_CONTACTO'
TableField = 'ID_CONTACTO'
end
item
DatasetField = 'ID_CATEGORIA'
TableField = 'ID_CATEGORIA'
end>
end>
Name = 'ContactosCategorias'
Fields = <
item
Name = 'ID_CONTACTO'
DataType = datInteger
BlobType = dabtUnknown
DisplayWidth = 0
Alignment = taLeftJustify
InPrimaryKey = True
Calculated = False
Lookup = False
LookupCache = False
end
item
Name = 'ID_CATEGORIA'
DataType = datInteger
BlobType = dabtUnknown
DisplayWidth = 0
Alignment = taLeftJustify
InPrimaryKey = True
Calculated = False
Lookup = False
LookupCache = False
end>
BusinessRulesClient.ScriptLanguage = rslPascalScript
BusinessRulesServer.ScriptLanguage = rslPascalScript
end
item
Params = <>
Statements = <
item
Connection = 'IBX'
TargetTable = 'V_CLIENTES'
SQL =
'SELECT '#10' ID, ID_CATEGORIA, REFERENCIA, NIF_CIF, NOMBRE, PERSO' +
'NA_CONTACTO, CALLE,'#10' POBLACION, PROVINCIA, CODIGO_POSTAL, TEL' +
'EFONO_1, TELEFONO_2, '#10' MOVIL_1, MOVIL_2, FAX, EMAIL_1, EMAIL_' +
'2, PAGINA_WEB, '#10' NOTAS, USUARIO, ID_EMPRESA,'#10#10' GRUPO_CLIEN' +
'TE, NOMBRE_COMERCIAL, VENCIMIENTO_FACTURAS, BLOQUEADO,'#10' MOTIV' +
'O_BLOQUEO, RECARGO_EQUIVALENCIA, REGIMEN_IVA, ID_TIPO_IVA,'#10' I' +
'D_FORMA_PAGO, TIENDA_WEB'#10' FROM'#10' V_CLIENTES'
StatementType = stSQL
ColumnMappings = <
item
DatasetField = 'ID'
TableField = 'ID'
end
item
DatasetField = 'ID_CATEGORIA'
TableField = 'ID_CATEGORIA'
end
item
DatasetField = 'NIF_CIF'
TableField = 'NIF_CIF'
end
item
DatasetField = 'NOMBRE'
TableField = 'NOMBRE'
end
item
DatasetField = 'CALLE'
TableField = 'CALLE'
end
item
DatasetField = 'PERSONA_CONTACTO'
TableField = 'PERSONA_CONTACTO'
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 = 'USUARIO'
TableField = 'USUARIO'
end
item
DatasetField = 'ID_EMPRESA'
TableField = 'ID_EMPRESA'
end
item
DatasetField = 'REFERENCIA'
TableField = 'REFERENCIA'
end
item
DatasetField = 'ID_TIPO_IVA'
TableField = 'ID_TIPO_IVA'
end
item
DatasetField = 'REGIMEN_IVA'
TableField = 'REGIMEN_IVA'
end
item
DatasetField = 'ID_FORMA_PAGO'
TableField = 'ID_FORMA_PAGO'
end
item
DatasetField = 'TIENDA_WEB'
TableField = 'TIENDA_WEB'
end
item
DatasetField = 'RECARGO_EQUIVALENCIA'
TableField = 'RECARGO_EQUIVALENCIA'
end
item
DatasetField = 'GRUPO_CLIENTE'
TableField = 'GRUPO_CLIENTE'
end
item
DatasetField = 'NOMBRE_COMERCIAL'
TableField = 'NOMBRE_COMERCIAL'
end
item
DatasetField = 'VENCIMIENTO_FACTURAS'
TableField = 'VENCIMIENTO_FACTURAS'
end
item
DatasetField = 'BLOQUEADO'
TableField = 'BLOQUEADO'
end
item
DatasetField = 'MOTIVO_BLOQUEO'
TableField = 'MOTIVO_BLOQUEO'
end>
end>
Name = 'Clientes'
Fields = <
item
Name = 'ID'
DataType = datAutoInc
BlobType = dabtUnknown
DictionaryEntry = 'Contactos_ID'
InPrimaryKey = True
Calculated = False
Lookup = False
LookupCache = False
end
item
Name = 'ID_CATEGORIA'
DataType = datInteger
BlobType = dabtUnknown
DictionaryEntry = 'Contactos_ID_CATEGORIA'
InPrimaryKey = False
Calculated = False
Lookup = False
LookupCache = False
end
item
Name = 'NIF_CIF'
DataType = datString
Size = 15
BlobType = dabtUnknown
DictionaryEntry = 'Contactos_NIF_CIF'
InPrimaryKey = False
Calculated = False
Lookup = False
LookupCache = False
end
item
Name = 'NOMBRE'
DataType = datString
Size = 255
BlobType = dabtUnknown
DictionaryEntry = 'Contactos_NOMBRE'
InPrimaryKey = False
Calculated = False
Lookup = False
LookupCache = False
end
item
Name = 'CALLE'
DataType = datString
Size = 255
BlobType = dabtUnknown
DictionaryEntry = 'Contactos_CALLE'
InPrimaryKey = False
Calculated = False
Lookup = False
LookupCache = False
end
item
Name = 'PERSONA_CONTACTO'
DataType = datString
Size = 255
BlobType = dabtUnknown
DictionaryEntry = 'Contactos_PERSONA_CONTACTO'
InPrimaryKey = False
Calculated = False
Lookup = False
LookupCache = False
end
item
Name = 'POBLACION'
DataType = datString
Size = 255
BlobType = dabtUnknown
DictionaryEntry = 'Contactos_POBLACION'
InPrimaryKey = False
Calculated = False
Lookup = False
LookupCache = False
end
item
Name = 'PROVINCIA'
DataType = datString
Size = 255
BlobType = dabtUnknown
DictionaryEntry = 'Contactos_PROVINCIA'
InPrimaryKey = False
Calculated = False
Lookup = False
LookupCache = False
end
item
Name = 'CODIGO_POSTAL'
DataType = datString
Size = 10
BlobType = dabtUnknown
DictionaryEntry = 'Contactos_CODIGO_POSTAL'
InPrimaryKey = False
Calculated = False
Lookup = False
LookupCache = False
end
item
Name = 'TELEFONO_1'
DataType = datString
Size = 25
BlobType = dabtUnknown
DictionaryEntry = 'Contactos_TELEFONO_1'
InPrimaryKey = False
Calculated = False
Lookup = False
LookupCache = False
end
item
Name = 'TELEFONO_2'
DataType = datString
Size = 25
BlobType = dabtUnknown
DictionaryEntry = 'Contactos_TELEFONO_2'
InPrimaryKey = False
Calculated = False
Lookup = False
LookupCache = False
end
item
Name = 'MOVIL_1'
DataType = datString
Size = 25
BlobType = dabtUnknown
DictionaryEntry = 'Contactos_MOVIL_1'
InPrimaryKey = False
Calculated = False
Lookup = False
LookupCache = False
end
item
Name = 'MOVIL_2'
DataType = datString
Size = 25
BlobType = dabtUnknown
DictionaryEntry = 'Contactos_MOVIL_2'
InPrimaryKey = False
Calculated = False
Lookup = False
LookupCache = False
end
item
Name = 'FAX'
DataType = datString
Size = 25
BlobType = dabtUnknown
DictionaryEntry = 'Contactos_FAX'
InPrimaryKey = False
Calculated = False
Lookup = False
LookupCache = False
end
item
Name = 'EMAIL_1'
DataType = datString
Size = 255
BlobType = dabtUnknown
DictionaryEntry = 'Contactos_EMAIL_1'
InPrimaryKey = False
Calculated = False
Lookup = False
LookupCache = False
end
item
Name = 'EMAIL_2'
DataType = datString
Size = 255
BlobType = dabtUnknown
DictionaryEntry = 'Contactos_EMAIL_2'
InPrimaryKey = False
Calculated = False
Lookup = False
LookupCache = False
end
item
Name = 'PAGINA_WEB'
DataType = datString
Size = 255
BlobType = dabtUnknown
DictionaryEntry = 'Contactos_PAGINA_WEB'
InPrimaryKey = False
Calculated = False
Lookup = False
LookupCache = False
end
item
Name = 'NOTAS'
DataType = datMemo
BlobType = dabtMemo
DictionaryEntry = 'Contactos_NOTAS'
InPrimaryKey = False
Calculated = False
Lookup = False
LookupCache = False
end
item
Name = 'USUARIO'
DataType = datString
Size = 20
BlobType = dabtUnknown
DictionaryEntry = 'Contactos_USUARIO'
InPrimaryKey = False
Calculated = False
Lookup = False
LookupCache = False
end
item
Name = 'ID_EMPRESA'
DataType = datInteger
BlobType = dabtUnknown
DictionaryEntry = 'Contactos_ID_EMPRESA'
InPrimaryKey = False
Calculated = False
Lookup = False
LookupCache = False
end
item
Name = 'REFERENCIA'
DataType = datString
Size = 255
BlobType = dabtUnknown
DictionaryEntry = 'Clientes_REFERENCIA'
InPrimaryKey = False
Calculated = False
Lookup = False
LookupCache = False
end
item
Name = 'ID_TIPO_IVA'
DataType = datInteger
BlobType = dabtUnknown
DictionaryEntry = 'Clientes_ID_TIPO_IVA'
InPrimaryKey = False
Calculated = False
Lookup = False
LookupCache = False
end
item
Name = 'REGIMEN_IVA'
DataType = datString
Size = 255
BlobType = dabtUnknown
DictionaryEntry = 'Clientes_REGIMEN_IVA'
InPrimaryKey = False
Calculated = False
Lookup = False
LookupCache = False
end
item
Name = 'ID_FORMA_PAGO'
DataType = datInteger
BlobType = dabtUnknown
DictionaryEntry = 'Clientes_ID_FORMA_PAGO'
InPrimaryKey = False
Calculated = False
Lookup = False
LookupCache = False
end
item
Name = 'TIENDA_WEB'
DataType = datInteger
BlobType = dabtUnknown
DictionaryEntry = 'Clientes_TIENDA_WEB'
InPrimaryKey = False
Calculated = False
Lookup = False
LookupCache = False
end
item
Name = 'RECARGO_EQUIVALENCIA'
DataType = datInteger
BlobType = dabtUnknown
DictionaryEntry = 'Clientes_RECARGO_EQUIVALENCIA'
InPrimaryKey = False
Calculated = False
Lookup = False
LookupCache = False
end
item
Name = 'GRUPO_CLIENTE'
DataType = datString
Size = 255
BlobType = dabtUnknown
DictionaryEntry = 'Clientes_GRUPO_CLIENTE'
InPrimaryKey = False
Calculated = False
Lookup = False
LookupCache = False
end
item
Name = 'NOMBRE_COMERCIAL'
DataType = datString
Size = 255
BlobType = dabtUnknown
DictionaryEntry = 'Clientes_NOMBRE_COMERCIAL'
InPrimaryKey = False
Calculated = False
Lookup = False
LookupCache = False
end
item
Name = 'VENCIMIENTO_FACTURAS'
DataType = datInteger
BlobType = dabtUnknown
DictionaryEntry = 'Clientes_VENCIMIENTO_FACTURAS'
InPrimaryKey = False
Calculated = False
Lookup = False
LookupCache = False
end
item
Name = 'BLOQUEADO'
DataType = datInteger
BlobType = dabtUnknown
DictionaryEntry = 'Clientes_BLOQUEADO'
InPrimaryKey = False
Calculated = False
Lookup = False
LookupCache = False
end
item
Name = 'MOTIVO_BLOQUEO'
DataType = datString
Size = 255
BlobType = dabtUnknown
DictionaryEntry = 'Clientes_MOTIVO_BLOQUEO'
InPrimaryKey = False
Calculated = False
Lookup = False
LookupCache = False
end>
BusinessRulesClient.ScriptLanguage = rslPascalScript
BusinessRulesServer.ScriptLanguage = rslPascalScript
end
item
Params = <>
Statements = <
item
Connection = 'IBX'
TargetTable = 'V_PROVEEDORES'
SQL =
'SELECT '#10' ID, ID_CATEGORIA, REFERENCIA, NIF_CIF, NOMBRE, PERSO' +
'NA_CONTACTO, CALLE,'#10' POBLACION, PROVINCIA, CODIGO_POSTAL, TEL' +
'EFONO_1, TELEFONO_2, '#10' MOVIL_1, MOVIL_2, FAX, EMAIL_1, EMAIL_' +
'2, PAGINA_WEB,'#10' NOTAS, USUARIO, ID_EMPRESA,'#10#10#10' REGIMEN_IVA' +
', DESCUENTO, DESCRIPCION_PROVEEDOR,'#10' CODIGO_ASIGNADO, ID_TIPO' +
'_IVA, ID_FORMA_PAGO, TIENDA_WEB, HOMOLOGADO, CERTIFICACION,'#10' ' +
'GRUPO_PROVEEDOR'#10#10' FROM'#10' V_PROVEEDORES'
StatementType = stSQL
ColumnMappings = <
item
DatasetField = 'ID'
TableField = 'ID'
end
item
DatasetField = 'ID_CATEGORIA'
TableField = 'ID_CATEGORIA'
end
item
DatasetField = 'NIF_CIF'
TableField = 'NIF_CIF'
end
item
DatasetField = 'NOMBRE'
TableField = 'NOMBRE'
end
item
DatasetField = 'CALLE'
TableField = 'CALLE'
end
item
DatasetField = 'PERSONA_CONTACTO'
TableField = 'PERSONA_CONTACTO'
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 = 'USUARIO'
TableField = 'USUARIO'
end
item
DatasetField = 'ID_EMPRESA'
TableField = 'ID_EMPRESA'
end
item
DatasetField = 'REFERENCIA'
TableField = 'REFERENCIA'
end
item
DatasetField = 'ID_TIPO_IVA'
TableField = 'ID_TIPO_IVA'
end
item
DatasetField = 'REGIMEN_IVA'
TableField = 'REGIMEN_IVA'
end
item
DatasetField = 'ID_FORMA_PAGO'
TableField = 'ID_FORMA_PAGO'
end
item
DatasetField = 'TIENDA_WEB'
TableField = 'TIENDA_WEB'
end
item
DatasetField = 'DESCUENTO'
TableField = 'DESCUENTO'
end
item
DatasetField = 'DESCRIPCION_PROVEEDOR'
TableField = 'DESCRIPCION_PROVEEDOR'
end
item
DatasetField = 'CODIGO_ASIGNADO'
TableField = 'CODIGO_ASIGNADO'
end
item
DatasetField = 'HOMOLOGADO'
TableField = 'HOMOLOGADO'
end
item
DatasetField = 'CERTIFICACION'
TableField = 'CERTIFICACION'
end
item
DatasetField = 'GRUPO_PROVEEDOR'
TableField = 'GRUPO_PROVEEDOR'
end>
end>
Name = 'Proveedores'
Fields = <
item
Name = 'ID'
DataType = datAutoInc
BlobType = dabtUnknown
DictionaryEntry = 'Contactos_ID'
InPrimaryKey = True
Calculated = False
Lookup = False
LookupCache = False
end
item
Name = 'ID_CATEGORIA'
DataType = datInteger
BlobType = dabtUnknown
DictionaryEntry = 'Contactos_ID_CATEGORIA'
InPrimaryKey = False
Calculated = False
Lookup = False
LookupCache = False
end
item
Name = 'NIF_CIF'
DataType = datString
Size = 15
BlobType = dabtUnknown
DictionaryEntry = 'Contactos_NIF_CIF'
InPrimaryKey = False
Calculated = False
Lookup = False
LookupCache = False
end
item
Name = 'NOMBRE'
DataType = datString
Size = 255
BlobType = dabtUnknown
DictionaryEntry = 'Contactos_NOMBRE'
InPrimaryKey = False
Calculated = False
Lookup = False
LookupCache = False
end
item
Name = 'CALLE'
DataType = datString
Size = 255
BlobType = dabtUnknown
DictionaryEntry = 'Contactos_CALLE'
InPrimaryKey = False
Calculated = False
Lookup = False
LookupCache = False
end
item
Name = 'PERSONA_CONTACTO'
DataType = datString
Size = 255
BlobType = dabtUnknown
DictionaryEntry = 'Contactos_PERSONA_CONTACTO'
InPrimaryKey = False
Calculated = False
Lookup = False
LookupCache = False
end
item
Name = 'POBLACION'
DataType = datString
Size = 255
BlobType = dabtUnknown
DictionaryEntry = 'Contactos_POBLACION'
InPrimaryKey = False
Calculated = False
Lookup = False
LookupCache = False
end
item
Name = 'PROVINCIA'
DataType = datString
Size = 255
BlobType = dabtUnknown
DictionaryEntry = 'Contactos_PROVINCIA'
InPrimaryKey = False
Calculated = False
Lookup = False
LookupCache = False
end
item
Name = 'CODIGO_POSTAL'
DataType = datString
Size = 10
BlobType = dabtUnknown
DictionaryEntry = 'Contactos_CODIGO_POSTAL'
InPrimaryKey = False
Calculated = False
Lookup = False
LookupCache = False
end
item
Name = 'TELEFONO_1'
DataType = datString
Size = 25
BlobType = dabtUnknown
DictionaryEntry = 'Contactos_TELEFONO_1'
InPrimaryKey = False
Calculated = False
Lookup = False
LookupCache = False
end
item
Name = 'TELEFONO_2'
DataType = datString
Size = 25
BlobType = dabtUnknown
DictionaryEntry = 'Contactos_TELEFONO_2'
InPrimaryKey = False
Calculated = False
Lookup = False
LookupCache = False
end
item
Name = 'MOVIL_1'
DataType = datString
Size = 25
BlobType = dabtUnknown
DictionaryEntry = 'Contactos_MOVIL_1'
InPrimaryKey = False
Calculated = False
Lookup = False
LookupCache = False
end
item
Name = 'MOVIL_2'
DataType = datString
Size = 25
BlobType = dabtUnknown
DictionaryEntry = 'Contactos_MOVIL_2'
InPrimaryKey = False
Calculated = False
Lookup = False
LookupCache = False
end
item
Name = 'FAX'
DataType = datString
Size = 25
BlobType = dabtUnknown
DictionaryEntry = 'Contactos_FAX'
InPrimaryKey = False
Calculated = False
Lookup = False
LookupCache = False
end
item
Name = 'EMAIL_1'
DataType = datString
Size = 255
BlobType = dabtUnknown
DictionaryEntry = 'Contactos_EMAIL_1'
InPrimaryKey = False
Calculated = False
Lookup = False
LookupCache = False
end
item
Name = 'EMAIL_2'
DataType = datString
Size = 255
BlobType = dabtUnknown
DictionaryEntry = 'Contactos_EMAIL_2'
InPrimaryKey = False
Calculated = False
Lookup = False
LookupCache = False
end
item
Name = 'PAGINA_WEB'
DataType = datString
Size = 255
BlobType = dabtUnknown
DictionaryEntry = 'Contactos_PAGINA_WEB'
InPrimaryKey = False
Calculated = False
Lookup = False
LookupCache = False
end
item
Name = 'NOTAS'
DataType = datMemo
BlobType = dabtMemo
DictionaryEntry = 'Contactos_NOTAS'
InPrimaryKey = False
Calculated = False
Lookup = False
LookupCache = False
end
item
Name = 'USUARIO'
DataType = datString
Size = 20
BlobType = dabtUnknown
DictionaryEntry = 'Contactos_USUARIO'
InPrimaryKey = False
Calculated = False
Lookup = False
LookupCache = False
end
item
Name = 'ID_EMPRESA'
DataType = datInteger
BlobType = dabtUnknown
DictionaryEntry = 'Contactos_ID_EMPRESA'
InPrimaryKey = False
Calculated = False
Lookup = False
LookupCache = False
end
item
Name = 'REFERENCIA'
DataType = datString
Size = 255
BlobType = dabtUnknown
DictionaryEntry = 'Proveedores_REFERENCIA'
InPrimaryKey = False
Calculated = False
Lookup = False
LookupCache = False
end
item
Name = 'ID_TIPO_IVA'
DataType = datInteger
BlobType = dabtUnknown
DictionaryEntry = 'Proveedores_ID_TIPO_IVA'
InPrimaryKey = False
Calculated = False
Lookup = False
LookupCache = False
end
item
Name = 'REGIMEN_IVA'
DataType = datString
Size = 255
BlobType = dabtUnknown
DictionaryEntry = 'Proveedores_REGIMEN_IVA'
InPrimaryKey = False
Calculated = False
Lookup = False
LookupCache = False
end
item
Name = 'ID_FORMA_PAGO'
DataType = datInteger
BlobType = dabtUnknown
DictionaryEntry = 'Proveedores_ID_FORMA_PAGO'
InPrimaryKey = False
Calculated = False
Lookup = False
LookupCache = False
end
item
Name = 'TIENDA_WEB'
DataType = datInteger
BlobType = dabtUnknown
DictionaryEntry = 'Proveedores_TIENDA_WEB'
InPrimaryKey = False
Calculated = False
Lookup = False
LookupCache = False
end
item
Name = 'DESCUENTO'
DataType = datFloat
BlobType = dabtUnknown
DictionaryEntry = 'Proveedores_DESCUENTO'
InPrimaryKey = False
Calculated = False
Lookup = False
LookupCache = False
end
item
Name = 'DESCRIPCION_PROVEEDOR'
DataType = datString
Size = 255
BlobType = dabtUnknown
DictionaryEntry = 'Proveedores_DESCRIPCION_PROVEEDOR'
InPrimaryKey = False
Calculated = False
Lookup = False
LookupCache = False
end
item
Name = 'CODIGO_ASIGNADO'
DataType = datString
Size = 255
BlobType = dabtUnknown
DictionaryEntry = 'Proveedores_CODIGO_ASIGNADO'
InPrimaryKey = False
Calculated = False
Lookup = False
LookupCache = False
end
item
Name = 'HOMOLOGADO'
DataType = datInteger
BlobType = dabtUnknown
DictionaryEntry = 'Proveedores_HOMOLOGADO'
InPrimaryKey = False
Calculated = False
Lookup = False
LookupCache = False
end
item
Name = 'CERTIFICACION'
DataType = datString
Size = 255
BlobType = dabtUnknown
DictionaryEntry = 'Proveedores_CERTIFICACION'
InPrimaryKey = False
Calculated = False
Lookup = False
LookupCache = False
end
item
Name = 'GRUPO_PROVEEDOR'
DataType = datString
Size = 255
BlobType = dabtUnknown
DisplayWidth = 0
Alignment = taLeftJustify
InPrimaryKey = False
Calculated = False
Lookup = False
LookupCache = False
end>
BusinessRulesClient.ScriptLanguage = rslPascalScript
BusinessRulesServer.ScriptLanguage = rslPascalScript
end
item
Params = <>
Statements = <
item
Connection = 'IBX'
TargetTable = 'V_EMPLEADOS'
SQL =
'SELECT '#10' ID, ID_CATEGORIA, REFERENCIA, NIF_CIF, NOMBRE, PERSO' +
'NA_CONTACTO, CALLE,'#10' POBLACION, PROVINCIA, CODIGO_POSTAL, TEL' +
'EFONO_1, TELEFONO_2,'#10' MOVIL_1, MOVIL_2, FAX, EMAIL_1, EMAIL_2' +
', PAGINA_WEB,'#10' NOTAS, USUARIO, ID_EMPRESA,'#10' '#10' '#10' CATE' +
'GORIA, FECHA_NACIMIENTO, FECHA_ALTA_EMPRESA, FORMACION_BASE,'#10' ' +
' FORMACION_COMPLE, FORMACION_RECIBIDA, EXPERIENCIA'#10' '#10'FROM V_E' +
'MPLEADOS'
StatementType = stSQL
ColumnMappings = <
item
DatasetField = 'ID'
TableField = 'ID'
end
item
DatasetField = 'ID_CATEGORIA'
TableField = 'ID_CATEGORIA'
end
item
DatasetField = 'NIF_CIF'
TableField = 'NIF_CIF'
end
item
DatasetField = 'NOMBRE'
TableField = 'NOMBRE'
end
item
DatasetField = 'CALLE'
TableField = 'CALLE'
end
item
DatasetField = 'PERSONA_CONTACTO'
TableField = 'PERSONA_CONTACTO'
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 = 'USUARIO'
TableField = 'USUARIO'
end
item
DatasetField = 'ID_EMPRESA'
TableField = 'ID_EMPRESA'
end
item
DatasetField = 'REFERENCIA'
TableField = 'REFERENCIA'
end
item
DatasetField = 'CATEGORIA'
TableField = 'CATEGORIA'
end
item
DatasetField = 'FECHA_NACIMIENTO'
TableField = 'FECHA_NACIMIENTO'
end
item
DatasetField = 'FECHA_ALTA_EMPRESA'
TableField = 'FECHA_ALTA_EMPRESA'
end
item
DatasetField = 'FORMACION_BASE'
TableField = 'FORMACION_BASE'
end
item
DatasetField = 'FORMACION_COMPLE'
TableField = 'FORMACION_COMPLE'
end
item
DatasetField = 'FORMACION_RECIBIDA'
TableField = 'FORMACION_RECIBIDA'
end
item
DatasetField = 'EXPERIENCIA'
TableField = 'EXPERIENCIA'
end>
end>
Name = 'Empleados'
Fields = <
item
Name = 'ID'
DataType = datAutoInc
BlobType = dabtUnknown
DictionaryEntry = 'Contactos_ID'
InPrimaryKey = True
Calculated = False
Lookup = False
LookupCache = False
end
item
Name = 'ID_CATEGORIA'
DataType = datInteger
BlobType = dabtUnknown
DictionaryEntry = 'Contactos_ID_CATEGORIA'
InPrimaryKey = False
Calculated = False
Lookup = False
LookupCache = False
end
item
Name = 'NIF_CIF'
DataType = datString
Size = 15
BlobType = dabtUnknown
DictionaryEntry = 'Contactos_NIF_CIF'
InPrimaryKey = False
Calculated = False
Lookup = False
LookupCache = False
end
item
Name = 'NOMBRE'
DataType = datString
Size = 255
BlobType = dabtUnknown
DictionaryEntry = 'Contactos_NOMBRE'
InPrimaryKey = False
Calculated = False
Lookup = False
LookupCache = False
end
item
Name = 'CALLE'
DataType = datString
Size = 255
BlobType = dabtUnknown
DictionaryEntry = 'Contactos_CALLE'
InPrimaryKey = False
Calculated = False
Lookup = False
LookupCache = False
end
item
Name = 'PERSONA_CONTACTO'
DataType = datString
Size = 255
BlobType = dabtUnknown
DictionaryEntry = 'Contactos_PERSONA_CONTACTO'
InPrimaryKey = False
Calculated = False
Lookup = False
LookupCache = False
end
item
Name = 'POBLACION'
DataType = datString
Size = 255
BlobType = dabtUnknown
DictionaryEntry = 'Contactos_POBLACION'
InPrimaryKey = False
Calculated = False
Lookup = False
LookupCache = False
end
item
Name = 'PROVINCIA'
DataType = datString
Size = 255
BlobType = dabtUnknown
DictionaryEntry = 'Contactos_PROVINCIA'
InPrimaryKey = False
Calculated = False
Lookup = False
LookupCache = False
end
item
Name = 'CODIGO_POSTAL'
DataType = datString
Size = 10
BlobType = dabtUnknown
DictionaryEntry = 'Contactos_CODIGO_POSTAL'
InPrimaryKey = False
Calculated = False
Lookup = False
LookupCache = False
end
item
Name = 'TELEFONO_1'
DataType = datString
Size = 25
BlobType = dabtUnknown
DictionaryEntry = 'Contactos_TELEFONO_1'
InPrimaryKey = False
Calculated = False
Lookup = False
LookupCache = False
end
item
Name = 'TELEFONO_2'
DataType = datString
Size = 25
BlobType = dabtUnknown
DictionaryEntry = 'Contactos_TELEFONO_2'
InPrimaryKey = False
Calculated = False
Lookup = False
LookupCache = False
end
item
Name = 'MOVIL_1'
DataType = datString
Size = 25
BlobType = dabtUnknown
DictionaryEntry = 'Contactos_MOVIL_1'
InPrimaryKey = False
Calculated = False
Lookup = False
LookupCache = False
end
item
Name = 'MOVIL_2'
DataType = datString
Size = 25
BlobType = dabtUnknown
DictionaryEntry = 'Contactos_MOVIL_2'
InPrimaryKey = False
Calculated = False
Lookup = False
LookupCache = False
end
item
Name = 'FAX'
DataType = datString
Size = 25
BlobType = dabtUnknown
DictionaryEntry = 'Contactos_FAX'
InPrimaryKey = False
Calculated = False
Lookup = False
LookupCache = False
end
item
Name = 'EMAIL_1'
DataType = datString
Size = 255
BlobType = dabtUnknown
DictionaryEntry = 'Contactos_EMAIL_1'
InPrimaryKey = False
Calculated = False
Lookup = False
LookupCache = False
end
item
Name = 'EMAIL_2'
DataType = datString
Size = 255
BlobType = dabtUnknown
DictionaryEntry = 'Contactos_EMAIL_2'
InPrimaryKey = False
Calculated = False
Lookup = False
LookupCache = False
end
item
Name = 'PAGINA_WEB'
DataType = datString
Size = 255
BlobType = dabtUnknown
DictionaryEntry = 'Contactos_PAGINA_WEB'
InPrimaryKey = False
Calculated = False
Lookup = False
LookupCache = False
end
item
Name = 'NOTAS'
DataType = datMemo
BlobType = dabtMemo
DictionaryEntry = 'Contactos_NOTAS'
InPrimaryKey = False
Calculated = False
Lookup = False
LookupCache = False
end
item
Name = 'USUARIO'
DataType = datString
Size = 20
BlobType = dabtUnknown
DictionaryEntry = 'Contactos_USUARIO'
InPrimaryKey = False
Calculated = False
Lookup = False
LookupCache = False
end
item
Name = 'ID_EMPRESA'
DataType = datInteger
BlobType = dabtUnknown
DictionaryEntry = 'Contactos_ID_EMPRESA'
InPrimaryKey = False
Calculated = False
Lookup = False
LookupCache = False
end
item
Name = 'REFERENCIA'
DataType = datString
Size = 255
BlobType = dabtUnknown
DictionaryEntry = 'Agentes_REFERENCIA'
InPrimaryKey = False
Calculated = False
Lookup = False
LookupCache = False
end
item
Name = 'CATEGORIA'
DataType = datString
Size = 255
BlobType = dabtUnknown
DictionaryEntry = 'Empleados_CATEGORIA'
InPrimaryKey = False
Calculated = False
Lookup = False
LookupCache = False
end
item
Name = 'FECHA_NACIMIENTO'
DataType = datDateTime
BlobType = dabtUnknown
DictionaryEntry = 'Empleados_FECHA_NACIMIENTO'
InPrimaryKey = False
Calculated = False
Lookup = False
LookupCache = False
end
item
Name = 'FECHA_ALTA_EMPRESA'
DataType = datDateTime
BlobType = dabtUnknown
DictionaryEntry = 'Empleados_FECHA_ALTA_EMPRESA'
InPrimaryKey = False
Calculated = False
Lookup = False
LookupCache = False
end
item
Name = 'FORMACION_BASE'
DataType = datMemo
BlobType = dabtUnknown
DictionaryEntry = 'Empleados_FORMACION_BASE'
InPrimaryKey = False
Calculated = False
Lookup = False
LookupCache = False
end
item
Name = 'FORMACION_COMPLE'
DataType = datMemo
BlobType = dabtUnknown
DictionaryEntry = 'Empleados_FORMACION_COMPLE'
InPrimaryKey = False
Calculated = False
Lookup = False
LookupCache = False
end
item
Name = 'FORMACION_RECIBIDA'
DataType = datMemo
BlobType = dabtUnknown
DictionaryEntry = 'Empleados_FORMACION_RECIBIDA'
InPrimaryKey = False
Calculated = False
Lookup = False
LookupCache = False
end
item
Name = 'EXPERIENCIA'
DataType = datMemo
BlobType = dabtUnknown
DictionaryEntry = 'Empleados_EXPERIENCIA'
InPrimaryKey = False
Calculated = False
Lookup = False
LookupCache = False
end>
BusinessRulesClient.ScriptLanguage = rslPascalScript
BusinessRulesServer.ScriptLanguage = rslPascalScript
end
item
Params = <
item
Name = 'ID_CONTACTO'
DataType = datInteger
BlobType = dabtUnknown
Value = '9'
ParamType = daptInput
end>
Statements = <
item
Connection = 'IBX'
TargetTable = 'CONTACTOS_DIRECCIONES'
SQL =
'SELECT'#10' ID, ID_CONTACTO, NOMBRE, CALLE, POBLACION, PROVINCIA,' +
' CODIGO_POSTAL, PERSONA_CONTACTO,'#10' TELEFONO, MOVIL, FAX, EMAI' +
'L, NOTAS, PORTE'#10' FROM'#10' CONTACTOS_DIRECCIONES'#10' WHERE ID_CONT' +
'ACTO = :ID_CONTACTO'
StatementType = stSQL
ColumnMappings = <
item
DatasetField = 'ID'
TableField = 'ID'
end
item
DatasetField = 'ID_CONTACTO'
TableField = 'ID_CONTACTO'
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 = 'PERSONA_CONTACTO'
TableField = 'PERSONA_CONTACTO'
end
item
DatasetField = 'NOMBRE'
TableField = 'NOMBRE'
end
item
DatasetField = 'TELEFONO'
TableField = 'TELEFONO'
end
item
DatasetField = 'EMAIL'
TableField = 'EMAIL'
end
item
DatasetField = 'NOTAS'
TableField = 'NOTAS'
end
item
DatasetField = 'PORTE'
TableField = 'PORTE'
end
item
DatasetField = 'MOVIL'
TableField = 'MOVIL'
end
item
DatasetField = 'FAX'
TableField = 'FAX'
end>
end>
Name = 'DireccionesContacto'
Fields = <
item
Name = 'ID'
DataType = datAutoInc
BlobType = dabtUnknown
DictionaryEntry = 'DireccionesContacto_ID'
InPrimaryKey = True
Calculated = False
Lookup = False
LookupCache = False
end
item
Name = 'ID_CONTACTO'
DataType = datInteger
BlobType = dabtUnknown
DictionaryEntry = 'DireccionesContacto_ID_CONTACTO'
InPrimaryKey = False
Calculated = False
Lookup = False
LookupCache = False
end
item
Name = 'NOMBRE'
DataType = datString
Size = 255
BlobType = dabtUnknown
DictionaryEntry = 'DireccionesContacto_NOMBRE'
InPrimaryKey = False
Calculated = False
Lookup = False
LookupCache = False
end
item
Name = 'CALLE'
DataType = datString
Size = 255
BlobType = dabtUnknown
DictionaryEntry = 'DireccionesContacto_CALLE'
InPrimaryKey = False
Calculated = False
Lookup = False
LookupCache = False
end
item
Name = 'POBLACION'
DataType = datString
Size = 255
BlobType = dabtUnknown
DictionaryEntry = 'DireccionesContacto_POBLACION'
InPrimaryKey = False
Calculated = False
Lookup = False
LookupCache = False
end
item
Name = 'PROVINCIA'
DataType = datString
Size = 255
BlobType = dabtUnknown
DictionaryEntry = 'DireccionesContacto_PROVINCIA'
InPrimaryKey = False
Calculated = False
Lookup = False
LookupCache = False
end
item
Name = 'CODIGO_POSTAL'
DataType = datString
Size = 10
BlobType = dabtUnknown
DictionaryEntry = 'DireccionesContacto_CODIGO_POSTAL'
InPrimaryKey = False
Calculated = False
Lookup = False
LookupCache = False
end
item
Name = 'PERSONA_CONTACTO'
DataType = datString
Size = 255
BlobType = dabtUnknown
DictionaryEntry = 'DireccionesContacto_PERSONA_CONTACTO'
InPrimaryKey = False
Calculated = False
Lookup = False
LookupCache = False
end
item
Name = 'TELEFONO'
DataType = datString
Size = 25
BlobType = dabtUnknown
DictionaryEntry = 'DireccionesContacto_TELEFONO'
InPrimaryKey = False
Calculated = False
Lookup = False
LookupCache = False
end
item
Name = 'MOVIL'
DataType = datString
Size = 25
BlobType = dabtUnknown
DictionaryEntry = 'Contactos_MOVIL_1'
InPrimaryKey = False
Calculated = False
Lookup = False
LookupCache = False
end
item
Name = 'FAX'
DataType = datString
Size = 25
BlobType = dabtUnknown
DictionaryEntry = 'Contactos_FAX'
InPrimaryKey = False
Calculated = False
Lookup = False
LookupCache = False
end
item
Name = 'EMAIL'
DataType = datString
Size = 255
BlobType = dabtUnknown
DictionaryEntry = 'DireccionesContacto_EMAIL'
InPrimaryKey = False
Calculated = False
Lookup = False
LookupCache = False
end
item
Name = 'NOTAS'
DataType = datMemo
BlobType = dabtUnknown
DictionaryEntry = 'DireccionesContacto_NOTAS'
InPrimaryKey = False
Calculated = False
Lookup = False
LookupCache = False
end
item
Name = 'PORTE'
DataType = datFloat
BlobType = dabtUnknown
DictionaryEntry = 'DireccionesContacto_PORTE'
InPrimaryKey = False
Calculated = False
Lookup = False
LookupCache = False
end>
BusinessRulesClient.ScriptLanguage = rslPascalScript
BusinessRulesServer.ScriptLanguage = rslPascalScript
end
item
Params = <
item
Name = 'ID_CLIENTE'
DataType = datInteger
BlobType = dabtUnknown
Value = ''
ParamType = daptInput
end>
Statements = <
item
Connection = 'IBX'
TargetTable = 'CLIENTES_DTOS_PROVEEDORES'
SQL =
'SELECT '#10' CLIENTES_DTOS_PROVEEDORES.ID,'#10' CLIENTES_DTOS_PROV' +
'EEDORES.ID_CLIENTE,'#10' CLIENTES_DTOS_PROVEEDORES.ID_PROVEEDOR,'#10 +
' CONTACTOS.NOMBRE,'#10' CLIENTES_DTOS_PROVEEDORES.DESCUENTO'#10' ' +
'FROM'#10' CLIENTES_DTOS_PROVEEDORES'#10' LEFT JOIN CONTACTOS ON (CON' +
'TACTOS.ID = CLIENTES_DTOS_PROVEEDORES.ID_PROVEEDOR)'#10'WHERE CLIENT' +
'ES_DTOS_PROVEEDORES.ID_CLIENTE = :ID_CLIENTE'
StatementType = stSQL
ColumnMappings = <
item
DatasetField = 'ID'
TableField = 'ID'
end
item
DatasetField = 'ID_CLIENTE'
TableField = 'ID_CLIENTE'
end
item
DatasetField = 'ID_PROVEEDOR'
TableField = 'ID_PROVEEDOR'
end
item
DatasetField = 'DESCUENTO'
TableField = 'DESCUENTO'
end
item
DatasetField = 'NOMBRE'
TableField = 'NOMBRE'
end>
end>
Name = 'ClientesDescuentos'
Fields = <
item
Name = 'ID'
DataType = datInteger
BlobType = dabtUnknown
DictionaryEntry = 'ClientesDescuentos_ID'
InPrimaryKey = True
Calculated = False
Lookup = False
LookupCache = False
end
item
Name = 'ID_CLIENTE'
DataType = datInteger
BlobType = dabtUnknown
DictionaryEntry = 'ClientesDescuentos_ID_CLIENTE'
InPrimaryKey = False
Calculated = False
Lookup = False
LookupCache = False
end
item
Name = 'ID_PROVEEDOR'
DataType = datInteger
BlobType = dabtUnknown
DictionaryEntry = 'ClientesDescuentos_ID_PROVEEDOR'
InPrimaryKey = False
Calculated = False
Lookup = False
LookupCache = False
end
item
Name = 'NOMBRE'
DataType = datString
Size = 255
BlobType = dabtUnknown
DisplayWidth = 0
DisplayLabel = 'ClientesDescuentos_NOMBRE'
Alignment = taLeftJustify
ServerAutoRefresh = True
InPrimaryKey = False
Calculated = False
Lookup = False
LookupCache = False
end
item
Name = 'DESCUENTO'
DataType = datFloat
BlobType = dabtUnknown
DictionaryEntry = 'ClientesDescuentos_DESCUENTO'
InPrimaryKey = False
Calculated = False
Lookup = False
LookupCache = False
end>
BusinessRulesClient.ScriptLanguage = rslPascalScript
BusinessRulesServer.ScriptLanguage = rslPascalScript
end
item
Params = <>
Statements = <
item
Connection = 'IBX'
TargetTable = 'PROVEEDORES_GRUPOS'
SQL = 'SELECT DESCRIPCION'#10'FROM PROVEEDORES_GRUPOS'
StatementType = stSQL
ColumnMappings = <
item
DatasetField = 'DESCRIPCION'
TableField = 'DESCRIPCION'
end>
end>
Name = 'GruposProveedor'
Fields = <
item
Name = 'DESCRIPCION'
DataType = datString
Size = 255
BlobType = dabtUnknown
DisplayWidth = 0
Alignment = taLeftJustify
InPrimaryKey = False
Calculated = False
Lookup = False
LookupCache = False
end>
BusinessRulesClient.ScriptLanguage = rslPascalScript
BusinessRulesServer.ScriptLanguage = rslPascalScript
end
item
Params = <>
Statements = <
item
Connection = 'IBX'
TargetTable = 'EMPLEADOS_GRUPOS'
SQL = 'SELECT DESCRIPCION'#10'FROM EMPLEADOS_GRUPOS'
StatementType = stSQL
ColumnMappings = <
item
DatasetField = 'DESCRIPCION'
TableField = 'DESCRIPCION'
end>
end>
Name = 'GruposEmpleado'
Fields = <
item
Name = 'DESCRIPCION'
DataType = datString
Size = 255
BlobType = dabtUnknown
DisplayWidth = 0
Alignment = taLeftJustify
InPrimaryKey = False
Calculated = False
Lookup = False
LookupCache = False
end>
BusinessRulesClient.ScriptLanguage = rslPascalScript
BusinessRulesServer.ScriptLanguage = rslPascalScript
end>
Commands = <
item
Params = <
item
Name = 'ID'
DataType = datInteger
BlobType = dabtUnknown
Value = ''
ParamType = daptInput
end
item
Name = 'NIF_CIF'
DataType = datString
Size = 15
BlobType = dabtUnknown
Value = ''
ParamType = daptInput
end
item
Name = 'NOMBRE'
DataType = datString
Size = 255
BlobType = dabtUnknown
Value = ''
ParamType = daptInput
end
item
Name = 'PERSONA_CONTACTO'
DataType = datString
Size = 255
BlobType = dabtUnknown
Value = ''
ParamType = daptInput
end
item
Name = 'CALLE'
DataType = datString
Size = 255
BlobType = dabtUnknown
Value = ''
ParamType = daptInput
end
item
Name = 'POBLACION'
DataType = datString
Size = 255
BlobType = dabtUnknown
Value = ''
ParamType = daptInput
end
item
Name = 'PROVINCIA'
DataType = datString
Size = 255
BlobType = dabtUnknown
Value = ''
ParamType = daptInput
end
item
Name = 'CODIGO_POSTAL'
DataType = datString
Size = 10
BlobType = dabtUnknown
Value = ''
ParamType = daptInput
end
item
Name = 'TELEFONO_1'
DataType = datString
Size = 25
BlobType = dabtUnknown
Value = ''
ParamType = daptInput
end
item
Name = 'TELEFONO_2'
DataType = datString
Size = 25
BlobType = dabtUnknown
Value = ''
ParamType = daptInput
end
item
Name = 'MOVIL_1'
DataType = datString
Size = 25
BlobType = dabtUnknown
Value = ''
ParamType = daptInput
end
item
Name = 'MOVIL_2'
DataType = datString
Size = 25
BlobType = dabtUnknown
Value = ''
ParamType = daptInput
end
item
Name = 'FAX'
DataType = datString
Size = 25
BlobType = dabtUnknown
Value = ''
ParamType = daptInput
end
item
Name = 'EMAIL_1'
DataType = datString
Size = 255
BlobType = dabtUnknown
Value = ''
ParamType = daptInput
end
item
Name = 'EMAIL_2'
DataType = datString
Size = 255
BlobType = dabtUnknown
Value = ''
ParamType = daptInput
end
item
Name = 'PAGINA_WEB'
DataType = datString
Size = 255
BlobType = dabtUnknown
Value = ''
ParamType = daptInput
end
item
Name = 'NOTAS'
DataType = datMemo
BlobType = dabtUnknown
Value = ''
ParamType = daptInput
end
item
Name = 'USUARIO'
DataType = datString
Size = 20
BlobType = dabtUnknown
Value = ''
ParamType = daptInput
end
item
Name = 'REFERENCIA'
DataType = datString
Size = 255
BlobType = dabtUnknown
Value = ''
ParamType = daptInput
end>
Statements = <
item
Connection = 'IBX'
TargetTable = 'CONTACTOS'
SQL =
'INSERT'#10' INTO CONTACTOS'#10' (ID, NIF_CIF, NOMBRE, PERSONA_CONTAC' +
'TO, CALLE, POBLACION, PROVINCIA, CODIGO_POSTAL,'#10' TELEFONO_1,' +
' TELEFONO_2, MOVIL_1, MOVIL_2, FAX, EMAIL_1, '#10' EMAIL_2, PAGI' +
'NA_WEB, NOTAS, USUARIO, REFERENCIA)'#10' VALUES'#10' (:ID, :NIF_CIF,' +
' :NOMBRE, :PERSONA_CONTACTO, :CALLE, :POBLACION, :PROVINCIA,'#10' ' +
' :CODIGO_POSTAL, :TELEFONO_1, :TELEFONO_2, :MOVIL_1, '#10' :MOV' +
'IL_2, :FAX, :EMAIL_1, :EMAIL_2, :PAGINA_WEB, :NOTAS, '#10' :USUA' +
'RIO, :REFERENCIA)'
StatementType = stSQL
ColumnMappings = <>
end>
Name = 'Insert_Contactos'
end
item
Params = <
item
Name = 'OLD_ID'
DataType = datInteger
BlobType = dabtUnknown
Value = ''
ParamType = daptInput
end>
Statements = <
item
Connection = 'IBX'
TargetTable = 'CONTACTOS'
SQL = 'DELETE '#10' FROM'#10' CONTACTOS'#10' WHERE'#10' (ID = :OLD_ID)'
StatementType = stSQL
ColumnMappings = <>
end>
Name = 'Delete_Contactos'
end
item
Params = <
item
Name = 'ID'
DataType = datInteger
BlobType = dabtUnknown
Value = ''
ParamType = daptInput
end
item
Name = 'NIF_CIF'
DataType = datString
Size = 15
BlobType = dabtUnknown
Value = ''
ParamType = daptInput
end
item
Name = 'NOMBRE'
DataType = datString
Size = 255
BlobType = dabtUnknown
Value = ''
ParamType = daptInput
end
item
Name = 'PERSONA_CONTACTO'
DataType = datString
Size = 255
BlobType = dabtUnknown
Value = ''
ParamType = daptInput
end
item
Name = 'CALLE'
DataType = datString
Size = 255
BlobType = dabtUnknown
Value = ''
ParamType = daptInput
end
item
Name = 'POBLACION'
DataType = datString
Size = 255
BlobType = dabtUnknown
Value = ''
ParamType = daptInput
end
item
Name = 'PROVINCIA'
DataType = datString
Size = 255
BlobType = dabtUnknown
Value = ''
ParamType = daptInput
end
item
Name = 'CODIGO_POSTAL'
DataType = datString
Size = 10
BlobType = dabtUnknown
Value = ''
ParamType = daptInput
end
item
Name = 'TELEFONO_1'
DataType = datString
Size = 25
BlobType = dabtUnknown
Value = ''
ParamType = daptInput
end
item
Name = 'TELEFONO_2'
DataType = datString
Size = 25
BlobType = dabtUnknown
Value = ''
ParamType = daptInput
end
item
Name = 'MOVIL_1'
DataType = datString
Size = 25
BlobType = dabtUnknown
Value = ''
ParamType = daptInput
end
item
Name = 'MOVIL_2'
DataType = datString
Size = 25
BlobType = dabtUnknown
Value = ''
ParamType = daptInput
end
item
Name = 'FAX'
DataType = datString
Size = 25
BlobType = dabtUnknown
Value = ''
ParamType = daptInput
end
item
Name = 'EMAIL_1'
DataType = datString
Size = 255
BlobType = dabtUnknown
Value = ''
ParamType = daptInput
end
item
Name = 'EMAIL_2'
DataType = datString
Size = 255
BlobType = dabtUnknown
Value = ''
ParamType = daptInput
end
item
Name = 'PAGINA_WEB'
DataType = datString
Size = 255
BlobType = dabtUnknown
Value = ''
ParamType = daptInput
end
item
Name = 'NOTAS'
DataType = datMemo
BlobType = dabtUnknown
Value = ''
ParamType = daptInput
end
item
Name = 'USUARIO'
DataType = datString
Size = 20
BlobType = dabtUnknown
Value = ''
ParamType = daptInput
end
item
Name = 'REFERENCIA'
DataType = datString
Size = 255
BlobType = dabtUnknown
Value = ''
ParamType = daptInput
end
item
Name = 'OLD_ID'
DataType = datInteger
BlobType = dabtUnknown
Value = ''
ParamType = daptInput
end>
Statements = <
item
Connection = 'IBX'
TargetTable = 'CONTACTOS'
SQL =
'UPDATE CONTACTOS'#10' SET '#10' ID = :ID,'#10' NIF_CIF = :NIF_CIF, '#10' ' +
' NOMBRE = :NOMBRE, '#10' PERSONA_CONTACTO = :PERSONA_CONTACTO,'#10 +
' CALLE = :CALLE, '#10' POBLACION = :POBLACION, '#10' PROVINCIA ' +
'= :PROVINCIA, '#10' CODIGO_POSTAL = :CODIGO_POSTAL, '#10' TELEFONO' +
'_1 = :TELEFONO_1, '#10' TELEFONO_2 = :TELEFONO_2, '#10' MOVIL_1 = ' +
':MOVIL_1, '#10' MOVIL_2 = :MOVIL_2, '#10' FAX = :FAX, '#10' EMAIL_1' +
' = :EMAIL_1, '#10' EMAIL_2 = :EMAIL_2, '#10' PAGINA_WEB = :PAGINA_' +
'WEB, '#10' NOTAS = :NOTAS, '#10' USUARIO = :USUARIO,'#10' REFERENCI' +
'A = :REFERENCIA'#10' WHERE'#10' (ID = :OLD_ID)'
StatementType = stSQL
ColumnMappings = <>
end>
Name = 'Update_Contactos'
end
item
Params = <
item
Name = 'ID'
DataType = datInteger
BlobType = dabtUnknown
Value = ''
ParamType = daptInput
end
item
Name = 'ID_CONTACTO'
DataType = datInteger
BlobType = dabtUnknown
Value = ''
ParamType = daptInput
end
item
Name = 'TITULAR'
DataType = datString
Size = 255
BlobType = dabtUnknown
Value = ''
ParamType = daptInput
end
item
Name = 'ENTIDAD'
DataType = datString
Size = 15
BlobType = dabtUnknown
Value = ''
ParamType = daptInput
end
item
Name = 'SUCURSAL'
DataType = datString
Size = 15
BlobType = dabtUnknown
Value = ''
ParamType = daptInput
end
item
Name = 'DC'
DataType = datString
Size = 15
BlobType = dabtUnknown
Value = ''
ParamType = daptInput
end
item
Name = 'CUENTA'
DataType = datString
Size = 15
BlobType = dabtUnknown
Value = ''
ParamType = daptInput
end>
Statements = <
item
Connection = 'IBX'
TargetTable = 'CONTACTOS_DATOS_BANCO'
SQL =
'INSERT'#10' INTO CONTACTOS_DATOS_BANCO'#10' (ID, ID_CONTACTO, TITULA' +
'R, ENTIDAD, SUCURSAL, DC, CUENTA)'#10' VALUES'#10' (:ID, :ID_CONTACT' +
'O, :TITULAR, :ENTIDAD, :SUCURSAL, :DC, :CUENTA)'
StatementType = stSQL
ColumnMappings = <>
end>
Name = 'Insert_DatosBancarios'
end
item
Params = <
item
Name = 'OLD_ID'
DataType = datInteger
BlobType = dabtUnknown
Value = ''
ParamType = daptInput
end>
Statements = <
item
Connection = 'IBX'
TargetTable = 'CONTACTOS_DATOS_BANCO'
SQL =
'DELETE '#10' FROM'#10' CONTACTOS_DATOS_BANCO'#10' WHERE'#10' (ID = :OLD_' +
'ID)'
StatementType = stSQL
ColumnMappings = <>
end>
Name = 'Delete_DatosBancarios'
end
item
Params = <
item
Name = 'ID_CONTACTO'
DataType = datInteger
BlobType = dabtUnknown
Value = ''
ParamType = daptInput
end
item
Name = 'TITULAR'
DataType = datString
Size = 255
BlobType = dabtUnknown
Value = ''
ParamType = daptInput
end
item
Name = 'ENTIDAD'
DataType = datString
Size = 15
BlobType = dabtUnknown
Value = ''
ParamType = daptInput
end
item
Name = 'SUCURSAL'
DataType = datString
Size = 15
BlobType = dabtUnknown
Value = ''
ParamType = daptInput
end
item
Name = 'DC'
DataType = datString
Size = 15
BlobType = dabtUnknown
Value = ''
ParamType = daptInput
end
item
Name = 'CUENTA'
DataType = datString
Size = 15
BlobType = dabtUnknown
Value = ''
ParamType = daptInput
end
item
Name = 'OLD_ID'
DataType = datInteger
BlobType = dabtUnknown
Value = ''
ParamType = daptInput
end>
Statements = <
item
Connection = 'IBX'
TargetTable = 'CONTACTOS_DATOS_BANCO'
SQL =
'UPDATE CONTACTOS_DATOS_BANCO'#10' SET '#10' ID_CONTACTO = :ID_CONTAC' +
'TO, '#10' TITULAR = :TITULAR, '#10' ENTIDAD = :ENTIDAD, '#10' SUCUR' +
'SAL = :SUCURSAL, '#10' DC = :DC, '#10' CUENTA = :CUENTA'#10' WHERE'#10' ' +
' (ID = :OLD_ID)'
StatementType = stSQL
ColumnMappings = <>
end>
Name = 'Update_DatosBancarios'
end
item
Params = <
item
Name = 'ID_CONTACTO'
DataType = datInteger
BlobType = dabtUnknown
Value = ''
ParamType = daptInput
end
item
Name = 'ID_CATEGORIA'
DataType = datInteger
BlobType = dabtUnknown
Value = ''
ParamType = daptInput
end>
Statements = <
item
Connection = 'IBX'
TargetTable = 'CONTACTOS_CATEGORIAS'
SQL =
'INSERT'#10' INTO CONTACTOS_CATEGORIAS'#10' (ID_CONTACTO, ID_CATEGORI' +
'A)'#10' VALUES'#10' (:ID_CONTACTO, :ID_CATEGORIA)'
StatementType = stSQL
ColumnMappings = <>
end>
Name = 'Insert_ContactosCategorias'
end
item
Params = <
item
Name = 'OLD_ID_CONTACTO'
DataType = datInteger
BlobType = dabtUnknown
Value = ''
ParamType = daptInput
end
item
Name = 'OLD_ID_CATEGORIA'
DataType = datInteger
BlobType = dabtUnknown
Value = ''
ParamType = daptInput
end>
Statements = <
item
Connection = 'IBX'
TargetTable = 'CONTACTOS_CATEGORIAS'
SQL =
'DELETE '#10' FROM'#10' CONTACTOS_CATEGORIAS'#10' WHERE'#10' (ID_CONTACTO' +
' = :OLD_ID_CONTACTO) AND '#10' (ID_CATEGORIA = :OLD_ID_CATEGORIA)'
StatementType = stSQL
ColumnMappings = <>
end>
Name = 'Delete_ContactosCategorias'
end
item
Params = <
item
Name = 'ID_CONTACTO'
DataType = datInteger
BlobType = dabtUnknown
Value = ''
ParamType = daptInput
end
item
Name = 'ID_CATEGORIA'
DataType = datInteger
BlobType = dabtUnknown
Value = ''
ParamType = daptInput
end
item
Name = 'OLD_ID_CONTACTO'
DataType = datInteger
BlobType = dabtUnknown
Value = ''
ParamType = daptInput
end
item
Name = 'OLD_ID_CATEGORIA'
DataType = datInteger
BlobType = dabtUnknown
Value = ''
ParamType = daptInput
end>
Statements = <
item
Connection = 'IBX'
TargetTable = 'CONTACTOS_CATEGORIAS'
SQL =
'UPDATE CONTACTOS_CATEGORIAS'#10' SET '#10' ID_CONTACTO = :ID_CONTACT' +
'O, '#10' ID_CATEGORIA = :ID_CATEGORIA'#10' WHERE'#10' (ID_CONTACTO = ' +
':OLD_ID_CONTACTO) AND '#10' (ID_CATEGORIA = :OLD_ID_CATEGORIA)'
StatementType = stSQL
ColumnMappings = <>
end>
Name = 'Update_ContactosCategorias'
end
item
Params = <
item
Name = 'ID_CONTACTO'
DataType = datInteger
BlobType = dabtUnknown
Value = ''
ParamType = daptInput
end>
Statements = <
item
Connection = 'IBX'
TargetTable = 'EMPRESAS_CONTACTOS'
SQL =
'INSERT INTO EMPRESAS_CONTACTOS'#10' (ID_EMPRESA, ID_CONTACTO)'#10#10'SE' +
'LECT ID, :ID_CONTACTO'#10'FROM EMPRESAS'
StatementType = stSQL
ColumnMappings = <>
end>
Name = 'Insert_ContactoEmpresas'
end
item
Params = <
item
Name = 'OLD_ID_CONTACTO'
DataType = datInteger
BlobType = dabtUnknown
Value = ''
ParamType = daptInput
end>
Statements = <
item
Connection = 'IBX'
TargetTable = 'EMPRESAS_CONTACTOS'
SQL =
'DELETE '#10' FROM'#10' EMPRESAS_CONTACTOS'#10' WHERE'#10' (ID_CONTACTO =' +
' :OLD_ID_CONTACTO)'
StatementType = stSQL
ColumnMappings = <>
end>
Name = 'Delete_ContactoEmpresas'
end
item
Params = <
item
Name = 'ID_EMPRESA'
DataType = datInteger
BlobType = dabtUnknown
Value = ''
ParamType = daptInput
end
item
Name = 'ID_CONTACTO'
DataType = datInteger
BlobType = dabtUnknown
Value = ''
ParamType = daptInput
end
item
Name = 'OLD_ID_EMPRESA'
DataType = datInteger
BlobType = dabtUnknown
Value = ''
ParamType = daptInput
end
item
Name = 'OLD_ID_CONTACTO'
DataType = datInteger
BlobType = dabtUnknown
Value = ''
ParamType = daptInput
end>
Statements = <
item
Connection = 'IBX'
TargetTable = 'EMPRESAS_CONTACTOS'
SQL =
'UPDATE EMPRESAS_CONTACTOS'#10' SET '#10' ID_EMPRESA = :ID_EMPRESA, '#10 +
' ID_CONTACTO = :ID_CONTACTO'#10' WHERE'#10' (ID_EMPRESA = :OLD_ID' +
'_EMPRESA) AND '#10' (ID_CONTACTO = :OLD_ID_CONTACTO)'
StatementType = stSQL
ColumnMappings = <>
end>
Name = 'Update_ContactoEmpresa'
end
item
Params = <
item
Name = 'ID_CLIENTE'
DataType = datInteger
BlobType = dabtUnknown
Value = ''
ParamType = daptInput
end
item
Name = 'GRUPO_CLIENTE'
DataType = datString
Size = 255
BlobType = dabtUnknown
Value = ''
ParamType = daptInput
end
item
Name = 'RECARGO_EQUIVALENCIA'
DataType = datInteger
BlobType = dabtUnknown
Value = ''
ParamType = daptInput
end
item
Name = 'NOMBRE_COMERCIAL'
DataType = datString
Size = 255
BlobType = dabtUnknown
Value = ''
ParamType = daptInput
end
item
Name = 'VENCIMIENTO_FACTURAS'
DataType = datInteger
BlobType = dabtUnknown
Value = ''
ParamType = daptInput
end
item
Name = 'BLOQUEADO'
DataType = datInteger
BlobType = dabtUnknown
Value = ''
ParamType = daptInput
end
item
Name = 'MOTIVO_BLOQUEO'
DataType = datString
Size = 255
BlobType = dabtUnknown
Value = ''
ParamType = daptInput
end
item
Name = 'REGIMEN_IVA'
DataType = datString
Size = 255
BlobType = dabtUnknown
Value = ''
ParamType = daptInput
end
item
Name = 'ID_TIPO_IVA'
DataType = datInteger
BlobType = dabtUnknown
Value = ''
ParamType = daptInput
end
item
Name = 'ID_FORMA_PAGO'
DataType = datInteger
BlobType = dabtUnknown
Value = ''
ParamType = daptInput
end
item
Name = 'TIENDA_WEB'
DataType = datInteger
BlobType = dabtUnknown
Value = ''
ParamType = daptInput
end>
Statements = <
item
Connection = 'IBX'
TargetTable = 'CLIENTES_DATOS'
SQL =
'INSERT'#10' INTO CLIENTES_DATOS'#10' (ID_CLIENTE, GRUPO_CLIENTE, REC' +
'ARGO_EQUIVALENCIA,'#10' NOMBRE_COMERCIAL, VENCIMIENTO_FACTURAS, ' +
'BLOQUEADO, MOTIVO_BLOQUEO,'#10' REGIMEN_IVA, ID_TIPO_IVA, ID_FOR' +
'MA_PAGO, TIENDA_WEB)'#10' VALUES'#10' (:ID_CLIENTE, :GRUPO_CLIENTE, ' +
':RECARGO_EQUIVALENCIA,'#10' :NOMBRE_COMERCIAL, :VENCIMIENTO_FACT' +
'URAS,'#10' :BLOQUEADO, :MOTIVO_BLOQUEO, :REGIMEN_IVA,'#10' :ID_T' +
'IPO_IVA, :ID_FORMA_PAGO, :TIENDA_WEB)'
StatementType = stSQL
ColumnMappings = <>
end>
Name = 'Insert_ClientesDatos'
end
item
Params = <
item
Name = 'OLD_ID_CLIENTE'
DataType = datInteger
BlobType = dabtUnknown
Value = ''
ParamType = daptInput
end>
Statements = <
item
Connection = 'IBX'
TargetTable = 'CLIENTES_DATOS'
SQL =
'DELETE '#10' FROM'#10' CLIENTES_DATOS'#10' WHERE'#10' (ID_CLIENTE = :OLD' +
'_ID_CLIENTE)'
StatementType = stSQL
ColumnMappings = <>
end>
Name = 'Delete_ClientesDatos'
end
item
Params = <
item
Name = 'ID_CLIENTE'
DataType = datInteger
BlobType = dabtUnknown
Value = ''
ParamType = daptInput
end
item
Name = 'GRUPO_CLIENTE'
DataType = datString
Size = 255
BlobType = dabtUnknown
Value = ''
ParamType = daptInput
end
item
Name = 'MOTIVO_BLOQUEO'
DataType = datString
Size = 255
BlobType = dabtUnknown
Value = ''
ParamType = daptInput
end
item
Name = 'RECARGO_EQUIVALENCIA'
DataType = datInteger
BlobType = dabtUnknown
Value = ''
ParamType = daptInput
end
item
Name = 'NOMBRE_COMERCIAL'
DataType = datString
Size = 255
BlobType = dabtUnknown
Value = ''
ParamType = daptInput
end
item
Name = 'VENCIMIENTO_FACTURAS'
DataType = datInteger
BlobType = dabtUnknown
Value = ''
ParamType = daptInput
end
item
Name = 'BLOQUEADO'
DataType = datInteger
BlobType = dabtUnknown
Value = ''
ParamType = daptInput
end
item
Name = 'REGIMEN_IVA'
DataType = datString
Size = 255
BlobType = dabtUnknown
Value = ''
ParamType = daptInput
end
item
Name = 'ID_TIPO_IVA'
DataType = datInteger
BlobType = dabtUnknown
Value = ''
ParamType = daptInput
end
item
Name = 'ID_FORMA_PAGO'
DataType = datInteger
BlobType = dabtUnknown
Value = ''
ParamType = daptInput
end
item
Name = 'TIENDA_WEB'
DataType = datInteger
BlobType = dabtUnknown
Value = ''
ParamType = daptInput
end
item
Name = 'OLD_ID_CLIENTE'
DataType = datInteger
BlobType = dabtUnknown
Value = ''
ParamType = daptInput
end>
Statements = <
item
Connection = 'IBX'
TargetTable = 'CLIENTES_DATOS'
SQL =
'UPDATE CLIENTES_DATOS'#10' SET '#10' ID_CLIENTE = :ID_CLIENTE, '#10' ' +
'GRUPO_CLIENTE = :GRUPO_CLIENTE,'#10' MOTIVO_BLOQUEO = :MOTIVO_BLO' +
'QUEO,'#10' RECARGO_EQUIVALENCIA = :RECARGO_EQUIVALENCIA,'#10' NOMB' +
'RE_COMERCIAL = :NOMBRE_COMERCIAL,'#10' VENCIMIENTO_FACTURAS = :VE' +
'NCIMIENTO_FACTURAS,'#10' BLOQUEADO = :BLOQUEADO,'#10' REGIMEN_IVA ' +
'= :REGIMEN_IVA,'#10' ID_TIPO_IVA = :ID_TIPO_IVA,'#10' ID_FORMA_PAG' +
'O = :ID_FORMA_PAGO,'#10' TIENDA_WEB = :TIENDA_WEB'#10' WHERE'#10' (ID' +
'_CLIENTE = :OLD_ID_CLIENTE)'
StatementType = stSQL
ColumnMappings = <>
end>
Name = 'Update_ClientesDatos'
end
item
Params = <
item
Name = 'ID_PROVEEDOR'
DataType = datInteger
BlobType = dabtUnknown
Value = ''
ParamType = daptInput
end
item
Name = 'REGIMEN_IVA'
DataType = datString
Size = 255
BlobType = dabtUnknown
Value = ''
ParamType = daptInput
end
item
Name = 'DESCUENTO'
DataType = datFloat
BlobType = dabtUnknown
Value = ''
ParamType = daptInput
end
item
Name = 'DESCRIPCION_PROVEEDOR'
DataType = datString
Size = 255
BlobType = dabtUnknown
Value = ''
ParamType = daptInput
end
item
Name = 'CODIGO_ASIGNADO'
DataType = datString
Size = 255
BlobType = dabtUnknown
Value = ''
ParamType = daptInput
end
item
Name = 'ID_TIPO_IVA'
DataType = datInteger
BlobType = dabtUnknown
Value = ''
ParamType = daptInput
end
item
Name = 'ID_FORMA_PAGO'
DataType = datInteger
BlobType = dabtUnknown
Value = ''
ParamType = daptInput
end
item
Name = 'TIENDA_WEB'
DataType = datInteger
BlobType = dabtUnknown
Value = ''
ParamType = daptInput
end
item
Name = 'HOMOLOGADO'
DataType = datInteger
BlobType = dabtUnknown
Value = ''
ParamType = daptInput
end
item
Name = 'CERTIFICACION'
DataType = datString
Size = 255
BlobType = dabtUnknown
Value = ''
ParamType = daptInput
end
item
Name = 'GRUPO_PROVEEDOR'
DataType = datString
Size = 255
BlobType = dabtUnknown
Value = ''
ParamType = daptInput
end>
Statements = <
item
Connection = 'IBX'
TargetTable = 'PROVEEDORES_DATOS'
SQL =
'INSERT'#10' INTO PROVEEDORES_DATOS'#10' (ID_PROVEEDOR, REGIMEN_IVA, ' +
'DESCUENTO, DESCRIPCION_PROVEEDOR,'#10' CODIGO_ASIGNADO, ID_TIPO_I' +
'VA,'#10' ID_FORMA_PAGO, TIENDA_WEB, HOMOLOGADO, CERTIFICACION, GR' +
'UPO_PROVEEDOR)'#10' VALUES'#10' (:ID_PROVEEDOR, :REGIMEN_IVA, :DESCU' +
'ENTO, :DESCRIPCION_PROVEEDOR,'#10' :CODIGO_ASIGNADO, :ID_TIPO_IVA' +
','#10' :ID_FORMA_PAGO, :TIENDA_WEB, :HOMOLOGADO, :CERTIFICACION, ' +
':GRUPO_PROVEEDOR)'
StatementType = stSQL
ColumnMappings = <>
end>
Name = 'Insert_ProveedoresDatos'
end
item
Params = <
item
Name = 'OLD_ID_PROVEEDOR'
DataType = datInteger
BlobType = dabtUnknown
Value = ''
ParamType = daptInput
end>
Statements = <
item
Connection = 'IBX'
TargetTable = 'PROVEEDORES_DATOS'
SQL =
'DELETE '#10' FROM'#10' PROVEEDORES_DATOS'#10' WHERE'#10' (ID_PROVEEDOR =' +
' :OLD_ID_PROVEEDOR)'
StatementType = stSQL
ColumnMappings = <>
end>
Name = 'Delete_ProveedoresDatos'
end
item
Params = <
item
Name = 'ID_PROVEEDOR'
DataType = datInteger
BlobType = dabtUnknown
Value = ''
ParamType = daptInput
end
item
Name = 'REGIMEN_IVA'
DataType = datString
Size = 255
BlobType = dabtUnknown
Value = ''
ParamType = daptInput
end
item
Name = 'DESCUENTO'
DataType = datFloat
BlobType = dabtUnknown
Value = ''
ParamType = daptInput
end
item
Name = 'DESCRIPCION_PROVEEDOR'
DataType = datString
Size = 255
BlobType = dabtUnknown
Value = ''
ParamType = daptInput
end
item
Name = 'CODIGO_ASIGNADO'
DataType = datString
Size = 255
BlobType = dabtUnknown
Value = ''
ParamType = daptInput
end
item
Name = 'ID_TIPO_IVA'
DataType = datInteger
BlobType = dabtUnknown
Value = ''
ParamType = daptInput
end
item
Name = 'ID_FORMA_PAGO'
DataType = datInteger
BlobType = dabtUnknown
Value = ''
ParamType = daptInput
end
item
Name = 'TIENDA_WEB'
DataType = datInteger
BlobType = dabtUnknown
Value = ''
ParamType = daptInput
end
item
Name = 'HOMOLOGADO'
DataType = datInteger
BlobType = dabtUnknown
Value = ''
ParamType = daptInput
end
item
Name = 'CERTIFICACION'
DataType = datString
Size = 255
BlobType = dabtUnknown
Value = ''
ParamType = daptInput
end
item
Name = 'GRUPO_PROVEEDOR'
DataType = datString
Size = 255
BlobType = dabtUnknown
Value = ''
ParamType = daptInput
end
item
Name = 'OLD_ID_PROVEEDOR'
DataType = datInteger
BlobType = dabtUnknown
Value = ''
ParamType = daptInput
end>
Statements = <
item
Connection = 'IBX'
TargetTable = 'PROVEEDORES_DATOS'
SQL =
'UPDATE PROVEEDORES_DATOS'#10' SET '#10' ID_PROVEEDOR = :ID_PROVEEDOR' +
', '#10' REGIMEN_IVA = :REGIMEN_IVA,'#10' DESCUENTO = :DESCUENTO,'#10' ' +
' DESCRIPCION_PROVEEDOR = :DESCRIPCION_PROVEEDOR,'#10' CODIGO_AS' +
'IGNADO = :CODIGO_ASIGNADO,'#10' ID_TIPO_IVA = :ID_TIPO_IVA,'#10' I' +
'D_FORMA_PAGO = :ID_FORMA_PAGO,'#10' TIENDA_WEB = :TIENDA_WEB,'#10' ' +
' HOMOLOGADO = :HOMOLOGADO,'#10' CERTIFICACION = :CERTIFICACION,'#10' ' +
' GRUPO_PROVEEDOR = :GRUPO_PROVEEDOR'#10' WHERE'#10' (ID_PROVEEDOR ' +
'= :OLD_ID_PROVEEDOR)'
StatementType = stSQL
ColumnMappings = <>
end>
Name = 'Update_ProveedoresDatos'
end
item
Params = <
item
Name = 'ID'
DataType = datInteger
BlobType = dabtUnknown
Value = ''
ParamType = daptInput
end
item
Name = 'ID_CONTACTO'
DataType = datInteger
BlobType = dabtUnknown
Value = ''
ParamType = daptInput
end
item
Name = 'NOMBRE'
DataType = datString
Size = 255
BlobType = dabtUnknown
Value = ''
ParamType = daptInput
end
item
Name = 'CALLE'
DataType = datString
Size = 255
BlobType = dabtUnknown
Value = ''
ParamType = daptInput
end
item
Name = 'POBLACION'
DataType = datString
Size = 255
BlobType = dabtUnknown
Value = ''
ParamType = daptInput
end
item
Name = 'PROVINCIA'
DataType = datString
Size = 255
BlobType = dabtUnknown
Value = ''
ParamType = daptInput
end
item
Name = 'CODIGO_POSTAL'
DataType = datString
Size = 10
BlobType = dabtUnknown
Value = ''
ParamType = daptInput
end
item
Name = 'PERSONA_CONTACTO'
DataType = datString
Size = 255
BlobType = dabtUnknown
Value = ''
ParamType = daptInput
end
item
Name = 'TELEFONO'
DataType = datString
Size = 25
BlobType = dabtUnknown
Value = ''
ParamType = daptInput
end
item
Name = 'MOVIL'
DataType = datString
Size = 25
BlobType = dabtUnknown
Value = ''
ParamType = daptInput
end
item
Name = 'FAX'
DataType = datString
Size = 25
BlobType = dabtUnknown
Value = ''
ParamType = daptInput
end
item
Name = 'EMAIL'
DataType = datString
Size = 255
BlobType = dabtUnknown
Value = ''
ParamType = daptInput
end
item
Name = 'NOTAS'
DataType = datMemo
BlobType = dabtUnknown
Value = ''
ParamType = daptInput
end
item
Name = 'PORTE'
DataType = datFloat
BlobType = dabtUnknown
Value = ''
ParamType = daptInput
end>
Statements = <
item
Connection = 'IBX'
TargetTable = 'CONTACTOS_DIRECCIONES'
SQL =
'INSERT'#10' INTO CONTACTOS_DIRECCIONES'#10' (ID, ID_CONTACTO, NOMBRE' +
', CALLE, POBLACION, PROVINCIA, CODIGO_POSTAL,'#10' PERSONA_CONTA' +
'CTO, TELEFONO, MOVIL, FAX, EMAIL, NOTAS, PORTE)'#10' VALUES'#10' (:I' +
'D, :ID_CONTACTO, :NOMBRE, :CALLE, :POBLACION, :PROVINCIA, :CODIG' +
'O_POSTAL,'#10' :PERSONA_CONTACTO, :TELEFONO, :MOVIL, :FAX, :EMAI' +
'L, :NOTAS, :PORTE)'
StatementType = stSQL
ColumnMappings = <>
end>
Name = 'Insert_DireccionesContacto'
end
item
Params = <
item
Name = 'OLD_ID'
DataType = datInteger
BlobType = dabtUnknown
Value = ''
ParamType = daptInput
end>
Statements = <
item
Connection = 'IBX'
TargetTable = 'CONTACTOS_DIRECCIONES'
SQL =
'DELETE '#10' FROM'#10' CONTACTOS_DIRECCIONES'#10' WHERE'#10' (ID = :OLD_' +
'ID)'
StatementType = stSQL
ColumnMappings = <>
end>
Name = 'Delete_DireccionesContacto'
end
item
Params = <
item
Name = 'ID_CONTACTO'
DataType = datInteger
BlobType = dabtUnknown
Value = ''
ParamType = daptInput
end
item
Name = 'NOMBRE'
DataType = datString
Size = 255
BlobType = dabtUnknown
Value = ''
ParamType = daptInput
end
item
Name = 'CALLE'
DataType = datString
Size = 255
BlobType = dabtUnknown
Value = ''
ParamType = daptInput
end
item
Name = 'POBLACION'
DataType = datString
Size = 255
BlobType = dabtUnknown
Value = ''
ParamType = daptInput
end
item
Name = 'PROVINCIA'
DataType = datString
Size = 255
BlobType = dabtUnknown
Value = ''
ParamType = daptInput
end
item
Name = 'CODIGO_POSTAL'
DataType = datString
Size = 10
BlobType = dabtUnknown
Value = ''
ParamType = daptInput
end
item
Name = 'PERSONA_CONTACTO'
DataType = datString
Size = 255
BlobType = dabtUnknown
Value = ''
ParamType = daptInput
end
item
Name = 'TELEFONO'
DataType = datString
Size = 25
BlobType = dabtUnknown
Value = ''
ParamType = daptInput
end
item
Name = 'MOVIL'
DataType = datString
Size = 25
BlobType = dabtUnknown
Value = ''
ParamType = daptInput
end
item
Name = 'FAX'
DataType = datString
Size = 25
BlobType = dabtUnknown
Value = ''
ParamType = daptInput
end
item
Name = 'EMAIL'
DataType = datString
Size = 255
BlobType = dabtUnknown
Value = ''
ParamType = daptInput
end
item
Name = 'NOTAS'
DataType = datMemo
BlobType = dabtUnknown
Value = ''
ParamType = daptInput
end
item
Name = 'PORTE'
DataType = datFloat
BlobType = dabtUnknown
Value = ''
ParamType = daptInput
end
item
Name = 'OLD_ID'
DataType = datInteger
BlobType = dabtUnknown
Value = ''
ParamType = daptInput
end>
Statements = <
item
Connection = 'IBX'
TargetTable = 'CONTACTOS_DIRECCIONES'
SQL =
'UPDATE CONTACTOS_DIRECCIONES'#10' SET '#10' ID_CONTACTO = :ID_CONTAC' +
'TO, '#10' NOMBRE = :NOMBRE,'#10' CALLE = :CALLE,'#10' POBLACION = :' +
'POBLACION, '#10' PROVINCIA = :PROVINCIA, '#10' CODIGO_POSTAL = :CO' +
'DIGO_POSTAL, '#10' PERSONA_CONTACTO = :PERSONA_CONTACTO,'#10' TELE' +
'FONO = :TELEFONO,'#10' MOVIL = :MOVIL,'#10' FAX = :FAX,'#10' EMAIL ' +
'= :EMAIL,'#10' NOTAS = :NOTAS,'#10' PORTE = :PORTE'#10' WHERE'#10' (ID' +
' = :OLD_ID)'
StatementType = stSQL
ColumnMappings = <>
end>
Name = 'Update_DireccionesContacto'
end
item
Params = <
item
Name = 'ID'
DataType = datInteger
BlobType = dabtUnknown
Value = ''
ParamType = daptInput
end
item
Name = 'ID_CLIENTE'
DataType = datInteger
BlobType = dabtUnknown
Value = ''
ParamType = daptInput
end
item
Name = 'ID_PROVEEDOR'
DataType = datInteger
BlobType = dabtUnknown
Value = ''
ParamType = daptInput
end
item
Name = 'DESCUENTO'
DataType = datFloat
BlobType = dabtUnknown
Value = ''
ParamType = daptInput
end>
Statements = <
item
Connection = 'IBX'
TargetTable = 'CLIENTES_DTOS_PROVEEDORES'
SQL =
'INSERT'#10' INTO CLIENTES_DTOS_PROVEEDORES'#10' (ID, ID_CLIENTE, ID_' +
'PROVEEDOR, DESCUENTO)'#10' VALUES'#10' (:ID, :ID_CLIENTE, :ID_PROVEE' +
'DOR, :DESCUENTO)'
StatementType = stSQL
ColumnMappings = <>
end>
Name = 'Insert_ClientesDescuentos'
end
item
Params = <
item
Name = 'OLD_ID'
DataType = datInteger
BlobType = dabtUnknown
Value = ''
ParamType = daptInput
end>
Statements = <
item
Connection = 'IBX'
TargetTable = 'CLIENTES_DTOS_PROVEEDORES'
SQL =
'DELETE '#10' FROM'#10' CLIENTES_DTOS_PROVEEDORES'#10' WHERE'#10' (ID = :' +
'OLD_ID)'
StatementType = stSQL
ColumnMappings = <>
end>
Name = 'Delete_ClientesDescuentos'
end
item
Params = <
item
Name = 'ID_CLIENTE'
DataType = datInteger
BlobType = dabtUnknown
Value = ''
ParamType = daptInput
end
item
Name = 'ID_PROVEEDOR'
DataType = datInteger
BlobType = dabtUnknown
Value = ''
ParamType = daptInput
end
item
Name = 'DESCUENTO'
DataType = datFloat
BlobType = dabtUnknown
Value = ''
ParamType = daptInput
end
item
Name = 'OLD_ID'
DataType = datInteger
BlobType = dabtUnknown
Value = ''
ParamType = daptInput
end>
Statements = <
item
Connection = 'IBX'
TargetTable = 'CLIENTES_DTOS_PROVEEDORES'
SQL =
'UPDATE CLIENTES_DTOS_PROVEEDORES'#10' SET '#10' ID_CLIENTE = :ID_CLI' +
'ENTE,'#10' ID_PROVEEDOR = :ID_PROVEEDOR, '#10' DESCUENTO = :DESCUE' +
'NTO'#10' WHERE'#10' (ID = :OLD_ID)'
StatementType = stSQL
ColumnMappings = <>
end>
Name = 'Update_ClientesDescuentos'
end
item
Params = <
item
Name = 'OLD_ID_EMPLEADO'
DataType = datInteger
BlobType = dabtUnknown
Value = ''
ParamType = daptInput
end>
Statements = <
item
Connection = 'IBX'
TargetTable = 'EMPLEADOS_DATOS'
SQL =
'DELETE '#10' FROM'#10' EMPLEADOS_DATOS'#10' WHERE'#10' (ID_EMPLEADO = :O' +
'LD_ID_EMPLEADO)'
StatementType = stSQL
ColumnMappings = <>
end>
Name = 'Delete_EmpleadosDatos'
end
item
Params = <
item
Name = 'ID_EMPLEADO'
DataType = datInteger
BlobType = dabtUnknown
Value = ''
ParamType = daptInput
end
item
Name = 'FECHA_NACIMIENTO'
DataType = datDateTime
BlobType = dabtUnknown
Value = ''
ParamType = daptInput
end
item
Name = 'CATEGORIA'
DataType = datString
Size = 255
BlobType = dabtUnknown
Value = ''
ParamType = daptInput
end
item
Name = 'FECHA_ALTA_EMPRESA'
DataType = datDateTime
BlobType = dabtUnknown
Value = ''
ParamType = daptInput
end
item
Name = 'FORMACION_BASE'
DataType = datMemo
BlobType = dabtUnknown
Value = ''
ParamType = daptInput
end
item
Name = 'FORMACION_COMPLE'
DataType = datMemo
BlobType = dabtUnknown
Value = ''
ParamType = daptInput
end
item
Name = 'FORMACION_RECIBIDA'
DataType = datMemo
BlobType = dabtUnknown
Value = ''
ParamType = daptInput
end
item
Name = 'EXPERIENCIA'
DataType = datMemo
BlobType = dabtUnknown
Value = ''
ParamType = daptInput
end>
Statements = <
item
Connection = 'IBX'
TargetTable = 'EMPLEADOS_DATOS'
SQL =
'INSERT'#10' INTO EMPLEADOS_DATOS'#10' (ID_EMPLEADO, FECHA_NACIMIENTO' +
', CATEGORIA, FECHA_ALTA_EMPRESA, FORMACION_BASE,'#10' FORMACION_C' +
'OMPLE, FORMACION_RECIBIDA, EXPERIENCIA)'#10' VALUES'#10' (:ID_EMPLEA' +
'DO, :FECHA_NACIMIENTO, :CATEGORIA, :FECHA_ALTA_EMPRESA, :FORMACI' +
'ON_BASE,'#10' :FORMACION_COMPLE, :FORMACION_RECIBIDA, :EXPERIENCI' +
'A)'
StatementType = stSQL
ColumnMappings = <>
end>
Name = 'Insert_EmpleadosDatos'
end
item
Params = <
item
Name = 'FECHA_NACIMIENTO'
BlobType = dabtUnknown
Value = ''
ParamType = daptUnknown
end
item
Name = 'CATEGORIA'
BlobType = dabtUnknown
Value = ''
ParamType = daptUnknown
end
item
Name = 'FECHA_ALTA_EMPRESA'
BlobType = dabtUnknown
Value = ''
ParamType = daptUnknown
end
item
Name = 'FORMACION_BASE'
BlobType = dabtUnknown
Value = ''
ParamType = daptUnknown
end
item
Name = 'FORMACION_COMPLE'
BlobType = dabtUnknown
Value = ''
ParamType = daptUnknown
end
item
Name = 'FORMACION_RECIBIDA'
BlobType = dabtUnknown
Value = ''
ParamType = daptUnknown
end
item
Name = 'EXPERIENCIA'
BlobType = dabtUnknown
Value = ''
ParamType = daptUnknown
end
item
Name = 'OLD_ID_EMPLEADO'
BlobType = dabtUnknown
Value = ''
ParamType = daptUnknown
end>
Statements = <
item
Connection = 'IBX'
TargetTable = 'EMPLEADOS_DATOS'
SQL =
'UPDATE EMPLEADOS_DATOS'#10' SET '#10' FECHA_NACIMIENTO = :FECHA_NACI' +
'MIENTO,'#10' CATEGORIA = :CATEGORIA,'#10' FECHA_ALTA_EMPRESA = :FE' +
'CHA_ALTA_EMPRESA,'#10' FORMACION_BASE = :FORMACION_BASE,'#10' FORM' +
'ACION_COMPLE = :FORMACION_COMPLE,'#10' FORMACION_RECIBIDA = :FORM' +
'ACION_RECIBIDA,'#10' EXPERIENCIA = :EXPERIENCIA'#10' WHERE'#10' (ID_E' +
'MPLEADO = :OLD_ID_EMPLEADO)'
StatementType = stSQL
ColumnMappings = <>
end>
Name = 'Update_EmpleadosDatos'
end
item
Params = <
item
Name = 'ID_EMPRESA'
DataType = datInteger
BlobType = dabtUnknown
Value = ''
ParamType = daptInput
end
item
Name = 'ID_CONTACTO'
DataType = datInteger
BlobType = dabtUnknown
Value = ''
ParamType = daptInput
end>
Statements = <
item
Connection = 'IBX'
TargetTable = 'EMPRESAS_CONTACTOS'
SQL =
'INSERT'#10' INTO EMPRESAS_CONTACTOS'#10' (ID_EMPRESA, ID_CONTACTO)'#10' ' +
' VALUES'#10' (:ID_EMPRESA, :ID_CONTACTO)'
StatementType = stSQL
ColumnMappings = <>
end>
Name = 'Insert_ContactoEmpresa'
end
item
Params = <
item
Name = 'OLD_ID_EMPRESA'
DataType = datInteger
BlobType = dabtUnknown
Value = ''
ParamType = daptInput
end
item
Name = 'OLD_ID_CONTACTO'
DataType = datInteger
BlobType = dabtUnknown
Value = ''
ParamType = daptInput
end>
Statements = <
item
Connection = 'IBX'
TargetTable = 'EMPRESAS_CONTACTOS'
SQL =
'DELETE '#10' FROM'#10' EMPRESAS_CONTACTOS'#10' WHERE'#10' (ID_EMPRESA = ' +
':OLD_ID_EMPRESA) AND '#10' (ID_CONTACTO = :OLD_ID_CONTACTO)'
StatementType = stSQL
ColumnMappings = <>
end>
Name = 'Delete_ContactoEmpresa'
end>
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 DireccionesContacto'
DoUpdate = False
DoInsert = True
DoDelete = False
DatasetName = 'DireccionesContacto'
FailureBehaviour = fbRaiseException
end
item
Name = 'Update DireccionesContacto'
DoUpdate = True
DoInsert = False
DoDelete = False
DatasetName = 'DireccionesContacto'
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 = 'Insert AgentesComisiones'
DoUpdate = False
DoInsert = True
DoDelete = False
DatasetName = 'AgentesComisiones'
FailureBehaviour = fbRaiseException
end
item
Name = 'Update AgentesComisiones'
DoUpdate = True
DoInsert = False
DoDelete = False
DatasetName = 'AgentesComisiones'
FailureBehaviour = fbRaiseException
end
item
Name = 'Insert ClientesDescuentos'
DoUpdate = False
DoInsert = True
DoDelete = False
DatasetName = 'ClientesDescuentos'
FailureBehaviour = fbRaiseException
end
item
Name = 'Update ClientesDescuentos'
DoUpdate = True
DoInsert = False
DoDelete = False
DatasetName = 'ClientesDescuentos'
FailureBehaviour = fbRaiseException
end
item
Name = 'Delete DatosBancarios'
DoUpdate = False
DoInsert = False
DoDelete = True
DatasetName = 'DatosBancarios'
FailureBehaviour = fbRaiseException
end
item
Name = 'Delete ClientesDescuentos'
DoUpdate = False
DoInsert = False
DoDelete = True
DatasetName = 'ClientesDescuentos'
FailureBehaviour = fbRaiseException
end
item
Name = 'Delete AgentesComisiones'
DoUpdate = False
DoInsert = False
DoDelete = True
DatasetName = 'AgentesComisiones'
FailureBehaviour = fbRaiseException
end
item
Name = 'Delete DireccionesContacto'
DoUpdate = False
DoInsert = False
DoDelete = True
DatasetName = 'DireccionesContacto'
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 = 'DatosBancarios_ID'
DataType = datAutoInc
BlobType = dabtUnknown
DisplayWidth = 0
DisplayLabel = 'ID'
Alignment = taLeftJustify
end
item
Name = 'DatosBancarios_ID_CONTACTO'
DataType = datInteger
BlobType = dabtUnknown
DisplayWidth = 0
DisplayLabel = 'ID_CONTACTO'
Alignment = taLeftJustify
end
item
Name = 'DatosBancarios_TITULAR'
DataType = datString
Size = 255
BlobType = dabtUnknown
DisplayWidth = 0
DisplayLabel = 'Titular'
Alignment = taLeftJustify
end
item
Name = 'DatosBancarios_ENTIDAD'
DataType = datString
Size = 15
BlobType = dabtUnknown
DisplayWidth = 0
DisplayLabel = 'C'#243'digo de entidad'
Alignment = taLeftJustify
end
item
Name = 'DatosBancarios_SUCURSAL'
DataType = datString
Size = 15
BlobType = dabtUnknown
DisplayWidth = 0
DisplayLabel = 'C'#243'digo de sucursal'
Alignment = taLeftJustify
end
item
Name = 'DatosBancarios_DC'
DataType = datString
Size = 15
BlobType = dabtUnknown
DisplayWidth = 0
DisplayLabel = 'D'#237'gito de control'
Alignment = taLeftJustify
end
item
Name = 'DatosBancarios_CUENTA'
DataType = datString
Size = 15
BlobType = dabtUnknown
DisplayWidth = 0
DisplayLabel = 'C'#243'digo de cuenta'
Alignment = taLeftJustify
end
item
Name = 'Contactos_ID'
DataType = datAutoInc
BlobType = dabtUnknown
DisplayWidth = 0
DisplayLabel = 'ID'
Alignment = taLeftJustify
end
item
Name = 'Contactos_NIF_CIF'
DataType = datString
Size = 15
BlobType = dabtUnknown
DisplayWidth = 0
DisplayLabel = 'NIF/CIF'
Alignment = taLeftJustify
end
item
Name = 'Contactos_NOMBRE'
DataType = datString
Size = 255
BlobType = dabtUnknown
DisplayWidth = 0
DisplayLabel = 'Nombre'
Alignment = taLeftJustify
end
item
Name = 'Contactos_CALLE'
DataType = datString
Size = 255
BlobType = dabtUnknown
DisplayWidth = 0
DisplayLabel = 'Direcci'#243'n'
Alignment = taLeftJustify
end
item
Name = 'Contactos_POBLACION'
DataType = datString
Size = 255
BlobType = dabtUnknown
DisplayWidth = 0
DisplayLabel = 'Poblaci'#243'n'
Alignment = taLeftJustify
end
item
Name = 'Contactos_PROVINCIA'
DataType = datString
Size = 255
BlobType = dabtUnknown
DisplayWidth = 0
DisplayLabel = 'Provincia'
Alignment = taLeftJustify
end
item
Name = 'Contactos_CODIGO_POSTAL'
DataType = datString
Size = 10
BlobType = dabtUnknown
DisplayWidth = 0
DisplayLabel = 'C'#243'digo postal'
Alignment = taLeftJustify
end
item
Name = 'Contactos_TELEFONO_1'
DataType = datString
Size = 25
BlobType = dabtUnknown
DisplayWidth = 0
DisplayLabel = 'Tlf. trabajo'
Alignment = taLeftJustify
end
item
Name = 'Contactos_TELEFONO_2'
DataType = datString
Size = 25
BlobType = dabtUnknown
DisplayWidth = 0
DisplayLabel = 'Tlf. particular'
Alignment = taLeftJustify
end
item
Name = 'Contactos_MOVIL_1'
DataType = datString
Size = 25
BlobType = dabtUnknown
DisplayWidth = 0
DisplayLabel = 'M'#243'vil'
Alignment = taLeftJustify
end
item
Name = 'Contactos_MOVIL_2'
DataType = datString
Size = 25
BlobType = dabtUnknown
DisplayWidth = 0
DisplayLabel = 'MOVIL_2'
Alignment = taLeftJustify
end
item
Name = 'Contactos_FAX'
DataType = datString
Size = 25
BlobType = dabtUnknown
DisplayWidth = 0
DisplayLabel = 'Fax'
Alignment = taLeftJustify
end
item
Name = 'Contactos_EMAIL_1'
DataType = datString
Size = 255
BlobType = dabtUnknown
DisplayWidth = 0
DisplayLabel = 'E-mail trabajo'
Alignment = taLeftJustify
end
item
Name = 'Contactos_EMAIL_2'
DataType = datString
Size = 255
BlobType = dabtUnknown
DisplayWidth = 0
DisplayLabel = 'E-mail particular'
Alignment = taLeftJustify
end
item
Name = 'Contactos_PAGINA_WEB'
DataType = datString
Size = 255
BlobType = dabtUnknown
DisplayWidth = 0
DisplayLabel = 'Web'
Alignment = taLeftJustify
end
item
Name = 'Contactos_NOTAS'
DataType = datMemo
BlobType = dabtMemo
DisplayWidth = 0
DisplayLabel = 'Observaciones'
Alignment = taLeftJustify
end
item
Name = 'Contactos_FECHA_ALTA'
DataType = datDateTime
BlobType = dabtUnknown
DisplayWidth = 0
DisplayLabel = 'Fecha de alta'
Alignment = taLeftJustify
end
item
Name = 'Contactos_FECHA_MODIFICACION'
DataType = datDateTime
BlobType = dabtUnknown
DisplayWidth = 0
DisplayLabel = 'Fecha de modificaci'#243'n'
Alignment = taLeftJustify
end
item
Name = 'Contactos_USUARIO'
DataType = datString
Size = 20
BlobType = dabtUnknown
DisplayWidth = 0
DisplayLabel = 'Usuario'
Alignment = taLeftJustify
end
item
Name = 'Contactos_ID_CATEGORIA'
DataType = datInteger
BlobType = dabtUnknown
DisplayWidth = 0
Alignment = taLeftJustify
end
item
Name = 'Contactos_ID_EMPRESA'
DataType = datInteger
BlobType = dabtUnknown
DisplayWidth = 0
DisplayLabel = 'ID_EMPRESA'
Alignment = taLeftJustify
end
item
Name = 'Proveedores_DISTRIBUYE'
DataType = datString
Size = 2000
BlobType = dabtUnknown
DisplayWidth = 0
DisplayLabel = 'Distribuye'
Alignment = taLeftJustify
end
item
Name = 'Proveedores_DESCUENTO'
DataType = datFloat
BlobType = dabtUnknown
DisplayWidth = 0
DisplayLabel = 'Descuento (%)'
Alignment = taLeftJustify
end
item
Name = 'Clientes_ID_AGENTE'
DataType = datInteger
BlobType = dabtUnknown
DisplayWidth = 0
DisplayLabel = 'ID_AGENTE'
Alignment = taLeftJustify
end
item
Name = 'Clientes_GRUPO_CLIENTE'
DataType = datString
Size = 255
BlobType = dabtUnknown
DisplayWidth = 0
DisplayLabel = 'Grupo de cliente'
Alignment = taLeftJustify
end
item
Name = 'DatosBancarios_PERSONA_CONTACTO'
DataType = datString
Size = 255
BlobType = dabtUnknown
DisplayWidth = 0
Alignment = taLeftJustify
end
item
Name = 'DireccionesContacto_CALLE'
DataType = datString
Size = 255
BlobType = dabtUnknown
DisplayWidth = 0
DisplayLabel = 'Calle'
Alignment = taLeftJustify
end
item
Name = 'DireccionesContacto_POBLACION'
DataType = datString
Size = 255
BlobType = dabtUnknown
DisplayWidth = 0
DisplayLabel = 'Poblaci'#243'n'
Alignment = taLeftJustify
end
item
Name = 'DireccionesContacto_PROVINCIA'
DataType = datString
Size = 255
BlobType = dabtUnknown
DisplayWidth = 0
DisplayLabel = 'Provincia'
Alignment = taLeftJustify
end
item
Name = 'DireccionesContacto_CODIGO_POSTAL'
DataType = datString
Size = 10
BlobType = dabtUnknown
DisplayWidth = 0
DisplayLabel = 'C'#243'digo postal'
Alignment = taLeftJustify
end
item
Name = 'DireccionesContacto_PERSONA_CONTACTO'
DataType = datString
Size = 255
BlobType = dabtUnknown
DisplayWidth = 0
DisplayLabel = 'Persona de contacto'
Alignment = taLeftJustify
end
item
Name = 'DireccionesContacto_ID'
DataType = datAutoInc
BlobType = dabtUnknown
DisplayWidth = 0
DisplayLabel = 'ID'
Alignment = taLeftJustify
end
item
Name = 'DireccionesContacto_ID_CONTACTO'
DataType = datInteger
BlobType = dabtUnknown
DisplayWidth = 0
DisplayLabel = 'ID_CONTACTO'
Alignment = taLeftJustify
end
item
Name = 'Clientes_NOMBRE_COMERCIAL'
DataType = datString
Size = 255
BlobType = dabtUnknown
DisplayWidth = 0
DisplayLabel = 'Nombre comercial'
Alignment = taLeftJustify
end
item
Name = 'Clientes_VENCIMIENTO_FACTURAS'
DataType = datInteger
BlobType = dabtUnknown
DisplayWidth = 0
DisplayLabel = 'Vencimiento'
Alignment = taLeftJustify
end
item
Name = 'Clientes_BLOQUEADO'
DataType = datInteger
BlobType = dabtUnknown
DisplayWidth = 0
DisplayLabel = #191'Bloqueado?'
Alignment = taLeftJustify
end
item
Name = 'Contactos_REFERENCIA'
DataType = datString
Size = 255
BlobType = dabtUnknown
DisplayWidth = 0
DisplayLabel = 'Referencia'
Alignment = taLeftJustify
end
item
Name = 'Proveedores_REFERENCIA'
DataType = datString
Size = 255
BlobType = dabtUnknown
DisplayWidth = 0
DisplayLabel = 'Referencia'
Alignment = taLeftJustify
end
item
Name = 'Agentes_REFERENCIA'
DataType = datString
Size = 255
BlobType = dabtUnknown
DisplayWidth = 0
DisplayLabel = 'Referencia'
Alignment = taLeftJustify
end
item
Name = 'AgentesComisiones_ID'
DataType = datInteger
BlobType = dabtUnknown
DisplayWidth = 0
Alignment = taLeftJustify
end
item
Name = 'AgentesComisiones_ID_AGENTE'
DataType = datInteger
BlobType = dabtUnknown
DisplayWidth = 0
Alignment = taLeftJustify
end
item
Name = 'AgentesComisiones_ID_PROVEEDOR'
DataType = datInteger
BlobType = dabtUnknown
DisplayWidth = 0
Alignment = taLeftJustify
end
item
Name = 'AgentesComisiones_COMISION'
DataType = datFloat
BlobType = dabtUnknown
DisplayWidth = 0
DisplayLabel = 'Comisi'#243'n (%)'
Alignment = taRightJustify
end
item
Name = 'ClientesDescuentos_ID'
DataType = datInteger
BlobType = dabtUnknown
DisplayWidth = 0
DisplayLabel = 'ID'
Alignment = taLeftJustify
end
item
Name = 'ClientesDescuentos_ID_CLIENTE'
DataType = datInteger
BlobType = dabtUnknown
DisplayWidth = 0
Alignment = taLeftJustify
end
item
Name = 'ClientesDescuentos_ID_PROVEEDOR'
DataType = datInteger
BlobType = dabtUnknown
DisplayWidth = 0
Alignment = taLeftJustify
end
item
Name = 'ClientesDescuentos_DESCUENTO'
DataType = datFloat
BlobType = dabtUnknown
DisplayWidth = 0
DisplayLabel = 'Descuento (%)'
Alignment = taRightJustify
end
item
Name = 'Clientes_REFERENCIA'
DataType = datString
Size = 255
BlobType = dabtUnknown
DisplayWidth = 0
DisplayLabel = 'REFERENCIA'
Alignment = taLeftJustify
end
item
Name = 'Clientes_MOTIVO_BLOQUEO'
DataType = datString
Size = 255
BlobType = dabtUnknown
DisplayWidth = 0
DisplayLabel = 'Motivo del bloqueo'
Alignment = taLeftJustify
end
item
Name = 'DireccionesContacto_NOMBRE'
DataType = datString
Size = 255
BlobType = dabtUnknown
DisplayWidth = 0
Alignment = taLeftJustify
end
item
Name = 'DireccionesContacto_TELEFONO'
DataType = datString
Size = 25
BlobType = dabtUnknown
DisplayWidth = 0
DisplayLabel = 'Tel'#233'fono'
Alignment = taLeftJustify
end
item
Name = 'DireccionesContacto_EMAIL'
DataType = datString
Size = 255
BlobType = dabtUnknown
DisplayWidth = 0
DisplayLabel = 'E-mail'
Alignment = taLeftJustify
end
item
Name = 'DireccionesContacto_NOTAS'
DataType = datMemo
BlobType = dabtUnknown
DisplayWidth = 0
DisplayLabel = 'Notas'
Alignment = taLeftJustify
end
item
Name = 'DireccionesContacto_PORTE'
DataType = datFloat
BlobType = dabtUnknown
DisplayWidth = 0
DisplayLabel = 'Coste del porte'
Alignment = taLeftJustify
end
item
Name = 'Clientes_RECARGO_EQUIVALENCIA'
DataType = datInteger
BlobType = dabtUnknown
DisplayWidth = 0
DisplayLabel = 'Rec. equiv.'
Alignment = taLeftJustify
end
item
Name = 'Clientes_REGIMEN_IVA'
DataType = datString
Size = 255
BlobType = dabtUnknown
DisplayWidth = 0
DisplayLabel = 'R'#233'gimen de IVA'
Alignment = taLeftJustify
end
item
Name = 'Clientes_ID_TIPO_IVA'
DataType = datInteger
BlobType = dabtUnknown
DisplayWidth = 0
DisplayLabel = 'ID_TIPO_IVA'
Alignment = taLeftJustify
end
item
Name = 'Clientes_ID_FORMA_PAGO'
DataType = datInteger
BlobType = dabtUnknown
DisplayWidth = 0
DisplayLabel = 'ID_FORMA_PAGO'
Alignment = taLeftJustify
end
item
Name = 'Proveedores_REGIMEN_IVA'
DataType = datString
Size = 255
BlobType = dabtUnknown
DisplayWidth = 0
DisplayLabel = 'R'#233'gimen de IVA'
Alignment = taLeftJustify
end
item
Name = 'Proveedores_ID_TIPO_IVA'
DataType = datInteger
BlobType = dabtUnknown
DisplayWidth = 0
DisplayLabel = 'ID_TIPO_IVA'
Alignment = taLeftJustify
end
item
Name = 'Proveedores_ID_FORMA_PAGO'
DataType = datInteger
BlobType = dabtUnknown
DisplayWidth = 0
DisplayLabel = 'ID_FORMA_PAGO'
Alignment = taLeftJustify
end
item
Name = 'Clientes_TIENDA_WEB'
DataType = datInteger
BlobType = dabtUnknown
DisplayWidth = 0
DisplayLabel = 'TIENDA_WEB'
Alignment = taLeftJustify
end
item
Name = 'Clientes_AGENTE'
DataType = datString
Size = 255
BlobType = dabtUnknown
DisplayWidth = 0
Alignment = taLeftJustify
end
item
Name = 'Contactos_PERSONA_CONTACTO'
DataType = datString
Size = 255
BlobType = dabtUnknown
DisplayWidth = 0
DisplayLabel = 'Persona de contacto'
Alignment = taLeftJustify
end
item
Name = 'Proveedores_GRUPO_PROVEEDOR'
DataType = datString
BlobType = dabtUnknown
DisplayWidth = 0
DisplayLabel = 'Grupo proveedor'
Alignment = taLeftJustify
end
item
Name = 'Proveedores_TIENDA_WEB'
DataType = datInteger
BlobType = dabtUnknown
DisplayWidth = 0
DisplayLabel = 'TIENDA_WEB'
Alignment = taLeftJustify
end
item
Name = 'Proveedores_HOMOLOGADO'
DataType = datInteger
BlobType = dabtUnknown
DisplayWidth = 0
DisplayLabel = 'Homologado'
Alignment = taLeftJustify
end
item
Name = 'Proveedores_CERTIFICACION'
DataType = datString
Size = 255
BlobType = dabtUnknown
DisplayWidth = 0
DisplayLabel = 'Certificaciones'
Alignment = taLeftJustify
end
item
Name = 'Proveedores_DESCRIPCION_PROVEEDOR'
DataType = datString
Size = 255
BlobType = dabtUnknown
DisplayWidth = 0
DisplayLabel = 'Proveedor de...'
Alignment = taLeftJustify
end
item
Name = 'Proveedores_CODIGO_ASIGNADO'
DataType = datString
Size = 255
BlobType = dabtUnknown
DisplayWidth = 0
DisplayLabel = 'C'#243'digo asignado'
Alignment = taLeftJustify
end
item
Name = 'Empleados_FECHA_NACIMIENTO'
DataType = datDateTime
BlobType = dabtUnknown
DisplayWidth = 0
DisplayLabel = 'Fecha nacimiento'
Alignment = taLeftJustify
end
item
Name = 'Empleados_CATEGORIA'
DataType = datString
Size = 255
BlobType = dabtUnknown
DisplayWidth = 0
DisplayLabel = 'Categor'#237'a'
Alignment = taLeftJustify
end
item
Name = 'Empleados_FECHA_ALTA_EMPRESA'
DataType = datDateTime
BlobType = dabtUnknown
DisplayWidth = 0
DisplayLabel = 'Fecha de alta'
Alignment = taLeftJustify
end
item
Name = 'Empleados_FORMACION_BASE'
DataType = datMemo
BlobType = dabtUnknown
DisplayWidth = 0
DisplayLabel = 'Formaci'#243'n base'
Alignment = taLeftJustify
end
item
Name = 'Empleados_FORMACION_COMPLE'
DataType = datMemo
BlobType = dabtUnknown
DisplayWidth = 0
DisplayLabel = 'Formaci'#243'n complementaria'
Alignment = taLeftJustify
end
item
Name = 'Empleados_FORMACION_RECIBIDA'
DataType = datMemo
BlobType = dabtUnknown
DisplayWidth = 0
DisplayLabel = 'Formaci'#243'n recibida'
Alignment = taLeftJustify
end
item
Name = 'Empleados_EXPERIENCIA'
DataType = datMemo
BlobType = dabtUnknown
DisplayWidth = 0
DisplayLabel = 'Experiencia'
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' <Entity Name="ContactosCategorias"' +
' Left="0,00" Top="26,50" />'#13#10' <Entity Name="DatosBancarios" L' +
'eft="479,77" Top="0,00" />'#13#10' <Entity Name="Contactos" Left="2' +
'23,77" Top="0,00" />'#13#10' </Diagram>'#13#10'</Diagrams>'#13#10
end
object bpContactos: TDABusinessProcessor
Schema = schContactos
InsertCommandName = 'Insert_Contactos'
DeleteCommandName = 'Delete_Contactos'
UpdateCommandName = 'Update_Contactos'
ReferencedDataset = 'Contactos'
ProcessorOptions = [poAutoGenerateRefreshDataset, poPrepareCommands]
UpdateMode = updWhereKeyOnly
Left = 224
Top = 15
end
object bpDatosBancarios: TDABusinessProcessor
Schema = schContactos
InsertCommandName = 'Insert_DatosBancarios'
DeleteCommandName = 'Delete_DatosBancarios'
UpdateCommandName = 'Update_DatosBancarios'
ReferencedDataset = 'DatosBancarios'
ProcessorOptions = [poAutoGenerateRefreshDataset, poPrepareCommands]
UpdateMode = updWhereKeyOnly
Left = 224
Top = 79
end
object bpCategoriasContactos: TDABusinessProcessor
Schema = schContactos
InsertCommandName = 'Insert_ContactosCategorias'
DeleteCommandName = 'Delete_ContactosCategorias'
UpdateCommandName = 'Update_ContactosCategorias'
ReferencedDataset = 'ContactosCategorias'
ProcessorOptions = [poAutoGenerateRefreshDataset, poPrepareCommands]
UpdateMode = updWhereKeyOnly
Left = 224
Top = 143
end
object bpEmpleados: TDABusinessProcessor
Schema = schContactos
InsertCommandName = 'Insert_Contactos'
DeleteCommandName = 'Delete_Contactos'
UpdateCommandName = 'Update_Contactos'
ReferencedDataset = 'Empleados'
ProcessorOptions = [poAutoGenerateRefreshDataset, poPrepareCommands]
UpdateMode = updWhereKeyOnly
Left = 344
Top = 15
end
object bpClientes: TDABusinessProcessor
Schema = schContactos
InsertCommandName = 'Insert_Contactos'
DeleteCommandName = 'Delete_Contactos'
UpdateCommandName = 'Update_Contactos'
ReferencedDataset = 'Clientes'
ProcessorOptions = [poAutoGenerateRefreshDataset, poPrepareCommands]
UpdateMode = updWhereKeyOnly
Left = 344
Top = 143
end
object bpProveedores: TDABusinessProcessor
Schema = schContactos
InsertCommandName = 'Insert_Contactos'
DeleteCommandName = 'Delete_Contactos'
UpdateCommandName = 'Update_Contactos'
ReferencedDataset = 'Proveedores'
ProcessorOptions = [poAutoGenerateRefreshDataset, poPrepareCommands]
UpdateMode = updWhereKeyOnly
Left = 344
Top = 79
end
object bpDireccionesContacto: TDABusinessProcessor
Schema = schContactos
InsertCommandName = 'Insert_DireccionesContacto'
DeleteCommandName = 'Delete_DireccionesContacto'
UpdateCommandName = 'Update_DireccionesContacto'
ReferencedDataset = 'DireccionesContacto'
ProcessorOptions = [poAutoGenerateRefreshDataset, poPrepareCommands]
UpdateMode = updWhereKeyOnly
Left = 224
Top = 207
end
object bpClientesDescuentos: TDABusinessProcessor
Schema = schContactos
InsertCommandName = 'Insert_ClientesDescuentos'
DeleteCommandName = 'Delete_ClientesDescuentos'
UpdateCommandName = 'Update_ClientesDescuentos'
ReferencedDataset = 'ClientesDescuentos'
ProcessorOptions = [poPrepareCommands]
UpdateMode = updWhereKeyOnly
Left = 344
Top = 207
end
end
Reference in New Issue View Git Blame Copy Permalink