saleformmgr.cpp

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

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

#include <vcl.h>
#pragma hdrstop

#include "SaleFormMgr.h"
#include "BaseGlobeVars.h"
//---------------------------------------------------------------------------
#pragma package(smart_init)
int __stdcall CreateSForm(HWND ahWnd,int FormCode,HWND chWnd,char *MidCode,char *Param,char *gvs)
{
  Application->Handle=ahWnd;
  gGlobeVarsStr=gvs;
  try
  {
    switch(FormCode)
    {
      case 1050101:   //销售类型
          frmSmode=new TfrmSmode(Application,chWnd,MidCode,Param);
        return (int)frmSmode;
      case 1050102:   //客户基本资料
          frmClient=new TfrmClient(Application,chWnd,MidCode,Param);
        return (int)frmClient;
      case 1050103:   //销售员资料
          frmSaler=new TfrmSaler(Application,chWnd,MidCode,Param);
        return (int)frmSaler;
      case 1050104:   //客户收货地点
          frmSsite=new TfrmSsite(Application,chWnd,MidCode,Param);
        return (int)frmSsite;
      case 1050105:   //客户结算资料
          frmSsd=new TfrmSsd(Application,chWnd,MidCode,Param);
        return (int)frmSsd;
      case 1050106:   //客户货品编码
          frmSgd=new TfrmSgd(Application,chWnd,MidCode,Param);
        return (int)frmSgd;
      case 1050107:   //客户销售报价单
          frmSquote=new TfrmSquote(Application,chWnd,MidCode,Param);
        return (int)frmSquote;
      case 1050108:   //销售价格类别
          frmSpt=new TfrmSpt(Application,chWnd,MidCode,Param);
        return (int)frmSpt;
      case 1050109:   //客户类型
          frmStype=new TfrmStype(Application,chWnd,MidCode,Param);
        return (int)frmStype;
      case 1050110:   //订单取消原因
          frmSoCr=new TfrmSoCr(Application,chWnd,MidCode,Param);
        return (int)frmSoCr;
      case 1050111:   //销售退货原因
          frmSretRr=new TfrmSretRr(Application,chWnd,MidCode,Param);
        return (int)frmSretRr;
      case 1050112:   //返修原因
          frmSrewRr=new TfrmSrewRr(Application,chWnd,MidCode,Param);
        return (int)frmSrewRr;
      case 1050113:   //换货原因
          frmSexcRr=new TfrmSexcRr(Application,chWnd,MidCode,Param);
        return (int)frmSexcRr;
      case 1050201:   //业务员销售计划
          frmSsp=new TfrmSsp(Application,chWnd,MidCode,Param);
        return (int)frmSsp;
      case 1050202:   //产品销售计划
          frmGsp=new TfrmGsp(Application,chWnd,MidCode,Param);
        return (int)frmGsp;
      case 1050301:   //销售订单
          frmSoh=new TfrmSoh(Application,chWnd,MidCode,Param);
        return (int)frmSoh;
///*
      case 1050302:   //订单确认
          frmSohCheck=new TfrmSohCheck(Application,chWnd,MidCode,Param);
        return (int)frmSohCheck;
      case 1050303:   //订单取消
          frmSohCancel=new TfrmSohCancel(Application,chWnd,MidCode,Param);
        return (int)frmSohCancel;
      case 1050304:   //订单结清
          frmSohClose=new TfrmSohClose(Application,chWnd,MidCode,Param);
        return (int)frmSohClose;
//*/
      case 1050306:   //销售发票
          frmSivoh=new TfrmSivoh(Application,chWnd,MidCode,Param);
        return (int)frmSivoh;
      case 1050403:   //据订单发货
          frmSogh_S_O=new TfrmSogh_S_O(Application,chWnd,MidCode,Param);
        return (int)frmSogh_S_O;
      case 1050404:   //无订单发货
          frmSogh_N_O=new TfrmSogh_N_O(Application,chWnd,MidCode,Param);
        return (int)frmSogh_N_O;
      case 1050406:   //返修单
          frmSrewh=new TfrmSrewh(Application,chWnd,MidCode,Param);
        return (int)frmSrewh;
      case 1050407:   //换货单
          frmSexch=new TfrmSexch(Application,chWnd,MidCode,Param);
        return (int)frmSexch;
     case 1050408:   //销售退货
          frmSreth=new TfrmSreth(Application,chWnd,MidCode,Param);
        return (int)frmSreth;
       case 1050409:   //发货审核
          frmSoghCheck=new TfrmSoghCheck(Application,chWnd,MidCode,Param);
        return (int)frmSoghCheck;
//*
      case 1050410:   //退货审核
          frmSrethCheck=new TfrmSrethCheck(Application,chWnd,MidCode,Param);
        return (int)frmSrethCheck;
      case 1050411:   //发货取消
          frmSoghCancel=new TfrmSoghCancel(Application,chWnd,MidCode,Param);
        return (int)frmSoghCancel;
      case 1050412:   //退货取消
          frmSrethCancel=new TfrmSrethCancel(Application,chWnd,MidCode,Param);
        return (int)frmSrethCancel;
//*/
      case 1050504:   //销售折让
          frmSzrh=new TfrmSzrh(Application,chWnd,MidCode,Param);
        return (int)frmSzrh;
      case 1050701:   //销售查询
          frmSohQuery=new TfrmSohQuery(Application,chWnd,MidCode,Param);
        return (int)frmSohQuery;
      case 1050702:   //发货查询
          frmSoghQuery=new TfrmSoghQuery(Application,chWnd,MidCode,Param);
        return (int)frmSoghQuery;
      case 1050703:   //退货查询
          frmSrethQuery=new TfrmSrethQuery(Application,chWnd,MidCode,Param);
        return (int)frmSrethQuery;
      case 1050704:   //发票查询
          frmSivohQuery=new TfrmSivohQuery(Application,chWnd,MidCode,Param);
        return (int)frmSivohQuery;
      case 1050705:   //返修查询
          frmSrewhQuery=new TfrmSrewhQuery(Application,chWnd,MidCode,Param);
        return (int)frmSrewhQuery;
      case 1050706:   //折让查询
          frmSzrhQuery=new TfrmSzrhQuery(Application,chWnd,MidCode,Param);
        return (int)frmSzrhQuery;
      case 1050707:   //销售员计划查询
          frmSspQuery=new TfrmSspQuery(Application,chWnd,MidCode,Param);
        return (int)frmSspQuery;
      case 1050708:   //产品销售数量计划
          frmGspQuery_Qty=new TfrmGspQuery_Qty(Application,chWnd,MidCode,Param);
        return (int)frmGspQuery_Qty;
//      case 1050709:   //产品销售金额计划
//          frmGspQuery_Amt=new TfrmGspQuery_Amt(Application,chWnd,MidCode,Param);
//        return (int)frmGspQuery_Amt;
      case 1050710:   //换货查询
          frmSexchQuery=new TfrmSexchQuery(Application,chWnd,MidCode,Param);
        return (int)frmSexchQuery;
      case 1050711:   // 参数维护
		  frmSaleParam=new TfrmSaleParam(Application,chWnd,MidCode,Param);
		return (int)frmSaleParam;
      case 1050712:   //  客户信息中心
		  frmClientInfoCenter = new TfrmClientInfoCenter(Application,chWnd,MidCode,Param);
		return (int)frmClientInfoCenter;
      default:
        return 0;//功能尚未实现
    }
  }
  catch(Exception &e)
  {
     return -1;  //创建窗体失败
  }
}