Archivado/Varela_PuntosVenta
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

Cambios para contemplar tallas nuevas en ajustes

Browse Source 
git-svn-id: https://192.168.0.254/svn/Proyectos.Varela_PuntosVenta/trunk@87 1c943782-d109-9647-9548-93b3ac332352
This commit is contained in:
David Arranz 2007-10-05 18:43:32 +00:00
parent e8e2ae53c7
commit b32185c030
24 changed files with 812 additions and 1581 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

10
Database/3 - procedimientos.sql
View File

@ -258,6 +258,16 @@ BEGIN
END
GO
CREATE PROCEDURE dbo.RDX_P_TIPO_TALLAJE
@PRODUCTO VARCHAR(12)
AS
BEGIN
SELECT DISTINCT RDX_TALLAS.TIPO_TALLAJE
FROM PRODUTOS_BARRA
LEFT JOIN RDX_TALLAS ON (PRODUTOS_BARRA.GRADE = RDX_TALLAS.TALLA)
WHERE PRODUTOS_BARRA.PRODUTO = @PRODUCTO
END
GO
/* EOF */

11
Database/SCRIPT MEJORAS TABLAS.SQL
View File

@ -70,6 +70,17 @@ ALTER TABLE [dbo].[RDX_DEVOLUCION_AJUSTES]
ADD [CANT_XL] numeric(15, 0) NULL
GO
CREATE PROCEDURE dbo.RDX_P_TIPO_TALLAJE
@PRODUCTO VARCHAR(12)
AS
BEGIN
SELECT DISTINCT RDX_TALLAS.TIPO_TALLAJE
FROM PRODUTOS_BARRA
LEFT JOIN RDX_TALLAS ON (PRODUTOS_BARRA.GRADE = RDX_TALLAS.TALLA)
WHERE PRODUTOS_BARRA.PRODUTO = @PRODUCTO
END
GO
/*--------------- SQL ---------------*/
IF EXISTS (SELECT * FROM sysobjects WHERE id = OBJECT_ID(N'[RDX_INVENTARIOEDI]') AND OBJECTPROPERTY(id, N'IsUserTable') = 1)

4
Source/Base/BaseD10.drc
View File

@ -13,7 +13,7 @@ BEGIN
END
/* C:\Varela_D2007\Source\Base\uConfigurarConexion.dfm */
/* C:\Varela_D2007\Source\Base\uDataModuleBase.dfm */
/* C:\Varela_D2007\Source\Base\uDataModuleBase.DFM */
/* C:\Varela_D2007\Source\Base\uViewBase.dfm */
/* C:\Varela_D2007\Source\Base\uEditorBase.dfm */
/* C:\Varela_D2007\Source\Base\uViewGridBase.dfm */
@ -26,4 +26,4 @@ END
/* C:\Varela_D2007\Source\Base\uViewBarraSeleccion.dfm */
/* C:\Varela_D2007\Source\Base\uViewGrid.dfm */
/* C:\Varela_D2007\Source\Base\BaseD10.res */
/* C:\DOCUME~1\Usuario\CONFIG~1\Temp\dtf1A.tmp */
/* C:\Varela_D2007\Source\Base\BaseD10.drf */

4
Source/CargaEDI/CargaEDI.drc
View File

@ -12,7 +12,7 @@ STRINGTABLE
BEGIN
END
/* C:\Archivos de programa\CodeGear\RAD Studio\5.0\Lib\WindowsXP.res */
/* c:\archivos de programa\codegear\rad studio\5.0\lib\WindowsXP.res */
/* C:\Varela_D2007\Source\CargaEDI\uCargaEDI.dfm */
/* C:\Varela_D2007\Source\CargaEDI\CargaEDI.res */
/* C:\DOCUME~1\Usuario\CONFIG~1\Temp\dtf36.tmp */
/* C:\Varela_D2007\Source\CargaEDI\CargaEDI.drf */

8
Source/Cliente/AdminPV.drc
View File

@ -12,11 +12,11 @@ STRINGTABLE
BEGIN
END
/* C:\Archivos de programa\CodeGear\RAD Studio\5.0\Lib\WindowsXP.res */
/* C:\Varela_D2007\Lib\JVCL\JvXPCore.res */
/* C:\Varela_D2007\Lib\JVCL\JvXPBar.res */
/* c:\archivos de programa\codegear\rad studio\5.0\lib\WindowsXP.res */
/* c:\varela_d2007\lib\jvcl\JvXPCore.res */
/* c:\varela_d2007\lib\jvcl\JvXPBar.res */
/* C:\Varela_D2007\Source\Cliente\uSplash.dfm */
/* C:\Varela_D2007\Source\Cliente\uAcercaDe.dfm */
/* C:\Varela_D2007\Source\Cliente\uPantallaPrincipal.dfm */
/* C:\Varela_D2007\Source\Cliente\AdminPV.res */
/* C:\DOCUME~1\Usuario\CONFIG~1\Temp\dtf34.tmp */
/* C:\Varela_D2007\Source\Cliente\AdminPV.drf */

2
Source/Configuracion/Configuracion.drc
View File

@ -14,4 +14,4 @@ END
/* C:\Varela_D2007\Source\Configuracion\uPanelControl.dfm */
/* C:\Varela_D2007\Source\Configuracion\Configuracion.res */
/* C:\DOCUME~1\Usuario\CONFIG~1\Temp\dtf22.tmp */
/* C:\Varela_D2007\Source\Configuracion\Configuracion.drf */

