这篇文章主要介绍“Oracle中怎么创建WIP任务单”,在日常操作中,相信很多人在Oracle中怎么创建WIP任务单问题上存在疑惑,小编查阅了各式资料,整理出简单好用的操作方法,希望对大家解答”Oracle中怎么创建WIP任务单”的疑惑有所帮助!接下来,请跟着小编一起来学习吧!

系统版本:
RDBMS : 9.2.0.6.0

Oracle应用产品 : 11.5.10.2

1.根据装配件自动创建任务

Declarel_iface_recwip.wip_job_schedule_interface%ROWTYPE;--任务单--组件l_GroupIdNumber:=123456;l_OrganizationIdNumber:=122;l_UserIdNumber:=0;Begin--*****Start任务单装配件*****----l_iface_rec.last_update_date:=SYSDATE;l_iface_rec.last_updated_by:=l_UserId;l_iface_rec.creation_date:=SYSDATE;l_iface_rec.created_by:=l_UserId;l_iface_rec.last_update_login:=fnd_profile.value('LOGIN_ID');l_iface_rec.group_id:=l_GroupId;l_iface_rec.load_type:=1;l_iface_rec.process_phase:=2;l_iface_rec.process_status:=1;--1为未发放(UnReleased),3为创建任务单以后状态自动已发放(Released)l_iface_rec.status_type:=3;--1UnReleased/3Released需要开会计期--默认为Y,若为Y时,则无须把组件、工序和资源等等数据插入接口表WIP.WIP_JOB_SCHEDULE_INTERFACE。--若为N时,则需要往接口表表WIP.WIP_JOB_SCHEDULE_INTERFACE插入组件、工序和资源等等数据l_iface_rec.allow_explosion:='Y';--任务单名称l_iface_rec.job_name:='TEST131112_001';--组织标识l_iface_rec.organization_id:=l_OrganizationId;--装配件标识l_iface_rec.primary_item_id:=463235;--开始数量l_iface_rec.start_quantity:=435;--开始日期l_iface_rec.first_unit_start_date:=SYSDATE;--任务单来源自定义l_iface_rec.source_code:='WIPPLAN';--来源标识自定义l_iface_rec.source_line_id:=0;--题头标识自定义l_iface_rec.Header_Id:=3452;l_iface_rec.first_unit_start_date:=Sysdate;l_iface_rec.First_Unit_Completion_Date:=Null;l_iface_rec.last_unit_start_date:=Null;l_iface_rec.last_unit_completion_date:=Sysdate;INSERTINTOWIP.WIP_JOB_SCHEDULE_INTERFACEVALUESl_iface_rec;--*****End任务单装配件*****----End;

2.手工创建任务单(组件、工序和资源)如下:

Declare--任务单l_iface_recwip.wip_job_schedule_interface%ROWTYPE;--任务单-组件l_CompRecwip.wip_job_dtls_interface%ROWTYPE;--任务单-工序l_OpRecwip.wip_job_dtls_interface%ROWTYPE;--任务单-资源l_ResRecWIP.WIP_JOB_DTLS_INTERFACE%ROWTYPE;l_GroupIdNumber:=123456;l_OrganizationIdNumber:=122;l_UserIdNumber:=0;Begin--*****Start任务单装配件*****----l_iface_rec.last_update_date:=SYSDATE;l_iface_rec.last_updated_by:=l_UserId;l_iface_rec.creation_date:=SYSDATE;l_iface_rec.created_by:=l_UserId;l_iface_rec.last_update_login:=fnd_profile.value('LOGIN_ID');l_iface_rec.group_id:=l_GroupId;l_iface_rec.load_type:=1;l_iface_rec.process_phase:=2;l_iface_rec.process_status:=1;--1为未发放(UnReleased),3为创建任务单以后状态自动已发放(Released)l_iface_rec.status_type:=3;--1UnReleased/3Released需要开会计期--默认为Y,若为Y时,则无须把组件、工序和资源等等数据插入接口表WIP.WIP_JOB_SCHEDULE_INTERFACE。--若为N时,则需要往接口表表WIP.WIP_JOB_SCHEDULE_INTERFACE插入组件、工序和资源等等数据l_iface_rec.allow_explosion:='N';--任务单名称l_iface_rec.job_name:='TEST131112_001';--组织标识l_iface_rec.organization_id:=l_OrganizationId;--装配件标识l_iface_rec.primary_item_id:=463235;--开始数量l_iface_rec.start_quantity:=435;--开始日期l_iface_rec.first_unit_start_date:=SYSDATE;--任务单来源自定义l_iface_rec.source_code:='WIPPLAN';--来源标识自定义l_iface_rec.source_line_id:=0;--题头标识自定义l_iface_rec.Header_Id:=3452;l_iface_rec.first_unit_start_date:=Sysdate;l_iface_rec.First_Unit_Completion_Date:=Null;l_iface_rec.last_unit_start_date:=Null;l_iface_rec.last_unit_completion_date:=Sysdate;INSERTINTOWIP.WIP_JOB_SCHEDULE_INTERFACEVALUESl_iface_rec;--*****End任务单装配件*****------*****Start任务单组件*****-----可以添加、删除或修改多个组件--工序WIP_REQUIREMENT_OPERATIONS.OPERATION_SEQ_NUMl_CompRec.OPERATION_SEQ_NUM:=10;--旧组件l_CompRec.INVENTORY_ITEM_ID_OLD:=Rs.Inventory_Item_Id_Old;--新组件新增时必输项l_CompRec.INVENTORY_ITEM_ID_NEW:=Rs.Inventory_Item_Id_New;--主要每个装配件WIP_REQUIREMENT_OPERATIONS.QUANTITY_PER_ASSEMBLYl_CompRec.QUANTITY_PER_ASSEMBLY:=Rs.Quantity_Per_Assembly;--主要部门WIP_REQUIREMENT_OPERATIONS.DEPARTMENT_IDl_CompRec.DEPARTMENT_ID:=Rs.Department_Id;--供应类型WIP_REQUIREMENT_OPERATIONS.WIP_SUPPLY_TYPEl_CompRec.WIP_SUPPLY_TYPE:=Rs.Wip_Supply_Type;--主要需求日期WIP_REQUIREMENT_OPERATIONS.DATE_REQUIREDl_CompRec.DATE_REQUIRED:=Sysdate;--供应子库存WIP_REQUIREMENT_OPERATIONS.SUPPLY_SUBINVENTORYl_CompRec.SUPPLY_SUBINVENTORY:=Rs.Supply_Subinventory;--供应货位标识WIP_REQUIREMENT_OPERATIONS.SUPPLY_LOCATOR_IDl_CompRec.SUPPLY_LOCATOR_ID:=Rs.Supply_Locator_Id;--是否MRP净需求,默认值为1WIP_REQUIREMENT_OPERATIONS.MRP_NET_FLAGl_CompRec.MRP_NET_FLAG:=Rs.Mrp_Net_Flag;--主需求计划数量WIP_REQUIREMENT_OPERATIONS.Mps_Required_Quantityl_CompRec.MPS_REQUIRED_QUANTITY:=Rs.Mps_Required_Quantity;--主需求计划日期WIP_REQUIREMENT_OPERATIONS.MPS_DATE_REQUIREDl_CompRec.MPS_DATE_REQUIRED:=Rs.Mps_Date_Required;--当是组件接口数据时,其值必须为2l_CompRec.LOAD_TYPE:=2;--与创建任务单题头的相同:WIP.WIP_JOB_SCHEDULE_INTERFACE.HEADER_IDl_CompRec.PARENT_HEADER_ID:=3452;--组件-备注WIP_REQUIREMENT_OPERATIONS.COMMENTSl_CompRec.DESCRIPTION:='测试组件';l_CompRec.LAST_UPDATE_DATE:=Sysdate;l_CompRec.LAST_UPDATED_BY:=l_UserId;l_CompRec.CREATION_DATE:=Sysdate;l_CompRec.CREATED_BY:=l_UserId;l_CompRec.LAST_UPDATE_LOGIN:=fnd_profile.value('LOGIN_ID');l_CompRec.Process_Phase:=2;--默认值l_CompRec.Process_Status:=1;--默认值l_CompRec.Group_Id:=l_GroupId;/*删除:wip_job_details.WIP_DELETE默认为1新增:wip_job_details.wip_add默认值为2修改:wip_job_details.WIP_CHANGEl默认值为3*/l_CompRec.Substitution_Type:=wip_job_details.wip_add;InsertIntoWIP.WIP_JOB_DTLS_INTERFACEValuesl_CompRec;--*****End任务单组件*****-----*****Start任务单工序****----工序WIP_OPERATIONS.Operation_Seq_Numl_OpRec.Operation_Seq_Num:=l_CompRec.OPERATION_SEQ_NUM;--部门WIP_OPERATIONS.Department_Idl_OpRec.Department_Id:=l_CompRec.Department_Id;l_OpRec.Load_Type:=3;--供应商类型l_OpRec.Wip_Supply_Type:=l_CompRec.Wip_Supply_Type;l_OpRec.Parent_Header_Id:=l_iface_rec.Header_Id;l_OpRec.Description:='测试工序';--准标工序标识WIP_OPERATIONS.Standard_Operation_Idl_OpRec.Standard_Operation_Id:=6;--日期第一个装配件起始日期WIP_OPERATIONS.FIRST_UNIT_START_DATEl_OpRec.First_Unit_Start_Date:=Sysdate;--日期第一个装配件完成日期WIP_OPERATIONS.First_Unit_Completion_Datel_OpRec.First_Unit_Completion_Date:=Sysdate;--日期最后一个装配件起始日期WIP_OPERATIONS.Last_Unit_Start_Datel_OpRec.Last_Unit_Start_Date:=Sysdate;--日期最后一个装配件起始日期WIP_OPERATIONS.Last_Unit_Completion_Datel_OpRec.Last_Unit_Completion_Date:=Sysdate;--主要最小传送量WIP_OPERATIONS.MINIMUM_TRANSFER_QUANTITYl_OpRec.Minimum_Transfer_Quantity:=0;--主要倒冲WIP_OPERATIONS.Backflush_Flagl_OpRec.Backflush_Flag:=1;--主要计数点WIP_OPERATIONS.Count_Point_Typel_OpRec.Count_Point_Type:=1;l_OpRec.Last_Update_Date:=Sysdate;l_OpRec.Last_Updated_By:=l_UserId;l_OpRec.Creation_Date:=Sysdate;l_OpRec.Created_By:=l_UserId;l_OpRec.Last_Update_Login:=fnd_profile.value('LOGIN_ID');l_OpRec.Process_Phase:=2;--默认值l_OpRec.Process_Status:=1;--默认值l_OpRec.Group_Id:=l_GroupId;/*删除:wip_job_details.WIP_DELETE默认为1新增:wip_job_details.wip_add默认值为2修改:wip_job_details.WIP_CHANGEl默认值为3*/l_OpRec.Substitution_Type:=wip_job_details.wip_add;InsertIntoWIP.WIP_JOB_DTLS_INTERFACEValuesl_OpRec;--*****End任务单工序****----*****Start任务单资源***-----可以添加、删除或修改多个资源--工序WIP_OPERATION_RESOURCES.Operation_Seq_Numl_ResRec.OPERATION_SEQ_NUM:=l_CompRec.OPERATION_SEQ_NUM;--资源序号WIP_OPERATION_RESOURCES.RESOURCE_SEQ_NUMl_ResRec.RESOURCE_SEQ_NUM:=10;--新资源标识新增时必输项l_ResRec.RESOURCE_ID_NEW:=501899;--主要单位用量或数量值WIP_OPERATION_RESOURCES.Usage_Rate_Or_Amountl_ResRec.USAGE_RATE_OR_AMOUNT:=.86;--计划已计划默认值为2(否)WIP_OPERATION_RESOURCES.Scheduled_Flagl_ResRec.SCHEDULED_FLAG:=2;--计划分配数量默认值为1WIP_OPERATION_RESOURCES.Assigned_Unitsl_ResRec.ASSIGNED_UNITS:=1;l_ResRec.APPLIED_RESOURCE_UNITS:=Null;l_ResRec.APPLIED_RESOURCE_VALUE:=Null;--主要单位WIP_OPERATION_RESOURCES.UOM_CODEl_ResRec.UOM_CODE:='CNY';--主要基准默认值1(物料)WIP_OPERATION_RESOURCES.BASIS_TYPEl_ResRec.BASIS_TYPE:=1;--成本计算活动标识WIP_OPERATION_RESOURCES.ACTIVITY_IDl_ResRec.ACTIVITY_ID:=Null;--成本计算计费类型WIP_OPERATION_RESOURCES.AUTOCHARGE_TYPEl_ResRec.AUTOCHARGE_TYPE:=1;--成本计算标准费率默认值为2l_ResRec.STANDARD_RATE_FLAG:=2;--计划起始日期WIP_OPERATION_RESOURCES.START_DATEl_ResRec.START_DATE:=Sysdate;--计划完成日期WIP_OPERATION_RESOURCES.COMPLETION_DATEl_ResRec.COMPLETION_DATE:=Sysdate;--计划替代组WIP_OPERATION_RESOURCES.SUBSTITUTE_GROUP_NUMl_ResRec.SUBSTITUTE_GROUP_NUM:=Null;--计划替换组WIP_JOB_DTLS_INTERFACE.REPLACEMENT_GROUP_NUMl_ResRec.REPLACEMENT_GROUP_NUM:=Null;--计划批WIP_JOB_DTLS_INTERFACE.BATCH_ID--计划计划序号WIP_JOB_DTLS_INTERFACE.SCHEDULE_SEQ_NUMl_ResRec.SCHEDULE_SEQ_NUM:=Null;l_ResRec.BATCH_ID:=Null;l_ResRec.LOAD_TYPE:=1;--默认值l_ResRec.PARENT_HEADER_ID:=l_iface_rec.Header_Id;l_ResRec.DESCRIPTION:=Null;l_ResRec.LAST_UPDATE_DATE:=Sysdate;l_ResRec.LAST_UPDATED_BY:=l_UserId;l_ResRec.CREATION_DATE:=Sysdate;l_ResRec.CREATED_BY:=l_UserId;l_ResRec.LAST_UPDATE_LOGIN:=fnd_profile.value('LOGIN_ID');l_ResRec.Process_Phase:=2;--默认值l_ResRec.Process_Status:=1;--默认值l_ResRec.Group_Id:=l_GroupId;/*删除:wip_job_details.WIP_DELETE默认为1新增:wip_job_details.wip_add默认值为2修改:wip_job_details.WIP_CHANGEl默认值为3*/l_ResRec.Substitution_Type:=wip_job_details.wip_add;InsertIntoWIP.WIP_JOB_DTLS_INTERFACE.Valuesl_ResRec;--*****End任务单工序***-----API接口wip_massload_pub.massloadjobs(p_groupid=>l_iface_rec.group_id,--GroupIDp_validationlevel=>2,--ValidationLevelp_commitflag=>0,--Commit1=Yes,0='No'x_returnstatus=>x_error_status,x_errormsg=>x_error_message);End;


