pmhdl.h

速达开源ERP系统

    __property AnsiString PohPmode  = { read = m_PohPmode, write = SetPohPmode };
    __property AnsiString PohContract  = { read = m_PohContract, write = SetPohContract };
    __property AnsiString PohBuyer  = { read = m_PohBuyer, write = SetPohBuyer };
    __property AnsiString PohDate  = { read = m_PohDate, write = SetPohDate };
    __property AnsiString PohDesc  = { read = m_PohDesc, write = SetPohDesc };
    __property AnsiString PohSugDate  = { read = m_PohSugDate, write = SetPohSugDate };
    __property double PohAmt  = { read = m_PohAmt, write = SetPohAmt };
    __property int PohPayTerm  = { read = b_PohPayTerm, write = SetPohPayTerm };
    __property double PohPrePayAmt  = { read = m_PohPrePayAmt, write = SetPohPrePayAmt };
    __property AnsiString PohSettleMode  = { read = m_PohSettleMode, write = SetPohSettleMode };
    __property int PohCheck  = { read = m_PohCheck ,write=SetPohCheck};
    __property AnsiString PohChecker  = { read = m_PohChecker,write=SetPohChecker };
    __property AnsiString PohCheckDate  = { read = m_PohCheckDate ,write=SetPohCheckDate};
    __property int PohCancel  = { read = m_PohCancel ,write=SetPohCancel};
    __property AnsiString PohCanceler  = { read = m_PohCanceler ,write = SetPohCanceler};
    __property AnsiString PohCancelDate  = { read = m_PohCancelDate ,write = SetPohCancelDate};
    __property double PohCarriage  = { read = m_PohCarriage, write = SetPohCarriage };
    __property int PohClose  = { read = m_PohClose ,write = SetPohClose};
    __property int PohStop  = { read = m_PohStop ,write = SetPohClose};
    __property AnsiString PohPsite={read = m_PohPsite, write = SetPohPsite};
    __property AnsiString PohSysDate={read=m_PohSysDate};//           系统日期
    __property AnsiString PohDeliver={read=m_PohDeliver,write=SetPohDeliver};//           交货方式
    __property AnsiString PohTransMode={read=m_PohTransMode,write=SetPohTransMode};//         运输方式
    __property AnsiString PohUser={read=m_PohUser,write=SetPohUser};

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

//===================================================
//        (TsdRpod)请购单单行维护
//===================================================

class _EXPORT_TYPE TsdRpod : public TsdDetail
{
private:
    int        m_RpodLine;
    AnsiString m_RpodCode;
    AnsiString m_RpodGoodsCode;
    AnsiString m_RpodUnitCode;
    double     m_RpodConvRate;
    int        m_RpodFrom;
    double     m_RpodQty;
    double     m_RpodPrice;
    double     m_RpodAmt;
    double     m_RpodPQty;
    int        m_RpodStatus;
    AnsiString m_RpodReqDate;
    AnsiString m_RpodRecDate;
    AnsiString m_RpodLocCode;
    AnsiString m_RpodDept;
    int        m_RpodClose;
    AnsiString m_RpodCloseDate;
    AnsiString m_RpodDesc;

    int        b_RpodLine;
    AnsiString b_RpodCode;
    AnsiString b_RpodGoodsCode;
    AnsiString b_RpodUnitCode;
    double     b_RpodConvRate;
    double     b_RpodQty;
    double     b_RpodPrice;
    double     b_RpodAmt;
    double     b_RpodPQty;
    int        b_RpodFrom;
    int        b_RpodStatus;
    AnsiString b_RpodReqDate;
    AnsiString b_RpodRecDate;
    AnsiString b_RpodLocCode;
    AnsiString b_RpodDept;
    int        b_RpodClose;
    AnsiString b_RpodCloseDate;
    AnsiString b_RpodDesc;

    AnsiString FUnit;

    void __fastcall SetRpodLine(int value);
    void __fastcall SetRpodCode(AnsiString value);
    void __fastcall SetRpodGoodsCode(AnsiString value);
    void __fastcall SetRpodUnitCode(AnsiString value);
    void __fastcall SetRpodConvRate(double value);
    void __fastcall SetRpodQty(double value);
    void __fastcall SetRpodPQty(double value);
    void __fastcall SetRpodPrice(double value);
    void __fastcall SetRpodAmt(double value);
    void __fastcall SetRpodFrom(int value);
    void __fastcall SetRpodStatus(int value);
    void __fastcall SetRpodReqDate(AnsiString value);
    void __fastcall SetRpodRecDate(AnsiString value);
    void __fastcall SetRpodLocCode(AnsiString value);
    void __fastcall SetRpodDept(AnsiString value);
    void __fastcall SetRpodDesc(AnsiString value);
    void __fastcall SetRpodClose(int value);
    void __fastcall SetRpodCloseDate(AnsiString value);