4
Source/ControlesBase/ControlesBaseD10.drc
View File

@ -15,7 +15,7 @@ END
/* C:\Varela_D2007\Source\ControlesBase\Cliente\uFormPropiedadesControl.dfm */
/* C:\Varela_D2007\Source\ControlesBase\Cliente\uViewControlesBase.dfm */
/* C:\Varela_D2007\Source\ControlesBase\Cliente\uEditorControlesBase.dfm */
/* C:\Varela_D2007\Source\ControlesBase\Cliente\uDataModuleControles.dfm */
/* C:\Varela_D2007\Source\ControlesBase\Cliente\uDataModuleControles.DFM */
/* C:\Varela_D2007\Source\ControlesBase\Cliente\uViewControlGrid.dfm */
/* C:\Varela_D2007\Source\ControlesBase\Cliente\uViewParametrosControlGrid.dfm */
/* C:\Varela_D2007\Source\ControlesBase\Cliente\uViewAgrupaciones.dfm */
@ -26,4 +26,4 @@ END
/* C:\Varela_D2007\Source\ControlesBase\Cliente\uEditorControlBase.dfm */
/* C:\Varela_D2007\Source\ControlesBase\Cliente\uViewPeriodoFechas.dfm */
/* C:\Varela_D2007\Source\ControlesBase\ControlesBaseD10.res */
/* C:\DOCUME~1\Usuario\CONFIG~1\Temp\dtf1C.tmp */
/* C:\Varela_D2007\Source\ControlesBase\ControlesBaseD10.drf */

4
Source/Modulos/Devoluciones/Cliente/Devoluciones.drc
View File

@ -12,10 +12,10 @@ STRINGTABLE
BEGIN
END
/* C:\Varela_D2007\Source\Modulos\Devoluciones\Cliente\uDataModuleDevoluciones.dfm */
/* C:\Varela_D2007\Source\Modulos\Devoluciones\Cliente\uDataModuleDevoluciones.DFM */
/* C:\Varela_D2007\Source\Modulos\Devoluciones\Cliente\uViewListaDevoluciones.dfm */
/* C:\Varela_D2007\Source\Modulos\Devoluciones\Cliente\uEditorListaDevoluciones.dfm */
/* C:\Varela_D2007\Source\Modulos\Devoluciones\Cliente\uPluginControllerDevoluciones.dfm */
/* C:\Varela_D2007\Source\Modulos\Devoluciones\Cliente\uEditorAjustarDevoluciones.dfm */
/* C:\Varela_D2007\Source\Modulos\Devoluciones\Cliente\Devoluciones.res */
/* C:\DOCUME~1\Usuario\CONFIG~1\Temp\dtf2E.tmp */
/* C:\Varela_D2007\Source\Modulos\Devoluciones\Cliente\Devoluciones.drf */

85
Source/Modulos/Devoluciones/Servidor/srvDevoluciones_Impl.dfm
View File

@ -1190,42 +1190,55 @@ object srvDevoluciones: TsrvDevoluciones
'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'
'lare @ER46 numeric(15,0)'#10' declare @ER48 numeric(15,0)'#10' dec' +
'lare @ER_S numeric(15,0)'#10' declare @ER_M numeric(15,0)'#10' dec' +
'lare @ER_L numeric(15,0)'#10' declare @ER_XL numeric(15,0)'#10#10#10' ' +
'declare @APROBADO char(1)'#10' declare @FECHA datetime'#10' declar' +
'e @CENTRO varchar(17)'#10' declare @CODIGO varchar(12)'#10' declar' +
'e @COLOR varchar(10)'#10#10' declare @TIPO_TALLAJE smallint'#10#10' se' +
't @NUMHOJA = :NUMHOJA'#10' set @ESTADO_HOJA = :ESTADO_HOJA'#10' se' +
't @OBSERVACIONES_HOJA = :OBSERVACIONES_HOJA'#10' set @CONTABILIZA' +
'R_HOJA = :CONTABILIZAR_HOJA'#10#10' set @ER38 = :ER38'#10' set @ER40' +
' = :ER40'#10' set @ER42 = :ER42'#10' set @ER44 = :ER44'#10' set @ER' +
'46 = :ER46'#10' set @ER48 = :ER48'#10' set @ER_S = :ER38'#10' set @' +
'ER_M = :ER40'#10' set @ER_L = :ER42'#10' set @ER_XL = :ER44'#10#10' s' +
'et @APROBADO = :APROBADO'#10' set @FECHA = :FECHA'#10' set @CENTRO' +
' = :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 = @OBSERVAC' +
'IONES_HOJA,'#10#9#9' CONTABILIZAR = @CONTABILIZAR_HOJA'#10#9' whe' +
're 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' val' +
'ues (@NUMHOJA, @ESTADO_HOJA,'#10#9' @OBSERVACIONES_H' +
'OJA, @CONTABILIZAR_HOJA)'#10#9' end'#10' end'#10#10' /* ARREGLO PARA ' +
'QUE SOPORTE LOS NUEVOS TALLAJES*** */'#10#10' execute @TIPO_TALLAJE' +
' = RDX_P_TIPO_TALLAJE @CODIGO'#10#10' if @TIPO_TALLAJE = 1'#10' begi' +
'n'#10' set @ER_S = 0'#10' set @ER_M = 0'#10' set @ER_L = 0' +
#10' set @ER_XL = 0'#10' end'#10' else'#10' begin'#10' set @ER' +
'38 = 0'#10' set @ER40 = 0'#10' set @ER42 = 0'#10' set @ER4' +
'4 = 0'#10' end'#10#10' /* *********************************** */'#10#9'up' +
'date RDX_DEVOLUCION_AJUSTES set'#10#9' CANT38 = @ER38,'#10#9' ' +
' CANT40 = @ER40,'#10#9' CANT42 = @ER42,'#10#9' ' +
'CANT44 = @ER44,'#10#9' CANT46 = @ER46,'#10#9' CANT48 =' +
' @ER48,'#10#9' CANT_S = @ER_S,'#10#9' CANT_M = @ER_M,'#10 +
#9' CANT_L = @ER_L,'#10#9' CANT_XL = @ER_XL,'#10' ' +
' APROBADO = @APROBADO,'#10' FECHACAMBIO = CURR' +
'ENT_TIMESTAMP'#10#9'where'#10' (RDX_DEVOLUCION_AJUSTES.CENTRO' +
' = @CENTRO and'#10#9' RDX_DEVOLUCION_AJUSTES.CODIGO = @CODIGO an' +
'd'#10#9' RDX_DEVOLUCION_AJUSTES.COLOR = @COLOR and'#10#9' RDX_DE' +
'VOLUCION_AJUSTES.FECHA = @FECHA)'#10#10#9'select @ROWCOUNT_VAR = @@ROWC' +
'OUNT'#10#10#9'if @ROWCOUNT_VAR = 0'#10' begin'#10' insert into RDX_D' +
'EVOLUCION_AJUSTES'#10' (FECHA, CENTRO, CODIGO, COLOR,' +
#10' APROBADO, FECHACAMBIO,'#10' CANT38' +
', CANT40, CANT42,'#10' CANT44, CANT46, CANT48,'#10' ' +
' CANT_S, CANT_M, CANT_L, CANT_XL)'#10' values ('#10' ' +
' @FECHA, @CENTRO, @CODIGO,'#10' @COLO' +
'R, @APROBADO, CURRENT_TIMESTAMP,'#10' @ER38, @ER40, ' +
'@ER42,'#10' @ER44, @ER46, @ER48,'#10' @E' +
'R_S, @ER_M, @ER_L, @ER_XL)'#10' end'#10'end'#10
StatementType = stSQL
ColumnMappings = <>
end>

