emdoc.h

科思ERP部分源码及控件

//---------------------------------------------------------------------------
#ifndef EmdocH
#define EmdocH
#include "sdbaselib.h"
#include "SdEnumType.h"
#include <ADODB.hpp>
#include <db.hpp>

class _EXPORT_TYPE TKSFat;
class _EXPORT_TYPE TKSFacs;
class _EXPORT_TYPE TKSFadm;
class _EXPORT_TYPE TKSFaUse;
class _EXPORT_TYPE TKSFav;
//---------------------------------------------------------------------------
//**************************************
//     TKSFat      设备分类码
//**************************************
class _EXPORT_TYPE TKSFat: public TKSStandard
{
private:
    AnsiString m_FatCode;   //设备分类码
    AnsiString m_FatItem;   //本级编码
    AnsiString m_FatUpperCode;   //上级编码
    int        m_FatLevel;   //层级
    AnsiString m_FatName;   //分类名称
    int        m_FatEnd;   //末级
    AnsiString m_FatFadmCode;   //折旧方法
    int        m_FatPeriod;   //使用年限
    double     m_FatValRate;   //残值率
    AnsiString m_FatFacsCode;   //卡片样式
//backup
    AnsiString b_FatCode;
    AnsiString b_FatItem;
    AnsiString b_FatUpperCode;
    int        b_FatLevel;
    AnsiString b_FatName;
    int        b_FatEnd;
    AnsiString b_FatFadmCode;
    int        b_FatPeriod;
    double     b_FatValRate;
    AnsiString b_FatFacsCode;

    void __fastcall SetFatCode(AnsiString value);
    void __fastcall SetFatItem(AnsiString value);
    void __fastcall SetFatUpperCode(AnsiString value);
    void __fastcall SetFatLevel(int value);
    void __fastcall SetFatName(AnsiString value);
    void __fastcall SetFatEnd(int value);
    void __fastcall SetFatFadmCode(AnsiString value);
    void __fastcall SetFatPeriod(int value);
    void __fastcall SetFatValRate(double value);
    void __fastcall SetFatFacsCode(AnsiString value);

    __property  AnsiString FatCode={read=m_FatCode,write=SetFatCode};
    __property  AnsiString FatItem={read=m_FatItem,write=SetFatItem};
    __property  AnsiString FatUpperCode={read=m_FatUpperCode,write=SetFatUpperCode};
    __property  int        FatLevel={read=m_FatLevel,write=SetFatLevel};
    __property  AnsiString FatName={read=m_FatName,write=SetFatName};
    __property  int        FatEnd={read=m_FatEnd,write=SetFatEnd};
    __property  AnsiString FatFadmCode={read=m_FatFadmCode,write=SetFatFadmCode};
    __property  int        FatPeriod={read=m_FatPeriod,write=SetFatPeriod};
    __property  double     FatValRate={read=m_FatValRate,write=SetFatValRate};
    __property  AnsiString FatFacsCode={read=m_FatFacsCode,write=SetFatFacsCode};
    void BackupValue();
    void EmptyValue(int Index);
    void BatchLetValue();
    void AssignValue();


public:
    TKSFat(TDataComm *DC);
    TKSFat();
    ~TKSFat();

    void RestoreValue();
    void Update();
    void Delete();
    void Assign(TKSFat *p);
    int  Query();
    bool Find(AnsiString WhereStr);

    AnsiString GetFieldValue(euFat sdFieldName);
    void SetFieldValue(euFat sdFieldName, AnsiString value);
};
//**************************************
//     TKSFacs  卡片样式
//**************************************
//--------------------------------------------------------------
class _EXPORT_TYPE TKSFacs: public TKSStandard
{
private:
    AnsiString m_FacsCode;   //卡片样式代码
    AnsiString m_FacsName;   //卡片样式名
    AnsiString m_FacsPath;   //卡片样式路径
    AnsiString m_FacsDesc;   //备注
//backup
    AnsiString b_FacsCode;
    AnsiString b_FacsName;
    AnsiString b_FacsPath;
    AnsiString b_FacsDesc;

    void __fastcall SetFacsCode(AnsiString value);
    void __fastcall SetFacsName(AnsiString value);
    void __fastcall SetFacsPath(AnsiString value);
    void __fastcall SetFacsDesc(AnsiString value);

    __property  AnsiString FacsCode={read=m_FacsCode,write=SetFacsCode};
    __property  AnsiString FacsName={read=m_FacsName,write=SetFacsName};
    __property  AnsiString FacsPath={read=m_FacsPath,write=SetFacsPath};
    __property  AnsiString FacsDesc={read=m_FacsDesc,write=SetFacsDesc};
    void BackupValue();
    void EmptyValue(int Index);
    void BatchLetValue();
    void AssignValue();


public:
    TKSFacs(TDataComm *DC);
    TKSFacs();
    ~TKSFacs();
    void RestoreValue();
    void Update();
    void Delete();
    void Assign(TKSFacs *p);
    int  Query();
    bool Find(AnsiString WhereStr);

    AnsiString GetFieldValue(euFacs sdFieldName);
    void SetFieldValue(euFacs sdFieldName, AnsiString value);
};
//**************************************
//     TKSFadm    折旧方法
//**************************************
//--------------------------------------------------------------
class _EXPORT_TYPE TKSFadm: public TKSStandard
{
private:

    AnsiString m_FadmCode;   //折旧方法代码
    AnsiString m_FadmName;   //折旧方法名称
    int        m_FadmType;   //折旧方式
    AnsiString m_FadmRFormula;   //折旧率公式
    AnsiString m_FadmVFormula;   //折旧额公式
    AnsiString m_FadmDesc;   //备注
//backup
    AnsiString b_FadmCode;
    AnsiString b_FadmName;
    int        b_FadmType;
    AnsiString b_FadmRFormula;
    AnsiString b_FadmVFormula;
    AnsiString b_FadmDesc;

    void __fastcall SetFadmCode(AnsiString value);
    void __fastcall SetFadmName(AnsiString value);
    void __fastcall SetFadmType(int value);
    void __fastcall SetFadmRFormula(AnsiString value);
    void __fastcall SetFadmVFormula(AnsiString value);
    void __fastcall SetFadmDesc(AnsiString value);

    __property  AnsiString FadmCode={read=m_FadmCode,write=SetFadmCode};
    __property  AnsiString FadmName={read=m_FadmName,write=SetFadmName};
    __property  int        FadmType={read=m_FadmType,write=SetFadmType};
    __property  AnsiString FadmRFormula={read=m_FadmRFormula,write=SetFadmRFormula};
    __property  AnsiString FadmVFormula={read=m_FadmVFormula,write=SetFadmVFormula};
    __property  AnsiString FadmDesc={read=m_FadmDesc,write=SetFadmDesc};
    void BackupValue();
    void EmptyValue(int Index);
    void BatchLetValue();
    void AssignValue();


public:
    TKSFadm(TDataComm *DC);
    TKSFadm();
    ~TKSFadm();

    void RestoreValue();
    void Update();
    void Delete();
    void Assign(TKSFadm *p);
    int  Query();
    bool Find(AnsiString WhereStr);

    AnsiString GetFieldValue(euFadm sdFieldName);
    void SetFieldValue(euFadm sdFieldName, AnsiString value);
};
//**************************************
//     TKSFaUse     使用状态
//**************************************
//--------------------------------------------------------------
class _EXPORT_TYPE TKSFaUse: public TKSStandard
{
private:
    AnsiString m_FaUseCode;   //使用状态编码
    AnsiString m_FaUseName;   //使用状态名
    int        m_FaUseType;   //状态类型
    int        m_FaUseDepre;   //是否计提折旧
    AnsiString m_FaUseDesc;   //备注
//backup
    AnsiString b_FaUseCode;
    AnsiString b_FaUseName;
    int        b_FaUseType;
    int        b_FaUseDepre;
    AnsiString b_FaUseDesc;

    void __fastcall SetFaUseCode(AnsiString value);
    void __fastcall SetFaUseName(AnsiString value);
    void __fastcall SetFaUseType(int value);
    void __fastcall SetFaUseDepre(int value);
    void __fastcall SetFaUseDesc(AnsiString value);

    __property  AnsiString FaUseCode={read=m_FaUseCode,write=SetFaUseCode};
    __property  AnsiString FaUseName={read=m_FaUseName,write=SetFaUseName};
    __property  int        FaUseType={read=m_FaUseType,write=SetFaUseType};
    __property  int        FaUseDepre={read=m_FaUseDepre,write=SetFaUseDepre};
    __property  AnsiString FaUseDesc={read=m_FaUseDesc,write=SetFaUseDesc};
    void BackupValue();
    void EmptyValue(int Index);
    void BatchLetValue();
    void AssignValue();


public:
    TKSFaUse(TDataComm *DC);
    TKSFaUse();
    ~TKSFaUse();


    void RestoreValue();
    void Update();
    void Delete();
    void Assign(TKSFaUse *p);
    int  Query();
    bool Find(AnsiString WhereStr);

    AnsiString GetFieldValue(euFaUse sdFieldName);
    void SetFieldValue(euFaUse sdFieldName, AnsiString value);
};
//**************************************
//     TKSFav    变动类型
//**************************************
//--------------------------------------------------------------
class _EXPORT_TYPE TKSFav: public TKSStandard
{
private:
    AnsiString m_FavCode;   //变动类型代码
    AnsiString m_FavName;   //变动名称
    int        m_FavType;   //变动类型
    AnsiString m_FavFvct;   //凭证类型
    AnsiString m_FavGlkm;   //变动科目
    int        m_FavGlDir;   //科目方向
    AnsiString m_FavSummary;   //摘要
    AnsiString m_FavOppGlkm;   //对方科目
    AnsiString m_FavDesc;   //备注
//backup
    AnsiString b_FavCode;
    AnsiString b_FavName;
    int        b_FavType;
    AnsiString b_FavFvct;
    AnsiString b_FavGlkm;
    int        b_FavGlDir;
    AnsiString b_FavSummary;
    AnsiString b_FavOppGlkm;
    AnsiString b_FavDesc;

    void __fastcall SetFavCode(AnsiString value);
    void __fastcall SetFavName(AnsiString value);
    void __fastcall SetFavType(int value);
    void __fastcall SetFavFvct(AnsiString value);
    void __fastcall SetFavGlkm(AnsiString value);
    void __fastcall SetFavGlDir(int value);
    void __fastcall SetFavSummary(AnsiString value);
    void __fastcall SetFavOppGlkm(AnsiString value);
    void __fastcall SetFavDesc(AnsiString value);

    __property  AnsiString FavCode={read=m_FavCode,write=SetFavCode};
    __property  AnsiString FavName={read=m_FavName,write=SetFavName};
    __property  int        FavType={read=m_FavType,write=SetFavType};
    __property  AnsiString FavFvct={read=m_FavFvct,write=SetFavFvct};
    __property  AnsiString FavGlkm={read=m_FavGlkm,write=SetFavGlkm};
    __property  int        FavGlDir={read=m_FavGlDir,write=SetFavGlDir};
    __property  AnsiString FavSummary={read=m_FavSummary,write=SetFavSummary};
    __property  AnsiString FavOppGlkm={read=m_FavOppGlkm,write=SetFavOppGlkm};
    __property  AnsiString FavDesc={read=m_FavDesc,write=SetFavDesc};
    void BackupValue();
    void EmptyValue(int Index);
    void BatchLetValue();
    void AssignValue();
public:
    TKSFav(TDataComm *DC);
    TKSFav();
    ~TKSFav();
    void RestoreValue();
    void Update();
    void Delete();
    void Assign(TKSFav *p);
    int  Query();
    bool Find(AnsiString WhereStr);

    AnsiString GetFieldValue(euFav sdFieldName);
    void SetFieldValue(euFav sdFieldName, AnsiString value);
};

#endif