mproperty.cpp

科思ERP部分源码及控件

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

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

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

#pragma package(smart_init)
TKSProPerty *sdProPerty;
//---------------------------------------------------------------------------
__fastcall TKSProPerty::TKSProPerty()
  :TKSMidBase()
{
}
//---------------------------------------------------------------------------
void __fastcall TKSProPerty::ValidHeadValues()
{

   int m_PropertyPpt;
   m_PropertyPpt=GetMasterValue("PropertyPpt");
    if(m_PropertyPpt!=1 && m_PropertyPpt!=2)
      throw Exception("物料状标识只能取值:1-状态1;2-状态2");

}
//---------------------------------------------------------------------------
void __fastcall TKSProPerty::CmdExec(AnsiString Param)
{

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