4
Source/Modulos/FicherosEDI/Cliente/FicherosEDI.drc
View File

@ -13,9 +13,9 @@ BEGIN
END
/* C:\Varela_D2007\Source\Modulos\FicherosEDI\Cliente\uAsistenteCargaFicheros.dfm */
/* C:\Varela_D2007\Source\Modulos\FicherosEDI\Cliente\uDataModuleFicherosEDI.dfm */
/* C:\Varela_D2007\Source\Modulos\FicherosEDI\Cliente\uDataModuleFicherosEDI.DFM */
/* C:\Varela_D2007\Source\Modulos\FicherosEDI\Cliente\uViewHistorialCargasEDI.dfm */
/* C:\Varela_D2007\Source\Modulos\FicherosEDI\Cliente\uEditorHistorialCargasEDI.dfm */
/* C:\Varela_D2007\Source\Modulos\FicherosEDI\Cliente\uPluginControllerFicherosEDI.dfm */
/* C:\Varela_D2007\Source\Modulos\FicherosEDI\Cliente\FicherosEDI.res */
/* C:\DOCUME~1\Usuario\CONFIG~1\Temp\dtf24.tmp */
/* C:\Varela_D2007\Source\Modulos\FicherosEDI\Cliente\FicherosEDI.drf */

4
Source/Modulos/Parametros/Cliente/Parametros.drc
View File

@ -12,8 +12,8 @@ STRINGTABLE
BEGIN
END
/* C:\Varela_D2007\Source\Modulos\Parametros\Cliente\uDataModuleParametros.dfm */
/* C:\Varela_D2007\Source\Modulos\Parametros\Cliente\uDataModuleParametros.DFM */
/* C:\Varela_D2007\Source\Modulos\Parametros\Cliente\uViewParametrosCentro.dfm */
/* C:\Varela_D2007\Source\Modulos\Parametros\Cliente\uViewParametrosColeccion.dfm */
/* C:\Varela_D2007\Source\Modulos\Parametros\Cliente\Parametros.res */
/* C:\DOCUME~1\Usuario\CONFIG~1\Temp\dtf1E.tmp */
/* C:\Varela_D2007\Source\Modulos\Parametros\Cliente\Parametros.drf */

4
Source/Modulos/Recepciones/Cliente/Recepciones.drc
View File

@ -12,7 +12,7 @@ STRINGTABLE
BEGIN
END
/* C:\Varela_D2007\Source\Modulos\Recepciones\Cliente\uDataModuleRecepciones.dfm */
/* C:\Varela_D2007\Source\Modulos\Recepciones\Cliente\uDataModuleRecepciones.DFM */
/* C:\Varela_D2007\Source\Modulos\Recepciones\Cliente\uViewListaRecepciones.dfm */
/* C:\Varela_D2007\Source\Modulos\Recepciones\Cliente\uEditorListaRecepciones.dfm */
/* C:\Varela_D2007\Source\Modulos\Recepciones\Cliente\uViewListaRecepcionesAlbaran.dfm */
@ -20,4 +20,4 @@ END
/* C:\Varela_D2007\Source\Modulos\Recepciones\Cliente\uPluginControllerRecepciones.dfm */
/* C:\Varela_D2007\Source\Modulos\Recepciones\Cliente\uEditorAjustarRecepciones.dfm */
/* C:\Varela_D2007\Source\Modulos\Recepciones\Cliente\Recepciones.res */
/* C:\DOCUME~1\Usuario\CONFIG~1\Temp\dtf2C.tmp */
/* C:\Varela_D2007\Source\Modulos\Recepciones\Cliente\Recepciones.drf */

