72 lines
2.4 KiB
ObjectPascal
72 lines
2.4 KiB
ObjectPascal
|
unit uViewTotales;
|
||
|
|
|
||
|
|
interface
|
||
|
|
|
||
|
|
uses
|
||
|
|
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
|
||
|
|
Dialogs, uViewBase, ExtCtrls, StdCtrls, DB, uDADataTable, cxGraphics,
|
||
|
|
cxTextEdit, cxMaskEdit, cxDropDownEdit, cxDBEdit, cxControls,
|
||
|
|
cxContainer, cxEdit, cxLabel, cxDBLabel, cxCurrencyEdit, cxSpinEdit,
|
||
|
|
ComCtrls, dxLayoutControl, dxLayoutLookAndFeels, cxLookupEdit, cxDBLookupEdit,
|
||
|
|
cxDBLookupComboBox, cxCheckBox;
|
||
|
|
|
||
|
|
type
|
||
|
|
TfrViewTotales = class(TfrViewBase)
|
||
|
|
DADataSource: TDADataSource;
|
||
|
|
ImporteBase: TcxDBCurrencyEdit;
|
||
|
|
ImporteDto: TcxDBCurrencyEdit;
|
||
|
|
ImporteIVA: TcxDBCurrencyEdit;
|
||
|
|
ImporteTotal: TcxDBCurrencyEdit;
|
||
|
|
edtDescuento: TcxDBSpinEdit;
|
||
|
|
edtIVA: TcxDBSpinEdit;
|
||
|
|
dxLayoutControl1Group_Root: TdxLayoutGroup;
|
||
|
|
dxLayoutControl1: TdxLayoutControl;
|
||
|
|
dxLayoutControl1Item1: TdxLayoutItem;
|
||
|
|
dxLayoutControl1Item2: TdxLayoutItem;
|
||
|
|
dxLayoutControl1Item3: TdxLayoutItem;
|
||
|
|
dxLayoutControl1Item4: TdxLayoutItem;
|
||
|
|
dxLayoutControl1Item5: TdxLayoutItem;
|
||
|
|
dxLayoutControl1Item12: TdxLayoutItem;
|
||
|
|
dxLayoutControl1Group1: TdxLayoutGroup;
|
||
|
|
dxLayoutControl1Group4: TdxLayoutGroup;
|
||
|
|
dxLayoutControl1Group5: TdxLayoutGroup;
|
||
|
|
dxLayoutControl1Item6: TdxLayoutItem;
|
||
|
|
edtRE: TcxDBSpinEdit;
|
||
|
|
dxLayoutControl1Item7: TdxLayoutItem;
|
||
|
|
ImporteRE: TcxDBCurrencyEdit;
|
||
|
|
dxLayoutControl1Item8: TdxLayoutItem;
|
||
|
|
eImporteNeto: TcxDBCurrencyEdit;
|
||
|
|
dxLayoutControl1Item9: TdxLayoutItem;
|
||
|
|
ePorte: TcxDBCurrencyEdit;
|
||
|
|
dxLayoutControl1Group2: TdxLayoutGroup;
|
||
|
|
Bevel1: TBevel;
|
||
|
|
dxLayoutControl1Item10: TdxLayoutItem;
|
||
|
|
dxLayoutControl1Group7: TdxLayoutGroup;
|
||
|
|
Bevel3: TBevel;
|
||
|
|
dxLayoutControl1Item13: TdxLayoutItem;
|
||
|
|
dxLayoutControl1Group3: TdxLayoutGroup;
|
||
|
|
dxLayoutControl1Item14: TdxLayoutItem;
|
||
|
|
Bevel4: TBevel;
|
||
|
|
dxLayoutControl1Group9: TdxLayoutGroup;
|
||
|
|
dxLayoutControl1Group8: TdxLayoutGroup;
|
||
|
|
dxLayoutLookAndFeelList1: TdxLayoutLookAndFeelList;
|
||
|
|
LookAndFeelIMPORTE_TOTAL: TdxLayoutStandardLookAndFeel;
|
||
|
|
dxLayoutControl1Item11: TdxLayoutItem;
|
||
|
|
eIVA: TcxDBLookupComboBox;
|
||
|
|
dxLayoutControl1Item15: TdxLayoutItem;
|
||
|
|
bTiposIVA: TButton;
|
||
|
|
dxLayoutControl1Group6: TdxLayoutGroup;
|
||
|
|
dsTiposIVA: TDADataSource;
|
||
|
|
dxLayoutControl1Item16: TdxLayoutItem;
|
||
|
|
cbRecargoEquivalencia: TcxDBCheckBox;
|
||
|
|
public
|
||
|
|
{ Public declarations }
|
||
|
|
end;
|
||
|
|
|
||
|
|
|
||
|
|
implementation
|
||
|
|
|
||
|
|
{$R *.dfm}
|
||
|
|
|
||
|
|
end.
|