bmhdl.h

速达开源ERP系统

    void __fastcall SetPbomhEdate(AnsiString value);
    void __fastcall SetPbomhIdate(AnsiString value);
    void __fastcall SetPbomhUser(AnsiString value);
    void __fastcall SetPbomhProducter(AnsiString value);
    void __fastcall SetPbomhDesc(AnsiString value);

    __property AnsiString PbomhGoods  = { read = m_PbomhGoods, write = SetPbomhGoods };
    __property AnsiString PbomhUnit  = { read = m_PbomhUnit };
    __property int PbomhType  = { read = m_PbomhType };
    __property double PbomhEoq  = { read = m_PbomhEoq, write = SetPbomhEoq };
    __property double PbomhRlt  = { read = m_PbomhRlt, write = SetPbomhRlt };
    __property int PbomhOp  = { read = m_PbomhOp, write = SetPbomhOp };
    __property int PbomhPp  = { read = m_PbomhPp, write = SetPbomhPp };
    __property double PbomhFpr  = { read = m_PbomhFpr, write = SetPbomhFpr };
    __property AnsiString PbomhEdate  = { read = m_PbomhEdate, write = SetPbomhEdate };
    __property AnsiString PbomhIdate  = { read = m_PbomhIdate, write = SetPbomhIdate };
    __property AnsiString PbomhUser  = { read = m_PbomhUser, write = SetPbomhUser };
    __property AnsiString PbomhProducter  = { read = m_PbomhProducter, write = SetPbomhProducter };
    __property AnsiString PbomhDesc  = { read = m_PbomhDesc, write = SetPbomhDesc };
    __property AnsiString PbomhSysDate  = { read = m_PbomhSysDate };

public:

    TsdPbomh(TDataComm *DC);
    TsdPbomh();
    ~TsdPbomh();

    void Update();
    void Delete();
    void AddItem();
    void InsertItem();
    void EditItem();
    void DeleteItem();
    void RemoveItem();
    void ClearItem();
    void CancelItem();
    void AddToObject();
    bool LocateItemByIndex(int Index);
    bool LocateItemByKey(AnsiString Key);

    void AssignValue();
    void Assign(TsdPbomh *p);
    void RestoreValue();
    void RestoreItem();
    int  Query();
    bool Find(AnsiString WhereStr);

    AnsiString GetFieldValue(euPbomh sdFieldName);
    void SetFieldValue(euPbomh sdFieldName, AnsiString Value);

    AnsiString GetItemValue(euPbomd FieldName);
    void SetItemValue(euPbomd FieldName, AnsiString Value);
    __property int ItemCount  = { read = GetItemCount };
    __property int CurItemNo  = { read = GetCurItemNo };
    __property AnsiString ItemBookMark  = { read = GetItemBookMark };
};

//***************************************
//     ClassName:(TsdEcod)             //
//     Description:工程更改单行的维护  //
//     Created On:2000/06/01           //
//***************************************
class _EXPORT_TYPE TsdEcod : public TsdDetail
{
private:

    AnsiString  m_EcodGoods;
    AnsiString  m_EcodPgoods;

    int         m_EcodLine;
    AnsiString  m_EcodCode;
    AnsiString  m_EcodBgoods;
    AnsiString  m_EcodAgoods;
    AnsiString  m_EcodUnit;
    double      m_EcodQty;
    double      m_EcodShl;
    int         m_EcodType;
    int         m_EcodFrom;
    int         m_EcodPp;
    int         m_EcodOp;
    AnsiString  m_EcodProcess;
    int         m_EcodCfg;     //配置类型
    double      m_EcodLot;
    AnsiString  m_EcodDesc;
    AnsiString  m_EcodReason;

//BackUp

    int         b_EcodLine;
    AnsiString  b_EcodCode;
    AnsiString  b_EcodBgoods;
    AnsiString  b_EcodAgoods;
    AnsiString  b_EcodUnit;
    double      b_EcodQty;
    double      b_EcodShl;
    int         b_EcodType;
    int         b_EcodFrom;
    int         b_EcodPp;
    int         b_EcodOp;
    AnsiString  b_EcodProcess;
    int         b_EcodCfg;     //配置类型
    double      b_EcodLot;
    AnsiString  b_EcodDesc;
    AnsiString  b_EcodReason;