    __property int RpodLine = {read = m_RpodLine,write = SetRpodLine};
    __property AnsiString RpodCode = {read = m_RpodCode,write = SetRpodCode};
    __property AnsiString RpodGoodsCode = {read = m_RpodGoodsCode,write = SetRpodGoodsCode};
    __property AnsiString RpodUnitCode = {read = m_RpodUnitCode,write = SetRpodUnitCode};
    __property double RpodConvRate = {read = m_RpodConvRate,write = SetRpodConvRate};
    __property double RpodQty = {read = m_RpodQty,write = SetRpodQty};
    __property double RpodPrice = {read = m_RpodPrice,write = SetRpodPrice};
    __property double RpodAmt = {read = m_RpodAmt,write = SetRpodAmt};
    __property int RpodFrom = {read = m_RpodFrom,write = SetRpodFrom};
    __property int RpodStatus = {read = m_RpodStatus,write = SetRpodStatus};
    __property AnsiString RpodReqDate = {read = m_RpodReqDate,write = SetRpodReqDate};
    __property AnsiString RpodRecDate = {read = m_RpodRecDate,write = SetRpodRecDate};
    __property AnsiString RpodLocCode = {read = m_RpodLocCode,write = SetRpodLocCode};
    __property AnsiString RpodDept = {read = m_RpodDept,write = SetRpodDept};
    __property int RpodClose = {read = m_RpodClose ,write=SetRpodClose};
    __property AnsiString RpodCloseDate = {read = m_RpodCloseDate,write=SetRpodCloseDate };
    __property AnsiString RpodDesc = {read = m_RpodDesc,write = SetRpodDesc};
    __property double RpodPQty  = { read = m_RpodPQty,write = SetRpodPQty };

public:
    TsdRpod(TDataComm *DC);
    TsdRpod();
    TsdRpoh *sdParent;

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

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

    AnsiString GetFieldValue(euRpod sdFieldName);
    AnsiString GetOldFieldValue(euRpod sdFieldName);
    void SetFieldValue(euRpod sdFieldName, AnsiString Value);
    void RestoreValue();

    ~TsdRpod();
};

//===================================================
//        (TsdRpoh)请购单单头维护
//===================================================
//--------------------------------------------------------------
 class _EXPORT_TYPE TsdRpoh: public TsdHead
{
private:
    TsdRpod*m_sdRpod;
    TsdRpod*b_sdRpod;
    AnsiString m_RpohCode;   //请购单号
    AnsiString m_RpohSupplyCode;   //建议供应商
    AnsiString m_RpohSettleMode;   //结算方式
    AnsiString m_RpohCurrencyCode;   //币种
    AnsiString m_RpohTaxCode;   //税码
    AnsiString m_RpohBuyerCode;   //申购人
    AnsiString m_RpohDate;   //操作日期
    AnsiString m_RpohPsite;   //交货地址
    AnsiString m_RpohDeliver;   //交货方式
    AnsiString m_RpohTransMode;   //运输方式
    int        m_RpohCheck;   //审核标志
    AnsiString m_RpohChecker;   //审核人
    AnsiString m_RpohCheckDate;   //审核日期
    int        m_RpohCancel;   //取消标志
    AnsiString m_RpohCancelDate;   //取消日期
    AnsiString m_RpohSysDate;   //系统时间
    int        m_RpohClose;

    //backup
    AnsiString b_RpohCode;
    AnsiString b_RpohSupplyCode;
    AnsiString b_RpohSettleMode;
    AnsiString b_RpohCurrencyCode;
    AnsiString b_RpohTaxCode;
    AnsiString b_RpohBuyerCode;
    AnsiString b_RpohDate;
    AnsiString b_RpohPsite;
    AnsiString b_RpohDeliver;
    AnsiString b_RpohTransMode;
    int        b_RpohCheck;
    AnsiString b_RpohChecker;
    AnsiString b_RpohCheckDate;
    int        b_RpohCancel;
    AnsiString b_RpohCancelDate;
    AnsiString b_RpohSysDate;
    int        b_RpohClose;

    void __fastcall SetRpohCode(AnsiString value);
    void __fastcall SetRpohSupplyCode(AnsiString value);
    void __fastcall SetRpohSettleMode(AnsiString value);
    void __fastcall SetRpohCurrencyCode(AnsiString value);
    void __fastcall SetRpohTaxCode(AnsiString value);
    void __fastcall SetRpohBuyerCode(AnsiString value);
    void __fastcall SetRpohDate(AnsiString value);
    void __fastcall SetRpohPsite(AnsiString value);
    void __fastcall SetRpohDeliver(AnsiString value);
    void __fastcall SetRpohTransMode(AnsiString value);
    void __fastcall SetRpohCheck(int value);
    void __fastcall SetRpohChecker(AnsiString value);
    void __fastcall SetRpohCheckDate(AnsiString value);
    void __fastcall SetRpohCancel(int value);
    void __fastcall SetRpohCancelDate(AnsiString value);
    void __fastcall SetRpohSysDate(AnsiString value);
    void __fastcall SetRpohClose(int value);

