⭐ 欢迎来到虫虫下载站! | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站

📄 humanformmgr.cpp

📁 科思ERP部分源码及控件
💻 CPP
字号:
//---------------------------------------------------------------------------

#include <vcl.h>
#pragma hdrstop

#include "HumanFormMgr.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 1130101:   //工种维护
          frmTow=new TfrmTow(Application,chWnd,MidCode,Param);
        return (int)frmTow;
      case 1130102:   //职务维护
          frmRank=new TfrmRank(Application,chWnd,MidCode,Param);
        return (int)frmRank;
      case 1130103:   //技能资料
          frmSkill=new TfrmSkill(Application,chWnd,MidCode,Param);
        return (int)frmSkill;
      case 1130104:   //离职原因
          frmLr=new TfrmLr(Application,chWnd,MidCode,Param);
        return (int)frmLr;
      case 1130105:   //假别维护
          frmVacType=new TfrmVacType(Application,chWnd,MidCode,Param);
        return (int)frmVacType;
      case 1130106:   //工资等级
          frmWl=new TfrmWl(Application,chWnd,MidCode,Param);
        return (int)frmWl;
      case 1130107:   //奖惩项目
          frmEpt=new TfrmEpt(Application,chWnd,MidCode,Param);
        return (int)frmEpt;
      case 1130108:   //new 参数选择
          frmHumParam=new TfrmHumParam(Application,chWnd,MidCode,Param);
        return (int)frmHumParam;
      case 1130109:   //专业维护
          frmProfession=new TfrmProfession(Application,chWnd,MidCode,Param);
        return (int)frmProfession;
      case 1130110:   //考勤项目
          frmTimeItem=new TfrmTimeItem(Application,chWnd,MidCode,Param);
        return (int)frmTimeItem;
      case 1130201:   //员工资料
          frmEmployee=new TfrmEmployee(Application,chWnd,MidCode,Param);
        return (int)frmEmployee;
      case 1130202:   //员工调动单
          frmTransfer=new TfrmTransfer(Application,chWnd,MidCode,Param);
        return (int)frmTransfer;
      case 1130203:   //员工调职单
          frmTap=new TfrmTap(Application,chWnd,MidCode,Param);
        return (int)frmTap;
      case 1130204:   //员工离职单
          frmLop=new TfrmLop(Application,chWnd,MidCode,Param);
        return (int)frmLop;
      case 1130205:   //奖惩记录
          frmEpr=new TfrmEpr(Application,chWnd,MidCode,Param);
        return (int)frmEpr;
      case 1130206:   //招聘申请表
          frmEmpApply=new TfrmEmpApply(Application,chWnd,MidCode,Param);
        return (int)frmEmpApply;
      case 1130207:   //培训记录
          frmTrain=new TfrmTrain(Application,chWnd,MidCode,Param);
        return (int)frmTrain;
      case 1130301:   //工资项目
          frmWageItem=new TfrmWageItem(Application,chWnd,MidCode,Param);
        return (int)frmWageItem;
      case 1130303:   //工资录入
          frmWageInput=new TfrmWageInput(Application,chWnd,MidCode,Param);
        return (int)frmWageInput;
      case 1130401: //班制维护
          frmWorkSect=new TfrmWorkSect(Application,chWnd,MidCode,Param);
        return (int)frmWorkSect;
      case 1130402: //员工排班
          frmWorkPlan=new TfrmWorkPlan(Application,chWnd,MidCode,Param);
        return (int)frmWorkPlan;
      case 1130403: //考勤记录
          frmTimeWork=new TfrmTimeWork(Application,chWnd,MidCode,Param);
        return (int)frmTimeWork;
      case 1130501:   //员工资料查询
          frmEmployeeReport=new TfrmEmployeeReport(Application,chWnd,MidCode,Param);
        return (int)frmEmployeeReport;
      case 1130502:   //考勤汇总表
          frmTime=new TfrmTime(Application,chWnd,MidCode,Param);
        return (int)frmTime;
      case 1130503:   //工资报表
          frmWageReport=new TfrmWageReport(Application,chWnd,MidCode,Param);
        return (int)frmWageReport;
      case 1130504:   //人事流动汇总表
          frmJoad=new TfrmJoad(Application,chWnd,MidCode,Param);
        return (int)frmJoad;
      case 1130506:   //工资条
          frmWageScrip=new TfrmWageScrip(Application,chWnd,MidCode,Param);
        return (int)frmWageScrip;
      default:
        return 0;//功能尚未实现
    }
  }
  catch(Exception &e)
  {
     return -1;  //创建窗体失败
  }
}

⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -