Tecistel/Tecsitel_FactuGES2
0
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

Histórico de movimientos -> Arreglados iconos de estado en la columna tipo de movimiento.

Browse Source 
git-svn-id: https://192.168.0.254/svn/Proyectos.Tecsitel_FactuGES2/trunk@576 0c75b7a4-871f-7646-8a2f-f78d34cc349f
This commit is contained in:
David Arranz 2008-09-05 16:42:28 +00:00
parent 380c41f014
commit 0443062de5
9 changed files with 68 additions and 42 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

1
Source/Cliente/FactuGES.dpr
View File

@ -1,7 +1,6 @@
program FactuGES;
uses
ExceptionLog,
Forms,
Windows,
SysUtils,

8
Source/Cliente/FactuGES.dproj
View File

@ -45,7 +45,7 @@
<DCC_ResourcePath>$(BDS)\lib\Debug;$(BDS)\Lib\Debug\Indy10;T:\COMPON~1\jcl\lib\d11\debug;$(BDSCOMMONDIR)\Dcp;..\Lib;..\Modulos\Lib</DCC_ResourcePath>
<DCC_ObjPath>$(BDS)\lib\Debug;$(BDS)\Lib\Debug\Indy10;T:\COMPON~1\jcl\lib\d11\debug;$(BDSCOMMONDIR)\Dcp;..\Lib;..\Modulos\Lib</DCC_ObjPath>
<DCC_IncludePath>$(BDS)\lib\Debug;$(BDS)\Lib\Debug\Indy10;T:\COMPON~1\jcl\lib\d11\debug;$(BDSCOMMONDIR)\Dcp;..\Lib;..\Modulos\Lib</DCC_IncludePath>
<DCC_Define>DEBUG;EUREKALOG;EUREKALOG_VER6</DCC_Define>
<DCC_Define>DEBUG;</DCC_Define>
<DCC_DebugInfoInExe>True</DCC_DebugInfoInExe>
<DCC_DebugVN>True</DCC_DebugVN>
<DCC_SymbolReferenceInfo>2</DCC_SymbolReferenceInfo>
@ -59,6 +59,10 @@
<Excluded_Packages Name="C:\Documents and Settings\All Users\Documentos\RAD Studio\5.0\Bpl\dxPSCoreD10.bpl">ExpressPrinting System by Developer Express Inc.</Excluded_Packages>
<Excluded_Packages Name="C:\Documents and Settings\All Users\Documentos\RAD Studio\5.0\Bpl\PluginSDK_D10R.bpl">PluginSDK for Delphi 10 (Runtime)</Excluded_Packages>
<Excluded_Packages Name="$(BDS)\bin\dcloffice2k100.bpl">Microsoft Office 2000 Sample Automation Server Wrapper Components</Excluded_Packages>
@ -88,7 +92,7 @@
<!-- EurekaLog First Line
[Exception Log]
EurekaLog Version=6011
Activate=1
Activate=0
Activate Handle=1
Save Log File=1
Foreground Tab=0

BIN
Source/Cliente/FactuGES.res
View File

Binary file not shown.

4
Source/Modulos/Historico de movimientos/Model/schHistoricoMovimientosClient_Intf.pas
View File

