mpaymode.cpp

来自「科思ERP部分源码及控件」· C++ 代码 · 共 42 行

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

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

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

#pragma package(smart_init)
TKSPayMode *sdPayMode;
//---------------------------------------------------------------------------
__fastcall TKSPayMode::TKSPayMode()
  :TKSMidBase()
{
}
//---------------------------------------------------------------------------
void __fastcall TKSPayMode::ValidHeadValues()
{
   AnsiString  m_PayModeName;
   m_PayModeName=GetMasterValue("PayModeName");
    if(m_PayModeName.IsEmpty())
        throw Exception("'付款方式名称'不能为空");
    if(m_PayModeName.Length()>20)
        throw Exception("'付款方式名称'长度不能大于20");

   AnsiString  m_PayModeDesc;
   m_PayModeDesc=GetMasterValue("PayModeDesc");
    if(m_PayModeDesc.Length()>40)
        throw Exception("'备注长度'不能大于40");

   int m_PayModeTerm;
   m_PayModeTerm=GetMasterValue("PayModeTerm");
        if(m_PayModeTerm<0)
          throw Exception("'付款期限'不能为小于0!");
}
//---------------------------------------------------------------------------
void __fastcall TKSPayMode::CmdExec(AnsiString Param)
{

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