unit Fm_PayOrder;

interface

uses
  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
  Dialogs, Form_Custom, PropFilerEh, ImgList, ActnList, AppEvnts,
  PropStorageEh, ComCtrls, ExtCtrls, DB, StdCtrls, Mask, DBCtrls, DBClient;

type
  TFmPayOrder = class(TFormCustom)
    BevelTop: TBevel;
    cdsList: TClientDataSet;
    cdsListID: TLargeintField;
    cdsListVERSION: TLargeintField;
    cdsListDOC_DATE: TDateField;
    cdsListDOC_NUMBER: TStringField;
    cdsListAMOUNT: TCurrencyField;
    cdsListPAY_ACCOUNT: TStringField;
    cdsListPAY_BIC: TStringField;
    cdsListPAY_CORACCOUNT: TStringField;
    cdsListPAY_NAME: TStringField;
    cdsListPAY_TAXCODE: TStringField;
    cdsListPAY_KPP: TStringField;
    cdsListREC_ACCOUNT: TStringField;
    cdsListREC_BIC: TStringField;
    cdsListREC_CORACCOUNT: TStringField;
    cdsListREC_NAME: TStringField;
    cdsListREC_TAXCODE: TStringField;
    cdsListREC_KPP: TStringField;
    cdsListDESCRIPTION: TStringField;
    cdsListRESTEXT: TStringField;
    lblDoc_Date: TLabel;
    Doc_Date: TDBEdit;
    DataSource: TDataSource;
    lblDoc_Number: TLabel;
    Doc_Number: TDBEdit;
    lblAmount: TLabel;
    Amount: TDBEdit;
    gbPay: TGroupBox;
    lblPay_TaxCode: TLabel;
    Pay_TaxCode: TDBEdit;
    lblPay_Kpp: TLabel;
    Pay_Kpp: TDBEdit;
    lblPay_Name: TLabel;
    Pay_Name: TDBMemo;
    lblPay_Account: TLabel;
    Pay_Account: TDBEdit;
    bvlPay: TBevel;
    lblPay_Bic: TLabel;
    Pay_Bic: TDBEdit;
    lblPay_CorAccount: TLabel;
    Pay_CorAccount: TDBEdit;
    gbRec: TGroupBox;
    lblRec_TaxCode: TLabel;
    Rec_TaxCode: TDBEdit;
    lblRec_Kpp: TLabel;
    Rec_Kpp: TDBEdit;
    lblRec_Name: TLabel;
    Rec_Name: TDBMemo;
    bvlRec: TBevel;
    lblRec_Account: TLabel;
    Rec_Account: TDBEdit;
    lblRec_Bic: TLabel;
    Rec_Bic: TDBEdit;
    lblRec_CorAccount: TLabel;
    Rec_CorAccount: TDBEdit;
    gbDescription: TGroupBox;
    Description: TDBMemo;
    gbEdit: TGroupBox;
    cdsListACCOUNT: TStringField;
    lblAccount: TLabel;
    Account: TDBEdit;
    gbMessage: TGroupBox;
    ResText: TDBMemo;
    cdsListACCOUNT_ID: TLargeintField;
    cdsListORG_ID: TLargeintField;
    actCheck: TAction;
    cdsListKADMD_CODE: TLargeintField;
    cdsListGRANTINVESTMENT_ID: TLargeintField;
    cdsListGRANTINVESTMENT_CODE: TLargeintField;
    cdsListFSR_ID: TLargeintField;
    lblGrantinvestment_Code: TLabel;
    Grantinvestment_Code: TDBEdit;
    lblKesr_Code: TLabel;
    lblKvr_Code: TLabel;
    lblKsda_Code: TLabel;
    Kesr_Code: TDBEdit;
    Ksda_Code: TDBEdit;
    Kvr_Code: TDBEdit;
    lblKdt_Code: TLabel;
    Fsr_Id: TDBEdit;
    cdsListDOCUMENT_ID: TLargeintField;
    cdsListBUDGET_ID: TLargeintField;
    cdsListDOCUMENTCLASS_ID: TLargeintField;
    cdsListDISPSTATUS_ID: TLargeintField;
    grbDepartmental: TGroupBox;
    cdsListPI_BUDGET_CODE: TStringField;
    lblPi_Code: TLabel;
    Pi_Budget_Code: TDBEdit;
    cdsListORG_NAME: TStringField;
    grbOrgName: TGroupBox;
    Org_Name: TDBMemo;
    lblOrg_Name: TLabel;
    lblOrg_TaxCode: TLabel;
    Org_TaxCode: TDBEdit;
    cdsListORG_TAXCODE: TStringField;
    cdsListORG_KPP: TStringField;
    lblOrg_Kpp: TLabel;
    Org_Kpp: TDBEdit;
    cdsListINDUSTRYCODE_ID: TLargeintField;
    cdsListINDUSTRY_CODE: TStringField;
    cdsListREC_UFK_ACCOUNT: TStringField;
    lblIndustry_Code: TLabel;
    Industry_Code: TDBEdit;
    cdsListLine_Id: TIntegerField;
    cdsListKESR_CODE: TStringField;
    cdsListKSDA_CODE: TStringField;
    cdsListLS_NUMBER: TStringField;
    cdsListLS_ID: TStringField;
  private
    { Private declarations }
  public
    { Public declarations }
  end;

var
  FmPayOrder: TFmPayOrder;

implementation

{$R *.dfm}

end.
