mskill.cpp

科思ERP部分源码及控件

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

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

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

#pragma package(smart_init)
TKSSkill *sdSkill;
//---------------------------------------------------------------------------
__fastcall TKSSkill::TKSSkill()
  :TKSMidBase()
{
}
//---------------------------------------------------------------------------
void __fastcall TKSSkill::ValidHeadValues()
{
   AnsiString  m_SkillCode;
   AnsiString  b_SkillCode;
   m_SkillCode=GetMasterValue("SkillCode");
   b_SkillCode=GetMasterOldValue("SkillCode");
  if(m_SkillCode.IsEmpty())
    throw Exception("技能代码不能为空");
  if(m_SkillCode.Length()>18)
    throw Exception("技能代码的长度不能大于18");

   AnsiString  m_SkillName;
   m_SkillName=GetMasterValue("SkillName");
  if(m_SkillName.IsEmpty())
    throw Exception("技能名称不能为空");
  if(m_SkillName.Length()>20)
    throw Exception("技能名称的长度不能大于20");
}
//---------------------------------------------------------------------------
void __fastcall TKSSkill::CmdExec(AnsiString Param)
{

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