7
Source/Modulos/Recepciones/Cliente/uEditorAjustarRecepciones.pas
View File

@ -19,7 +19,7 @@ uses
cxGridTableView, cxGridBandedTableView, cxGridDBBandedTableView,
cxClasses, cxControls, cxGridCustomView, cxGrid, dxLayoutControl,
cxContainer, cxTextEdit, cxDBEdit, cxMemo, cxMaskEdit, cxDropDownEdit,
cxCheckBox, cxCalendar, cxLabel, cxDBLabel;
cxCheckBox, cxCalendar, cxLabel, cxDBLabel, uDAInterfaces;
type
IEditorAjustarRecepciones = interface
@ -121,7 +121,7 @@ type
private
FItems : IBizRecepciones;
FHayErrores : Boolean;
FAlbaranModificado : Boolean;
FAlbaranModificado : Boolean;
procedure CargarValores;
procedure SalvarValores;
procedure ModificarAlbaran;
@ -174,8 +174,7 @@ begin
Result := FItems;
end;
procedure TfEditorAjustarRecepciones.SetItems(
const AValue: IBizRecepciones);
procedure TfEditorAjustarRecepciones.SetItems(const AValue: IBizRecepciones);
begin
FItems := AValue;
if Assigned(FItems) then

34
Source/Modulos/Recepciones/Cliente/uViewListaRecepciones.dfm
View File

@ -4,11 +4,12 @@ inherited frViewListaRecepciones: TfrViewListaRecepciones
ExplicitWidth = 695
ExplicitHeight = 477
inherited cxGrid: TcxGrid
Top = 61
Top = 128
Width = 695
Height = 416
Height = 349
ExplicitTop = 128
ExplicitWidth = 695
ExplicitHeight = 477
ExplicitHeight = 349
inherited cxGridView: TcxGridDBTableView
OnMouseDown = cxGridViewMouseDown
FilterBox.Visible = fvNever
@ -118,6 +119,7 @@ inherited frViewListaRecepciones: TfrViewListaRecepciones
Width = 20
end
object cxGridBandedViewE38: TcxGridDBColumn
Caption = 'E38/S'
DataBinding.FieldName = 'E38'
PropertiesClassName = 'TcxTextEditProperties'
Properties.Alignment.Horz = taCenter
@ -127,6 +129,7 @@ inherited frViewListaRecepciones: TfrViewListaRecepciones
Width = 36
end
object cxGridBandedViewE40: TcxGridDBColumn
Caption = 'E40/M'
DataBinding.FieldName = 'E40'
PropertiesClassName = 'TcxTextEditProperties'
Properties.Alignment.Horz = taCenter
@ -136,6 +139,7 @@ inherited frViewListaRecepciones: TfrViewListaRecepciones
Width = 35
end
object cxGridBandedViewE42: TcxGridDBColumn
Caption = 'E42/L'
DataBinding.FieldName = 'E42'
PropertiesClassName = 'TcxTextEditProperties'
Properties.Alignment.Horz = taCenter
@ -145,6 +149,7 @@ inherited frViewListaRecepciones: TfrViewListaRecepciones
Width = 34
end
object cxGridBandedViewE44: TcxGridDBColumn
Caption = 'E44/XL'
DataBinding.FieldName = 'E44'
PropertiesClassName = 'TcxTextEditProperties'
Properties.Alignment.Horz = taCenter
@ -181,6 +186,7 @@ inherited frViewListaRecepciones: TfrViewListaRecepciones
Width = 36
end
object cxGridBandedViewR38: TcxGridDBColumn
Caption = 'R38/S'
DataBinding.FieldName = 'R38'
PropertiesClassName = 'TcxTextEditProperties'
Properties.Alignment.Horz = taCenter
@ -189,6 +195,7 @@ inherited frViewListaRecepciones: TfrViewListaRecepciones
Width = 25
end
object cxGridBandedViewR40: TcxGridDBColumn
Caption = 'R40/M'
DataBinding.FieldName = 'R40'
PropertiesClassName = 'TcxTextEditProperties'
Properties.Alignment.Horz = taCenter
@ -197,6 +204,7 @@ inherited frViewListaRecepciones: TfrViewListaRecepciones
Width = 25
end
object cxGridBandedViewR42: TcxGridDBColumn
Caption = 'R42/L'
DataBinding.FieldName = 'R42'
PropertiesClassName = 'TcxTextEditProperties'
Properties.Alignment.Horz = taCenter
@ -205,6 +213,7 @@ inherited frViewListaRecepciones: TfrViewListaRecepciones
Width = 25
end
object cxGridBandedViewR44: TcxGridDBColumn
Caption = 'R44/XL'
DataBinding.FieldName = 'R44'
PropertiesClassName = 'TcxTextEditProperties'
Properties.Alignment.Horz = taCenter
@ -237,7 +246,7 @@ inherited frViewListaRecepciones: TfrViewListaRecepciones
Width = 25
end
object cxGridBandedViewRR38: TcxGridDBColumn
Caption = 'R38'
Caption = 'R38/S'
DataBinding.FieldName = 'RR38'
PropertiesClassName = 'TcxTextEditProperties'
Properties.Alignment.Horz = taCenter
@ -248,7 +257,7 @@ inherited frViewListaRecepciones: TfrViewListaRecepciones
Width = 34
end
object cxGridBandedViewRR40: TcxGridDBColumn
Caption = 'R40'
Caption = 'R40/M'
DataBinding.FieldName = 'RR40'
PropertiesClassName = 'TcxTextEditProperties'
Properties.Alignment.Horz = taCenter
@ -259,7 +268,7 @@ inherited frViewListaRecepciones: TfrViewListaRecepciones
Width = 35
end
object cxGridBandedViewRR42: TcxGridDBColumn
Caption = 'R42'
Caption = 'R42/L'
DataBinding.FieldName = 'RR42'
PropertiesClassName = 'TcxTextEditProperties'
Properties.Alignment.Horz = taCenter
@ -270,7 +279,7 @@ inherited frViewListaRecepciones: TfrViewListaRecepciones
Width = 35
end
object cxGridBandedViewRR44: TcxGridDBColumn
Caption = 'R44'
Caption = 'R44/XL'
DataBinding.FieldName = 'RR44'
PropertiesClassName = 'TcxTextEditProperties'
Properties.Alignment.Horz = taCenter
@ -339,14 +348,11 @@ inherited frViewListaRecepciones: TfrViewListaRecepciones
FloatingHeight = 128
SupportedDocks = [dkStandardDock, dkMultiDock]
TabOrder = 1
ExplicitTop = 76
ExplicitWidth = 128
ExplicitHeight = 128
inline frViewParametrosCentro1: TfrViewParametrosCentro
Left = 0
Top = 19
Width = 425
Height = 42
Height = 109
Align = alLeft
TabOrder = 0
ReadOnly = False
@ -379,19 +385,15 @@ inherited frViewListaRecepciones: TfrViewListaRecepciones
ParentColor = True
ParentFont = False
Underline = True
ExplicitWidth = 128
ExplicitHeight = 32
end
object pnlAgrupaciones: TTBXAlignmentPanel
Left = 425
Top = 19
Width = 270
Height = 42
Height = 109
Align = alClient
AutoSize = True
TabOrder = 2
ExplicitWidth = 391
ExplicitHeight = 109
object TBXButton3: TTBXButton
Tag = 3
Left = 8

