Varela_PuntosVenta/Source/Modulos/Devoluciones/Servidor/srvDevoluciones_Impl.dfm

1506 lines
45 KiB
Plaintext

object srvDevoluciones: TsrvDevoluciones
OldCreateOrder = True
SessionManager = dmServer.SessionManager
AcquireConnection = True
ServiceSchema = schDevoluciones
ServiceAdapter = DABINAdapter
OnAfterProcessTransactionAction = pptaNone
ExportedDataTables = <>
CacheElements = <>
Options = [rsoProcessDeltasWithoutUpdateRules]
Height = 300
Width = 300
object schDevoluciones: TDASchema
ConnectionManager = dmServer.ConnectionManager
DataDictionary = DADataDictionary1
Diagrams = dmServer.DADiagrams
Datasets = <
item
Params = <>
Statements = <
item
Connection = 'GFT_VARELA'
TargetTable = 'RDX_V_CONTROL_DEVOLUCIONES'
SQL = 'SELECT '#10' *'#10' FROM'#10' RDX_V_CONTROL_DEVOLUCIONES'
StatementType = stSQL
ColumnMappings = <
item
DatasetField = 'CENTRO'
TableField = 'CENTRO'
end
item
DatasetField = 'FILIAL'
TableField = 'FILIAL'
end
item
DatasetField = 'CODIGO'
TableField = 'CODIGO'
end
item
DatasetField = 'PRODUCTO'
TableField = 'PRODUCTO'
end
item
DatasetField = 'COLOR'
TableField = 'COLOR'
end
item
DatasetField = 'FECHA'
TableField = 'FECHA'
end
item
DatasetField = 'E38'
TableField = 'E38'
end
item
DatasetField = 'E40'
TableField = 'E40'
end
item
DatasetField = 'E42'
TableField = 'E42'
end
item
DatasetField = 'E44'
TableField = 'E44'
end
item
DatasetField = 'E46'
TableField = 'E46'
end
item
DatasetField = 'E48'
TableField = 'E48'
end
item
DatasetField = 'ENVIADO'
TableField = 'ENVIADO'
end
item
DatasetField = 'DIFERENCIA'
TableField = 'DIFERENCIA'
end
item
DatasetField = 'APROBADO'
TableField = 'APROBADO'
end
item
DatasetField = 'FECHACAMBIO'
TableField = 'FECHACAMBIO'
end
item
DatasetField = 'NUMHOJA'
TableField = 'NUMHOJA'
end
item
DatasetField = 'ESTADO_HOJA'
TableField = 'ESTADO_HOJA'
end
item
DatasetField = 'OBSERVACIONES_HOJA'
TableField = 'OBSERVACIONES_HOJA'
end
item
DatasetField = 'CONTABILIZAR_HOJA'
TableField = 'CONTABILIZAR_HOJA'
end
item
DatasetField = 'S38'
TableField = 'S38'
end
item
DatasetField = 'S40'
TableField = 'S40'
end
item
DatasetField = 'S42'
TableField = 'S42'
end
item
DatasetField = 'S44'
TableField = 'S44'
end
item
DatasetField = 'S46'
TableField = 'S46'
end
item
DatasetField = 'S48'
TableField = 'S48'
end
item
DatasetField = 'SOLICITADO'
TableField = 'SOLICITADO'
end
item
DatasetField = 'ER38'
TableField = 'ER38'
end
item
DatasetField = 'ER40'
TableField = 'ER40'
end
item
DatasetField = 'ER42'
TableField = 'ER42'
end
item
DatasetField = 'ER44'
TableField = 'ER44'
end
item
DatasetField = 'ER46'
TableField = 'ER46'
end
item
DatasetField = 'ER48'
TableField = 'ER48'
end
item
DatasetField = 'ENVIADO_RECT'
TableField = 'ENVIADO_RECT'
end>
end>
Name = 'Devoluciones'
Fields = <
item
Name = 'APROBADO'
DataType = datString
Size = 1
DictionaryEntry = 'Devoluciones_APROBADO'
end
item
Name = 'FECHACAMBIO'
DataType = datDateTime
DictionaryEntry = 'Devoluciones_FECHACAMBIO'
end
item
Name = 'CENTRO'
DataType = datString
Size = 17
DictionaryEntry = 'Devoluciones_CENTRO'
InPrimaryKey = True
end
item
Name = 'FILIAL'
DataType = datString
Size = 25
DictionaryEntry = 'Devoluciones_FILIAL'
end
item
Name = 'CODIGO'
DataType = datString
Size = 12
DictionaryEntry = 'Devoluciones_CODIGO'
InPrimaryKey = True
end
item
Name = 'PRODUCTO'
DataType = datString
Size = 40
DictionaryEntry = 'Devoluciones_PRODUCTO'
end
item
Name = 'COLOR'
DataType = datString
Size = 10
DictionaryEntry = 'Devoluciones_COLOR'
InPrimaryKey = True
end
item
Name = 'FECHA'
DataType = datDateTime
DictionaryEntry = 'Devoluciones_FECHA'
InPrimaryKey = True
end
item
Name = 'NUMHOJA'
DataType = datString
Size = 8
DictionaryEntry = 'Devoluciones_NUMHOJA'
end
item
Name = 'ESTADO_HOJA'
DataType = datString
Size = 20
DictionaryEntry = 'Devoluciones_ESTADO_HOJA'
end
item
Name = 'OBSERVACIONES_HOJA'
DataType = datString
Size = 255
DictionaryEntry = 'Devoluciones_OBSERVACIONES_HOJA'
end
item
Name = 'CONTABILIZAR_HOJA'
DataType = datString
Size = 1
DictionaryEntry = 'Devoluciones_CONTABILIZAR_HOJA'
end
item
Name = 'S38'
DataType = datInteger
DictionaryEntry = 'Devoluciones_S38'
end
item
Name = 'S40'
DataType = datInteger
DictionaryEntry = 'Devoluciones_S40'
end
item
Name = 'S42'
DataType = datInteger
DictionaryEntry = 'Devoluciones_S42'
end
item
Name = 'S44'
DataType = datInteger
DictionaryEntry = 'Devoluciones_S44'
end
item
Name = 'S46'
DataType = datInteger
DictionaryEntry = 'Devoluciones_S46'
end
item
Name = 'S48'
DataType = datInteger
DictionaryEntry = 'Devoluciones_S48'
end
item
Name = 'SOLICITADO'
DataType = datInteger
DictionaryEntry = 'Devoluciones_SOLICITADO'
end
item
Name = 'E38'
DataType = datFloat
DictionaryEntry = 'Devoluciones_E38'
end
item
Name = 'E40'
DataType = datFloat
DictionaryEntry = 'Devoluciones_E40'
end
item
Name = 'E42'
DataType = datFloat
DictionaryEntry = 'Devoluciones_E42'
end
item
Name = 'E44'
DataType = datFloat
DictionaryEntry = 'Devoluciones_E44'
end
item
Name = 'E46'
DataType = datFloat
DictionaryEntry = 'Devoluciones_E46'
end
item
Name = 'E48'
DataType = datFloat
DictionaryEntry = 'Devoluciones_E48'
end
item
Name = 'ENVIADO'
DataType = datFloat
DictionaryEntry = 'Devoluciones_ENVIADO'
end
item
Name = 'ER38'
DataType = datFloat
DictionaryEntry = 'Devoluciones_ER38'
end
item
Name = 'ER40'
DataType = datFloat
DictionaryEntry = 'Devoluciones_ER40'
end
item
Name = 'ER42'
DataType = datFloat
DictionaryEntry = 'Devoluciones_ER42'
end
item
Name = 'ER44'
DataType = datFloat
DictionaryEntry = 'Devoluciones_ER44'
end
item
Name = 'ER46'
DataType = datFloat
DictionaryEntry = 'Devoluciones_ER46'
end
item
Name = 'ER48'
DataType = datFloat
DictionaryEntry = 'Devoluciones_ER48'
end
item
Name = 'ENVIADO_RECT'
DataType = datFloat
DictionaryEntry = 'Devoluciones_ENVIADO_RECT'
end
item
Name = 'DIFERENCIA'
DataType = datFloat
DictionaryEntry = 'Devoluciones_DIFERENCIA'
end>
end
item
Params = <>
Statements = <
item
Connection = 'GFT_VARELA'
TargetTable = 'RDX_V_CONTROL_DEVOLUCIONES'
SQL =
'SELECT '#10' *'#10'FROM RDX_V_CONTROL_DEVOLUCIONES'#10'WHERE (APROBADO' +
' = '#39'N'#39')'
StatementType = stSQL
ColumnMappings = <
item
DatasetField = 'APROBADO'
TableField = 'APROBADO'
end
item
DatasetField = 'CENTRO'
TableField = 'CENTRO'
end
item
DatasetField = 'FILIAL'
TableField = 'FILIAL'
end
item
DatasetField = 'CODIGO'
TableField = 'CODIGO'
end
item
DatasetField = 'PRODUCTO'
TableField = 'PRODUCTO'
end
item
DatasetField = 'COLOR'
TableField = 'COLOR'
end
item
DatasetField = 'FECHA'
TableField = 'FECHA'
end
item
DatasetField = 'E38'
TableField = 'E38'
end
item
DatasetField = 'E40'
TableField = 'E40'
end
item
DatasetField = 'E42'
TableField = 'E42'
end
item
DatasetField = 'E44'
TableField = 'E44'
end
item
DatasetField = 'E46'
TableField = 'E46'
end
item
DatasetField = 'E48'
TableField = 'E48'
end
item
DatasetField = 'ENVIADO'
TableField = 'ENVIADO'
end
item
DatasetField = 'DIFERENCIA'
TableField = 'DIFERENCIA'
end
item
DatasetField = 'FECHACAMBIO'
TableField = 'FECHACAMBIO'
end
item
DatasetField = 'NUMHOJA'
TableField = 'NUMHOJA'
end
item
DatasetField = 'ESTADO_HOJA'
TableField = 'ESTADO_HOJA'
end
item
DatasetField = 'OBSERVACIONES_HOJA'
TableField = 'OBSERVACIONES_HOJA'
end
item
DatasetField = 'CONTABILIZAR_HOJA'
TableField = 'CONTABILIZAR_HOJA'
end
item
DatasetField = 'S38'
TableField = 'S38'
end
item
DatasetField = 'S40'
TableField = 'S40'
end
item
DatasetField = 'S42'
TableField = 'S42'
end
item
DatasetField = 'S44'
TableField = 'S44'
end
item
DatasetField = 'S46'
TableField = 'S46'
end
item
DatasetField = 'S48'
TableField = 'S48'
end
item
DatasetField = 'SOLICITADO'
TableField = 'SOLICITADO'
end
item
DatasetField = 'ER38'
TableField = 'ER38'
end
item
DatasetField = 'ER40'
TableField = 'ER40'
end
item
DatasetField = 'ER42'
TableField = 'ER42'
end
item
DatasetField = 'ER44'
TableField = 'ER44'
end
item
DatasetField = 'ER46'
TableField = 'ER46'
end
item
DatasetField = 'ER48'
TableField = 'ER48'
end
item
DatasetField = 'ENVIADO_RECT'
TableField = 'ENVIADO_RECT'
end>
end>
Name = 'DevolucionesPendientes'
Fields = <
item
Name = 'APROBADO'
DataType = datString
Size = 1
DictionaryEntry = 'Devoluciones_APROBADO'
end
item
Name = 'FECHACAMBIO'
DataType = datDateTime
DictionaryEntry = 'Devoluciones_FECHACAMBIO'
end
item
Name = 'CENTRO'
DataType = datString
Size = 17
DictionaryEntry = 'Devoluciones_CENTRO'
InPrimaryKey = True
end
item
Name = 'FILIAL'
DataType = datString
Size = 25
DictionaryEntry = 'Devoluciones_FILIAL'
end
item
Name = 'CODIGO'
DataType = datString
Size = 12
DictionaryEntry = 'Devoluciones_CODIGO'
InPrimaryKey = True
end
item
Name = 'PRODUCTO'
DataType = datString
Size = 40
DictionaryEntry = 'Devoluciones_PRODUCTO'
end
item
Name = 'COLOR'
DataType = datString
Size = 10
DictionaryEntry = 'Devoluciones_COLOR'
InPrimaryKey = True
end
item
Name = 'FECHA'
DataType = datDateTime
DictionaryEntry = 'Devoluciones_FECHA'
InPrimaryKey = True
end
item
Name = 'NUMHOJA'
DataType = datString
Size = 8
DictionaryEntry = 'Devoluciones_NUMHOJA'
end
item
Name = 'ESTADO_HOJA'
DataType = datString
Size = 20
DictionaryEntry = 'Devoluciones_ESTADO_HOJA'
end
item
Name = 'OBSERVACIONES_HOJA'
DataType = datString
Size = 255
DictionaryEntry = 'Devoluciones_OBSERVACIONES_HOJA'
end
item
Name = 'CONTABILIZAR_HOJA'
DataType = datString
Size = 1
DictionaryEntry = 'Devoluciones_CONTABILIZAR_HOJA'
end
item
Name = 'S38'
DataType = datInteger
DictionaryEntry = 'Devoluciones_S38'
end
item
Name = 'S40'
DataType = datInteger
DictionaryEntry = 'Devoluciones_S40'
end
item
Name = 'S42'
DataType = datInteger
DictionaryEntry = 'Devoluciones_S42'
end
item
Name = 'S44'
DataType = datInteger
DictionaryEntry = 'Devoluciones_S44'
end
item
Name = 'S46'
DataType = datInteger
DictionaryEntry = 'Devoluciones_S46'
end
item
Name = 'S48'
DataType = datInteger
DictionaryEntry = 'Devoluciones_S48'
end
item
Name = 'SOLICITADO'
DataType = datInteger
DictionaryEntry = 'Devoluciones_SOLICITADO'
end
item
Name = 'E38'
DataType = datFloat
DictionaryEntry = 'Devoluciones_E38'
end
item
Name = 'E40'
DataType = datFloat
DictionaryEntry = 'Devoluciones_E40'
end
item
Name = 'E42'
DataType = datFloat
DictionaryEntry = 'Devoluciones_E42'
end
item
Name = 'E44'
DataType = datFloat
DictionaryEntry = 'Devoluciones_E44'
end
item
Name = 'E46'
DataType = datFloat
DictionaryEntry = 'Devoluciones_E46'
end
item
Name = 'E48'
DataType = datFloat
DictionaryEntry = 'Devoluciones_E48'
end
item
Name = 'ENVIADO'
DataType = datFloat
DictionaryEntry = 'Devoluciones_ENVIADO'
end
item
Name = 'ER38'
DataType = datFloat
DictionaryEntry = 'Devoluciones_ER38'
end
item
Name = 'ER40'
DataType = datFloat
DictionaryEntry = 'Devoluciones_ER40'
end
item
Name = 'ER42'
DataType = datFloat
DictionaryEntry = 'Devoluciones_ER42'
end
item
Name = 'ER44'
DataType = datFloat
DictionaryEntry = 'Devoluciones_ER44'
end
item
Name = 'ER46'
DataType = datFloat
DictionaryEntry = 'Devoluciones_ER46'
end
item
Name = 'ER48'
DataType = datFloat
DictionaryEntry = 'Devoluciones_ER48'
end
item
Name = 'ENVIADO_RECT'
DataType = datFloat
DictionaryEntry = 'Devoluciones_ENVIADO_RECT'
end
item
Name = 'DIFERENCIA'
DataType = datFloat
DictionaryEntry = 'Devoluciones_DIFERENCIA'
end>
end
item
Params = <>
Statements = <
item
Connection = 'GFT_VARELA'
TargetTable = 'RDX_V_CONTROL_DEVOLUCIONES'
SQL =
'SELECT '#10' *'#10' FROM'#10' RDX_V_CONTROL_DEVOLUCIONES'#10'WHERE (APROB' +
'ADO = '#39'S'#39')'
StatementType = stSQL
ColumnMappings = <
item
DatasetField = 'CENTRO'
TableField = 'CENTRO'
end
item
DatasetField = 'FILIAL'
TableField = 'FILIAL'
end
item
DatasetField = 'CODIGO'
TableField = 'CODIGO'
end
item
DatasetField = 'PRODUCTO'
TableField = 'PRODUCTO'
end
item
DatasetField = 'COLOR'
TableField = 'COLOR'
end
item
DatasetField = 'FECHA'
TableField = 'FECHA'
end
item
DatasetField = 'E38'
TableField = 'E38'
end
item
DatasetField = 'E40'
TableField = 'E40'
end
item
DatasetField = 'E42'
TableField = 'E42'
end
item
DatasetField = 'E44'
TableField = 'E44'
end
item
DatasetField = 'E46'
TableField = 'E46'
end
item
DatasetField = 'E48'
TableField = 'E48'
end
item
DatasetField = 'ENVIADO'
TableField = 'ENVIADO'
end
item
DatasetField = 'DIFERENCIA'
TableField = 'DIFERENCIA'
end
item
DatasetField = 'FECHACAMBIO'
TableField = 'FECHACAMBIO'
end
item
DatasetField = 'APROBADO'
TableField = 'APROBADO'
end
item
DatasetField = 'NUMHOJA'
TableField = 'NUMHOJA'
end
item
DatasetField = 'ESTADO_HOJA'
TableField = 'ESTADO_HOJA'
end
item
DatasetField = 'OBSERVACIONES_HOJA'
TableField = 'OBSERVACIONES_HOJA'
end
item
DatasetField = 'CONTABILIZAR_HOJA'
TableField = 'CONTABILIZAR_HOJA'
end
item
DatasetField = 'S38'
TableField = 'S38'
end
item
DatasetField = 'S40'
TableField = 'S40'
end
item
DatasetField = 'S42'
TableField = 'S42'
end
item
DatasetField = 'S44'
TableField = 'S44'
end
item
DatasetField = 'S46'
TableField = 'S46'
end
item
DatasetField = 'S48'
TableField = 'S48'
end
item
DatasetField = 'SOLICITADO'
TableField = 'SOLICITADO'
end
item
DatasetField = 'ER38'
TableField = 'ER38'
end
item
DatasetField = 'ER40'
TableField = 'ER40'
end
item
DatasetField = 'ER42'
TableField = 'ER42'
end
item
DatasetField = 'ER44'
TableField = 'ER44'
end
item
DatasetField = 'ER46'
TableField = 'ER46'
end
item
DatasetField = 'ER48'
TableField = 'ER48'
end
item
DatasetField = 'ENVIADO_RECT'
TableField = 'ENVIADO_RECT'
end>
end>
Name = 'DevolucionesAprobadas'
Fields = <
item
Name = 'APROBADO'
DataType = datString
Size = 1
DictionaryEntry = 'Devoluciones_APROBADO'
end
item
Name = 'FECHACAMBIO'
DataType = datDateTime
DictionaryEntry = 'Devoluciones_FECHACAMBIO'
end
item
Name = 'CENTRO'
DataType = datString
Size = 17
DictionaryEntry = 'Devoluciones_CENTRO'
InPrimaryKey = True
end
item
Name = 'FILIAL'
DataType = datString
Size = 25
DictionaryEntry = 'Devoluciones_FILIAL'
end
item
Name = 'CODIGO'
DataType = datString
Size = 12
DictionaryEntry = 'Devoluciones_CODIGO'
InPrimaryKey = True
end
item
Name = 'PRODUCTO'
DataType = datString
Size = 40
DictionaryEntry = 'Devoluciones_PRODUCTO'
end
item
Name = 'COLOR'
DataType = datString
Size = 10
DictionaryEntry = 'Devoluciones_COLOR'
InPrimaryKey = True
end
item
Name = 'FECHA'
DataType = datDateTime
DictionaryEntry = 'Devoluciones_FECHA'
InPrimaryKey = True
end
item
Name = 'NUMHOJA'
DataType = datString
Size = 8
DictionaryEntry = 'Devoluciones_NUMHOJA'
end
item
Name = 'ESTADO_HOJA'
DataType = datString
Size = 20
DictionaryEntry = 'Devoluciones_ESTADO_HOJA'
end
item
Name = 'OBSERVACIONES_HOJA'
DataType = datString
Size = 255
DictionaryEntry = 'Devoluciones_OBSERVACIONES_HOJA'
end
item
Name = 'CONTABILIZAR_HOJA'
DataType = datString
Size = 1
DictionaryEntry = 'Devoluciones_CONTABILIZAR_HOJA'
end
item
Name = 'S38'
DataType = datInteger
DictionaryEntry = 'Devoluciones_S38'
end
item
Name = 'S40'
DataType = datInteger
DictionaryEntry = 'Devoluciones_S40'
end
item
Name = 'S42'
DataType = datInteger
DictionaryEntry = 'Devoluciones_S42'
end
item
Name = 'S44'
DataType = datInteger
DictionaryEntry = 'Devoluciones_S44'
end
item
Name = 'S46'
DataType = datInteger
DictionaryEntry = 'Devoluciones_S46'
end
item
Name = 'S48'
DataType = datInteger
DictionaryEntry = 'Devoluciones_S48'
end
item
Name = 'SOLICITADO'
DataType = datInteger
DictionaryEntry = 'Devoluciones_SOLICITADO'
end
item
Name = 'E38'
DataType = datFloat
DictionaryEntry = 'Devoluciones_E38'
end
item
Name = 'E40'
DataType = datFloat
DictionaryEntry = 'Devoluciones_E40'
end
item
Name = 'E42'
DataType = datFloat
DictionaryEntry = 'Devoluciones_E42'
end
item
Name = 'E44'
DataType = datFloat
DictionaryEntry = 'Devoluciones_E44'
end
item
Name = 'E46'
DataType = datFloat
DictionaryEntry = 'Devoluciones_E46'
end
item
Name = 'E48'
DataType = datFloat
DictionaryEntry = 'Devoluciones_E48'
end
item
Name = 'ENVIADO'
DataType = datFloat
DictionaryEntry = 'Devoluciones_ENVIADO'
end
item
Name = 'ER38'
DataType = datFloat
DictionaryEntry = 'Devoluciones_ER38'
end
item
Name = 'ER40'
DataType = datFloat
DictionaryEntry = 'Devoluciones_ER40'
end
item
Name = 'ER42'
DataType = datFloat
DictionaryEntry = 'Devoluciones_ER42'
end
item
Name = 'ER44'
DataType = datFloat
DictionaryEntry = 'Devoluciones_ER44'
end
item
Name = 'ER46'
DataType = datFloat
DictionaryEntry = 'Devoluciones_ER46'
end
item
Name = 'ER48'
DataType = datFloat
DictionaryEntry = 'Devoluciones_ER48'
end
item
Name = 'ENVIADO_RECT'
DataType = datFloat
DictionaryEntry = 'Devoluciones_ENVIADO_RECT'
end
item
Name = 'DIFERENCIA'
DataType = datFloat
DictionaryEntry = 'Devoluciones_DIFERENCIA'
end>
end
item
Params = <
item
Name = 'FECHA'
DataType = datDateTime
Value = ''
ParamType = daptInput
end
item
Name = 'CENTRO'
DataType = datString
Size = 17
Value = ''
ParamType = daptInput
end
item
Name = 'CODIGO'
DataType = datString
Size = 12
Value = ''
ParamType = daptInput
end
item
Name = 'COLOR'
DataType = datString
Size = 10
Value = ''
ParamType = daptInput
end>
Statements = <
item
Connection = 'GFT_VARELA'
TargetTable = 'RDX_V_CONTROL_DEVOLUCIONES'
SQL =
'SELECT '#10' ENVIADO_RECT, DIFERENCIA'#10' FROM'#10' RDX_V_CONTROL' +
'_DEVOLUCIONES'#10' WHERE'#10' FECHA = :FECHA AND'#10' CENTRO = ' +
':CENTRO AND'#10' CODIGO = :CODIGO AND'#10' COLOR = :COLOR'
StatementType = stSQL
ColumnMappings = <
item
DatasetField = 'DIFERENCIA'
TableField = 'DIFERENCIA'
end
item
DatasetField = 'ENVIADO_RECT'
TableField = 'ENVIADO_RECT'
end>
end>
Name = 'RefreshDevoluciones'
Fields = <
item
Name = 'ENVIADO_RECT'
DataType = datFloat
end
item
Name = 'DIFERENCIA'
DataType = datFloat
end>
end>
JoinDataTables = <>
UnionDataTables = <>
Commands = <
item
Params = <
item
Name = 'NUMHOJA'
DataType = datString
Size = 8
Value = ''
ParamType = daptInput
end
item
Name = 'ESTADO_HOJA'
DataType = datString
Size = 20
Value = ''
ParamType = daptInput
end
item
Name = 'OBSERVACIONES_HOJA'
DataType = datString
Size = 255
Value = ''
ParamType = daptInput
end
item
Name = 'CONTABILIZAR_HOJA'
DataType = datString
Size = 1
Value = ''
ParamType = daptInput
end
item
Name = 'ER38'
DataType = datFloat
Value = ''
ParamType = daptInput
end
item
Name = 'ER40'
DataType = datFloat
Value = ''
ParamType = daptInput
end
item
Name = 'ER42'
DataType = datFloat
Value = ''
ParamType = daptInput
end
item
Name = 'ER44'
DataType = datFloat
Value = ''
ParamType = daptInput
end
item
Name = 'ER46'
DataType = datFloat
Value = ''
ParamType = daptInput
end
item
Name = 'ER48'
DataType = datFloat
Value = ''
ParamType = daptInput
end
item
Name = 'APROBADO'
DataType = datString
Size = 1
Value = ''
ParamType = daptInput
end
item
Name = 'FECHA'
DataType = datDateTime
Value = ''
ParamType = daptInput
end
item
Name = 'CENTRO'
DataType = datString
Size = 17
Value = ''
ParamType = daptInput
end
item
Name = 'CODIGO'
DataType = datString
Size = 12
Value = ''
ParamType = daptInput
end
item
Name = 'COLOR'
DataType = datString
Size = 10
Value = ''
ParamType = daptInput
end>
Statements = <
item
Connection = 'GFT_VARELA'
TargetTable = 'RDX_V_CONTROL_DEVOLUCIONES'
SQL =
'begin'#10#9'declare @rowcount_var int'#10#10' declare @NUMHOJA char(8)'#10' ' +
' declare @ESTADO_HOJA varchar(20)'#10' declare @OBSERVACIONES_H' +
'OJA varchar(255)'#10' declare @CONTABILIZAR_HOJA char(1)'#10#10' dec' +
'lare @ER38 numeric(15,0)'#10' declare @ER40 numeric(15,0)'#10' dec' +
'lare @ER42 numeric(15,0)'#10' declare @ER44 numeric(15,0)'#10' dec' +
'lare @ER46 numeric(15,0)'#10' declare @ER48 numeric(15,0)'#10#10' de' +
'clare @APROBADO char(1)'#10' declare @FECHA datetime'#10' declare ' +
'@CENTRO varchar(17)'#10' declare @CODIGO varchar(12)'#10' declare ' +
'@COLOR varchar(10)'#10#10' set @NUMHOJA = :NUMHOJA'#10' set @ESTADO_' +
'HOJA = :ESTADO_HOJA'#10' set @OBSERVACIONES_HOJA = :OBSERVACIONES' +
'_HOJA'#10' set @CONTABILIZAR_HOJA = :CONTABILIZAR_HOJA'#10#10' set @' +
'ER38 = :ER38'#10' set @ER40 = :ER40'#10' set @ER42 = :ER42'#10' set' +
' @ER44 = :ER44'#10' set @ER46 = :ER46'#10' set @ER48 = :ER48'#10#10' ' +
'set @APROBADO = :APROBADO'#10' set @FECHA = :FECHA'#10' set @CENTR' +
'O = :CENTRO'#10' set @CODIGO = :CODIGO'#10' set @COLOR = :COLOR'#10#10' ' +
' /* *********************************** */'#10' if @NUMHOJA <> ' +
#39#39#10' begin'#10#9' update RDX_AJUSTES_HOJA_DEVOLUCIONES set'#10#9' ' +
' ESTADO = @ESTADO_HOJA,'#10#9#9' OBSERVACIONES = @OBSERVA' +
'CIONES_HOJA,'#10#9#9' CONTABILIZAR = @CONTABILIZAR_HOJA'#10#9' wh' +
'ere RDX_AJUSTES_HOJA_DEVOLUCIONES.NUMHOJA = @NUMHOJA'#10#10#9#9' select ' +
'@ROWCOUNT_VAR = @@ROWCOUNT'#10#10#9' if @ROWCOUNT_VAR = 0'#10#9#9' begin'#10 +
#9' insert into RDX_AJUSTES_HOJA_DEVOLUCIONES'#10#9' ' +
' (NUMHOJA, ESTADO, OBSERVACIONES, CONTABILIZAR)'#10#9#9' va' +
'lues (@NUMHOJA, @ESTADO_HOJA,'#10#9' @OBSERVACIONES_' +
'HOJA, @CONTABILIZAR_HOJA)'#10#9' end'#10' end'#10#10#10' /* ***********' +
'************************ */'#10#9'update RDX_DEVOLUCION_AJUSTES set'#10#9 +
' CANT38 = @ER38,'#10#9' CANT40 = @ER40,'#10#9' ' +
' CANT42 = @ER42,'#10#9' CANT44 = @ER44,'#10#9' CANT4' +
'6 = @ER46,'#10#9' CANT48 = @ER48,'#10' APROBADO =' +
' @APROBADO,'#10' FECHACAMBIO = CURRENT_TIMESTAMP'#10#9'wher' +
'e'#10' (RDX_DEVOLUCION_AJUSTES.CENTRO = @CENTRO and'#10#9' ' +
' RDX_DEVOLUCION_AJUSTES.CODIGO = @CODIGO and'#10#9' RDX_DEVOLU' +
'CION_AJUSTES.COLOR = @COLOR and'#10#9' RDX_DEVOLUCION_AJUSTES.FE' +
'CHA = @FECHA)'#10#10#9'select @ROWCOUNT_VAR = @@ROWCOUNT'#10#10#9'if @ROWCOUNT' +
'_VAR = 0'#10' begin'#10' insert into RDX_DEVOLUCION_AJUSTES'#10' ' +
' (FECHA, CENTRO, CODIGO, COLOR,'#10' A' +
'PROBADO, FECHACAMBIO,'#10' CANT38, CANT40, CANT42,'#10' ' +
' CANT44, CANT46, CANT48)'#10' values ('#10' ' +
' @FECHA, @CENTRO, @CODIGO,'#10' @COLOR, @A' +
'PROBADO, CURRENT_TIMESTAMP,'#10' @ER38, @ER40, @ER42' +
','#10' @ER44, @ER46, @ER48)'#10' end'#10'end'
StatementType = stSQL
ColumnMappings = <>
end>
Name = 'Update_Estado_Devoluciones'
end>
RelationShips = <>
UpdateRules = <>
Version = 0
Left = 48
Top = 32
end
object bpDevoluciones: TDABusinessProcessor
Schema = schDevoluciones
UpdateCommandName = 'Update_Estado_Devoluciones'
RefreshDatasetName = 'RefreshDevoluciones'
ReferencedDataset = 'Devoluciones'
ProcessorOptions = [poAutoGenerateInsert, poAutoGenerateDelete, poPrepareCommands, poIgnoreRowsAffected]
UpdateMode = updWhereKeyOnly
Left = 192
Top = 32
end
object bpDevolucionesAprobadas: TDABusinessProcessor
Schema = schDevoluciones
UpdateCommandName = 'Update_Estado_Devoluciones'
RefreshDatasetName = 'RefreshDevoluciones'
ReferencedDataset = 'DevolucionesAprobadas'
ProcessorOptions = [poAutoGenerateInsert, poAutoGenerateDelete, poPrepareCommands, poIgnoreRowsAffected]
UpdateMode = updWhereKeyOnly
Left = 192
Top = 88
end
object bpDevolucionesPendientes: TDABusinessProcessor
Schema = schDevoluciones
UpdateCommandName = 'Update_Estado_Devoluciones'
RefreshDatasetName = 'RefreshDevoluciones'
ReferencedDataset = 'DevolucionesPendientes'
ProcessorOptions = [poAutoGenerateInsert, poAutoGenerateDelete, poPrepareCommands, poIgnoreRowsAffected]
UpdateMode = updWhereKeyOnly
Left = 192
Top = 152
end
object DADataDictionary1: TDADataDictionary
Fields = <
item
Name = 'Devoluciones_APROBADO'
DataType = datString
Size = 1
DisplayLabel = 'APROBADO'
end
item
Name = 'Devoluciones_FECHACAMBIO'
DataType = datDateTime
DisplayLabel = 'FECHACAMBIO'
end
item
Name = 'Devoluciones_CENTRO'
DataType = datString
Size = 17
DisplayLabel = 'CENTRO'
ReadOnly = True
end
item
Name = 'Devoluciones_FILIAL'
DataType = datString
Size = 25
DisplayLabel = 'FILIAL'
ReadOnly = True
end
item
Name = 'Devoluciones_CODIGO'
DataType = datString
Size = 12
DisplayLabel = 'CODIGO'
ReadOnly = True
end
item
Name = 'Devoluciones_PRODUCTO'
DataType = datString
Size = 40
DisplayLabel = 'PRODUCTO'
ReadOnly = True
end
item
Name = 'Devoluciones_COLOR'
DataType = datString
Size = 10
DisplayLabel = 'COLOR'
ReadOnly = True
end
item
Name = 'Devoluciones_FECHA'
DataType = datDateTime
DisplayLabel = 'FECHA'
ReadOnly = True
end
item
Name = 'Devoluciones_NUMHOJA'
DataType = datString
Size = 8
DisplayLabel = 'NUMHOJA'
end
item
Name = 'Devoluciones_ESTADO_HOJA'
DataType = datString
Size = 20
DisplayLabel = 'ESTADO_HOJA'
end
item
Name = 'Devoluciones_OBSERVACIONES_HOJA'
DataType = datString
Size = 255
DisplayLabel = 'OBSERVACIONES_HOJA'
end
item
Name = 'Devoluciones_CONTABILIZAR_HOJA'
DataType = datString
Size = 1
DisplayLabel = 'CONTABILIZAR_HOJA'
end
item
Name = 'Devoluciones_S38'
DataType = datInteger
DisplayLabel = 'S38'
ReadOnly = True
Alignment = taRightJustify
end
item
Name = 'Devoluciones_S40'
DataType = datInteger
DisplayLabel = 'S40'
ReadOnly = True
Alignment = taRightJustify
end
item
Name = 'Devoluciones_S42'
DataType = datInteger
DisplayLabel = 'S42'
ReadOnly = True
Alignment = taRightJustify
end
item
Name = 'Devoluciones_S44'
DataType = datInteger
DisplayLabel = 'S44'
ReadOnly = True
Alignment = taRightJustify
end
item
Name = 'Devoluciones_S46'
DataType = datInteger
DisplayLabel = 'S46'
ReadOnly = True
Alignment = taRightJustify
end
item
Name = 'Devoluciones_S48'
DataType = datInteger
DisplayLabel = 'S48'
ReadOnly = True
Alignment = taRightJustify
end
item
Name = 'Devoluciones_SOLICITADO'
DataType = datInteger
DisplayLabel = 'SOLICITADO'
ReadOnly = True
Alignment = taRightJustify
ServerAutoRefresh = True
end
item
Name = 'Devoluciones_E38'
DataType = datFloat
DisplayLabel = 'E38'
ReadOnly = True
Alignment = taRightJustify
end
item
Name = 'Devoluciones_E40'
DataType = datFloat
DisplayLabel = 'E40'
ReadOnly = True
Alignment = taRightJustify
end
item
Name = 'Devoluciones_E42'
DataType = datFloat
DisplayLabel = 'E42'
ReadOnly = True
Alignment = taRightJustify
end
item
Name = 'Devoluciones_E44'
DataType = datFloat
DisplayLabel = 'E44'
ReadOnly = True
Alignment = taRightJustify
end
item
Name = 'Devoluciones_E46'
DataType = datFloat
DisplayLabel = 'E46'
ReadOnly = True
Alignment = taRightJustify
end
item
Name = 'Devoluciones_E48'
DataType = datFloat
DisplayLabel = 'E48'
ReadOnly = True
Alignment = taRightJustify
end
item
Name = 'Devoluciones_ENVIADO'
DataType = datFloat
DisplayLabel = 'ENVIADO'
ReadOnly = True
Alignment = taRightJustify
ServerAutoRefresh = True
end
item
Name = 'Devoluciones_ER38'
DataType = datFloat
DisplayLabel = 'ER38'
Alignment = taRightJustify
end
item
Name = 'Devoluciones_ER40'
DataType = datFloat
DisplayLabel = 'ER40'
Alignment = taRightJustify
end
item
Name = 'Devoluciones_ER42'
DataType = datFloat
DisplayLabel = 'ER42'
Alignment = taRightJustify
end
item
Name = 'Devoluciones_ER44'
DataType = datFloat
DisplayLabel = 'ER44'
Alignment = taRightJustify
end
item
Name = 'Devoluciones_ER46'
DataType = datFloat
DisplayLabel = 'ER46'
Alignment = taRightJustify
end
item
Name = 'Devoluciones_ER48'
DataType = datFloat
DisplayLabel = 'ER48'
Alignment = taRightJustify
end
item
Name = 'Devoluciones_ENVIADO_RECT'
DataType = datFloat
DisplayLabel = 'ENVIADO_RECT'
Alignment = taRightJustify
ServerAutoRefresh = True
end
item
Name = 'Devoluciones_DIFERENCIA'
DataType = datFloat
DisplayLabel = 'DIFERENCIA'
Alignment = taRightJustify
ServerAutoRefresh = True
end>
Left = 48
Top = 120
end
object DABINAdapter: TDABINAdapter
Left = 48
Top = 184
end
end