pivoh.h

速达开源ERP系统

//---------------------------------------------------------------------------
#ifndef PivohH
#define PivohH
//---------------------------------------------------------------------------
#include <Classes.hpp>
#include <Controls.hpp>
#include <StdCtrls.hpp>
#include <Forms.hpp>
#include "BillBaseForm.h"
#include "fpanel.h"
#include "SDGrid.h"
#include <ComCtrls.hpp>
#include <Grids.hpp>
#include <ImgList.hpp>
#include <Menus.hpp>
#include <ToolWin.hpp>
#include "DateEdit.hpp"
#include "SDComboBox.h"
#include "SDEdit.h"
#include <Mask.hpp>
#include <Buttons.hpp>
#include <Dialogs.hpp>
#include "Func.h"

//---------------------------------------------------------------------------
class PACKAGE TfrmPivoh ;
class TfrmPivoh : public TBillBaseForm
{
__published:	// IDE-managed Components
        TFloatPanel *FloatPanel3;
        TLabel *Label17;
        TLabel *Label24;
        TLabel *labUserCode;
        TLabel *labChecker;
        TFloatPanel *FloatPanel1;
        TLabel *Label1;
        TLabel *Label19;
        TSDGrid *sgPivoh;
        TFloatPanel *FloatPanel2;
        TLabel *Label14;
        TLabel *Label26;
        TLabel *Label27;
        TLabel *Label29;
        TLabel *Label32;
        TBitBtn *btnOK;
        TBitBtn *btnCancel;
        TLabel *Label41;
        TLabel *Label42;
        TSDEdit *sePivodLine;
        TLabel *Label44;
        TSDEdit *sePivodGoodsName;
        TLabel *Label45;
        TSDEdit *sePivodUnit;
        TLabel *Label46;
        TSDEdit *sePivodQty;
        TLabel *Label47;
        TSDEdit *sePivodTaxPrice;
        TLabel *Label40;
        TSDEdit *sePivodAmt;
        TLabel *Label15;
        TLabel *Label16;
        TLabel *Label8;
        TLabel *Label21;
        TSDEdit *sePivohTel;
        TLabel *Label4;
        TLabel *Label10;
        TLabel *Label11;
        TLabel *Label5;
        TLabel *Label49;
        TSDComboBox *scPivohCurrency;
        TSDEdit *sePivohEnrate;
        TSDComboBox *scPivohSettleMode;
        TSDComboBox *scPivohBuyer;
        TLabel *Label2;
        TLabel *Label9;
        TLabel *Label3;
        TLabel *Label23;
        TLabel *Label6;
        TLabel *Label7;
        TLabel *Label13;
        TLabel *Label43;
        TLabel *Label18;
        TSDEdit *sePivohAddr;
        TSDComboBox *scPivohSupply;
        TSDEdit *sePivohContract;
        TDateEdit *dePivohDate;
        TSDComboBox *scPivohFmonth;
        TSDEdit *sePivohCode;
        TSDComboBox *scPivohBankName;
        TSDComboBox *scPivohBankNo;
        TLabel *labSystemDate;
        TSDComboBox *scPivohType;
        TSDComboBox *scPivohTaxCode;
        TSDEdit *sePivohTaxRate;
        TDateEdit *dePivohApDate;
        TSDEdit *sePivohTaxNo;
        TSDComboBox *scPivohDept;
        TSDComboBox *scPivohCacCode;
        TCheckBox *chkPivohRed;
        TMemo *memPivohDesc;
        TMemo *memPivodDesc;
        TSDEdit *sePivodTaxAmt;
        TSDEdit *sePivodPrice;
        TSDEdit *sePivodSumAmt;
        TSDEdit *sePivodZkAmt;
        TCheckBox *chkPivohCheck;
        TCheckBox *chkPivohCancel;
        TLabel *Label28;
        TSDComboBox *scPivodPodLine;
        TLabel *Label30;
        TSDComboBox *scPivohPoCode;
        TFloatPanel *fpsum;
        TLabel *Label20;
        TSDEdit *sePivohAmt;
        TLabel *Label22;
        TSDEdit *sePivohTaxAmt;
        TLabel *Label12;
        TSDEdit *sePivohSumAmt;
        TLabel *Label25;
        TSDEdit *sePivohZkAmt;
        TSDEdit *sePivodGoods;
        void __fastcall FormCreate(TObject *Sender);
        void __fastcall FormShow(TObject *Sender);
        void __fastcall sgPivohDblClick(TObject *Sender);
        void __fastcall sgPivohSelectCell(TObject *Sender, int ACol,
          int ARow, bool &CanSelect);
        void __fastcall btnOKClick(TObject *Sender);
        void __fastcall btnCancelClick(TObject *Sender);
        void __fastcall scPivohSupplyClick(TObject *Sender);
        void __fastcall scPivohBankNameClick(TObject *Sender);
        void __fastcall sePivodQtyExit(TObject *Sender);
        void __fastcall scPivohBuyerClick(TObject *Sender);
        void __fastcall sePivodGoodsButtonClick(TObject *Sender);
        void __fastcall scPivohCurrencyClick(TObject *Sender);
        void __fastcall sePivodGoodsExit(TObject *Sender);
        void __fastcall sePivohCodeKeyDown(TObject *Sender, WORD &Key,
          TShiftState Shift);
        void __fastcall scPivohBankNoClick(TObject *Sender);
        void __fastcall scPivohTypeClick(TObject *Sender);
        void __fastcall scPivohPoCodeExit(TObject *Sender);
        void __fastcall scPivohTaxCodeExit(TObject *Sender);
        void __fastcall scPivohDeptExit(TObject *Sender);
        void __fastcall scPivodPodLineExit(TObject *Sender);
private:	// User declarations
        void __fastcall GetGoodsInfoByPod(AnsiString sPodCode,AnsiString sPodLine);
        AnsiString __fastcall GetDataToGrid();
        void __fastcall RefreshUpdateData(int MsgSrc,int MsgType);
        void __fastcall UnDoChange(){};

public:		// User declarations
        AnsiString FormIniFile;

        AnsiString __fastcall GetDetailValue(int FieldIndex);
        AnsiString __fastcall GetHeadValue(int Index);
        void __fastcall SetHeadValue(int Index ,AnsiString Value);
        void __fastcall SetDetailValue(int Index, AnsiString Value);
        void __fastcall InitEditControl();
        void __fastcall ClearControl(int Section,bool BringToNext);
        void __fastcall GetDataFromComObject(int Section);
        void __fastcall SendDataToComObject(int Section);
        void __fastcall WaitUserInput(int Section);
        void __fastcall RefreshGridData(int mAction);
        void __fastcall DisplayBill();
        void __fastcall GetBill(AnsiString BillID);
        void __fastcall FillGridWithData();
        void __fastcall ChangeToBrowseState(bool Browse=true);
        int  __fastcall GetNewPivodLine();
        void __fastcall CalculateAmt(char mAction, int iRow);
        void __fastcall FillPodLine();
        void __fastcall AutoCalculate();

        __fastcall TfrmPivoh(TComponent* Owner);
};
//---------------------------------------------------------------------------
extern PACKAGE TfrmPivoh *frmPivoh;
//---------------------------------------------------------------------------
#endif