12
Source/Modulos/Recepciones/Cliente/uViewListaRecepcionesAlbaran.dfm
View File

@ -7,8 +7,9 @@ inherited frViewListaRecepcionesAlbaran: TfrViewListaRecepcionesAlbaran
Top = 60
Width = 695
Height = 417
ExplicitTop = 60
ExplicitWidth = 695
ExplicitHeight = 477
ExplicitHeight = 417
inherited cxGridView: TcxGridDBTableView
FilterBox.Visible = fvNever
DataController.KeyFieldNames = 'Albaran;Codigo;Color'
@ -57,18 +58,22 @@ inherited frViewListaRecepcionesAlbaran: TfrViewListaRecepcionesAlbaran
Width = 35
end
object cxGridViewE38: TcxGridDBColumn
Caption = 'E38/S'
DataBinding.FieldName = 'E38'
Width = 38
end
object cxGridViewE40: TcxGridDBColumn
Caption = 'E40/M'
DataBinding.FieldName = 'E40'
Width = 38
end
object cxGridViewE42: TcxGridDBColumn
Caption = 'E42/L'
DataBinding.FieldName = 'E42'
Width = 36
end
object cxGridViewE44: TcxGridDBColumn
Caption = 'E44/XL'
DataBinding.FieldName = 'E44'
Width = 39
end
@ -104,7 +109,7 @@ inherited frViewListaRecepcionesAlbaran: TfrViewListaRecepcionesAlbaran
ReadOnly = False
ExplicitTop = 19
ExplicitWidth = 425
ExplicitHeight = 109
ExplicitHeight = 41
inherited dxLayoutControl1: TdxLayoutControl
Width = 425
ExplicitWidth = 425
@ -131,8 +136,6 @@ inherited frViewListaRecepcionesAlbaran: TfrViewListaRecepcionesAlbaran
ParentColor = True
ParentFont = False
Underline = True
ExplicitWidth = 128
ExplicitHeight = 32
end
object pnlAgrupaciones: TTBXAlignmentPanel
Left = 425
@ -142,7 +145,6 @@ inherited frViewListaRecepcionesAlbaran: TfrViewListaRecepcionesAlbaran
Align = alClient
AutoSize = True
TabOrder = 2
ExplicitHeight = 109
object TBXButton3: TTBXButton
Tag = 3
Left = 8

926
Source/Modulos/Recepciones/Servidor/srvRecepciones_Impl.dfm
View File

File diff suppressed because it is too large Load Diff

4
Source/Modulos/ReferenciaGenerica/Cliente/ReferenciaGenerica.drc
View File