    void __fastcall SetEcodLine(int value);
    void __fastcall SetEcodCode(AnsiString value);
    void __fastcall SetEcodBgoods(AnsiString value);
    void __fastcall SetEcodAgoods(AnsiString value);
    void __fastcall SetEcodQty(double value);
    void __fastcall SetEcodShl(double value);
    void __fastcall SetEcodPp(int value);
    void __fastcall SetEcodOp(int value);
    void __fastcall SetEcodProcess(AnsiString value);
    void __fastcall SetEcodCfg(int value);
    void __fastcall SetEcodLot(double value);
    void __fastcall SetEcodDesc(AnsiString value);
    void __fastcall SetEcodReason(AnsiString value);

    __property int EcodLine  = { read = m_EcodLine, write = SetEcodLine };
    __property AnsiString EcodCode  = { read = m_EcodCode, write = SetEcodCode };
    __property AnsiString EcodBgoods = { read = m_EcodBgoods, write = SetEcodBgoods };
    __property AnsiString EcodAgoods = { read = m_EcodAgoods, write = SetEcodAgoods };
    __property AnsiString EcodUnit  = { read = m_EcodUnit };
    __property double EcodQty  = { read = m_EcodQty, write = SetEcodQty };
    __property double EcodShl  = { read = m_EcodShl, write = SetEcodShl };
    __property int EcodType  = { read = m_EcodType };
    __property int EcodFrom  = { read = m_EcodFrom };
    __property int EcodPp  = { read = m_EcodPp, write = SetEcodPp };
    __property int EcodOp  = { read = m_EcodOp, write = SetEcodOp };
    __property AnsiString EcodProcess  = { read = m_EcodProcess, write = SetEcodProcess };
    __property int EcodCfg = { read = m_EcodCfg, write = SetEcodCfg };
    __property double EcodLot  = { read = m_EcodLot, write = SetEcodLot };
    __property AnsiString EcodDesc  = { read = m_EcodDesc, write = SetEcodDesc };
    __property AnsiString EcodReason  = { read = m_EcodReason, write = SetEcodReason };

public:
    TsdEcod(TDataComm *DC);
    TsdEcod();
    TsdEcoh *sdParent;

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

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

    AnsiString GetFieldValue(euEcod sdFieldName);
    AnsiString GetOldFieldValue(euEcod sdFieldName);
    void SetFieldValue(euEcod sdFieldName, AnsiString Value);

    ~TsdEcod();
};

//***************************************
//     ClassName:(TsdEcoh)             //
//     Description:工程更改单头的维护  //
//     Created On:2000/06/01           //
//***************************************
class _EXPORT_TYPE TsdEcoh : public TsdHead
{
private:

    AnsiString  m_EcohCode;
    AnsiString  m_EcohVer;    //版本号
    AnsiString  m_EcohFileNo; //文件号
    AnsiString  m_EcohDate;
    AnsiString  m_EcohEdate;
    AnsiString  m_EcohIdate;
    AnsiString  m_EcohGoods;
    AnsiString  m_EcohUser;
    AnsiString  m_EcohDesc;
    int         m_EcohCheck;
    AnsiString  m_EcohChecker;
    AnsiString  m_EcohCheckDate;
    AnsiString  m_EcohSysDate;

    AnsiString  b_EcohCode;
    AnsiString  b_EcohVer;
    AnsiString  b_EcohFileNo;
    AnsiString  b_EcohDate;
    AnsiString  b_EcohEdate;
    AnsiString  b_EcohIdate;
    AnsiString  b_EcohGoods;
    AnsiString  b_EcohUser;
    AnsiString  b_EcohDesc;
    int         b_EcohCheck;
    AnsiString  b_EcohChecker;
    AnsiString  b_EcohCheckDate;
    AnsiString  b_EcohSysDate;

    TsdEcod     *m_sdEcod;
    TsdEcod     *b_sdEcod;

private:

    void BackupValue();
    void EmptyValue(int Index);
    void BatchLetValue();
    void NewDetail();
    void DeleteDetail();

