emhdl.cpp

邮 电 公 司 erp源码

    case fiFadnFmonth:  
         FadnFmonth=value;
          break;
    case fiFadnFaUse:
         FadnFaUse=value;
          break;
    case fiFadnAddr:  
         FadnAddr=value;
          break;
    case fiFadnEuse:  
         FadnEuse=value.ToInt();
          break;
    case fiFadnFav:  
         FadnFav=value;
          break;
    case fiFadnModel:  
         FadnModel=value;
          break;
    case fiFadnSupply:  
         FadnSupply=value;
          break;
    case fiFadnFactory:  
         FadnFactory=value;
          break;
    case fiFadnArea:
         FadnArea=value;
          break;
    case fiFadnOfDate:  
         FadnOfDate=value;
          break;
    case fiFadnDept:  
         FadnDept=value;
          break;
    case fiFadnCurrency:  
         FadnCurrency=value;
          break;
    case fiFadnERate:  
         FadnERate=value.ToDouble();
          break;
    case fiFadnOVal:  
         FadnOVal=value.ToDouble();
          break;
    case fiFadnWbOVal:  
         FadnWbOVal=value.ToDouble();
          break;
    case fiFadnPVal:
         FadnPVal=value.ToDouble();
          break;
    case fiFadnEVal:  
         FadnEVal=value.ToDouble();
          break;
    case fiFadnCVal:  
         FadnCVal=value.ToDouble();
          break;
    case fiFadnDVal:  
         FadnDVal=value.ToDouble();
          break;
    case fiFadnBVal:  
         FadnBVal=value.ToDouble();
          break;
    case fiFadnTWork:  
         FadnTWork=value.ToDouble();
          break;
    case fiFadnAWork:  
         FadnAWork=value.ToDouble();
          break;
    case fiFadnBWork:
         FadnBWork=value.ToDouble();
          break;
    case fiFadnPeriod:  
         FadnPeriod=value.ToInt();
          break;
    case fiFadnAPeriod:  
         FadnAPeriod=value.ToInt();
          break;
    case fiFadnBPeriod:  
         FadnBPeriod=value.ToInt();
          break;
    case fiFadnFadm:  
         FadnFadm=value;
          break;
    case fiFadnUDate:  
         FadnUDate=value;
          break;
    case fiFadnAddType:  
         FadnAddType=value;
          break;
    case fiFadnDecType:
         FadnDecType=value;
          break;
    case fiFadnStop:  
         FadnStop=value.ToInt();
          break;
    case fiFadnDiscard:  
         FadnDiscard=value.ToInt();
          break;
    case fiFadnRent:  
         FadnRent=value.ToInt();
          break;
    case fiFadnFix:  
         FadnFix=value.ToInt();
          break;
    case fiFadnDec:  
         FadnDec=value.ToInt();
          break;
    case fiFadnAe:  
         FadnAe=value.ToInt();
          break;
    case fiFadnFc:
         FadnFc=value.ToInt();
          break;
    case fiFadnFvct:  
         FadnFvct=value;
          break;
    case fiFadnYzGlkm:  
         FadnYzGlkm=value;
          break;
    case fiFadnYzDir:  
         FadnYzDir=value.ToDouble();
          break;
    case fiFadnZjGlkm:  
         FadnZjGlkm=value;
          break;
    case fiFadnZjDir:  
         FadnZjDir=value.ToDouble();
          break;
    case fiFadnQoGlkm:  
         FadnQoGlkm=value;
          break;
    case fiFadnQoDir:
         FadnQoDir=value.ToDouble();
          break;
    case fiFadnQiGlkm:  
         FadnQiGlkm=value;
          break;
    case fiFadnQiDir:  
         FadnQiDir=value.ToDouble();
          break;
    case fiFadnCzGlkm:  
         FadnCzGlkm=value;
          break;
    case fiFadnCzDir:  
         FadnCzDir=value.ToDouble();
          break;
    case fiFadnZlGlkm:  
         FadnZlGlkm=value;
          break;
    case fiFadnZlDir:  
         FadnZlDir=value.ToDouble();
          break;
    default:
         throw Exception("当前字段未定义可赋值");
      }
}
//---------------------------------------------------------------------------
TsdFadn::TsdFadn(TDataComm *DC)
                :TsdStandard(DC)
{
    try
    {
        EmptyValue(0);
        EmptyValue(1);
        QueryString="SELECT * FROM sdFadn";
        FilterString="";
        OrderString="FadnCode";
    }
    catch(Exception &e)
    {
        ShowMessage(e.Message);
    }
}
//---------------------------------------------------------------------------
TsdFadn::TsdFadn()
                :TsdStandard()
{
    try
    {
        EmptyValue(0);
        EmptyValue(1);
        QueryString="SELECT * FROM sdFadn";
        FilterString="";
        OrderString="FadnCode";
    }
    catch(Exception &e)
    {
        ShowMessage(e.Message);
    }
}
//---------------------------------------------------------------------------
TsdFadn::~TsdFadn()
{
  try{
     }
  catch(...)
    {
     throw Exception("析构函数出错");
    }
}
//---------------------------------------------------------------------------
void TsdFadn::BackupValue()
{
      b_FadnCode=m_FadnCode;
      b_FadnName=m_FadnName;
      b_FadnDesc=m_FadnDesc;
      b_FadnFat=m_FadnFat;
      b_FadnUnit=m_FadnUnit;
      b_FadnDate=m_FadnDate;
      b_FadnFmonth=m_FadnFmonth;
      b_FadnFaUse=m_FadnFaUse;
      b_FadnAddr=m_FadnAddr;
      b_FadnEuse=m_FadnEuse;
      b_FadnFav=m_FadnFav;
      b_FadnModel=m_FadnModel;
      b_FadnSupply=m_FadnSupply;
      b_FadnFactory=m_FadnFactory;
      b_FadnArea=m_FadnArea;
      b_FadnOfDate=m_FadnOfDate;
      b_FadnDept=m_FadnDept;
      b_FadnCurrency=m_FadnCurrency;
      b_FadnERate=m_FadnERate;
      b_FadnOVal=m_FadnOVal;
      b_FadnWbOVal=m_FadnWbOVal;
      b_FadnPVal=m_FadnPVal;
      b_FadnEVal=m_FadnEVal;
      b_FadnCVal=m_FadnCVal;
      b_FadnDVal=m_FadnDVal;
      b_FadnBVal=m_FadnBVal;
      b_FadnTWork=m_FadnTWork;
      b_FadnAWork=m_FadnAWork;
      b_FadnBWork=m_FadnBWork;
      b_FadnPeriod=m_FadnPeriod;
      b_FadnAPeriod=m_FadnAPeriod;
      b_FadnBPeriod=m_FadnBPeriod;
      b_FadnFadm=m_FadnFadm;
      b_FadnUDate=m_FadnUDate;
      b_FadnAddType=m_FadnAddType;
      b_FadnDecType=m_FadnDecType;
      b_FadnStop=m_FadnStop;
      b_FadnDiscard=m_FadnDiscard;
      b_FadnRent=m_FadnRent;
      b_FadnFix=m_FadnFix;
      b_FadnDec=m_FadnDec;
      b_FadnAe=m_FadnAe;
      b_FadnFc=m_FadnFc;
      b_FadnFvct=m_FadnFvct;
      b_FadnYzGlkm=m_FadnYzGlkm;
      b_FadnYzDir=m_FadnYzDir;
      b_FadnZjGlkm=m_FadnZjGlkm;
      b_FadnZjDir=m_FadnZjDir;
      b_FadnQoGlkm=m_FadnQoGlkm;
      b_FadnQoDir=m_FadnQoDir;
      b_FadnQiGlkm=m_FadnQiGlkm;
      b_FadnQiDir=m_FadnQiDir;
      b_FadnCzGlkm=m_FadnCzGlkm;
      b_FadnCzDir=m_FadnCzDir;
      b_FadnZlGlkm=m_FadnZlGlkm;
      b_FadnZlDir=m_FadnZlDir;
}
//---------------------------------------------------------------------------
void TsdFadn::RestoreValue()
{
      m_FadnCode=b_FadnCode;
      m_FadnName=b_FadnName;
      m_FadnDesc=b_FadnDesc;
      m_FadnFat=b_FadnFat;
      m_FadnUnit=b_FadnUnit;
      m_FadnDate=b_FadnDate;
      m_FadnFmonth=b_FadnFmonth;
      m_FadnFaUse=b_FadnFaUse;
      m_FadnAddr=b_FadnAddr;
      m_FadnEuse=b_FadnEuse;
      m_FadnFav=b_FadnFav;
      m_FadnModel=b_FadnModel;
      m_FadnSupply=b_FadnSupply;
      m_FadnFactory=b_FadnFactory;
      m_FadnArea=b_FadnArea;
      m_FadnOfDate=b_FadnOfDate;
      m_FadnDept=b_FadnDept;
      m_FadnCurrency=b_FadnCurrency;
      m_FadnERate=b_FadnERate;
      m_FadnOVal=b_FadnOVal;
      m_FadnWbOVal=b_FadnWbOVal;
      m_FadnPVal=b_FadnPVal;
      m_FadnEVal=b_FadnEVal;
      m_FadnCVal=b_FadnCVal;
      m_FadnDVal=b_FadnDVal;
      m_FadnBVal=b_FadnBVal;
      m_FadnTWork=b_FadnTWork;
      m_FadnAWork=b_FadnAWork;
      m_FadnBWork=b_FadnBWork;
      m_FadnPeriod=b_FadnPeriod;
      m_FadnAPeriod=b_FadnAPeriod;
      m_FadnBPeriod=b_FadnBPeriod;
      m_FadnFadm=b_FadnFadm;
      m_FadnUDate=b_FadnUDate;
      m_FadnAddType=b_FadnAddType;
      m_FadnDecType=b_FadnDecType;
      m_FadnStop=b_FadnStop;
      m_FadnDiscard=b_FadnDiscard;
      m_FadnRent=b_FadnRent;
      m_FadnFix=b_FadnFix;
      m_FadnDec=b_FadnDec;
      m_FadnAe=b_FadnAe;
      m_FadnFc=b_FadnFc;
      m_FadnFvct=b_FadnFvct;
      m_FadnYzGlkm=b_FadnYzGlkm;
      m_FadnYzDir=b_FadnYzDir;
      m_FadnZjGlkm=b_FadnZjGlkm;
      m_FadnZjDir=b_FadnZjDir;
      m_FadnQoGlkm=b_FadnQoGlkm;
      m_FadnQoDir=b_FadnQoDir;
      m_FadnQiGlkm=b_FadnQiGlkm;
      m_FadnQiDir=b_FadnQiDir;
      m_FadnCzGlkm=b_FadnCzGlkm;
      m_FadnCzDir=b_FadnCzDir;
      m_FadnZlGlkm=b_FadnZlGlkm;
      m_FadnZlDir=b_FadnZlDir;
}
//---------------------------------------------------------------------------
void TsdFadn::EmptyValue(int Index)
{
   switch(Index)
   {
    case 0:
        m_FadnCode="";
        m_FadnName="";
        m_FadnDesc="";
        m_FadnFat="";
        m_FadnUnit="";
        m_FadnDate="";
        m_FadnFmonth="";
        m_FadnFaUse="";
        m_FadnAddr="";
        m_FadnEuse=0;
        m_FadnFav="";
        m_FadnModel="";
        m_FadnSupply="";
        m_FadnFactory="";
        m_FadnArea="";
        m_FadnOfDate="";
        m_FadnDept="";
        m_FadnCurrency="";
        m_FadnERate=0;
        m_FadnOVal=0;
        m_FadnWbOVal=0;
        m_FadnPVal=0;
        m_FadnEVal=0;
        m_FadnCVal=0;
        m_FadnDVal=0;
        m_FadnBVal=0;
        m_FadnTWork=0;
        m_FadnAWork=0;
        m_FadnBWork=0;
        m_FadnPeriod=0;
        m_FadnAPeriod=0;
        m_FadnBPeriod=0;
        m_FadnFadm="";
        m_FadnUDate="";
        m_FadnAddType="";
        m_FadnDecType="";
        m_FadnStop=0;
        m_FadnDiscard=0;
        m_FadnRent=0;
        m_FadnFix=0;
        m_FadnDec=0;
        m_FadnAe=0;
        m_FadnFc=0;
        m_FadnFvct="";
        m_FadnYzGlkm="";
        m_FadnYzDir=0;
        m_FadnZjGlkm="";
        m_FadnZjDir=0;
        m_FadnQoGlkm="";
        m_FadnQoDir=0;
        m_FadnQiGlkm="";
        m_FadnQiDir=0;
        m_FadnCzGlkm="";
        m_FadnCzDir=0;
        m_FadnZlGlkm="";
        m_FadnZlDir=0;
    break;
    case 1:
        b_FadnCode="";
        b_FadnName="";
        b_FadnDesc="";
        b_FadnFat="";
        b_FadnUnit="";