mbdpd.cpp

科思ERP部分源码及控件

//---------------------------------------------------------------------------

#include <vcl.h>
#pragma hdrstop
#include "mBdpd.h"

//---------------------------------------------------------------------------

#pragma package(smart_init)
TKSBdpd *sdBdpd;
//---------------------------------------------------------------------------
__fastcall TKSBdpd::TKSBdpd()
  :TKSMidBase()
{
}
//---------------------------------------------------------------------------
void __fastcall TKSBdpd::ValidHeadValues()
{
  //计提编号
      ValidBdpdCode();
 //月份
      ValidBdpdFmonth();
  //日期
      ValidBdpdDate();
  //操作员
      ValidBdpdUser();
  //金额
      ValidBdpdAmt();
  //备注
      ValidBdpdDesc();
}
//---------------------------------------------------------------------------
void __fastcall TKSBdpd::ValidBdpdCode()  //计提编号
{
}

//---------------------------------------------------------------------------
void __fastcall TKSBdpd::ValidBdpdFmonth()  //月份
{
}
//---------------------------------------------------------------------------
void __fastcall TKSBdpd::ValidBdpdDate()  //日期
{
}

//---------------------------------------------------------------------------
void __fastcall TKSBdpd::ValidBdpdUser()  //操作员
{
  AnsiString  m_BdpdUser;
   m_BdpdUser=GetMasterValue("BdpdUser");
}
//---------------------------------------------------------------------------
void __fastcall TKSBdpd::ValidBdpdAmt()  //金额
{
  double m_BdpdAmt;
   m_BdpdAmt=GetMasterValue("BdpdAmt");
    if(m_BdpdAmt<0)
     throw Exception("记提金额不能小于0");
}

//---------------------------------------------------------------------------
void __fastcall TKSBdpd::ValidBdpdDesc()  //备注
{
}
//---------------------------------------------------------------------------
void __fastcall TKSBdpd::CmdExec(AnsiString Param)
{

}
//---------------------------------------------------------------------------