Varela_PuntosVenta/Source/Modulos/VentasTerminadas/Servidor/srvVentasTerminadas_Impl.dfm
2007-08-01 16:16:26 +00:00

672 lines
21 KiB
Plaintext

object srvVentasTerminadas: TsrvVentasTerminadas
OldCreateOrder = True
SessionManager = dmServer.SessionManager
AcquireConnection = True
ServiceSchema = schVentasTerminadas
ServiceAdapter = DABINAdapter
Left = 466
Top = 271
Height = 297
Width = 298
object schVentasTerminadas: TDASchema
ConnectionManager = dmServer.ConnectionManager
DataDictionary = dmServer.DataDictionary
Diagrams = dmServer.DADiagrams
Datasets = <
item
Params = <
item
Name = 'fechaini'
DataType = datString
BlobType = dabtUnknown
Value = ''
ParamType = daptInput
end
item
Name = 'fechafin'
DataType = datString
BlobType = dabtUnknown
Value = ''
ParamType = daptInput
end
item
Name = 'coleccion'
DataType = datString
BlobType = dabtUnknown
Value = ''
ParamType = daptInput
end>
Statements = <
item
Connection = 'GFT_VARELA'
SQL =
'begin'#10' declare @fechaini varchar(10)'#10' declare @fechafin ' +
'varchar(10)'#10' declare @coleccion varchar(10)'#10' declare @sq' +
'l varchar(8000)'#10#10' set @fechaini = :fechaini'#10' set @fechaf' +
'in = :fechafin'#10' set @coleccion = :coleccion'#10#10' select @sq' +
'l = '#39'SELECT DIA, SUM(VALTOT) AS TOTAL FROM RDX_V_VENTASTERMINADA' +
'S WHERE FECHA BETWEEN '#39#39#39' + @FECHAINI + '#39#39#39' AND '#39#39#39' + @FECHAFIN ' +
'+ '#39#39#39' AND COLECCION LIKE '#39#39#39' + @COLECCION + '#39#39#39' GROUP BY DIA'#39#10#10' ' +
' EXECUTE crosstab @sql,'#10' '#39'SUM(VALTOT)'#39','#10' ' +
' '#39'CENTRO'#39','#10' '#39'RDX_V_VENTASTERMINADAS'#39#10'end'
StatementType = stSQL
ColumnMappings = <>
end>
Name = 'VentasTerminadasCrossTab'
Fields = <>
BusinessRulesClient.ScriptLanguage = rslPascalScript
BusinessRulesServer.ScriptLanguage = rslPascalScript
end
item
Params = <
item
Name = 'FECHAINI'
BlobType = dabtUnknown
Value = '2006/01/01'
ParamType = daptInput
end
item
Name = 'FECHAFIN'
BlobType = dabtUnknown
Value = '2006/12/12'
ParamType = daptInput
end>
Statements = <
item
Connection = 'GFT_VARELA'
SQL =
'SELECT '#10' NUMINF, CLAVE1, CLAVE2, CLAVE3, FECHA, DIA, DIASEMAN' +
'A, '#10' MES, ANO, CENTRO, VENDEDOR, NUMTALON, CODIGO, PRODUCTO,'#10 +
' GRUPOPRODUCTO, TIPOPRODUCTO, COLECCION, COLOR,'#10' TALLA, TA' +
'LLA38, TALLA40, TALLA42, TALLA44, TALLA46, '#10' TALLA48, VTATERM' +
'DEV, VTAFINALRESC, VENTAS, DEVOLUCIONES, TOTAL,'#10' VALTERMDEV, ' +
'VALFINALRESC, VALVEN, VALDEV, VALTOT'#10' FROM'#10' RDX_V_VENTASTERM' +
'INADAS'#10' WHERE FECHA BETWEEN :FECHAINI AND :FECHAFIN'
StatementType = stSQL
ColumnMappings = <
item
DatasetField = 'FECHA'
TableField = 'FECHA'
end
item
DatasetField = 'CENTRO'
TableField = 'CENTRO'
end
item
DatasetField = 'VENDEDOR'
TableField = 'VENDEDOR'
end
item
DatasetField = 'PRODUCTO'
TableField = 'PRODUCTO'
end
item
DatasetField = 'COLOR'
TableField = 'COLOR'
end
item
DatasetField = 'TALLA'
TableField = 'TALLA'
end
item
DatasetField = 'TALLA38'
TableField = 'TALLA38'
end
item
DatasetField = 'TALLA40'
TableField = 'TALLA40'
end
item
DatasetField = 'TALLA42'
TableField = 'TALLA42'
end
item
DatasetField = 'TALLA44'
TableField = 'TALLA44'
end
item
DatasetField = 'TALLA46'
TableField = 'TALLA46'
end
item
DatasetField = 'TALLA48'
TableField = 'TALLA48'
end
item
DatasetField = 'VENTAS'
TableField = 'VENTAS'
end
item
DatasetField = 'DEVOLUCIONES'
TableField = 'DEVOLUCIONES'
end
item
DatasetField = 'TOTAL'
TableField = 'TOTAL'
end
item
DatasetField = 'NUMINF'
TableField = 'NUMINF'
end
item
DatasetField = 'CLAVE1'
TableField = 'CLAVE1'
end
item
DatasetField = 'CLAVE2'
TableField = 'CLAVE2'
end
item
DatasetField = 'CLAVE3'
TableField = 'CLAVE3'
end
item
DatasetField = 'CODIGO'
TableField = 'CODIGO'
end
item
DatasetField = 'DIA'
TableField = 'DIA'
end
item
DatasetField = 'DIASEMANA'
TableField = 'DIASEMANA'
end
item
DatasetField = 'MES'
TableField = 'MES'
end
item
DatasetField = 'ANO'
TableField = 'ANO'
end
item
DatasetField = 'GRUPOPRODUCTO'
TableField = 'GRUPOPRODUCTO'
end
item
DatasetField = 'TIPOPRODUCTO'
TableField = 'TIPOPRODUCTO'
end
item
DatasetField = 'COLECCION'
TableField = 'COLECCION'
end
item
DatasetField = 'VALVEN'
TableField = 'VALVEN'
end
item
DatasetField = 'VALDEV'
TableField = 'VALDEV'
end
item
DatasetField = 'VALTOT'
TableField = 'VALTOT'
end
item
DatasetField = 'NUMTALON'
TableField = 'NUMTALON'
end
item
DatasetField = 'VTATERMDEV'
TableField = 'VTATERMDEV'
end
item
DatasetField = 'VTAFINALRESC'
TableField = 'VTAFINALRESC'
end
item
DatasetField = 'VALTERMDEV'
TableField = 'VALTERMDEV'
end
item
DatasetField = 'VALFINALRESC'
TableField = 'VALFINALRESC'
end>
end>
Name = 'VentasTerminadas'
Fields = <
item
Name = 'NUMINF'
DataType = datString
Size = 35
BlobType = dabtUnknown
DisplayWidth = 0
Alignment = taLeftJustify
InPrimaryKey = True
Calculated = False
Lookup = False
LookupCache = False
end
item
Name = 'CLAVE1'
DataType = datFloat
BlobType = dabtUnknown
DisplayWidth = 0
Alignment = taLeftJustify
InPrimaryKey = True
Calculated = False
Lookup = False
LookupCache = False
end
item
Name = 'CLAVE2'
DataType = datInteger
BlobType = dabtUnknown
DisplayWidth = 0
Alignment = taLeftJustify
InPrimaryKey = True
Calculated = False
Lookup = False
LookupCache = False
end
item
Name = 'CLAVE3'
DataType = datInteger
BlobType = dabtUnknown
DisplayWidth = 0
Alignment = taLeftJustify
InPrimaryKey = True
Calculated = False
Lookup = False
LookupCache = False
end
item
Name = 'FECHA'
DataType = datDateTime
BlobType = dabtUnknown
DisplayWidth = 0
DisplayLabel = 'Fecha'
Alignment = taLeftJustify
InPrimaryKey = False
Calculated = False
Lookup = False
LookupCache = False
end
item
Name = 'DIA'
DataType = datInteger
BlobType = dabtUnknown
DisplayWidth = 0
DisplayLabel = 'D'#237'a'
Alignment = taLeftJustify
InPrimaryKey = False
Calculated = False
Lookup = False
LookupCache = False
end
item
Name = 'DIASEMANA'
DataType = datString
Size = 30
BlobType = dabtUnknown
DisplayWidth = 0
DisplayLabel = 'D'#237'a de la semana'
Alignment = taLeftJustify
InPrimaryKey = False
Calculated = False
Lookup = False
LookupCache = False
end
item
Name = 'MES'
DataType = datString
Size = 30
BlobType = dabtUnknown
DisplayWidth = 0
DisplayLabel = 'Mes'
Alignment = taLeftJustify
InPrimaryKey = False
Calculated = False
Lookup = False
LookupCache = False
end
item
Name = 'ANO'
DataType = datInteger
BlobType = dabtUnknown
DisplayWidth = 0
DisplayLabel = 'A'#241'o'
Alignment = taLeftJustify
InPrimaryKey = False
Calculated = False
Lookup = False
LookupCache = False
end
item
Name = 'CENTRO'
DataType = datString
Size = 25
BlobType = dabtUnknown
DisplayWidth = 0
DisplayLabel = 'Centro'
Alignment = taLeftJustify
InPrimaryKey = False
Calculated = False
Lookup = False
LookupCache = False
end
item
Name = 'VENDEDOR'
DataType = datString
Size = 66
BlobType = dabtUnknown
DisplayWidth = 0
DisplayLabel = 'Vendedor'
Alignment = taLeftJustify
InPrimaryKey = False
Calculated = False
Lookup = False
LookupCache = False
end
item
Name = 'NUMTALON'
DataType = datString
Size = 35
BlobType = dabtUnknown
DisplayWidth = 0
Alignment = taLeftJustify
InPrimaryKey = False
Calculated = False
Lookup = False
LookupCache = False
end
item
Name = 'CODIGO'
DataType = datString
Size = 12
BlobType = dabtUnknown
DisplayWidth = 0
DisplayLabel = 'C'#243'digo producto'
Alignment = taLeftJustify
InPrimaryKey = False
Calculated = False
Lookup = False
LookupCache = False
end
item
Name = 'PRODUCTO'
DataType = datString
Size = 40
BlobType = dabtUnknown
DisplayWidth = 0
DisplayLabel = 'Producto'
Alignment = taLeftJustify
InPrimaryKey = False
Calculated = False
Lookup = False
LookupCache = False
end
item
Name = 'GRUPOPRODUCTO'
DataType = datString
Size = 25
BlobType = dabtUnknown
DisplayWidth = 0
DisplayLabel = 'Grupo'
Alignment = taLeftJustify
InPrimaryKey = False
Calculated = False
Lookup = False
LookupCache = False
end
item
Name = 'TIPOPRODUCTO'
DataType = datString
Size = 25
BlobType = dabtUnknown
DisplayWidth = 0
DisplayLabel = 'Tipo'
Alignment = taLeftJustify
InPrimaryKey = False
Calculated = False
Lookup = False
LookupCache = False
end
item
Name = 'COLECCION'
DataType = datString
Size = 40
BlobType = dabtUnknown
DisplayWidth = 0
DisplayLabel = 'Colecci'#243'n'
Alignment = taLeftJustify
InPrimaryKey = False
Calculated = False
Lookup = False
LookupCache = False
end
item
Name = 'COLOR'
DataType = datString
Size = 10
BlobType = dabtUnknown
DisplayWidth = 0
DisplayLabel = 'Color'
Alignment = taLeftJustify
InPrimaryKey = False
Calculated = False
Lookup = False
LookupCache = False
end
item
Name = 'TALLA'
DataType = datString
Size = 8
BlobType = dabtUnknown
DisplayWidth = 0
DisplayLabel = 'Talla'
Alignment = taRightJustify
InPrimaryKey = False
Calculated = False
Lookup = False
LookupCache = False
end
item
Name = 'TALLA38'
DataType = datFloat
BlobType = dabtUnknown
DisplayWidth = 0
DisplayLabel = '38'
Alignment = taRightJustify
InPrimaryKey = False
Calculated = False
Lookup = False
LookupCache = False
end
item
Name = 'TALLA40'
DataType = datFloat
BlobType = dabtUnknown
DisplayWidth = 0
DisplayLabel = '40'
Alignment = taRightJustify
InPrimaryKey = False
Calculated = False
Lookup = False
LookupCache = False
end
item
Name = 'TALLA42'
DataType = datFloat
BlobType = dabtUnknown
DisplayWidth = 0
DisplayLabel = '42'
Alignment = taRightJustify
InPrimaryKey = False
Calculated = False
Lookup = False
LookupCache = False
end
item
Name = 'TALLA44'
DataType = datFloat
BlobType = dabtUnknown
DisplayWidth = 0
DisplayLabel = '44'
Alignment = taRightJustify
InPrimaryKey = False
Calculated = False
Lookup = False
LookupCache = False
end
item
Name = 'TALLA46'
DataType = datFloat
BlobType = dabtUnknown
DisplayWidth = 0
DisplayLabel = '46'
Alignment = taRightJustify
InPrimaryKey = False
Calculated = False
Lookup = False
LookupCache = False
end
item
Name = 'TALLA48'
DataType = datFloat
BlobType = dabtUnknown
DisplayWidth = 0
DisplayLabel = '48'
Alignment = taRightJustify
InPrimaryKey = False
Calculated = False
Lookup = False
LookupCache = False
end
item
Name = 'VTATERMDEV'
DataType = datFloat
BlobType = dabtUnknown
DisplayWidth = 0
DisplayLabel = 'Vta.Term/Dev'
Alignment = taRightJustify
InPrimaryKey = False
Calculated = False
Lookup = False
LookupCache = False
end
item
Name = 'VTAFINALRESC'
DataType = datFloat
BlobType = dabtUnknown
DisplayWidth = 0
DisplayLabel = 'Vta.Final/Resc'
Alignment = taRightJustify
InPrimaryKey = False
Calculated = False
Lookup = False
LookupCache = False
end
item
Name = 'VENTAS'
DataType = datFloat
BlobType = dabtUnknown
DisplayWidth = 0
DisplayLabel = 'Ventas'
Alignment = taRightJustify
InPrimaryKey = False
Calculated = False
Lookup = False
LookupCache = False
end
item
Name = 'DEVOLUCIONES'
DataType = datFloat
BlobType = dabtUnknown
DisplayWidth = 0
DisplayLabel = 'Devoluciones'
Alignment = taRightJustify
InPrimaryKey = False
Calculated = False
Lookup = False
LookupCache = False
end
item
Name = 'TOTAL'
DataType = datFloat
BlobType = dabtUnknown
DisplayWidth = 0
DisplayLabel = 'Total ventas'
Alignment = taRightJustify
InPrimaryKey = False
Calculated = False
Lookup = False
LookupCache = False
end
item
Name = 'VALTERMDEV'
DataType = datFloat
BlobType = dabtUnknown
DisplayWidth = 0
DisplayLabel = 'Val.Term/Dev'
Alignment = taRightJustify
InPrimaryKey = False
Calculated = False
Lookup = False
LookupCache = False
end
item
Name = 'VALFINALRESC'
DataType = datFloat
BlobType = dabtUnknown
DisplayWidth = 0
DisplayLabel = 'Val.Final/Resc'
Alignment = taRightJustify
InPrimaryKey = False
Calculated = False
Lookup = False
LookupCache = False
end
item
Name = 'VALVEN'
DataType = datFloat
BlobType = dabtUnknown
DisplayWidth = 0
DisplayLabel = 'Imp. ventas'
Alignment = taRightJustify
InPrimaryKey = False
Calculated = False
Lookup = False
LookupCache = False
end
item
Name = 'VALDEV'
DataType = datFloat
BlobType = dabtUnknown
DisplayWidth = 0
DisplayLabel = 'Imp. devoluciones'
Alignment = taRightJustify
InPrimaryKey = False
Calculated = False
Lookup = False
LookupCache = False
end
item
Name = 'VALTOT'
DataType = datFloat
BlobType = dabtUnknown
DisplayWidth = 0
DisplayLabel = 'Imp. Total'
Alignment = taRightJustify
InPrimaryKey = False
Calculated = False
Lookup = False
LookupCache = False
end>
BusinessRulesClient.ScriptLanguage = rslPascalScript
BusinessRulesServer.ScriptLanguage = rslPascalScript
end>
Commands = <>
RelationShips = <>
UpdateRules = <>
Left = 56
Top = 32
end
object DABINAdapter: TDABINAdapter
Left = 56
Top = 96
end
end