Tecsitel_FactuGES2/Source/Modulos/Presupuestos de cliente/Servidor/srvPresupuestosCliente_Impl.dfm

1368 lines
40 KiB
Plaintext

object srvPresupuestosCliente: TsrvPresupuestosCliente
OldCreateOrder = True
OnCreate = DARemoteServiceCreate
RequiresSession = True
SessionManager = dmServer.SessionManager
ConnectionName = 'IBX'
ServiceSchema = schPresupuestosCliente
ServiceDataStreamer = Bin2DataStreamer
ExportedDataTables = <>
Height = 230
Width = 346
object schPresupuestosCliente: TDASchema
ConnectionManager = dmServer.ConnectionManager
DataDictionary = DADataDictionary
Datasets = <
item
Params = <
item
Name = 'CODIGO'
DataType = datString
Size = 50
Value = ''
ParamType = daptInput
end
item
Name = 'ID_EMPRESA'
DataType = datInteger
Value = ''
ParamType = daptInput
end>
Statements = <
item
Connection = 'IBX'
TargetTable = 'REFERENCIAS'
SQL =
'SELECT'#10' VALOR'#10'FROM'#10' REFERENCIAS'#10'WHERE'#10' CODIGO = :COD' +
'IGO'#10'AND ID_EMPRESA = :ID_EMPRESA'
StatementType = stSQL
ColumnMappings = <
item
DatasetField = 'VALOR'
TableField = 'VALOR'
end>
end>
Name = 'DarReferencia'
Fields = <
item
Name = 'VALOR'
DataType = datString
Size = 255
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 = 'ID_CLIENTE'
TableField = 'ID_CLIENTE'
end
item
DatasetField = 'USUARIO'
TableField = 'USUARIO'
end
item
DatasetField = 'REFERENCIA'
TableField = 'REFERENCIA'
end
item
DatasetField = 'IMPORTE_TOTAL'
TableField = 'IMPORTE_TOTAL'
end
item
DatasetField = 'INCIDENCIAS'
TableField = 'INCIDENCIAS'
end
item
DatasetField = 'INCIDENCIAS_ACTIVAS'
TableField = 'INCIDENCIAS_ACTIVAS'
end
item
DatasetField = 'OBSERVACIONES'
TableField = 'OBSERVACIONES'
end
item
DatasetField = 'FECHA_ALTA'
TableField = 'FECHA_ALTA'
end
item
DatasetField = 'FECHA_MODIFICACION'
TableField = 'FECHA_MODIFICACION'
end
item
DatasetField = 'SITUACION'
TableField = 'SITUACION'
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 = 'IVA'
TableField = 'IVA'
end
item
DatasetField = 'IMPORTE_IVA'
TableField = 'IMPORTE_IVA'
end
item
DatasetField = 'ID_FORMA_PAGO'
TableField = 'ID_FORMA_PAGO'
end
item
DatasetField = 'REFERENCIA_CLIENTE'
TableField = 'REFERENCIA_CLIENTE'
end
item
DatasetField = 'FECHA_PRESUPUESTO'
TableField = 'FECHA_PRESUPUESTO'
end
item
DatasetField = 'FECHA_DECISION'
TableField = 'FECHA_DECISION'
end
item
DatasetField = 'PORTADA'
TableField = 'PORTADA'
end
item
DatasetField = 'MEMORIA'
TableField = 'MEMORIA'
end
item
DatasetField = 'CLIENTE_FINAL'
TableField = 'CLIENTE_FINAL'
end
item
DatasetField = 'NOMBRE'
TableField = 'NOMBRE'
end
item
DatasetField = 'NIF_CIF'
TableField = 'NIF_CIF'
end>
end>
Name = 'PresupuestosCliente'
Fields = <
item
Name = 'ID'
DataType = datAutoInc
GeneratorName = 'GEN_PRESUPUESTOS_CLI_ID'
DictionaryEntry = 'PedidosCliente_ID'
InPrimaryKey = True
end
item
Name = 'ID_EMPRESA'
DataType = datInteger
DictionaryEntry = 'PedidosCliente_ID_EMPRESA'
end
item
Name = 'FECHA_PRESUPUESTO'
DataType = datDateTime
end
item
Name = 'FECHA_DECISION'
DataType = datDateTime
end
item
Name = 'REFERENCIA'
DataType = datString
Size = 255
DictionaryEntry = 'PedidosCliente_REFERENCIA'
end
item
Name = 'SITUACION'
DataType = datString
Size = 255
DictionaryEntry = 'PedidosCliente_SITUACION'
end
item
Name = 'ID_CLIENTE'
DataType = datInteger
DictionaryEntry = 'PedidosCliente_ID_CLIENTE'
end
item
Name = 'NIF_CIF'
DataType = datString
Size = 15
end
item
Name = 'NOMBRE'
DataType = datString
Size = 255
end
item
Name = 'REFERENCIA_CLIENTE'
DataType = datString
Size = 255
DictionaryEntry = 'PedidosCliente_REFERENCIA_CLIENTE'
end
item
Name = 'CLIENTE_FINAL'
DataType = datString
Size = 255
end
item
Name = 'PORTADA'
DataType = datMemo
end
item
Name = 'MEMORIA'
DataType = datMemo
end
item
Name = 'OBSERVACIONES'
DataType = datMemo
DictionaryEntry = 'PedidosCliente_OBSERVACIONES'
end
item
Name = 'INCIDENCIAS'
DataType = datMemo
DictionaryEntry = 'PedidosCliente_INCIDENCIAS'
end
item
Name = 'INCIDENCIAS_ACTIVAS'
DataType = datInteger
DictionaryEntry = 'PedidosCliente_INCIDENCIAS_ACTIVAS'
end
item
Name = 'FECHA_ALTA'
DataType = datDateTime
DictionaryEntry = 'PedidosCliente_FECHA_ALTA'
end
item
Name = 'FECHA_MODIFICACION'
DataType = datDateTime
DictionaryEntry = 'PedidosCliente_FECHA_MODIFICACION'
end
item
Name = 'USUARIO'
DataType = datString
Size = 20
DictionaryEntry = 'PedidosCliente_USUARIO'
end
item
Name = 'IMPORTE_NETO'
DataType = datCurrency
DictionaryEntry = 'PedidosCliente_IMPORTE_NETO'
end
item
Name = 'IMPORTE_PORTE'
DataType = datCurrency
DictionaryEntry = 'PedidosCliente_IMPORTE_PORTE'
end
item
Name = 'DESCUENTO'
DataType = datFloat
DictionaryEntry = 'PedidosCliente_DESCUENTO'
end
item
Name = 'IMPORTE_DESCUENTO'
DataType = datCurrency
DictionaryEntry = 'PedidosCliente_IMPORTE_DESCUENTO'
end
item
Name = 'BASE_IMPONIBLE'
DataType = datCurrency
DictionaryEntry = 'PedidosCliente_BASE_IMPONIBLE'
end
item
Name = 'IVA'
DataType = datFloat
DictionaryEntry = 'PedidosCliente_IVA'
end
item
Name = 'IMPORTE_IVA'
DataType = datCurrency
DictionaryEntry = 'PedidosCliente_IMPORTE_IVA'
end
item
Name = 'IMPORTE_TOTAL'
DataType = datCurrency
DictionaryEntry = 'PedidosCliente_IMPORTE_TOTAL'
end
item
Name = 'ID_FORMA_PAGO'
DataType = datInteger
DictionaryEntry = 'PedidosCliente_ID_FORMA_PAGO'
end>
end
item
Params = <>
Statements = <
item
Connection = 'IBX'
TargetTable = 'PRESUPUESTOS_CLIENTE_DETALLES'
StatementType = stAutoSQL
ColumnMappings = <
item
DatasetField = 'CANTIDAD'
TableField = 'CANTIDAD'
end
item
DatasetField = 'POSICION'
TableField = 'POSICION'
end
item
DatasetField = 'ID'
TableField = 'ID'
end
item
DatasetField = 'TIPO_DETALLE'
TableField = 'TIPO_DETALLE'
end
item
DatasetField = 'CONCEPTO'
TableField = 'CONCEPTO'
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 = 'DESCUENTO'
TableField = 'DESCUENTO'
end
item
DatasetField = 'IMPORTE_PORTE'
TableField = 'IMPORTE_PORTE'
end
item
DatasetField = 'ID_PRESUPUESTO'
TableField = 'ID_PRESUPUESTO'
end
item
DatasetField = 'FECHA_ALTA'
TableField = 'FECHA_ALTA'
end
item
DatasetField = 'FECHA_MODIFICACION'
TableField = 'FECHA_MODIFICACION'
end>
end>
Name = 'PresupuestosCliente_Detalles'
Fields = <
item
Name = 'ID'
DataType = datAutoInc
GeneratorName = 'GEN_PRESUPUESTOS_CLI_DETALLE_ID'
DictionaryEntry = 'PedidosCliente_Detalles_ID'
InPrimaryKey = True
end
item
Name = 'ID_PRESUPUESTO'
DataType = datInteger
Required = True
end
item
Name = 'POSICION'
DataType = datInteger
DictionaryEntry = 'POSICIONCONCEPTO'
end
item
Name = 'TIPO_DETALLE'
DataType = datString
Size = 10
DictionaryEntry = 'PedidosCliente_Detalles_TIPO_DETALLE'
end
item
Name = 'ID_ARTICULO'
DataType = datInteger
DictionaryEntry = 'PedidosCliente_Detalles_ID_ARTICULO'
end
item
Name = 'CONCEPTO'
DataType = datString
Size = 2000
DictionaryEntry = 'PedidosCliente_Detalles_CONCEPTO'
end
item
Name = 'CANTIDAD'
DataType = datInteger
DictionaryEntry = 'CANTIDAD'
end
item
Name = 'IMPORTE_UNIDAD'
DataType = datCurrency
DictionaryEntry = 'PedidosCliente_Detalles_IMPORTE_UNIDAD'
end
item
Name = 'DESCUENTO'
DataType = datFloat
DictionaryEntry = 'PedidosCliente_Detalles_DESCUENTO'
end
item
Name = 'IMPORTE_PORTE'
DataType = datCurrency
DictionaryEntry = 'PedidosCliente_Detalles_IMPORTE_PORTE'
end
item
Name = 'IMPORTE_TOTAL'
DataType = datCurrency
DictionaryEntry = 'PedidosCliente_Detalles_IMPORTE_TOTAL'
end
item
Name = 'VISIBLE'
DataType = datInteger
DictionaryEntry = 'PedidosCliente_Detalles_VISIBLE'
end
item
Name = 'FECHA_ALTA'
DataType = datDateTime
end
item
Name = 'FECHA_MODIFICACION'
DataType = datDateTime
end>
end>
JoinDataTables = <>
UnionDataTables = <>
Commands = <
item
Params = <
item
Name = 'VALOR'
DataType = datString
Size = 255
Value = ''
ParamType = daptInput
end
item
Name = 'CODIGO'
DataType = datString
Size = 50
Value = ''
ParamType = daptInput
end
item
Name = 'ID_EMPRESA'
DataType = datInteger
Value = ''
ParamType = daptInput
end>
Statements = <
item
Connection = 'IBX'
TargetTable = 'REFERENCIAS'
SQL =
'UPDATE REFERENCIAS SET'#10' VALOR = :VALOR'#10'WHERE CODIGO = :COD' +
'IGO AND'#10' ID_EMPRESA = :ID_EMPRESA'
StatementType = stSQL
ColumnMappings = <>
end>
Name = 'ModificarReferencia'
end
item
Params = <
item
Name = 'ID'
DataType = datAutoInc
GeneratorName = 'GEN_PRESUPUESTOS_CLI_ID'
Value = ''
end
item
Name = 'ID_EMPRESA'
Value = ''
end
item
Name = 'ID_CLIENTE'
Value = ''
end
item
Name = 'USUARIO'
Value = ''
end
item
Name = 'REFERENCIA'
Value = ''
end
item
Name = 'IMPORTE_TOTAL'
Value = ''
end
item
Name = 'INCIDENCIAS'
Value = ''
end
item
Name = 'INCIDENCIAS_ACTIVAS'
Value = ''
end
item
Name = 'OBSERVACIONES'
Value = ''
end
item
Name = 'FECHA_ALTA'
Value = ''
end
item
Name = 'FECHA_MODIFICACION'
Value = ''
end
item
Name = 'SITUACION'
Value = ''
end
item
Name = 'IMPORTE_NETO'
Value = ''
end
item
Name = 'IMPORTE_PORTE'
Value = ''
end
item
Name = 'DESCUENTO'
Value = ''
end
item
Name = 'IMPORTE_DESCUENTO'
Value = ''
end
item
Name = 'BASE_IMPONIBLE'
Value = ''
end
item
Name = 'IVA'
Value = ''
end
item
Name = 'IMPORTE_IVA'
Value = ''
end
item
Name = 'ID_FORMA_PAGO'
Value = ''
end
item
Name = 'REFERENCIA_CLIENTE'
Value = ''
end
item
Name = 'FECHA_PRESUPUESTO'
Value = ''
end
item
Name = 'FECHA_DECISION'
Value = ''
end
item
Name = 'PORTADA'
Value = ''
end
item
Name = 'MEMORIA'
Value = ''
end
item
Name = 'CLIENTE_FINAL'
Value = ''
end>
Statements = <
item
Connection = 'IBX'
TargetTable = 'PRESUPUESTOS_CLIENTE'
SQL =
'INSERT'#10' INTO PRESUPUESTOS_CLIENTE'#10' (ID, ID_EMPRESA, ID_CLIEN' +
'TE, USUARIO, REFERENCIA, IMPORTE_TOTAL,'#10' INCIDENCIAS, INCIDE' +
'NCIAS_ACTIVAS, OBSERVACIONES, FECHA_ALTA, '#10' FECHA_MODIFICACI' +
'ON, SITUACION, IMPORTE_NETO, IMPORTE_PORTE, '#10' DESCUENTO, IMP' +
'ORTE_DESCUENTO, BASE_IMPONIBLE, IVA, '#10' IMPORTE_IVA, ID_FORMA' +
'_PAGO, REFERENCIA_CLIENTE, FECHA_PRESUPUESTO, '#10' FECHA_DECISI' +
'ON, PORTADA, MEMORIA, CLIENTE_FINAL)'#10' VALUES'#10' (:ID, :ID_EMPR' +
'ESA, :ID_CLIENTE, :USUARIO, :REFERENCIA, :IMPORTE_TOTAL,'#10' :I' +
'NCIDENCIAS, :INCIDENCIAS_ACTIVAS, :OBSERVACIONES, '#10' :FECHA_A' +
'LTA, :FECHA_MODIFICACION, :SITUACION, :IMPORTE_NETO, '#10' :IMPO' +
'RTE_PORTE, :DESCUENTO, :IMPORTE_DESCUENTO, :BASE_IMPONIBLE, '#10' ' +
' :IVA, :IMPORTE_IVA, :ID_FORMA_PAGO, :REFERENCIA_CLIENTE, '#10' ' +
' :FECHA_PRESUPUESTO, :FECHA_DECISION, :PORTADA, :MEMORIA, '#10' ' +
':CLIENTE_FINAL)'#10
StatementType = stSQL
ColumnMappings = <>
end>
Name = 'Insert_PresupuestosCliente'
end
item
Params = <
item
Name = 'OLD_ID'
DataType = datAutoInc
Value = ''
end>
Statements = <
item
Connection = 'IBX'
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_EMPRESA'
Value = ''
end
item
Name = 'ID_CLIENTE'
Value = ''
end
item
Name = 'USUARIO'
Value = ''
end
item
Name = 'REFERENCIA'
Value = ''
end
item
Name = 'IMPORTE_TOTAL'
Value = ''
end
item
Name = 'INCIDENCIAS'
Value = ''
end
item
Name = 'INCIDENCIAS_ACTIVAS'
Value = ''
end
item
Name = 'OBSERVACIONES'
Value = ''
end
item
Name = 'FECHA_ALTA'
Value = ''
end
item
Name = 'FECHA_MODIFICACION'
Value = ''
end
item
Name = 'SITUACION'
Value = ''
end
item
Name = 'IMPORTE_NETO'
Value = ''
end
item
Name = 'IMPORTE_PORTE'
Value = ''
end
item
Name = 'DESCUENTO'
Value = ''
end
item
Name = 'IMPORTE_DESCUENTO'
Value = ''
end
item
Name = 'BASE_IMPONIBLE'
Value = ''
end
item
Name = 'IVA'
Value = ''
end
item
Name = 'IMPORTE_IVA'
Value = ''
end
item
Name = 'ID_FORMA_PAGO'
Value = ''
end
item
Name = 'REFERENCIA_CLIENTE'
Value = ''
end
item
Name = 'FECHA_PRESUPUESTO'
Value = ''
end
item
Name = 'FECHA_DECISION'
Value = ''
end
item
Name = 'PORTADA'
Value = ''
end
item
Name = 'MEMORIA'
Value = ''
end
item
Name = 'CLIENTE_FINAL'
Value = ''
end
item
Name = 'OLD_ID'
Value = ''
end>
Statements = <
item
Connection = 'IBX'
TargetTable = 'PRESUPUESTOS_CLIENTE'
SQL =
'UPDATE PRESUPUESTOS_CLIENTE'#10' SET '#10' ID_EMPRESA = :ID_EMPRESA,' +
' '#10' ID_CLIENTE = :ID_CLIENTE, '#10' USUARIO = :USUARIO, '#10' RE' +
'FERENCIA = :REFERENCIA, '#10' IMPORTE_TOTAL = :IMPORTE_TOTAL, '#10' ' +
' INCIDENCIAS = :INCIDENCIAS, '#10' INCIDENCIAS_ACTIVAS = :INCIDE' +
'NCIAS_ACTIVAS, '#10' OBSERVACIONES = :OBSERVACIONES, '#10' FECHA_A' +
'LTA = :FECHA_ALTA, '#10' FECHA_MODIFICACION = :FECHA_MODIFICACION' +
', '#10' SITUACION = :SITUACION, '#10' IMPORTE_NETO = :IMPORTE_NETO' +
', '#10' IMPORTE_PORTE = :IMPORTE_PORTE, '#10' DESCUENTO = :DESCUEN' +
'TO, '#10' IMPORTE_DESCUENTO = :IMPORTE_DESCUENTO, '#10' BASE_IMPON' +
'IBLE = :BASE_IMPONIBLE, '#10' IVA = :IVA, '#10' IMPORTE_IVA = :IMP' +
'ORTE_IVA, '#10' ID_FORMA_PAGO = :ID_FORMA_PAGO, '#10' REFERENCIA_C' +
'LIENTE = :REFERENCIA_CLIENTE, '#10' FECHA_PRESUPUESTO = :FECHA_PR' +
'ESUPUESTO, '#10' FECHA_DECISION = :FECHA_DECISION, '#10' PORTADA =' +
' :PORTADA, '#10' MEMORIA = :MEMORIA, '#10' CLIENTE_FINAL = :CLIENT' +
'E_FINAL'#10' WHERE'#10' (ID = :OLD_ID)'#10
StatementType = stSQL
ColumnMappings = <>
end>
Name = 'Update_PresupuestosCliente'
end
item
Params = <
item
Name = 'ID'
DataType = datAutoInc
GeneratorName = 'GEN_PRESUPUESTOS_CLI_DETALLE_ID'
Value = ''
end
item
Name = 'CANTIDAD'
Value = ''
end
item
Name = 'POSICION'
Value = ''
end
item
Name = 'TIPO_DETALLE'
Value = ''
end
item
Name = 'CONCEPTO'
Value = ''
end
item
Name = 'IMPORTE_UNIDAD'
Value = ''
end
item
Name = 'IMPORTE_TOTAL'
Value = ''
end
item
Name = 'VISIBLE'
Value = ''
end
item
Name = 'ID_ARTICULO'
Value = ''
end
item
Name = 'DESCUENTO'
Value = ''
end
item
Name = 'IMPORTE_PORTE'
Value = ''
end
item
Name = 'ID_PRESUPUESTO'
Value = ''
end
item
Name = 'FECHA_ALTA'
Value = ''
end
item
Name = 'FECHA_MODIFICACION'
Value = ''
end>
Statements = <
item
Connection = 'IBX'
TargetTable = 'PRESUPUESTOS_CLIENTE_DETALLES'
SQL =
'INSERT'#10' INTO PRESUPUESTOS_CLIENTE_DETALLES'#10' (ID, CANTIDAD, P' +
'OSICION, TIPO_DETALLE, CONCEPTO, IMPORTE_UNIDAD,'#10' IMPORTE_TO' +
'TAL, VISIBLE, ID_ARTICULO, DESCUENTO, IMPORTE_PORTE, '#10' ID_PR' +
'ESUPUESTO, FECHA_ALTA, FECHA_MODIFICACION)'#10' VALUES'#10' (:ID, :C' +
'ANTIDAD, :POSICION, :TIPO_DETALLE, :CONCEPTO, :IMPORTE_UNIDAD,'#10' ' +
' :IMPORTE_TOTAL, :VISIBLE, :ID_ARTICULO, :DESCUENTO, '#10' :I' +
'MPORTE_PORTE, :ID_PRESUPUESTO, :FECHA_ALTA, :FECHA_MODIFICACION)' +
#10
StatementType = stSQL
ColumnMappings = <>
end>
Name = 'Insert_PresupuestosCliente_Detalles'
end
item
Params = <
item
Name = 'OLD_ID'
DataType = datAutoInc
Value = ''
end>
Statements = <
item
Connection = 'IBX'
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 = 'CANTIDAD'
DataType = datInteger
Value = ''
end
item
Name = 'POSICION'
DataType = datInteger
Value = ''
end
item
Name = 'TIPO_DETALLE'
DataType = datString
Size = 10
Value = ''
end
item
Name = 'CONCEPTO'
DataType = datString
Size = 2000
Value = ''
end
item
Name = 'IMPORTE_UNIDAD'
DataType = datCurrency
Value = ''
end
item
Name = 'IMPORTE_TOTAL'
DataType = datCurrency
Value = ''
end
item
Name = 'VISIBLE'
DataType = datInteger
Value = ''
end
item
Name = 'ID_ARTICULO'
DataType = datInteger
Value = ''
end
item
Name = 'DESCUENTO'
DataType = datFloat
Value = ''
end
item
Name = 'IMPORTE_PORTE'
DataType = datCurrency
Value = ''
end
item
Name = 'ID_PRESUPUESTO'
DataType = datInteger
Value = ''
end
item
Name = 'FECHA_ALTA'
DataType = datDateTime
Value = ''
end
item
Name = 'FECHA_MODIFICACION'
DataType = datDateTime
Value = ''
end
item
Name = 'OLD_ID'
DataType = datAutoInc
Value = ''
end>
Statements = <
item
Connection = 'IBX'
TargetTable = 'PRESUPUESTOS_CLIENTE_DETALLES'
SQL =
'UPDATE PRESUPUESTOS_CLIENTE_DETALLES'#10' SET '#10' CANTIDAD = :CANT' +
'IDAD, '#10' POSICION = :POSICION, '#10' TIPO_DETALLE = :TIPO_DETAL' +
'LE, '#10' CONCEPTO = :CONCEPTO, '#10' IMPORTE_UNIDAD = :IMPORTE_UN' +
'IDAD, '#10' IMPORTE_TOTAL = :IMPORTE_TOTAL, '#10' VISIBLE = :VISIB' +
'LE, '#10' ID_ARTICULO = :ID_ARTICULO, '#10' DESCUENTO = :DESCUENTO' +
', '#10' IMPORTE_PORTE = :IMPORTE_PORTE, '#10' ID_PRESUPUESTO = :ID' +
'_PRESUPUESTO, '#10' FECHA_ALTA = :FECHA_ALTA, '#10' FECHA_MODIFICA' +
'CION = :FECHA_MODIFICACION'#10' WHERE'#10' (ID = :OLD_ID)'
StatementType = stSQL
ColumnMappings = <>
end>
Name = 'Update_PresupuestosCliente_Detalles'
end>
RelationShips = <
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 = 'PedidosCliente_ID'
DataType = datAutoInc
GeneratorName = 'GEN_PRESUPUESTOS_CLI_ID'
DisplayLabel = 'ID'
end
item
Name = 'PedidosCliente_ID_EMPRESA'
DataType = datInteger
DisplayLabel = 'ID_EMPRESA'
end
item
Name = 'PedidosCliente_ID_CLIENTE'
DataType = datInteger
DisplayLabel = 'ID_CLIENTE'
end
item
Name = 'PedidosCliente_NOMBRE'
DataType = datString
Size = 255
DisplayLabel = 'Nombre del cliente'
end
item
Name = 'PedidosCliente_FECHA_PEDIDO'
DataType = datDateTime
DisplayLabel = 'Fecha pedido'
end
item
Name = 'PedidosCliente_CALLE'
DataType = datString
Size = 255
DisplayLabel = 'Calle'
end
item
Name = 'PedidosCliente_CODIGO_POSTAL'
DataType = datString
Size = 10
DisplayLabel = 'C'#243'd. postal'
end
item
Name = 'PedidosCliente_POBLACION'
DataType = datString
Size = 255
DisplayLabel = 'Poblaci'#243'n'
end
item
Name = 'PedidosCliente_PROVINCIA'
DataType = datString
Size = 255
DisplayLabel = 'Provincia'
end
item
Name = 'PedidosCliente_PERSONA_CONTACTO'
DataType = datString
Size = 255
DisplayLabel = 'Persona de contacto'
end
item
Name = 'PedidosCliente_TELEFONO'
DataType = datString
Size = 25
DisplayLabel = 'Tel'#233'fono'
end
item
Name = 'PedidosCliente_OBSERVACIONES'
DataType = datMemo
DisplayLabel = 'Observaciones'
end
item
Name = 'PedidosCliente_INCIDENCIAS'
DataType = datMemo
DisplayLabel = 'INCIDENCIAS'
end
item
Name = 'PedidosCliente_INCIDENCIAS_ACTIVAS'
DataType = datInteger
DisplayLabel = 'INCIDENCIAS_ACTIVAS'
end
item
Name = 'PedidosCliente_FECHA_ALTA'
DataType = datDateTime
DisplayLabel = 'FECHA_ALTA'
end
item
Name = 'PedidosCliente_FECHA_MODIFICACION'
DataType = datDateTime
DisplayLabel = 'FECHA_MODIFICACION'
end
item
Name = 'PedidosCliente_USUARIO'
DataType = datString
Size = 20
DisplayLabel = 'USUARIO'
end
item
Name = 'PedidosCliente_IMPORTE_NETO'
DataType = datCurrency
DisplayLabel = 'Importe neto'
Alignment = taRightJustify
end
item
Name = 'PedidosCliente_IMPORTE_PORTE'
DataType = datCurrency
DisplayLabel = 'Importe del porte'
Alignment = taRightJustify
end
item
Name = 'PedidosCliente_DESCUENTO'
DataType = datFloat
DisplayLabel = 'Descuento'
DisplayFormat = ',0.00 %;-,0.00 %'
Alignment = taRightJustify
end
item
Name = 'PedidosCliente_IMPORTE_DESCUENTO'
DataType = datCurrency
DisplayLabel = 'Importe dto.'
Alignment = taRightJustify
end
item
Name = 'PedidosCliente_BASE_IMPONIBLE'
DataType = datCurrency
DisplayLabel = 'Base imponible'
Alignment = taRightJustify
end
item
Name = 'PedidosCliente_IVA'
DataType = datFloat
DisplayLabel = 'IVA'
DisplayFormat = ',0.00 %;-,0.00 %'
Alignment = taRightJustify
end
item
Name = 'PedidosCliente_IMPORTE_IVA'
DataType = datCurrency
DisplayLabel = 'Importe IVA'
Alignment = taRightJustify
end
item
Name = 'PedidosCliente_IMPORTE_TOTAL'
DataType = datCurrency
DisplayLabel = 'Importe total'
Alignment = taRightJustify
end
item
Name = 'PedidosCliente_ID_FORMA_PAGO'
DataType = datInteger
DisplayLabel = 'ID_FORMA_PAGO'
end
item
Name = 'PedidosCliente_Detalles_ID'
DataType = datAutoInc
GeneratorName = 'GEN_PRESUPUESTOS_CLI_DETALLE_ID'
Required = True
DisplayLabel = 'ID'
end
item
Name = 'PedidosCliente_Detalles_ID_PEDIDO'
DataType = datInteger
DisplayLabel = 'ID_PEDIDO'
end
item
Name = 'POSICIONCONCEPTO'
DataType = datInteger
DisplayLabel = 'POSICION'
end
item
Name = 'PedidosCliente_Detalles_TIPO_DETALLE'
DataType = datString
Size = 10
DisplayLabel = 'TIPO_DETALLE'
end
item
Name = 'PedidosCliente_Detalles_REFERENCIA'
DataType = datString
Size = 255
DisplayLabel = 'Referencia'
end
item
Name = 'PedidosCliente_Detalles_ID_ARTICULO'
DataType = datInteger
DisplayLabel = 'ID_ARTICULO'
end
item
Name = 'PedidosCliente_Detalles_CONCEPTO'
DataType = datString
Size = 2000
DisplayLabel = 'CONCEPTO'
end
item
Name = 'CANTIDAD'
DataType = datInteger
Alignment = taRightJustify
end
item
Name = 'PedidosCliente_Detalles_IMPORTE_UNIDAD'
DataType = datCurrency
DisplayLabel = 'Importe unidad'
Alignment = taRightJustify
end
item
Name = 'PedidosCliente_Detalles_IMPORTE_TOTAL'
DataType = datCurrency
DisplayLabel = 'Importe total'
Alignment = taRightJustify
end
item
Name = 'PedidosCliente_Detalles_DESCUENTO'
DataType = datFloat
DisplayLabel = 'Descuento'
DisplayFormat = ',0.00 %;-,0.00 %'
Alignment = taRightJustify
end
item
Name = 'PedidosCliente_Detalles_IMPORTE_PORTE'
DataType = datCurrency
DisplayLabel = 'Importe porte'
Alignment = taRightJustify
end
item
Name = 'PedidosCliente_Detalles_VISIBLE'
DataType = datInteger
DisplayLabel = 'VISIBLE'
end
item
Name = 'PedidosCliente_Detalles_REFERENCIA_PROVEEDOR'
DataType = datString
Size = 255
DisplayLabel = 'Ref. proveedor'
end
item
Name = 'PedidoCliente_Articulos_Pendientes_ID_ARTICULO'
DataType = datInteger
DisplayLabel = 'ID_ARTICULO'
end
item
Name = 'PedidoCliente_Articulos_Pendientes_CANTIDAD_PED'
DataType = datInteger
DisplayLabel = 'Cantidad en pedido'
Alignment = taRightJustify
end
item
Name = 'PedidoCliente_Articulos_Pendientes_CANTIDAD_ALB'
DataType = datInteger
DisplayLabel = 'Cantidad en albaranes'
Alignment = taRightJustify
end
item
Name = 'PedidoCliente_Articulos_Pendientes_CANTIDAD_PENDIENTE'
DataType = datInteger
DisplayLabel = 'Cantidad pendiente'
Alignment = taRightJustify
end
item
Name = 'DarArticulosPendientesPedirAProv_ID_PEDIDO'
DataType = datAutoInc
DisplayLabel = 'ID_PEDIDO'
end
item
Name = 'DarArticulosPendientesPedirAProv_ID_ARTICULO'
DataType = datInteger
DisplayLabel = 'ID_ARTICULO'
end
item
Name = 'DarArticulosPendientesPedirAProv_CANT_PEDIDA_CLIENTE'
DataType = datInteger
DisplayLabel = 'Cant. pedida por cliente'
end
item
Name = 'DarArticulosPendientesPedirAProv_ID_PROVEEDOR'
DataType = datInteger
DisplayLabel = 'ID_PROVEEDOR'
end
item
Name = 'DarArticulosPendientesPedirAProv_CANT_PEDIDA_PROVEEDOR'
DataType = datInteger
DisplayLabel = 'Cant. pedida a proveedor'
end
item
Name = 'DarArticulosPendientesPedirAProv_CANT_PENDIENTE_PEDIR'
DataType = datInteger
DisplayLabel = 'Cant. pendiente pedir'
end
item
Name = 'PedidosCliente_FECHA_PREVISTA_ENVIO'
DataType = datDateTime
DisplayLabel = 'Fecha de entrega prevista'
end
item
Name = 'PedidosCliente_REFERENCIA'
DataType = datString
Size = 255
DisplayLabel = 'Referencia'
ServerAutoRefresh = True
end
item
Name = 'PedidosCliente_REFERENCIA_CLIENTE'
DataType = datString
Size = 255
end
item
Name = 'PedidosCliente_SITUACION'
DataType = datString
Size = 255
DisplayLabel = 'Situaci'#243'n'
ServerAutoRefresh = True
end
item
Name = 'PedidosCliente_REF_TIENDA_WEB'
DataType = datInteger
DisplayLabel = 'REF_TIENDA_WEB'
end>
Left = 48
Top = 152
end
object Bin2DataStreamer: TDABin2DataStreamer
Left = 48
Top = 80
end
object bpPresupuestosCliente: TDABusinessProcessor
Schema = schPresupuestosCliente
InsertCommandName = 'Insert_PresupuestosCliente'
DeleteCommandName = 'Delete_PresupuestosCliente'
UpdateCommandName = 'Update_PresupuestosCliente'
ReferencedDataset = 'PresupuestosCliente'
ProcessorOptions = [poAutoGenerateRefreshDataset, poPrepareCommands]
UpdateMode = updWhereKeyOnly
Left = 184
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 = 184
Top = 88
end
end