    int __fastcall GetItemCount();
    int __fastcall GetCurItemNo();
    char __fastcall GetCurItemStatus();
    AnsiString __fastcall GetItemBookMark();

    void __fastcall SetEcohCode(AnsiString value);
    void __fastcall SetEcohVer(AnsiString value);
    void __fastcall SetEcohFileNo(AnsiString value);
    void __fastcall SetEcohDate(AnsiString value);
    void __fastcall SetEcohGoods(AnsiString value);
    void __fastcall SetEcohEdate(AnsiString value);
    void __fastcall SetEcohIdate(AnsiString value);
    void __fastcall SetEcohUser(AnsiString value);
    void __fastcall SetEcohCheck(int value);
    void __fastcall SetEcohChecker(AnsiString value);
    void __fastcall SetEcohCheckDate(AnsiString value);
    void __fastcall SetEcohDesc(AnsiString value);

    __property AnsiString EcohCode  = { read = m_EcohCode, write = SetEcohCode };
    __property AnsiString EcohGoods  = { read = m_EcohGoods, write = SetEcohGoods };
    __property AnsiString EcohVer  = { read = m_EcohVer, write = SetEcohVer };
    __property AnsiString EcohFileNo  = { read = m_EcohFileNo, write = SetEcohFileNo };
    __property AnsiString EcohDate  = { read = m_EcohDate, write = SetEcohDate };
    __property AnsiString EcohEdate  = { read = m_EcohEdate, write = SetEcohEdate };
    __property AnsiString EcohIdate  = { read = m_EcohIdate, write = SetEcohIdate };
    __property AnsiString EcohUser  = { read = m_EcohUser, write = SetEcohUser };
    __property int EcohCheck  = { read = m_EcohCheck, write = SetEcohCheck };
    __property AnsiString EcohChecker  = { read = m_EcohChecker, write = SetEcohChecker };
    __property AnsiString EcohCheckDate  = { read = m_EcohCheckDate, write = SetEcohCheckDate };
    __property AnsiString EcohDesc  = { read = m_EcohDesc, write = SetEcohDesc };
    __property AnsiString EcohSysDate  = { read = m_EcohSysDate };

public:

    TsdEcoh(TDataComm *DC);
    TsdEcoh();
    ~TsdEcoh();

    void Update();
    void Delete();
    void Check(int IsCheck);

    void AddItem();
    void InsertItem();
    void EditItem();
    void DeleteItem();
    void RemoveItem();
    void ClearItem();
    void CancelItem();
    void AddToObject();
    bool LocateItemByIndex(int Index);
    bool LocateItemByKey(AnsiString Key);

    void AssignValue();
    void Assign(TsdEcoh *p);
    void RestoreValue();
    void RestoreItem();
    int  Query();
    bool Find(AnsiString WhereStr);

    AnsiString GetFieldValue(euEcoh sdFieldName);
    void SetFieldValue(euEcoh sdFieldName, AnsiString Value);

    AnsiString GetItemValue(euEcod FieldName);
    void SetItemValue(euEcod FieldName, AnsiString Value);
    __property int ItemCount  = { read = GetItemCount };
    __property int CurItemNo  = { read = GetCurItemNo };
    __property AnsiString ItemBookMark  = { read = GetItemBookMark };
};

//***************************************
//     ClassName:(TsdRep)              //
//     Description:物料单替换件的维护  //
//     Created On:2000/06/01           //
//***************************************
class _EXPORT_TYPE TsdRep : public TsdStandard
{
private:

    AnsiString  m_RepPgoods;
    AnsiString  m_RepOgoods;
    AnsiString  m_RepNgoods;
    AnsiString  m_RepUnit;
    double      m_RepQty;
    double      m_RepShl;
    int         m_RepType;
    int         m_RepFrom;
    int         m_RepPp;
    int         m_RepOp;
    AnsiString  m_RepProcess;
    AnsiString  m_RepEdate;
    AnsiString  m_RepIdate;
    int         m_RepCfg;     //配置类型
    double      m_RepLot;
    int         m_RepLlc;
    AnsiString  m_RepUser;
    int         m_RepCheck;
    AnsiString  m_RepChecker;
    AnsiString  m_RepCheckDate;
    AnsiString  m_RepDesc;
    AnsiString  m_RepSysDate;

