mdeliver.cpp

来自「一个以前收集的基于C/S架构的ERP客户端源代码」· C++ 代码 · 共 38 行

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

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

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

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

   AnsiString  m_DeliverName;
   m_DeliverName=GetMasterValue("DeliverName");
    if(m_DeliverName.IsEmpty())
        throw Exception("'交货方式名称'不能为空");
    if(m_DeliverName.Length()>20)
        throw Exception("'交货方式名称'长度不能大于20");

   AnsiString  m_DeliverDesc;
   m_DeliverDesc=GetMasterValue("DeliverDesc");
    if(m_DeliverDesc.Length()>40)
        throw Exception("'备注'长度不能大于40");
}
//---------------------------------------------------------------------------
void __fastcall TKSDeliver::CmdExec(AnsiString Param)
{

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