@ -12,10 +12,10 @@ STRINGTABLE
BEGIN
END
/* C:\Varela_D2007\Source\Modulos\ReferenciaGenerica\Cliente\uDataModuleReferenciaGenerica.dfm */
/* C:\Varela_D2007\Source\Modulos\ReferenciaGenerica\Cliente\uDataModuleReferenciaGenerica.DFM */
/* C:\Varela_D2007\Source\Modulos\ReferenciaGenerica\Cliente\uViewListaReferenciaGenerica.dfm */
/* C:\Varela_D2007\Source\Modulos\ReferenciaGenerica\Cliente\uEditorListaReferenciaGenerica.dfm */
/* C:\Varela_D2007\Source\Modulos\ReferenciaGenerica\Cliente\uPluginControllerReferenciaGenerica.dfm */
/* C:\Varela_D2007\Source\Modulos\ReferenciaGenerica\Cliente\uEditorCambioReferenciaGenerica.dfm */
/* C:\Varela_D2007\Source\Modulos\ReferenciaGenerica\Cliente\ReferenciaGenerica.res */
/* C:\DOCUME~1\Usuario\CONFIG~1\Temp\dtf2A.tmp */
/* C:\Varela_D2007\Source\Modulos\ReferenciaGenerica\Cliente\ReferenciaGenerica.drf */

4
Source/Modulos/Stock/Cliente/Stock.drc
View File

@ -12,7 +12,7 @@ STRINGTABLE
BEGIN
END
/* C:\Varela_D2007\Source\Modulos\Stock\Cliente\uDataModuleStock.dfm */
/* C:\Varela_D2007\Source\Modulos\Stock\Cliente\uDataModuleStock.DFM */
/* C:\Varela_D2007\Source\Modulos\Stock\Cliente\uViewControGridStockEDI.dfm */
/* C:\Varela_D2007\Source\Modulos\Stock\Cliente\uViewControGridStockPrendasCentros.dfm */
/* C:\Varela_D2007\Source\Modulos\Stock\Cliente\uViewControGridStockEDIInventario.dfm */
@ -21,4 +21,4 @@ END
/* C:\Varela_D2007\Source\Modulos\Stock\Cliente\uEditorControlStockVARELA.dfm */
/* C:\Varela_D2007\Source\Modulos\Stock\Cliente\uPluginControllerStock.dfm */
/* C:\Varela_D2007\Source\Modulos\Stock\Cliente\Stock.res */
/* C:\DOCUME~1\Usuario\CONFIG~1\Temp\dtf32.tmp */
/* C:\Varela_D2007\Source\Modulos\Stock\Cliente\Stock.drf */

4
Source/Modulos/Traspasos/Cliente/Traspasos.drc
View File

@ -12,10 +12,10 @@ STRINGTABLE
BEGIN
END
/* C:\Varela_D2007\Source\Modulos\Traspasos\Cliente\uDataModuleTraspasos.dfm */
/* C:\Varela_D2007\Source\Modulos\Traspasos\Cliente\uDataModuleTraspasos.DFM */
/* C:\Varela_D2007\Source\Modulos\Traspasos\Cliente\uViewListaTraspasos.dfm */
/* C:\Varela_D2007\Source\Modulos\Traspasos\Cliente\uEditorListaTraspasos.dfm */
/* C:\Varela_D2007\Source\Modulos\Traspasos\Cliente\uPluginControllerTraspasos.dfm */
/* C:\Varela_D2007\Source\Modulos\Traspasos\Cliente\uEditorAjustarTraspasos.dfm */
/* C:\Varela_D2007\Source\Modulos\Traspasos\Cliente\Traspasos.res */
/* C:\DOCUME~1\Usuario\CONFIG~1\Temp\dtf30.tmp */
/* C:\Varela_D2007\Source\Modulos\Traspasos\Cliente\Traspasos.drf */

78
Source/Modulos/Traspasos/Servidor/srvTraspasos_Impl.dfm
View File