@ -3,7 +3,7 @@ unit schHistoricoMovimientosClient_Intf;
interface
uses
Classes, DB, SysUtils, uROClasses, uDADataTable, FmtBCD, uROXMLIntf;
Classes, DB, schBase_Intf, SysUtils, uROClasses, uDADataTable, FmtBCD, uROXMLIntf;
const
{ Data table rules ids
@ -141,7 +141,7 @@ type
end;
{ THistoricoMovimientosDataTableRules }
THistoricoMovimientosDataTableRules = class(TDADataTableRules, IHistoricoMovimientos)
THistoricoMovimientosDataTableRules = class(TIntfObjectDADataTableRules, IHistoricoMovimientos)
private
protected
{ Property getters and setters }

1
Source/Modulos/Historico de movimientos/Views/uEditorHistoricoMovimientos.dfm
View File

@ -1887,6 +1887,7 @@ inherited fEditorHistoricoMovimientos: TfEditorHistoricoMovimientos
object rasladar1: TMenuItem [4]
Caption = 'Trasladar'
ImageIndex = 23
Visible = False
end
inherited N1: TMenuItem [5]
end

92
Source/Modulos/Historico de movimientos/Views/uViewHistoricoMovimientos.dfm
View File

@ -32,42 +32,46 @@ inherited frViewHistoricoMovimientos: TfrViewHistoricoMovimientos
end
object cxGridViewFECHA: TcxGridDBColumn
DataBinding.FieldName = 'FECHA'
Width = 60
end
object cxGridViewTIPO_MOVIMIENTO: TcxGridDBColumn
DataBinding.FieldName = 'TIPO_MOVIMIENTO'
PropertiesClassName = 'TcxImageComboBoxProperties'
Properties.DefaultDescription = 'Salida'
Properties.DefaultImageIndex = 2
Properties.Images = GridPNGImageList
Properties.Items = <
item
Description = 'Entrada'
ImageIndex = 2
Value = 'Entrada'
end
item
Description = 'Salida'
ImageIndex = 3
Value = 'Salida'
Tag = 1
Value = 'Entrada'
end>
Properties.LargeImages = GridPNGImageList
end
object cxGridViewFAMILIA: TcxGridDBColumn
Caption = 'Familia'
DataBinding.FieldName = 'FAMILIA'
Width = 50
end
object cxGridViewREFERENCIA: TcxGridDBColumn
DataBinding.FieldName = 'REFERENCIA'
Width = 50
end
object cxGridViewDESCRIPCION: TcxGridDBColumn
DataBinding.FieldName = 'DESCRIPCION'
Width = 102
end
object cxGridViewFABRICANTE: TcxGridDBColumn
DataBinding.FieldName = 'FABRICANTE'
Width = 41
end
object cxGridViewREFERENCIA_FABR: TcxGridDBColumn
DataBinding.FieldName = 'REFERENCIA_FABR'
Width = 41
end
object cxGridViewUNIDAD_MEDIDA: TcxGridDBColumn
DataBinding.FieldName = 'UNIDAD_MEDIDA'
Width = 43
end
object cxGridViewCANTIDAD: TcxGridDBColumn
DataBinding.FieldName = 'CANTIDAD'
@ -75,12 +79,15 @@ inherited frViewHistoricoMovimientos: TfrViewHistoricoMovimientos
Properties.Alignment.Horz = taRightJustify
FooterAlignmentHorz = taRightJustify
HeaderAlignmentHorz = taRightJustify
Width = 41
end
object cxGridViewNOMBRE_ALMACEN: TcxGridDBColumn
DataBinding.FieldName = 'NOMBRE_ALMACEN'
Width = 42
end
object cxGridViewCAUSA: TcxGridDBColumn
DataBinding.FieldName = 'CAUSA'
Width = 38
end
end
object cxGridDBTableView1: TcxGridDBTableView [1]
@ -129,12 +136,19 @@ inherited frViewHistoricoMovimientos: TfrViewHistoricoMovimientos
end
end
inherited dxComponentPrinter: TdxComponentPrinter
Left = 400
Top = 160
inherited dxComponentPrinterLink: TdxGridReportLink
ReportDocument.CreationDate = 38673.741107951390000000
BuiltInReportLink = True
end
end
inherited dxPSEngineController1: TdxPSEngineController
Left = 328
Top = 160
end
inherited cxStyleRepository1: TcxStyleRepository
Top = 160
inherited cxStyleSelection: TcxStyle
AssignedValues = [svColor, svFont, svTextColor]
end
@ -148,7 +162,12 @@ inherited frViewHistoricoMovimientos: TfrViewHistoricoMovimientos
TextColor = clNavy
end
object cxStyleSalida: TcxStyle
AssignedValues = [svTextColor]
AssignedValues = [svFont, svTextColor]
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'Tahoma'
Font.Style = []
TextColor = clGreen
end
end
@ -352,22 +371,17 @@ inherited frViewHistoricoMovimientos: TfrViewHistoricoMovimientos
CC47D52346238D8F9D1F1F1B0D1ABDF264CE93E1A7B2A713CFCA7E56FF79EB73
ABE7DFFDE2FB4BCF58FCD8F00BF98BCFBFAE79A9F372EFABA9AF3AC723C71FBC
CE793DF1A6FCADCEDB7DEFB8EFBADFC7BD1F9928FC40FE50F3D1FA63C7A7D04F
F73EE77CFEFC2FF784F3FB25D29F33000001B74944415478DACDD3BF4BDC6018
07F0EF9BE44D2EC99B5C2E69AF873F7051EEE88928D2BB8250E9E67FD03A94AE
3A39B675D045E9D26EA55B8BB33AB9B82938D82EF66CE970AB52151585430F3C
CCE5F5798B6314C1A17D20BC2FC9FB7C42BEEF1B26A5C47D8AFD3F40616C119C
1BF0031742D8705D5BD0D8600C655A5357CF745D835ABEF4AE783BE0BA199A9B
EF83C07D4B405ED3D8F19D01E1D9221B3853C552D7DCEECE0935B03796651C71
CE41230853C0422A406F08B3397FA254EE991F7D5EC4E6461D860E388E013BC3
71DE8C7176162B80A50125CEF5F1DEC77D33C32303B0B4180F42035991C0F724
1E861A36BF1D63EBC72996A74BA940BBB32B6283D5217691E410F8929ADBF01C
09E14A74140CFCAC1D62FBD7295666FB530111C7EDD71D9DD1A7A7CF86711E47
C8247B609068B56254AA8F70B0D7C076ED00ABF343A90005265D9ABEC817725F
AA2383D8FAFE1B4C030C0AD7F332948786CB4B89B50F4FD2015549226D4AFA65
14795F9BCD96DA9557DCE4FBBAAEC3B64D1894EAFAC7CADA8D802A758F3E67D2
B2F8676AE80E42FF8F3A1BA6A9B65153006E05AE4BD0D548DA49395F08EB7ED6
F97B4E6E04FED9CF7405E802B6E1F5AC5DBC0000000049454E44AE426082}
Name = 'Entrada'
F73EE77CFEFC2FF784F3FB25D29F33000000FE4944415478DA63FCFFFF3F0325
8091AA06303232A248F2ACE2F8FF25EC0723BA26143DF80CE05EC2FEFFFFAFFF
0CDF927E31926500D73CB6FFED4E450CE51B7B197EE4FF66246800EF5ACEFF0C
FF800A80B682F14F06860ABB6486F7DF3F314CDFB992E167F51F46FC06ACE6FC
BFCCBB8FE1C3D78F0CEFBF7D84D040CD6F3EBF6778F3E51DC3DE6367187EB7FF
61C46900CF528EFFD3DD1AB06A06E12F3FBE32DC3EF39CE1CF94BF8C580DE09E
CF0EF6F3F4FD8B516383831BAEF9EFD47FB85DC0350312EA0CE03000FAF53703
8392BC38580EA699A45860AD64F9AFAC268EA2992403588A98FFFFFFF91F4533
4906306733FD47D78CD70072C0C01B0000F574D6E1505448120000000049454E
44AE426082}
Name = 'Salida'
Background = clWindow
end
item
@ -456,19 +470,27 @@ inherited frViewHistoricoMovimientos: TfrViewHistoricoMovimientos
CC47D52346238D8F9D1F1F1B0D1ABDF264CE93E1A7B2A713CFCA7E56FF79EB73
ABE7DFFDE2FB4BCF58FCD8F00BF98BCFBFAE79A9F372EFABA9AF3AC723C71FBC
CE793DF1A6FCADCEDB7DEFB8EFBADFC7BD1F9928FC40FE50F3D1FA63C7A7D04F
F73EE77CFEFC2FF784F3FB25D29F33000000FE4944415478DA63FCFFFF3F0325
8091AA06303232A248F2ACE2F8FF25EC0723BA26143DF80CE05EC2FEFFFFAFFF
0CDF927E31926500D73CB6FFED4E450CE51B7B197EE4FF66246800EF5ACEFF0C
FF800A80B682F14F06860ABB6486F7DF3F314CDFB992E167F51F46FC06ACE6FC
BFCCBB8FE1C3D78F0CEFBF7D84D040CD6F3EBF6778F3E51DC3DE6367187EB7FF
61C46900CF528EFFD3DD1AB06A06E12F3FBE32DC3EF39CE1CF94BF8C580DE09E
CF0EF6F3F4FD8B516383831BAEF9EFD47FB85DC0350312EA0CE03000FAF53703
8392BC38580EA699A45860AD64F9AFAC268EA2992403588A98FFFFFFF91F4533
4906306733FD47D78CD70072C0C01B0000F574D6E1505448120000000049454E
44AE426082}
Name = 'Salida'
F73EE77CFEFC2FF784F3FB25D29F33000001B74944415478DACDD3BF4BDC6018
07F0EF9BE44D2EC99B5C2E69AF873F7051EEE88928D2BB8250E9E67FD03A94AE
3A39B675D045E9D26EA55B8BB33AB9B82938D82EF66CE970AB52151585430F3C
CCE5F5798B6314C1A17D20BC2FC9FB7C42BEEF1B26A5C47D8AFD3F40616C119C
1BF0031742D8705D5BD0D8600C655A5357CF745D835ABEF4AE783BE0BA199A9B
EF83C07D4B405ED3D8F19D01E1D9221B3853C552D7DCEECE0935B03796651C71
CE41230853C0422A406F08B3397FA254EE991F7D5EC4E6461D860E388E013BC3
71DE8C7176162B80A50125CEF5F1DEC77D33C32303B0B4180F42035991C0F724
1E861A36BF1D63EBC72996A74BA940BBB32B6283D5217691E410F8929ADBF01C
09E14A74140CFCAC1D62FBD7295666FB530111C7EDD71D9DD1A7A7CF86711E47
C8247B609068B56254AA8F70B0D7C076ED00ABF343A90005265D9ABEC817725F
AA2383D8FAFE1B4C030C0AD7F332948786CB4B89B50F4FD2015549226D4AFA65
14795F9BCD96DA9557DCE4FBBAAEC3B64D1894EAFAC7CADA8D802A758F3E67D2
B2F8676AE80E42FF8F3A1BA6A9B65153006E05AE4BD0D548DA49395F08EB7ED6
F97B4E6E04FED9CF7405E802B6E1F5AC5DBC0000000049454E44AE426082}
Name = 'Entrada'
Background = clWindow
end>
Bitmap = {}
end
inherited cxViewGridPopupMenu: TcxGridPopupMenu
Top = 152
end
end

