Acana_Interiorismo/FactuGES2
2
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

Se cambia el orden por defecto de la lista de facturas por fechaArreglo de informes para que salga la fecha de vencimiento en el informe

Browse Source 
git-svn-id: https://192.168.0.254/svn/Proyectos.Acana_FactuGES2/trunk@353 f4e31baf-9722-1c47-927c-6f952f962d4b
This commit is contained in:
David Arranz 2008-12-03 18:53:48 +00:00
parent e9015c46fe
commit 0fba92559e
2 changed files with 15 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
Source/Modulos/Recibos de proveedor/Reports/uRptRecibosProveedor_Server.pas
View File

@ -189,7 +189,7 @@ begin
tbl_InformeListadoRecibos.Active := True; tbl_InformeListadoRecibos.Active := True;
AInforme := DarRutaFichero(DarRutaInformes, TipoInforme, tbl_InformeListadoRecibos.FieldByName('ID_EMPRESA').AsString); AInforme := DarRutaFichero(DarRutaInformes, TipoInforme, IntToStr(IdEmpresa));
if VarIsNull(AInforme) then if VarIsNull(AInforme) then
raise Exception.Create (('Error Servidor: _GenerarInforme, no encuentra informe' + TipoInforme)); raise Exception.Create (('Error Servidor: _GenerarInforme, no encuentra informe' + TipoInforme));

14
Source/Modulos/Recibos de proveedor/Views/uViewRecibosProveedor.dfm
View File

@ -95,6 +95,8 @@ inherited frViewRecibosProveedor: TfrViewRecibosProveedor
object cxGridViewFECHA_VENCIMIENTO: TcxGridDBColumn object cxGridViewFECHA_VENCIMIENTO: TcxGridDBColumn
Caption = 'Fecha vencimiento' Caption = 'Fecha vencimiento'
DataBinding.FieldName = 'FECHA_VENCIMIENTO' DataBinding.FieldName = 'FECHA_VENCIMIENTO'
SortIndex = 0
SortOrder = soDescending
Width = 61 Width = 61
end end
object cxGridViewDESCRIPCION: TcxGridDBColumn object cxGridViewDESCRIPCION: TcxGridDBColumn
@ -165,15 +167,27 @@ inherited frViewRecibosProveedor: TfrViewRecibosProveedor
Width = 531 Width = 531
ExplicitWidth = 531 ExplicitWidth = 531
inherited txtFiltroTodo: TcxTextEdit inherited txtFiltroTodo: TcxTextEdit
Style.LookAndFeel.SkinName = ''
StyleDisabled.LookAndFeel.SkinName = ''
StyleFocused.LookAndFeel.SkinName = ''
StyleHot.LookAndFeel.SkinName = ''
ExplicitWidth = 434 ExplicitWidth = 434
Width = 434 Width = 434
end end
inherited edtFechaIniFiltro: TcxDateEdit inherited edtFechaIniFiltro: TcxDateEdit
Style.LookAndFeel.SkinName = ''
StyleDisabled.LookAndFeel.SkinName = ''
StyleFocused.LookAndFeel.SkinName = ''
StyleHot.LookAndFeel.SkinName = ''
ExplicitWidth = 130 ExplicitWidth = 130
Width = 130 Width = 130
end end
inherited edtFechaFinFiltro: TcxDateEdit inherited edtFechaFinFiltro: TcxDateEdit
Left = 234 Left = 234
Style.LookAndFeel.SkinName = ''
StyleDisabled.LookAndFeel.SkinName = ''
StyleFocused.LookAndFeel.SkinName = ''
StyleHot.LookAndFeel.SkinName = ''
ExplicitLeft = 234 ExplicitLeft = 234
ExplicitWidth = 287 ExplicitWidth = 287
Width = 287 Width = 287