En la eleccion de articulos para el pedido la pestaña generales se sustituye por otros (en ella saldrán todos los articulos que no pertenezcan al proveedor del pedido, bien a otros proveedores o sin proveedor asignado)

git-svn-id: https://192.168.0.254/svn/Proyectos.Tecsitel_FactuGES2/trunk@775 0c75b7a4-871f-7646-8a2f-f78d34cc349f
This commit is contained in:
roberto 2008-11-13 17:35:02 +00:00
parent 7a92c22990
commit 22ae33f7e7
2 changed files with 18 additions and 2 deletions

View File

@ -23,7 +23,7 @@ inherited frViewElegirArticulosPedidosProveedor: TfrViewElegirArticulosPedidosPr
end end
object cxGridLevel1: TcxGridLevel object cxGridLevel1: TcxGridLevel
Tag = 1 Tag = 1
Caption = 'Generales' Caption = 'Otros'
end end
end end
inherited frViewFiltroBase1: TfrViewFiltroBase inherited frViewFiltroBase1: TfrViewFiltroBase
@ -35,21 +35,37 @@ inherited frViewElegirArticulosPedidosProveedor: TfrViewElegirArticulosPedidosPr
Width = 565 Width = 565
ExplicitWidth = 565 ExplicitWidth = 565
inherited txtFiltroTodo: TcxTextEdit inherited txtFiltroTodo: TcxTextEdit
Style.LookAndFeel.SkinName = ''
StyleDisabled.LookAndFeel.SkinName = ''
StyleFocused.LookAndFeel.SkinName = ''
StyleHot.LookAndFeel.SkinName = ''
ExplicitWidth = 468 ExplicitWidth = 468
Width = 468 Width = 468
end end
inherited edtFechaIniFiltro: TcxDateEdit inherited edtFechaIniFiltro: TcxDateEdit
Style.LookAndFeel.SkinName = ''
StyleDisabled.LookAndFeel.SkinName = ''
StyleFocused.LookAndFeel.SkinName = ''
StyleHot.LookAndFeel.SkinName = ''
ExplicitWidth = 121 ExplicitWidth = 121
Width = 121 Width = 121
end end
inherited edtFechaFinFiltro: TcxDateEdit inherited edtFechaFinFiltro: TcxDateEdit
Left = 225 Left = 225
Style.LookAndFeel.SkinName = ''
StyleDisabled.LookAndFeel.SkinName = ''
StyleFocused.LookAndFeel.SkinName = ''
StyleHot.LookAndFeel.SkinName = ''
ExplicitLeft = 225 ExplicitLeft = 225
ExplicitWidth = 205 ExplicitWidth = 205
Width = 205 Width = 205
end end
inherited eLista: TcxComboBox inherited eLista: TcxComboBox
Left = 467 Left = 467
Style.LookAndFeel.SkinName = ''
StyleDisabled.LookAndFeel.SkinName = ''
StyleFocused.LookAndFeel.SkinName = ''
StyleHot.LookAndFeel.SkinName = ''
ExplicitLeft = 467 ExplicitLeft = 467
ExplicitWidth = 88 ExplicitWidth = 88
Width = 88 Width = 88

View File

@ -58,7 +58,7 @@ begin
0 : if Assigned(FProveedor) then 0 : if Assigned(FProveedor) then
FFiltro.AddItem(cxGridViewID_PROVEEDOR, foEqual, FProveedor.ID, FProveedor.NOMBRE); FFiltro.AddItem(cxGridViewID_PROVEEDOR, foEqual, FProveedor.ID, FProveedor.NOMBRE);
1 : if Assigned(FProveedor) then 1 : if Assigned(FProveedor) then
FFiltro.AddItem(cxGridViewID_PROVEEDOR, foEqual, Null, 'ARTICULOS SIN PROVEEDOR'); FFiltro.AddItem(cxGridViewID_PROVEEDOR, foNotEqual, FProveedor.ID, 'ARTICULOS DE OTROS PROVEEDORES');
end; end;
end; end;