mapuage.cpp

科思ERP部分源码及控件

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

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

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

#pragma package(smart_init)
TKSApuAge *sdApuAge;
//---------------------------------------------------------------------------
__fastcall TKSApuAge::TKSApuAge()
  :TKSMidBase()
{
}
//---------------------------------------------------------------------------
void __fastcall TKSApuAge::ValidHeadValues()
{
  //序号
      ValidApuAgeNo();
       //天数
      ValidApuAgeDays();
  //备注
      ValidApuAgeDesc();
}
//---------------------------------------------------------------------------
void __fastcall TKSApuAge::ValidApuAgeNo()  //序号
{
  double m_ApuAgeNo;
  double b_ApuAgeNo;
   m_ApuAgeNo=GetMasterValue("ApuAgeNo");
   b_ApuAgeNo=GetMasterOldValue("ApuAgeNo");
    if(m_ApuAgeNo==0)
       throw Exception("序号不能为零!");

}
//---------------------------------------------------------------------------
void __fastcall TKSApuAge::ValidApuAgeDays()  //天数
{
   int m_ApuAgeDays;
   m_ApuAgeDays=GetMasterValue("ApuAgeDays");
   if(m_ApuAgeDays<0)
      throw Exception("未到期帐龄区间天数不能小于零!");

}
//---------------------------------------------------------------------------
void __fastcall TKSApuAge::ValidApuAgeDesc()  //备注
{
}

//---------------------------------------------------------------------------
void __fastcall TKSApuAge::CmdExec(AnsiString Param)
{

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