AbetoDesign_FactuGES2/Source/Modulos/Presupuestos de cliente/Servidor/srvPresupuestosCliente_Impl.dfm
2014-01-20 18:42:20 +00:00

2052 lines
62 KiB
Plaintext

object srvPresupuestosCliente: TsrvPresupuestosCliente
OldCreateOrder = True
OnCreate = DARemoteServiceCreate
ConnectionName = 'IBX'
ServiceSchema = schPresupuestosCliente
ServiceDataStreamer = Bin2DataStreamer
ExportedDataTables = <>
Height = 230
Width = 346
object schPresupuestosCliente: TDASchema
ConnectionManager = dmServer.ConnectionManager
DataDictionary = DADataDictionary
Datasets = <
item
Params = <>
Statements = <
item
Connection = 'IBX'
ConnectionType = 'Interbase'
Default = True
TargetTable = 'ARTICULOS'
Name = 'IBX'
SQL =
'SELECT'#10' ID, ID_EMPRESA, REFERENCIA, DESCRIPCION, FAMILIA, PRE' +
'CIO_PVP'#10#10' FROM'#10' ARTICULOS'#10' WHERE ELIMINADO = 0 and {Where}'#10
StatementType = stSQL
ColumnMappings = <
item
DatasetField = 'ID'
TableField = 'ID'
end
item
DatasetField = 'DESCRIPCION'
TableField = 'DESCRIPCION'
end
item
DatasetField = 'ID_EMPRESA'
TableField = 'ID_EMPRESA'
end
item
DatasetField = 'REFERENCIA'
TableField = 'REFERENCIA'
end
item
DatasetField = 'FAMILIA'
TableField = 'FAMILIA'
end
item
DatasetField = 'PRECIO_PVP'
TableField = 'PRECIO_PVP'
end>
end>
Name = 'Valores'
Fields = <
item
Name = 'ID'
DataType = datInteger
Required = True
InPrimaryKey = True
end
item
Name = 'ID_EMPRESA'
DataType = datInteger
end
item
Name = 'REFERENCIA'
DataType = datString
Size = 255
end
item
Name = 'DESCRIPCION'
DataType = datString
Size = 255
end
item
Name = 'FAMILIA'
DataType = datString
Size = 255
end
item
Name = 'PRECIO_PVP'
DataType = datCurrency
end>
end
item
Params = <>
Statements = <
item
Connection = 'IBX'
ConnectionType = 'Interbase'
Default = True
TargetTable = 'FAMILIAS'
Name = 'IBX'
SQL = 'select ID,'#10' DESCRIPCION'#10#10'from familias'#10#10'WHERE {Where}'#10
StatementType = stSQL
ColumnMappings = <
item
DatasetField = 'ID'
TableField = 'ID'
end
item
DatasetField = 'DESCRIPCION'
TableField = 'DESCRIPCION'
end>
end>
Name = 'Propiedades'
Fields = <
item
Name = 'ID'
DataType = datInteger
Required = True
InPrimaryKey = True
end
item
Name = 'DESCRIPCION'
DataType = datString
Size = 255
end>
end
item
Params = <>
Statements = <
item
Connection = 'IBX'
ConnectionType = 'Interbase'
Default = True
Name = 'IBX'
SQL =
'select ANO from'#10'(select distinct(substr(FECHA_PRESUPUESTO, 1,4))' +
' as ANO'#10'from presupuestos_cliente'#10'order by 1 desc)'#10#10'UNION ALL'#10#10's' +
'elect distinct '#39'Todos'#39' as ANO'#10'from empresas'#10
StatementType = stSQL
ColumnMappings = <
item
DatasetField = 'ANO'
TableField = 'ANO'
end>
end>
Name = 'ListaAnosPresupuestos'
Fields = <
item
Name = 'ANO'
DataType = datString
Size = 254
end>
end
item
Params = <>
Statements = <
item
Connection = 'IBX'
Default = True
TargetTable = 'V_PRESUPUESTOS_CLIENTE'
StatementType = stAutoSQL
ColumnMappings = <
item
DatasetField = 'ID'
TableField = 'ID'
end
item
DatasetField = 'ID_EMPRESA'
TableField = 'ID_EMPRESA'
end
item
DatasetField = 'FECHA_PRESUPUESTO'
TableField = 'FECHA_PRESUPUESTO'
end
item
DatasetField = 'FECHA_VIGENCIA'
TableField = 'FECHA_VIGENCIA'
end
item
DatasetField = 'FECHA_DECISION'
TableField = 'FECHA_DECISION'
end
item
DatasetField = 'REFERENCIA'
TableField = 'REFERENCIA'
end
item
DatasetField = 'SITUACION'
TableField = 'SITUACION'
end
item
DatasetField = 'ID_CLIENTE'
TableField = 'ID_CLIENTE'
end
item
DatasetField = 'ID_DIRECCION'
TableField = 'ID_DIRECCION'
end
item
DatasetField = 'NIF_CIF'
TableField = 'NIF_CIF'
end
item
DatasetField = 'NOMBRE'
TableField = 'NOMBRE'
end
item
DatasetField = 'PERSONA_CONTACTO'
TableField = 'PERSONA_CONTACTO'
end
item
DatasetField = 'FORMA_PAGO'
TableField = 'FORMA_PAGO'
end
item
DatasetField = 'PLAZO_ENTREGA'
TableField = 'PLAZO_ENTREGA'
end
item
DatasetField = 'OBSERVACIONES'
TableField = 'OBSERVACIONES'
end
item
DatasetField = 'INCIDENCIAS'
TableField = 'INCIDENCIAS'
end
item
DatasetField = 'INCIDENCIAS_ACTIVAS'
TableField = 'INCIDENCIAS_ACTIVAS'
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 = 'IMPORTE_NETO'
TableField = 'IMPORTE_NETO'
end
item
DatasetField = 'IMPORTE_PORTE'
TableField = 'IMPORTE_PORTE'
end
item
DatasetField = 'DESCUENTO'
TableField = 'DESCUENTO'
end
item
DatasetField = 'IMPORTE_DESCUENTO'
TableField = 'IMPORTE_DESCUENTO'
end
item
DatasetField = 'BASE_IMPONIBLE'
TableField = 'BASE_IMPONIBLE'
end
item
DatasetField = 'ID_TIPO_IVA'
TableField = 'ID_TIPO_IVA'
end
item
DatasetField = 'IVA'
TableField = 'IVA'
end
item
DatasetField = 'IMPORTE_IVA'
TableField = 'IMPORTE_IVA'
end
item
DatasetField = 'RE'
TableField = 'RE'
end
item
DatasetField = 'IMPORTE_RE'
TableField = 'IMPORTE_RE'
end
item
DatasetField = 'RECARGO_EQUIVALENCIA'
TableField = 'RECARGO_EQUIVALENCIA'
end
item
DatasetField = 'IMPORTE_TOTAL'
TableField = 'IMPORTE_TOTAL'
end
item
DatasetField = 'ID_FORMA_PAGO'
TableField = 'ID_FORMA_PAGO'
end
item
DatasetField = 'ID_TIENDA'
TableField = 'ID_TIENDA'
end
item
DatasetField = 'TIENDA'
TableField = 'TIENDA'
end
item
DatasetField = 'ID_VENDEDOR'
TableField = 'ID_VENDEDOR'
end
item
DatasetField = 'VENDEDOR'
TableField = 'VENDEDOR'
end
item
DatasetField = 'ID_CONTRATO'
TableField = 'ID_CONTRATO'
end
item
DatasetField = 'REF_CONTRATO'
TableField = 'REF_CONTRATO'
end
item
DatasetField = 'NO_VALORADO'
TableField = 'NO_VALORADO'
end
item
DatasetField = 'TIPO_PRESUPUESTO'
TableField = 'TIPO_PRESUPUESTO'
end
item
DatasetField = 'REFERENCIA_CLIENTE'
TableField = 'REFERENCIA_CLIENTE'
end>
end>
Name = 'PresupuestosCliente'
Fields = <
item
Name = 'ID'
DataType = datAutoInc
GeneratorName = 'GEN_PRESUPUESTOS_CLI_ID'
ServerAutoRefresh = True
DictionaryEntry = 'PresupuestosCliente_ID'
InPrimaryKey = True
end
item
Name = 'ID_EMPRESA'
DataType = datInteger
DictionaryEntry = 'PresupuestosCliente_ID_EMPRESA'
end
item
Name = 'FECHA_PRESUPUESTO'
DataType = datDateTime
DictionaryEntry = 'PresupuestosCliente_FECHA_PRESUPUESTO'
end
item
Name = 'FECHA_VIGENCIA'
DataType = datDateTime
end
item
Name = 'FECHA_DECISION'
DataType = datDateTime
DictionaryEntry = 'PresupuestosCliente_FECHA_DECISION'
end
item
Name = 'REFERENCIA'
DataType = datString
Size = 255
DictionaryEntry = 'PresupuestosCliente_REFERENCIA'
end
item
Name = 'REFERENCIA_CLIENTE'
DataType = datString
Size = 255
end
item
Name = 'SITUACION'
DataType = datString
Size = 255
DictionaryEntry = 'PresupuestosCliente_SITUACION'
end
item
Name = 'ID_CLIENTE'
DataType = datInteger
DictionaryEntry = 'PresupuestosCliente_ID_CLIENTE'
end
item
Name = 'ID_DIRECCION'
DataType = datInteger
end
item
Name = 'NIF_CIF'
DataType = datString
Size = 15
ServerAutoRefresh = True
DictionaryEntry = 'PresupuestosCliente_NIF_CIF'
end
item
Name = 'NOMBRE'
DataType = datString
Size = 255
ServerAutoRefresh = True
DictionaryEntry = 'PresupuestosCliente_NOMBRE'
end
item
Name = 'PERSONA_CONTACTO'
DataType = datString
Size = 255
end
item
Name = 'FORMA_PAGO'
DataType = datMemo
end
item
Name = 'PLAZO_ENTREGA'
DataType = datMemo
end
item
Name = 'OBSERVACIONES'
DataType = datMemo
DictionaryEntry = 'PresupuestosCliente_OBSERVACIONES'
end
item
Name = 'INCIDENCIAS'
DataType = datMemo
DictionaryEntry = 'PresupuestosCliente_INCIDENCIAS'
end
item
Name = 'INCIDENCIAS_ACTIVAS'
DataType = datInteger
DictionaryEntry = 'PresupuestosCliente_INCIDENCIAS_ACTIVAS'
end
item
Name = 'FECHA_ALTA'
DataType = datDateTime
DictionaryEntry = 'PresupuestosCliente_FECHA_ALTA'
end
item
Name = 'FECHA_MODIFICACION'
DataType = datDateTime
DictionaryEntry = 'PresupuestosCliente_FECHA_MODIFICACION'
end
item
Name = 'USUARIO'
DataType = datString
Size = 20
DictionaryEntry = 'PresupuestosCliente_USUARIO'
end
item
Name = 'IMPORTE_NETO'
DataType = datCurrency
DictionaryEntry = 'PresupuestosCliente_IMPORTE_NETO'
end
item
Name = 'IMPORTE_PORTE'
DataType = datCurrency
DictionaryEntry = 'PresupuestosCliente_IMPORTE_PORTE'
end
item
Name = 'DESCUENTO'
DataType = datFloat
DictionaryEntry = 'PresupuestosCliente_DESCUENTO'
end
item
Name = 'IMPORTE_DESCUENTO'
DataType = datCurrency
DictionaryEntry = 'PresupuestosCliente_IMPORTE_DESCUENTO'
end
item
Name = 'BASE_IMPONIBLE'
DataType = datCurrency
DictionaryEntry = 'PresupuestosCliente_BASE_IMPONIBLE'
end
item
Name = 'ID_TIPO_IVA'
DataType = datInteger
end
item
Name = 'IVA'
DataType = datFloat
DictionaryEntry = 'PresupuestosCliente_IVA'
end
item
Name = 'IMPORTE_IVA'
DataType = datCurrency
DictionaryEntry = 'PresupuestosCliente_IMPORTE_IVA'
end
item
Name = 'RE'
DataType = datFloat
end
item
Name = 'IMPORTE_RE'
DataType = datCurrency
end
item
Name = 'RECARGO_EQUIVALENCIA'
DataType = datSmallInt
end
item
Name = 'IMPORTE_TOTAL'
DataType = datCurrency
DictionaryEntry = 'PresupuestosCliente_IMPORTE_TOTAL'
end
item
Name = 'ID_FORMA_PAGO'
DataType = datInteger
DictionaryEntry = 'PresupuestosCliente_ID_FORMA_PAGO'
end
item
Name = 'ID_TIENDA'
DataType = datInteger
end
item
Name = 'TIENDA'
DataType = datString
Size = 255
end
item
Name = 'ID_VENDEDOR'
DataType = datInteger
end
item
Name = 'VENDEDOR'
DataType = datString
Size = 255
end
item
Name = 'ID_CONTRATO'
DataType = datInteger
end
item
Name = 'REF_CONTRATO'
DataType = datString
Size = 255
end
item
Name = 'NO_VALORADO'
DataType = datSmallInt
end
item
Name = 'TIPO_PRESUPUESTO'
DataType = datString
Size = 255
DictionaryEntry = 'PresupuestosCliente_TIPO_PRESUPUESTO'
end>
end
item
Params = <>
Statements = <
item
Connection = 'IBX'
ConnectionType = 'Interbase'
Default = True
TargetTable = 'PRESUPUESTOS_CLIENTE_CAPITULOS'
Name = 'IBX'
SQL =
'SELECT'#10' ID, POSICION, TIPO_DETALLE, TIPO_ARTICULO, CONCEPTO,'#10 +
' 1 as CANTIDAD, 0 as IMPORTE_UNIDAD, 0 as IMPORTE_TOTAL, 0 as' +
' DESCUENTO,'#10' 0 as IMPORTE_PORTE,'#10' 1 as VISIBLE,'#10' 1 as V' +
'ALORADO'#10' FROM'#10' PRESUPUESTOS_CLIENTE_CAPITULOS'#10' WHERE {Where' +
'}'#10' order by posicion'#10
StatementType = stSQL
ColumnMappings = <
item
DatasetField = 'ID'
TableField = 'ID'
end
item
DatasetField = 'POSICION'
TableField = 'POSICION'
end
item
DatasetField = 'TIPO_DETALLE'
TableField = 'TIPO_DETALLE'
end
item
DatasetField = 'TIPO_ARTICULO'
TableField = 'TIPO_ARTICULO'
end
item
DatasetField = 'CONCEPTO'
TableField = 'CONCEPTO'
end
item
DatasetField = 'CANTIDAD'
TableField = '<unknown>'
SQLOrigin = 'CANTIDAD'
end
item
DatasetField = 'IMPORTE_UNIDAD'
TableField = '<unknown>'
SQLOrigin = 'IMPORTE_UNIDAD'
end
item
DatasetField = 'IMPORTE_TOTAL'
TableField = '<unknown>'
SQLOrigin = 'IMPORTE_TOTAL'
end
item
DatasetField = 'DESCUENTO'
TableField = '<unknown>'
SQLOrigin = 'DESCUENTO'
end
item
DatasetField = 'IMPORTE_PORTE'
TableField = '<unknown>'
SQLOrigin = 'IMPORTE_PORTE'
end
item
DatasetField = 'VISIBLE'
TableField = '<unknown>'
SQLOrigin = 'VISIBLE'
end
item
DatasetField = 'VALORADO'
TableField = '<unknown>'
SQLOrigin = 'VALORADO'
end>
end>
Name = 'CapitulosPresupuesto'
Fields = <
item
Name = 'ID'
DataType = datAutoInc
GeneratorName = 'GEN_PRESUPUESTOS_CLIENTE_CAPITU'
DictionaryEntry = 'CapitulosPresupuesto_ID'
InPrimaryKey = True
end
item
Name = 'POSICION'
DataType = datInteger
DictionaryEntry = 'CapitulosPresupuesto_POSICION'
end
item
Name = 'TIPO_DETALLE'
DataType = datString
Size = 10
DictionaryEntry = 'CapitulosPresupuesto_TIPO_DETALLE'
end
item
Name = 'TIPO_ARTICULO'
DataType = datString
Size = 2
DictionaryEntry = 'CapitulosPresupuesto_TIPO_ARTICULO'
end
item
Name = 'CONCEPTO'
DataType = datString
Size = 255
DictionaryEntry = 'CapitulosPresupuesto_CONCEPTO'
end
item
Name = 'CANTIDAD'
DataType = datInteger
DictionaryEntry = 'CapitulosPresupuesto_CANTIDAD'
end
item
Name = 'IMPORTE_UNIDAD'
DataType = datInteger
DictionaryEntry = 'CapitulosPresupuesto_IMPORTE_UNIDAD'
end
item
Name = 'IMPORTE_TOTAL'
DataType = datInteger
DictionaryEntry = 'CapitulosPresupuesto_IMPORTE_TOTAL'
end
item
Name = 'DESCUENTO'
DataType = datInteger
DictionaryEntry = 'CapitulosPresupuesto_DESCUENTO'
end
item
Name = 'IMPORTE_PORTE'
DataType = datInteger
DictionaryEntry = 'CapitulosPresupuesto_IMPORTE_PORTE'
end
item
Name = 'VALORADO'
DataType = datInteger
DictionaryEntry = 'CapitulosPresupuesto_VALORADO'
end
item
Name = 'VISIBLE'
DataType = datInteger
DictionaryEntry = 'CapitulosPresupuesto_VISIBLE'
end>
end
item
Params = <>
Statements = <
item
Connection = 'IBX'
Default = True
TargetTable = 'PRESUPUESTOS_CLIENTE_DETALLES'
SQL =
'SELECT'#10' PRESUPUESTOS_CLIENTE_DETALLES.ID, PRESUPUESTOS_CLIENT' +
'E_DETALLES.ID_PRESUPUESTO,'#10' PRESUPUESTOS_CLIENTE_DETALLES.POS' +
'ICION, PRESUPUESTOS_CLIENTE_DETALLES.TIPO_DETALLE,'#10' PRESUPUES' +
'TOS_CLIENTE_DETALLES.PROPIEDAD, PRESUPUESTOS_CLIENTE_DETALLES.CO' +
'NCEPTO, PRESUPUESTOS_CLIENTE_DETALLES.CANTIDAD,'#10' PRESUPUESTOS' +
'_CLIENTE_DETALLES.IMPORTE_UNIDAD, PRESUPUESTOS_CLIENTE_DETALLES.' +
'IMPORTE_TOTAL,'#10' PRESUPUESTOS_CLIENTE_DETALLES.VISIBLE,'#10' PR' +
'ESUPUESTOS_CLIENTE_DETALLES.VALORADO,'#10' PRESUPUESTOS_CLIENTE_D' +
'ETALLES.ID_ARTICULO, PRESUPUESTOS_CLIENTE_DETALLES.TIPO_ARTICULO' +
','#10' PRESUPUESTOS_CLIENTE_DETALLES.DESCUENTO,'#10' PRESUPUESTOS_' +
'CLIENTE_DETALLES.IMPORTE_PORTE, ARTICULOS.REFERENCIA,'#10' '#39#39' as ' +
'REFERENCIA_PROVEEDOR /*Es necesario para que no fallen los detal' +
'les porque los detalles son comunes para la rama de cliente y de' +
' proveedor*/'#10#10'FROM PRESUPUESTOS_CLIENTE_DETALLES'#10'LEFT JOIN ARTIC' +
'ULOS ON PRESUPUESTOS_CLIENTE_DETALLES.ID_ARTICULO = ARTICULOS.ID' +
#10'where {where}'#10'ORDER BY POSICION;'#10#10#10
StatementType = stSQL
ColumnMappings = <
item
DatasetField = 'ID'
TableField = 'ID'
end
item
DatasetField = 'ID_PRESUPUESTO'
TableField = 'ID_PRESUPUESTO'
end
item
DatasetField = 'POSICION'
TableField = 'POSICION'
end
item
DatasetField = 'TIPO_DETALLE'
TableField = 'TIPO_DETALLE'
end
item
DatasetField = 'CONCEPTO'
TableField = 'CONCEPTO'
end
item
DatasetField = 'CANTIDAD'
TableField = 'CANTIDAD'
end
item
DatasetField = 'IMPORTE_UNIDAD'
TableField = 'IMPORTE_UNIDAD'
end
item
DatasetField = 'IMPORTE_TOTAL'
TableField = 'IMPORTE_TOTAL'
end
item
DatasetField = 'VISIBLE'
TableField = 'VISIBLE'
end
item
DatasetField = 'ID_ARTICULO'
TableField = 'ID_ARTICULO'
end
item
DatasetField = 'TIPO_ARTICULO'
TableField = 'TIPO_ARTICULO'
end
item
DatasetField = 'DESCUENTO'
TableField = 'DESCUENTO'
end
item
DatasetField = 'IMPORTE_PORTE'
TableField = 'IMPORTE_PORTE'
end
item
DatasetField = 'REFERENCIA'
TableField = '<unknown>'
SQLOrigin = 'REFERENCIA'
end
item
DatasetField = 'REFERENCIA_PROVEEDOR'
TableField = '<unknown>'
SQLOrigin = 'REFERENCIA_PROVEEDOR'
end
item
DatasetField = 'PROPIEDAD'
TableField = 'PROPIEDAD'
end
item
DatasetField = 'VALORADO'
TableField = 'VALORADO'
end>
end>
Name = 'PresupuestosCliente_Detalles'
Fields = <
item
Name = 'ID'
DataType = datAutoInc
GeneratorName = 'GEN_PRESUPUESTOS_CLI_DETALLE_ID'
InPrimaryKey = True
end
item
Name = 'ID_PRESUPUESTO'
DataType = datInteger
end
item
Name = 'POSICION'
DataType = datInteger
end
item
Name = 'TIPO_DETALLE'
DataType = datString
Size = 10
end
item
Name = 'PROPIEDAD'
DataType = datString
Size = 255
end
item
Name = 'CONCEPTO'
DataType = datString
Size = 2000
end
item
Name = 'CANTIDAD'
DataType = datCurrency
end
item
Name = 'IMPORTE_UNIDAD'
DataType = datCurrency
end
item
Name = 'IMPORTE_TOTAL'
DataType = datCurrency
end
item
Name = 'VISIBLE'
DataType = datSmallInt
end
item
Name = 'VALORADO'
DataType = datSmallInt
end
item
Name = 'ID_ARTICULO'
DataType = datInteger
end
item
Name = 'TIPO_ARTICULO'
DataType = datString
Size = 2
end
item
Name = 'DESCUENTO'
DataType = datFloat
end
item
Name = 'IMPORTE_PORTE'
DataType = datCurrency
end
item
Name = 'REFERENCIA'
DataType = datString
Size = 255
end
item
Name = 'REFERENCIA_PROVEEDOR'
DataType = datString
end>
end>
JoinDataTables = <>
UnionDataTables = <>
Commands = <
item
Params = <
item
Name = 'ID'
DataType = datAutoInc
GeneratorName = 'GEN_PRESUPUESTOS_CLI_ID'
Value = ''
end
item
Name = 'ID_EMPRESA'
DataType = datInteger
Value = ''
end
item
Name = 'FECHA_PRESUPUESTO'
DataType = datDateTime
Value = ''
end
item
Name = 'FECHA_VIGENCIA'
DataType = datDateTime
Value = ''
end
item
Name = 'FECHA_DECISION'
DataType = datDateTime
Value = ''
end
item
Name = 'REFERENCIA'
DataType = datString
Size = 255
Value = ''
end
item
Name = 'REFERENCIA_CLIENTE'
DataType = datString
Size = 255
Value = ''
end
item
Name = 'SITUACION'
DataType = datString
Size = 255
Value = ''
end
item
Name = 'ID_CLIENTE'
DataType = datInteger
Value = ''
end
item
Name = 'ID_DIRECCION'
DataType = datInteger
Value = ''
end
item
Name = 'PERSONA_CONTACTO'
DataType = datString
Size = 255
Value = ''
end
item
Name = 'FORMA_PAGO'
DataType = datMemo
Value = ''
end
item
Name = 'PLAZO_ENTREGA'
DataType = datMemo
Value = ''
end
item
Name = 'OBSERVACIONES'
DataType = datMemo
Value = ''
end
item
Name = 'INCIDENCIAS'
DataType = datMemo
Value = ''
end
item
Name = 'INCIDENCIAS_ACTIVAS'
DataType = datSmallInt
Value = ''
end
item
Name = 'USUARIO'
DataType = datString
Size = 30
Value = ''
end
item
Name = 'IMPORTE_NETO'
DataType = datCurrency
Value = ''
end
item
Name = 'IMPORTE_PORTE'
DataType = datCurrency
Value = ''
end
item
Name = 'DESCUENTO'
DataType = datFloat
Value = ''
end
item
Name = 'IMPORTE_DESCUENTO'
DataType = datCurrency
Value = ''
end
item
Name = 'BASE_IMPONIBLE'
DataType = datCurrency
Value = ''
end
item
Name = 'ID_TIPO_IVA'
DataType = datInteger
Value = ''
end
item
Name = 'IVA'
DataType = datFloat
Value = ''
end
item
Name = 'IMPORTE_IVA'
DataType = datCurrency
Value = ''
end
item
Name = 'RE'
DataType = datFloat
Value = ''
end
item
Name = 'IMPORTE_RE'
DataType = datCurrency
Value = ''
end
item
Name = 'RECARGO_EQUIVALENCIA'
DataType = datSmallInt
Value = ''
end
item
Name = 'IMPORTE_TOTAL'
DataType = datCurrency
Value = ''
end
item
Name = 'ID_FORMA_PAGO'
DataType = datInteger
Value = ''
end
item
Name = 'ID_TIENDA'
DataType = datInteger
Value = ''
end
item
Name = 'ID_VENDEDOR'
DataType = datInteger
Value = ''
end
item
Name = 'ID_CONTRATO'
DataType = datInteger
Value = ''
end
item
Name = 'NO_VALORADO'
DataType = datSmallInt
Value = ''
end
item
Name = 'TIPO_PRESUPUESTO'
DataType = datString
Size = 255
Value = ''
end>
Statements = <
item
Connection = 'IBX'
Default = True
TargetTable = 'PRESUPUESTOS_CLIENTE'
SQL =
'INSERT'#10' INTO PRESUPUESTOS_CLIENTE'#10' (ID, ID_EMPRESA,'#10' FEC' +
'HA_PRESUPUESTO, FECHA_VIGENCIA, FECHA_DECISION, REFERENCIA, REFE' +
'RENCIA_CLIENTE,'#10' SITUACION, ID_CLIENTE, ID_DIRECCION, PERSON' +
'A_CONTACTO,'#10' FORMA_PAGO, PLAZO_ENTREGA, OBSERVACIONES, INCID' +
'ENCIAS,'#10' INCIDENCIAS_ACTIVAS, FECHA_ALTA, USUARIO, IMPORTE_N' +
'ETO, IMPORTE_PORTE,'#10' DESCUENTO, IMPORTE_DESCUENTO, BASE_IMPO' +
'NIBLE, ID_TIPO_IVA, IVA, IMPORTE_IVA,'#10' RE, IMPORTE_RE, RECAR' +
'GO_EQUIVALENCIA, IMPORTE_TOTAL, ID_FORMA_PAGO, ID_TIENDA, ID_VEN' +
'DEDOR,'#10' ID_CONTRATO, NO_VALORADO, TIPO_PRESUPUESTO)'#10' VALUES' +
#10' (:ID, :ID_EMPRESA,'#10' :FECHA_PRESUPUESTO, :FECHA_VIGENCIA' +
', :FECHA_DECISION, :REFERENCIA, :REFERENCIA_CLIENTE,'#10' :SITUA' +
'CION, :ID_CLIENTE, :ID_DIRECCION, :PERSONA_CONTACTO,'#10' :FORMA' +
'_PAGO, :PLAZO_ENTREGA, :OBSERVACIONES, :INCIDENCIAS,'#10' :INCID' +
'ENCIAS_ACTIVAS, CURRENT_TIMESTAMP, :USUARIO, :IMPORTE_NETO, :IMP' +
'ORTE_PORTE,'#10' :DESCUENTO, :IMPORTE_DESCUENTO, :BASE_IMPONIBLE' +
', :ID_TIPO_IVA, :IVA, :IMPORTE_IVA,'#10' :RE, :IMPORTE_RE, :RECA' +
'RGO_EQUIVALENCIA, :IMPORTE_TOTAL, :ID_FORMA_PAGO, :ID_TIENDA, :I' +
'D_VENDEDOR,'#10' :ID_CONTRATO, :NO_VALORADO, :TIPO_PRESUPUESTO)'#10 +
' '#10#10#10#10#10
StatementType = stSQL
ColumnMappings = <>
end>
Name = 'Insert_PresupuestosCliente'
end
item
Params = <
item
Name = 'OLD_ID'
DataType = datAutoInc
Value = '0'
end>
Statements = <
item
Connection = 'IBX'
Default = True
TargetTable = 'PRESUPUESTOS_CLIENTE'
SQL =
'DELETE '#10' FROM'#10' PRESUPUESTOS_CLIENTE'#10' WHERE'#10' (ID = :OLD_I' +
'D)'#10
StatementType = stSQL
ColumnMappings = <>
end>
Name = 'Delete_PresupuestosCliente'
end
item
Params = <
item
Name = 'ID'
DataType = datInteger
Value = ''
end
item
Name = 'FECHA_PRESUPUESTO'
DataType = datDateTime
Value = ''
end
item
Name = 'FECHA_VIGENCIA'
DataType = datDateTime
Value = ''
end
item
Name = 'FECHA_DECISION'
DataType = datDateTime
Value = ''
end
item
Name = 'REFERENCIA'
DataType = datString
Size = 255
Value = ''
end
item
Name = 'REFERENCIA_CLIENTE'
DataType = datString
Size = 255
Value = ''
end
item
Name = 'SITUACION'
DataType = datString
Size = 255
Value = ''
end
item
Name = 'ID_CLIENTE'
DataType = datInteger
Value = ''
end
item
Name = 'ID_DIRECCION'
DataType = datInteger
Value = ''
end
item
Name = 'PERSONA_CONTACTO'
DataType = datString
Size = 255
Value = ''
end
item
Name = 'FORMA_PAGO'
DataType = datMemo
Value = ''
end
item
Name = 'PLAZO_ENTREGA'
DataType = datMemo
Value = ''
end
item
Name = 'OBSERVACIONES'
DataType = datMemo
Value = ''
end
item
Name = 'INCIDENCIAS'
DataType = datMemo
Value = ''
end
item
Name = 'INCIDENCIAS_ACTIVAS'
DataType = datSmallInt
Value = ''
end
item
Name = 'USUARIO'
DataType = datString
Size = 30
Value = ''
end
item
Name = 'IMPORTE_NETO'
DataType = datCurrency
Value = ''
end
item
Name = 'IMPORTE_PORTE'
DataType = datCurrency
Value = ''
end
item
Name = 'DESCUENTO'
DataType = datFloat
Value = ''
end
item
Name = 'IMPORTE_DESCUENTO'
DataType = datCurrency
Value = ''
end
item
Name = 'BASE_IMPONIBLE'
DataType = datCurrency
Value = ''
end
item
Name = 'RECARGO_EQUIVALENCIA'
DataType = datSmallInt
Value = ''
end
item
Name = 'RE'
DataType = datFloat
Value = ''
end
item
Name = 'IMPORTE_RE'
DataType = datCurrency
Value = ''
end
item
Name = 'ID_TIPO_IVA'
DataType = datInteger
Value = ''
end
item
Name = 'IVA'
DataType = datFloat
Value = ''
end
item
Name = 'IMPORTE_IVA'
DataType = datCurrency
Value = ''
end
item
Name = 'IMPORTE_TOTAL'
DataType = datCurrency
Value = ''
end
item
Name = 'ID_FORMA_PAGO'
DataType = datInteger
Value = ''
end
item
Name = 'ID_TIENDA'
DataType = datInteger
Value = ''
end
item
Name = 'ID_VENDEDOR'
DataType = datInteger
Value = ''
end
item
Name = 'ID_CONTRATO'
DataType = datInteger
Value = ''
end
item
Name = 'NO_VALORADO'
DataType = datSmallInt
Value = ''
end
item
Name = 'TIPO_PRESUPUESTO'
DataType = datString
Size = 255
Value = ''
end
item
Name = 'OLD_ID'
Value = ''
end>
Statements = <
item
Connection = 'IBX'
TargetTable = 'PRESUPUESTOS_CLIENTE'
SQL =
'UPDATE PRESUPUESTOS_CLIENTE'#10' SET '#10' ID = :ID,'#10' FECHA_PRESU' +
'PUESTO = :FECHA_PRESUPUESTO,'#10' FECHA_VIGENCIA = :FECHA_VIGENCI' +
'A,'#10' FECHA_DECISION = :FECHA_DECISION, '#10' REFERENCIA = :REFE' +
'RENCIA, '#10' REFERENCIA_CLIENTE = :REFERENCIA_CLIENTE,'#10' SITUA' +
'CION = :SITUACION,'#10' ID_CLIENTE = :ID_CLIENTE, '#10' ID_DIRECCI' +
'ON = :ID_DIRECCION,'#10' PERSONA_CONTACTO = :PERSONA_CONTACTO,'#10' ' +
' FORMA_PAGO = :FORMA_PAGO,'#10' PLAZO_ENTREGA = :PLAZO_ENTREGA,'#10 +
' OBSERVACIONES = :OBSERVACIONES, '#10' INCIDENCIAS = :INCIDENC' +
'IAS, '#10' INCIDENCIAS_ACTIVAS = :INCIDENCIAS_ACTIVAS, '#10' FECHA' +
'_MODIFICACION = CURRENT_TIMESTAMP,'#10' USUARIO = :USUARIO, '#10' ' +
'IMPORTE_NETO = :IMPORTE_NETO, '#10' IMPORTE_PORTE = :IMPORTE_PORT' +
'E, '#10' DESCUENTO = :DESCUENTO, '#10' IMPORTE_DESCUENTO = :IMPORT' +
'E_DESCUENTO, '#10' BASE_IMPONIBLE = :BASE_IMPONIBLE, '#10' RECARGO' +
'_EQUIVALENCIA = :RECARGO_EQUIVALENCIA,'#10' RE = :RE,'#10' IMPORTE' +
'_RE = :IMPORTE_RE,'#10' ID_TIPO_IVA = :ID_TIPO_IVA,'#10' IVA = :IV' +
'A, '#10' IMPORTE_IVA = :IMPORTE_IVA, '#10' IMPORTE_TOTAL = :IMPORT' +
'E_TOTAL, '#10' ID_FORMA_PAGO = :ID_FORMA_PAGO,'#10' ID_TIENDA = :I' +
'D_TIENDA,'#10' ID_VENDEDOR = :ID_VENDEDOR,'#10' ID_CONTRATO = :ID_' +
'CONTRATO,'#10' NO_VALORADO = :NO_VALORADO,'#10' TIPO_PRESUPUESTO =' +
' :TIPO_PRESUPUESTO'#10' WHERE'#10' (ID = :OLD_ID)'#10#10
StatementType = stSQL
ColumnMappings = <>
end>
Name = 'Update_PresupuestosCliente'
end
item
Params = <
item
Name = 'VALORADO'
DataType = datSmallInt
Value = ''
end
item
Name = 'ID'
DataType = datAutoInc
GeneratorName = 'GEN_PRESUPUESTOS_CLI_DETALLE_ID'
Value = ''
end
item
Name = 'ID_PRESUPUESTO'
DataType = datInteger
Value = ''
end
item
Name = 'POSICION'
DataType = datInteger
Value = ''
end
item
Name = 'TIPO_DETALLE'
DataType = datString
Size = 10
Value = ''
end
item
Name = 'PROPIEDAD'
DataType = datString
Size = 255
Value = ''
end
item
Name = 'CONCEPTO'
DataType = datString
Size = 2000
Value = ''
end
item
Name = 'CANTIDAD'
DataType = datCurrency
Value = ''
end
item
Name = 'IMPORTE_UNIDAD'
DataType = datCurrency
Value = ''
end
item
Name = 'IMPORTE_TOTAL'
DataType = datCurrency
Value = ''
end
item
Name = 'VISIBLE'
DataType = datSmallInt
Value = ''
end
item
Name = 'ID_ARTICULO'
DataType = datInteger
Value = ''
end
item
Name = 'TIPO_ARTICULO'
DataType = datString
Size = 2
Value = ''
end
item
Name = 'DESCUENTO'
DataType = datFloat
Value = ''
end
item
Name = 'IMPORTE_PORTE'
DataType = datCurrency
Value = ''
end>
Statements = <
item
Connection = 'IBX'
Default = True
TargetTable = 'PRESUPUESTOS_CLIENTE_DETALLES'
SQL =
'INSERT'#10' INTO PRESUPUESTOS_CLIENTE_DETALLES'#10' (ID, ID_PRESUPUE' +
'STO, POSICION, TIPO_DETALLE, PROPIEDAD, CONCEPTO, CANTIDAD,'#10' ' +
' IMPORTE_UNIDAD, IMPORTE_TOTAL, VISIBLE, VALORADO, ID_ARTICULO, ' +
'TIPO_ARTICULO,'#10' DESCUENTO, IMPORTE_PORTE, FECHA_ALTA)'#10' VALU' +
'ES'#10' (:ID, :ID_PRESUPUESTO, :POSICION, :TIPO_DETALLE, :PROPIED' +
'AD, :CONCEPTO,'#10' :CANTIDAD, :IMPORTE_UNIDAD, :IMPORTE_TOTAL, ' +
':VISIBLE, :VALORADO,'#10' :ID_ARTICULO, :TIPO_ARTICULO, :DESCUEN' +
'TO, :IMPORTE_PORTE, CURRENT_TIMESTAMP)'#10
StatementType = stSQL
ColumnMappings = <>
end>
Name = 'Insert_PresupuestosCliente_Detalles'
end
item
Params = <
item
Name = 'OLD_ID'
DataType = datAutoInc
Value = '0'
end>
Statements = <
item
Connection = 'IBX'
Default = True
TargetTable = 'PRESUPUESTOS_CLIENTE_DETALLES'
SQL =
'DELETE '#10' FROM'#10' PRESUPUESTOS_CLIENTE_DETALLES'#10' WHERE'#10' (ID' +
' = :OLD_ID)'
StatementType = stSQL
ColumnMappings = <>
end>
Name = 'Delete_PresupuestosCliente_Detalles'
end
item
Params = <
item
Name = 'VALORADO'
DataType = datSmallInt
Value = ''
end
item
Name = 'ID'
DataType = datInteger
Value = ''
end
item
Name = 'ID_PRESUPUESTO'
DataType = datInteger
Value = ''
end
item
Name = 'POSICION'
DataType = datInteger
Value = ''
end
item
Name = 'TIPO_DETALLE'
DataType = datString
Size = 10
Value = ''
end
item
Name = 'PROPIEDAD'
DataType = datString
Size = 255
Value = ''
end
item
Name = 'CONCEPTO'
DataType = datString
Size = 2000
Value = ''
end
item
Name = 'CANTIDAD'
DataType = datCurrency
Value = ''
end
item
Name = 'IMPORTE_UNIDAD'
DataType = datCurrency
Value = ''
end
item
Name = 'IMPORTE_TOTAL'
DataType = datCurrency
Value = ''
end
item
Name = 'VISIBLE'
DataType = datSmallInt
Value = ''
end
item
Name = 'ID_ARTICULO'
DataType = datInteger
Value = ''
end
item
Name = 'TIPO_ARTICULO'
DataType = datString
Size = 2
Value = ''
end
item
Name = 'DESCUENTO'
DataType = datFloat
Value = ''
end
item
Name = 'IMPORTE_PORTE'
DataType = datCurrency
Value = ''
end
item
Name = 'OLD_ID'
Value = ''
end>
Statements = <
item
Connection = 'IBX'
Default = True
TargetTable = 'PRESUPUESTOS_CLIENTE_DETALLES'
SQL =
'UPDATE PRESUPUESTOS_CLIENTE_DETALLES'#10' SET '#10' ID = :ID,'#10' ID' +
'_PRESUPUESTO = :ID_PRESUPUESTO, '#10' POSICION = :POSICION, '#10' ' +
'TIPO_DETALLE = :TIPO_DETALLE, '#10' PROPIEDAD = :PROPIEDAD,'#10' C' +
'ONCEPTO = :CONCEPTO, '#10' CANTIDAD = :CANTIDAD, '#10' IMPORTE_UNI' +
'DAD = :IMPORTE_UNIDAD,'#10' IMPORTE_TOTAL = :IMPORTE_TOTAL, '#10' ' +
'VISIBLE = :VISIBLE, '#10' VALORADO = :VALORADO,'#10' ID_ARTICULO =' +
' :ID_ARTICULO, '#10' TIPO_ARTICULO = :TIPO_ARTICULO,'#10' DESCUENT' +
'O = :DESCUENTO, '#10' IMPORTE_PORTE = :IMPORTE_PORTE,'#10' FECHA_M' +
'ODIFICACION = CURRENT_TIMESTAMP'#10' WHERE'#10' (ID = :OLD_ID)'#10
StatementType = stSQL
ColumnMappings = <>
end>
Name = 'Update_PresupuestosCliente_Detalles'
end
item
Params = <
item
Name = 'ID'
DataType = datAutoInc
GeneratorName = 'GEN_PRESUPUESTOS_CLIENTE_CAPITU'
Value = ''
end
item
Name = 'POSICION'
DataType = datInteger
Value = ''
end
item
Name = 'TIPO_DETALLE'
DataType = datString
Size = 10
Value = ''
end
item
Name = 'TIPO_ARTICULO'
DataType = datString
Size = 2
Value = ''
end
item
Name = 'CONCEPTO'
DataType = datString
Size = 255
Value = ''
end>
Statements = <
item
Connection = 'IBX'
ConnectionType = 'Interbase'
Default = True
TargetTable = 'PRESUPUESTOS_CLIENTE_CAPITULOS'
SQL =
'INSERT'#10' INTO PRESUPUESTOS_CLIENTE_CAPITULOS'#10' (ID, POSICION, ' +
'TIPO_DETALLE, TIPO_ARTICULO, CONCEPTO)'#10' VALUES'#10' (:ID, :POSIC' +
'ION, :TIPO_DETALLE, :TIPO_ARTICULO, :CONCEPTO)'#10
StatementType = stSQL
ColumnMappings = <>
end>
Name = 'Insert_CapitulosPresupuesto'
end
item
Params = <
item
Name = 'OLD_ID'
DataType = datAutoInc
Value = ''
end>
Statements = <
item
Connection = 'IBX'
ConnectionType = 'Interbase'
Default = True
TargetTable = 'PRESUPUESTOS_CLIENTE_CAPITULOS'
SQL =
'DELETE '#10' FROM'#10' PRESUPUESTOS_CLIENTE_CAPITULOS'#10' WHERE'#10' (I' +
'D = :OLD_ID)'
StatementType = stSQL
ColumnMappings = <>
end>
Name = 'Delete_CapitulosPresupuesto'
end
item
Params = <
item
Name = 'POSICION'
DataType = datInteger
Value = ''
end
item
Name = 'TIPO_DETALLE'
DataType = datString
Size = 10
Value = ''
end
item
Name = 'TIPO_ARTICULO'
DataType = datString
Size = 2
Value = ''
end
item
Name = 'CONCEPTO'
DataType = datString
Size = 255
Value = ''
end
item
Name = 'OLD_ID'
Value = ''
end>
Statements = <
item
Connection = 'IBX'
ConnectionType = 'Interbase'
Default = True
TargetTable = 'PRESUPUESTOS_CLIENTE_CAPITULOS'
SQL =
'UPDATE PRESUPUESTOS_CLIENTE_CAPITULOS'#10' SET'#10' POSICION = :POSI' +
'CION,'#10' TIPO_DETALLE = :TIPO_DETALLE,'#10' TIPO_ARTICULO = :TIP' +
'O_ARTICULO,'#10' CONCEPTO = :CONCEPTO'#10' WHERE'#10' (ID = :OLD_ID)'#10
StatementType = stSQL
ColumnMappings = <>
end>
Name = 'Update_CapitulosPresupuesto'
end>
RelationShips = <
item
Name = 'FK_Propiedades_Valores'
MasterDatasetName = 'Propiedades'
MasterFields = 'DESCRIPCION'
DetailDatasetName = 'Valores'
DetailFields = 'FAMILIA'
RelationshipType = rtForeignKey
end
item
Name = 'FK_PresupuestosCliente_Detalles'
MasterDatasetName = 'PresupuestosCliente'
MasterFields = 'ID'
DetailDatasetName = 'PresupuestosCliente_Detalles'
DetailFields = 'ID_PRESUPUESTO'
RelationshipType = rtForeignKey
end>
UpdateRules = <
item
Name = 'Insert PresupuestosCliente'
DoUpdate = False
DoDelete = False
DatasetName = 'PresupuestosCliente'
FailureBehavior = fbRaiseException
end
item
Name = 'Insert PresupuestosCliente_Detalles'
DoUpdate = False
DoDelete = False
DatasetName = 'PresupuestosCliente_Detalles'
FailureBehavior = fbRaiseException
end
item
Name = 'Update PresupuestosCliente'
DoInsert = False
DoDelete = False
DatasetName = 'PresupuestosCliente'
FailureBehavior = fbRaiseException
end
item
Name = 'Update PresupuestosCliente_Detalles'
DoInsert = False
DoDelete = False
DatasetName = 'PresupuestosCliente_Detalles'
FailureBehavior = fbRaiseException
end
item
Name = 'Delete PresupuestosCliente_Detalles'
DoUpdate = False
DoInsert = False
DatasetName = 'PresupuestosCliente_Detalles'
FailureBehavior = fbRaiseException
end
item
Name = 'Delete PresupuestosCliente'
DoUpdate = False
DoInsert = False
DatasetName = 'PresupuestosCliente'
FailureBehavior = fbRaiseException
end>
Version = 0
Left = 48
Top = 24
end
object DADataDictionary: TDADataDictionary
Fields = <
item
Name = 'PresupuestosCliente_ID'
DataType = datAutoInc
GeneratorName = 'GEN_PRESUPUESTOS_CLI_ID'
Required = True
DisplayLabel = 'ID'
ServerAutoRefresh = True
end
item
Name = 'PresupuestosCliente_ID_EMPRESA'
DataType = datInteger
DisplayLabel = 'ID_EMPRESA'
end
item
Name = 'PresupuestosCliente_FECHA_PRESUPUESTO'
DataType = datDateTime
end
item
Name = 'PresupuestosCliente_FECHA_DECISION'
DataType = datDateTime
end
item
Name = 'PresupuestosCliente_REFERENCIA'
DataType = datString
Size = 255
DisplayLabel = 'Referencia'
end
item
Name = 'PresupuestosCliente_SITUACION'
DataType = datString
Size = 255
DisplayLabel = 'Situaci'#243'n'
end
item
Name = 'PresupuestosCliente_ID_CLIENTE'
DataType = datInteger
DisplayLabel = 'ID_CLIENTE'
end
item
Name = 'PresupuestosCliente_NIF_CIF'
DataType = datString
Size = 15
end
item
Name = 'PresupuestosCliente_NOMBRE'
DataType = datString
Size = 255
end
item
Name = 'PresupuestosCliente_REFERENCIA_CLIENTE'
DataType = datString
Size = 255
DisplayLabel = 'PedidosCliente_REFERENCIA_CLIENTE'
end
item
Name = 'PresupuestosCliente_CLIENTE_FINAL'
DataType = datString
Size = 255
end
item
Name = 'PresupuestosCliente_PORTADA'
DataType = datMemo
end
item
Name = 'PresupuestosCliente_MEMORIA'
DataType = datMemo
end
item
Name = 'PresupuestosCliente_OBSERVACIONES'
DataType = datMemo
DisplayLabel = 'Observaciones'
end
item
Name = 'PresupuestosCliente_INCIDENCIAS'
DataType = datMemo
DisplayLabel = 'INCIDENCIAS'
end
item
Name = 'PresupuestosCliente_INCIDENCIAS_ACTIVAS'
DataType = datInteger
DisplayLabel = 'INCIDENCIAS_ACTIVAS'
end
item
Name = 'PresupuestosCliente_FECHA_ALTA'
DataType = datDateTime
DisplayLabel = 'FECHA_ALTA'
end
item
Name = 'PresupuestosCliente_FECHA_MODIFICACION'
DataType = datDateTime
DisplayLabel = 'FECHA_MODIFICACION'
end
item
Name = 'PresupuestosCliente_USUARIO'
DataType = datString
Size = 20
DisplayLabel = 'USUARIO'
end
item
Name = 'PresupuestosCliente_IMPORTE_NETO'
DataType = datCurrency
DisplayLabel = 'Importe neto'
Alignment = taRightJustify
end
item
Name = 'PresupuestosCliente_PERSONA_CONTACTO'
DataType = datString
Size = 255
DisplayLabel = 'Persona de contacto'
end
item
Name = 'PresupuestosCliente_IMPORTE_PORTE'
DataType = datCurrency
DisplayLabel = 'Importe del porte'
Alignment = taRightJustify
end
item
Name = 'PresupuestosCliente_DESCUENTO'
DataType = datFloat
DisplayLabel = 'Descuento'
DisplayFormat = ',0.00 %;-,0.00 %'
Alignment = taRightJustify
end
item
Name = 'PresupuestosCliente_IMPORTE_DESCUENTO'
DataType = datCurrency
DisplayLabel = 'Importe dto.'
Alignment = taRightJustify
end
item
Name = 'PresupuestosCliente_BASE_IMPONIBLE'
DataType = datCurrency
DisplayLabel = 'Base imponible'
Alignment = taRightJustify
end
item
Name = 'PresupuestosCliente_IVA'
DataType = datFloat
DisplayLabel = 'IVA'
DisplayFormat = ',0.00 %;-,0.00 %'
Alignment = taRightJustify
end
item
Name = 'PresupuestosCliente_IMPORTE_IVA'
DataType = datCurrency
DisplayLabel = 'Importe IVA'
Alignment = taRightJustify
end
item
Name = 'PresupuestosCliente_IMPORTE_TOTAL'
DataType = datCurrency
DisplayLabel = 'Importe total'
Alignment = taRightJustify
end
item
Name = 'PresupuestosCliente_ID_FORMA_PAGO'
DataType = datInteger
DisplayLabel = 'ID_FORMA_PAGO'
end
item
Name = 'PresupuestosCliente_Detalles_ID'
DataType = datAutoInc
GeneratorName = 'GEN_PRESUPUESTOS_CLI_DETALLE_ID'
Required = True
DisplayLabel = 'ID'
ServerAutoRefresh = True
end
item
Name = 'PresupuestosCliente_Detalles_ID_PRESUPUESTO'
DataType = datInteger
Required = True
end
item
Name = 'PresupuestosCliente_Detalles_POSICION'
DataType = datInteger
DisplayLabel = 'POSICION'
end
item
Name = 'PresupuestosCliente_Detalles_TIPO_DETALLE'
DataType = datString
Size = 25
DisplayLabel = 'TIPO_DETALLE'
end
item
Name = 'PresupuestosCliente_Detalles_CONCEPTO'
DataType = datString
Size = 2000
DisplayLabel = 'CONCEPTO'
end
item
Name = 'PresupuestosCliente_Detalles_CANTIDAD'
DataType = datFloat
DisplayLabel = 'CANTIDAD'
Alignment = taRightJustify
end
item
Name = 'PresupuestosCliente_Detalles_IMPORTE_UNIDAD'
DataType = datCurrency
DisplayLabel = 'Importe unidad'
Alignment = taRightJustify
end
item
Name = 'PresupuestosCliente_Detalles_IMPORTE_TOTAL'
DataType = datCurrency
DisplayLabel = 'Importe total'
Alignment = taRightJustify
end
item
Name = 'PresupuestosCliente_Detalles_VISIBLE'
DataType = datInteger
DisplayLabel = 'VISIBLE'
end
item
Name = 'PresupuestosCliente_Detalles_ID_ARTICULO'
DataType = datInteger
DisplayLabel = 'ID_ARTICULO'
end
item
Name = 'PresupuestosCliente_Detalles_DESCUENTO'
DataType = datFloat
DisplayLabel = 'Descuento'
DisplayFormat = ',0.00 %;-,0.00 %'
Alignment = taRightJustify
end
item
Name = 'PresupuestosCliente_Detalles_IMPORTE_PORTE'
DataType = datCurrency
DisplayLabel = 'Importe porte'
Alignment = taRightJustify
end
item
Name = 'PresupuestosCliente_Detalles_REFERENCIA'
DataType = datString
Size = 255
end
item
Name = 'PresupuestosCliente_Detalles_REFERENCIA_PROVEEDOR'
DataType = datString
Size = 255
end
item
Name = 'PresupuestosCliente_Detalles_UNIDAD_MEDIDA'
DataType = datString
Size = 255
DisplayLabel = 'Unidad de medida'
end
item
Name = 'PresupuestosCliente_TIPO_PRESUPUESTO'
DataType = datString
Size = 255
DisplayLabel = 'Tipo'
end
item
Name = 'CapitulosPresupuesto_ID'
DataType = datAutoInc
GeneratorName = 'GEN_PRESUPUESTOS_CLIENTE_CAPITU'
Required = True
DisplayLabel = 'ID'
end
item
Name = 'CapitulosPresupuesto_POSICION'
DataType = datInteger
end
item
Name = 'CapitulosPresupuesto_TIPO_DETALLE'
DataType = datString
Size = 10
end
item
Name = 'CapitulosPresupuesto_TIPO_ARTICULO'
DataType = datString
Size = 2
end
item
Name = 'CapitulosPresupuesto_CONCEPTO'
DataType = datString
Size = 255
end
item
Name = 'CapitulosPresupuesto_CANTIDAD'
DataType = datInteger
end
item
Name = 'CapitulosPresupuesto_IMPORTE_UNIDAD'
DataType = datInteger
end
item
Name = 'CapitulosPresupuesto_IMPORTE_TOTAL'
DataType = datInteger
end
item
Name = 'CapitulosPresupuesto_DESCUENTO'
DataType = datInteger
end
item
Name = 'CapitulosPresupuesto_IMPORTE_PORTE'
DataType = datInteger
end
item
Name = 'CapitulosPresupuesto_VISIBLE'
DataType = datInteger
end
item
Name = 'CapitulosPresupuesto_VALORADO'
DataType = datInteger
end>
Left = 48
Top = 152
end
object Bin2DataStreamer: TDABin2DataStreamer
Left = 48
Top = 88
end
object bpPresupuestosCliente: TDABusinessProcessor
Schema = schPresupuestosCliente
InsertCommandName = 'Insert_PresupuestosCliente'
DeleteCommandName = 'Delete_PresupuestosCliente'
UpdateCommandName = 'Update_PresupuestosCliente'
ReferencedDataset = 'PresupuestosCliente'
ProcessorOptions = [poAutoGenerateRefreshDataset, poPrepareCommands]
UpdateMode = updWhereKeyOnly
Left = 232
Top = 24
end
object bpPresupuestosClienteDetalles: TDABusinessProcessor
Schema = schPresupuestosCliente
InsertCommandName = 'Insert_PresupuestosCliente_Detalles'
DeleteCommandName = 'Delete_PresupuestosCliente_Detalles'
UpdateCommandName = 'Update_PresupuestosCliente_Detalles'
ReferencedDataset = 'PresupuestosCliente_Detalles'
ProcessorOptions = [poAutoGenerateRefreshDataset, poPrepareCommands]
UpdateMode = updWhereKeyOnly
Left = 232
Top = 96
end
object bpCapitulosPresupuesto: TDABusinessProcessor
Schema = schPresupuestosCliente
InsertCommandName = 'Insert_CapitulosPresupuesto'
DeleteCommandName = 'Delete_CapitulosPresupuesto'
UpdateCommandName = 'Update_CapitulosPresupuesto'
ReferencedDataset = 'CapitulosPresupuesto'
ProcessorOptions = [poAutoGenerateRefreshDataset, poPrepareCommands]
UpdateMode = updWhereKeyOnly
Left = 232
Top = 168
end
end