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

Arreglo para que se puedan hacer ordenes de devolución desde las obras

Browse Source 
git-svn-id: https://192.168.0.254/svn/Proyectos.Tecsitel_FactuGES2/trunk@499 0c75b7a4-871f-7646-8a2f-f78d34cc349f
This commit is contained in:
roberto 2008-08-04 13:48:21 +00:00
parent de1f75e4ca
commit b676953419
3 changed files with 75 additions and 51 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

99
Source/Modulos/Albaranes de proveedor/Views/uViewAlbaranDevProveedor.dfm
View File

@ -1,29 +1,32 @@
inherited frViewAlbaranDevProveedor: TfrViewAlbaranDevProveedor
Height = 349
ExplicitHeight = 349
Height = 470
ExplicitHeight = 470
inherited dxLayoutControl1: TdxLayoutControl
Height = 349
ExplicitHeight = 349
Height = 470
ExplicitHeight = 470
inherited edtFechaAlbaran: TcxDBDateEdit
Left = 114
ExplicitLeft = 114
ExplicitWidth = 119
Width = 119
ExplicitWidth = 330
Width = 330
end
inherited memObservaciones: TcxDBMemo
ExplicitWidth = 186
ExplicitHeight = 162
Height = 162
ExplicitHeight = 172
Height = 172
Width = 186
end
inherited eReferencia: TcxDBTextEdit
Left = 114
ExplicitLeft = 114
ExplicitWidth = 143
Width = 143
ExplicitWidth = 330
Width = 330
end
inherited frViewProveedorAlbaran: TfrViewDatosYSeleccionProveedor
Width = 350
ExplicitWidth = 350
inherited dxLayoutControl1: TdxLayoutControl
Width = 350
inherited edtlNombre: TcxDBTextEdit
ExplicitWidth = 224
Width = 224
@ -48,40 +51,34 @@ inherited frViewAlbaranDevProveedor: TfrViewAlbaranDevProveedor
end
inherited frViewDireccionEntregaAlbaranProv1: TfrViewDireccionEntregaAlbaranProv
Width = 445
Height = 175
Height = 199
ExplicitWidth = 445
ExplicitHeight = 175
ExplicitHeight = 199
inherited dxLayoutControl1: TdxLayoutControl
Width = 445
Height = 175
Height = 199
ExplicitHeight = 78
inherited rdxDestino1: TRadioButton
Width = 255
ExplicitWidth = 255
Caption = 'Salida del albar'#225'n del almac'#233'n:'
end
inherited rdxDestino2: TRadioButton
Width = 287
ExplicitWidth = 287
end
inherited cbLista: TcxDBLookupComboBox
ExplicitWidth = 425
Width = 425
end
inherited bModificar: TBitBtn
Left = 109
Top = 109
ExplicitLeft = 109
ExplicitTop = 109
Top = 164
ExplicitTop = 164
end
inherited txtDireccion: TStaticText
Width = 549
Height = 110
ExplicitWidth = 549
ExplicitHeight = 110
Width = 765
Height = 25
ExplicitWidth = 765
ExplicitHeight = 25
end
inherited RadioButton1: TRadioButton
Caption = 'Salida del albar'#225'n de la obra:'
end
inherited dxLayoutGroup1: TdxLayoutGroup
inherited dxLayoutItem1: TdxLayoutItem
Visible = False
end
inherited dxLayoutControl1Item2: TdxLayoutItem
Visible = False
end
@ -93,30 +90,52 @@ inherited frViewAlbaranDevProveedor: TfrViewAlbaranDevProveedor
end
end
end
inherited ActionList1: TActionList
Left = 56
Top = 0
end
inherited dsAlbaran: TDADataSource
Left = 88
Top = 0
end
inherited dsAlmacenes: TDADataSource
Left = 136
Top = 0
end
inherited dsObras: TDADataSource
Left = 184
Top = 0
end
end
inherited cbFormaPago: TcxDBLookupComboBox
Left = 114
ExplicitLeft = 114
ExplicitWidth = 90
Width = 90
ExplicitWidth = 192
Width = 192
end
inherited eReferenciaPedidoCli: TcxTextEdit
Left = 114
ExplicitLeft = 114
ExplicitWidth = 69
Width = 69
ExplicitWidth = 192
Width = 192
end
inherited eRefFactura: TcxDBTextEdit
ExplicitWidth = 172
Width = 172
Left = 114
ExplicitLeft = 114
ExplicitWidth = 330
Width = 330
end
inherited eReferenciaProveedor: TcxDBTextEdit
ExplicitWidth = 172
Width = 172
Left = 114
ExplicitLeft = 114
ExplicitWidth = 330
Width = 330
end
inherited eReferenciaFacturaProveedor: TcxDBTextEdit
ExplicitWidth = 172
Width = 172
Left = 114
ExplicitLeft = 114
ExplicitWidth = 330
Width = 330
end
inherited dxLayoutControl1Group_Root: TdxLayoutGroup
inherited dxLayoutControl1Group6: TdxLayoutGroup

