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

1789 lines
54 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'#10' ALBARAN, ESTADOALBARAN, FILIAL, ESTADOPRODUCTO, CODIGO' +
', PRODUCTO, COLOR,'#10' E36, E38, E40, E42, E44, E46, E48'#10'FROM RDX' +
'_V_CONTROL_RECEPCION_ALBARANES'#10
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
item
DatasetField = 'E36'
TableField = 'E36'
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
DictionaryEntry = 'RecepcionesAlbaran_ESTADOPRODUCTO'
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 = 'E36'
DataType = datInteger
DictionaryEntry = 'Recepciones_E36'
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' APROBADO, FECHACAMBIO, CENTRO, FILIAL, CODIGO, PRODU' +
'CTO, '#10' COLOR, FECHA, ALBARAN, ESTADO_ALBARAN, OBSERVACIONES_A' +
'LBARAN, '#10' CONTABILIZAR_ALBARAN, E36, E38, E40, E42, E44, E46,' +
' '#10' E48, ENVIADO, R36, R38, R40, R42, R44, R46, R48, RECIBIDO,' +
' '#10' RR36, RR38, RR40, RR42, RR44, RR46, RR48, RECIBIDO_RECT, '#10 +
' DIFERENCIA'#10' FROM'#10' RDX_V_CONTROL_RECEPCION'#10#10
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
item
DatasetField = 'E36'
TableField = 'E36'
end
item
DatasetField = 'R36'
TableField = 'R36'
end
item
DatasetField = 'RR36'
TableField = 'RR36'
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 = 'E36'
DataType = datInteger
DictionaryEntry = 'Recepciones_E36'
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 = 'R36'
DataType = datFloat
DictionaryEntry = 'Recepciones_R36'
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 = 'RR36'
DataType = datFloat
DictionaryEntry = 'Recepciones_RR36'
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
item
DatasetField = 'E36'
TableField = 'E36'
end
item
DatasetField = 'R36'
TableField = 'R36'
end
item
DatasetField = 'RR36'
TableField = 'RR36'
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 = 'E36'
DataType = datInteger
DictionaryEntry = 'Recepciones_E36'
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 = 'R36'
DataType = datFloat
DictionaryEntry = 'Recepciones_R36'
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 = 'RR36'
DataType = datFloat
DictionaryEntry = 'Recepciones_RR36'
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
item
DatasetField = 'E36'
TableField = 'E36'
end
item
DatasetField = 'R36'
TableField = 'R36'
end
item
DatasetField = 'RR36'
TableField = 'RR36'
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 = 'E36'
DataType = datInteger
DictionaryEntry = 'Recepciones_E36'
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 = 'R36'
DataType = datFloat
DictionaryEntry = 'Recepciones_R36'
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 = 'RR36'
DataType = datFloat
DictionaryEntry = 'Recepciones_RR36'
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 = ''
end
item
Name = 'ESTADO_ALBARAN'
DataType = datString
Size = 15
Value = ''
end
item
Name = 'OBSERVACIONES_ALBARAN'
DataType = datString
Size = 255
Value = ''
end
item
Name = 'CONTABILIZAR_ALBARAN'
DataType = datString
Size = 1
Value = ''
end
item
Name = 'RR36'
DataType = datInteger
Value = ''
end
item
Name = 'RR38'
DataType = datInteger
Value = ''
end
item
Name = 'RR40'
DataType = datInteger
Value = ''
end
item
Name = 'RR42'
DataType = datInteger
Value = ''
end
item
Name = 'RR44'
DataType = datInteger
Value = ''
end
item
Name = 'RR46'
DataType = datInteger
Value = ''
end
item
Name = 'RR48'
DataType = datInteger
Value = ''
end
item
Name = 'APROBADO'
DataType = datString
Size = 1
Value = ''
end
item
Name = 'FECHA'
DataType = datDateTime
Value = ''
end
item
Name = 'CENTRO'
DataType = datString
Size = 17
Value = ''
end
item
Name = 'CODIGO'
DataType = datString
Size = 12
Value = ''
end
item
Name = 'COLOR'
DataType = datString
Size = 10
Value = ''
end>
Statements = <
item
Connection = 'GFT_VARELA'
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 @RR36 numeric(15,0)'#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(15,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 smallint'#10#10' set @ALBARAN = :ALBA' +
'RAN'#10' set @ESTADO_ALBARAN = :ESTADO_ALBARAN'#10' set @OBSERVACI' +
'ONES_ALBARAN = :OBSERVACIONES_ALBARAN'#10' set @CONTABILIZAR_ALBA' +
'RAN = :CONTABILIZAR_ALBARAN'#10#10' set @RR36 = :RR36'#10' set @RR38' +
' = :RR38'#10' set @RR40 = :RR40'#10' set @RR42 = :RR42'#10' set @RR' +
'44 = :RR44'#10' set @RR46 = :RR46'#10' set @RR48 = :RR48'#10' set @' +
'RR_S = :RR38'#10' set @RR_M = :RR40'#10' set @RR_L = :RR42'#10' set' +
' @RR_XL = :RR44'#10#10' set @APROBADO = :APROBADO'#10' set @FECHA = ' +
':FECHA'#10' set @CENTRO = :CENTRO'#10' set @CODIGO = :CODIGO'#10' s' +
'et @COLOR = :COLOR'#10#10#10' /* *********************************** ' +
'*/'#10' if @ALBARAN <> '#39#39#10' begin'#10' update RDX_AJUSTES_A' +
'LBARAN set'#10#9' ESTADO = @ESTADO_ALBARAN,'#10#9' OBSERVACION' +
'ES = @OBSERVACIONES_ALBARAN,'#10#9' CONTABILIZAR = @CONTABILIZA' +
'R_ALBARAN'#10' where RDX_AJUSTES_ALBARAN.ALBARAN = @ALBARAN'#10 +
#10#9' select @ROWCOUNT_VAR = @@ROWCOUNT'#10#10' if @ROWCOUNT_VAR ' +
'= 0'#10#9' begin'#10' insert into RDX_AJUSTES_ALBARAN'#10' ' +
' (ALBARAN, ESTADO, OBSERVACIONES, CONTABILIZAR)'#10' ' +
' values (@ALBARAN, @ESTADO_ALBARAN,'#10' ' +
' @OBSERVACIONES_ALBARAN, @CONTABILIZAR_ALBARAN)'#10#10' se' +
'lect @ROWCOUNT_VAR = @@ROWCOUNT'#10' end'#10' end'#10#10#10' /* A' +
'RREGLO PARA QUE SOPORTE LOS NUEVOS TALLAJES*** */'#10' '#10' execu' +
'te RDX_P_TIPO_TALLAJE @CODIGO, @TIPO_TALLAJE OUTPUT'#10#10' if @TIP' +
'O_TALLAJE = 1'#10' begin'#10' set @RR_S = NULL'#10' set @RR_M' +
' = NULL'#10' set @RR_L = NULL'#10' set @RR_XL = NULL'#10' end' +
#10#10' if @TIPO_TALLAJE = 2'#10' begin'#10' set @RR36 = NULL'#10' ' +
' set @RR38 = NULL'#10' set @RR40 = NULL'#10' set @RR42 = ' +
'NULL'#10' set @RR44 = NULL'#10' set @RR46 = NULL'#10' set ' +
'@RR48 = NULL'#10' end'#10#10' '#10' /* ******************************' +
'***** */'#10#9'update RDX_RECEPCION_AJUSTES set'#10#9' CANT36 = ' +
'@RR36,'#10#9' CANT38 = @RR38,'#10#9' CANT40 = @RR40,'#10#9 +
' CANT42 = @RR42,'#10#9' CANT44 = @RR44,'#10#9' ' +
' CANT46 = @RR46,'#10#9' CANT48 = @RR48,'#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 = @APRO' +
'BADO,'#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_AJUS' +
'TES.COLOR = @COLOR and'#10#9' RDX_RECEPCION_AJUSTES.FECHA = @FEC' +
'HA)'#10#10#9'select @ROWCOUNT_VAR = @@ROWCOUNT'#10#10#9'if @ROWCOUNT_VAR = 0'#10' ' +
' begin'#10' insert into RDX_RECEPCION_AJUSTES'#10' ' +
' (FECHA, CENTRO, CODIGO, COLOR,'#10' APROBADO' +
', FECHACAMBIO, CANT36,'#10' CANT38, CANT40, CANT42,'#10 +
' CANT44, CANT46, CANT48,'#10' CANT_S' +
', CANT_M, CANT_L, CANT_XL)'#10' values ('#10' @F' +
'ECHA, @CENTRO, @CODIGO,'#10' @COLOR, @APROBADO, CURR' +
'ENT_TIMESTAMP, @RR36,'#10' @RR38, @RR40, @RR42,'#10' ' +
' @RR44, @RR46, @RR48,'#10' @RR_S, @RR_M,' +
' @RR_L, @RR_XL)'#10#10' select @ROWCOUNT_VAR = @@ROWCOUNT'#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
DisplayLabel = 'ALBARAN'
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
item
Name = 'RecepcionesAlbaran_ESTADOPRODUCTO'
DataType = datString
Size = 9
end
item
Name = 'Recepciones_E36'
DataType = datInteger
LogChanges = False
DisplayLabel = 'E36'
ReadOnly = True
Alignment = taRightJustify
end
item
Name = 'Recepciones_R36'
DataType = datFloat
LogChanges = False
DisplayLabel = 'R36'
ReadOnly = True
Alignment = taRightJustify
end
item
Name = 'Recepciones_RR36'
DataType = datFloat
DisplayLabel = 'RR36'
Alignment = taRightJustify
end>
Left = 48
Top = 104
end
object DABINAdapter: TDABINAdapter
Left = 48
Top = 168
end
end