Varela_PuntosVenta/Source/Modulos/Recepciones/Servidor/srvRecepciones_Impl.dfm

1676 lines
51 KiB
Plaintext

object srvRecepciones: TsrvRecepciones
OldCreateOrder = True
SessionManager = dmServer.SessionManager
ServiceSchema = schRecepciones
ServiceDataStreamer = DABINAdapter
AllowWhereSQL = True
ExportedDataTables = <>
Height = 300
Width = 300
object schRecepciones: TDASchema
ConnectionManager = dmServer.ConnectionManager
DataDictionary = DADataDictionary1
Diagrams = dmServer.DADiagrams
Datasets = <
item
Params = <>
Statements = <
item
Connection = 'GFT_VARELA'
TargetTable = 'RDX_V_CONTROL_RECEPCION_ALBARANES'
SQL =
'SELECT ALBARAN, ESTADOALBARAN, FILIAL, ESTADOPRODUCTO, CODIGO, P' +
'RODUCTO, COLOR, E38,'#10'E40, E42, E44, E46, E48'#10'FROM RDX_V_CONTROL_' +
'RECEPCION_ALBARANES'
StatementType = stSQL
ColumnMappings = <
item
DatasetField = 'ALBARAN'
TableField = 'ALBARAN'
end
item
DatasetField = 'ESTADOALBARAN'
TableField = 'ESTADOALBARAN'
end
item
DatasetField = 'FILIAL'
TableField = 'FILIAL'
end
item
DatasetField = 'ESTADOPRODUCTO'
TableField = 'ESTADOPRODUCTO'
end
item
DatasetField = 'CODIGO'
TableField = 'CODIGO'
end
item
DatasetField = 'PRODUCTO'
TableField = 'PRODUCTO'
end
item
DatasetField = 'COLOR'
TableField = 'COLOR'
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>
end>
Name = 'RecepcionesAlbaran'
Fields = <
item
Name = 'ALBARAN'
DataType = datString
Size = 7
DictionaryEntry = 'Recepciones_ALBARAN'
end
item
Name = 'ESTADOALBARAN'
DataType = datString
Size = 15
DictionaryEntry = 'Recepciones_ESTADO_ALBARAN'
end
item
Name = 'FILIAL'
DataType = datString
Size = 25
DictionaryEntry = 'Recepciones_FILIAL'
end
item
Name = 'ESTADOPRODUCTO'
DataType = datString
Size = 9
end
item
Name = 'CODIGO'
DataType = datString
Size = 12
DictionaryEntry = 'Recepciones_CODIGO'
end
item
Name = 'PRODUCTO'
DataType = datString
Size = 40
DictionaryEntry = 'Recepciones_PRODUCTO'
end
item
Name = 'COLOR'
DataType = datString
Size = 10
DictionaryEntry = 'Recepciones_COLOR'
end
item
Name = 'E38'
DataType = datInteger
DictionaryEntry = 'Recepciones_E38'
end
item
Name = 'E40'
DataType = datInteger
DictionaryEntry = 'Recepciones_E40'
end
item
Name = 'E42'
DataType = datInteger
DictionaryEntry = 'Recepciones_E42'
end
item
Name = 'E44'
DataType = datInteger
DictionaryEntry = 'Recepciones_E44'
end
item
Name = 'E46'
DataType = datInteger
DictionaryEntry = 'Recepciones_E46'
end
item
Name = 'E48'
DataType = datInteger
DictionaryEntry = 'Recepciones_E48'
end>
end
item
Params = <>
Statements = <
item
Connection = 'GFT_VARELA'
TargetTable = 'RDX_V_CONTROL_RECEPCION'
SQL = 'SELECT '#10' *'#10' FROM'#10' RDX_V_CONTROL_RECEPCION'
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 = 'ALBARAN'
TableField = 'ALBARAN'
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 = 'R38'
TableField = 'R38'
end
item
DatasetField = 'R40'
TableField = 'R40'
end
item
DatasetField = 'R42'
TableField = 'R42'
end
item
DatasetField = 'R44'
TableField = 'R44'
end
item
DatasetField = 'R46'
TableField = 'R46'
end
item
DatasetField = 'R48'
TableField = 'R48'
end
item
DatasetField = 'RECIBIDO'
TableField = 'RECIBIDO'
end
item
DatasetField = 'DIFERENCIA'
TableField = 'DIFERENCIA'
end
item
DatasetField = 'ESTADO_ALBARAN'
TableField = 'ESTADO_ALBARAN'
end
item
DatasetField = 'OBSERVACIONES_ALBARAN'
TableField = 'OBSERVACIONES_ALBARAN'
end
item
DatasetField = 'CONTABILIZAR_ALBARAN'
TableField = 'CONTABILIZAR_ALBARAN'
end
item
DatasetField = 'RR38'
TableField = 'RR38'
end
item
DatasetField = 'RR40'
TableField = 'RR40'
end
item
DatasetField = 'RR42'
TableField = 'RR42'
end
item
DatasetField = 'RR44'
TableField = 'RR44'
end
item
DatasetField = 'RR46'
TableField = 'RR46'
end
item
DatasetField = 'RR48'
TableField = 'RR48'
end
item
DatasetField = 'RECIBIDO_RECT'
TableField = 'RECIBIDO_RECT'
end
item
DatasetField = 'APROBADO'
TableField = 'APROBADO'
end
item
DatasetField = 'FECHACAMBIO'
TableField = 'FECHACAMBIO'
end>
end>
Name = 'Recepciones'
Fields = <
item
Name = 'APROBADO'
DataType = datString
Size = 1
DictionaryEntry = 'Recepciones_APROBADO'
end
item
Name = 'FECHACAMBIO'
DataType = datDateTime
DictionaryEntry = 'Recepciones_FECHACAMBIO'
end
item
Name = 'CENTRO'
DataType = datString
Size = 17
DictionaryEntry = 'Recepciones_CENTRO'
InPrimaryKey = True
end
item
Name = 'FILIAL'
DataType = datString
Size = 25
DictionaryEntry = 'Recepciones_FILIAL'
end
item
Name = 'CODIGO'
DataType = datString
Size = 12
DictionaryEntry = 'Recepciones_CODIGO'
InPrimaryKey = True
end
item
Name = 'PRODUCTO'
DataType = datString
Size = 40
DictionaryEntry = 'Recepciones_PRODUCTO'
end
item
Name = 'COLOR'
DataType = datString
Size = 10
DictionaryEntry = 'Recepciones_COLOR'
InPrimaryKey = True
end
item
Name = 'FECHA'
DataType = datDateTime
DictionaryEntry = 'Recepciones_FECHA'
InPrimaryKey = True
end
item
Name = 'ALBARAN'
DataType = datString
Size = 7
DictionaryEntry = 'Recepciones_ALBARAN'
end
item
Name = 'ESTADO_ALBARAN'
DataType = datString
Size = 15
DictionaryEntry = 'Recepciones_ESTADO_ALBARAN'
end
item
Name = 'OBSERVACIONES_ALBARAN'
DataType = datString
Size = 255
DictionaryEntry = 'Recepciones_OBSERVACIONES_ALBARAN'
end
item
Name = 'CONTABILIZAR_ALBARAN'
DataType = datString
Size = 1
DictionaryEntry = 'Recepciones_CONTABILIZAR_ALBARAN'
end
item
Name = 'E38'
DataType = datInteger
DictionaryEntry = 'Recepciones_E38'
end
item
Name = 'E40'
DataType = datInteger
DictionaryEntry = 'Recepciones_E40'
end
item
Name = 'E42'
DataType = datInteger
DictionaryEntry = 'Recepciones_E42'
end
item
Name = 'E44'
DataType = datInteger
DictionaryEntry = 'Recepciones_E44'
end
item
Name = 'E46'
DataType = datInteger
DictionaryEntry = 'Recepciones_E46'
end
item
Name = 'E48'
DataType = datInteger
DictionaryEntry = 'Recepciones_E48'
end
item
Name = 'ENVIADO'
DataType = datInteger
DictionaryEntry = 'Recepciones_ENVIADO'
end
item
Name = 'R38'
DataType = datFloat
DictionaryEntry = 'Recepciones_R38'
end
item
Name = 'R40'
DataType = datFloat
DictionaryEntry = 'Recepciones_R40'
end
item
Name = 'R42'
DataType = datFloat
DictionaryEntry = 'Recepciones_R42'
end
item
Name = 'R44'
DataType = datFloat
DictionaryEntry = 'Recepciones_R44'
end
item
Name = 'R46'
DataType = datFloat
DictionaryEntry = 'Recepciones_R46'
end
item
Name = 'R48'
DataType = datFloat
DictionaryEntry = 'Recepciones_R48'
end
item
Name = 'RECIBIDO'
DataType = datFloat
DictionaryEntry = 'Recepciones_RECIBIDO'
end
item
Name = 'RR38'
DataType = datFloat
DictionaryEntry = 'Recepciones_RR38'
end
item
Name = 'RR40'
DataType = datFloat
DictionaryEntry = 'Recepciones_RR40'
end
item
Name = 'RR42'
DataType = datFloat
DictionaryEntry = 'Recepciones_RR42'
end
item
Name = 'RR44'
DataType = datFloat
DictionaryEntry = 'Recepciones_RR44'
end
item
Name = 'RR46'
DataType = datFloat
DictionaryEntry = 'Recepciones_RR46'
end
item
Name = 'RR48'
DataType = datFloat
DictionaryEntry = 'Recepciones_RR48'
end
item
Name = 'RECIBIDO_RECT'
DataType = datFloat
DictionaryEntry = 'Recepciones_RECIBIDO_RECT'
end
item
Name = 'DIFERENCIA'
DataType = datFloat
DictionaryEntry = 'Recepciones_DIFERENCIA'
end>
end
item
Params = <>
Statements = <
item
Connection = 'GFT_VARELA'
TargetTable = 'RDX_V_CONTROL_RECEPCION'
SQL =
'SELECT'#10' *'#10' FROM'#10' RDX_V_CONTROL_RECEPCION'#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 = 'ALBARAN'
TableField = 'ALBARAN'
end
item
DatasetField = 'ESTADO_ALBARAN'
TableField = 'ESTADO_ALBARAN'
end
item
DatasetField = 'OBSERVACIONES_ALBARAN'
TableField = 'OBSERVACIONES_ALBARAN'
end
item
DatasetField = 'CONTABILIZAR_ALBARAN'
TableField = 'CONTABILIZAR_ALBARAN'
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 = 'R38'
TableField = 'R38'
end
item
DatasetField = 'R40'
TableField = 'R40'
end
item
DatasetField = 'R42'
TableField = 'R42'
end
item
DatasetField = 'R44'
TableField = 'R44'
end
item
DatasetField = 'R46'
TableField = 'R46'
end
item
DatasetField = 'R48'
TableField = 'R48'
end
item
DatasetField = 'RECIBIDO'
TableField = 'RECIBIDO'
end
item
DatasetField = 'RR38'
TableField = 'RR38'
end
item
DatasetField = 'RR40'
TableField = 'RR40'
end
item
DatasetField = 'RR42'
TableField = 'RR42'
end
item
DatasetField = 'RR44'
TableField = 'RR44'
end
item
DatasetField = 'RR46'
TableField = 'RR46'
end
item
DatasetField = 'RR48'
TableField = 'RR48'
end
item
DatasetField = 'RECIBIDO_RECT'
TableField = 'RECIBIDO_RECT'
end
item
DatasetField = 'DIFERENCIA'
TableField = 'DIFERENCIA'
end
item
DatasetField = 'FECHACAMBIO'
TableField = 'FECHACAMBIO'
end>
end>
Name = 'RecepcionesPendientes'
Fields = <
item
Name = 'APROBADO'
DataType = datString
Size = 1
DictionaryEntry = 'Recepciones_APROBADO'
end
item
Name = 'FECHACAMBIO'
DataType = datDateTime
DictionaryEntry = 'Recepciones_FECHACAMBIO'
end
item
Name = 'CENTRO'
DataType = datString
Size = 17
DictionaryEntry = 'Recepciones_CENTRO'
InPrimaryKey = True
end
item
Name = 'FILIAL'
DataType = datString
Size = 25
DictionaryEntry = 'Recepciones_FILIAL'
end
item
Name = 'CODIGO'
DataType = datString
Size = 12
DictionaryEntry = 'Recepciones_CODIGO'
InPrimaryKey = True
end
item
Name = 'PRODUCTO'
DataType = datString
Size = 40
DictionaryEntry = 'Recepciones_PRODUCTO'
end
item
Name = 'COLOR'
DataType = datString
Size = 10
DictionaryEntry = 'Recepciones_COLOR'
InPrimaryKey = True
end
item
Name = 'FECHA'
DataType = datDateTime
DictionaryEntry = 'Recepciones_FECHA'
InPrimaryKey = True
end
item
Name = 'ALBARAN'
DataType = datString
Size = 7
DictionaryEntry = 'Recepciones_ALBARAN'
end
item
Name = 'ESTADO_ALBARAN'
DataType = datString
Size = 15
DictionaryEntry = 'Recepciones_ESTADO_ALBARAN'
end
item
Name = 'OBSERVACIONES_ALBARAN'
DataType = datString
Size = 255
DictionaryEntry = 'Recepciones_OBSERVACIONES_ALBARAN'
end
item
Name = 'CONTABILIZAR_ALBARAN'
DataType = datString
Size = 1
DictionaryEntry = 'Recepciones_CONTABILIZAR_ALBARAN'
end
item
Name = 'E38'
DataType = datInteger
DictionaryEntry = 'Recepciones_E38'
end
item
Name = 'E40'
DataType = datInteger
DictionaryEntry = 'Recepciones_E40'
end
item
Name = 'E42'
DataType = datInteger
DictionaryEntry = 'Recepciones_E42'
end
item
Name = 'E44'
DataType = datInteger
DictionaryEntry = 'Recepciones_E44'
end
item
Name = 'E46'
DataType = datInteger
DictionaryEntry = 'Recepciones_E46'
end
item
Name = 'E48'
DataType = datInteger
DictionaryEntry = 'Recepciones_E48'
end
item
Name = 'ENVIADO'
DataType = datInteger
DictionaryEntry = 'Recepciones_ENVIADO'
end
item
Name = 'R38'
DataType = datFloat
DictionaryEntry = 'Recepciones_R38'
end
item
Name = 'R40'
DataType = datFloat
DictionaryEntry = 'Recepciones_R40'
end
item
Name = 'R42'
DataType = datFloat
DictionaryEntry = 'Recepciones_R42'
end
item
Name = 'R44'
DataType = datFloat
DictionaryEntry = 'Recepciones_R44'
end
item
Name = 'R46'
DataType = datFloat
DictionaryEntry = 'Recepciones_R46'
end
item
Name = 'R48'
DataType = datFloat
DictionaryEntry = 'Recepciones_R48'
end
item
Name = 'RECIBIDO'
DataType = datFloat
DictionaryEntry = 'Recepciones_RECIBIDO'
end
item
Name = 'RR38'
DataType = datFloat
DictionaryEntry = 'Recepciones_RR38'
end
item
Name = 'RR40'
DataType = datFloat
DictionaryEntry = 'Recepciones_RR40'
end
item
Name = 'RR42'
DataType = datFloat
DictionaryEntry = 'Recepciones_RR42'
end
item
Name = 'RR44'
DataType = datFloat
DictionaryEntry = 'Recepciones_RR44'
end
item
Name = 'RR46'
DataType = datFloat
DictionaryEntry = 'Recepciones_RR46'
end
item
Name = 'RR48'
DataType = datFloat
DictionaryEntry = 'Recepciones_RR48'
end
item
Name = 'RECIBIDO_RECT'
DataType = datFloat
DictionaryEntry = 'Recepciones_RECIBIDO_RECT'
end
item
Name = 'DIFERENCIA'
DataType = datFloat
DictionaryEntry = 'Recepciones_DIFERENCIA'
end>
end
item
Params = <>
Statements = <
item
Connection = 'GFT_VARELA'
TargetTable = 'RDX_V_CONTROL_RECEPCION'
SQL =
'SELECT '#10' *'#10' FROM'#10' RDX_V_CONTROL_RECEPCION'#10'WHERE (APROBADO' +
' = '#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 = 'ALBARAN'
TableField = 'ALBARAN'
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 = 'R38'
TableField = 'R38'
end
item
DatasetField = 'R40'
TableField = 'R40'
end
item
DatasetField = 'R42'
TableField = 'R42'
end
item
DatasetField = 'R44'
TableField = 'R44'
end
item
DatasetField = 'R46'
TableField = 'R46'
end
item
DatasetField = 'R48'
TableField = 'R48'
end
item
DatasetField = 'RECIBIDO'
TableField = 'RECIBIDO'
end
item
DatasetField = 'DIFERENCIA'
TableField = 'DIFERENCIA'
end
item
DatasetField = 'ESTADO_ALBARAN'
TableField = 'ESTADO_ALBARAN'
end
item
DatasetField = 'OBSERVACIONES_ALBARAN'
TableField = 'OBSERVACIONES_ALBARAN'
end
item
DatasetField = 'CONTABILIZAR_ALBARAN'
TableField = 'CONTABILIZAR_ALBARAN'
end
item
DatasetField = 'RR38'
TableField = 'RR38'
end
item
DatasetField = 'RR40'
TableField = 'RR40'
end
item
DatasetField = 'RR42'
TableField = 'RR42'
end
item
DatasetField = 'RR44'
TableField = 'RR44'
end
item
DatasetField = 'RR46'
TableField = 'RR46'
end
item
DatasetField = 'RR48'
TableField = 'RR48'
end
item
DatasetField = 'RECIBIDO_RECT'
TableField = 'RECIBIDO_RECT'
end
item
DatasetField = 'FECHACAMBIO'
TableField = 'FECHACAMBIO'
end
item
DatasetField = 'APROBADO'
TableField = 'APROBADO'
end>
end>
Name = 'RecepcionesAprobadas'
Fields = <
item
Name = 'APROBADO'
DataType = datString
Size = 1
DictionaryEntry = 'Recepciones_APROBADO'
end
item
Name = 'FECHACAMBIO'
DataType = datDateTime
DictionaryEntry = 'Recepciones_FECHACAMBIO'
end
item
Name = 'CENTRO'
DataType = datString
Size = 17
DictionaryEntry = 'Recepciones_CENTRO'
InPrimaryKey = True
end
item
Name = 'FILIAL'
DataType = datString
Size = 25
DictionaryEntry = 'Recepciones_FILIAL'
end
item
Name = 'CODIGO'
DataType = datString
Size = 12
DictionaryEntry = 'Recepciones_CODIGO'
InPrimaryKey = True
end
item
Name = 'PRODUCTO'
DataType = datString
Size = 40
DictionaryEntry = 'Recepciones_PRODUCTO'
end
item
Name = 'COLOR'
DataType = datString
Size = 10
DictionaryEntry = 'Recepciones_COLOR'
InPrimaryKey = True
end
item
Name = 'FECHA'
DataType = datDateTime
DictionaryEntry = 'Recepciones_FECHA'
InPrimaryKey = True
end
item
Name = 'ALBARAN'
DataType = datString
Size = 7
DictionaryEntry = 'Recepciones_ALBARAN'
end
item
Name = 'ESTADO_ALBARAN'
DataType = datString
Size = 15
DictionaryEntry = 'Recepciones_ESTADO_ALBARAN'
end
item
Name = 'OBSERVACIONES_ALBARAN'
DataType = datString
Size = 255
DictionaryEntry = 'Recepciones_OBSERVACIONES_ALBARAN'
end
item
Name = 'CONTABILIZAR_ALBARAN'
DataType = datString
Size = 1
DictionaryEntry = 'Recepciones_CONTABILIZAR_ALBARAN'
end
item
Name = 'E38'
DataType = datInteger
DictionaryEntry = 'Recepciones_E38'
end
item
Name = 'E40'
DataType = datInteger
DictionaryEntry = 'Recepciones_E40'
end
item
Name = 'E42'
DataType = datInteger
DictionaryEntry = 'Recepciones_E42'
end
item
Name = 'E44'
DataType = datInteger
DictionaryEntry = 'Recepciones_E44'
end
item
Name = 'E46'
DataType = datInteger
DictionaryEntry = 'Recepciones_E46'
end
item
Name = 'E48'
DataType = datInteger
DictionaryEntry = 'Recepciones_E48'
end
item
Name = 'ENVIADO'
DataType = datInteger
DictionaryEntry = 'Recepciones_ENVIADO'
end
item
Name = 'R38'
DataType = datFloat
DictionaryEntry = 'Recepciones_R38'
end
item
Name = 'R40'
DataType = datFloat
DictionaryEntry = 'Recepciones_R40'
end
item
Name = 'R42'
DataType = datFloat
DictionaryEntry = 'Recepciones_R42'
end
item
Name = 'R44'
DataType = datFloat
DictionaryEntry = 'Recepciones_R44'
end
item
Name = 'R46'
DataType = datFloat
DictionaryEntry = 'Recepciones_R46'
end
item
Name = 'R48'
DataType = datFloat
DictionaryEntry = 'Recepciones_R48'
end
item
Name = 'RECIBIDO'
DataType = datFloat
DictionaryEntry = 'Recepciones_RECIBIDO'
end
item
Name = 'RR38'
DataType = datFloat
DictionaryEntry = 'Recepciones_RR38'
end
item
Name = 'RR40'
DataType = datFloat
DictionaryEntry = 'Recepciones_RR40'
end
item
Name = 'RR42'
DataType = datFloat
DictionaryEntry = 'Recepciones_RR42'
end
item
Name = 'RR44'
DataType = datFloat
DictionaryEntry = 'Recepciones_RR44'
end
item
Name = 'RR46'
DataType = datFloat
DictionaryEntry = 'Recepciones_RR46'
end
item
Name = 'RR48'
DataType = datFloat
DictionaryEntry = 'Recepciones_RR48'
end
item
Name = 'RECIBIDO_RECT'
DataType = datFloat
DictionaryEntry = 'Recepciones_RECIBIDO_RECT'
end
item
Name = 'DIFERENCIA'
DataType = datFloat
DictionaryEntry = 'Recepciones_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_RECEPCION'
SQL =
'SELECT '#10' RECIBIDO_RECT, DIFERENCIA'#10' FROM'#10' RDX_V_CONTROL_R' +
'ECEPCION'#10' WHERE'#10' FECHA = :FECHA AND'#10' CENTRO = :CENT' +
'RO AND'#10' CODIGO = :CODIGO AND'#10' COLOR = :COLOR'
StatementType = stSQL
ColumnMappings = <
item
DatasetField = 'DIFERENCIA'
TableField = 'DIFERENCIA'
end
item
DatasetField = 'RECIBIDO_RECT'
TableField = 'RECIBIDO_RECT'
end>
end>
Name = 'RefreshRecepciones'
Fields = <
item
Name = 'RECIBIDO_RECT'
DataType = datFloat
end
item
Name = 'DIFERENCIA'
DataType = datFloat
end>
end>
JoinDataTables = <>
UnionDataTables = <>
Commands = <
item
Params = <
item
Name = 'ALBARAN'
DataType = datString
Size = 7
Value = ''
ParamType = daptInput
end
item
Name = 'ESTADO_ALBARAN'
DataType = datString
Size = 15
Value = ''
ParamType = daptInput
end
item
Name = 'OBSERVACIONES_ALBARAN'
DataType = datString
Size = 255
Value = ''
ParamType = daptInput
end
item
Name = 'CONTABILIZAR_ALBARAN'
DataType = datString
Size = 1
Value = ''
ParamType = daptInput
end
item
Name = 'RR38'
DataType = datFloat
Value = ''
ParamType = daptInput
end
item
Name = 'RR40'
DataType = datFloat
Value = ''
ParamType = daptInput
end
item
Name = 'RR42'
DataType = datFloat
Value = ''
ParamType = daptInput
end
item
Name = 'RR44'
DataType = datFloat
Value = ''
ParamType = daptInput
end
item
Name = 'RR46'
DataType = datFloat
Value = ''
ParamType = daptInput
end
item
Name = 'RR48'
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_RECEPCION'
SQL =
'begin'#10' declare @rowcount_var int'#10' declare @ALBARAN char(7)' +
#10' declare @ESTADO_ALBARAN varchar(20)'#10' declare @OBSERVACIO' +
'NES_ALBARAN varchar(255)'#10' declare @CONTABILIZAR_ALBARAN char(' +
'1)'#10#10' declare @RR38 numeric(15,0)'#10' declare @RR40 numeric(15' +
',0)'#10' declare @RR42 numeric(15,0)'#10' declare @RR44 numeric(15' +
',0)'#10' declare @RR46 numeric(15,0)'#10' declare @RR48 numeric(15' +
',0)'#10' declare @RR_S numeric(15,0)'#10' declare @RR_M numeric(15' +
',0)'#10' declare @RR_L numeric(15,0)'#10' declare @RR_XL numeric(1' +
'5,0)'#10#10' declare @APROBADO char(1)'#10' declare @FECHA datetime'#10 +
' declare @CENTRO varchar(17)'#10' declare @CODIGO varchar(12)'#10 +
' declare @COLOR varchar(10)'#10' '#10' declare @TIPO_TALLAJE sm' +
'allint'#10#10' set @ALBARAN = :ALBARAN'#10' set @ESTADO_ALBARAN = :E' +
'STADO_ALBARAN'#10' set @OBSERVACIONES_ALBARAN = :OBSERVACIONES_AL' +
'BARAN'#10' set @CONTABILIZAR_ALBARAN = :CONTABILIZAR_ALBARAN'#10#10' ' +
' set @RR38 = :RR38'#10' set @RR40 = :RR40'#10' set @RR42 = :RR42'#10' ' +
' set @RR44 = :RR44'#10' set @RR46 = :RR46'#10' set @RR48 = :RR48' +
#10' set @RR_S = :RR38'#10' set @RR_M = :RR40'#10' set @RR_L = :RR' +
'42'#10' set @RR_XL = :RR44'#10#10' set @APROBADO = :APROBADO'#10' set' +
' @FECHA = :FECHA'#10' set @CENTRO = :CENTRO'#10' set @CODIGO = :CO' +
'DIGO'#10' set @COLOR = :COLOR'#10#10#10' /* **************************' +
'********* */'#10' if @ALBARAN <> '#39#39#10' begin'#10' update RDX' +
'_AJUSTES_ALBARAN set'#10#9' ESTADO = @ESTADO_ALBARAN,'#10#9' O' +
'BSERVACIONES = @OBSERVACIONES_ALBARAN,'#10#9' CONTABILIZAR = @C' +
'ONTABILIZAR_ALBARAN'#10' where RDX_AJUSTES_ALBARAN.ALBARAN =' +
' @ALBARAN'#10#10#9' select @ROWCOUNT_VAR = @@ROWCOUNT'#10#10' if @ROW' +
'COUNT_VAR = 0'#10#9' begin'#10' insert into RDX_AJUSTES_ALBAR' +
'AN'#10' (ALBARAN, ESTADO, OBSERVACIONES, CONTABIL' +
'IZAR)'#10' values (@ALBARAN, @ESTADO_ALBARAN,'#10' ' +
' @OBSERVACIONES_ALBARAN, @CONTABILIZAR_ALBARAN)'#10#10' ' +
' select @ROWCOUNT_VAR = @@ROWCOUNT'#10' end'#10' end'#10 +
#10#10' /* ARREGLO PARA QUE SOPORTE LOS NUEVOS TALLAJES*** */'#10' ' +
#10' execute RDX_P_TIPO_TALLAJE @CODIGO, @TIPO_TALLAJE OUTPUT'#10#10' ' +
' if @TIPO_TALLAJE = 1'#10' begin'#10' set @RR_S = NULL'#10' ' +
' set @RR_M = NULL'#10' set @RR_L = NULL'#10' set @RR_XL = NU' +
'LL'#10' end'#10#10' if @TIPO_TALLAJE = 2'#10' begin'#10' set @RR38 ' +
'= NULL'#10' set @RR40 = NULL'#10' set @RR42 = NULL'#10' se' +
't @RR44 = NULL'#10' set @RR46 = NULL'#10' set @RR48 = NULL'#10' ' +
' end'#10#10' '#10' /* *********************************** */'#10#9'upda' +
'te RDX_RECEPCION_AJUSTES set'#10#9' CANT38 = @RR38,'#10#9' ' +
' CANT40 = @RR40,'#10#9' CANT42 = @RR42,'#10#9' CAN' +
'T44 = @RR44,'#10#9' CANT46 = @RR46,'#10#9' CANT48 = @R' +
'R48,'#10#9' CANT_S = @RR_S,'#10#9' CANT_M = @RR_M,'#10#9' ' +
' CANT_L = @RR_L,'#10#9' CANT_XL = @RR_XL,'#10' ' +
' APROBADO = @APROBADO,'#10' FECHACAMBIO = CURRENT' +
'_TIMESTAMP'#10#9'where'#10' (RDX_RECEPCION_AJUSTES.CENTRO = @' +
'CENTRO and'#10#9' RDX_RECEPCION_AJUSTES.CODIGO = @CODIGO and'#10#9' ' +
' RDX_RECEPCION_AJUSTES.COLOR = @COLOR and'#10#9' RDX_RECEPCIO' +
'N_AJUSTES.FECHA = @FECHA)'#10#10#9'select @ROWCOUNT_VAR = @@ROWCOUNT'#10#10#9 +
'if @ROWCOUNT_VAR = 0'#10' begin'#10' insert into RDX_RECE' +
'PCION_AJUSTES'#10' (FECHA, CENTRO, CODIGO, COLOR,'#10' ' +
' APROBADO, FECHACAMBIO,'#10' CANT38, CA' +
'NT40, CANT42,'#10' CANT44, CANT46, CANT48,'#10' ' +
' CANT_S, CANT_M, CANT_L, CANT_XL)'#10' values ('#10' ' +
' @FECHA, @CENTRO, @CODIGO,'#10' @COLOR, @' +
'APROBADO, CURRENT_TIMESTAMP,'#10' @RR38, @RR40, @RR4' +
'2,'#10' @RR44, @RR46, @RR48,'#10' @RR_S,' +
' @RR_M, @RR_L, @RR_XL)'#10#10' select @ROWCOUNT_VAR = @@ROWCOU' +
'NT'#10' end'#10'end'#10
StatementType = stSQL
ColumnMappings = <>
end>
Name = 'Update_Estado_Recepciones'
end>
RelationShips = <>
UpdateRules = <>
Version = 0
Left = 48
Top = 32
end
object bpRecepciones: TDABusinessProcessor
Schema = schRecepciones
UpdateCommandName = 'Update_Estado_Recepciones'
RefreshDatasetName = 'RefreshRecepciones'
ReferencedDataset = 'Recepciones'
ProcessorOptions = [poAutoGenerateInsert, poAutoGenerateDelete, poPrepareCommands, poIgnoreRowsAffected]
UpdateMode = updWhereKeyOnly
Left = 192
Top = 32
end
object bpRecepcionesAprobadas: TDABusinessProcessor
Schema = schRecepciones
UpdateCommandName = 'Update_Estado_Recepciones'
RefreshDatasetName = 'RefreshRecepciones'
ReferencedDataset = 'RecepcionesAprobadas'
ProcessorOptions = [poAutoGenerateInsert, poAutoGenerateDelete, poPrepareCommands, poIgnoreRowsAffected]
UpdateMode = updWhereKeyOnly
Left = 192
Top = 88
end
object bpRecepcionesPendientes: TDABusinessProcessor
Schema = schRecepciones
UpdateCommandName = 'Update_Estado_Recepciones'
RefreshDatasetName = 'RefreshRecepciones'
ReferencedDataset = 'RecepcionesPendientes'
ProcessorOptions = [poAutoGenerateInsert, poAutoGenerateDelete, poPrepareCommands, poIgnoreRowsAffected]
UpdateMode = updWhereKeyOnly
Left = 192
Top = 152
end
object DADataDictionary1: TDADataDictionary
Fields = <
item
Name = 'Recepciones_APROBADO'
DataType = datString
Size = 1
DisplayLabel = 'APROBADO'
end
item
Name = 'Recepciones_FECHACAMBIO'
DataType = datDateTime
DisplayLabel = 'FECHACAMBIO'
ReadOnly = True
end
item
Name = 'Recepciones_CENTRO'
DataType = datString
Size = 17
DisplayLabel = 'CENTRO'
ReadOnly = True
end
item
Name = 'Recepciones_FILIAL'
DataType = datString
Size = 25
LogChanges = False
DisplayLabel = 'FILIAL'
ReadOnly = True
end
item
Name = 'Recepciones_CODIGO'
DataType = datString
Size = 12
DisplayLabel = 'CODIGO'
ReadOnly = True
end
item
Name = 'Recepciones_PRODUCTO'
DataType = datString
Size = 40
LogChanges = False
DisplayLabel = 'PRODUCTO'
ReadOnly = True
end
item
Name = 'Recepciones_COLOR'
DataType = datString
Size = 10
DisplayLabel = 'COLOR'
ReadOnly = True
end
item
Name = 'Recepciones_FECHA'
DataType = datDateTime
DisplayLabel = 'FECHA'
ReadOnly = True
end
item
Name = 'Recepciones_ALBARAN'
DataType = datString
Size = 7
LogChanges = False
DisplayLabel = 'ALBARAN'
ReadOnly = True
end
item
Name = 'Recepciones_ESTADO_ALBARAN'
DataType = datString
Size = 15
DisplayLabel = 'ESTADO_ALBARAN'
end
item
Name = 'Recepciones_OBSERVACIONES_ALBARAN'
DataType = datString
Size = 255
DisplayLabel = 'OBSERVACIONES_ALBARAN'
end
item
Name = 'Recepciones_CONTABILIZAR_ALBARAN'
DataType = datString
Size = 1
DisplayLabel = 'CONTABILIZAR_ALBARAN'
end
item
Name = 'Recepciones_E38'
DataType = datInteger
LogChanges = False
DisplayLabel = 'E38/S'
ReadOnly = True
Alignment = taRightJustify
end
item
Name = 'Recepciones_E40'
DataType = datInteger
LogChanges = False
DisplayLabel = 'E40/M'
ReadOnly = True
Alignment = taRightJustify
end
item
Name = 'Recepciones_E42'
DataType = datInteger
LogChanges = False
DisplayLabel = 'E42/L'
ReadOnly = True
Alignment = taRightJustify
end
item
Name = 'Recepciones_E44'
DataType = datInteger
LogChanges = False
DisplayLabel = 'E44/XL'
ReadOnly = True
Alignment = taRightJustify
end
item
Name = 'Recepciones_E46'
DataType = datInteger
LogChanges = False
DisplayLabel = 'E46'
ReadOnly = True
Alignment = taRightJustify
end
item
Name = 'Recepciones_E48'
DataType = datInteger
LogChanges = False
DisplayLabel = 'E48'
ReadOnly = True
Alignment = taRightJustify
end
item
Name = 'Recepciones_ENVIADO'
DataType = datInteger
LogChanges = False
DisplayLabel = 'ENVIADO'
ReadOnly = True
Alignment = taRightJustify
end
item
Name = 'Recepciones_R38'
DataType = datFloat
LogChanges = False
DisplayLabel = 'R38/S'
ReadOnly = True
Alignment = taRightJustify
end
item
Name = 'Recepciones_R40'
DataType = datFloat
LogChanges = False
DisplayLabel = 'R40/M'
ReadOnly = True
Alignment = taRightJustify
end
item
Name = 'Recepciones_R42'
DataType = datFloat
LogChanges = False
DisplayLabel = 'R42/L'
ReadOnly = True
Alignment = taRightJustify
end
item
Name = 'Recepciones_R44'
DataType = datFloat
LogChanges = False
DisplayLabel = 'R44/XL'
ReadOnly = True
Alignment = taRightJustify
end
item
Name = 'Recepciones_R46'
DataType = datFloat
LogChanges = False
DisplayLabel = 'R46'
ReadOnly = True
Alignment = taRightJustify
end
item
Name = 'Recepciones_R48'
DataType = datFloat
LogChanges = False
DisplayLabel = 'R48'
ReadOnly = True
Alignment = taRightJustify
end
item
Name = 'Recepciones_RECIBIDO'
DataType = datFloat
LogChanges = False
DisplayLabel = 'RECIBIDO'
ReadOnly = True
Alignment = taRightJustify
end
item
Name = 'Recepciones_RR38'
DataType = datFloat
DisplayLabel = 'RR38/S'
Alignment = taRightJustify
end
item
Name = 'Recepciones_RR40'
DataType = datFloat
DisplayLabel = 'RR40/M'
Alignment = taRightJustify
end
item
Name = 'Recepciones_RR42'
DataType = datFloat
DisplayLabel = 'RR42/L'
Alignment = taRightJustify
end
item
Name = 'Recepciones_RR44'
DataType = datFloat
DisplayLabel = 'RR44/XL'
Alignment = taRightJustify
end
item
Name = 'Recepciones_RR46'
DataType = datFloat
DisplayLabel = 'RR46'
Alignment = taRightJustify
end
item
Name = 'Recepciones_RR48'
DataType = datFloat
DisplayLabel = 'RR48'
Alignment = taRightJustify
end
item
Name = 'Recepciones_RECIBIDO_RECT'
DataType = datFloat
LogChanges = False
DisplayLabel = 'RECIBIDO_RECT'
Alignment = taRightJustify
end
item
Name = 'Recepciones_DIFERENCIA'
DataType = datFloat
LogChanges = False
DisplayLabel = 'DIFERENCIA'
Alignment = taRightJustify
end>
Left = 48
Top = 104
end
object DABINAdapter: TDABINAdapter
Left = 48
Top = 168
end
end