8
Source/Modulos/Albaranes de proveedor/Views/uViewAlbaranDevProveedor.pas
View File

@ -8,7 +8,13 @@ uses
dxLayoutControl, cxTextEdit, StdCtrls, cxDropDownEdit, cxLookupEdit,
cxDBLookupEdit, cxDBLookupComboBox, uViewDireccionEntregaAlbaranProv,
uCustomView, uViewBase, uViewDatosYSeleccionProveedor, cxDBEdit, cxMemo,
cxContainer, cxEdit, cxMaskEdit, cxCalendar, cxControls;
cxContainer, cxEdit, cxMaskEdit, cxCalendar, cxControls, dxSkinsCore,
dxSkinBlack, dxSkinBlue, dxSkinCaramel, dxSkinCoffee, dxSkinGlassOceans,
dxSkiniMaginary, dxSkinLilian, dxSkinLiquidSky, dxSkinLondonLiquidSky,
dxSkinMcSkin, dxSkinMoneyTwins, dxSkinOffice2007Black, dxSkinOffice2007Blue,
dxSkinOffice2007Green, dxSkinOffice2007Pink, dxSkinOffice2007Silver,
dxSkinSilver, dxSkinStardust, dxSkinsDefaultPainters, dxSkinValentine,
dxSkinXmas2008Blue, dxSkinsdxLCPainter, uDAInterfaces;
type
IViewAlbaranDevProveedor = interface(IViewAlbaranProveedor)

19
Source/Modulos/Albaranes de proveedor/Views/uViewDireccionEntregaAlbaranProv.dfm
View File

@ -36,7 +36,7 @@ inherited frViewDireccionEntregaAlbaranProv: TfrViewDireccionEntregaAlbaranProv
TabOrder = 4
end
object cbLista: TcxDBLookupComboBox
Left = 25
Left = 10
Top = 33
Anchors = [akLeft, akTop, akRight]
DataBinding.DataField = 'ID_ALMACEN'
@ -138,7 +138,6 @@ inherited frViewDireccionEntregaAlbaranProv: TfrViewDireccionEntregaAlbaranProv
end
object dxLayoutControl1Item3: TdxLayoutItem
Caption = 'New Item'
Offsets.Left = 15
ShowCaption = False
Control = cbLista
ControlOptions.ShowBorder = False
@ -179,8 +178,8 @@ inherited frViewDireccionEntregaAlbaranProv: TfrViewDireccionEntregaAlbaranProv
end
end
object ActionList1: TActionList
Left = 40
Top = 16
Left = 224
Top = 8
object actLista: TAction
Caption = 'Recibir el pedido en el almac'#233'n:'
Checked = True
@ -199,15 +198,15 @@ inherited frViewDireccionEntregaAlbaranProv: TfrViewDireccionEntregaAlbaranProv
end
end
object dsAlbaran: TDADataSource
Left = 8
Top = 16
Left = 264
Top = 8
end
object dsAlmacenes: TDADataSource
Left = 8
Top = 48
Left = 304
Top = 8
end
object dsObras: TDADataSource
Left = 8
Top = 80
Left = 344
Top = 8
end
end