Uecko/AbetoDesign_FactuGES2
2
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity
4dc42f3a9d
AbetoDesign_FactuGES2/Source/ApplicationBase/Empresas/Servidor/srvEmpresas_Impl.dfm
roberto 4dc42f3a9d Version 2.6.2 
Tareas #1246: En albaranes de cliente debe salir la base imponible (y no el importe total)
Tareas #1248: REvisar agrupaciones facturas proveedor
Tareas #1254: Que al seleccionar el cliente se copie la forma de pago del mismo
Tareas #1255: Forma de pago, notas y observaciones a nivel de empresa
Tareas #1261: Se arregla el tipo de id_tipo_IVA y ID_forma_pago de empresa para que soporte integers
Tareas #1264: Revisar el guardar los datos de configuración de la empresa ya que da error
Tareas #1265: Revisar forma de pago por defecto de los contactos ya que no está bien
Tareas #1269: Que en la lista de contratos se puedan ver las facturas asociadas si las tuviera

git-svn-id: https://192.168.0.254/svn/Proyectos.AbetoDesign_FactuGES/trunk@84 93f398dd-4eb6-7a46-baf6-13f46f578da2
2013-10-08 16:59:28 +00:00

1340 lines
37 KiB
Plaintext
Raw Blame History

object srvEmpresas: TsrvEmpresas
OldCreateOrder = True
OnCreate = DARemoteServiceCreate
ConnectionName = 'IBX'
ServiceSchema = schEmpresas
ServiceDataStreamer = DABin2DataStreamer
ExportedDataTables = <>
BeforeAcquireConnection = DataAbstractServiceBeforeAcquireConnection
BeforeGetDatasetData = DataAbstractServiceBeforeGetDatasetData
Height = 166
Width = 351
object schEmpresas: TDASchema
ConnectionManager = dmServer.ConnectionManager
DataDictionary = DataDictionary
Diagrams = Diagrams
Datasets = <
item
Params = <>
Statements = <
item
Connection = 'IBX'
ConnectionType = 'Interbase'
Default = True
TargetTable = 'EMPRESAS_TIENDAS'
Name = 'IBX'
StatementType = stAutoSQL
ColumnMappings = <
item
DatasetField = 'ID'
TableField = 'ID'
end
item
DatasetField = 'ID_EMPRESA'
TableField = 'ID_EMPRESA'
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 = 'MOVIL'
TableField = 'MOVIL'
end
item
DatasetField = 'FAX'
TableField = 'FAX'
end
item
DatasetField = 'EMAIL'
TableField = 'EMAIL'
end
item
DatasetField = 'NOTAS'
TableField = 'NOTAS'
end
item
DatasetField = 'FECHA_ALTA'
TableField = 'FECHA_ALTA'
end
item
DatasetField = 'FECHA_MODIFICACION'
TableField = 'FECHA_MODIFICACION'
end
item
DatasetField = 'CODIGO_CONTABLE'
TableField = 'CODIGO_CONTABLE'
end>
end>
Name = 'EmpresasTiendas'
Fields = <
item
Name = 'ID'
DataType = datAutoInc
GeneratorName = 'GEN_EMPRESAS_TIENDAS_ID'
ServerAutoRefresh = True
DictionaryEntry = 'EmpresasTiendas_ID'
InPrimaryKey = True
end
item
Name = 'ID_EMPRESA'
DataType = datInteger
DictionaryEntry = 'EmpresasTiendas_ID_EMPRESA'
end
item
Name = 'CALLE'
DataType = datString
Size = 255
DictionaryEntry = 'EmpresasTiendas_CALLE'
end
item
Name = 'POBLACION'
DataType = datString
Size = 255
DictionaryEntry = 'EmpresasTiendas_POBLACION'
end
item
Name = 'PROVINCIA'
DataType = datString
Size = 255
DictionaryEntry = 'EmpresasTiendas_PROVINCIA'
end
item
Name = 'CODIGO_POSTAL'
DataType = datString
Size = 10
DictionaryEntry = 'EmpresasTiendas_CODIGO_POSTAL'
end
item
Name = 'PERSONA_CONTACTO'
DataType = datString
Size = 255
DictionaryEntry = 'EmpresasTiendas_PERSONA_CONTACTO'
end
item
Name = 'NOMBRE'
DataType = datString
Size = 255
DictionaryEntry = 'EmpresasTiendas_NOMBRE'
end
item
Name = 'TELEFONO'
DataType = datString
Size = 25
DictionaryEntry = 'EmpresasTiendas_TELEFONO'
end
item
Name = 'MOVIL'
DataType = datString
Size = 25
DictionaryEntry = 'EmpresasTiendas_MOVIL'
end
item
Name = 'FAX'
DataType = datString
Size = 25
DictionaryEntry = 'EmpresasTiendas_FAX'
end
item
Name = 'EMAIL'
DataType = datString
Size = 255
DictionaryEntry = 'EmpresasTiendas_EMAIL'
end
item
Name = 'NOTAS'
DataType = datMemo
DictionaryEntry = 'EmpresasTiendas_NOTAS'
end
item
Name = 'FECHA_ALTA'
DataType = datDateTime
DictionaryEntry = 'EmpresasTiendas_FECHA_ALTA'
end
item
Name = 'FECHA_MODIFICACION'
DataType = datDateTime
DictionaryEntry = 'EmpresasTiendas_FECHA_MODIFICACION'
end
item
Name = 'CODIGO_CONTABLE'
DataType = datString
Size = 2
end>
end
item
Params = <
item
Name = 'ID_EMPRESA'
Value = ''
end>
Statements = <
item
Connection = 'IBX'
ConnectionType = 'Interbase'
Default = True
Name = 'IBX'
SQL = 'SELECT NOMBRE'#10'FROM EMPRESAS'#10'WHERE ID = :ID_EMPRESA'#10
StatementType = stSQL
ColumnMappings = <
item
DatasetField = 'NOMBRE'
TableField = 'NOMBRE'
end>
end>
Name = 'DarNombre'
Fields = <
item
Name = 'NOMBRE'
DataType = datString
Size = 255
end>
end
item
Params = <>
Statements = <
item
Connection = 'IBX'
Default = True
TargetTable = 'V_EMPRESAS'
Name = 'IBX'
StatementType = stAutoSQL
ColumnMappings = <
item
DatasetField = 'ID'
TableField = 'ID'
end
item
DatasetField = 'NIF_CIF'
TableField = 'NIF_CIF'
end
item
DatasetField = 'NOMBRE'
TableField = 'NOMBRE'
end
item
DatasetField = 'RAZON_SOCIAL'
TableField = 'RAZON_SOCIAL'
end
item
DatasetField = 'CALLE'
TableField = 'CALLE'
end
item
DatasetField = 'POBLACION'
TableField = 'POBLACION'
end
item
DatasetField = 'PROVINCIA'
TableField = 'PROVINCIA'
end
item
DatasetField = 'CODIGO_POSTAL'
TableField = 'CODIGO_POSTAL'
end
item
DatasetField = 'TELEFONO_1'
TableField = 'TELEFONO_1'
end
item
DatasetField = 'TELEFONO_2'
TableField = 'TELEFONO_2'
end
item
DatasetField = 'MOVIL_1'
TableField = 'MOVIL_1'
end
item
DatasetField = 'MOVIL_2'
TableField = 'MOVIL_2'
end
item
DatasetField = 'FAX'
TableField = 'FAX'
end
item
DatasetField = 'EMAIL_1'
TableField = 'EMAIL_1'
end
item
DatasetField = 'EMAIL_2'
TableField = 'EMAIL_2'
end
item
DatasetField = 'PAGINA_WEB'
TableField = 'PAGINA_WEB'
end
item
DatasetField = 'NOTAS'
TableField = 'NOTAS'
end
item
DatasetField = 'FECHA_ALTA'
TableField = 'FECHA_ALTA'
end
item
DatasetField = 'FECHA_MODIFICACION'
TableField = 'FECHA_MODIFICACION'
end
item
DatasetField = 'USUARIO'
TableField = 'USUARIO'
end
item
DatasetField = 'LOGOTIPO'
TableField = 'LOGOTIPO'
end
item
DatasetField = 'REGISTRO_MERCANTIL'
TableField = 'REGISTRO_MERCANTIL'
end
item
DatasetField = 'ID_TIPO_IVA'
TableField = 'ID_TIPO_IVA'
end
item
DatasetField = 'ID_FORMA_PAGO'
TableField = 'ID_FORMA_PAGO'
end
item
DatasetField = 'VALIDEZ_PRESUPUESTOS'
TableField = 'VALIDEZ_PRESUPUESTOS'
end
item
DatasetField = 'PRECIO_PUNTO'
TableField = 'PRECIO_PUNTO'
end
item
DatasetField = 'IVA'
TableField = 'IVA'
end>
end>
Name = 'Empresas'
Fields = <
item
Name = 'ID'
DataType = datAutoInc
GeneratorName = 'GEN_EMPRESAS_ID'
ServerAutoRefresh = True
DictionaryEntry = 'Empresas_ID'
InPrimaryKey = True
end
item
Name = 'NIF_CIF'
DataType = datString
Size = 15
DictionaryEntry = 'Empresas_NIF_CIF'
end
item
Name = 'NOMBRE'
DataType = datString
Size = 255
DictionaryEntry = 'Empresas_NOMBRE'
end
item
Name = 'RAZON_SOCIAL'
DataType = datString
Size = 255
DictionaryEntry = 'Empresas_RAZON_SOCIAL'
end
item
Name = 'CALLE'
DataType = datString
Size = 255
DictionaryEntry = 'Empresas_CALLE'
end
item
Name = 'POBLACION'
DataType = datString
Size = 255
DictionaryEntry = 'Empresas_POBLACION'
end
item
Name = 'PROVINCIA'
DataType = datString
Size = 255
DictionaryEntry = 'Empresas_PROVINCIA'
end
item
Name = 'CODIGO_POSTAL'
DataType = datString
Size = 10
DictionaryEntry = 'Empresas_CODIGO_POSTAL'
end
item
Name = 'TELEFONO_1'
DataType = datString
Size = 25
DictionaryEntry = 'Empresas_TELEFONO_1'
end
item
Name = 'TELEFONO_2'
DataType = datString
Size = 25
DictionaryEntry = 'Empresas_TELEFONO_2'
end
item
Name = 'MOVIL_1'
DataType = datString
Size = 25
DictionaryEntry = 'Empresas_MOVIL_1'
end
item
Name = 'MOVIL_2'
DataType = datString
Size = 25
DictionaryEntry = 'Empresas_MOVIL_2'
end
item
Name = 'FAX'
DataType = datString
Size = 25
DictionaryEntry = 'Empresas_FAX'
end
item
Name = 'EMAIL_1'
DataType = datString
Size = 255
DictionaryEntry = 'Empresas_EMAIL_1'
end
item
Name = 'EMAIL_2'
DataType = datString
Size = 255
DictionaryEntry = 'Empresas_EMAIL_2'
end
item
Name = 'PAGINA_WEB'
DataType = datString
Size = 255
DictionaryEntry = 'Empresas_PAGINA_WEB'
end
item
Name = 'NOTAS'
DataType = datMemo
DictionaryEntry = 'Empresas_NOTAS'
end
item
Name = 'FECHA_ALTA'
DataType = datDateTime
DictionaryEntry = 'Empresas_FECHA_ALTA'
end
item
Name = 'FECHA_MODIFICACION'
DataType = datDateTime
DictionaryEntry = 'Empresas_FECHA_MODIFICACION'
end
item
Name = 'USUARIO'
DataType = datString
Size = 20
DictionaryEntry = 'Empresas_USUARIO'
end
item
Name = 'LOGOTIPO'
DataType = datBlob
BlobType = dabtBlob
DictionaryEntry = 'Empresas_LOGOTIPO'
end
item
Name = 'REGISTRO_MERCANTIL'
DataType = datString
Size = 255
DictionaryEntry = 'Empresas_REGISTRO_MERCANTIL'
end
item
Name = 'ID_TIPO_IVA'
DataType = datInteger
end
item
Name = 'IVA'
DataType = datFloat
end
item
Name = 'ID_FORMA_PAGO'
DataType = datInteger
end
item
Name = 'VALIDEZ_PRESUPUESTOS'
DataType = datSmallInt
end
item
Name = 'PRECIO_PUNTO'
DataType = datCurrency
end>
end
item
Params = <>
Statements = <
item
Connection = 'IBX'
Default = True
TargetTable = 'EMPRESAS_DATOS_BANCO'
Name = 'IBX'
StatementType = stAutoSQL
ColumnMappings = <
item
DatasetField = 'ID'
TableField = 'ID'
end
item
DatasetField = 'ID_EMPRESA'
TableField = 'ID_EMPRESA'
end
item
DatasetField = 'NOMBRE'
TableField = 'NOMBRE'
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
item
DatasetField = 'SUFIJO_N19'
TableField = 'SUFIJO_N19'
end
item
DatasetField = 'SUFIJO_N58'
TableField = 'SUFIJO_N58'
end>
end>
Name = 'EmpresasDatosBanco'
Fields = <
item
Name = 'ID'
DataType = datAutoInc
GeneratorName = 'GEN_EMPRESAS_DATOS_BANCO_ID'
ServerAutoRefresh = True
DictionaryEntry = 'EmpresasDatosBanco_ID'
InPrimaryKey = True
end
item
Name = 'ID_EMPRESA'
DataType = datInteger
DictionaryEntry = 'EmpresasDatosBanco_ID_EMPRESA'
end
item
Name = 'NOMBRE'
DataType = datString
Size = 255
DictionaryEntry = 'EmpresasDatosBanco_NOMBRE'
end
item
Name = 'ENTIDAD'
DataType = datString
Size = 15
DictionaryEntry = 'EmpresasDatosBanco_ENTIDAD'
end
item
Name = 'SUCURSAL'
DataType = datString
Size = 15
DictionaryEntry = 'EmpresasDatosBanco_SUCURSAL'
end
item
Name = 'DC'
DataType = datString
Size = 15
DictionaryEntry = 'EmpresasDatosBanco_DC'
end
item
Name = 'CUENTA'
DataType = datString
Size = 15
DictionaryEntry = 'EmpresasDatosBanco_CUENTA'
end
item
Name = 'SUFIJO_N19'
DataType = datString
Size = 3
DictionaryEntry = 'EmpresasDatosBanco_SUFIJO_N19'
end
item
Name = 'SUFIJO_N58'
DataType = datString
Size = 3
DictionaryEntry = 'EmpresasDatosBanco_SUFIJO_N58'
end>
end>
JoinDataTables = <>
UnionDataTables = <>
Commands = <
item
Params = <
item
Name = 'ID'
DataType = datAutoInc
GeneratorName = 'GEN_EMPRESAS_ID'
Value = ''
end
item
Name = 'NIF_CIF'
DataType = datString
Size = 15
Value = ''
end
item
Name = 'NOMBRE'
DataType = datString
Size = 255
Value = ''
end
item
Name = 'RAZON_SOCIAL'
DataType = datString
Size = 255
Value = ''
end
item
Name = 'CALLE'
DataType = datString
Size = 255
Value = ''
end
item
Name = 'POBLACION'
DataType = datString
Size = 255
Value = ''
end
item
Name = 'PROVINCIA'
DataType = datString
Size = 255
Value = ''
end
item
Name = 'CODIGO_POSTAL'
DataType = datString
Size = 10
Value = ''
end
item
Name = 'TELEFONO_1'
DataType = datString
Size = 25
Value = ''
end
item
Name = 'TELEFONO_2'
DataType = datString
Size = 25
Value = ''
end
item
Name = 'MOVIL_1'
DataType = datString
Size = 25
Value = ''
end
item
Name = 'MOVIL_2'
DataType = datString
Size = 25
Value = ''
end
item
Name = 'FAX'
DataType = datString
Size = 25
Value = ''
end
item
Name = 'EMAIL_1'
DataType = datString
Size = 255
Value = ''
end
item
Name = 'EMAIL_2'
DataType = datString
Size = 255
Value = ''
end
item
Name = 'PAGINA_WEB'
DataType = datString
Size = 255
Value = ''
end
item
Name = 'NOTAS'
DataType = datMemo
Value = ''
end
item
Name = 'FECHA_ALTA'
DataType = datDateTime
Value = ''
end
item
Name = 'FECHA_MODIFICACION'
DataType = datDateTime
Value = ''
end
item
Name = 'USUARIO'
DataType = datString
Size = 30
Value = ''
end
item
Name = 'LOGOTIPO'
DataType = datBlob
Value = ''
end
item
Name = 'REGISTRO_MERCANTIL'
DataType = datString
Size = 255
Value = ''
end
item
Name = 'ID_TIPO_IVA'
DataType = datInteger
Value = ''
end
item
Name = 'ID_FORMA_PAGO'
DataType = datInteger
Value = ''
end
item
Name = 'VALIDEZ_PRESUPUESTOS'
DataType = datSmallInt
Value = ''
end
item
Name = 'PRECIO_PUNTO'
DataType = datCurrency
Value = ''
end>
Statements = <
item
Connection = 'IBX'
Default = True
TargetTable = 'EMPRESAS'
SQL =
'INSERT'#10' INTO EMPRESAS'#10' (ID, NIF_CIF, NOMBRE, RAZON_SOCIAL, C' +
'ALLE, POBLACION, PROVINCIA,'#10' CODIGO_POSTAL, TELEFONO_1, TELE' +
'FONO_2, MOVIL_1, MOVIL_2, '#10' FAX, EMAIL_1, EMAIL_2, PAGINA_WE' +
'B, NOTAS, FECHA_ALTA, '#10' FECHA_MODIFICACION, USUARIO, LOGOTIP' +
'O, REGISTRO_MERCANTIL, '#10' ID_TIPO_IVA, ID_FORMA_PAGO, VALIDEZ' +
'_PRESUPUESTOS, PRECIO_PUNTO'#10' )'#10' VALUES'#10' (:ID, :NIF_CIF, ' +
':NOMBRE, :RAZON_SOCIAL, :CALLE, :POBLACION,'#10' :PROVINCIA, :CO' +
'DIGO_POSTAL, :TELEFONO_1, :TELEFONO_2, '#10' :MOVIL_1, :MOVIL_2,' +
' :FAX, :EMAIL_1, :EMAIL_2, :PAGINA_WEB, '#10' :NOTAS, :FECHA_ALT' +
'A, :FECHA_MODIFICACION, :USUARIO, '#10' :LOGOTIPO, :REGISTRO_MER' +
'CANTIL, :ID_TIPO_IVA, :ID_FORMA_PAGO, '#10' :VALIDEZ_PRESUPUESTO' +
'S, :PRECIO_PUNTO)'#10
StatementType = stSQL
ColumnMappings = <>
end>
Name = 'Insert_Empresas'
end
item
Params = <
item
Name = 'OLD_ID'
DataType = datAutoInc
Value = ''
end>
Statements = <
item
Connection = 'IBX'
Default = True
TargetTable = 'EMPRESAS'
SQL = 'DELETE '#10' FROM'#10' EMPRESAS'#10' WHERE'#10' (ID = :OLD_ID)'#10
StatementType = stSQL
ColumnMappings = <>
end>
Name = 'Delete_Empresas'
end
item
Params = <
item
Name = 'NIF_CIF'
DataType = datString
Size = 15
Value = ''
end
item
Name = 'NOMBRE'
DataType = datString
Size = 255
Value = ''
end
item
Name = 'RAZON_SOCIAL'
DataType = datString
Size = 255
Value = ''
end
item
Name = 'CALLE'
DataType = datString
Size = 255
Value = ''
end
item
Name = 'POBLACION'
DataType = datString
Size = 255
Value = ''
end
item
Name = 'PROVINCIA'
DataType = datString
Size = 255
Value = ''
end
item
Name = 'CODIGO_POSTAL'
DataType = datString
Size = 10
Value = ''
end
item
Name = 'TELEFONO_1'
DataType = datString
Size = 25
Value = ''
end
item
Name = 'TELEFONO_2'
DataType = datString
Size = 25
Value = ''
end
item
Name = 'MOVIL_1'
DataType = datString
Size = 25
Value = ''
end
item
Name = 'MOVIL_2'
DataType = datString
Size = 25
Value = ''
end
item
Name = 'FAX'
DataType = datString
Size = 25
Value = ''
end
item
Name = 'EMAIL_1'
DataType = datString
Size = 255
Value = ''
end
item
Name = 'EMAIL_2'
DataType = datString
Size = 255
Value = ''
end
item
Name = 'PAGINA_WEB'
DataType = datString
Size = 255
Value = ''
end
item
Name = 'NOTAS'
DataType = datMemo
Value = ''
end
item
Name = 'FECHA_ALTA'
DataType = datDateTime
Value = ''
end
item
Name = 'FECHA_MODIFICACION'
DataType = datDateTime
Value = ''
end
item
Name = 'USUARIO'
DataType = datString
Size = 30
Value = ''
end
item
Name = 'LOGOTIPO'
DataType = datBlob
Value = ''
end
item
Name = 'REGISTRO_MERCANTIL'
DataType = datString
Size = 255
Value = ''
end
item
Name = 'ID_TIPO_IVA'
DataType = datInteger
Value = ''
end
item
Name = 'ID_FORMA_PAGO'
DataType = datInteger
Value = ''
end
item
Name = 'VALIDEZ_PRESUPUESTOS'
DataType = datSmallInt
Value = ''
end
item
Name = 'PRECIO_PUNTO'
DataType = datCurrency
Value = ''
end
item
Name = 'OLD_ID'
Value = ''
end>
Statements = <
item
Connection = 'IBX'
Default = True
TargetTable = 'EMPRESAS'
SQL =
'UPDATE EMPRESAS'#10' SET '#10' NIF_CIF = :NIF_CIF, '#10' NOMBRE = :NO' +
'MBRE, '#10' RAZON_SOCIAL = :RAZON_SOCIAL, '#10' CALLE = :CALLE, '#10' ' +
' POBLACION = :POBLACION, '#10' PROVINCIA = :PROVINCIA, '#10' COD' +
'IGO_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' EMAI' +
'L_2 = :EMAIL_2, '#10' PAGINA_WEB = :PAGINA_WEB, '#10' NOTAS = :NOT' +
'AS, '#10' FECHA_ALTA = :FECHA_ALTA, '#10' FECHA_MODIFICACION = :FE' +
'CHA_MODIFICACION, '#10' USUARIO = :USUARIO, '#10' LOGOTIPO = :LOGO' +
'TIPO, '#10' REGISTRO_MERCANTIL = :REGISTRO_MERCANTIL, '#10' ID_TIP' +
'O_IVA = :ID_TIPO_IVA, '#10' ID_FORMA_PAGO = :ID_FORMA_PAGO, '#10' ' +
'VALIDEZ_PRESUPUESTOS = :VALIDEZ_PRESUPUESTOS, '#10' PRECIO_PUNTO ' +
'= :PRECIO_PUNTO'#10' WHERE'#10' (ID = :OLD_ID)'#10
StatementType = stSQL
ColumnMappings = <>
end>
Name = 'Update_Empresas'
end>
RelationShips = <
item
Name = 'FK_EmpresasTiendas_Empresas'
MasterDatasetName = 'Empresas'
MasterFields = 'ID'
DetailDatasetName = 'EmpresasTiendas'
DetailFields = 'ID_EMPRESA'
RelationshipType = rtForeignKey
end
item
Name = 'FK_EmpresasDatosBanco_Empresas'
MasterDatasetName = 'Empresas'
MasterFields = 'ID'
DetailDatasetName = 'EmpresasDatosBanco'
DetailFields = 'ID_EMPRESA'
RelationshipType = rtForeignKey
end>
UpdateRules = <
item
Name = 'Insert Empresas'
DoUpdate = False
DoDelete = False
DatasetName = 'Empresas'
FailureBehavior = fbRaiseException
end
item
Name = 'Insert EmpresasDatosBanco'
DoUpdate = False
DoDelete = False
DatasetName = 'EmpresasDatosBanco'
FailureBehavior = fbRaiseException
end
item
Name = 'Insert EmpresasTiendas'
DoUpdate = False
DoDelete = False
DatasetName = 'EmpresasTiendas'
FailureBehavior = fbRaiseException
end
item
Name = 'Update Empresas'
DoInsert = False
DoDelete = False
DatasetName = 'Empresas'
FailureBehavior = fbRaiseException
end
item
Name = 'Update EmpresasDatosBanco'
DoInsert = False
DoDelete = False
DatasetName = 'EmpresasDatosBanco'
FailureBehavior = fbRaiseException
end
item
Name = 'Update EmpresasTiendas'
DoInsert = False
DoDelete = False
DatasetName = 'EmpresasTiendas'
FailureBehavior = fbRaiseException
end
item
Name = 'Delete EmpresasDatosBanco'
DoUpdate = False
DoInsert = False
DatasetName = 'EmpresasDatosBanco'
FailureBehavior = fbRaiseException
end
item
Name = 'Delete EmpresasTiendas'
DoUpdate = False
DoInsert = False
DatasetName = 'EmpresasTiendas'
FailureBehavior = fbRaiseException
end
item
Name = 'Delete Empresas'
DoUpdate = False
DoInsert = False
DatasetName = 'Empresas'
FailureBehavior = fbRaiseException
end>
Version = 0
Left = 46
Top = 22
end
object DataDictionary: TDADataDictionary
Fields = <
item
Name = 'Empresas_NIF_CIF'
DataType = datString
Size = 15
DisplayLabel = 'CIF'
end
item
Name = 'Empresas_NOMBRE'
DataType = datString
Size = 255
DisplayLabel = 'Nombre'
end
item
Name = 'Empresas_RAZON_SOCIAL'
DataType = datString
Size = 255
DisplayLabel = 'Raz'#243'n Social'
end
item
Name = 'Empresas_CALLE'
DataType = datString
Size = 255
DisplayLabel = 'Calle'
end
item
Name = 'Empresas_POBLACION'
DataType = datString
Size = 255
DisplayLabel = 'Poblaci'#243'n'
end
item
Name = 'Empresas_PROVINCIA'
DataType = datString
Size = 255
DisplayLabel = 'Provincia'
end
item
Name = 'Empresas_CODIGO_POSTAL'
DataType = datString
Size = 10
DisplayLabel = 'C'#243'd. postal'
end
item
Name = 'Empresas_TELEFONO_1'
DataType = datString
Size = 25
DisplayLabel = 'Tel'#233'fono 1'
end
item
Name = 'Empresas_TELEFONO_2'
DataType = datString
Size = 25
DisplayLabel = 'Tel'#233'fono 2'
end
item
Name = 'Empresas_MOVIL_1'
DataType = datString
Size = 25
DisplayLabel = 'M'#243'vil 1'
end
item
Name = 'Empresas_MOVIL_2'
DataType = datString
Size = 25
DisplayLabel = 'M'#243'vil 2'
end
item
Name = 'Empresas_FAX'
DataType = datString
Size = 25
DisplayLabel = 'Fax'
end
item
Name = 'Empresas_EMAIL_1'
DataType = datString
Size = 255
DisplayLabel = 'E-mail 1'
end
item
Name = 'Empresas_EMAIL_2'
DataType = datString
Size = 255
DisplayLabel = 'E-mail 2'
end
item
Name = 'Empresas_PAGINA_WEB'
DataType = datString
Size = 255
DisplayLabel = 'P'#225'gina web'
end
item
Name = 'Empresas_NOTAS'
DataType = datMemo
DisplayLabel = 'Notas'
end
item
Name = 'Empresas_FECHA_ALTA'
DataType = datDateTime
end
item
Name = 'Empresas_FECHA_MODIFICACION'
DataType = datDateTime
end
item
Name = 'Empresas_USUARIO'
DataType = datString
Size = 20
end
item
Name = 'Empresas_LOGOTIPO'
DataType = datBlob
BlobType = dabtBlob
DisplayLabel = 'Logotipo'
end
item
Name = 'Empresas_REGISTRO_MERCANTIL'
DataType = datString
Size = 255
DisplayLabel = 'Registro mercantil'
end
item
Name = 'Empresas_IVA'
DataType = datFloat
DisplayLabel = 'IVA'
end
item
Name = 'EmpresasDatosBanco_ID_EMPRESA'
DataType = datInteger
end
item
Name = 'EmpresasDatosBanco_NOMBRE'
DataType = datString
Size = 255
DisplayLabel = 'Nombre del banco'
end
item
Name = 'EmpresasDatosBanco_ENTIDAD'
DataType = datString
Size = 15
DisplayLabel = 'Entidad'
end
item
Name = 'EmpresasDatosBanco_SUCURSAL'
DataType = datString
Size = 15
DisplayLabel = 'Sucursal'
end
item
Name = 'EmpresasDatosBanco_DC'
DataType = datString
Size = 15
DisplayLabel = 'DC'
end
item
Name = 'EmpresasDatosBanco_CUENTA'
DataType = datString
Size = 15
DisplayLabel = 'Cuenta'
end
item
Name = 'EmpresasDatosBanco_SUFIJO_N19'
DataType = datString
Size = 3
DisplayLabel = 'Sufijo 19'
end
item
Name = 'EmpresasDatosBanco_SUFIJO_N58'
DataType = datString
Size = 3
DisplayLabel = 'Sufijo 58'
end
item
Name = 'EmpresasDatosBanco_ID'
DataType = datAutoInc
GeneratorName = 'GEN_EMPRESAS_DATOS_BANCO_ID'
LogChanges = False
Required = True
DisplayLabel = 'ID'
ServerAutoRefresh = True
end
item
Name = 'Empresas_ID'
DataType = datAutoInc
GeneratorName = 'GEN_EMPRESAS_ID'
LogChanges = False
Required = True
DisplayLabel = 'ID'
ServerAutoRefresh = True
end
item
Name = 'EmpresasTiendas_ID'
DataType = datAutoInc
GeneratorName = 'GEN_EMPRESAS_TIENDAS_ID'
Required = True
DisplayLabel = 'ID'
ServerAutoRefresh = True
end
item
Name = 'EmpresasTiendas_ID_EMPRESA'
DataType = datInteger
Required = True
end
item
Name = 'EmpresasTiendas_CALLE'
DataType = datString
Size = 255
end
item
Name = 'EmpresasTiendas_POBLACION'
DataType = datString
Size = 255
end
item
Name = 'EmpresasTiendas_PROVINCIA'
DataType = datString
Size = 255
end
item
Name = 'EmpresasTiendas_CODIGO_POSTAL'
DataType = datString
Size = 10
end
item
Name = 'EmpresasTiendas_PERSONA_CONTACTO'
DataType = datString
Size = 255
end
item
Name = 'EmpresasTiendas_NOMBRE'
DataType = datString
Size = 255
end
item
Name = 'EmpresasTiendas_TELEFONO'
DataType = datString
Size = 25
end
item
Name = 'EmpresasTiendas_MOVIL'
DataType = datString
Size = 25
end
item
Name = 'EmpresasTiendas_FAX'
DataType = datString
Size = 25
end
item
Name = 'EmpresasTiendas_EMAIL'
DataType = datString
Size = 255
end
item
Name = 'EmpresasTiendas_NOTAS'
DataType = datMemo
end
item
Name = 'EmpresasTiendas_FECHA_ALTA'
DataType = datDateTime
end
item
Name = 'EmpresasTiendas_FECHA_MODIFICACION'
DataType = datDateTime
end>
Left = 158
Top = 22
end
object Diagrams: TDADiagrams
Left = 158
Top = 90
DiagramData =
'<Diagrams>'#13#10' <Diagram Name="New Diagram" Left="200" Top="200" W' +
'idth="400" Height="300">'#13#10' <Entity Name="Empresas" Left="0,00' +
'" Top="1,00" />'#13#10' <Entity Name="EmpresasDatosBanco" Left="308' +
',00" Top="0,00" />'#13#10' </Diagram>'#13#10'</Diagrams>'#13#10
end
object DABin2DataStreamer: TDABin2DataStreamer
Left = 48
Top = 88
end
object bpEmpresas: TDABusinessProcessor
Schema = schEmpresas
InsertCommandName = 'Insert_Empresas'
DeleteCommandName = 'Delete_Empresas'
UpdateCommandName = 'Update_Empresas'
ReferencedDataset = 'Empresas'
ProcessorOptions = [poAutoGenerateRefreshDataset, poPrepareCommands]
UpdateMode = updWhereKeyOnly
Left = 264
Top = 24
end
end
Reference in New Issue View Git Blame Copy Permalink