3.或者用SQL提交“WIP 成批装入”请求创建任务单

Declarel_GroupIdNumber:=123456;v_ReqIDNumber;l_phaseVarchar(200);l_statusVarchar(200);l_dev_phaseVarchar(200);l_dev_statusVarchar(200);l_messageVarchar(2000);l_request_statusboolean;l_UserIdNumber:=0;Beginfnd_global.apps_initialize(user_id=>l_UserId,resp_id=>50276,resp_appl_id=>706,security_group_id=>0);v_ReqID:=fnd_request.submit_request(application=>'WIP',program=>'WICMLP',description=>'',start_time=>'',sub_request=>FALSE,argument1=>to_char(l_GroupId),--组标识argument2=>'0',--验证类型argument3=>'1',--报表是否打印,1:YES,2.NOargument4=>CHR(0));If(v_ReqID>0)Thenl_request_status:=Fnd_Concurrent.Wait_For_Request(v_ReqID,5,0,l_phase,l_status,l_dev_phase,l_dev_status,l_message);IFl_request_statusTHENIFl_dev_status='NORMAL'Orl_dev_status='WARNING'THENdbms_output.put_line('[WIP成批装入]运行成功');ELSEdbms_output.put_line('[WIP成批装入]运行失败:'||l_dev_status);ENDIF;ELSEdbms_output.put_line('请求未完成,无法查看报表内容!');ENDIF;EndIf;End;

到此,关于“Oracle中怎么创建WIP任务单”的学习就结束了,希望能够解决大家的疑惑。理论与实践的搭配能更好的帮助大家学习,快去试试吧!若想继续学习更多相关知识,请继续关注亿速云网站,小编会继续努力为大家带来更多实用的文章!