📄 manufactureformmgr.cpp
字号:
//---------------------------------------------------------------------------
#include <vcl.h>
#include "ManufactureFormMgr.h"
#include "BaseGlobeVars.h"
//---------------------------------------------------------------------------
#pragma hdrstop
#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 1060101: //车间班组
frmTeam=new TfrmTeam(Application,chWnd,MidCode,Param);
return (int)frmTeam;
case 1060102: //车间维护
frmShop=new TfrmShop(Application,chWnd,MidCode,Param);
return (int)frmShop;
case 1060103: //工作中心
frmWc=new TfrmWc(Application,chWnd,MidCode,Param);
return (int)frmWc;
case 1060104: //工艺路线
frmRouteh=new TfrmRouteh(Application,chWnd,MidCode,Param);
return (int)frmRouteh;
case 1060105: //工序维护
frmMprocess=new TfrmMprocess(Application,chWnd,MidCode,Param);
return (int)frmMprocess;
case 1060106: //制造日历
frmCale=new TfrmCale(Application,chWnd,MidCode,Param);
return (int)frmCale;
case 1060107: //工序材料报废原因
frmPsr=new TfrmPsr(Application,chWnd,MidCode,Param);
return (int)frmPsr;
case 1060108: //材料报废原因
frmUdr=new TfrmUdr(Application,chWnd,MidCode,Param);
return (int)frmUdr;
case 1060109: //工单报废原因
frmWsr=new TfrmWsr(Application,chWnd,MidCode,Param);
return (int)frmWsr;
case 1060110: //生管员维护
frmProducter=new TfrmProducter(Application,chWnd,MidCode,Param);
return (int)frmProducter;
case 1060111: //工序加工产品
frmPg=new TfrmPg(Application,chWnd,MidCode,Param);
return (int)frmPg;
case 1060112: //班组员工
frmTe=new TfrmTe(Application,chWnd,MidCode,Param);
return (int)frmTe;
case 1060113: //参数设定
frmmnParam=new TfrmmnParam(Application,chWnd,MidCode," Parametercode like '106%'");
return (int) frmmnParam;
case 1060201: //物料清单
frmBomh=new TfrmBomh(Application,chWnd,MidCode,Param);
return (int)frmBomh;
case 1060202: //BOM复制
frmBomhCopy=new TfrmBomhCopy(Application,chWnd,MidCode,Param);
return (int)frmBomhCopy;
case 1060203: //BOM替换
frmRep=new TfrmRep(Application,chWnd,MidCode,Param);
return (int)frmRep;
case 1060204: //计划BOM
frmPbomh=new TfrmPbomh(Application,chWnd,MidCode,Param);
return (int)frmPbomh;
case 1060205: //工程更改单
frmEcoh=new TfrmEcoh(Application,chWnd,MidCode,Param);
return (int)frmEcoh;
case 1060206: //产品结构校验
frmBomVerify=new TfrmBomVerify(Application,chWnd,MidCode,Param);
return (int)frmBomVerify;
case 1060208: //物料单展开查询
frmBomhQuery=new TfrmBomhQuery(Application,chWnd,MidCode,Param);
return (int)frmBomhQuery;
case 1060209: //计算低层码
frmCalcLlc=new TfrmCalcLlc(Application,chWnd,MidCode,Param);
return (int)frmCalcLlc;
case 1060213: //Bom反查
frmBomQuery=new TfrmBomQuery(Application,chWnd,MidCode,Param);
return (int)frmBomQuery;
case 1060214: //Bom列表
frmProdSelect=new TfrmProdSelect(Application,chWnd,MidCode,Param);
return (int)frmProdSelect;
case 1060301: //加工单
frmWo=new TfrmWo(Application,chWnd,MidCode,Param);
return (int)frmWo;
case 1060303: //加工单确认
frmWoCheck=new TfrmWoCheck(Application,chWnd,MidCode,Param);
return (int)frmWoCheck;
case 1060304: //加工单取消
frmWoCancel=new TfrmWoCancel(Application,chWnd,MidCode,Param);
return (int)frmWoCancel;
case 1060305: //工序材料表
frmWmd=new TfrmWmd(Application,chWnd,MidCode,Param);
return (int)frmWmd;
case 1060306: //工序员工表
frmWpe=new TfrmWpe(Application,chWnd,MidCode,Param);
return (int)frmWpe;
case 1060210: //路线表
frmWrg=new TfrmWrg(Application,chWnd,MidCode,Param);
return (int)frmWrg;
case 1060211: //配套表
frmWsgm=new TfrmWsgm(Application,chWnd,MidCode,Param);
return (int)frmWsgm;
case 1060212: //工票
frmWn=new TfrmWn(Application,chWnd,MidCode,Param);
return (int)frmWn;
case 1060402: //定额领料单
frmGmth_R=new TfrmGmth_R(Application,chWnd,MidCode,Param);
return (int)frmGmth_R;
case 1060403: //工单领料单
frmGmth_W=new TfrmGmth_W(Application,chWnd,MidCode,Param);
return (int)frmGmth_W;
case 1060404: //共用件领料
frmGmth_C=new TfrmGmth_C(Application,chWnd,MidCode,Param);
return (int)frmGmth_C;
case 1060405: //补料单
frmGmth_A=new TfrmGmth_A(Application,chWnd,MidCode,Param);
return (int)frmGmth_A;
case 1060406: //退料单
frmRmbh=new TfrmRmbh(Application,chWnd,MidCode,Param);
return (int)frmRmbh;
case 1060408: //工单完工维护
frmWoClose=new TfrmWoClose(Application,chWnd,MidCode,Param);
return (int)frmWoClose;
case 1060409: //完成品登记
frmWeph=new TfrmWeph(Application,chWnd,MidCode,Param);
return (int)frmWeph;
case 1060410: //部门领料单
frmGmth_D=new TfrmGmth_D(Application,chWnd,MidCode,Param);
return (int)frmGmth_D;
case 1060411: //共用材料分摊
frmDmah=new TfrmDmah(Application,chWnd,MidCode,Param);
return (int)frmDmah;
case 1060412: //工序物料报废
frmPdmh=new TfrmPdmh(Application,chWnd,MidCode,Param);
return (int)frmPdmh;
case 1060413: //生产费用分摊
frmMfch=new TfrmMfch(Application,chWnd,MidCode,Param);
return (int)frmMfch;
case 1060501: //工序日报
frmPdrh=new TfrmPdrh(Application,chWnd,MidCode,Param);
return (int)frmPdrh;
case 1060502: //个人计时
frmLabh=new TfrmLabh(Application,chWnd,MidCode,Param);
return (int)frmLabh;
case 1060503: //团体计时
frmLabh_T=new TfrmLabh_T(Application,chWnd,MidCode,Param);
return (int)frmLabh_T;
case 1060504: //个人计件
frmPieceh=new TfrmPieceh(Application,chWnd,MidCode,Param);
return (int)frmPieceh;
case 1060505: //团体计件
frmPieceh_T=new TfrmPieceh_T(Application,chWnd,MidCode,Param);
return (int)frmPieceh_T;
case 1060601: //MRP生产计划
frmVW_Mrp_column=new TfrmVW_Mrp_column(Application,chWnd,MidCode,Param);
return (int)frmVW_Mrp_column;
case 1060901: //加工单进度查询
// frmVW_Wo=new TfrmVW_Wo(Application,chWnd,MidCode,Param);
// return (int)frmVW_Wo;
frmWoReport=new TfrmWoReport(Application,chWnd,MidCode,Param);
return (int)frmWoReport;
case 1060902: //完成品入库查询
// frmVW_Weph=new TfrmVW_Weph(Application,chWnd,MidCode,Param);
// return (int)frmVW_Weph;
frmWephReport=new TfrmWephReport(Application,chWnd,MidCode,Param);
return (int)frmWephReport;
case 1060903: //工序日报查询
// frmVW_Pdrh=new TfrmVW_Pdrh(Application,chWnd,MidCode,Param);
// return (int)frmVW_Pdrh;
frmPdrhReport=new TfrmPdrhReport(Application,chWnd,MidCode,Param);
return (int)frmPdrhReport;
case 1060904: //员工计时登记查询
// frmVW_Labh=new TfrmVW_Labh(Application,chWnd,MidCode,Param);
// return (int)frmVW_Labh;
frmLabhReport=new TfrmLabhReport(Application,chWnd,MidCode,Param);
return (int)frmLabhReport;
case 1060905: //员工计件登记查询
// frmVW_Pieceh=new TfrmVW_Pieceh(Application,chWnd,MidCode,Param);
// return (int)frmVW_Pieceh;
frmPiecehReport=new TfrmPiecehReport(Application,chWnd,MidCode,Param);
return (int)frmPiecehReport;
case 1060906: //退料单查询
// frmVW_Rmbh=new TfrmVW_Rmbh(Application,chWnd,MidCode,Param);
// return (int)frmVW_Rmbh;
frmRmbhReport=new TfrmRmbhReport(Application,chWnd,MidCode,Param);
return (int)frmRmbhReport;
case 1060907: //生产领料查询
// frmVW_Gmth=new TfrmVW_Gmth(Application,chWnd,MidCode,Param);
// return (int)frmVW_Gmth;
frmGmthReport=new TfrmGmthReport(Application,chWnd,MidCode,Param);
return (int)frmGmthReport;
case 1060908: //共用件分摊查询
// frmVW_Dmah=new TfrmVW_Dmah(Application,chWnd,MidCode,Param);
// return (int)frmVW_Dmah;
frmDmahReport=new TfrmDmahReport(Application,chWnd,MidCode,Param);
return (int)frmDmahReport;
case 1060909: //工序材料报废查询
// frmVW_Pdmh=new TfrmVW_Pdmh(Application,chWnd,MidCode,Param);
// return (int)frmVW_Pdmh;
frmPdmhReport=new TfrmPdmhReport(Application,chWnd,MidCode,Param);
return (int)frmPdmhReport;
default:
return 0;//功能尚未实现
}
}
catch(Exception &e)
{
return -1; //创建窗体失败
}
}
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -