system.h

邮 电 公 司 erp源码

    AnsiString m_VFieldName;   //字段名
    AnsiString m_VFieldDesc;   //字段描述
    AnsiString m_VFieldType;   //字段类型
    int        m_VFieldWidth;   //宽度
    int        m_VFieldScale;   //精度
    int        m_VFieldFlg;   //虚拟字段标志
    AnsiString m_VFieldExpr;   //字段表达式
    AnsiString m_VFieldMemo;   //备注
    int        m_VFieldNo;   //序号
//backup
    AnsiString b_VFieldView;
    AnsiString b_VFieldName;
    AnsiString b_VFieldDesc;
    AnsiString b_VFieldType;
    int        b_VFieldWidth;
    int        b_VFieldScale;
    int        b_VFieldFlg;
    AnsiString b_VFieldExpr;
    AnsiString b_VFieldMemo;
    int        b_VFieldNo;

    void __fastcall SetVFieldView(AnsiString value);
    void __fastcall SetVFieldName(AnsiString value);
    void __fastcall SetVFieldDesc(AnsiString value);
    void __fastcall SetVFieldType(AnsiString value);
    void __fastcall SetVFieldWidth(int value);
    void __fastcall SetVFieldScale(int value);
    void __fastcall SetVFieldFlg(int value);
    void __fastcall SetVFieldExpr(AnsiString value);
    void __fastcall SetVFieldMemo(AnsiString value);
    void __fastcall SetVFieldNo(int value);

    __property  AnsiString VFieldView={read=m_VFieldView,write=SetVFieldView};
    __property  AnsiString VFieldName={read=m_VFieldName,write=SetVFieldName};
    __property  AnsiString VFieldDesc={read=m_VFieldDesc,write=SetVFieldDesc};
    __property  AnsiString VFieldType={read=m_VFieldType,write=SetVFieldType};
    __property  int        VFieldWidth={read=m_VFieldWidth,write=SetVFieldWidth};
    __property  int        VFieldScale={read=m_VFieldScale,write=SetVFieldScale};
    __property  int        VFieldFlg={read=m_VFieldFlg,write=SetVFieldFlg};
    __property  AnsiString VFieldExpr={read=m_VFieldExpr,write=SetVFieldExpr};
    __property  AnsiString VFieldMemo={read=m_VFieldMemo,write=SetVFieldMemo};
    __property  int        VFieldNo={read=m_VFieldNo,write=SetVFieldNo};

public:
    TsdVField(TDataComm *DC);
    TsdVField();
    ~TsdVField();
    TsdView *sdParent;

    void BackupValue();
    void EmptyValue(int Index);
    void BatchLetValue();
    void AssignValue();

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

    AnsiString GetFieldValue(euVField sdFieldName);
    AnsiString GetOldFieldValue(euVField sdFieldName);
    void SetFieldValue(euVField sdFieldName, AnsiString value);
    void RestoreValue();
};
//--------------------------------------------------------------
 class _EXPORT_TYPE TsdView: public TsdHead
{
private:

    TsdVField*m_sdVField;
    TsdVField*b_sdVField;
    AnsiString m_ViewName;   //视图名
    AnsiString m_ViewDesc;   //描述
    AnsiString m_ViewClassID;   //所属模块
    AnsiString m_ViewTable;   //引用表名
    AnsiString m_ViewWhere;   //过滤条件
    AnsiString m_ViewOrder;   //排序字段
    AnsiString m_ViewGroup;   //分组字段
    AnsiString m_ViewDate;   //系统时间
//backup
    AnsiString b_ViewName;
    AnsiString b_ViewDesc;
    AnsiString b_ViewClassID;
    AnsiString b_ViewTable;
    AnsiString b_ViewWhere;
    AnsiString b_ViewOrder;
    AnsiString b_ViewGroup;
    AnsiString b_ViewDate;

    void __fastcall SetViewName(AnsiString value);
    void __fastcall SetViewDesc(AnsiString value);
    void __fastcall SetViewClassID(AnsiString value);
    void __fastcall SetViewTable(AnsiString value);
    void __fastcall SetViewWhere(AnsiString value);
    void __fastcall SetViewOrder(AnsiString value);
    void __fastcall SetViewGroup(AnsiString value);

    __property  AnsiString ViewName={read=m_ViewName,write=SetViewName};
    __property  AnsiString ViewDesc={read=m_ViewDesc,write=SetViewDesc};
    __property  AnsiString ViewClassID={read=m_ViewClassID,write=SetViewClassID};
    __property  AnsiString ViewTable={read=m_ViewTable,write=SetViewTable};
    __property  AnsiString ViewWhere={read=m_ViewWhere,write=SetViewWhere};
    __property  AnsiString ViewOrder={read=m_ViewOrder,write=SetViewOrder};
    __property  AnsiString ViewGroup={read=m_ViewGroup,write=SetViewGroup};
    __property  AnsiString ViewDate={read=m_ViewDate};


private:
    void BackupValue();
    void EmptyValue(int Index);
    void BatchLetValue();
    void AssignValue();
    int __fastcall GetItemCount();
    int __fastcall GetCurItemNo();
    char __fastcall GetCurItemStatus();
    AnsiString __fastcall GetItemBookMark();

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

    void Update();
    void Delete();
    void AddItem();
    void InsertItem();
    void EditItem();
    void NewDetail();
    void DeleteDetail();
    void DeleteItem();
    void RemoveItem();
    void ClearItem();
    void CancelItem();
    void AddToObject();
    bool LocateItemByIndex(int Index);
    bool LocateItemByKey(AnsiString Key);
    void Assign(TsdView *p);
    int  Query();
    bool Find(AnsiString WhereStr);
    void Check(int IsCheck);

