AbetoDesign_FactuGES2/Source/Modulos/Comisiones/Servidor/srvComisiones_Impl.dfm

1156 lines
34 KiB
Plaintext

object srvComisiones: TsrvComisiones
OldCreateOrder = True
OnCreate = DARemoteServiceCreate
ConnectionName = 'IBX'
ServiceSchema = schComisiones
ServiceDataStreamer = Bin2DataStreamer
ExportedDataTables = <>
BeforeAcquireConnection = DataAbstractServiceBeforeAcquireConnection
Height = 249
Width = 343
object Diagrams: TDADiagrams
Left = 150
Top = 74
DiagramData = '<Diagrams>'#13#10'</Diagrams>'#13#10
end
object DataDictionary: TDADataDictionary
Fields = <
item
Name = 'Comisiones_ID'
DataType = datAutoInc
GeneratorName = 'GEN_COMISIONES_LIQUID_ID'
DisplayLabel = 'Id'
ServerAutoRefresh = True
end
item
Name = 'Comisiones_ID_EMPRESA'
DataType = datInteger
DisplayLabel = 'IdEmpresa'
end
item
Name = 'Comisiones_REFERENCIA'
DataType = datString
Size = 255
DisplayLabel = 'Referencia'
end
item
Name = 'Comisiones_ID_AGENTE'
DataType = datInteger
DisplayLabel = 'IdAgente'
end
item
Name = 'Comisiones_DESCRIPCION'
DataType = datString
Size = 255
DisplayLabel = 'Descripci'#243'n'
end
item
Name = 'Comisiones_FECHA'
DataType = datDateTime
DisplayLabel = 'Fecha'
end
item
Name = 'Comisiones_IMPORTE_TOTAL'
DataType = datCurrency
DisplayLabel = 'Importe total'
Alignment = taRightJustify
end
item
Name = 'Comisiones_USUARIO'
DataType = datString
Size = 20
DisplayLabel = 'Usuario'
end
item
Name = 'Comisiones_NOMBRE'
DataType = datString
Size = 255
DisplayLabel = 'Nombre'
end
item
Name = 'Facturas_Comision_ID'
DataType = datInteger
end
item
Name = 'Facturas_Comision_ID_EMPRESA'
DataType = datInteger
end
item
Name = 'Facturas_Comision_REFERENCIA'
DataType = datString
Size = 255
DisplayLabel = 'Referencia'
end
item
Name = 'Facturas_Comision_TIPO'
DataType = datString
Size = 1
end
item
Name = 'Facturas_Comision_ID_COMISION_LIQUIDADA'
DataType = datInteger
DisplayLabel = 'IdComision'
ServerAutoRefresh = True
end
item
Name = 'Facturas_Comision_FECHA_FACTURA'
DataType = datDateTime
DisplayLabel = 'Fecha'
end
item
Name = 'Facturas_Comision_SITUACION'
DataType = datString
Size = 19
DisplayLabel = 'Situaci'#243'n'
end
item
Name = 'Facturas_Comision_BASE_IMPONIBLE'
DataType = datCurrency
DisplayLabel = 'Base imponible'
Alignment = taRightJustify
end
item
Name = 'Facturas_Comision_DESCUENTO'
DataType = datFloat
end
item
Name = 'Facturas_Comision_IMPORTE_DESCUENTO'
DataType = datCurrency
end
item
Name = 'Facturas_Comision_IVA'
DataType = datFloat
end
item
Name = 'Facturas_Comision_IMPORTE_IVA'
DataType = datCurrency
end
item
Name = 'Facturas_Comision_RE'
DataType = datFloat
end
item
Name = 'Facturas_Comision_IMPORTE_RE'
DataType = datCurrency
end
item
Name = 'Facturas_Comision_IMPORTE_TOTAL'
DataType = datCurrency
end
item
Name = 'Facturas_Comision_OBSERVACIONES'
DataType = datMemo
end
item
Name = 'Facturas_Comision_ID_CLIENTE'
DataType = datInteger
DisplayLabel = 'IdCliente'
end
item
Name = 'Facturas_Comision_NOMBRE_CLIENTE'
DataType = datString
Size = 255
DisplayLabel = 'Nombre cliente'
end
item
Name = 'Facturas_Comision_NOMBRE_COMERCIAL_CLIENTE'
DataType = datString
Size = 255
DisplayLabel = 'Nombre comercial cliente'
end
item
Name = 'Facturas_Comision_NIF_CIF'
DataType = datString
Size = 15
end
item
Name = 'Facturas_Comision_NOMBRE'
DataType = datString
Size = 255
DisplayLabel = 'Raz'#243'n social'
end
item
Name = 'Facturas_Comision_CALLE'
DataType = datString
Size = 255
end
item
Name = 'Facturas_Comision_POBLACION'
DataType = datString
Size = 255
end
item
Name = 'Facturas_Comision_PROVINCIA'
DataType = datString
Size = 255
end
item
Name = 'Facturas_Comision_CODIGO_POSTAL'
DataType = datString
Size = 10
end
item
Name = 'Facturas_Comision_FECHA_ALTA'
DataType = datDateTime
end
item
Name = 'Facturas_Comision_FECHA_MODIFICACION'
DataType = datDateTime
end
item
Name = 'Facturas_Comision_USUARIO'
DataType = datString
Size = 30
end
item
Name = 'Facturas_Comision_ID_FORMA_PAGO'
DataType = datInteger
end
item
Name = 'Facturas_Comision_RECARGO_EQUIVALENCIA'
DataType = datSmallInt
end
item
Name = 'Facturas_Comision_ID_TIPO_IVA'
DataType = datInteger
end
item
Name = 'Facturas_Comision_IMPORTE_NETO'
DataType = datCurrency
end
item
Name = 'Facturas_Comision_IMPORTE_PORTE'
DataType = datCurrency
end
item
Name = 'Facturas_Comision_ID_AGENTE'
DataType = datInteger
end
item
Name = 'Facturas_Comision_REFERENCIA_COMISION'
DataType = datString
Size = 255
end
item
Name = 'Facturas_Comision_IGNORAR_CONTABILIDAD'
DataType = datSmallInt
end
item
Name = 'Facturas_Comision_ID_TIENDA'
DataType = datInteger
end
item
Name = 'Facturas_Comision_TIENDA'
DataType = datString
Size = 255
end
item
Name = 'Facturas_Comision_ID_SUBCUENTA'
DataType = datInteger
end
item
Name = 'Facturas_Comision_SUBCUENTA'
DataType = datString
Size = 255
end
item
Name = 'Comisiones_vendedores_ID'
DataType = datAutoInc
GeneratorName = 'GEN_COMISIONES_VENDEDORES_ID'
DisplayLabel = 'Id'
end
item
Name = 'Comisiones_vendedores_ID_COMISION'
DataType = datInteger
DisplayLabel = 'IdComision'
ServerAutoRefresh = True
end
item
Name = 'Comisiones_vendedores_ID_VENDEDOR'
DataType = datInteger
DisplayLabel = 'IdVendedor'
end
item
Name = 'Comisiones_vendedores_NOMBRE'
DataType = datString
Size = 255
DisplayLabel = 'Vendedor'
end
item
Name = 'Comisiones_vendedores_PORCENTAJE'
DataType = datFloat
DisplayLabel = 'Porcentaje'
Alignment = taRightJustify
end
item
Name = 'Comisiones_vendedores_IMPORTE_TOTAL'
DataType = datCurrency
DisplayLabel = 'Importe'
Alignment = taRightJustify
end>
Left = 150
Top = 22
end
object schComisiones: TDASchema
ConnectionManager = dmServer.ConnectionManager
DataDictionary = DataDictionary
Diagrams = Diagrams
Datasets = <
item
Params = <>
Statements = <
item
Connection = 'IBX'
TargetTable = 'V_FACTURAS_CLIENTE'
StatementType = stAutoSQL
ColumnMappings = <
item
DatasetField = 'ID'
TableField = 'ID'
end
item
DatasetField = 'ID_EMPRESA'
TableField = 'ID_EMPRESA'
end
item
DatasetField = 'REFERENCIA'
TableField = 'REFERENCIA'
end
item
DatasetField = 'TIPO'
TableField = 'TIPO'
end
item
DatasetField = 'ID_COMISION_LIQUIDADA'
TableField = 'ID_COMISION_LIQUIDADA'
end
item
DatasetField = 'FECHA_FACTURA'
TableField = 'FECHA_FACTURA'
end
item
DatasetField = 'SITUACION'
TableField = 'SITUACION'
end
item
DatasetField = 'BASE_IMPONIBLE'
TableField = 'BASE_IMPONIBLE'
end
item
DatasetField = 'DESCUENTO'
TableField = 'DESCUENTO'
end
item
DatasetField = 'IMPORTE_DESCUENTO'
TableField = 'IMPORTE_DESCUENTO'
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 = 'IMPORTE_TOTAL'
TableField = 'IMPORTE_TOTAL'
end
item
DatasetField = 'OBSERVACIONES'
TableField = 'OBSERVACIONES'
end
item
DatasetField = 'ID_CLIENTE'
TableField = 'ID_CLIENTE'
end
item
DatasetField = 'NOMBRE_CLIENTE'
TableField = 'NOMBRE_CLIENTE'
end
item
DatasetField = 'NOMBRE_COMERCIAL_CLIENTE'
TableField = 'NOMBRE_COMERCIAL_CLIENTE'
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 = 'FECHA_ALTA'
TableField = 'FECHA_ALTA'
end
item
DatasetField = 'FECHA_MODIFICACION'
TableField = 'FECHA_MODIFICACION'
end
item
DatasetField = 'USUARIO'
TableField = 'USUARIO'
end
item
DatasetField = 'ID_FORMA_PAGO'
TableField = 'ID_FORMA_PAGO'
end
item
DatasetField = 'RECARGO_EQUIVALENCIA'
TableField = 'RECARGO_EQUIVALENCIA'
end
item
DatasetField = 'ID_TIPO_IVA'
TableField = 'ID_TIPO_IVA'
end
item
DatasetField = 'IMPORTE_NETO'
TableField = 'IMPORTE_NETO'
end
item
DatasetField = 'IMPORTE_PORTE'
TableField = 'IMPORTE_PORTE'
end
item
DatasetField = 'ID_AGENTE'
TableField = 'ID_AGENTE'
end
item
DatasetField = 'REFERENCIA_COMISION'
TableField = 'REFERENCIA_COMISION'
end
item
DatasetField = 'IGNORAR_CONTABILIDAD'
TableField = 'IGNORAR_CONTABILIDAD'
end
item
DatasetField = 'ID_TIENDA'
TableField = 'ID_TIENDA'
end
item
DatasetField = 'TIENDA'
TableField = 'TIENDA'
end
item
DatasetField = 'ID_SUBCUENTA'
TableField = 'ID_SUBCUENTA'
end
item
DatasetField = 'SUBCUENTA'
TableField = 'SUBCUENTA'
end>
end>
Name = 'Facturas_Comision'
Fields = <
item
Name = 'ID'
DataType = datInteger
DictionaryEntry = 'Facturas_Comision_ID'
InPrimaryKey = True
end
item
Name = 'ID_EMPRESA'
DataType = datInteger
DictionaryEntry = 'Facturas_Comision_ID_EMPRESA'
end
item
Name = 'REFERENCIA'
DataType = datString
Size = 255
DictionaryEntry = 'Facturas_Comision_REFERENCIA'
end
item
Name = 'TIPO'
DataType = datString
Size = 1
DictionaryEntry = 'Facturas_Comision_TIPO'
end
item
Name = 'ID_COMISION_LIQUIDADA'
DataType = datInteger
ServerAutoRefresh = True
DictionaryEntry = 'Facturas_Comision_ID_COMISION_LIQUIDADA'
end
item
Name = 'FECHA_FACTURA'
DataType = datDateTime
DictionaryEntry = 'Facturas_Comision_FECHA_FACTURA'
end
item
Name = 'SITUACION'
DataType = datString
Size = 19
DictionaryEntry = 'Facturas_Comision_SITUACION'
end
item
Name = 'BASE_IMPONIBLE'
DataType = datCurrency
DictionaryEntry = 'Facturas_Comision_BASE_IMPONIBLE'
end
item
Name = 'DESCUENTO'
DataType = datFloat
DictionaryEntry = 'Facturas_Comision_DESCUENTO'
end
item
Name = 'IMPORTE_DESCUENTO'
DataType = datCurrency
DictionaryEntry = 'Facturas_Comision_IMPORTE_DESCUENTO'
end
item
Name = 'IVA'
DataType = datFloat
DictionaryEntry = 'Facturas_Comision_IVA'
end
item
Name = 'IMPORTE_IVA'
DataType = datCurrency
DictionaryEntry = 'Facturas_Comision_IMPORTE_IVA'
end
item
Name = 'RE'
DataType = datFloat
DictionaryEntry = 'Facturas_Comision_RE'
end
item
Name = 'IMPORTE_RE'
DataType = datCurrency
DictionaryEntry = 'Facturas_Comision_IMPORTE_RE'
end
item
Name = 'IMPORTE_TOTAL'
DataType = datCurrency
DictionaryEntry = 'Facturas_Comision_IMPORTE_TOTAL'
end
item
Name = 'OBSERVACIONES'
DataType = datMemo
DictionaryEntry = 'Facturas_Comision_OBSERVACIONES'
end
item
Name = 'ID_CLIENTE'
DataType = datInteger
DictionaryEntry = 'Facturas_Comision_ID_CLIENTE'
end
item
Name = 'NOMBRE_CLIENTE'
DataType = datString
Size = 255
DictionaryEntry = 'Facturas_Comision_NOMBRE_CLIENTE'
end
item
Name = 'NOMBRE_COMERCIAL_CLIENTE'
DataType = datString
Size = 255
DictionaryEntry = 'Facturas_Comision_NOMBRE_COMERCIAL_CLIENTE'
end
item
Name = 'NIF_CIF'
DataType = datString
Size = 15
DictionaryEntry = 'Facturas_Comision_NIF_CIF'
end
item
Name = 'NOMBRE'
DataType = datString
Size = 255
DictionaryEntry = 'Facturas_Comision_NOMBRE'
end
item
Name = 'CALLE'
DataType = datString
Size = 255
DictionaryEntry = 'Facturas_Comision_CALLE'
end
item
Name = 'POBLACION'
DataType = datString
Size = 255
DictionaryEntry = 'Facturas_Comision_POBLACION'
end
item
Name = 'PROVINCIA'
DataType = datString
Size = 255
DictionaryEntry = 'Facturas_Comision_PROVINCIA'
end
item
Name = 'CODIGO_POSTAL'
DataType = datString
Size = 10
DictionaryEntry = 'Facturas_Comision_CODIGO_POSTAL'
end
item
Name = 'FECHA_ALTA'
DataType = datDateTime
DictionaryEntry = 'Facturas_Comision_FECHA_ALTA'
end
item
Name = 'FECHA_MODIFICACION'
DataType = datDateTime
DictionaryEntry = 'Facturas_Comision_FECHA_MODIFICACION'
end
item
Name = 'USUARIO'
DataType = datString
Size = 30
DictionaryEntry = 'Facturas_Comision_USUARIO'
end
item
Name = 'ID_FORMA_PAGO'
DataType = datInteger
DictionaryEntry = 'Facturas_Comision_ID_FORMA_PAGO'
end
item
Name = 'RECARGO_EQUIVALENCIA'
DataType = datSmallInt
DictionaryEntry = 'Facturas_Comision_RECARGO_EQUIVALENCIA'
end
item
Name = 'ID_TIPO_IVA'
DataType = datInteger
DictionaryEntry = 'Facturas_Comision_ID_TIPO_IVA'
end
item
Name = 'IMPORTE_NETO'
DataType = datCurrency
DictionaryEntry = 'Facturas_Comision_IMPORTE_NETO'
end
item
Name = 'IMPORTE_PORTE'
DataType = datCurrency
DictionaryEntry = 'Facturas_Comision_IMPORTE_PORTE'
end
item
Name = 'ID_AGENTE'
DataType = datInteger
DictionaryEntry = 'Facturas_Comision_ID_AGENTE'
end
item
Name = 'REFERENCIA_COMISION'
DataType = datString
Size = 255
DictionaryEntry = 'Facturas_Comision_REFERENCIA_COMISION'
end
item
Name = 'IGNORAR_CONTABILIDAD'
DataType = datSmallInt
DictionaryEntry = 'Facturas_Comision_IGNORAR_CONTABILIDAD'
end
item
Name = 'ID_TIENDA'
DataType = datInteger
DictionaryEntry = 'Facturas_Comision_ID_TIENDA'
end
item
Name = 'TIENDA'
DataType = datString
Size = 255
DictionaryEntry = 'Facturas_Comision_TIENDA'
end
item
Name = 'ID_SUBCUENTA'
DataType = datInteger
DictionaryEntry = 'Facturas_Comision_ID_SUBCUENTA'
end
item
Name = 'SUBCUENTA'
DataType = datString
Size = 255
DictionaryEntry = 'Facturas_Comision_SUBCUENTA'
end>
end
item
Params = <>
Statements = <
item
Connection = 'IBX'
ConnectionType = 'Interbase'
Default = True
TargetTable = 'COMISIONES_LIQ_VENDEDORES'
Name = 'IBX'
StatementType = stAutoSQL
ColumnMappings = <
item
DatasetField = 'ID'
TableField = 'ID'
end
item
DatasetField = 'ID_COMISION'
TableField = 'ID_COMISION'
end
item
DatasetField = 'ID_VENDEDOR'
TableField = 'ID_VENDEDOR'
end
item
DatasetField = 'NOMBRE'
TableField = 'NOMBRE'
end
item
DatasetField = 'COMISION'
TableField = 'COMISION'
end
item
DatasetField = 'IMPORTE_TOTAL'
TableField = 'IMPORTE_TOTAL'
end>
end>
Name = 'Vendedores_Comision'
Fields = <
item
Name = 'ID'
DataType = datAutoInc
GeneratorName = 'GEN_COMISIONES_VENDEDORES_ID'
DictionaryEntry = 'Comisiones_vendedores_ID'
InPrimaryKey = True
end
item
Name = 'ID_COMISION'
DataType = datInteger
ServerAutoRefresh = True
DictionaryEntry = 'Comisiones_vendedores_ID_COMISION'
end
item
Name = 'ID_VENDEDOR'
DataType = datInteger
DictionaryEntry = 'Comisiones_vendedores_ID_VENDEDOR'
end
item
Name = 'NOMBRE'
DataType = datString
Size = 255
DictionaryEntry = 'Comisiones_vendedores_NOMBRE'
end
item
Name = 'COMISION'
DataType = datFloat
end
item
Name = 'IMPORTE_TOTAL'
DataType = datCurrency
DictionaryEntry = 'Comisiones_vendedores_IMPORTE_TOTAL'
end>
end
item
Params = <>
Statements = <
item
Connection = 'IBX'
TargetTable = 'COMISIONES_LIQUIDADAS'
StatementType = stAutoSQL
ColumnMappings = <
item
DatasetField = 'ID'
TableField = 'ID'
end
item
DatasetField = 'ID_EMPRESA'
TableField = 'ID_EMPRESA'
end
item
DatasetField = 'REFERENCIA'
TableField = 'REFERENCIA'
end
item
DatasetField = 'ID_AGENTE'
TableField = 'ID_AGENTE'
end
item
DatasetField = 'DESCRIPCION'
TableField = 'DESCRIPCION'
end
item
DatasetField = 'FECHA'
TableField = 'FECHA'
end
item
DatasetField = 'IMPORTE_TOTAL'
TableField = 'IMPORTE_TOTAL'
end
item
DatasetField = 'FECHA_ALTA'
TableField = 'FECHA_ALTA'
end
item
DatasetField = 'FECHA_MODIFICACION'
TableField = 'FECHA_MODIFICACION'
end
item
DatasetField = 'USUARIO'
TableField = 'USUARIO'
end>
end>
Name = 'Comisiones'
Fields = <
item
Name = 'ID'
DataType = datAutoInc
GeneratorName = 'GEN_COMISIONES_LIQUID_ID'
ServerAutoRefresh = True
DictionaryEntry = 'Comisiones_ID'
InPrimaryKey = True
end
item
Name = 'ID_EMPRESA'
DataType = datInteger
DictionaryEntry = 'Comisiones_ID_EMPRESA'
end
item
Name = 'REFERENCIA'
DataType = datString
Size = 255
DictionaryEntry = 'Comisiones_REFERENCIA'
end
item
Name = 'ID_AGENTE'
DataType = datInteger
DictionaryEntry = 'Comisiones_ID_AGENTE'
end
item
Name = 'DESCRIPCION'
DataType = datString
Size = 255
DictionaryEntry = 'Comisiones_DESCRIPCION'
end
item
Name = 'FECHA'
DataType = datDateTime
DictionaryEntry = 'Comisiones_FECHA'
end
item
Name = 'IMPORTE_TOTAL'
DataType = datCurrency
DictionaryEntry = 'Comisiones_IMPORTE_TOTAL'
end
item
Name = 'FECHA_ALTA'
DataType = datDateTime
end
item
Name = 'FECHA_MODIFICACION'
DataType = datDateTime
end
item
Name = 'USUARIO'
DataType = datString
Size = 20
DictionaryEntry = 'Comisiones_USUARIO'
end>
end>
JoinDataTables = <>
UnionDataTables = <>
Commands = <
item
Params = <
item
Name = 'ID_COMISION_LIQUIDADA'
Value = ''
end
item
Name = 'ID'
Value = ''
end>
Statements = <
item
Connection = 'IBX'
TargetTable = 'FACTURAS_CLIENTE'
SQL =
'UPDATE FACTURAS_CLIENTE'#10'SET ID_COMISION_LIQUIDADA = :ID_COMISION' +
'_LIQUIDADA'#10'WHERE (ID = :ID)'#10
StatementType = stSQL
ColumnMappings = <>
end>
Name = 'Insert_Facturas_Comisiones'
end
item
Params = <
item
Name = 'OLD_ID'
Value = ''
end>
Statements = <
item
Connection = 'IBX'
TargetTable = 'FACTURAS_CLIENTE'
SQL =
'UPDATE FACTURAS_CLIENTE'#10'SET ID_COMISION_LIQUIDADA = Null'#10'WHERE (' +
'ID = :OLD_ID)'#10
StatementType = stSQL
ColumnMappings = <>
end>
Name = 'Delete_Facturas_Comision'
end
item
Params = <
item
Name = 'ID_COMISION_LIQUIDADA'
Value = ''
end
item
Name = 'OLD_ID'
Value = ''
end>
Statements = <
item
Connection = 'IBX'
TargetTable = 'FACTURAS_CLIENTE'
SQL =
'UPDATE FACTURAS_CLIENTE'#10'SET ID_COMISION_LIQUIDADA = :ID_COMISION' +
'_LIQUIDADA'#10'WHERE (ID = :OLD_ID)'#10
StatementType = stSQL
ColumnMappings = <>
end>
Name = 'Update_Facturas_Comision'
end
item
Params = <
item
Name = 'ID'
DataType = datAutoInc
GeneratorName = 'GEN_COMISIONES_VENDEDORES_ID'
Value = ''
end
item
Name = 'ID_COMISION'
Value = ''
end
item
Name = 'ID_VENDEDOR'
Value = ''
end
item
Name = 'NOMBRE'
Value = ''
end
item
Name = 'COMISION'
Value = ''
end
item
Name = 'IMPORTE_TOTAL'
Value = ''
end>
Statements = <
item
Connection = 'IBX'
ConnectionType = 'Interbase'
Default = True
TargetTable = 'COMISIONES_LIQ_VENDEDORES'
SQL =
'INSERT'#10' INTO COMISIONES_LIQ_VENDEDORES'#10' (ID, ID_COMISION, ID' +
'_VENDEDOR, NOMBRE, COMISION, IMPORTE_TOTAL)'#10' VALUES'#10' (:ID, :' +
'ID_COMISION, :ID_VENDEDOR, :NOMBRE, :COMISION, :IMPORTE_TOTAL)'#10
StatementType = stSQL
ColumnMappings = <>
end>
Name = 'Insert_Vendedores_Comision'
end
item
Params = <
item
Name = 'OLD_ID'
Value = ''
end>
Statements = <
item
Connection = 'IBX'
ConnectionType = 'Interbase'
Default = True
TargetTable = 'COMISIONES_LIQ_VENDEDORES'
SQL =
'DELETE '#10' FROM'#10' COMISIONES_LIQ_VENDEDORES'#10' WHERE'#10' (ID = :' +
'OLD_ID)'#10
StatementType = stSQL
ColumnMappings = <>
end>
Name = 'Delete_Vendedores_Comision'
end
item
Params = <
item
Name = 'ID_COMISION'
Value = ''
end
item
Name = 'ID_VENDEDOR'
Value = ''
end
item
Name = 'NOMBRE'
Value = ''
end
item
Name = 'COMISION'
Value = ''
end
item
Name = 'IMPORTE_TOTAL'
Value = ''
end
item
Name = 'OLD_ID'
Value = ''
end>
Statements = <
item
Connection = 'IBX'
ConnectionType = 'Interbase'
Default = True
TargetTable = 'COMISIONES_LIQ_VENDEDORES'
SQL =
'UPDATE COMISIONES_LIQ_VENDEDORES'#10' SET '#10' ID_COMISION = :ID_CO' +
'MISION, '#10' ID_VENDEDOR = :ID_VENDEDOR, '#10' NOMBRE = :NOMBRE, ' +
#10' COMISION = :COMISION,'#10' IMPORTE_TOTAL = :IMPORTE_TOTAL'#10' ' +
'WHERE'#10' (ID = :OLD_ID)'#10
StatementType = stSQL
ColumnMappings = <>
end>
Name = 'Update_Vendedores_Comision'
end>
RelationShips = <
item
Name = 'Comisiones_Facturas'
MasterDatasetName = 'Comisiones'
MasterFields = 'ID'
DetailDatasetName = 'Facturas_Comision'
DetailFields = 'ID_COMISION_LIQUIDADA'
RelationshipType = rtForeignKey
end
item
Name = 'Comisiones_Vendedores'
MasterDatasetName = 'Comisiones'
MasterFields = 'ID'
DetailDatasetName = 'Vendedores_Comision'
DetailFields = 'ID_COMISION'
RelationshipType = rtForeignKey
end>
UpdateRules = <
item
Name = 'Insert Comisiones'
DoUpdate = False
DoDelete = False
DatasetName = 'Comisiones'
FailureBehavior = fbRaiseException
end
item
Name = 'Insert Comisiones_vendedores'
DoUpdate = False
DoDelete = False
DatasetName = 'Comisiones_vendedores'
FailureBehavior = fbRaiseException
end
item
Name = 'Insert Facturas_Comision'
DoUpdate = False
DoDelete = False
DatasetName = 'Facturas_Comision'
FailureBehavior = fbRaiseException
end
item
Name = 'Update Comisiones'
DoInsert = False
DoDelete = False
DatasetName = 'Comisiones'
FailureBehavior = fbRaiseException
end
item
Name = 'Update Comisiones_vendedores'
DoInsert = False
DoDelete = False
DatasetName = 'Comisiones_vendedores'
FailureBehavior = fbRaiseException
end
item
Name = 'Update Facturas_Comision'
DoInsert = False
DoDelete = False
DatasetName = 'Facturas_Comision'
FailureBehavior = fbRaiseException
end
item
Name = 'Delete Comisiones_vendedores'
DoUpdate = False
DoInsert = False
DatasetName = 'Comisiones_vendedores'
FailureBehavior = fbRaiseException
end
item
Name = 'Delete Facturas_Comision'
DoUpdate = False
DoInsert = False
DatasetName = 'Facturas_Comision'
FailureBehavior = fbRaiseException
end
item
Name = 'Delete Comisiones'
DoUpdate = False
DoInsert = False
DatasetName = 'Comisiones'
FailureBehavior = fbRaiseException
end>
Version = 0
Left = 48
Top = 24
end
object bpFacturas_Comision: TDABusinessProcessor
Schema = schComisiones
InsertCommandName = 'Insert_Facturas_Comisiones'
DeleteCommandName = 'Delete_Facturas_Comision'
UpdateCommandName = 'Update_Facturas_Comision'
ReferencedDataset = 'Facturas_Comision'
ProcessorOptions = [poPrepareCommands]
UpdateMode = updWhereKeyOnly
Left = 248
Top = 80
end
object Bin2DataStreamer: TDABin2DataStreamer
Left = 48
Top = 80
end
object bpVendedores_Comision: TDABusinessProcessor
Schema = schComisiones
InsertCommandName = 'Insert_Vendedores_Comision'
DeleteCommandName = 'Delete_Vendedores_Comision'
UpdateCommandName = 'Update_Vendedores_Comision'
ReferencedDataset = 'Vendedores_Comision'
ProcessorOptions = [poAutoGenerateRefreshDataset, poPrepareCommands]
UpdateMode = updWhereKeyOnly
Left = 248
Top = 24
end
object bpComisiones: TDABusinessProcessor
Schema = schComisiones
ReferencedDataset = 'Comisiones'
ProcessorOptions = [poAutoGenerateInsert, poAutoGenerateUpdate, poAutoGenerateDelete, poAutoGenerateRefreshDataset, poPrepareCommands]
UpdateMode = updWhereKeyOnly
Left = 248
Top = 144
end
end