    __property  AnsiString RpohCode={read=m_RpohCode,write=SetRpohCode};
    __property  AnsiString RpohSupplyCode={read=m_RpohSupplyCode,write=SetRpohSupplyCode};
    __property  AnsiString RpohSettleMode={read=m_RpohSettleMode,write=SetRpohSettleMode};
    __property  AnsiString RpohCurrencyCode={read=m_RpohCurrencyCode,write=SetRpohCurrencyCode};
    __property  AnsiString RpohTaxCode={read=m_RpohTaxCode,write=SetRpohTaxCode};
    __property  AnsiString RpohBuyerCode={read=m_RpohBuyerCode,write=SetRpohBuyerCode};
    __property  AnsiString RpohDate={read=m_RpohDate,write=SetRpohDate};
    __property  AnsiString RpohPsite={read=m_RpohPsite,write=SetRpohPsite};
    __property  AnsiString RpohDeliver={read=m_RpohDeliver,write=SetRpohDeliver};
    __property  AnsiString RpohTransMode={read=m_RpohTransMode,write=SetRpohTransMode};
    __property  int        RpohCheck={read=m_RpohCheck,write=SetRpohCheck};
    __property  AnsiString RpohChecker={read=m_RpohChecker,write=SetRpohChecker};
    __property  AnsiString RpohCheckDate={read=m_RpohCheckDate,write=SetRpohCheckDate};
    __property  int        RpohCancel={read=m_RpohCancel,write=SetRpohCancel};
    __property  AnsiString RpohCancelDate={read=m_RpohCancelDate,write=SetRpohCancelDate};
    __property  AnsiString RpohSysDate={read=m_RpohSysDate,write=SetRpohSysDate};
    __property  int        RpohClose={read=m_RpohClose,write=SetRpohClose};


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

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

    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(TsdRpoh *p);
    int  Query();
    bool Find(AnsiString WhereStr);
    void Check(int IsCheck);
    void Close(int IsClose);
    void Revoke(int IsRevoke);

    AnsiString GetFieldValue(euRpoh sdFieldName);
    void SetFieldValue(euRpoh sdFieldName, AnsiString value);
    void RestoreValue();
    void RestoreItem();

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

//===================================================
//       (TsdZtd)在途单单行维护
//===================================================

class _EXPORT_TYPE TsdZtd : public TsdDetail
{
private:
    AnsiString m_ZtdCode;
    int        m_ZtdLine;
    AnsiString m_ZtdPoCode;
    int        m_ZtdPodLine;
    AnsiString m_ZtdGoods;
    AnsiString m_ZtdUnit;
    double     m_ZtdConvRate;
    double     m_ZtdPoQty;
    double     m_ZtdQty;
    double     m_ZtdPrice;
    double     m_ZtdAmt;
    double     m_ZtdRQty;
    AnsiString m_ZtdSendDate;
    AnsiString m_ZtdReqDate;
    AnsiString m_ZtdRecDate;
    AnsiString m_ZtdPreDate;
    int        m_ZtdClose;
    AnsiString m_ZtdCloseDate;

    AnsiString b_ZtdCode;
    int        b_ZtdLine;
    AnsiString b_ZtdPoCode;
    int        b_ZtdPodLine;
    AnsiString b_ZtdGoods;
    AnsiString b_ZtdUnit;
    double     b_ZtdConvRate;
    double     b_ZtdQty;
    double     b_ZtdPrice;
    double     b_ZtdAmt;
    double     b_ZtdRQty;
    AnsiString b_ZtdSendDate;
    AnsiString b_ZtdReqDate;
    AnsiString b_ZtdRecDate;
    AnsiString b_ZtdPreDate;
    int        b_ZtdClose;
    AnsiString b_ZtdCloseDate;

    void __fastcall SetZtdCode(AnsiString value);
    void __fastcall SetZtdLine(int value);
    void __fastcall SetZtdPoCode(AnsiString value);
    void __fastcall SetZtdPodLine(int value);
    void __fastcall SetZtdQty(double value);
    void __fastcall SetZtdSendDate(AnsiString value);
    void __fastcall SetZtdReqDate(AnsiString value);
    void __fastcall SetZtdRecDate(AnsiString value);
    void __fastcall SetZtdPreDate(AnsiString value);
    void __fastcall SetZtdClose(int value);
    void __fastcall SetZtdCloseDate(AnsiString value);

    __property AnsiString ZtdCode  = { read = m_ZtdCode, write = SetZtdCode };
    __property int ZtdLine  = { read = m_ZtdLine, write = SetZtdLine };
    __property AnsiString ZtdPoCode  = { read = m_ZtdPoCode, write = SetZtdPoCode };
    __property int ZtdPodLine  = { read = m_ZtdPodLine, write = SetZtdPodLine };
    __property AnsiString ZtdGoods  = { read = m_ZtdGoods };
    __property AnsiString ZtdUnit  = { read = m_ZtdUnit};
    __property double ZtdConvRate  = { read = m_ZtdConvRate};
    __property double ZtdQty  = { read = m_ZtdQty, write = SetZtdQty };
    __property double ZtdPrice  = { read = m_ZtdPrice };
    __property double ZtdAmt  = { read = m_ZtdAmt };