    AnsiString  b_RepPgoods;
    AnsiString  b_RepOgoods;
    AnsiString  b_RepNgoods;
    AnsiString  b_RepUnit;
    double      b_RepQty;
    double      b_RepShl;
    int         b_RepType;
    int         b_RepFrom;
    int         b_RepPp;
    int         b_RepOp;
    AnsiString  b_RepProcess;
    AnsiString  b_RepEdate;
    AnsiString  b_RepIdate;
    int         b_RepCfg;
    double      b_RepLot;
    int         b_RepLlc;
    AnsiString  b_RepUser;
    int         b_RepCheck;
    AnsiString  b_RepChecker;
    AnsiString  b_RepCheckDate;
    AnsiString  b_RepDesc;
    AnsiString  b_RepSysDate;

    void __fastcall SetRepPgoods(AnsiString value);
    void __fastcall SetRepNgoods(AnsiString value);
    void __fastcall SetRepOgoods(AnsiString value);
    void __fastcall SetRepQty(double value);
    void __fastcall SetRepShl(double value);
    void __fastcall SetRepPp(int value);
    void __fastcall SetRepOp(int value);
    void __fastcall SetRepProcess(AnsiString value);
    void __fastcall SetRepEdate(AnsiString value);
    void __fastcall SetRepIdate(AnsiString value);
    void __fastcall SetRepCfg(int value);
    void __fastcall SetRepLot(double value);
    void __fastcall SetRepLlc(int value);
    void __fastcall SetRepUser(AnsiString value);
    void __fastcall SetRepCheck(int value);
    void __fastcall SetRepChecker(AnsiString value);
    void __fastcall SetRepCheckDate(AnsiString value);
    void __fastcall SetRepDesc(AnsiString value);

    __property AnsiString RepNgoods = { read = m_RepNgoods, write = SetRepNgoods };
    __property AnsiString RepPgoods = { read = m_RepPgoods,write =SetRepPgoods };
    __property AnsiString RepOgoods  = { read = m_RepOgoods, write = SetRepOgoods };
    __property AnsiString RepUnit  = { read = m_RepUnit};
    __property double RepQty = { read = m_RepQty, write = SetRepQty };
    __property double RepShl = { read = m_RepShl, write = SetRepShl };
    __property int RepType = { read = m_RepType };
    __property int RepFrom = { read = m_RepFrom };
    __property int RepPp = { read = m_RepPp, write = SetRepPp };
    __property int RepOp = { read = m_RepOp, write = SetRepOp };
    __property AnsiString RepProcess  = { read = m_RepProcess, write = SetRepProcess };
    __property AnsiString RepEdate  = { read = m_RepEdate, write = SetRepEdate };
    __property AnsiString RepIdate  = { read = m_RepIdate, write = SetRepIdate };
    __property int RepCfg = { read = m_RepCfg, write = SetRepCfg };
    __property double RepLot  = { read = m_RepLot, write = SetRepLot };
    __property int RepLlc = { read = m_RepLlc,write=SetRepLlc };
    __property AnsiString RepUser  = { read = m_RepUser,write=SetRepUser };
    __property int RepCheck  = { read = m_RepCheck,write=SetRepCheck };
    __property AnsiString RepChecker = { read = m_RepChecker,write=SetRepChecker };
    __property AnsiString RepCheckDate = { read = m_RepCheckDate,write=SetRepCheckDate };
    __property AnsiString RepDesc  = { read = m_RepDesc, write = SetRepDesc };
    __property AnsiString RepSysDate = { read = m_RepSysDate };

public:
    TsdRep(TDataComm *DC);
    TsdRep();
    ~TsdRep();
    
    void BackupValue();
    void RestoreValue();
    void EmptyValue(int Index);
    void BatchLetValue();
    void AssignValue();

    void Update();
    void Delete();
    void Check(int IsCheck);
    void Assign(TsdRep *p);
    int  Query();
    bool Find(AnsiString WhereStr);

    AnsiString GetFieldValue(euRep sdFieldName);
    void SetFieldValue(euRep sdFieldName, AnsiString Value);
};

#endif