@ -1040,39 +1040,51 @@ object srvTraspasos: TsrvTraspasos
'LIZAR char(1)'#10#10' declare @TR38 numeric(15,0)'#10' declare @TR40' +
' numeric(15,0)'#10' declare @TR42 numeric(15,0)'#10' declare @TR44' +
' numeric(15,0)'#10' declare @TR46 numeric(15,0)'#10' declare @TR48' +
' numeric(15,0)'#10#10' declare @APROBADO char(1)'#10' declare @FECHA' +
' datetime'#10' declare @CENTRO varchar(17)'#10' declare @CENTRO2 v' +
'archar(17)'#10' declare @CODIGO varchar(12)'#10' declare @COLOR va' +
'rchar(10)'#10' declare @TIPOCANT varchar(3)'#10#10' set @ESTADO = :E' +
'STADO'#10' set @OBSERVACIONES = :OBSERVACIONES'#10' set @CONTABILI' +
'ZAR = :CONTABILIZAR'#10#10' set @TR38 = :TR38'#10' set @TR40 = :TR40' +
#10' set @TR42 = :TR42'#10' set @TR44 = :TR44'#10' set @TR46 = :TR' +
'46'#10' set @TR48 = :TR48'#10#10' set @APROBADO = :APROBADO'#10' set ' +
'@FECHA = :FECHA'#10' set @CENTRO = :CENTRO'#10' set @CENTRO2 = :CE' +
'NTRO2'#10' set @CODIGO = :CODIGO'#10' set @COLOR = :COLOR'#10' set ' +
'@TIPOCANT = :TIPO'#10#10' /* *********************************** */' +
#10#9'update RDX_TRASPASOS_AJUSTES set'#10#9' CANT38 = @TR38,'#10#9 +
' CANT40 = @TR40,'#10#9' CANT42 = @TR42,'#10#9' ' +
' CANT44 = @TR44,'#10#9' CANT46 = @TR46,'#10#9' CANT4' +
'8 = @TR48,'#10' APROBADO = @APROBADO,'#10' E' +
'STADO = @ESTADO,'#10' TIPOCANT = @TIPOCANT,'#10' ' +
' OBSERVACIONES = @OBSERVACIONES,'#10' CONTABILIZAR' +
' = @CONTABILIZAR,'#10' FECHACAMBIO = CURRENT_TIMESTAMP' +
#10#9'where'#10' (RDX_TRASPASOS_AJUSTES.CENTRO = @CENTRO and' +
#10' RDX_TRASPASOS_AJUSTES.CENTRO2 = @CENTRO2 and'#10#9' ' +
' RDX_TRASPASOS_AJUSTES.CODIGO = @CODIGO and'#10#9' RDX_TRASPAS' +
'OS_AJUSTES.COLOR = @COLOR and'#10#9' RDX_TRASPASOS_AJUSTES.FECHA' +
' = @FECHA)'#10#10#9'select @ROWCOUNT_VAR = @@ROWCOUNT'#10#10#9'if @ROWCOUNT_VA' +
'R = 0'#10' begin'#10' insert into RDX_TRASPASOS_AJUSTES'#10' ' +
' (FECHA, CENTRO, CENTRO2, CODIGO, COLOR,'#10' ' +
' APROBADO, FECHACAMBIO, TIPOCANT,'#10' ESTADO, OB' +
'SERVACIONES, CONTABILIZAR,'#10' CANT38, CANT40, CANT' +
'42,'#10' CANT44, CANT46, CANT48)'#10' values ('#10' ' +
' @FECHA, @CENTRO, @CENTRO2, @CODIGO,'#10' ' +
' @COLOR, @APROBADO, CURRENT_TIMESTAMP, @TIPOCANT,'#10' ' +
' @ESTADO, @OBSERVACIONES, @CONTABILIZAR,'#10' ' +
'@TR38, @TR40, @TR42,'#10' @TR44, @TR46, @TR48)'#10' e' +
'nd'#10'end'
' numeric(15,0)'#10' declare @TR_S numeric(15,0)'#10' declare @TR_M' +
' numeric(15,0)'#10' declare @TR_L numeric(15,0)'#10' declare @TR_X' +
'L numeric(15,0)'#10#10' declare @APROBADO char(1)'#10' declare @FECH' +
'A datetime'#10' declare @CENTRO varchar(17)'#10' declare @CENTRO2 ' +
'varchar(17)'#10' declare @CODIGO varchar(12)'#10' declare @COLOR v' +
'archar(10)'#10' declare @TIPOCANT varchar(3)'#10' declare @TIPO_TA' +
'LLAJE smallint'#10' '#10' set @ESTADO = :ESTADO'#10' set @OBSERVACI' +
'ONES = :OBSERVACIONES'#10' set @CONTABILIZAR = :CONTABILIZAR'#10#10' ' +
' set @TR38 = :TR38'#10' set @TR40 = :TR40'#10' set @TR42 = :TR42'#10' ' +
' set @TR44 = :TR44'#10' set @TR46 = :TR46'#10' set @TR48 = :TR48' +
#10' set @TR_S = :TR38'#10' set @TR_M = :TR40'#10' set @TR_L = :TR' +
'42'#10' set @TR_XL = :TR44'#10#10' set @APROBADO = :APROBADO'#10' set' +
' @FECHA = :FECHA'#10' set @CENTRO = :CENTRO'#10' set @CENTRO2 = :C' +
'ENTRO2'#10' set @CODIGO = :CODIGO'#10' set @COLOR = :COLOR'#10' set' +
' @TIPOCANT = :TIPO'#10#10' /* ARREGLO PARA QUE SOPORTE LOS NUEVOS T' +
'ALLAJES*** */'#10#10' execute @TIPO_TALLAJE = RDX_P_TIPO_TALLAJE @C' +
'ODIGO'#10#10' if @TIPO_TALLAJE = 1'#10' begin'#10' set @TR_S = 0'#10' ' +
' set @TR_M = 0'#10' set @TR_L = 0'#10' set @TR_XL = 0'#10' ' +
' end'#10' else'#10' begin'#10' set @TR38 = 0'#10' set @TR40 ' +
'= 0'#10' set @TR42 = 0'#10' set @TR44 = 0'#10' end'#10#10' /* **' +
'********************************* */'#10#9'update RDX_TRASPASOS_AJUST' +
'ES set'#10#9' CANT38 = @TR38,'#10#9' CANT40 = @TR40,'#10#9 +
' CANT42 = @TR42,'#10#9' CANT44 = @TR44,'#10#9' ' +
' CANT46 = @TR46,'#10#9' CANT48 = @TR48,'#10#9' CANT_' +
'S = @TR_S,'#10#9' CANT_M = @TR_M,'#10#9' CANT_L = @TR_' +
'L,'#10#9' CANT_XL = @TR_XL,'#10' APROBADO = @APRO' +
'BADO,'#10' ESTADO = @ESTADO,'#10' TIPOCANT =' +
' @TIPOCANT,'#10' OBSERVACIONES = @OBSERVACIONES,'#10' ' +
' CONTABILIZAR = @CONTABILIZAR,'#10' FECHACAMB' +
'IO = CURRENT_TIMESTAMP'#10#9'where'#10' (RDX_TRASPASOS_AJUSTE' +
'S.CENTRO = @CENTRO and'#10' RDX_TRASPASOS_AJUSTES.CENTR' +
'O2 = @CENTRO2 and'#10#9' RDX_TRASPASOS_AJUSTES.CODIGO = @CODIGO ' +
'and'#10#9' RDX_TRASPASOS_AJUSTES.COLOR = @COLOR and'#10#9' RDX_T' +
'RASPASOS_AJUSTES.FECHA = @FECHA)'#10#10#9'select @ROWCOUNT_VAR = @@ROWC' +
'OUNT'#10#10#9'if @ROWCOUNT_VAR = 0'#10' begin'#10' insert into RDX_T' +
'RASPASOS_AJUSTES'#10' (FECHA, CENTRO, CENTRO2, CODIGO' +
', COLOR,'#10' APROBADO, FECHACAMBIO, TIPOCANT,'#10' ' +
' ESTADO, OBSERVACIONES, CONTABILIZAR,'#10' ' +
' CANT38, CANT40, CANT42,'#10' CANT44, CANT46, CANT4' +
'8,'#10' CANT_S, CANT_M, CANT_L, CANT_XL)'#10' va' +
'lues ('#10' @FECHA, @CENTRO, @CENTRO2, @CODIGO,'#10' ' +
' @COLOR, @APROBADO, CURRENT_TIMESTAMP, @TIPOCANT,'#10' ' +
' @ESTADO, @OBSERVACIONES, @CONTABILIZAR,'#10' ' +
' @TR38, @TR40, @TR42,'#10' @TR44, @TR46, @TR4' +
'8,'#10' @TR_S, @TR_M, @TR_L, @TR_XL)'#10' end'#10'end'#10
StatementType = stSQL
ColumnMappings = <>
end>