2
Source/Modulos/Historico de movimientos/Views/uViewHistoricoMovimientos.pas
View File

@ -38,11 +38,11 @@ type
cxGridViewFECHA: TcxGridDBColumn;
cxGridViewCANTIDAD: TcxGridDBColumn;
cxGridViewUNIDAD_MEDIDA: TcxGridDBColumn;
cxGridViewTIPO_MOVIMIENTO: TcxGridDBColumn;
cxGridViewCAUSA: TcxGridDBColumn;
cxStyleSalida: TcxStyle;
cxGridViewFABRICANTE: TcxGridDBColumn;
cxGridViewREFERENCIA_FABR: TcxGridDBColumn;
cxGridViewTIPO_MOVIMIENTO: TcxGridDBColumn;
procedure cxGridActiveTabChanged(Sender: TcxCustomGrid; ALevel: TcxGridLevel);
procedure cxGridViewStylesGetContentStyle(Sender: TcxCustomGridTableView;

BIN
Source/Servidor/FactuGES_Server.RES
View File

Binary file not shown.

2
Source/Servidor/FactuGES_Server.rc
View File

@ -14,7 +14,7 @@ BEGIN
BEGIN
VALUE "FileVersion", "1.2.8.0\0"
VALUE "ProductVersion", "1.2.8.0\0"
VALUE "CompileDate", "viernes, 05 de septiembre de 2008 13:18\0"
VALUE "CompileDate", "viernes, 05 de septiembre de 2008 17:14\0"
END
END
BLOCK "VarFileInfo"