811 lines
24 KiB
Plaintext
811 lines
24 KiB
Plaintext
object srvRemesasCliente: TsrvRemesasCliente
|
|
OldCreateOrder = True
|
|
OnCreate = DARemoteServiceCreate
|
|
RequiresSession = True
|
|
SessionManager = dmServer.SessionManager
|
|
AcquireConnection = True
|
|
ConnectionName = 'IBX'
|
|
ServiceSchema = schRemesasCliente
|
|
ServiceAdapter = DABINAdapter
|
|
OnAfterProcessTransactionAction = pptaNone
|
|
OnBeforeAcquireConnection = DARemoteServiceBeforeAcquireConnection
|
|
OnBeforeGetDatasetData = DARemoteServiceBeforeGetDatasetData
|
|
ExportedDataTables = <>
|
|
CacheElements = <>
|
|
Options = [rsoProcessDeltasWithoutUpdateRules]
|
|
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 = 'RemesasCliente_ID'
|
|
DataType = datAutoInc
|
|
DisplayLabel = 'ID'
|
|
end
|
|
item
|
|
Name = 'RemesasCliente_FECHA_REMESA'
|
|
DataType = datDateTime
|
|
end
|
|
item
|
|
Name = 'RemesasCliente_DESCRIPCION'
|
|
DataType = datString
|
|
Size = 255
|
|
ServerAutoRefresh = True
|
|
end
|
|
item
|
|
Name = 'RemesasCliente_USUARIO'
|
|
DataType = datString
|
|
Size = 20
|
|
end
|
|
item
|
|
Name = 'RemesasCliente_ID_EMPRESA'
|
|
DataType = datInteger
|
|
end
|
|
item
|
|
Name = 'RemesasCliente_ID_DATOS_BANCO'
|
|
DataType = datInteger
|
|
DisplayLabel = 'ID_DATOS_BANCO'
|
|
end
|
|
item
|
|
Name = 'RemesasCliente_FECHA_ALTA'
|
|
DataType = datDateTime
|
|
DisplayLabel = 'FECHA_ALTA'
|
|
end
|
|
item
|
|
Name = 'RemesasCliente_FECHA_MODIFICACION'
|
|
DataType = datDateTime
|
|
DisplayLabel = 'FECHA_MODIFICACION'
|
|
end
|
|
item
|
|
Name = 'RemesasCliente_NOMBRE'
|
|
DataType = datString
|
|
Size = 255
|
|
DisplayLabel = 'Banco'
|
|
end
|
|
item
|
|
Name = 'RemesasCliente_ENTIDAD'
|
|
DataType = datString
|
|
Size = 15
|
|
DisplayLabel = 'Cod. entidad'
|
|
end
|
|
item
|
|
Name = 'RemesasCliente_SUCURSAL'
|
|
DataType = datString
|
|
Size = 15
|
|
DisplayLabel = 'Cod. sucursal'
|
|
end
|
|
item
|
|
Name = 'RemesasCliente_DC'
|
|
DataType = datString
|
|
Size = 15
|
|
DisplayLabel = 'DC'
|
|
end
|
|
item
|
|
Name = 'RemesasCliente_CUENTA'
|
|
DataType = datString
|
|
Size = 15
|
|
DisplayLabel = 'Cuenta'
|
|
end
|
|
item
|
|
Name = 'RemesasCliente_SUFIJO_N19'
|
|
DataType = datString
|
|
Size = 3
|
|
DisplayLabel = 'Sufijo N19'
|
|
end
|
|
item
|
|
Name = 'RemesasCliente_SUFIJO_N58'
|
|
DataType = datString
|
|
Size = 3
|
|
DisplayLabel = 'Sufijo N58'
|
|
end
|
|
item
|
|
Name = 'RemesasCliente_Refresh_REFERENCIA'
|
|
DataType = datString
|
|
Size = 255
|
|
DisplayLabel = 'REFERENCIA'
|
|
ServerAutoRefresh = True
|
|
end
|
|
item
|
|
Name = 'RemesasCliente_REFERENCIA'
|
|
DataType = datString
|
|
Size = 255
|
|
DisplayLabel = 'REFERENCIA'
|
|
ServerAutoRefresh = True
|
|
end
|
|
item
|
|
Name = 'RemesasCliente_TIPO'
|
|
DataType = datString
|
|
Size = 40
|
|
DisplayLabel = 'Forma de cobro'
|
|
end
|
|
item
|
|
Name = 'RemesasCliente_IMPORTE_TOTAL'
|
|
DataType = datFloat
|
|
DisplayLabel = 'Importe total'
|
|
Alignment = taRightJustify
|
|
ServerAutoRefresh = True
|
|
end>
|
|
Left = 150
|
|
Top = 22
|
|
end
|
|
object schRemesasCliente: TDASchema
|
|
ConnectionManager = dmServer.ConnectionManager
|
|
DataDictionary = DataDictionary
|
|
Diagrams = Diagrams
|
|
Datasets = <
|
|
item
|
|
Params = <
|
|
item
|
|
Name = 'CODIGO'
|
|
DataType = datString
|
|
Size = 50
|
|
Value = 'REF_REMESAS_CLIENTE'
|
|
ParamType = daptInput
|
|
end
|
|
item
|
|
Name = 'EMPRESA'
|
|
Value = '1'
|
|
ParamType = daptInput
|
|
end>
|
|
Statements = <
|
|
item
|
|
Connection = 'IBX'
|
|
TargetTable = 'REFERENCIAS'
|
|
SQL =
|
|
'SELECT VALOR'#10'FROM REFERENCIAS'#10'WHERE CODIGO = :CODIGO'#10'AND ID_EMPR' +
|
|
'ESA = :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'
|
|
TargetTable = 'V_REMESAS_CLIENTE'
|
|
SQL =
|
|
'SELECT'#10' ID,'#10' ID_EMPRESA,'#10' REFERENCIA,'#10' TIPO,'#10' FECHA_REMESA,' +
|
|
#10' DESCRIPCION,'#10' ID_DATOS_BANCO,'#10' FECHA_ALTA,'#10' FECHA_MODIFICA' +
|
|
'CION,'#10' USUARIO,'#10' NOMBRE,'#10' ENTIDAD,'#10' SUCURSAL,'#10' DC,'#10' CUENTA' +
|
|
','#10' SUFIJO_N19,'#10' SUFIJO_N58,'#10' IMPORTE_TOTAL'#10'FROM'#10' V_REMESAS_C' +
|
|
'LIENTE'
|
|
StatementType = stSQL
|
|
ColumnMappings = <
|
|
item
|
|
DatasetField = 'ID'
|
|
TableField = 'ID'
|
|
end
|
|
item
|
|
DatasetField = 'ID_EMPRESA'
|
|
TableField = 'ID_EMPRESA'
|
|
end
|
|
item
|
|
DatasetField = 'REFERENCIA'
|
|
TableField = 'REFERENCIA'
|
|
end
|
|
item
|
|
DatasetField = 'FECHA_REMESA'
|
|
TableField = 'FECHA_REMESA'
|
|
end
|
|
item
|
|
DatasetField = 'DESCRIPCION'
|
|
TableField = 'DESCRIPCION'
|
|
end
|
|
item
|
|
DatasetField = 'USUARIO'
|
|
TableField = 'USUARIO'
|
|
end
|
|
item
|
|
DatasetField = 'ID_DATOS_BANCO'
|
|
TableField = 'ID_DATOS_BANCO'
|
|
end
|
|
item
|
|
DatasetField = 'FECHA_ALTA'
|
|
TableField = 'FECHA_ALTA'
|
|
end
|
|
item
|
|
DatasetField = 'FECHA_MODIFICACION'
|
|
TableField = 'FECHA_MODIFICACION'
|
|
end
|
|
item
|
|
DatasetField = 'IMPORTE_TOTAL'
|
|
TableField = 'IMPORTE_TOTAL'
|
|
end
|
|
item
|
|
DatasetField = 'NOMBRE'
|
|
TableField = 'NOMBRE'
|
|
end
|
|
item
|
|
DatasetField = 'ENTIDAD'
|
|
TableField = 'ENTIDAD'
|
|
end
|
|
item
|
|
DatasetField = 'SUCURSAL'
|
|
TableField = 'SUCURSAL'
|
|
end
|
|
item
|
|
DatasetField = 'DC'
|
|
TableField = 'DC'
|
|
end
|
|
item
|
|
DatasetField = 'CUENTA'
|
|
TableField = 'CUENTA'
|
|
end
|
|
item
|
|
DatasetField = 'SUFIJO_N19'
|
|
TableField = 'SUFIJO_N19'
|
|
end
|
|
item
|
|
DatasetField = 'SUFIJO_N58'
|
|
TableField = 'SUFIJO_N58'
|
|
end
|
|
item
|
|
DatasetField = 'TIPO'
|
|
TableField = 'TIPO'
|
|
end>
|
|
end>
|
|
Name = 'RemesasCliente'
|
|
Fields = <
|
|
item
|
|
Name = 'ID'
|
|
DataType = datAutoInc
|
|
DictionaryEntry = 'RemesasCliente_ID'
|
|
InPrimaryKey = True
|
|
end
|
|
item
|
|
Name = 'ID_EMPRESA'
|
|
DataType = datInteger
|
|
DictionaryEntry = 'RemesasCliente_ID_EMPRESA'
|
|
end
|
|
item
|
|
Name = 'REFERENCIA'
|
|
DataType = datString
|
|
Size = 255
|
|
DictionaryEntry = 'RemesasCliente_REFERENCIA'
|
|
end
|
|
item
|
|
Name = 'TIPO'
|
|
DataType = datString
|
|
Size = 40
|
|
DictionaryEntry = 'RemesasCliente_TIPO'
|
|
end
|
|
item
|
|
Name = 'FECHA_REMESA'
|
|
DataType = datDateTime
|
|
DictionaryEntry = 'RemesasCliente_FECHA_REMESA'
|
|
end
|
|
item
|
|
Name = 'DESCRIPCION'
|
|
DataType = datString
|
|
Size = 255
|
|
DictionaryEntry = 'RemesasCliente_DESCRIPCION'
|
|
end
|
|
item
|
|
Name = 'USUARIO'
|
|
DataType = datString
|
|
Size = 20
|
|
DictionaryEntry = 'RemesasCliente_USUARIO'
|
|
end
|
|
item
|
|
Name = 'ID_DATOS_BANCO'
|
|
DataType = datInteger
|
|
DictionaryEntry = 'RemesasCliente_ID_DATOS_BANCO'
|
|
end
|
|
item
|
|
Name = 'FECHA_ALTA'
|
|
DataType = datDateTime
|
|
DictionaryEntry = 'RemesasCliente_FECHA_ALTA'
|
|
end
|
|
item
|
|
Name = 'FECHA_MODIFICACION'
|
|
DataType = datDateTime
|
|
DictionaryEntry = 'RemesasCliente_FECHA_MODIFICACION'
|
|
end
|
|
item
|
|
Name = 'IMPORTE_TOTAL'
|
|
DataType = datFloat
|
|
DictionaryEntry = 'RemesasCliente_IMPORTE_TOTAL'
|
|
end
|
|
item
|
|
Name = 'NOMBRE'
|
|
DataType = datString
|
|
Size = 255
|
|
DictionaryEntry = 'RemesasCliente_NOMBRE'
|
|
end
|
|
item
|
|
Name = 'ENTIDAD'
|
|
DataType = datString
|
|
Size = 15
|
|
DictionaryEntry = 'RemesasCliente_ENTIDAD'
|
|
end
|
|
item
|
|
Name = 'SUCURSAL'
|
|
DataType = datString
|
|
Size = 15
|
|
DictionaryEntry = 'RemesasCliente_SUCURSAL'
|
|
end
|
|
item
|
|
Name = 'DC'
|
|
DataType = datString
|
|
Size = 15
|
|
DictionaryEntry = 'RemesasCliente_DC'
|
|
end
|
|
item
|
|
Name = 'CUENTA'
|
|
DataType = datString
|
|
Size = 15
|
|
DictionaryEntry = 'RemesasCliente_CUENTA'
|
|
end
|
|
item
|
|
Name = 'SUFIJO_N19'
|
|
DataType = datString
|
|
Size = 3
|
|
DictionaryEntry = 'RemesasCliente_SUFIJO_N19'
|
|
end
|
|
item
|
|
Name = 'SUFIJO_N58'
|
|
DataType = datString
|
|
Size = 3
|
|
DictionaryEntry = 'RemesasCliente_SUFIJO_N58'
|
|
end>
|
|
end
|
|
item
|
|
Params = <
|
|
item
|
|
Name = 'ID'
|
|
DataType = datInteger
|
|
Value = '22'
|
|
ParamType = daptInput
|
|
end>
|
|
Statements = <
|
|
item
|
|
Connection = 'IBX'
|
|
TargetTable = 'V_REMESAS_CLIENTE'
|
|
SQL =
|
|
'SELECT'#10' ID,'#10' ID_EMPRESA,'#10' REFERENCIA,'#10' TIPO,'#10' FECHA_REMESA,' +
|
|
#10' DESCRIPCION,'#10' ID_DATOS_BANCO,'#10' FECHA_ALTA,'#10' FECHA_MODIFICA' +
|
|
'CION,'#10' USUARIO,'#10' NOMBRE,'#10' ENTIDAD,'#10' SUCURSAL,'#10' DC,'#10' CUENTA' +
|
|
','#10' SUFIJO_N19,'#10' SUFIJO_N58,'#10' IMPORTE_TOTAL'#10'FROM'#10' V_REMESAS_C' +
|
|
'LIENTE'#10'WHERE ID = :ID'
|
|
StatementType = stSQL
|
|
ColumnMappings = <
|
|
item
|
|
DatasetField = 'ID'
|
|
TableField = 'ID'
|
|
end
|
|
item
|
|
DatasetField = 'REFERENCIA'
|
|
TableField = 'REFERENCIA'
|
|
end
|
|
item
|
|
DatasetField = 'FECHA_REMESA'
|
|
TableField = 'FECHA_REMESA'
|
|
end
|
|
item
|
|
DatasetField = 'DESCRIPCION'
|
|
TableField = 'DESCRIPCION'
|
|
end
|
|
item
|
|
DatasetField = 'USUARIO'
|
|
TableField = 'USUARIO'
|
|
end
|
|
item
|
|
DatasetField = 'ID_EMPRESA'
|
|
TableField = 'ID_EMPRESA'
|
|
SQLOrigin = 'REMESAS_CLIENTE.ID_EMPRESA'
|
|
end
|
|
item
|
|
DatasetField = 'IMPORTE_TOTAL'
|
|
TableField = 'IMPORTE_TOTAL'
|
|
end
|
|
item
|
|
DatasetField = 'ID_DATOS_BANCO'
|
|
TableField = 'ID_DATOS_BANCO'
|
|
end
|
|
item
|
|
DatasetField = 'FECHA_ALTA'
|
|
TableField = 'FECHA_ALTA'
|
|
end
|
|
item
|
|
DatasetField = 'FECHA_MODIFICACION'
|
|
TableField = 'FECHA_MODIFICACION'
|
|
end
|
|
item
|
|
DatasetField = 'NOMBRE'
|
|
TableField = 'NOMBRE'
|
|
end
|
|
item
|
|
DatasetField = 'ENTIDAD'
|
|
TableField = 'ENTIDAD'
|
|
end
|
|
item
|
|
DatasetField = 'SUCURSAL'
|
|
TableField = 'SUCURSAL'
|
|
end
|
|
item
|
|
DatasetField = 'DC'
|
|
TableField = 'DC'
|
|
end
|
|
item
|
|
DatasetField = 'CUENTA'
|
|
TableField = 'CUENTA'
|
|
end
|
|
item
|
|
DatasetField = 'SUFIJO_N19'
|
|
TableField = 'SUFIJO_N19'
|
|
end
|
|
item
|
|
DatasetField = 'SUFIJO_N58'
|
|
TableField = 'SUFIJO_N58'
|
|
end
|
|
item
|
|
DatasetField = 'TIPO'
|
|
TableField = 'TIPO'
|
|
end>
|
|
end>
|
|
Name = 'RemesasCliente_Refresh'
|
|
Fields = <
|
|
item
|
|
Name = 'ID'
|
|
DataType = datAutoInc
|
|
DictionaryEntry = 'RemesasCliente_ID'
|
|
InPrimaryKey = True
|
|
end
|
|
item
|
|
Name = 'ID_EMPRESA'
|
|
DataType = datInteger
|
|
DictionaryEntry = 'RemesasCliente_ID_EMPRESA'
|
|
end
|
|
item
|
|
Name = 'REFERENCIA'
|
|
DataType = datString
|
|
Size = 255
|
|
ServerAutoRefresh = True
|
|
end
|
|
item
|
|
Name = 'TIPO'
|
|
DataType = datString
|
|
Size = 40
|
|
DictionaryEntry = 'RemesasCliente_TIPO'
|
|
end
|
|
item
|
|
Name = 'FECHA_REMESA'
|
|
DataType = datDateTime
|
|
DictionaryEntry = 'RemesasCliente_FECHA_REMESA'
|
|
end
|
|
item
|
|
Name = 'DESCRIPCION'
|
|
DataType = datString
|
|
Size = 255
|
|
DictionaryEntry = 'RemesasCliente_DESCRIPCION'
|
|
end
|
|
item
|
|
Name = 'USUARIO'
|
|
DataType = datString
|
|
Size = 20
|
|
DictionaryEntry = 'RemesasCliente_USUARIO'
|
|
end
|
|
item
|
|
Name = 'ID_DATOS_BANCO'
|
|
DataType = datInteger
|
|
DictionaryEntry = 'RemesasCliente_ID_DATOS_BANCO'
|
|
end
|
|
item
|
|
Name = 'FECHA_ALTA'
|
|
DataType = datDateTime
|
|
DictionaryEntry = 'RemesasCliente_FECHA_ALTA'
|
|
end
|
|
item
|
|
Name = 'FECHA_MODIFICACION'
|
|
DataType = datDateTime
|
|
DictionaryEntry = 'RemesasCliente_FECHA_MODIFICACION'
|
|
end
|
|
item
|
|
Name = 'IMPORTE_TOTAL'
|
|
DataType = datFloat
|
|
DisplayLabel = 'Importe total'
|
|
Alignment = taRightJustify
|
|
ServerAutoRefresh = True
|
|
end
|
|
item
|
|
Name = 'NOMBRE'
|
|
DataType = datString
|
|
Size = 255
|
|
DictionaryEntry = 'RemesasCliente_NOMBRE'
|
|
end
|
|
item
|
|
Name = 'ENTIDAD'
|
|
DataType = datString
|
|
Size = 15
|
|
DictionaryEntry = 'RemesasCliente_ENTIDAD'
|
|
end
|
|
item
|
|
Name = 'SUCURSAL'
|
|
DataType = datString
|
|
Size = 15
|
|
DictionaryEntry = 'RemesasCliente_SUCURSAL'
|
|
end
|
|
item
|
|
Name = 'DC'
|
|
DataType = datString
|
|
Size = 15
|
|
DictionaryEntry = 'RemesasCliente_DC'
|
|
end
|
|
item
|
|
Name = 'CUENTA'
|
|
DataType = datString
|
|
Size = 15
|
|
DictionaryEntry = 'RemesasCliente_CUENTA'
|
|
end
|
|
item
|
|
Name = 'SUFIJO_N19'
|
|
DataType = datString
|
|
Size = 3
|
|
DictionaryEntry = 'RemesasCliente_SUFIJO_N19'
|
|
end
|
|
item
|
|
Name = 'SUFIJO_N58'
|
|
DataType = datString
|
|
Size = 3
|
|
DictionaryEntry = 'RemesasCliente_SUFIJO_N58'
|
|
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 = datInteger
|
|
Value = ''
|
|
ParamType = daptInput
|
|
end
|
|
item
|
|
Name = 'REFERENCIA'
|
|
DataType = datString
|
|
Size = 255
|
|
Value = ''
|
|
ParamType = daptInput
|
|
end
|
|
item
|
|
Name = 'TIPO'
|
|
DataType = datString
|
|
Size = 40
|
|
Value = ''
|
|
ParamType = daptInput
|
|
end
|
|
item
|
|
Name = 'FECHA_REMESA'
|
|
DataType = datDateTime
|
|
Value = ''
|
|
ParamType = daptInput
|
|
end
|
|
item
|
|
Name = 'DESCRIPCION'
|
|
DataType = datString
|
|
Size = 255
|
|
Value = ''
|
|
ParamType = daptInput
|
|
end
|
|
item
|
|
Name = 'USUARIO'
|
|
DataType = datString
|
|
Size = 20
|
|
Value = ''
|
|
ParamType = daptInput
|
|
end
|
|
item
|
|
Name = 'ID_EMPRESA'
|
|
DataType = datInteger
|
|
Value = ''
|
|
ParamType = daptInput
|
|
end
|
|
item
|
|
Name = 'ID_DATOS_BANCO'
|
|
DataType = datInteger
|
|
Value = ''
|
|
ParamType = daptInput
|
|
end
|
|
item
|
|
Name = 'FECHA_ALTA'
|
|
DataType = datDateTime
|
|
Value = ''
|
|
ParamType = daptInput
|
|
end
|
|
item
|
|
Name = 'FECHA_MODIFICACION'
|
|
DataType = datDateTime
|
|
Value = ''
|
|
ParamType = daptInput
|
|
end>
|
|
Statements = <
|
|
item
|
|
Connection = 'IBX'
|
|
TargetTable = 'REMESAS_CLIENTE'
|
|
SQL =
|
|
'INSERT'#10' INTO REMESAS_CLIENTE'#10' (ID, REFERENCIA, TIPO, FECHA_R' +
|
|
'EMESA, DESCRIPCION, USUARIO, ID_EMPRESA,'#10' ID_DATOS_BANCO, FE' +
|
|
'CHA_ALTA, FECHA_MODIFICACION)'#10' VALUES'#10' (:ID, :REFERENCIA, :T' +
|
|
'IPO, :FECHA_REMESA, :DESCRIPCION, :USUARIO,'#10' :ID_EMPRESA, :I' +
|
|
'D_DATOS_BANCO, :FECHA_ALTA,'#10' :FECHA_MODIFICACION)'
|
|
StatementType = stSQL
|
|
ColumnMappings = <>
|
|
end>
|
|
Name = 'Insert_RemesasCliente'
|
|
end
|
|
item
|
|
Params = <
|
|
item
|
|
Name = 'OLD_ID'
|
|
DataType = datInteger
|
|
Value = ''
|
|
ParamType = daptInput
|
|
end>
|
|
Statements = <
|
|
item
|
|
Connection = 'IBX'
|
|
TargetTable = 'REMESAS_CLIENTE'
|
|
SQL = 'DELETE '#10' FROM'#10' REMESAS_CLIENTE'#10' WHERE'#10' (ID = :OLD_ID)'
|
|
StatementType = stSQL
|
|
ColumnMappings = <>
|
|
end>
|
|
Name = 'Delete_RemesasCliente'
|
|
end
|
|
item
|
|
Params = <
|
|
item
|
|
Name = 'REFERENCIA'
|
|
DataType = datString
|
|
Size = 255
|
|
Value = ''
|
|
ParamType = daptInput
|
|
end
|
|
item
|
|
Name = 'TIPO'
|
|
DataType = datString
|
|
Size = 40
|
|
Value = ''
|
|
ParamType = daptInput
|
|
end
|
|
item
|
|
Name = 'FECHA_REMESA'
|
|
DataType = datDateTime
|
|
Value = ''
|
|
ParamType = daptInput
|
|
end
|
|
item
|
|
Name = 'DESCRIPCION'
|
|
DataType = datString
|
|
Size = 255
|
|
Value = ''
|
|
ParamType = daptInput
|
|
end
|
|
item
|
|
Name = 'USUARIO'
|
|
DataType = datString
|
|
Size = 20
|
|
Value = ''
|
|
ParamType = daptInput
|
|
end
|
|
item
|
|
Name = 'ID_EMPRESA'
|
|
DataType = datInteger
|
|
Value = ''
|
|
ParamType = daptInput
|
|
end
|
|
item
|
|
Name = 'ID_DATOS_BANCO'
|
|
DataType = datInteger
|
|
Value = ''
|
|
ParamType = daptInput
|
|
end
|
|
item
|
|
Name = 'FECHA_ALTA'
|
|
DataType = datDateTime
|
|
Value = ''
|
|
ParamType = daptInput
|
|
end
|
|
item
|
|
Name = 'FECHA_MODIFICACION'
|
|
DataType = datDateTime
|
|
Value = ''
|
|
ParamType = daptInput
|
|
end
|
|
item
|
|
Name = 'OLD_ID'
|
|
DataType = datInteger
|
|
Value = ''
|
|
ParamType = daptInput
|
|
end>
|
|
Statements = <
|
|
item
|
|
Connection = 'IBX'
|
|
TargetTable = 'REMESAS_CLIENTE'
|
|
SQL =
|
|
'UPDATE REMESAS_CLIENTE'#10' SET '#10' REFERENCIA = :REFERENCIA, '#10' ' +
|
|
' TIPO = :TIPO,'#10' FECHA_REMESA = :FECHA_REMESA, '#10' DESCRIPCIO' +
|
|
'N = :DESCRIPCION, '#10' USUARIO = :USUARIO, '#10' ID_EMPRESA = :ID' +
|
|
'_EMPRESA, '#10' ID_DATOS_BANCO = :ID_DATOS_BANCO,'#10' FECHA_ALTA ' +
|
|
'= :FECHA_ALTA, '#10' FECHA_MODIFICACION = :FECHA_MODIFICACION'#10' W' +
|
|
'HERE'#10' (ID = :OLD_ID)'
|
|
StatementType = stSQL
|
|
ColumnMappings = <>
|
|
end>
|
|
Name = 'Update_RemesasCliente'
|
|
end>
|
|
RelationShips = <>
|
|
UpdateRules = <>
|
|
Version = 0
|
|
Left = 48
|
|
Top = 24
|
|
end
|
|
object DABINAdapter: TDABINAdapter
|
|
Left = 48
|
|
Top = 72
|
|
end
|
|
object bpRemesasCliente: TDABusinessProcessor
|
|
Schema = schRemesasCliente
|
|
InsertCommandName = 'Insert_RemesasCliente'
|
|
DeleteCommandName = 'Delete_RemesasCliente'
|
|
UpdateCommandName = 'Update_RemesasCliente'
|
|
RefreshDatasetName = 'RemesasCliente_Refresh'
|
|
ReferencedDataset = 'RemesasCliente'
|
|
ProcessorOptions = [poPrepareCommands]
|
|
UpdateMode = updWhereKeyOnly
|
|
Left = 248
|
|
Top = 24
|
|
end
|
|
end
|