Varela_PuntosVenta/Source/Modulos/Stock/Servidor/srvStock_Impl.dfm
2008-05-06 17:55:55 +00:00

973 lines
29 KiB
Plaintext

object srvStock: TsrvStock
OldCreateOrder = True
SessionManager = dmServer.SessionManager
AcquireConnection = True
ServiceSchema = schStock
ServiceAdapter = DABINAdapter
OnAfterProcessTransactionAction = pptaNone
OnAfterAcquireConnection = DARemoteServiceAfterAcquireConnection
ExportedDataTables = <>
CacheElements = <>
Options = [rsoProcessDeltasWithoutUpdateRules]
Height = 300
Width = 300
object DABINAdapter: TDABINAdapter
Left = 56
Top = 96
end
object schStock: TDASchema
ConnectionManager = dmServer.ConnectionManager
DataDictionary = dmServer.DataDictionary
Diagrams = dmServer.DADiagrams
Datasets = <
item
Params = <>
Statements = <
item
Connection = 'GFT_VARELA'
SQL =
'SELECT'#10' CODIGO,'#10' PRODUCTO,'#10' TIPO_PRODUCTO,'#10' ' +
'GRUPO_PRODUCTO,'#10' COLECCION,'#10' COLOR,'#10' SUM(K36) AS ' +
'T36,'#10' SUM(K38) AS T38,'#10' SUM(K40) AS T40,'#10' SUM(K42' +
') AS T42,'#10' SUM(K44) AS T44,'#10' SUM(K46) AS T46,'#10' SU' +
'M(K48) AS T48,'#10' SUM(KT) AS TOTAL'#10'FROM RDX_V_STOCK_CALCULADO' +
#10'GROUP BY CODIGO,'#10' PRODUCTO,'#10' TIPO_PRODUCTO,'#10' GRU' +
'PO_PRODUCTO,'#10' COLECCION,'#10' COLOR'#10
StatementType = stSQL
ColumnMappings = <
item
DatasetField = 'CODIGO'
TableField = 'CODIGO'
end
item
DatasetField = 'PRODUCTO'
TableField = 'PRODUCTO'
end
item
DatasetField = 'TIPO_PRODUCTO'
TableField = 'TIPO_PRODUCTO'
end
item
DatasetField = 'GRUPO_PRODUCTO'
TableField = 'GRUPO_PRODUCTO'
end
item
DatasetField = 'COLECCION'
TableField = 'COLECCION'
end
item
DatasetField = 'COLOR'
TableField = 'COLOR'
end
item
DatasetField = 'T36'
TableField = 'T36'
end
item
DatasetField = 'T38'
TableField = 'T38'
end
item
DatasetField = 'T40'
TableField = 'T40'
end
item
DatasetField = 'T42'
TableField = 'T42'
end
item
DatasetField = 'T44'
TableField = 'T44'
end
item
DatasetField = 'T46'
TableField = 'T46'
end
item
DatasetField = 'T48'
TableField = 'T48'
end
item
DatasetField = 'TOTAL'
TableField = 'TOTAL'
end>
end>
Name = 'StockPrendasCentros'
Fields = <
item
Name = 'CODIGO'
DataType = datString
Size = 12
DisplayLabel = 'C'#243'digo'
end
item
Name = 'PRODUCTO'
DataType = datString
Size = 40
DisplayLabel = 'Producto'
end
item
Name = 'TIPO_PRODUCTO'
DataType = datString
Size = 25
DisplayLabel = 'Tipo'
end
item
Name = 'GRUPO_PRODUCTO'
DataType = datString
Size = 25
DisplayLabel = 'Grupo'
end
item
Name = 'COLECCION'
DataType = datString
Size = 40
DisplayLabel = 'Colecci'#243'n'
end
item
Name = 'COLOR'
DataType = datString
Size = 10
DisplayLabel = 'Color'
end
item
Name = 'T36'
DataType = datFloat
DisplayLabel = '36'
Alignment = taRightJustify
end
item
Name = 'T38'
DataType = datFloat
DisplayLabel = '38'
Alignment = taRightJustify
end
item
Name = 'T40'
DataType = datFloat
DisplayLabel = '40'
Alignment = taRightJustify
end
item
Name = 'T42'
DataType = datFloat
DisplayLabel = '42'
Alignment = taRightJustify
end
item
Name = 'T44'
DataType = datFloat
DisplayLabel = '44'
Alignment = taRightJustify
end
item
Name = 'T46'
DataType = datFloat
DisplayLabel = '46'
Alignment = taRightJustify
end
item
Name = 'T48'
DataType = datFloat
DisplayLabel = '48'
Alignment = taRightJustify
end
item
Name = 'TOTAL'
DataType = datFloat
DisplayLabel = 'Total'
Alignment = taRightJustify
end>
end
item
Params = <>
Statements = <
item
Connection = 'GFT_VARELA'
SQL =
'SELECT'#10#10' CENTRO, FILIAL, CODIGO, PRODUCTO, TIPO_PRODUCTO, GRU' +
'PO_PRODUCTO, COLECCION, COLOR,'#10#10' SUM(E36) as E36,'#10' SUM(E38' +
') as E38,'#10' SUM(E40) as E40,'#10' SUM(E42) as E42,'#10' SUM(E44)' +
' as E44,'#10' SUM(E46) as E46,'#10' SUM(E48) as E48,'#10' (SUM(ISNU' +
'LL(E36,0)) + SUM(ISNULL(E38,0)) + SUM(ISNULL(E40,0)) + SUM(ISNUL' +
'L(E42,0)) + SUM(ISNULL(E44,0)) + SUM(ISNULL(E46,0)) + SUM(ISNULL' +
'(E48,0))) as TE,'#10#10' SUM(S36) as S36,'#10' SUM(S38) as S38,'#10' ' +
'SUM(S40) as S40,'#10' SUM(S42) as S42,'#10' SUM(S44) as S44,'#10' S' +
'UM(S46) as S46,'#10' SUM(S48) as S48,'#10' (SUM(ISNULL(S36,0)) + S' +
'UM(ISNULL(S38,0)) + SUM(ISNULL(S40,0)) + SUM(ISNULL(S42,0)) + SU' +
'M(ISNULL(S44,0)) + SUM(ISNULL(S46,0)) + SUM(ISNULL(S48,0))) as T' +
'S,'#10#10' (SUM(E36) + SUM(S36)) as K36,'#10' (SUM(E38) + SUM(S38)) ' +
'as K38,'#10' (SUM(E40) + SUM(S40)) as K40,'#10' (SUM(E42) + SUM(S4' +
'2)) as K42,'#10' (SUM(E44) + SUM(S44)) as K44,'#10' (SUM(E46) + SU' +
'M(S46)) as K46,'#10' (SUM(E48) + SUM(S48)) as K48,'#10#10' ((SUM(ISN' +
'ULL(E36,0)) + SUM(ISNULL(S36,0))) + (SUM(ISNULL(E38,0)) + SUM(IS' +
'NULL(S38,0))) + (SUM(ISNULL(E40,0)) + SUM(ISNULL(S40,0))) + (SUM' +
'(ISNULL(E42,0)) + SUM(ISNULL(S42,0))) + (SUM(ISNULL(E44,0)) + SU' +
'M(ISNULL(S44,0))) + (SUM(ISNULL(E46,0)) + SUM(ISNULL(S46,0))) + ' +
'(SUM(ISNULL(E48,0)) + SUM(ISNULL(S48,0)))) as KT'#10#10' FROM'#10' RDX' +
'_V_STOCK_CALCULADO'#10#10#10'GROUP BY CENTRO, FILIAL, CODIGO, PRODUCTO, ' +
'TIPO_PRODUCTO, GRUPO_PRODUCTO, COLECCION, COLOR'#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 = 'TIPO_PRODUCTO'
TableField = 'TIPO_PRODUCTO'
end
item
DatasetField = 'GRUPO_PRODUCTO'
TableField = 'GRUPO_PRODUCTO'
end
item
DatasetField = 'COLECCION'
TableField = 'COLECCION'
end
item
DatasetField = 'COLOR'
TableField = 'COLOR'
end
item
DatasetField = 'E36'
TableField = 'E36'
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 = 'TE'
TableField = 'TE'
end
item
DatasetField = 'S36'
TableField = 'S36'
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 = 'TS'
TableField = 'TS'
end
item
DatasetField = 'K36'
TableField = 'K36'
end
item
DatasetField = 'K38'
TableField = 'K38'
end
item
DatasetField = 'K40'
TableField = 'K40'
end
item
DatasetField = 'K42'
TableField = 'K42'
end
item
DatasetField = 'K44'
TableField = 'K44'
end
item
DatasetField = 'K46'
TableField = 'K46'
end
item
DatasetField = 'K48'
TableField = 'K48'
end
item
DatasetField = 'KT'
TableField = 'KT'
end>
end>
Name = 'StockEDI'
Fields = <
item
Name = 'CENTRO'
DataType = datString
Size = 17
end
item
Name = 'FILIAL'
DataType = datString
Size = 25
end
item
Name = 'CODIGO'
DataType = datString
Size = 12
end
item
Name = 'PRODUCTO'
DataType = datString
Size = 40
end
item
Name = 'TIPO_PRODUCTO'
DataType = datString
Size = 25
end
item
Name = 'GRUPO_PRODUCTO'
DataType = datString
Size = 25
end
item
Name = 'COLECCION'
DataType = datString
Size = 6
end
item
Name = 'COLOR'
DataType = datString
Size = 10
end
item
Name = 'E36'
DataType = datFloat
Alignment = taRightJustify
end
item
Name = 'E38'
DataType = datFloat
Alignment = taRightJustify
end
item
Name = 'E40'
DataType = datFloat
Alignment = taRightJustify
end
item
Name = 'E42'
DataType = datFloat
Alignment = taRightJustify
end
item
Name = 'E44'
DataType = datFloat
Alignment = taRightJustify
end
item
Name = 'E46'
DataType = datFloat
Alignment = taRightJustify
end
item
Name = 'E48'
DataType = datFloat
Alignment = taRightJustify
end
item
Name = 'TE'
DataType = datFloat
Alignment = taRightJustify
end
item
Name = 'S36'
DataType = datFloat
Alignment = taRightJustify
end
item
Name = 'S38'
DataType = datFloat
Alignment = taRightJustify
end
item
Name = 'S40'
DataType = datFloat
Alignment = taRightJustify
end
item
Name = 'S42'
DataType = datFloat
Alignment = taRightJustify
end
item
Name = 'S44'
DataType = datFloat
Alignment = taRightJustify
end
item
Name = 'S46'
DataType = datFloat
Alignment = taRightJustify
end
item
Name = 'S48'
DataType = datFloat
Alignment = taRightJustify
end
item
Name = 'TS'
DataType = datFloat
Alignment = taRightJustify
end
item
Name = 'K36'
DataType = datFloat
Alignment = taRightJustify
end
item
Name = 'K38'
DataType = datFloat
Alignment = taRightJustify
end
item
Name = 'K40'
DataType = datFloat
Alignment = taRightJustify
end
item
Name = 'K42'
DataType = datFloat
Alignment = taRightJustify
end
item
Name = 'K44'
DataType = datFloat
Alignment = taRightJustify
end
item
Name = 'K46'
DataType = datFloat
Alignment = taRightJustify
end
item
Name = 'K48'
DataType = datFloat
Alignment = taRightJustify
end
item
Name = 'KT'
DataType = datFloat
Alignment = taRightJustify
end>
end
item
Params = <>
Statements = <
item
Connection = 'GFT_VARELA'
SQL =
'SELECT FILIAL, CODIGO, COLOR, PRODUCTO, TIPO_PRODUTO, GRUPO_PROD' +
'UTO,'#10' COLECCION, K36, K38, K40, K42, K44, K46, K48, KT'#10' ' +
' '#10'FROM RDX_V_STOCK_VARELA'#10
StatementType = stSQL
ColumnMappings = <
item
DatasetField = 'FILIAL'
TableField = 'FILIAL'
end
item
DatasetField = 'CODIGO'
TableField = 'CODIGO'
end
item
DatasetField = 'COLOR'
TableField = 'COLOR'
end
item
DatasetField = 'PRODUCTO'
TableField = 'PRODUCTO'
end
item
DatasetField = 'TIPO_PRODUTO'
TableField = 'TIPO_PRODUTO'
end
item
DatasetField = 'GRUPO_PRODUTO'
TableField = 'GRUPO_PRODUTO'
end
item
DatasetField = 'COLECCION'
TableField = 'COLECCION'
end
item
DatasetField = 'K36'
TableField = 'K36'
end
item
DatasetField = 'K38'
TableField = 'K38'
end
item
DatasetField = 'K40'
TableField = 'K40'
end
item
DatasetField = 'K42'
TableField = 'K42'
end
item
DatasetField = 'K44'
TableField = 'K44'
end
item
DatasetField = 'K46'
TableField = 'K46'
end
item
DatasetField = 'K48'
TableField = 'K48'
end
item
DatasetField = 'KT'
TableField = 'KT'
end>
end>
Name = 'StockVARELA'
Fields = <
item
Name = 'FILIAL'
DataType = datString
Size = 25
end
item
Name = 'CODIGO'
DataType = datString
Size = 12
end
item
Name = 'COLOR'
DataType = datString
Size = 10
end
item
Name = 'PRODUCTO'
DataType = datString
Size = 40
end
item
Name = 'TIPO_PRODUTO'
DataType = datString
Size = 25
end
item
Name = 'GRUPO_PRODUTO'
DataType = datString
Size = 25
end
item
Name = 'COLECCION'
DataType = datString
Size = 40
end
item
Name = 'K36'
DataType = datInteger
Alignment = taRightJustify
end
item
Name = 'K38'
DataType = datInteger
Alignment = taRightJustify
end
item
Name = 'K40'
DataType = datInteger
Alignment = taRightJustify
end
item
Name = 'K42'
DataType = datInteger
Alignment = taRightJustify
end
item
Name = 'K44'
DataType = datInteger
Alignment = taRightJustify
end
item
Name = 'K46'
DataType = datInteger
Alignment = taRightJustify
end
item
Name = 'K48'
DataType = datInteger
Alignment = taRightJustify
end
item
Name = 'KT'
DataType = datInteger
Alignment = taRightJustify
end>
end
item
Params = <>
Statements = <
item
Connection = 'GFT_VARELA'
TargetTable = 'RDX_V_CONTROL_INVENTARIO'
SQL =
'SELECT'#10' CENTRO, FILIAL, CODIGO, PRODUCTO, COLOR, TIPO_PRODUCT' +
'O, GRUPO_PRODUCTO, COLECCION,'#10#10' SUM(I36) as I36,'#10' SUM(I38)' +
' as I38,'#10' SUM(I40) as I40,'#10' SUM(I42) as I42,'#10' SUM(I44) ' +
'as I44,'#10' SUM(I46) as I46,'#10' SUM(I48) as I48,'#10' (SUM(I36) ' +
'+ SUM(I38) + SUM(I40) + SUM(I42) + SUM(I44) + SUM(I46) + SUM(I48' +
')) as TI,'#10#10' SUM(K36) as K36,'#10' SUM(K38) as K38,'#10' SUM(K40' +
') as K40,'#10' SUM(K42) as K42,'#10' SUM(K44) as K44,'#10' SUM(K46)' +
' as K46,'#10' SUM(K48) as K48,'#10' (SUM(K36) + SUM(K38) + SUM(K40' +
') + SUM(K42) + SUM(K44) + SUM(K46) + SUM(K48)) as TK,'#10#10' (SUM(' +
'I36) - SUM(K36)) as D36,'#10' (SUM(I38) - SUM(K38)) as D38,'#10' (' +
'SUM(I40) - SUM(K40)) as D40,'#10' (SUM(I42) - SUM(K42)) as D42,'#10' ' +
' (SUM(I44) - SUM(K44)) as D44,'#10' (SUM(I46) - SUM(K46)) as D4' +
'6,'#10' (SUM(I48) - SUM(K48)) as D48,'#10#10' ((SUM(I36) - SUM(K36))' +
' + (SUM(I38) - SUM(K38)) + (SUM(I40) - SUM(K40)) + (SUM(I42) - S' +
'UM(K42)) + (SUM(I44) - SUM(K44)) + (SUM(I46) - SUM(K46)) + (SUM(' +
'I48) - SUM(K48))) as DT'#10#10' FROM'#10' RDX_V_CONTROL_INVENTARIO'#10#10'GR' +
'OUP BY CENTRO, FILIAL, CODIGO, PRODUCTO, COLOR, TIPO_PRODUCTO, G' +
'RUPO_PRODUCTO, COLECCION'#10#10'having ((SUM(I36) - SUM(K36)) + (SUM(I' +
'38) - SUM(K38)) + (SUM(I40) - SUM(K40)) +'#10' (SUM(I42) - SUM' +
'(K42)) + (SUM(I44) - SUM(K44)) +'#10' (SUM(I46) - SUM(K46)) + ' +
'(SUM(I48) - SUM(K48)) <> 0)'#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 = 'TIPO_PRODUCTO'
TableField = 'TIPO_PRODUCTO'
end
item
DatasetField = 'GRUPO_PRODUCTO'
TableField = 'GRUPO_PRODUCTO'
end
item
DatasetField = 'COLECCION'
TableField = 'COLECCION'
end
item
DatasetField = 'I36'
TableField = 'I36'
end
item
DatasetField = 'I38'
TableField = 'I38'
end
item
DatasetField = 'I40'
TableField = 'I40'
end
item
DatasetField = 'I42'
TableField = 'I42'
end
item
DatasetField = 'I44'
TableField = 'I44'
end
item
DatasetField = 'I46'
TableField = 'I46'
end
item
DatasetField = 'I48'
TableField = 'I48'
end
item
DatasetField = 'TI'
TableField = '<unknown>'
SQLOrigin = 'TI'
end
item
DatasetField = 'K36'
TableField = 'K36'
end
item
DatasetField = 'K38'
TableField = 'K38'
end
item
DatasetField = 'K40'
TableField = 'K40'
end
item
DatasetField = 'K42'
TableField = 'K42'
end
item
DatasetField = 'K44'
TableField = 'K44'
end
item
DatasetField = 'K46'
TableField = 'K46'
end
item
DatasetField = 'K48'
TableField = 'K48'
end
item
DatasetField = 'TK'
TableField = '<unknown>'
SQLOrigin = 'TK'
end
item
DatasetField = 'D36'
TableField = '<unknown>'
SQLOrigin = 'D36'
end
item
DatasetField = 'D38'
TableField = '<unknown>'
SQLOrigin = 'D38'
end
item
DatasetField = 'D40'
TableField = '<unknown>'
SQLOrigin = 'D40'
end
item
DatasetField = 'D42'
TableField = '<unknown>'
SQLOrigin = 'D42'
end
item
DatasetField = 'D44'
TableField = '<unknown>'
SQLOrigin = 'D44'
end
item
DatasetField = 'D46'
TableField = '<unknown>'
SQLOrigin = 'D46'
end
item
DatasetField = 'D48'
TableField = '<unknown>'
SQLOrigin = 'D48'
end
item
DatasetField = 'DT'
TableField = '<unknown>'
SQLOrigin = 'DT'
end>
end>
Name = 'StockEDIInventario'
Fields = <
item
Name = 'CENTRO'
DataType = datString
Size = 17
end
item
Name = 'FILIAL'
DataType = datString
Size = 25
end
item
Name = 'CODIGO'
DataType = datString
Size = 12
end
item
Name = 'PRODUCTO'
DataType = datString
Size = 40
end
item
Name = 'COLOR'
DataType = datString
Size = 10
end
item
Name = 'TIPO_PRODUCTO'
DataType = datString
Size = 25
end
item
Name = 'GRUPO_PRODUCTO'
DataType = datString
Size = 25
end
item
Name = 'COLECCION'
DataType = datString
Size = 6
end
item
Name = 'I36'
DataType = datFloat
end
item
Name = 'I38'
DataType = datFloat
end
item
Name = 'I40'
DataType = datFloat
end
item
Name = 'I42'
DataType = datFloat
end
item
Name = 'I44'
DataType = datFloat
end
item
Name = 'I46'
DataType = datFloat
end
item
Name = 'I48'
DataType = datFloat
end
item
Name = 'TI'
DataType = datFloat
end
item
Name = 'K36'
DataType = datFloat
ServerAutoRefresh = True
end
item
Name = 'K38'
DataType = datFloat
end
item
Name = 'K40'
DataType = datFloat
end
item
Name = 'K42'
DataType = datFloat
end
item
Name = 'K44'
DataType = datFloat
end
item
Name = 'K46'
DataType = datFloat
end
item
Name = 'K48'
DataType = datFloat
end
item
Name = 'TK'
DataType = datFloat
end
item
Name = 'D36'
DataType = datFloat
end
item
Name = 'D38'
DataType = datFloat
end
item
Name = 'D40'
DataType = datFloat
end
item
Name = 'D42'
DataType = datFloat
end
item
Name = 'D44'
DataType = datFloat
end
item
Name = 'D46'
DataType = datFloat
end
item
Name = 'D48'
DataType = datFloat
end
item
Name = 'DT'
DataType = datFloat
end>
end>
JoinDataTables = <>
UnionDataTables = <>
Commands = <>
RelationShips = <>
UpdateRules = <>
Version = 0
Left = 56
Top = 32
end
end