    AnsiString GetFieldValue(euView sdFieldName);
    void SetFieldValue(euView sdFieldName, AnsiString value);
    void RestoreValue();

    AnsiString GetItemValue(euVField FieldName);
    void SetItemValue(euVField FieldName, AnsiString value);
    __property int ItemCount  = { read = GetItemCount };
    __property int CurItemNo  = { read = GetCurItemNo };
    __property int  CurItemStatus  = { read = GetCurItemStatus };
    __property AnsiString ItemBookMark  = { read = GetItemBookMark };
};


//**************************************
//     TsdFof
//**************************************
//--------------------------------------------------------------
class _EXPORT_TYPE TsdFof: public TsdStandard
{
private:

    AnsiString m_FofField;   //字段名
    AnsiString m_FofForm;    //窗体名
//backup
    AnsiString b_FofField;
    AnsiString b_FofForm;

    void __fastcall SetFofField(AnsiString value);
    void __fastcall SetFofForm(AnsiString value);

    __property  AnsiString FofField={read=m_FofField,write=SetFofField};
    __property  AnsiString FofForm={read=m_FofForm,write=SetFofForm};
    void BackupValue();
    void EmptyValue(int Index);
    void BatchLetValue();
    void AssignValue();


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


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

    AnsiString GetFieldValue(euFof sdFieldName);
    void SetFieldValue(euFof sdFieldName, AnsiString value);
    void RestoreValue();
};

//**************************************
//     TsdAcm
//**************************************
//--------------------------------------------------------------
 class _EXPORT_TYPE TsdAcm: public TsdStandard
{
private:

    AnsiString m_AcmCode;   //自动编码号
    AnsiString m_AcmField;   //编码字段
    AnsiString m_AcmSymbol;   //标识符
    int        m_AcmNoLen;   //流水号长度
    int        m_AcmPart1;   //第一段方式
    int        m_AcmPart2;   //第二段方式
    int        m_AcmPart3;   //第三段方式
//backup
    AnsiString b_AcmCode;
    AnsiString b_AcmField;
    AnsiString b_AcmSymbol;
    int        b_AcmNoLen;
    int        b_AcmPart1;
    int        b_AcmPart2;
    int        b_AcmPart3;

    void __fastcall SetAcmCode(AnsiString value);
    void __fastcall SetAcmField(AnsiString value);
    void __fastcall SetAcmSymbol(AnsiString value);
    void __fastcall SetAcmNoLen(int value);
    void __fastcall SetAcmPart1(int value);
    void __fastcall SetAcmPart2(int value);
    void __fastcall SetAcmPart3(int value);

    __property  AnsiString AcmCode={read=m_AcmCode,write=SetAcmCode};
    __property  AnsiString AcmField={read=m_AcmField,write=SetAcmField};
    __property  AnsiString AcmSymbol={read=m_AcmSymbol,write=SetAcmSymbol};
    __property  int        AcmNoLen={read=m_AcmNoLen,write=SetAcmNoLen};
    __property  int        AcmPart1={read=m_AcmPart1,write=SetAcmPart1};
    __property  int        AcmPart2={read=m_AcmPart2,write=SetAcmPart2};
    __property  int        AcmPart3={read=m_AcmPart3,write=SetAcmPart3};
    void BackupValue();
    void EmptyValue(int Index);
    void BatchLetValue();
    void AssignValue();


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


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

    AnsiString GetFieldValue(euAcm sdFieldName);
    void SetFieldValue(euAcm sdFieldName, AnsiString value);
    void RestoreValue();
};

//**************************************
//     TsdFuc
//**************************************
//--------------------------------------------------------------
class _EXPORT_TYPE TsdFuc: public TsdStandard
{
private:

    AnsiString m_FucFormName;   //窗体名称
    AnsiString m_FucAcm;   //自动编号代码
    int        m_FucNo;   //当前流水号
//backup
    AnsiString b_FucFormName;
    AnsiString b_FucAcm;
    int        b_FucNo;

    void __fastcall SetFucFormName(AnsiString value);
    void __fastcall SetFucAcm(AnsiString value);
    void __fastcall SetFucNo(int value);

    __property  AnsiString FucFormName={read=m_FucFormName,write=SetFucFormName};
    __property  AnsiString FucAcm={read=m_FucAcm,write=SetFucAcm};
    __property  int        FucNo={read=m_FucNo,write=SetFucNo};
    void BackupValue();
    void EmptyValue(int Index);
    void BatchLetValue();
    void AssignValue();


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


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

    AnsiString GetFieldValue(euFuc sdFieldName);
    void SetFieldValue(euFuc sdFieldName, AnsiString value);
    void RestoreValue();
};

//*****************************
//   Class:TsdLib
//   Description:库别维护
//   Created on:2000-04-20
//*****************************

class _EXPORT_TYPE TsdLib: public TsdStandard
{
private:

    AnsiString m_LibCode;
    AnsiString m_LibName;
    AnsiString m_LibDesc;

//Backup
    AnsiString b_LibCode;
    AnsiString b_LibName;
    AnsiString b_LibDesc;

    void __fastcall SetLibCode(AnsiString value);
    void __fastcall SetLibName(AnsiString value);
    void __fastcall SetLibDesc(AnsiString value);

    __property  AnsiString LibCode={read=m_LibCode,write=SetLibCode};
    __property  AnsiString LibName={read=m_LibName,write=SetLibName};
    __property  AnsiString LibDesc={read=m_LibDesc,write=SetLibDesc};
    void BackupValue();
    void EmptyValue(int Index);
    void BatchLetValue();
    void AssignValue();

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

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

    AnsiString GetFieldValue(euLib sdFieldName);
    void SetFieldValue(euLib sdFieldName, AnsiString value);
    void RestoreValue();
};

#endif