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

1072 lines
31 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'
Default = True
TargetTable = 'V_AGEN_COM_DET_AGRU'
SQL =
'select'#10' V_AGEN_COM_DET_AGRU.ID_FACTURA,'#10' V_AGEN_COM_' +
'DET_AGRU.COMISION,'#10' V_AGEN_COM_DET_AGRU.IMPORTE_COMISIONAB' +
'LE,'#10' V_AGEN_COM_DET_AGRU.IMPORTE_COMISION,'#10#10' FACTURA' +
'S_CLIENTE.ID_EMPRESA,'#10' FACTURAS_CLIENTE.ID_COMISION_LIQUID' +
'ADA,'#10' FACTURAS_CLIENTE.FECHA_FACTURA as FECHA,'#10' FACT' +
'URAS_CLIENTE.REFERENCIA,'#10' FACTURAS_CLIENTE.SITUACION,'#10' ' +
' FACTURAS_CLIENTE.ID_CLIENTE,'#10' FACTURAS_CLIENTE.ID_AGENT' +
'E,'#10#10' CONTACTOS1.NOMBRE as AGENTE,'#10' CONTACTOS2.NOMBRE' +
' as CLIENTE'#10#10#10'from V_AGEN_COM_DET_AGRU'#10'LEFT JOIN FACTURAS_CLIENT' +
'E on (FACTURAS_CLIENTE.ID = V_AGEN_COM_DET_AGRU.ID_FACTURA)'#10'LEFT' +
' JOIN CONTACTOS CONTACTOS1 ON (CONTACTOS1.ID = FACTURAS_CLIENTE.' +
'ID_AGENTE)'#10'LEFT JOIN CONTACTOS CONTACTOS2 ON (CONTACTOS2.ID = FA' +
'CTURAS_CLIENTE.ID_CLIENTE)'#10'where {where}'#10
StatementType = stSQL
ColumnMappings = <
item
DatasetField = 'ID_EMPRESA'
TableField = 'ID_EMPRESA'
end
item
DatasetField = 'REFERENCIA'
TableField = 'REFERENCIA'
end
item
DatasetField = 'ID_COMISION_LIQUIDADA'
TableField = 'ID_COMISION_LIQUIDADA'
end
item
DatasetField = 'SITUACION'
TableField = 'SITUACION'
end
item
DatasetField = 'ID_CLIENTE'
TableField = 'ID_CLIENTE'
end
item
DatasetField = 'ID_AGENTE'
TableField = 'ID_AGENTE'
end
item
DatasetField = 'AGENTE'
TableField = '<unknown>'
SQLOrigin = 'AGENTE'
end
item
DatasetField = 'ID_FACTURA'
TableField = 'ID_FACTURA'
end
item
DatasetField = 'FECHA'
TableField = 'FECHA'
end
item
DatasetField = 'CLIENTE'
TableField = '<unknown>'
SQLOrigin = 'CLIENTE'
end
item
DatasetField = 'COMISION'
TableField = 'COMISION'
end
item
DatasetField = 'IMPORTE_COMISIONABLE'
TableField = '<unknown>'
SQLOrigin = 'IMPORTE_COMISIONABLE'
end
item
DatasetField = 'IMPORTE_COMISION'
TableField = 'IMPORTE_COMISION'
end>
end>
Name = 'Facturas_Comision'
Fields = <
item
Name = 'ID_FACTURA'
DataType = datInteger
end
item
Name = 'COMISION'
DataType = datFloat
end
item
Name = 'IMPORTE_COMISIONABLE'
DataType = datCurrency
end
item
Name = 'IMPORTE_COMISION'
DataType = datFloat
end
item
Name = 'ID_EMPRESA'
DataType = datInteger
DictionaryEntry = 'Facturas_Comision_ID_EMPRESA'
end
item
Name = 'ID_COMISION_LIQUIDADA'
DataType = datInteger
ServerAutoRefresh = True
DictionaryEntry = 'Facturas_Comision_ID_COMISION_LIQUIDADA'
end
item
Name = 'FECHA'
DataType = datDateTime
end
item
Name = 'REFERENCIA'
DataType = datString
Size = 255
DictionaryEntry = 'Facturas_Comision_REFERENCIA'
end
item
Name = 'SITUACION'
DataType = datString
Size = 19
DictionaryEntry = 'Facturas_Comision_SITUACION'
end
item
Name = 'ID_CLIENTE'
DataType = datInteger
DictionaryEntry = 'Facturas_Comision_ID_CLIENTE'
end
item
Name = 'ID_AGENTE'
DataType = datInteger
DictionaryEntry = 'Facturas_Comision_ID_AGENTE'
end
item
Name = 'AGENTE'
DataType = datString
Size = 255
end
item
Name = 'CLIENTE'
DataType = datString
Size = 255
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 = 'V_AGENTES_COMISIONES'
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 = 'USUARIO'
TableField = 'USUARIO'
end
item
DatasetField = 'NOMBRE'
TableField = 'NOMBRE'
end
item
DatasetField = 'DELEGACION'
TableField = 'DELEGACION'
end
item
DatasetField = 'COMISION'
TableField = 'COMISION'
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 = 'USUARIO'
DataType = datString
Size = 20
DictionaryEntry = 'Comisiones_USUARIO'
end
item
Name = 'NOMBRE'
DataType = datString
Size = 255
end
item
Name = 'DELEGACION'
DataType = datString
Size = 255
end
item
Name = 'COMISION'
DataType = datFloat
end>
end>
JoinDataTables = <>
UnionDataTables = <>
Commands = <
item
Params = <
item
Name = 'ID_COMISION_LIQUIDADA'
DataType = datInteger
Value = ''
end
item
Name = 'ID_FACTURA'
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_FACTURA)'#10
StatementType = stSQL
ColumnMappings = <>
end>
Name = 'Insert_Facturas_Comisiones'
end
item
Params = <
item
Name = 'OLD_ID_FACTURA'
Value = ''
end>
Statements = <
item
Connection = 'IBX'
TargetTable = 'FACTURAS_CLIENTE'
SQL =
'UPDATE FACTURAS_CLIENTE'#10'SET ID_COMISION_LIQUIDADA = Null'#10'WHERE (' +
'ID = :OLD_ID_FACTURA)'#10
StatementType = stSQL
ColumnMappings = <>
end>
Name = 'Delete_Facturas_Comision'
end
item
Params = <
item
Name = 'ID_COMISION_LIQUIDADA'
DataType = datInteger
Value = ''
end
item
Name = 'OLD_ID_FACTURA'
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_FACTURA)'#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
item
Params = <
item
Name = 'ID'
DataType = datAutoInc
GeneratorName = 'GEN_COMISIONES_LIQUID_ID'
Value = ''
end
item
Name = 'ID_EMPRESA'
DataType = datInteger
Value = ''
end
item
Name = 'REFERENCIA'
DataType = datString
Size = 255
Value = ''
end
item
Name = 'ID_AGENTE'
DataType = datInteger
Value = ''
end
item
Name = 'DESCRIPCION'
DataType = datString
Size = 255
Value = ''
end
item
Name = 'FECHA'
DataType = datDateTime
Value = ''
end
item
Name = 'IMPORTE_TOTAL'
DataType = datCurrency
Value = ''
end
item
Name = 'USUARIO'
DataType = datString
Size = 30
Value = ''
end>
Statements = <
item
Connection = 'IBX'
Default = True
TargetTable = 'COMISIONES_LIQUIDADAS'
SQL =
'INSERT'#10' INTO COMISIONES_LIQUIDADAS'#10' (ID, ID_EMPRESA, REFEREN' +
'CIA, ID_AGENTE, DESCRIPCION, FECHA, IMPORTE_TOTAL, USUARIO)'#10' VA' +
'LUES'#10' (:ID, :ID_EMPRESA, :REFERENCIA, :ID_AGENTE, :DESCRIPCIO' +
'N, :FECHA, :IMPORTE_TOTAL, :USUARIO)'#10
StatementType = stSQL
ColumnMappings = <>
end>
Name = 'Insert_Comisiones'
end
item
Params = <
item
Name = 'OLD_ID'
Value = ''
end>
Statements = <
item
Connection = 'IBX'
Default = True
TargetTable = 'COMISIONES_LIQUIDADAS'
SQL =
'DELETE'#10' FROM'#10' COMISIONES_LIQUIDADAS'#10' WHERE'#10' (ID = :OLD_I' +
'D)'#10
StatementType = stSQL
ColumnMappings = <>
end>
Name = 'Delete_Comisiones'
end
item
Params = <
item
Name = 'ID'
DataType = datInteger
Value = ''
end
item
Name = 'ID_EMPRESA'
DataType = datInteger
Value = ''
end
item
Name = 'REFERENCIA'
DataType = datString
Size = 255
Value = ''
end
item
Name = 'ID_AGENTE'
DataType = datInteger
Value = ''
end
item
Name = 'DESCRIPCION'
DataType = datString
Size = 255
Value = ''
end
item
Name = 'FECHA'
DataType = datDateTime
Value = ''
end
item
Name = 'IMPORTE_TOTAL'
DataType = datCurrency
Value = ''
end
item
Name = 'USUARIO'
DataType = datString
Size = 30
Value = ''
end
item
Name = 'OLD_ID'
Value = ''
end>
Statements = <
item
Connection = 'IBX'
Default = True
TargetTable = 'COMISIONES_LIQUIDADAS'
SQL =
'UPDATE COMISIONES_LIQUIDADAS'#10' SET'#10' ID = :ID,'#10' ID_EMPRESA ' +
'= :ID_EMPRESA,'#10' REFERENCIA = :REFERENCIA,'#10' ID_AGENTE = :ID' +
'_AGENTE,'#10' DESCRIPCION = :DESCRIPCION,'#10' FECHA = :FECHA,'#10' ' +
' IMPORTE_TOTAL = :IMPORTE_TOTAL,'#10' USUARIO = :USUARIO'#10' WHERE'#10 +
' (ID = :OLD_ID)'#10
StatementType = stSQL
ColumnMappings = <>
end>
Name = 'Update_Comisiones'
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 = [poAutoGenerateRefreshDataset, 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
InsertCommandName = 'Insert_Comisiones'
DeleteCommandName = 'Delete_Comisiones'
UpdateCommandName = 'Update_Comisiones'
ReferencedDataset = 'Comisiones'
ProcessorOptions = [poAutoGenerateRefreshDataset, poPrepareCommands]
UpdateMode = updWhereKeyOnly
Left = 248
Top = 144
end
end