4
Source/Modulos/VentasProceso/Cliente/VentasProceso.drc
View File

@ -12,7 +12,7 @@ STRINGTABLE
BEGIN
END
/* C:\Varela_D2007\Source\Modulos\VentasProceso\Cliente\uDataModuleVentasProceso.dfm */
/* C:\Varela_D2007\Source\Modulos\VentasProceso\Cliente\uDataModuleVentasProceso.DFM */
/* C:\Varela_D2007\Source\Modulos\VentasProceso\Cliente\uViewControlesVentaProceso.dfm */
/* C:\Varela_D2007\Source\Modulos\VentasProceso\Cliente\uEditorControlesVentaProceso.dfm */
/* C:\Varela_D2007\Source\Modulos\VentasProceso\Cliente\uPluginControllerVentasProceso.dfm */
@ -20,4 +20,4 @@ END
/* C:\Varela_D2007\Source\Modulos\VentasProceso\Cliente\uViewControlVentaProceso.dfm */
/* C:\Varela_D2007\Source\Modulos\VentasProceso\Cliente\uEditorControlVentaProceso.dfm */
/* C:\Varela_D2007\Source\Modulos\VentasProceso\Cliente\VentasProceso.res */
/* C:\DOCUME~1\Usuario\CONFIG~1\Temp\dtf28.tmp */
/* C:\Varela_D2007\Source\Modulos\VentasProceso\Cliente\VentasProceso.drf */

4
Source/Modulos/VentasTerminadas/Cliente/VentasTerminadas.drc
View File

@ -12,7 +12,7 @@ STRINGTABLE
BEGIN
END
/* C:\Varela_D2007\Source\Modulos\VentasTerminadas\Cliente\uDataModuleVentasTerminadas.dfm */
/* C:\Varela_D2007\Source\Modulos\VentasTerminadas\Cliente\uDataModuleVentasTerminadas.DFM */
/* C:\Varela_D2007\Source\Modulos\VentasTerminadas\Cliente\uViewControlesVentasTerminadas.dfm */
/* C:\Varela_D2007\Source\Modulos\VentasTerminadas\Cliente\uEditorControlesVentasTerminadas.dfm */
/* C:\Varela_D2007\Source\Modulos\VentasTerminadas\Cliente\uViewControGridlVentasTerminadas.dfm */
@ -22,4 +22,4 @@ END
/* C:\Varela_D2007\Source\Modulos\VentasTerminadas\Cliente\uPluginControllerVentasTerminadas.dfm */
/* C:\Varela_D2007\Source\Modulos\VentasTerminadas\Cliente\uEditorControlVentasTerminadas.dfm */
/* C:\Varela_D2007\Source\Modulos\VentasTerminadas\Cliente\VentasTerminadas.res */
/* C:\DOCUME~1\Usuario\CONFIG~1\Temp\dtf26.tmp */
/* C:\Varela_D2007\Source\Modulos\VentasTerminadas\Cliente\VentasTerminadas.drf */

1168
Source/Servidor/AdminPV_Server.drc
View File

File diff suppressed because it is too large Load Diff

4
Source/Usuarios/Usuarios.drc
View File

@ -14,8 +14,8 @@ END
/* C:\Varela_D2007\Source\Usuarios\uLoginForm.dfm */
/* C:\Varela_D2007\Source\Usuarios\uCambiarPassword.dfm */
/* C:\Varela_D2007\Source\Usuarios\uDataModuleUsuarios.dfm */
/* C:\Varela_D2007\Source\Usuarios\uDataModuleUsuarios.DFM */
/* C:\Varela_D2007\Source\Usuarios\uUsuarios.dfm */
/* C:\Varela_D2007\Source\Usuarios\uUsuario.dfm */
/* C:\Varela_D2007\Source\Usuarios\Usuarios.res */
/* C:\DOCUME~1\Usuario\CONFIG~1\Temp\dtf20.tmp */
/* C:\Varela_D2007\Source\Usuarios\Usuarios.drf */