66: close is_step_locked_by_user;
67: END IF;
68:
69: IF (l_count = 0) THEN
70: l_locked := GMO_CONSTANTS_GRP.NO;
71: ELSE
72: l_locked := GMO_CONSTANTS_GRP.YES;
73: END IF;
74:
68:
69: IF (l_count = 0) THEN
70: l_locked := GMO_CONSTANTS_GRP.NO;
71: ELSE
72: l_locked := GMO_CONSTANTS_GRP.YES;
73: END IF;
74:
75: return l_locked;
76:
82: IS
83: l_locked varchar2(1);
84:
85: BEGIN
86: IF (P_VBATCH_MODE = GMO_CONSTANTS_GRP.VBATCH_ADMIN_MODE) then
87: l_locked := IS_STEP_LOCKED (P_BATCHSTEP_ID => P_BATCHSTEP_ID);
88: else
89: l_locked := IS_STEP_LOCKED (P_BATCHSTEP_ID => P_BATCHSTEP_ID, P_REQUESTER => P_REQUESTER);
90: end if;
339: end if;
340: end loop;
341:
342: if (l_material_unavailable > 0) then
343: l_material_available := GMO_CONSTANTS_GRP.NO;
344: else
345: l_material_available := GMO_CONSTANTS_GRP.YES;
346: end if;
347:
341:
342: if (l_material_unavailable > 0) then
343: l_material_available := GMO_CONSTANTS_GRP.NO;
344: else
345: l_material_available := GMO_CONSTANTS_GRP.YES;
346: end if;
347:
348: if (FND_LOG.LEVEL_EVENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
349:
742: NO_BATCH_FOUND_ERR exception;
743:
744: BEGIN
745:
746: IF (P_ENTITY_NAME = GMO_CONSTANTS_GRP.ENTITY_BATCH) THEN
747: l_batch_id := to_number (P_ENTITY_KEY);
748: ELSIF (P_ENTITY_NAME = GMO_CONSTANTS_GRP.ENTITY_OPERATION) THEN
749: open get_batch_id_for_step;
750: fetch get_batch_id_for_step into l_batch_id;
744: BEGIN
745:
746: IF (P_ENTITY_NAME = GMO_CONSTANTS_GRP.ENTITY_BATCH) THEN
747: l_batch_id := to_number (P_ENTITY_KEY);
748: ELSIF (P_ENTITY_NAME = GMO_CONSTANTS_GRP.ENTITY_OPERATION) THEN
749: open get_batch_id_for_step;
750: fetch get_batch_id_for_step into l_batch_id;
751: close get_batch_id_for_step;
752: ELSIF (P_ENTITY_NAME = GMO_CONSTANTS_GRP.ENTITY_ACTIVITY) THEN
748: ELSIF (P_ENTITY_NAME = GMO_CONSTANTS_GRP.ENTITY_OPERATION) THEN
749: open get_batch_id_for_step;
750: fetch get_batch_id_for_step into l_batch_id;
751: close get_batch_id_for_step;
752: ELSIF (P_ENTITY_NAME = GMO_CONSTANTS_GRP.ENTITY_ACTIVITY) THEN
753: open get_batch_id_for_activity;
754: fetch get_batch_id_for_activity into l_batch_id;
755: close get_batch_id_for_activity;
756: ELSIF (P_ENTITY_NAME = GMO_CONSTANTS_GRP.ENTITY_RESOURCE) THEN
752: ELSIF (P_ENTITY_NAME = GMO_CONSTANTS_GRP.ENTITY_ACTIVITY) THEN
753: open get_batch_id_for_activity;
754: fetch get_batch_id_for_activity into l_batch_id;
755: close get_batch_id_for_activity;
756: ELSIF (P_ENTITY_NAME = GMO_CONSTANTS_GRP.ENTITY_RESOURCE) THEN
757: open get_batch_id_for_resource;
758: fetch get_batch_id_for_resource into l_batch_id;
759: close get_batch_id_for_resource;
760: ELSIF (P_ENTITY_NAME = GMO_CONSTANTS_GRP.ENTITY_MATERIAL) THEN
756: ELSIF (P_ENTITY_NAME = GMO_CONSTANTS_GRP.ENTITY_RESOURCE) THEN
757: open get_batch_id_for_resource;
758: fetch get_batch_id_for_resource into l_batch_id;
759: close get_batch_id_for_resource;
760: ELSIF (P_ENTITY_NAME = GMO_CONSTANTS_GRP.ENTITY_MATERIAL) THEN
761: open get_batch_id_for_material;
762: fetch get_batch_id_for_material into l_batch_id;
763: close get_batch_id_for_material;
764: ELSE
833: NO_BATCHSTEP_FOUND_ERR exception;
834:
835: BEGIN
836:
837: IF (P_ENTITY_NAME = GMO_CONSTANTS_GRP.ENTITY_OPERATION) THEN
838: l_batchstep_id := to_number (P_ENTITY_KEY);
839: ELSIF (P_ENTITY_NAME = GMO_CONSTANTS_GRP.ENTITY_ACTIVITY) THEN
840: open get_batchstep_id_for_activity;
841: fetch get_batchstep_id_for_activity into l_batchstep_id;
835: BEGIN
836:
837: IF (P_ENTITY_NAME = GMO_CONSTANTS_GRP.ENTITY_OPERATION) THEN
838: l_batchstep_id := to_number (P_ENTITY_KEY);
839: ELSIF (P_ENTITY_NAME = GMO_CONSTANTS_GRP.ENTITY_ACTIVITY) THEN
840: open get_batchstep_id_for_activity;
841: fetch get_batchstep_id_for_activity into l_batchstep_id;
842: close get_batchstep_id_for_activity;
843: ELSIF (P_ENTITY_NAME = GMO_CONSTANTS_GRP.ENTITY_RESOURCE) THEN
839: ELSIF (P_ENTITY_NAME = GMO_CONSTANTS_GRP.ENTITY_ACTIVITY) THEN
840: open get_batchstep_id_for_activity;
841: fetch get_batchstep_id_for_activity into l_batchstep_id;
842: close get_batchstep_id_for_activity;
843: ELSIF (P_ENTITY_NAME = GMO_CONSTANTS_GRP.ENTITY_RESOURCE) THEN
844: open get_batchstep_id_for_resource;
845: fetch get_batchstep_id_for_resource into l_batchstep_id;
846: close get_batchstep_id_for_resource;
847: ELSIF (P_ENTITY_NAME = GMO_CONSTANTS_GRP.ENTITY_MATERIAL) THEN
843: ELSIF (P_ENTITY_NAME = GMO_CONSTANTS_GRP.ENTITY_RESOURCE) THEN
844: open get_batchstep_id_for_resource;
845: fetch get_batchstep_id_for_resource into l_batchstep_id;
846: close get_batchstep_id_for_resource;
847: ELSIF (P_ENTITY_NAME = GMO_CONSTANTS_GRP.ENTITY_MATERIAL) THEN
848: open get_batchstep_id_for_material;
849: fetch get_batchstep_id_for_material into l_batchstep_id;
850: close get_batchstep_id_for_material;
851: ELSE
905: -- this function is internally used by the apis to
906: -- check if gmo is enabled or not.
907: function is_gmo_enabled return boolean is
908: begin
909: if (GMO_SETUP_GRP.IS_GMO_ENABLED = GMO_CONSTANTS_GRP.YES) then
910: return true;
911: else
912: return false;
913: end if;
996: close get_task;
997:
998:
999: IF (L_TASK = 'UPDATE_ACTIVITY' or L_TASK='VIEW_ACTIVITY') then
1000: IF (P_ENTITY_NAME = GMO_CONSTANTS_GRP.ENTITY_OPERATION) then
1001: l_batchstep_id := to_number(p_entity_key);
1002: if (l_task_attribute is not null and l_task_attribute <> gmo_constants_grp.all_attribute) then
1003: l_oprn_line_id := to_number (l_task_attribute);
1004: open get_activity;
998:
999: IF (L_TASK = 'UPDATE_ACTIVITY' or L_TASK='VIEW_ACTIVITY') then
1000: IF (P_ENTITY_NAME = GMO_CONSTANTS_GRP.ENTITY_OPERATION) then
1001: l_batchstep_id := to_number(p_entity_key);
1002: if (l_task_attribute is not null and l_task_attribute <> gmo_constants_grp.all_attribute) then
1003: l_oprn_line_id := to_number (l_task_attribute);
1004: open get_activity;
1005: fetch get_activity into l_batchstep_activity_id;
1006: close get_activity;
1013: end if;
1014: l_task_attribute_id_inst := l_batchstep_activity_id;
1015: end if;
1016:
1017: ELSIF (L_TASK = 'UPDATE_RESOURCE' or L_TASK='VIEW_RESOURCE' or L_TASK = GMO_CONSTANTS_GRP.TASK_RESOURCE_TRANSACTION) then
1018:
1019: IF (P_ENTITY_NAME = GMO_CONSTANTS_GRP.ENTITY_OPERATION or P_ENTITY_NAME = GMO_CONSTANTS_GRP.ENTITY_ACTIVITY ) THEN
1020: -- pattern = OprnLineId$Resources
1021: l_oprn_line_id := to_number (substr(l_task_attribute, 1, instr (l_task_attribute, '$') - 1));
1015: end if;
1016:
1017: ELSIF (L_TASK = 'UPDATE_RESOURCE' or L_TASK='VIEW_RESOURCE' or L_TASK = GMO_CONSTANTS_GRP.TASK_RESOURCE_TRANSACTION) then
1018:
1019: IF (P_ENTITY_NAME = GMO_CONSTANTS_GRP.ENTITY_OPERATION or P_ENTITY_NAME = GMO_CONSTANTS_GRP.ENTITY_ACTIVITY ) THEN
1020: -- pattern = OprnLineId$Resources
1021: l_oprn_line_id := to_number (substr(l_task_attribute, 1, instr (l_task_attribute, '$') - 1));
1022: l_resources := substr(l_task_attribute, instr (l_task_attribute, '$') + 1);
1023:
1020: -- pattern = OprnLineId$Resources
1021: l_oprn_line_id := to_number (substr(l_task_attribute, 1, instr (l_task_attribute, '$') - 1));
1022: l_resources := substr(l_task_attribute, instr (l_task_attribute, '$') + 1);
1023:
1024: IF (P_ENTITY_NAME = GMO_CONSTANTS_GRP.ENTITY_OPERATION) then
1025: l_batchstep_id := to_number(p_entity_key);
1026: open get_activity;
1027: fetch get_activity into l_batchstep_activity_id;
1028: close get_activity;
1029: ELSE
1030: l_batchstep_activity_id := to_number(p_entity_key);
1031: END IF;
1032:
1033: if (l_resources <> gmo_constants_grp.all_attribute) then
1034: open get_resource;
1035: fetch get_resource into l_batchstep_resource_id;
1036: close get_resource;
1037:
1045: l_task_attribute_id_inst := l_batchstep_resource_id;
1046:
1047: END IF;
1048:
1049: ELSIF (L_TASK = GMO_CONSTANTS_GRP.TASK_PROCESS_PARAMETER) then
1050:
1051: IF (P_ENTITY_NAME = GMO_CONSTANTS_GRP.ENTITY_OPERATION or P_ENTITY_NAME = GMO_CONSTANTS_GRP.ENTITY_ACTIVITY
1052: or P_ENTITY_NAME = GMO_CONSTANTS_GRP.ENTITY_RESOURCE) THEN
1053: -- pattern = OprnLineId$Resources$ParameterId
1047: END IF;
1048:
1049: ELSIF (L_TASK = GMO_CONSTANTS_GRP.TASK_PROCESS_PARAMETER) then
1050:
1051: IF (P_ENTITY_NAME = GMO_CONSTANTS_GRP.ENTITY_OPERATION or P_ENTITY_NAME = GMO_CONSTANTS_GRP.ENTITY_ACTIVITY
1052: or P_ENTITY_NAME = GMO_CONSTANTS_GRP.ENTITY_RESOURCE) THEN
1053: -- pattern = OprnLineId$Resources$ParameterId
1054: l_oprn_line_id := to_number (substr(l_task_attribute, 1, instr (l_task_attribute, '$') - 1));
1055: l_resources := substr(l_task_attribute, instr (l_task_attribute, '$') + 1, (instr (l_task_attribute, '$', 1,2 )-1) - instr (l_task_attribute, '$'));
1048:
1049: ELSIF (L_TASK = GMO_CONSTANTS_GRP.TASK_PROCESS_PARAMETER) then
1050:
1051: IF (P_ENTITY_NAME = GMO_CONSTANTS_GRP.ENTITY_OPERATION or P_ENTITY_NAME = GMO_CONSTANTS_GRP.ENTITY_ACTIVITY
1052: or P_ENTITY_NAME = GMO_CONSTANTS_GRP.ENTITY_RESOURCE) THEN
1053: -- pattern = OprnLineId$Resources$ParameterId
1054: l_oprn_line_id := to_number (substr(l_task_attribute, 1, instr (l_task_attribute, '$') - 1));
1055: l_resources := substr(l_task_attribute, instr (l_task_attribute, '$') + 1, (instr (l_task_attribute, '$', 1,2 )-1) - instr (l_task_attribute, '$'));
1056: l_param_id_vchar := substr(l_task_attribute, instr (l_task_attribute, '$', 1,2) + 1);
1054: l_oprn_line_id := to_number (substr(l_task_attribute, 1, instr (l_task_attribute, '$') - 1));
1055: l_resources := substr(l_task_attribute, instr (l_task_attribute, '$') + 1, (instr (l_task_attribute, '$', 1,2 )-1) - instr (l_task_attribute, '$'));
1056: l_param_id_vchar := substr(l_task_attribute, instr (l_task_attribute, '$', 1,2) + 1);
1057:
1058: IF (P_ENTITY_NAME = GMO_CONSTANTS_GRP.ENTITY_OPERATION) then
1059: l_batchstep_id := to_number(p_entity_key);
1060: open get_activity;
1061: fetch get_activity into l_batchstep_activity_id;
1062: close get_activity;
1063:
1064: open get_resource;
1065: fetch get_resource into l_batchstep_resource_id;
1066: close get_resource;
1067: ELSIF (P_ENTITY_NAME = GMO_CONSTANTS_GRP.ENTITY_ACTIVITY) THEN
1068: l_batchstep_activity_id := to_number(p_entity_key);
1069:
1070: open get_resource;
1071: fetch get_resource into l_batchstep_resource_id;
1073: ELSE
1074: l_batchstep_resource_id := to_number(p_entity_key);
1075: END IF;
1076:
1077: if (l_param_id_vchar <> gmo_constants_grp.all_attribute) then
1078: l_param_id := to_number(l_param_id_vchar);
1079: open get_param;
1080: fetch get_param into l_process_param_id;
1081: close get_param;
1091: END IF;
1092:
1093: ELSIF (L_TASK = 'MATERIAL' OR L_TASK = 'RESERVATIONS' OR L_TASK = 'VIEW_MATERIAL' OR L_TASK = 'UPDATE_MATERIAL' OR L_TASK='MATERIAL_TRANSACTIONS' OR L_TASK = 'QUALITY') THEN
1094:
1095: IF (P_ENTITY_NAME = GMO_CONSTANTS_GRP.ENTITY_OPERATION or P_ENTITY_NAME = GMO_CONSTANTS_GRP.ENTITY_ACTIVITY
1096: or P_ENTITY_NAME = GMO_CONSTANTS_GRP.ENTITY_RESOURCE) THEN
1097:
1098: GET_BATCH_ID_FOR_ENTITY(P_ENTITY_NAME => P_ENTITY_NAME,
1099: P_ENTITY_KEY => P_ENTITY_KEY,
1092:
1093: ELSIF (L_TASK = 'MATERIAL' OR L_TASK = 'RESERVATIONS' OR L_TASK = 'VIEW_MATERIAL' OR L_TASK = 'UPDATE_MATERIAL' OR L_TASK='MATERIAL_TRANSACTIONS' OR L_TASK = 'QUALITY') THEN
1094:
1095: IF (P_ENTITY_NAME = GMO_CONSTANTS_GRP.ENTITY_OPERATION or P_ENTITY_NAME = GMO_CONSTANTS_GRP.ENTITY_ACTIVITY
1096: or P_ENTITY_NAME = GMO_CONSTANTS_GRP.ENTITY_RESOURCE) THEN
1097:
1098: GET_BATCH_ID_FOR_ENTITY(P_ENTITY_NAME => P_ENTITY_NAME,
1099: P_ENTITY_KEY => P_ENTITY_KEY,
1100: X_BATCH_ID => l_batch_id,
1108: X_RETURN_STATUS => l_return_status,
1109: X_MSG_COUNT => l_msg_count,
1110: X_MSG_DATA => l_msg_data);
1111:
1112: if (l_task_attribute is not null and l_task_attribute <> gmo_constants_grp.all_attribute) then
1113: l_formula_line_id := to_number(l_task_attribute);
1114: open get_material;
1115: fetch get_material into l_material_detail_id;
1116: close get_material;
1236: IF (NOT IS_BATCH_ENHANCED_PI (P_ENTITY_NAME => P_ENTITY_NAME, P_ENTITY_KEY => P_ENTITY_KEY) ) THEN
1237: RAISE GMO_NOT_ENHANCED_PI_ERR;
1238: END IF;
1239:
1240: IF (P_ENTITY_NAME <> GMO_CONSTANTS_GRP.ENTITY_BATCH OR p_entity_key is null) THEN
1241: RAISE GMO_INVALID_ENTITY_ERR;
1242: END IF;
1243:
1244: open c_get_recipe;
1269: P_API_VERSION => 1.0,
1270: X_RETURN_STATUS => l_return_status,
1271: X_MSG_COUNT => l_msg_count,
1272: X_MSG_DATA => l_msg_data,
1273: P_DEFINITION_ENTITY_NAME => GMO_CONSTANTS_GRP.ENTITY_OPERATION,
1274: P_DEFINITION_ENTITY_KEY => l_recipe_id || GMO_CONSTANTS_GRP.ENTITY_KEY_SEPARATOR || l_routingstep_id || GMO_CONSTANTS_GRP.ENTITY_KEY_SEPARATOR || l_oprn_id,
1275: P_INSTANCE_ENTITY_NAME => GMO_CONSTANTS_GRP.ENTITY_OPERATION,
1276: P_INSTANCE_ENTITY_KEY => l_batchstep_id,
1277: P_INSTRUCTION_TYPE => GMO_CONSTANTS_GRP.VBATCH_INSTRUCTION_TYPE,
1270: X_RETURN_STATUS => l_return_status,
1271: X_MSG_COUNT => l_msg_count,
1272: X_MSG_DATA => l_msg_data,
1273: P_DEFINITION_ENTITY_NAME => GMO_CONSTANTS_GRP.ENTITY_OPERATION,
1274: P_DEFINITION_ENTITY_KEY => l_recipe_id || GMO_CONSTANTS_GRP.ENTITY_KEY_SEPARATOR || l_routingstep_id || GMO_CONSTANTS_GRP.ENTITY_KEY_SEPARATOR || l_oprn_id,
1275: P_INSTANCE_ENTITY_NAME => GMO_CONSTANTS_GRP.ENTITY_OPERATION,
1276: P_INSTANCE_ENTITY_KEY => l_batchstep_id,
1277: P_INSTRUCTION_TYPE => GMO_CONSTANTS_GRP.VBATCH_INSTRUCTION_TYPE,
1278: X_INSTRUCTION_SET_ID => l_instruction_set_id
1271: X_MSG_COUNT => l_msg_count,
1272: X_MSG_DATA => l_msg_data,
1273: P_DEFINITION_ENTITY_NAME => GMO_CONSTANTS_GRP.ENTITY_OPERATION,
1274: P_DEFINITION_ENTITY_KEY => l_recipe_id || GMO_CONSTANTS_GRP.ENTITY_KEY_SEPARATOR || l_routingstep_id || GMO_CONSTANTS_GRP.ENTITY_KEY_SEPARATOR || l_oprn_id,
1275: P_INSTANCE_ENTITY_NAME => GMO_CONSTANTS_GRP.ENTITY_OPERATION,
1276: P_INSTANCE_ENTITY_KEY => l_batchstep_id,
1277: P_INSTRUCTION_TYPE => GMO_CONSTANTS_GRP.VBATCH_INSTRUCTION_TYPE,
1278: X_INSTRUCTION_SET_ID => l_instruction_set_id
1279: );
1273: P_DEFINITION_ENTITY_NAME => GMO_CONSTANTS_GRP.ENTITY_OPERATION,
1274: P_DEFINITION_ENTITY_KEY => l_recipe_id || GMO_CONSTANTS_GRP.ENTITY_KEY_SEPARATOR || l_routingstep_id || GMO_CONSTANTS_GRP.ENTITY_KEY_SEPARATOR || l_oprn_id,
1275: P_INSTANCE_ENTITY_NAME => GMO_CONSTANTS_GRP.ENTITY_OPERATION,
1276: P_INSTANCE_ENTITY_KEY => l_batchstep_id,
1277: P_INSTRUCTION_TYPE => GMO_CONSTANTS_GRP.VBATCH_INSTRUCTION_TYPE,
1278: X_INSTRUCTION_SET_ID => l_instruction_set_id
1279: );
1280:
1281: if l_RETURN_STATUS <> FND_API.G_RET_STS_SUCCESS THEN
1282: RAISE instruction_create_err;
1283: end if;
1284: update_task_attribute
1285: (
1286: P_ENTITY_NAME => GMO_CONSTANTS_GRP.ENTITY_OPERATION,
1287: P_ENTITY_KEY => l_batchstep_id,
1288: P_INSTRUCTION_SET_ID => l_instruction_set_id,
1289: X_ATTRIBUTE_STATUS => l_attribute_status,
1290: X_INVALID_INSTR => l_invalid_instr
1321: P_API_VERSION => 1.0,
1322: X_RETURN_STATUS => l_return_status,
1323: X_MSG_COUNT => l_msg_count,
1324: X_MSG_DATA => l_msg_data,
1325: P_DEFINITION_ENTITY_NAME => GMO_CONSTANTS_GRP.ENTITY_ACTIVITY,
1326: P_DEFINITION_ENTITY_KEY => l_recipe_id || GMO_CONSTANTS_GRP.ENTITY_KEY_SEPARATOR || l_routingstep_id || GMO_CONSTANTS_GRP.ENTITY_KEY_SEPARATOR || l_oprn_line_id,
1327: P_INSTANCE_ENTITY_NAME => GMO_CONSTANTS_GRP.ENTITY_ACTIVITY,
1328: P_INSTANCE_ENTITY_KEY => l_batchstep_activity_id,
1329: P_INSTRUCTION_TYPE => GMO_CONSTANTS_GRP.VBATCH_INSTRUCTION_TYPE,
1322: X_RETURN_STATUS => l_return_status,
1323: X_MSG_COUNT => l_msg_count,
1324: X_MSG_DATA => l_msg_data,
1325: P_DEFINITION_ENTITY_NAME => GMO_CONSTANTS_GRP.ENTITY_ACTIVITY,
1326: P_DEFINITION_ENTITY_KEY => l_recipe_id || GMO_CONSTANTS_GRP.ENTITY_KEY_SEPARATOR || l_routingstep_id || GMO_CONSTANTS_GRP.ENTITY_KEY_SEPARATOR || l_oprn_line_id,
1327: P_INSTANCE_ENTITY_NAME => GMO_CONSTANTS_GRP.ENTITY_ACTIVITY,
1328: P_INSTANCE_ENTITY_KEY => l_batchstep_activity_id,
1329: P_INSTRUCTION_TYPE => GMO_CONSTANTS_GRP.VBATCH_INSTRUCTION_TYPE,
1330: X_INSTRUCTION_SET_ID => l_instruction_set_id
1323: X_MSG_COUNT => l_msg_count,
1324: X_MSG_DATA => l_msg_data,
1325: P_DEFINITION_ENTITY_NAME => GMO_CONSTANTS_GRP.ENTITY_ACTIVITY,
1326: P_DEFINITION_ENTITY_KEY => l_recipe_id || GMO_CONSTANTS_GRP.ENTITY_KEY_SEPARATOR || l_routingstep_id || GMO_CONSTANTS_GRP.ENTITY_KEY_SEPARATOR || l_oprn_line_id,
1327: P_INSTANCE_ENTITY_NAME => GMO_CONSTANTS_GRP.ENTITY_ACTIVITY,
1328: P_INSTANCE_ENTITY_KEY => l_batchstep_activity_id,
1329: P_INSTRUCTION_TYPE => GMO_CONSTANTS_GRP.VBATCH_INSTRUCTION_TYPE,
1330: X_INSTRUCTION_SET_ID => l_instruction_set_id
1331: );
1325: P_DEFINITION_ENTITY_NAME => GMO_CONSTANTS_GRP.ENTITY_ACTIVITY,
1326: P_DEFINITION_ENTITY_KEY => l_recipe_id || GMO_CONSTANTS_GRP.ENTITY_KEY_SEPARATOR || l_routingstep_id || GMO_CONSTANTS_GRP.ENTITY_KEY_SEPARATOR || l_oprn_line_id,
1327: P_INSTANCE_ENTITY_NAME => GMO_CONSTANTS_GRP.ENTITY_ACTIVITY,
1328: P_INSTANCE_ENTITY_KEY => l_batchstep_activity_id,
1329: P_INSTRUCTION_TYPE => GMO_CONSTANTS_GRP.VBATCH_INSTRUCTION_TYPE,
1330: X_INSTRUCTION_SET_ID => l_instruction_set_id
1331: );
1332:
1333: if l_RETURN_STATUS <> FND_API.G_RET_STS_SUCCESS THEN
1335: end if;
1336:
1337: update_task_attribute
1338: (
1339: P_ENTITY_NAME => GMO_CONSTANTS_GRP.ENTITY_ACTIVITY,
1340: P_ENTITY_KEY => l_batchstep_activity_id,
1341: P_INSTRUCTION_SET_ID => l_instruction_set_id,
1342: X_ATTRIBUTE_STATUS => l_attribute_status,
1343: X_INVALID_INSTR => l_invalid_instr
1374: P_API_VERSION => 1.0,
1375: X_RETURN_STATUS => l_return_status,
1376: X_MSG_COUNT => l_msg_count,
1377: X_MSG_DATA => l_msg_data,
1378: P_DEFINITION_ENTITY_NAME => GMO_CONSTANTS_GRP.ENTITY_RESOURCE,
1379: P_DEFINITION_ENTITY_KEY => l_recipe_id || GMO_CONSTANTS_GRP.ENTITY_KEY_SEPARATOR || l_routingstep_id || GMO_CONSTANTS_GRP.ENTITY_KEY_SEPARATOR || l_oprn_line_id || GMO_CONSTANTS_GRP.ENTITY_KEY_SEPARATOR || l_resources,
1380: P_INSTANCE_ENTITY_NAME => GMO_CONSTANTS_GRP.ENTITY_RESOURCE,
1381: P_INSTANCE_ENTITY_KEY => l_batchstep_resource_id,
1382: P_INSTRUCTION_TYPE => GMO_CONSTANTS_GRP.VBATCH_INSTRUCTION_TYPE,
1375: X_RETURN_STATUS => l_return_status,
1376: X_MSG_COUNT => l_msg_count,
1377: X_MSG_DATA => l_msg_data,
1378: P_DEFINITION_ENTITY_NAME => GMO_CONSTANTS_GRP.ENTITY_RESOURCE,
1379: P_DEFINITION_ENTITY_KEY => l_recipe_id || GMO_CONSTANTS_GRP.ENTITY_KEY_SEPARATOR || l_routingstep_id || GMO_CONSTANTS_GRP.ENTITY_KEY_SEPARATOR || l_oprn_line_id || GMO_CONSTANTS_GRP.ENTITY_KEY_SEPARATOR || l_resources,
1380: P_INSTANCE_ENTITY_NAME => GMO_CONSTANTS_GRP.ENTITY_RESOURCE,
1381: P_INSTANCE_ENTITY_KEY => l_batchstep_resource_id,
1382: P_INSTRUCTION_TYPE => GMO_CONSTANTS_GRP.VBATCH_INSTRUCTION_TYPE,
1383: X_INSTRUCTION_SET_ID => l_instruction_set_id
1376: X_MSG_COUNT => l_msg_count,
1377: X_MSG_DATA => l_msg_data,
1378: P_DEFINITION_ENTITY_NAME => GMO_CONSTANTS_GRP.ENTITY_RESOURCE,
1379: P_DEFINITION_ENTITY_KEY => l_recipe_id || GMO_CONSTANTS_GRP.ENTITY_KEY_SEPARATOR || l_routingstep_id || GMO_CONSTANTS_GRP.ENTITY_KEY_SEPARATOR || l_oprn_line_id || GMO_CONSTANTS_GRP.ENTITY_KEY_SEPARATOR || l_resources,
1380: P_INSTANCE_ENTITY_NAME => GMO_CONSTANTS_GRP.ENTITY_RESOURCE,
1381: P_INSTANCE_ENTITY_KEY => l_batchstep_resource_id,
1382: P_INSTRUCTION_TYPE => GMO_CONSTANTS_GRP.VBATCH_INSTRUCTION_TYPE,
1383: X_INSTRUCTION_SET_ID => l_instruction_set_id
1384: );
1378: P_DEFINITION_ENTITY_NAME => GMO_CONSTANTS_GRP.ENTITY_RESOURCE,
1379: P_DEFINITION_ENTITY_KEY => l_recipe_id || GMO_CONSTANTS_GRP.ENTITY_KEY_SEPARATOR || l_routingstep_id || GMO_CONSTANTS_GRP.ENTITY_KEY_SEPARATOR || l_oprn_line_id || GMO_CONSTANTS_GRP.ENTITY_KEY_SEPARATOR || l_resources,
1380: P_INSTANCE_ENTITY_NAME => GMO_CONSTANTS_GRP.ENTITY_RESOURCE,
1381: P_INSTANCE_ENTITY_KEY => l_batchstep_resource_id,
1382: P_INSTRUCTION_TYPE => GMO_CONSTANTS_GRP.VBATCH_INSTRUCTION_TYPE,
1383: X_INSTRUCTION_SET_ID => l_instruction_set_id
1384: );
1385:
1386: if l_RETURN_STATUS <> FND_API.G_RET_STS_SUCCESS THEN
1388: end if;
1389:
1390: update_task_attribute
1391: (
1392: P_ENTITY_NAME => GMO_CONSTANTS_GRP.ENTITY_RESOURCE,
1393: P_ENTITY_KEY => l_batchstep_resource_id,
1394: P_INSTRUCTION_SET_ID => l_instruction_set_id,
1395: X_ATTRIBUTE_STATUS => l_attribute_status,
1396: X_INVALID_INSTR => l_invalid_instr
1427: P_API_VERSION => 1.0,
1428: X_RETURN_STATUS => l_return_status,
1429: X_MSG_COUNT => l_msg_count,
1430: X_MSG_DATA => l_msg_data,
1431: P_DEFINITION_ENTITY_NAME => GMO_CONSTANTS_GRP.ENTITY_MATERIAL,
1432: P_DEFINITION_ENTITY_KEY => l_recipe_id || GMO_CONSTANTS_GRP.ENTITY_KEY_SEPARATOR || l_formulaline_id || GMO_CONSTANTS_GRP.ENTITY_KEY_SEPARATOR || l_inventory_item_id,
1433: P_INSTANCE_ENTITY_NAME => GMO_CONSTANTS_GRP.ENTITY_MATERIAL,
1434: P_INSTANCE_ENTITY_KEY => l_material_detail_id,
1435: P_INSTRUCTION_TYPE => GMO_CONSTANTS_GRP.VBATCH_INSTRUCTION_TYPE,
1428: X_RETURN_STATUS => l_return_status,
1429: X_MSG_COUNT => l_msg_count,
1430: X_MSG_DATA => l_msg_data,
1431: P_DEFINITION_ENTITY_NAME => GMO_CONSTANTS_GRP.ENTITY_MATERIAL,
1432: P_DEFINITION_ENTITY_KEY => l_recipe_id || GMO_CONSTANTS_GRP.ENTITY_KEY_SEPARATOR || l_formulaline_id || GMO_CONSTANTS_GRP.ENTITY_KEY_SEPARATOR || l_inventory_item_id,
1433: P_INSTANCE_ENTITY_NAME => GMO_CONSTANTS_GRP.ENTITY_MATERIAL,
1434: P_INSTANCE_ENTITY_KEY => l_material_detail_id,
1435: P_INSTRUCTION_TYPE => GMO_CONSTANTS_GRP.VBATCH_INSTRUCTION_TYPE,
1436: X_INSTRUCTION_SET_ID => l_instruction_set_id
1429: X_MSG_COUNT => l_msg_count,
1430: X_MSG_DATA => l_msg_data,
1431: P_DEFINITION_ENTITY_NAME => GMO_CONSTANTS_GRP.ENTITY_MATERIAL,
1432: P_DEFINITION_ENTITY_KEY => l_recipe_id || GMO_CONSTANTS_GRP.ENTITY_KEY_SEPARATOR || l_formulaline_id || GMO_CONSTANTS_GRP.ENTITY_KEY_SEPARATOR || l_inventory_item_id,
1433: P_INSTANCE_ENTITY_NAME => GMO_CONSTANTS_GRP.ENTITY_MATERIAL,
1434: P_INSTANCE_ENTITY_KEY => l_material_detail_id,
1435: P_INSTRUCTION_TYPE => GMO_CONSTANTS_GRP.VBATCH_INSTRUCTION_TYPE,
1436: X_INSTRUCTION_SET_ID => l_instruction_set_id
1437: );
1431: P_DEFINITION_ENTITY_NAME => GMO_CONSTANTS_GRP.ENTITY_MATERIAL,
1432: P_DEFINITION_ENTITY_KEY => l_recipe_id || GMO_CONSTANTS_GRP.ENTITY_KEY_SEPARATOR || l_formulaline_id || GMO_CONSTANTS_GRP.ENTITY_KEY_SEPARATOR || l_inventory_item_id,
1433: P_INSTANCE_ENTITY_NAME => GMO_CONSTANTS_GRP.ENTITY_MATERIAL,
1434: P_INSTANCE_ENTITY_KEY => l_material_detail_id,
1435: P_INSTRUCTION_TYPE => GMO_CONSTANTS_GRP.VBATCH_INSTRUCTION_TYPE,
1436: X_INSTRUCTION_SET_ID => l_instruction_set_id
1437: );
1438:
1439: if l_RETURN_STATUS <> FND_API.G_RET_STS_SUCCESS THEN
1441: end if;
1442:
1443: update_task_attribute
1444: (
1445: P_ENTITY_NAME => GMO_CONSTANTS_GRP.ENTITY_MATERIAL,
1446: P_ENTITY_KEY => l_material_detail_id,
1447: P_INSTRUCTION_SET_ID => l_instruction_set_id,
1448: X_ATTRIBUTE_STATUS => l_attribute_status,
1449: X_INVALID_INSTR => l_invalid_instr
1625: END IF;
1626:
1627:
1628: --validte if the module is in vbatch or pi
1629: IF (P_FROM_MODULE <> GMO_CONSTANTS_GRP.FROM_MODULE_PI AND P_FROM_MODULE <> GMO_CONSTANTS_GRP.FROM_MODULE_VBATCH) THEN
1630: RAISE GMO_INVALID_MODULE_ERR;
1631: END IF;
1632:
1633:
1636: --we should check the admin privleges from the function access instead
1637: --of banking on the parameter.
1638: /*
1639:
1640: if (P_VBATCH_MODE = GMO_CONSTANTS_GRP.VBATCH_ADMIN_MODE) then
1641: l_vbatch_mode := GMO_CONSTANTS_GRP.VBATCH_ADMIN_MODE;
1642: else
1643: l_vbatch_mode := GMO_CONSTANTS_GRP.VBATCH_NORMAL_MODE;
1644: end if;
1637: --of banking on the parameter.
1638: /*
1639:
1640: if (P_VBATCH_MODE = GMO_CONSTANTS_GRP.VBATCH_ADMIN_MODE) then
1641: l_vbatch_mode := GMO_CONSTANTS_GRP.VBATCH_ADMIN_MODE;
1642: else
1643: l_vbatch_mode := GMO_CONSTANTS_GRP.VBATCH_NORMAL_MODE;
1644: end if;
1645:
1639:
1640: if (P_VBATCH_MODE = GMO_CONSTANTS_GRP.VBATCH_ADMIN_MODE) then
1641: l_vbatch_mode := GMO_CONSTANTS_GRP.VBATCH_ADMIN_MODE;
1642: else
1643: l_vbatch_mode := GMO_CONSTANTS_GRP.VBATCH_NORMAL_MODE;
1644: end if;
1645:
1646: if (P_FROM_MODULE = GMO_CONSTANTS_GRP.FROM_MODULE_PI) then
1647:
1642: else
1643: l_vbatch_mode := GMO_CONSTANTS_GRP.VBATCH_NORMAL_MODE;
1644: end if;
1645:
1646: if (P_FROM_MODULE = GMO_CONSTANTS_GRP.FROM_MODULE_PI) then
1647:
1648: GMO_INSTRUCTION_GRP.GET_TASK_PARAMETER
1649: (
1650: P_API_VERSION => 1.0,
1651: X_RETURN_STATUS => l_return_status,
1652: X_MSG_COUNT => l_msg_count,
1653: X_MSG_DATA => l_msg_data,
1654: P_INSTRUCTION_PROCESS_ID => P_INSTRUCTION_PROCESS_ID,
1655: P_ATTRIBUTE_NAME => GMO_CONSTANTS_GRP.VBATCH_MODE_PARAMETER,
1656: X_ATTRIBUTE_VALUE => l_vbatch_mode
1657: );
1658:
1659:
1664: end if;
1665: --if (l_vbatch_mode is null) then
1666: */
1667: if (FND_FUNCTION.TEST('GMO_VBATCH_DETAIL_ADMIN')) then
1668: l_vbatch_mode := GMO_CONSTANTS_GRP.VBATCH_ADMIN_MODE;
1669: else
1670: l_vbatch_mode := GMO_CONSTANTS_GRP.VBATCH_NORMAL_MODE;
1671: end if;
1672:
1666: */
1667: if (FND_FUNCTION.TEST('GMO_VBATCH_DETAIL_ADMIN')) then
1668: l_vbatch_mode := GMO_CONSTANTS_GRP.VBATCH_ADMIN_MODE;
1669: else
1670: l_vbatch_mode := GMO_CONSTANTS_GRP.VBATCH_NORMAL_MODE;
1671: end if;
1672:
1673: l_requester := P_REQUESTER;
1674:
1677: END IF;
1678:
1679: IF (P_TASK = 'VIEW_BATCH' or P_TASK = 'UPDATE_BATCH') THEN
1680:
1681: IF (P_ENTITY_NAME <> GMO_CONSTANTS_GRP.ENTITY_BATCH) THEN
1682: RAISE GMO_INVALID_TASK_ERR;
1683: END IF;
1684:
1685: X_TASK_ENTITY_NAME := GMO_CONSTANTS_GRP.ENTITY_BATCH;
1681: IF (P_ENTITY_NAME <> GMO_CONSTANTS_GRP.ENTITY_BATCH) THEN
1682: RAISE GMO_INVALID_TASK_ERR;
1683: END IF;
1684:
1685: X_TASK_ENTITY_NAME := GMO_CONSTANTS_GRP.ENTITY_BATCH;
1686: X_TASK_ENTITY_KEY := P_ENTITY_KEY;
1687: X_TASK_NAME := null;
1688: X_TASK_KEY := null;
1689:
1687: X_TASK_NAME := null;
1688: X_TASK_KEY := null;
1689:
1690: IF (P_TASK = 'UPDATE_BATCH') THEN
1691: X_READ_ONLY := GMO_CONSTANTS_GRP.READ_ONLY_NO;
1692: ELSE
1693: X_READ_ONLY := GMO_CONSTANTS_GRP.READ_ONLY_YES;
1694:
1695: END IF;
1689:
1690: IF (P_TASK = 'UPDATE_BATCH') THEN
1691: X_READ_ONLY := GMO_CONSTANTS_GRP.READ_ONLY_NO;
1692: ELSE
1693: X_READ_ONLY := GMO_CONSTANTS_GRP.READ_ONLY_YES;
1694:
1695: END IF;
1696:
1697: ELSIF (P_TASK = 'VIEW_OPERATION' or P_TASK = 'UPDATE_OPERATION' or P_TASK = 'RELEASE_STEP' or P_TASK = 'CLOSE_STEP') THEN
1695: END IF;
1696:
1697: ELSIF (P_TASK = 'VIEW_OPERATION' or P_TASK = 'UPDATE_OPERATION' or P_TASK = 'RELEASE_STEP' or P_TASK = 'CLOSE_STEP') THEN
1698:
1699: IF (P_ENTITY_NAME <> GMO_CONSTANTS_GRP.ENTITY_OPERATION) THEN
1700: RAISE GMO_INVALID_TASK_ERR;
1701: END IF;
1702:
1703: l_batchstep_id := to_number (p_entity_key);
1700: RAISE GMO_INVALID_TASK_ERR;
1701: END IF;
1702:
1703: l_batchstep_id := to_number (p_entity_key);
1704: X_TASK_ENTITY_NAME := GMO_CONSTANTS_GRP.ENTITY_OPERATION;
1705: X_TASK_ENTITY_KEY := P_ENTITY_KEY;
1706: X_TASK_NAME := null;
1707: X_TASK_KEY := null;
1708:
1706: X_TASK_NAME := null;
1707: X_TASK_KEY := null;
1708:
1709: IF (P_TASK = 'VIEW_OPERATION') THEN
1710: X_READ_ONLY := GMO_CONSTANTS_GRP.READ_ONLY_YES;
1711: ELSE
1712: l_step_locked := GMO_VBATCH_PVT.IS_STEP_LOCKED (P_VBATCH_MODE => l_vbatch_mode, P_BATCHSTEP_ID => l_batchstep_id, P_REQUESTER => l_requester);
1713:
1714: IF (not l_advanced_pi or l_step_locked = GMO_CONSTANTS_GRP.YES) THEN
1710: X_READ_ONLY := GMO_CONSTANTS_GRP.READ_ONLY_YES;
1711: ELSE
1712: l_step_locked := GMO_VBATCH_PVT.IS_STEP_LOCKED (P_VBATCH_MODE => l_vbatch_mode, P_BATCHSTEP_ID => l_batchstep_id, P_REQUESTER => l_requester);
1713:
1714: IF (not l_advanced_pi or l_step_locked = GMO_CONSTANTS_GRP.YES) THEN
1715: X_READ_ONLY := GMO_CONSTANTS_GRP.READ_ONLY_NO;
1716: ELSE
1717: X_READ_ONLY := GMO_CONSTANTS_GRP.READ_ONLY_YES;
1718: END IF;
1711: ELSE
1712: l_step_locked := GMO_VBATCH_PVT.IS_STEP_LOCKED (P_VBATCH_MODE => l_vbatch_mode, P_BATCHSTEP_ID => l_batchstep_id, P_REQUESTER => l_requester);
1713:
1714: IF (not l_advanced_pi or l_step_locked = GMO_CONSTANTS_GRP.YES) THEN
1715: X_READ_ONLY := GMO_CONSTANTS_GRP.READ_ONLY_NO;
1716: ELSE
1717: X_READ_ONLY := GMO_CONSTANTS_GRP.READ_ONLY_YES;
1718: END IF;
1719:
1713:
1714: IF (not l_advanced_pi or l_step_locked = GMO_CONSTANTS_GRP.YES) THEN
1715: X_READ_ONLY := GMO_CONSTANTS_GRP.READ_ONLY_NO;
1716: ELSE
1717: X_READ_ONLY := GMO_CONSTANTS_GRP.READ_ONLY_YES;
1718: END IF;
1719:
1720: END IF;
1721:
1720: END IF;
1721:
1722: ELSIF (P_TASK = 'UPDATE_ACTIVITY' OR P_TASK = 'VIEW_ACTIVITY') THEN
1723:
1724: IF (P_ENTITY_NAME = GMO_CONSTANTS_GRP.ENTITY_OPERATION) THEN
1725: l_batchstep_id := to_number (p_entity_key);
1726: l_batchstep_activity_id := to_number(p_task_attribute);
1727:
1728: ELSIF (P_ENTITY_NAME = GMO_CONSTANTS_GRP.ENTITY_ACTIVITY) THEN
1724: IF (P_ENTITY_NAME = GMO_CONSTANTS_GRP.ENTITY_OPERATION) THEN
1725: l_batchstep_id := to_number (p_entity_key);
1726: l_batchstep_activity_id := to_number(p_task_attribute);
1727:
1728: ELSIF (P_ENTITY_NAME = GMO_CONSTANTS_GRP.ENTITY_ACTIVITY) THEN
1729: l_batchstep_activity_id := to_number (p_entity_key);
1730:
1731: ELSE
1732: RAISE GMO_INVALID_TASK_ERR;
1735: open get_activity_detail_from_id;
1736: fetch get_activity_detail_from_id into l_batch_id, l_batchstep_id, l_batchstep_activity_id;
1737: close get_activity_detail_from_id;
1738:
1739: X_TASK_ENTITY_NAME := GMO_CONSTANTS_GRP.ENTITY_OPERATION;
1740: X_TASK_ENTITY_KEY := l_batchstep_id;
1741: X_TASK_NAME := GMO_CONSTANTS_GRP.TASK_ACTIVITY;
1742: X_TASK_KEY := l_batchstep_activity_id;
1743:
1737: close get_activity_detail_from_id;
1738:
1739: X_TASK_ENTITY_NAME := GMO_CONSTANTS_GRP.ENTITY_OPERATION;
1740: X_TASK_ENTITY_KEY := l_batchstep_id;
1741: X_TASK_NAME := GMO_CONSTANTS_GRP.TASK_ACTIVITY;
1742: X_TASK_KEY := l_batchstep_activity_id;
1743:
1744: IF (P_TASK = 'VIEW_ACTIVITY') THEN
1745: X_READ_ONLY := GMO_CONSTANTS_GRP.READ_ONLY_YES;
1741: X_TASK_NAME := GMO_CONSTANTS_GRP.TASK_ACTIVITY;
1742: X_TASK_KEY := l_batchstep_activity_id;
1743:
1744: IF (P_TASK = 'VIEW_ACTIVITY') THEN
1745: X_READ_ONLY := GMO_CONSTANTS_GRP.READ_ONLY_YES;
1746: ELSE
1747:
1748: l_step_locked := GMO_VBATCH_PVT.IS_STEP_LOCKED (P_VBATCH_MODE => l_vbatch_mode, P_BATCHSTEP_ID => l_batchstep_id, P_REQUESTER => l_requester);
1749:
1746: ELSE
1747:
1748: l_step_locked := GMO_VBATCH_PVT.IS_STEP_LOCKED (P_VBATCH_MODE => l_vbatch_mode, P_BATCHSTEP_ID => l_batchstep_id, P_REQUESTER => l_requester);
1749:
1750: IF (not l_advanced_pi or l_step_locked = GMO_CONSTANTS_GRP.YES) THEN
1751: X_READ_ONLY := GMO_CONSTANTS_GRP.READ_ONLY_NO;
1752: ELSE
1753: X_READ_ONLY := GMO_CONSTANTS_GRP.READ_ONLY_YES;
1754: END IF;
1747:
1748: l_step_locked := GMO_VBATCH_PVT.IS_STEP_LOCKED (P_VBATCH_MODE => l_vbatch_mode, P_BATCHSTEP_ID => l_batchstep_id, P_REQUESTER => l_requester);
1749:
1750: IF (not l_advanced_pi or l_step_locked = GMO_CONSTANTS_GRP.YES) THEN
1751: X_READ_ONLY := GMO_CONSTANTS_GRP.READ_ONLY_NO;
1752: ELSE
1753: X_READ_ONLY := GMO_CONSTANTS_GRP.READ_ONLY_YES;
1754: END IF;
1755:
1749:
1750: IF (not l_advanced_pi or l_step_locked = GMO_CONSTANTS_GRP.YES) THEN
1751: X_READ_ONLY := GMO_CONSTANTS_GRP.READ_ONLY_NO;
1752: ELSE
1753: X_READ_ONLY := GMO_CONSTANTS_GRP.READ_ONLY_YES;
1754: END IF;
1755:
1756: END IF;
1757:
1755:
1756: END IF;
1757:
1758:
1759: ELSIF (P_TASK = 'UPDATE_RESOURCE' OR P_TASK = 'VIEW_RESOURCE' OR P_TASK = GMO_CONSTANTS_GRP.TASK_RESOURCE_TRANSACTION) THEN
1760:
1761: IF (P_ENTITY_NAME = GMO_CONSTANTS_GRP.ENTITY_OPERATION) THEN
1762: l_batchstep_id := to_number (p_entity_key);
1763: l_batchstep_resource_id := to_number(p_task_attribute);
1757:
1758:
1759: ELSIF (P_TASK = 'UPDATE_RESOURCE' OR P_TASK = 'VIEW_RESOURCE' OR P_TASK = GMO_CONSTANTS_GRP.TASK_RESOURCE_TRANSACTION) THEN
1760:
1761: IF (P_ENTITY_NAME = GMO_CONSTANTS_GRP.ENTITY_OPERATION) THEN
1762: l_batchstep_id := to_number (p_entity_key);
1763: l_batchstep_resource_id := to_number(p_task_attribute);
1764:
1765: ELSIF (P_ENTITY_NAME = GMO_CONSTANTS_GRP.ENTITY_ACTIVITY) THEN
1761: IF (P_ENTITY_NAME = GMO_CONSTANTS_GRP.ENTITY_OPERATION) THEN
1762: l_batchstep_id := to_number (p_entity_key);
1763: l_batchstep_resource_id := to_number(p_task_attribute);
1764:
1765: ELSIF (P_ENTITY_NAME = GMO_CONSTANTS_GRP.ENTITY_ACTIVITY) THEN
1766:
1767: l_batchstep_activity_id := to_number (p_entity_key);
1768: l_batchstep_resource_id := to_number(p_task_attribute);
1769:
1766:
1767: l_batchstep_activity_id := to_number (p_entity_key);
1768: l_batchstep_resource_id := to_number(p_task_attribute);
1769:
1770: ELSIF (P_ENTITY_NAME = GMO_CONSTANTS_GRP.ENTITY_RESOURCE) THEN
1771:
1772: l_batchstep_resource_id := to_number(p_entity_key);
1773:
1774: ELSE
1778: open get_resource_detail_from_id;
1779: fetch get_resource_detail_from_id into l_batch_id, l_batchstep_id, l_batchstep_activity_id, l_batchstep_resource_id;
1780: close get_resource_detail_from_id;
1781:
1782: X_TASK_ENTITY_NAME := GMO_CONSTANTS_GRP.ENTITY_ACTIVITY;
1783: X_TASK_ENTITY_KEY := l_batchstep_activity_id;
1784: IF (P_TASK = GMO_CONSTANTS_GRP.TASK_RESOURCE_TRANSACTION) THEN
1785: X_TASK_NAME := GMO_CONSTANTS_GRP.TASK_RESOURCE_TRANSACTION;
1786: ELSE
1780: close get_resource_detail_from_id;
1781:
1782: X_TASK_ENTITY_NAME := GMO_CONSTANTS_GRP.ENTITY_ACTIVITY;
1783: X_TASK_ENTITY_KEY := l_batchstep_activity_id;
1784: IF (P_TASK = GMO_CONSTANTS_GRP.TASK_RESOURCE_TRANSACTION) THEN
1785: X_TASK_NAME := GMO_CONSTANTS_GRP.TASK_RESOURCE_TRANSACTION;
1786: ELSE
1787: X_TASK_NAME := GMO_CONSTANTS_GRP.TASK_RESOURCE;
1788: END IF;
1781:
1782: X_TASK_ENTITY_NAME := GMO_CONSTANTS_GRP.ENTITY_ACTIVITY;
1783: X_TASK_ENTITY_KEY := l_batchstep_activity_id;
1784: IF (P_TASK = GMO_CONSTANTS_GRP.TASK_RESOURCE_TRANSACTION) THEN
1785: X_TASK_NAME := GMO_CONSTANTS_GRP.TASK_RESOURCE_TRANSACTION;
1786: ELSE
1787: X_TASK_NAME := GMO_CONSTANTS_GRP.TASK_RESOURCE;
1788: END IF;
1789: X_TASK_KEY := l_batchstep_resource_id;
1783: X_TASK_ENTITY_KEY := l_batchstep_activity_id;
1784: IF (P_TASK = GMO_CONSTANTS_GRP.TASK_RESOURCE_TRANSACTION) THEN
1785: X_TASK_NAME := GMO_CONSTANTS_GRP.TASK_RESOURCE_TRANSACTION;
1786: ELSE
1787: X_TASK_NAME := GMO_CONSTANTS_GRP.TASK_RESOURCE;
1788: END IF;
1789: X_TASK_KEY := l_batchstep_resource_id;
1790:
1791: IF (P_TASK = 'VIEW_RESOURCE') THEN
1788: END IF;
1789: X_TASK_KEY := l_batchstep_resource_id;
1790:
1791: IF (P_TASK = 'VIEW_RESOURCE') THEN
1792: X_READ_ONLY := GMO_CONSTANTS_GRP.READ_ONLY_YES;
1793: ELSE
1794:
1795: l_step_locked := GMO_VBATCH_PVT.IS_STEP_LOCKED (P_VBATCH_MODE => l_vbatch_mode, P_BATCHSTEP_ID => l_batchstep_id, P_REQUESTER => l_requester);
1796:
1793: ELSE
1794:
1795: l_step_locked := GMO_VBATCH_PVT.IS_STEP_LOCKED (P_VBATCH_MODE => l_vbatch_mode, P_BATCHSTEP_ID => l_batchstep_id, P_REQUESTER => l_requester);
1796:
1797: IF (not l_advanced_pi or l_step_locked = GMO_CONSTANTS_GRP.YES) THEN
1798: X_READ_ONLY := GMO_CONSTANTS_GRP.READ_ONLY_NO;
1799: ELSE
1800: X_READ_ONLY := GMO_CONSTANTS_GRP.READ_ONLY_YES;
1801: END IF;
1794:
1795: l_step_locked := GMO_VBATCH_PVT.IS_STEP_LOCKED (P_VBATCH_MODE => l_vbatch_mode, P_BATCHSTEP_ID => l_batchstep_id, P_REQUESTER => l_requester);
1796:
1797: IF (not l_advanced_pi or l_step_locked = GMO_CONSTANTS_GRP.YES) THEN
1798: X_READ_ONLY := GMO_CONSTANTS_GRP.READ_ONLY_NO;
1799: ELSE
1800: X_READ_ONLY := GMO_CONSTANTS_GRP.READ_ONLY_YES;
1801: END IF;
1802:
1796:
1797: IF (not l_advanced_pi or l_step_locked = GMO_CONSTANTS_GRP.YES) THEN
1798: X_READ_ONLY := GMO_CONSTANTS_GRP.READ_ONLY_NO;
1799: ELSE
1800: X_READ_ONLY := GMO_CONSTANTS_GRP.READ_ONLY_YES;
1801: END IF;
1802:
1803: END IF;
1804:
1801: END IF;
1802:
1803: END IF;
1804:
1805: ELSIF (P_TASK = GMO_CONSTANTS_GRP.TASK_PROCESS_PARAMETER) THEN
1806:
1807: IF (P_ENTITY_NAME = GMO_CONSTANTS_GRP.ENTITY_OPERATION) THEN
1808: l_batchstep_id := to_number (p_entity_key);
1809:
1803: END IF;
1804:
1805: ELSIF (P_TASK = GMO_CONSTANTS_GRP.TASK_PROCESS_PARAMETER) THEN
1806:
1807: IF (P_ENTITY_NAME = GMO_CONSTANTS_GRP.ENTITY_OPERATION) THEN
1808: l_batchstep_id := to_number (p_entity_key);
1809:
1810: ELSIF (P_ENTITY_NAME = GMO_CONSTANTS_GRP.ENTITY_ACTIVITY) THEN
1811: l_batchstep_activity_id := to_number (p_entity_key);
1806:
1807: IF (P_ENTITY_NAME = GMO_CONSTANTS_GRP.ENTITY_OPERATION) THEN
1808: l_batchstep_id := to_number (p_entity_key);
1809:
1810: ELSIF (P_ENTITY_NAME = GMO_CONSTANTS_GRP.ENTITY_ACTIVITY) THEN
1811: l_batchstep_activity_id := to_number (p_entity_key);
1812:
1813: ELSIF (P_ENTITY_NAME = GMO_CONSTANTS_GRP.ENTITY_RESOURCE) THEN
1814: l_batchstep_resource_id := to_number(p_entity_key);
1809:
1810: ELSIF (P_ENTITY_NAME = GMO_CONSTANTS_GRP.ENTITY_ACTIVITY) THEN
1811: l_batchstep_activity_id := to_number (p_entity_key);
1812:
1813: ELSIF (P_ENTITY_NAME = GMO_CONSTANTS_GRP.ENTITY_RESOURCE) THEN
1814: l_batchstep_resource_id := to_number(p_entity_key);
1815:
1816: ELSE
1817: RAISE GMO_INVALID_TASK_ERR;
1821: open get_param_detail_from_id;
1822: fetch get_param_detail_from_id into l_batch_id, l_batchstep_id, l_batchstep_activity_id, l_batchstep_resource_id, l_process_param_id;
1823: close get_param_detail_from_id;
1824:
1825: X_TASK_ENTITY_NAME := GMO_CONSTANTS_GRP.ENTITY_RESOURCE;
1826: X_TASK_ENTITY_KEY := l_batchstep_resource_id;
1827: X_TASK_NAME := GMO_CONSTANTS_GRP.TASK_PROCESS_PARAMETER;
1828: X_TASK_KEY := l_process_param_id;
1829:
1823: close get_param_detail_from_id;
1824:
1825: X_TASK_ENTITY_NAME := GMO_CONSTANTS_GRP.ENTITY_RESOURCE;
1826: X_TASK_ENTITY_KEY := l_batchstep_resource_id;
1827: X_TASK_NAME := GMO_CONSTANTS_GRP.TASK_PROCESS_PARAMETER;
1828: X_TASK_KEY := l_process_param_id;
1829:
1830: l_step_locked := GMO_VBATCH_PVT.IS_STEP_LOCKED (P_VBATCH_MODE => l_vbatch_mode, P_BATCHSTEP_ID => l_batchstep_id, P_REQUESTER => l_requester);
1831:
1828: X_TASK_KEY := l_process_param_id;
1829:
1830: l_step_locked := GMO_VBATCH_PVT.IS_STEP_LOCKED (P_VBATCH_MODE => l_vbatch_mode, P_BATCHSTEP_ID => l_batchstep_id, P_REQUESTER => l_requester);
1831:
1832: IF (not l_advanced_pi or l_step_locked = GMO_CONSTANTS_GRP.YES) THEN
1833: X_READ_ONLY := GMO_CONSTANTS_GRP.READ_ONLY_NO;
1834: ELSE
1835: X_READ_ONLY := GMO_CONSTANTS_GRP.READ_ONLY_YES;
1836: END IF;
1829:
1830: l_step_locked := GMO_VBATCH_PVT.IS_STEP_LOCKED (P_VBATCH_MODE => l_vbatch_mode, P_BATCHSTEP_ID => l_batchstep_id, P_REQUESTER => l_requester);
1831:
1832: IF (not l_advanced_pi or l_step_locked = GMO_CONSTANTS_GRP.YES) THEN
1833: X_READ_ONLY := GMO_CONSTANTS_GRP.READ_ONLY_NO;
1834: ELSE
1835: X_READ_ONLY := GMO_CONSTANTS_GRP.READ_ONLY_YES;
1836: END IF;
1837:
1831:
1832: IF (not l_advanced_pi or l_step_locked = GMO_CONSTANTS_GRP.YES) THEN
1833: X_READ_ONLY := GMO_CONSTANTS_GRP.READ_ONLY_NO;
1834: ELSE
1835: X_READ_ONLY := GMO_CONSTANTS_GRP.READ_ONLY_YES;
1836: END IF;
1837:
1838: ELSIF (P_TASK = 'MATERIAL' OR P_TASK = 'RESERVATIONS' OR P_TASK = 'VIEW_MATERIAL' OR P_TASK = 'UPDATE_MATERIAL' OR P_TASK='MATERIAL_TRANSACTIONS' OR P_TASK = 'QUALITY') THEN
1839:
1837:
1838: ELSIF (P_TASK = 'MATERIAL' OR P_TASK = 'RESERVATIONS' OR P_TASK = 'VIEW_MATERIAL' OR P_TASK = 'UPDATE_MATERIAL' OR P_TASK='MATERIAL_TRANSACTIONS' OR P_TASK = 'QUALITY') THEN
1839:
1840:
1841: IF (P_ENTITY_NAME = GMO_CONSTANTS_GRP.ENTITY_BATCH) THEN
1842:
1843: l_batch_id := to_number (p_entity_key);
1844:
1845: ELSIF (P_ENTITY_NAME = GMO_CONSTANTS_GRP.ENTITY_OPERATION) THEN
1841: IF (P_ENTITY_NAME = GMO_CONSTANTS_GRP.ENTITY_BATCH) THEN
1842:
1843: l_batch_id := to_number (p_entity_key);
1844:
1845: ELSIF (P_ENTITY_NAME = GMO_CONSTANTS_GRP.ENTITY_OPERATION) THEN
1846: l_batchstep_id := to_number (p_entity_key);
1847: l_material_detail_id := to_number(p_task_attribute);
1848:
1849: open get_step_detail;
1849: open get_step_detail;
1850: fetch get_step_detail into l_batch_id, l_batchstep_id;
1851: close get_step_detail;
1852:
1853: ELSIF (P_ENTITY_NAME = GMO_CONSTANTS_GRP.ENTITY_ACTIVITY) THEN
1854:
1855: l_batchstep_activity_id := to_number(p_entity_key);
1856: l_material_detail_id := to_number(p_task_attribute);
1857:
1858: open get_activity_detail_from_id;
1859: fetch get_activity_detail_from_id into l_batch_id, l_batchstep_id, l_batchstep_activity_id;
1860: close get_activity_detail_from_id;
1861:
1862: ELSIF (P_ENTITY_NAME = GMO_CONSTANTS_GRP.ENTITY_RESOURCE) THEN
1863:
1864: l_batchstep_resource_id := to_number(p_entity_key);
1865: l_material_detail_id := to_number(p_task_attribute);
1866:
1867: open get_resource_detail_from_id;
1868: fetch get_resource_detail_from_id into l_batch_id, l_batchstep_id, l_batchstep_activity_id, l_batchstep_resource_id;
1869: close get_resource_detail_from_id;
1870:
1871: ELSIF (P_ENTITY_NAME = GMO_CONSTANTS_GRP.ENTITY_MATERIAL) THEN
1872:
1873: l_material_detail_id := to_number(p_entity_key);
1874:
1875: open get_step_id_for_material;
1883: open get_material_detail_from_id;
1884: fetch get_material_detail_from_id into l_batch_id, l_material_detail_id, l_inventory_item_id, l_line_no, l_line_type;
1885: close get_material_detail_from_id;
1886:
1887: IF (P_ENTITY_NAME = GMO_CONSTANTS_GRP.ENTITY_BATCH OR P_ENTITY_NAME = GMO_CONSTANTS_GRP.ENTITY_MATERIAL OR P_TASK = 'QUALITY') THEN
1888: X_TASK_ENTITY_NAME := GMO_CONSTANTS_GRP.ENTITY_BATCH;
1889: X_TASK_ENTITY_KEY := l_batch_id;
1890: ELSE
1891: X_TASK_ENTITY_NAME := GMO_CONSTANTS_GRP.ENTITY_OPERATION;
1884: fetch get_material_detail_from_id into l_batch_id, l_material_detail_id, l_inventory_item_id, l_line_no, l_line_type;
1885: close get_material_detail_from_id;
1886:
1887: IF (P_ENTITY_NAME = GMO_CONSTANTS_GRP.ENTITY_BATCH OR P_ENTITY_NAME = GMO_CONSTANTS_GRP.ENTITY_MATERIAL OR P_TASK = 'QUALITY') THEN
1888: X_TASK_ENTITY_NAME := GMO_CONSTANTS_GRP.ENTITY_BATCH;
1889: X_TASK_ENTITY_KEY := l_batch_id;
1890: ELSE
1891: X_TASK_ENTITY_NAME := GMO_CONSTANTS_GRP.ENTITY_OPERATION;
1892: X_TASK_ENTITY_KEY := l_batchstep_id;
1887: IF (P_ENTITY_NAME = GMO_CONSTANTS_GRP.ENTITY_BATCH OR P_ENTITY_NAME = GMO_CONSTANTS_GRP.ENTITY_MATERIAL OR P_TASK = 'QUALITY') THEN
1888: X_TASK_ENTITY_NAME := GMO_CONSTANTS_GRP.ENTITY_BATCH;
1889: X_TASK_ENTITY_KEY := l_batch_id;
1890: ELSE
1891: X_TASK_ENTITY_NAME := GMO_CONSTANTS_GRP.ENTITY_OPERATION;
1892: X_TASK_ENTITY_KEY := l_batchstep_id;
1893: END IF;
1894:
1895: IF (P_TASK= GMO_CONSTANTS_GRP.TASK_MATERIAL_TRANSACTIONS) THEN
1891: X_TASK_ENTITY_NAME := GMO_CONSTANTS_GRP.ENTITY_OPERATION;
1892: X_TASK_ENTITY_KEY := l_batchstep_id;
1893: END IF;
1894:
1895: IF (P_TASK= GMO_CONSTANTS_GRP.TASK_MATERIAL_TRANSACTIONS) THEN
1896: X_TASK_NAME := GMO_CONSTANTS_GRP.TASK_MATERIAL_TRANSACTIONS;
1897: l_invoke_mode := 'T';
1898: X_TASK_KEY := l_material_detail_id;
1899:
1892: X_TASK_ENTITY_KEY := l_batchstep_id;
1893: END IF;
1894:
1895: IF (P_TASK= GMO_CONSTANTS_GRP.TASK_MATERIAL_TRANSACTIONS) THEN
1896: X_TASK_NAME := GMO_CONSTANTS_GRP.TASK_MATERIAL_TRANSACTIONS;
1897: l_invoke_mode := 'T';
1898: X_TASK_KEY := l_material_detail_id;
1899:
1900: ELSIF (P_TASK = 'QUALITY') THEN
1897: l_invoke_mode := 'T';
1898: X_TASK_KEY := l_material_detail_id;
1899:
1900: ELSIF (P_TASK = 'QUALITY') THEN
1901: X_TASK_NAME := GMO_CONSTANTS_GRP.TASK_QUALITY;
1902: X_TASK_KEY := l_inventory_item_id;
1903:
1904: ELSE
1905: X_TASK_NAME := GMO_CONSTANTS_GRP.TASK_MATERIAL;
1901: X_TASK_NAME := GMO_CONSTANTS_GRP.TASK_QUALITY;
1902: X_TASK_KEY := l_inventory_item_id;
1903:
1904: ELSE
1905: X_TASK_NAME := GMO_CONSTANTS_GRP.TASK_MATERIAL;
1906: X_TASK_KEY := l_material_detail_id;
1907: END IF;
1908:
1909: --Bug 5023801: start
1907: END IF;
1908:
1909: --Bug 5023801: start
1910: IF (P_TASK = 'VIEW_MATERIAL') THEN
1911: X_READ_ONLY := GMO_CONSTANTS_GRP.READ_ONLY_YES;
1912: --Bug 5023801: end
1913: ELSIF (X_TASK_ENTITY_NAME = GMO_CONSTANTS_GRP.ENTITY_BATCH or l_batchstep_id is null ) THEN
1914: X_READ_ONLY := GMO_CONSTANTS_GRP.READ_ONLY_NO;
1915: ELSE
1909: --Bug 5023801: start
1910: IF (P_TASK = 'VIEW_MATERIAL') THEN
1911: X_READ_ONLY := GMO_CONSTANTS_GRP.READ_ONLY_YES;
1912: --Bug 5023801: end
1913: ELSIF (X_TASK_ENTITY_NAME = GMO_CONSTANTS_GRP.ENTITY_BATCH or l_batchstep_id is null ) THEN
1914: X_READ_ONLY := GMO_CONSTANTS_GRP.READ_ONLY_NO;
1915: ELSE
1916:
1917: l_step_locked := GMO_VBATCH_PVT.IS_STEP_LOCKED (P_VBATCH_MODE => l_vbatch_mode, P_BATCHSTEP_ID => l_batchstep_id, P_REQUESTER => l_requester);
1910: IF (P_TASK = 'VIEW_MATERIAL') THEN
1911: X_READ_ONLY := GMO_CONSTANTS_GRP.READ_ONLY_YES;
1912: --Bug 5023801: end
1913: ELSIF (X_TASK_ENTITY_NAME = GMO_CONSTANTS_GRP.ENTITY_BATCH or l_batchstep_id is null ) THEN
1914: X_READ_ONLY := GMO_CONSTANTS_GRP.READ_ONLY_NO;
1915: ELSE
1916:
1917: l_step_locked := GMO_VBATCH_PVT.IS_STEP_LOCKED (P_VBATCH_MODE => l_vbatch_mode, P_BATCHSTEP_ID => l_batchstep_id, P_REQUESTER => l_requester);
1918:
1915: ELSE
1916:
1917: l_step_locked := GMO_VBATCH_PVT.IS_STEP_LOCKED (P_VBATCH_MODE => l_vbatch_mode, P_BATCHSTEP_ID => l_batchstep_id, P_REQUESTER => l_requester);
1918:
1919: IF (not l_advanced_pi or l_step_locked = GMO_CONSTANTS_GRP.YES) THEN
1920: X_READ_ONLY := GMO_CONSTANTS_GRP.READ_ONLY_NO;
1921: ELSE
1922: X_READ_ONLY := GMO_CONSTANTS_GRP.READ_ONLY_YES;
1923: END IF;
1916:
1917: l_step_locked := GMO_VBATCH_PVT.IS_STEP_LOCKED (P_VBATCH_MODE => l_vbatch_mode, P_BATCHSTEP_ID => l_batchstep_id, P_REQUESTER => l_requester);
1918:
1919: IF (not l_advanced_pi or l_step_locked = GMO_CONSTANTS_GRP.YES) THEN
1920: X_READ_ONLY := GMO_CONSTANTS_GRP.READ_ONLY_NO;
1921: ELSE
1922: X_READ_ONLY := GMO_CONSTANTS_GRP.READ_ONLY_YES;
1923: END IF;
1924:
1918:
1919: IF (not l_advanced_pi or l_step_locked = GMO_CONSTANTS_GRP.YES) THEN
1920: X_READ_ONLY := GMO_CONSTANTS_GRP.READ_ONLY_NO;
1921: ELSE
1922: X_READ_ONLY := GMO_CONSTANTS_GRP.READ_ONLY_YES;
1923: END IF;
1924:
1925: END IF;
1926:
2022: FND_LOG.MESSAGE(FND_LOG.LEVEL_EXCEPTION,'gmo.plsql.gmo_vbatch_pvt.on_task_load', FALSE);
2023: end if;
2024: WHEN GMO_NOT_ENHANCED_PI_ERR THEN
2025: X_RETURN_STATUS := FND_API.G_RET_STS_SUCCESS;
2026: X_READ_ONLY := GMO_CONSTANTS_GRP.READ_ONLY_NO;
2027: FND_MESSAGE.SET_NAME('GMO','GMO_VBATCH_NOT_ENHANCED_PI_ERR');
2028: FND_MSG_PUB.ADD;
2029: FND_MSG_PUB.Count_And_Get (p_count => x_msg_count, p_data => x_msg_data);
2030: if (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
2135: IF (NOT IS_BATCH_ENHANCED_PI (P_ENTITY_NAME => P_ENTITY_NAME, P_ENTITY_KEY => P_ENTITY_KEY) ) THEN
2136: RAISE GMO_NOT_ENHANCED_PI_ERR;
2137: END IF;
2138:
2139: IF (P_ENTITY_NAME <> GMO_CONSTANTS_GRP.ENTITY_BATCH AND P_ENTITY_NAME <> GMO_CONSTANTS_GRP.ENTITY_OPERATION OR p_entity_key is null) THEN
2140: RAISE GMO_INVALID_ENTITY_ERR;
2141: END IF;
2142:
2143: if (FND_LOG.LEVEL_EVENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
2149: FND_LOG.MESSAGE(FND_LOG.LEVEL_EVENT,'gmo.plsql.gmo_vbatch_pvt.on_task_action', FALSE);
2150: end if;
2151:
2152:
2153: IF (P_ENTITY_NAME = GMO_CONSTANTS_GRP.ENTITY_BATCH) THEN
2154:
2155: IF (P_TASK = GMO_CONSTANTS_GRP.ACTION_TERMINATE OR P_TASK = GMO_CONSTANTS_GRP.ACTION_UNRELEASE) THEN
2156: open c_get_steps;
2157: loop
2151:
2152:
2153: IF (P_ENTITY_NAME = GMO_CONSTANTS_GRP.ENTITY_BATCH) THEN
2154:
2155: IF (P_TASK = GMO_CONSTANTS_GRP.ACTION_TERMINATE OR P_TASK = GMO_CONSTANTS_GRP.ACTION_UNRELEASE) THEN
2156: open c_get_steps;
2157: loop
2158: fetch c_get_steps into l_batchstep_id;
2159: exit when c_get_steps%NOTFOUND;
2162: P_API_VERSION => 1.0,
2163: X_RETURN_STATUS => l_return_status,
2164: X_MSG_COUNT => l_msg_count,
2165: X_MSG_DATA => l_msg_data,
2166: P_ENTITY_NAME => GMO_CONSTANTS_GRP.ENTITY_OPERATION,
2167: P_ENTITY_KEY => l_batchstep_id,
2168: P_INSTRUCTION_TYPE => GMO_CONSTANTS_GRP.VBATCH_INSTRUCTION_TYPE
2169: );
2170:
2164: X_MSG_COUNT => l_msg_count,
2165: X_MSG_DATA => l_msg_data,
2166: P_ENTITY_NAME => GMO_CONSTANTS_GRP.ENTITY_OPERATION,
2167: P_ENTITY_KEY => l_batchstep_id,
2168: P_INSTRUCTION_TYPE => GMO_CONSTANTS_GRP.VBATCH_INSTRUCTION_TYPE
2169: );
2170:
2171: if l_RETURN_STATUS <> FND_API.G_RET_STS_SUCCESS THEN
2172: RAISE instruction_nullify_err;
2171: if l_RETURN_STATUS <> FND_API.G_RET_STS_SUCCESS THEN
2172: RAISE instruction_nullify_err;
2173: end if;
2174:
2175: IF (P_TASK = GMO_CONSTANTS_GRP.ACTION_UNRELEASE) THEN
2176:
2177:
2178: gmo_instruction_grp.create_instance_from_instance (
2179: P_API_VERSION => 1.0,
2179: P_API_VERSION => 1.0,
2180: X_RETURN_STATUS => l_return_status,
2181: X_MSG_COUNT => l_msg_count,
2182: X_MSG_DATA => l_msg_data,
2183: P_SOURCE_ENTITY_NAME => GMO_CONSTANTS_GRP.ENTITY_OPERATION,
2184: P_SOURCE_ENTITY_KEY => l_batchstep_id,
2185: P_TARGET_ENTITY_KEY => l_batchstep_id,
2186: P_INSTRUCTION_TYPE => GMO_CONSTANTS_GRP.VBATCH_INSTRUCTION_TYPE,
2187: X_INSTRUCTION_SET_ID => l_instruction_set_id
2182: X_MSG_DATA => l_msg_data,
2183: P_SOURCE_ENTITY_NAME => GMO_CONSTANTS_GRP.ENTITY_OPERATION,
2184: P_SOURCE_ENTITY_KEY => l_batchstep_id,
2185: P_TARGET_ENTITY_KEY => l_batchstep_id,
2186: P_INSTRUCTION_TYPE => GMO_CONSTANTS_GRP.VBATCH_INSTRUCTION_TYPE,
2187: X_INSTRUCTION_SET_ID => l_instruction_set_id
2188: );
2189: if l_RETURN_STATUS <> FND_API.G_RET_STS_SUCCESS THEN
2190: RAISE instruction_create_err;
2202: P_API_VERSION => 1.0,
2203: X_RETURN_STATUS => l_return_status,
2204: X_MSG_COUNT => l_msg_count,
2205: X_MSG_DATA => l_msg_data,
2206: P_ENTITY_NAME => GMO_CONSTANTS_GRP.ENTITY_ACTIVITY,
2207: P_ENTITY_KEY => l_batchstep_activity_id,
2208: P_INSTRUCTION_TYPE => GMO_CONSTANTS_GRP.VBATCH_INSTRUCTION_TYPE
2209: );
2210:
2204: X_MSG_COUNT => l_msg_count,
2205: X_MSG_DATA => l_msg_data,
2206: P_ENTITY_NAME => GMO_CONSTANTS_GRP.ENTITY_ACTIVITY,
2207: P_ENTITY_KEY => l_batchstep_activity_id,
2208: P_INSTRUCTION_TYPE => GMO_CONSTANTS_GRP.VBATCH_INSTRUCTION_TYPE
2209: );
2210:
2211: if l_RETURN_STATUS <> FND_API.G_RET_STS_SUCCESS THEN
2212: RAISE instruction_nullify_err;
2211: if l_RETURN_STATUS <> FND_API.G_RET_STS_SUCCESS THEN
2212: RAISE instruction_nullify_err;
2213: end if;
2214:
2215: IF (P_TASK = GMO_CONSTANTS_GRP.ACTION_UNRELEASE) THEN
2216: gmo_instruction_grp.create_instance_from_instance (
2217: P_API_VERSION => 1.0,
2218: X_RETURN_STATUS => l_return_status,
2219: X_MSG_COUNT => l_msg_count,
2217: P_API_VERSION => 1.0,
2218: X_RETURN_STATUS => l_return_status,
2219: X_MSG_COUNT => l_msg_count,
2220: X_MSG_DATA => l_msg_data,
2221: P_SOURCE_ENTITY_NAME => GMO_CONSTANTS_GRP.ENTITY_ACTIVITY,
2222: P_SOURCE_ENTITY_KEY => l_batchstep_activity_id,
2223: P_TARGET_ENTITY_KEY => l_batchstep_activity_id,
2224: P_INSTRUCTION_TYPE => GMO_CONSTANTS_GRP.VBATCH_INSTRUCTION_TYPE,
2225: X_INSTRUCTION_SET_ID => l_instruction_set_id
2220: X_MSG_DATA => l_msg_data,
2221: P_SOURCE_ENTITY_NAME => GMO_CONSTANTS_GRP.ENTITY_ACTIVITY,
2222: P_SOURCE_ENTITY_KEY => l_batchstep_activity_id,
2223: P_TARGET_ENTITY_KEY => l_batchstep_activity_id,
2224: P_INSTRUCTION_TYPE => GMO_CONSTANTS_GRP.VBATCH_INSTRUCTION_TYPE,
2225: X_INSTRUCTION_SET_ID => l_instruction_set_id
2226: );
2227: if l_RETURN_STATUS <> FND_API.G_RET_STS_SUCCESS THEN
2228: RAISE instruction_create_err;
2241: P_API_VERSION => 1.0,
2242: X_RETURN_STATUS => l_return_status,
2243: X_MSG_COUNT => l_msg_count,
2244: X_MSG_DATA => l_msg_data,
2245: P_ENTITY_NAME => GMO_CONSTANTS_GRP.ENTITY_RESOURCE,
2246: P_ENTITY_KEY => l_batchstep_resource_id,
2247: P_INSTRUCTION_TYPE => GMO_CONSTANTS_GRP.VBATCH_INSTRUCTION_TYPE
2248: );
2249:
2243: X_MSG_COUNT => l_msg_count,
2244: X_MSG_DATA => l_msg_data,
2245: P_ENTITY_NAME => GMO_CONSTANTS_GRP.ENTITY_RESOURCE,
2246: P_ENTITY_KEY => l_batchstep_resource_id,
2247: P_INSTRUCTION_TYPE => GMO_CONSTANTS_GRP.VBATCH_INSTRUCTION_TYPE
2248: );
2249:
2250: if X_RETURN_STATUS <> FND_API.G_RET_STS_SUCCESS THEN
2251: RAISE instruction_nullify_err;
2250: if X_RETURN_STATUS <> FND_API.G_RET_STS_SUCCESS THEN
2251: RAISE instruction_nullify_err;
2252: end if;
2253:
2254: IF (P_TASK = GMO_CONSTANTS_GRP.ACTION_UNRELEASE) THEN
2255: gmo_instruction_grp.create_instance_from_instance (
2256: P_API_VERSION => 1.0,
2257: X_RETURN_STATUS => l_return_status,
2258: X_MSG_COUNT => l_msg_count,
2256: P_API_VERSION => 1.0,
2257: X_RETURN_STATUS => l_return_status,
2258: X_MSG_COUNT => l_msg_count,
2259: X_MSG_DATA => l_msg_data,
2260: P_SOURCE_ENTITY_NAME => GMO_CONSTANTS_GRP.ENTITY_RESOURCE,
2261: P_SOURCE_ENTITY_KEY => l_batchstep_resource_id,
2262: P_TARGET_ENTITY_KEY => l_batchstep_resource_id,
2263: P_INSTRUCTION_TYPE => GMO_CONSTANTS_GRP.VBATCH_INSTRUCTION_TYPE,
2264: X_INSTRUCTION_SET_ID => l_instruction_set_id
2259: X_MSG_DATA => l_msg_data,
2260: P_SOURCE_ENTITY_NAME => GMO_CONSTANTS_GRP.ENTITY_RESOURCE,
2261: P_SOURCE_ENTITY_KEY => l_batchstep_resource_id,
2262: P_TARGET_ENTITY_KEY => l_batchstep_resource_id,
2263: P_INSTRUCTION_TYPE => GMO_CONSTANTS_GRP.VBATCH_INSTRUCTION_TYPE,
2264: X_INSTRUCTION_SET_ID => l_instruction_set_id
2265: );
2266: if l_RETURN_STATUS <> FND_API.G_RET_STS_SUCCESS THEN
2267: RAISE instruction_create_err;
2280: P_API_VERSION => 1.0,
2281: X_RETURN_STATUS => l_return_status,
2282: X_MSG_COUNT => l_msg_count,
2283: X_MSG_DATA => l_msg_data,
2284: P_ENTITY_NAME => GMO_CONSTANTS_GRP.ENTITY_MATERIAL,
2285: P_ENTITY_KEY => l_material_detail_id,
2286: P_INSTRUCTION_TYPE => GMO_CONSTANTS_GRP.VBATCH_INSTRUCTION_TYPE
2287: );
2288:
2282: X_MSG_COUNT => l_msg_count,
2283: X_MSG_DATA => l_msg_data,
2284: P_ENTITY_NAME => GMO_CONSTANTS_GRP.ENTITY_MATERIAL,
2285: P_ENTITY_KEY => l_material_detail_id,
2286: P_INSTRUCTION_TYPE => GMO_CONSTANTS_GRP.VBATCH_INSTRUCTION_TYPE
2287: );
2288:
2289: if X_RETURN_STATUS <> FND_API.G_RET_STS_SUCCESS THEN
2290: RAISE instruction_nullify_err;
2289: if X_RETURN_STATUS <> FND_API.G_RET_STS_SUCCESS THEN
2290: RAISE instruction_nullify_err;
2291: end if;
2292:
2293: IF (P_TASK = GMO_CONSTANTS_GRP.ACTION_UNRELEASE) THEN
2294: gmo_instruction_grp.create_instance_from_instance (
2295: P_API_VERSION => 1.0,
2296: X_RETURN_STATUS => l_return_status,
2297: X_MSG_COUNT => l_msg_count,
2295: P_API_VERSION => 1.0,
2296: X_RETURN_STATUS => l_return_status,
2297: X_MSG_COUNT => l_msg_count,
2298: X_MSG_DATA => l_msg_data,
2299: P_SOURCE_ENTITY_NAME => GMO_CONSTANTS_GRP.ENTITY_MATERIAL,
2300: P_SOURCE_ENTITY_KEY => l_material_detail_id,
2301: P_TARGET_ENTITY_KEY => l_material_detail_id,
2302: P_INSTRUCTION_TYPE => GMO_CONSTANTS_GRP.VBATCH_INSTRUCTION_TYPE,
2303: X_INSTRUCTION_SET_ID => l_instruction_set_id
2298: X_MSG_DATA => l_msg_data,
2299: P_SOURCE_ENTITY_NAME => GMO_CONSTANTS_GRP.ENTITY_MATERIAL,
2300: P_SOURCE_ENTITY_KEY => l_material_detail_id,
2301: P_TARGET_ENTITY_KEY => l_material_detail_id,
2302: P_INSTRUCTION_TYPE => GMO_CONSTANTS_GRP.VBATCH_INSTRUCTION_TYPE,
2303: X_INSTRUCTION_SET_ID => l_instruction_set_id
2304: );
2305: if l_RETURN_STATUS <> FND_API.G_RET_STS_SUCCESS THEN
2306: RAISE instruction_create_err;
2308: end if;
2309: end loop;
2310: close c_get_materials;
2311:
2312: ELSIF (P_TASK = GMO_CONSTANTS_GRP.ACTION_DELETE_MATERIAL) THEN
2313:
2314: l_material_detail_id := P_TASK_ATTRIBUTE;
2315: gmo_instruction_grp.NULLIFY_INSTR_FOR_ENTITY (
2316: P_API_VERSION => 1.0,
2316: P_API_VERSION => 1.0,
2317: X_RETURN_STATUS => l_return_status,
2318: X_MSG_COUNT => l_msg_count,
2319: X_MSG_DATA => l_msg_data,
2320: P_ENTITY_NAME => GMO_CONSTANTS_GRP.ENTITY_MATERIAL,
2321: P_ENTITY_KEY => l_material_detail_id,
2322: P_INSTRUCTION_TYPE => GMO_CONSTANTS_GRP.VBATCH_INSTRUCTION_TYPE
2323: );
2324:
2318: X_MSG_COUNT => l_msg_count,
2319: X_MSG_DATA => l_msg_data,
2320: P_ENTITY_NAME => GMO_CONSTANTS_GRP.ENTITY_MATERIAL,
2321: P_ENTITY_KEY => l_material_detail_id,
2322: P_INSTRUCTION_TYPE => GMO_CONSTANTS_GRP.VBATCH_INSTRUCTION_TYPE
2323: );
2324:
2325: if l_RETURN_STATUS <> FND_API.G_RET_STS_SUCCESS THEN
2326: RAISE instruction_nullify_err;
2325: if l_RETURN_STATUS <> FND_API.G_RET_STS_SUCCESS THEN
2326: RAISE instruction_nullify_err;
2327: end if;
2328:
2329: END IF; -- end IF (P_TASK = GMO_CONSTANTS_GRP.ACTION_TERMINATE OR P_TASK = GMO_CONSTANTS_GRP.ACTION_UNRELEASE) THEN
2330:
2331: ELSIF (P_ENTITY_NAME = GMO_CONSTANTS_GRP.ENTITY_OPERATION) THEN
2332:
2333: IF (P_TASK = GMO_CONSTANTS_GRP.ACTION_DELETE_OPERATION OR P_TASK = GMO_CONSTANTS_GRP.ACTION_UNRELEASE) THEN
2327: end if;
2328:
2329: END IF; -- end IF (P_TASK = GMO_CONSTANTS_GRP.ACTION_TERMINATE OR P_TASK = GMO_CONSTANTS_GRP.ACTION_UNRELEASE) THEN
2330:
2331: ELSIF (P_ENTITY_NAME = GMO_CONSTANTS_GRP.ENTITY_OPERATION) THEN
2332:
2333: IF (P_TASK = GMO_CONSTANTS_GRP.ACTION_DELETE_OPERATION OR P_TASK = GMO_CONSTANTS_GRP.ACTION_UNRELEASE) THEN
2334:
2335: l_batchstep_id := p_entity_key;
2329: END IF; -- end IF (P_TASK = GMO_CONSTANTS_GRP.ACTION_TERMINATE OR P_TASK = GMO_CONSTANTS_GRP.ACTION_UNRELEASE) THEN
2330:
2331: ELSIF (P_ENTITY_NAME = GMO_CONSTANTS_GRP.ENTITY_OPERATION) THEN
2332:
2333: IF (P_TASK = GMO_CONSTANTS_GRP.ACTION_DELETE_OPERATION OR P_TASK = GMO_CONSTANTS_GRP.ACTION_UNRELEASE) THEN
2334:
2335: l_batchstep_id := p_entity_key;
2336: gmo_instruction_grp.NULLIFY_INSTR_FOR_ENTITY (
2337: P_API_VERSION => 1.0,
2337: P_API_VERSION => 1.0,
2338: X_RETURN_STATUS => l_return_status,
2339: X_MSG_COUNT => l_msg_count,
2340: X_MSG_DATA => l_msg_data,
2341: P_ENTITY_NAME => GMO_CONSTANTS_GRP.ENTITY_OPERATION,
2342: P_ENTITY_KEY => l_batchstep_id,
2343: P_INSTRUCTION_TYPE => GMO_CONSTANTS_GRP.VBATCH_INSTRUCTION_TYPE
2344: );
2345:
2339: X_MSG_COUNT => l_msg_count,
2340: X_MSG_DATA => l_msg_data,
2341: P_ENTITY_NAME => GMO_CONSTANTS_GRP.ENTITY_OPERATION,
2342: P_ENTITY_KEY => l_batchstep_id,
2343: P_INSTRUCTION_TYPE => GMO_CONSTANTS_GRP.VBATCH_INSTRUCTION_TYPE
2344: );
2345:
2346: if l_RETURN_STATUS <> FND_API.G_RET_STS_SUCCESS THEN
2347: RAISE instruction_nullify_err;
2346: if l_RETURN_STATUS <> FND_API.G_RET_STS_SUCCESS THEN
2347: RAISE instruction_nullify_err;
2348: end if;
2349:
2350: IF (P_TASK = GMO_CONSTANTS_GRP.ACTION_UNRELEASE) THEN
2351:
2352:
2353: gmo_instruction_grp.create_instance_from_instance (
2354: P_API_VERSION => 1.0,
2354: P_API_VERSION => 1.0,
2355: X_RETURN_STATUS => l_return_status,
2356: X_MSG_COUNT => l_msg_count,
2357: X_MSG_DATA => l_msg_data,
2358: P_SOURCE_ENTITY_NAME => GMO_CONSTANTS_GRP.ENTITY_OPERATION,
2359: P_SOURCE_ENTITY_KEY => l_batchstep_id,
2360: P_TARGET_ENTITY_KEY => l_batchstep_id,
2361: P_INSTRUCTION_TYPE => GMO_CONSTANTS_GRP.VBATCH_INSTRUCTION_TYPE,
2362: X_INSTRUCTION_SET_ID => l_instruction_set_id
2357: X_MSG_DATA => l_msg_data,
2358: P_SOURCE_ENTITY_NAME => GMO_CONSTANTS_GRP.ENTITY_OPERATION,
2359: P_SOURCE_ENTITY_KEY => l_batchstep_id,
2360: P_TARGET_ENTITY_KEY => l_batchstep_id,
2361: P_INSTRUCTION_TYPE => GMO_CONSTANTS_GRP.VBATCH_INSTRUCTION_TYPE,
2362: X_INSTRUCTION_SET_ID => l_instruction_set_id
2363: );
2364: if l_RETURN_STATUS <> FND_API.G_RET_STS_SUCCESS THEN
2365: RAISE instruction_create_err;
2376: P_API_VERSION => 1.0,
2377: X_RETURN_STATUS => l_return_status,
2378: X_MSG_COUNT => l_msg_count,
2379: X_MSG_DATA => l_msg_data,
2380: P_ENTITY_NAME => GMO_CONSTANTS_GRP.ENTITY_MATERIAL,
2381: P_ENTITY_KEY => l_material_detail_id,
2382: P_INSTRUCTION_TYPE => GMO_CONSTANTS_GRP.VBATCH_INSTRUCTION_TYPE
2383: );
2384:
2378: X_MSG_COUNT => l_msg_count,
2379: X_MSG_DATA => l_msg_data,
2380: P_ENTITY_NAME => GMO_CONSTANTS_GRP.ENTITY_MATERIAL,
2381: P_ENTITY_KEY => l_material_detail_id,
2382: P_INSTRUCTION_TYPE => GMO_CONSTANTS_GRP.VBATCH_INSTRUCTION_TYPE
2383: );
2384:
2385: if l_RETURN_STATUS <> FND_API.G_RET_STS_SUCCESS THEN
2386: RAISE instruction_nullify_err;
2385: if l_RETURN_STATUS <> FND_API.G_RET_STS_SUCCESS THEN
2386: RAISE instruction_nullify_err;
2387: end if;
2388:
2389: IF (P_TASK = GMO_CONSTANTS_GRP.ACTION_UNRELEASE) THEN
2390: gmo_instruction_grp.create_instance_from_instance (
2391: P_API_VERSION => 1.0,
2392: X_RETURN_STATUS => l_return_status,
2393: X_MSG_COUNT => l_msg_count,
2391: P_API_VERSION => 1.0,
2392: X_RETURN_STATUS => l_return_status,
2393: X_MSG_COUNT => l_msg_count,
2394: X_MSG_DATA => l_msg_data,
2395: P_SOURCE_ENTITY_NAME => GMO_CONSTANTS_GRP.ENTITY_MATERIAL,
2396: P_SOURCE_ENTITY_KEY => l_material_detail_id,
2397: P_TARGET_ENTITY_KEY => l_material_detail_id,
2398: P_INSTRUCTION_TYPE => GMO_CONSTANTS_GRP.VBATCH_INSTRUCTION_TYPE,
2399: X_INSTRUCTION_SET_ID => l_instruction_set_id
2394: X_MSG_DATA => l_msg_data,
2395: P_SOURCE_ENTITY_NAME => GMO_CONSTANTS_GRP.ENTITY_MATERIAL,
2396: P_SOURCE_ENTITY_KEY => l_material_detail_id,
2397: P_TARGET_ENTITY_KEY => l_material_detail_id,
2398: P_INSTRUCTION_TYPE => GMO_CONSTANTS_GRP.VBATCH_INSTRUCTION_TYPE,
2399: X_INSTRUCTION_SET_ID => l_instruction_set_id
2400: );
2401: if l_RETURN_STATUS <> FND_API.G_RET_STS_SUCCESS THEN
2402: RAISE instruction_create_err;
2416: P_API_VERSION => 1.0,
2417: X_RETURN_STATUS => l_return_status,
2418: X_MSG_COUNT => l_msg_count,
2419: X_MSG_DATA => l_msg_data,
2420: P_ENTITY_NAME => GMO_CONSTANTS_GRP.ENTITY_ACTIVITY,
2421: P_ENTITY_KEY => l_batchstep_activity_id,
2422: P_INSTRUCTION_TYPE => GMO_CONSTANTS_GRP.VBATCH_INSTRUCTION_TYPE
2423: );
2424:
2418: X_MSG_COUNT => l_msg_count,
2419: X_MSG_DATA => l_msg_data,
2420: P_ENTITY_NAME => GMO_CONSTANTS_GRP.ENTITY_ACTIVITY,
2421: P_ENTITY_KEY => l_batchstep_activity_id,
2422: P_INSTRUCTION_TYPE => GMO_CONSTANTS_GRP.VBATCH_INSTRUCTION_TYPE
2423: );
2424:
2425: if l_RETURN_STATUS <> FND_API.G_RET_STS_SUCCESS THEN
2426: RAISE instruction_nullify_err;
2425: if l_RETURN_STATUS <> FND_API.G_RET_STS_SUCCESS THEN
2426: RAISE instruction_nullify_err;
2427: end if;
2428:
2429: IF (P_TASK = GMO_CONSTANTS_GRP.ACTION_UNRELEASE) THEN
2430: gmo_instruction_grp.create_instance_from_instance (
2431: P_API_VERSION => 1.0,
2432: X_RETURN_STATUS => l_return_status,
2433: X_MSG_COUNT => l_msg_count,
2431: P_API_VERSION => 1.0,
2432: X_RETURN_STATUS => l_return_status,
2433: X_MSG_COUNT => l_msg_count,
2434: X_MSG_DATA => l_msg_data,
2435: P_SOURCE_ENTITY_NAME => GMO_CONSTANTS_GRP.ENTITY_ACTIVITY,
2436: P_SOURCE_ENTITY_KEY => l_batchstep_activity_id,
2437: P_TARGET_ENTITY_KEY => l_batchstep_activity_id,
2438: P_INSTRUCTION_TYPE => GMO_CONSTANTS_GRP.VBATCH_INSTRUCTION_TYPE,
2439: X_INSTRUCTION_SET_ID => l_instruction_set_id
2434: X_MSG_DATA => l_msg_data,
2435: P_SOURCE_ENTITY_NAME => GMO_CONSTANTS_GRP.ENTITY_ACTIVITY,
2436: P_SOURCE_ENTITY_KEY => l_batchstep_activity_id,
2437: P_TARGET_ENTITY_KEY => l_batchstep_activity_id,
2438: P_INSTRUCTION_TYPE => GMO_CONSTANTS_GRP.VBATCH_INSTRUCTION_TYPE,
2439: X_INSTRUCTION_SET_ID => l_instruction_set_id
2440: );
2441: if l_RETURN_STATUS <> FND_API.G_RET_STS_SUCCESS THEN
2442: RAISE instruction_create_err;
2455: P_API_VERSION => 1.0,
2456: X_RETURN_STATUS => l_return_status,
2457: X_MSG_COUNT => l_msg_count,
2458: X_MSG_DATA => l_msg_data,
2459: P_ENTITY_NAME => GMO_CONSTANTS_GRP.ENTITY_RESOURCE,
2460: P_ENTITY_KEY => l_batchstep_resource_id,
2461: P_INSTRUCTION_TYPE => GMO_CONSTANTS_GRP.VBATCH_INSTRUCTION_TYPE
2462: );
2463:
2457: X_MSG_COUNT => l_msg_count,
2458: X_MSG_DATA => l_msg_data,
2459: P_ENTITY_NAME => GMO_CONSTANTS_GRP.ENTITY_RESOURCE,
2460: P_ENTITY_KEY => l_batchstep_resource_id,
2461: P_INSTRUCTION_TYPE => GMO_CONSTANTS_GRP.VBATCH_INSTRUCTION_TYPE
2462: );
2463:
2464: if l_RETURN_STATUS <> FND_API.G_RET_STS_SUCCESS THEN
2465: RAISE instruction_nullify_err;
2464: if l_RETURN_STATUS <> FND_API.G_RET_STS_SUCCESS THEN
2465: RAISE instruction_nullify_err;
2466: end if;
2467:
2468: IF (P_TASK = GMO_CONSTANTS_GRP.ACTION_UNRELEASE) THEN
2469: gmo_instruction_grp.create_instance_from_instance (
2470: P_API_VERSION => 1.0,
2471: X_RETURN_STATUS => l_return_status,
2472: X_MSG_COUNT => l_msg_count,
2470: P_API_VERSION => 1.0,
2471: X_RETURN_STATUS => l_return_status,
2472: X_MSG_COUNT => l_msg_count,
2473: X_MSG_DATA => l_msg_data,
2474: P_SOURCE_ENTITY_NAME => GMO_CONSTANTS_GRP.ENTITY_RESOURCE,
2475: P_SOURCE_ENTITY_KEY => l_batchstep_resource_id,
2476: P_TARGET_ENTITY_KEY => l_batchstep_resource_id,
2477: P_INSTRUCTION_TYPE => GMO_CONSTANTS_GRP.VBATCH_INSTRUCTION_TYPE,
2478: X_INSTRUCTION_SET_ID => l_instruction_set_id
2473: X_MSG_DATA => l_msg_data,
2474: P_SOURCE_ENTITY_NAME => GMO_CONSTANTS_GRP.ENTITY_RESOURCE,
2475: P_SOURCE_ENTITY_KEY => l_batchstep_resource_id,
2476: P_TARGET_ENTITY_KEY => l_batchstep_resource_id,
2477: P_INSTRUCTION_TYPE => GMO_CONSTANTS_GRP.VBATCH_INSTRUCTION_TYPE,
2478: X_INSTRUCTION_SET_ID => l_instruction_set_id
2479: );
2480: if l_RETURN_STATUS <> FND_API.G_RET_STS_SUCCESS THEN
2481: RAISE instruction_create_err;
2484:
2485: end loop;
2486: close c_get_step_resources;
2487:
2488: ELSIF (P_TASK = GMO_CONSTANTS_GRP.ACTION_DELETE_ACTIVITY) THEN
2489:
2490: l_batchstep_activity_id := P_TASK_ATTRIBUTE;
2491: gmo_instruction_grp.NULLIFY_INSTR_FOR_ENTITY (
2492: P_API_VERSION => 1.0,
2492: P_API_VERSION => 1.0,
2493: X_RETURN_STATUS => l_return_status,
2494: X_MSG_COUNT => l_msg_count,
2495: X_MSG_DATA => l_msg_data,
2496: P_ENTITY_NAME => GMO_CONSTANTS_GRP.ENTITY_ACTIVITY,
2497: P_ENTITY_KEY => l_batchstep_activity_id,
2498: P_INSTRUCTION_TYPE => GMO_CONSTANTS_GRP.VBATCH_INSTRUCTION_TYPE
2499: );
2500:
2494: X_MSG_COUNT => l_msg_count,
2495: X_MSG_DATA => l_msg_data,
2496: P_ENTITY_NAME => GMO_CONSTANTS_GRP.ENTITY_ACTIVITY,
2497: P_ENTITY_KEY => l_batchstep_activity_id,
2498: P_INSTRUCTION_TYPE => GMO_CONSTANTS_GRP.VBATCH_INSTRUCTION_TYPE
2499: );
2500:
2501: if l_RETURN_STATUS <> FND_API.G_RET_STS_SUCCESS THEN
2502: RAISE instruction_nullify_err;
2511: P_API_VERSION => 1.0,
2512: X_RETURN_STATUS => l_return_status,
2513: X_MSG_COUNT => l_msg_count,
2514: X_MSG_DATA => l_msg_data,
2515: P_ENTITY_NAME => GMO_CONSTANTS_GRP.ENTITY_RESOURCE,
2516: P_ENTITY_KEY => l_batchstep_resource_id,
2517: P_INSTRUCTION_TYPE => GMO_CONSTANTS_GRP.VBATCH_INSTRUCTION_TYPE
2518: );
2519:
2513: X_MSG_COUNT => l_msg_count,
2514: X_MSG_DATA => l_msg_data,
2515: P_ENTITY_NAME => GMO_CONSTANTS_GRP.ENTITY_RESOURCE,
2516: P_ENTITY_KEY => l_batchstep_resource_id,
2517: P_INSTRUCTION_TYPE => GMO_CONSTANTS_GRP.VBATCH_INSTRUCTION_TYPE
2518: );
2519:
2520: if l_RETURN_STATUS <> FND_API.G_RET_STS_SUCCESS THEN
2521: RAISE instruction_nullify_err;
2523:
2524: end loop;
2525: close c_get_activity_resources;
2526:
2527: ELSIF (P_TASK = GMO_CONSTANTS_GRP.ACTION_DELETE_RESOURCE) THEN
2528:
2529: l_batchstep_resource_id := P_TASK_ATTRIBUTE;
2530: gmo_instruction_grp.NULLIFY_INSTR_FOR_ENTITY (
2531: P_API_VERSION => 1.0,
2531: P_API_VERSION => 1.0,
2532: X_RETURN_STATUS => l_return_status,
2533: X_MSG_COUNT => l_msg_count,
2534: X_MSG_DATA => l_msg_data,
2535: P_ENTITY_NAME => GMO_CONSTANTS_GRP.ENTITY_RESOURCE,
2536: P_ENTITY_KEY => l_batchstep_resource_id,
2537: P_INSTRUCTION_TYPE => GMO_CONSTANTS_GRP.VBATCH_INSTRUCTION_TYPE
2538: );
2539:
2533: X_MSG_COUNT => l_msg_count,
2534: X_MSG_DATA => l_msg_data,
2535: P_ENTITY_NAME => GMO_CONSTANTS_GRP.ENTITY_RESOURCE,
2536: P_ENTITY_KEY => l_batchstep_resource_id,
2537: P_INSTRUCTION_TYPE => GMO_CONSTANTS_GRP.VBATCH_INSTRUCTION_TYPE
2538: );
2539:
2540: if l_RETURN_STATUS <> FND_API.G_RET_STS_SUCCESS THEN
2541: RAISE instruction_nullify_err;
2540: if l_RETURN_STATUS <> FND_API.G_RET_STS_SUCCESS THEN
2541: RAISE instruction_nullify_err;
2542: end if;
2543:
2544: ELSIF (P_TASK = GMO_CONSTANTS_GRP.ACTION_DELETE_MATERIAL) THEN
2545:
2546: l_material_detail_id := P_TASK_ATTRIBUTE;
2547: gmo_instruction_grp.NULLIFY_INSTR_FOR_ENTITY (
2548: P_API_VERSION => 1.0,
2548: P_API_VERSION => 1.0,
2549: X_RETURN_STATUS => l_return_status,
2550: X_MSG_COUNT => l_msg_count,
2551: X_MSG_DATA => l_msg_data,
2552: P_ENTITY_NAME => GMO_CONSTANTS_GRP.ENTITY_MATERIAL,
2553: P_ENTITY_KEY => l_material_detail_id,
2554: P_INSTRUCTION_TYPE => GMO_CONSTANTS_GRP.VBATCH_INSTRUCTION_TYPE
2555: );
2556:
2550: X_MSG_COUNT => l_msg_count,
2551: X_MSG_DATA => l_msg_data,
2552: P_ENTITY_NAME => GMO_CONSTANTS_GRP.ENTITY_MATERIAL,
2553: P_ENTITY_KEY => l_material_detail_id,
2554: P_INSTRUCTION_TYPE => GMO_CONSTANTS_GRP.VBATCH_INSTRUCTION_TYPE
2555: );
2556:
2557: if l_RETURN_STATUS <> FND_API.G_RET_STS_SUCCESS THEN
2558: RAISE instruction_nullify_err;
2660: FND_LOG.MESSAGE(FND_LOG.LEVEL_EVENT,'gmo.plsql.gmo_vbatch_pvt.on_task_save', FALSE);
2661: end if;
2662:
2663:
2664: IF (P_FROM_MODULE = GMO_CONSTANTS_GRP.FROM_MODULE_PI) THEN
2665:
2666: gmo_instruction_grp.SEND_TASK_ACKN (
2667: P_API_VERSION => 1.0,
2668: X_RETURN_STATUS => l_return_status,
2673: P_ENTITY_KEY => P_ENTITY_KEY,
2674: P_TASK_ERECORD_ID => P_TASK_ERECORD,
2675: P_TASK_IDENTIFIER => P_TASK_IDENTIFIER,
2676: P_TASK_VALUE => P_TASK_VALUE,
2677: P_DISABLE_TASK => GMO_CONSTANTS_GRP.DISABLE_TASK_NO
2678: );
2679:
2680:
2681: if l_RETURN_STATUS <> FND_API.G_RET_STS_SUCCESS THEN
2760: IF (NOT IS_BATCH_ENHANCED_PI (P_ENTITY_NAME => P_ENTITY_NAME, P_ENTITY_KEY => P_ENTITY_KEY) ) THEN
2761: RAISE GMO_NOT_ENHANCED_PI_ERR;
2762: END IF;
2763:
2764: IF (P_ENTITY_NAME = GMO_CONSTANTS_GRP.ENTITY_OPERATION) THEN
2765: l_batchstep_id := P_ENTITY_KEY;
2766: ELSIF (P_ENTITY_NAME = GMO_CONSTANTS_GRP.ENTITY_ACTIVITY) THEN
2767: open get_step_id_for_activity;
2768: fetch get_step_id_for_activity into l_batchstep_id;
2762: END IF;
2763:
2764: IF (P_ENTITY_NAME = GMO_CONSTANTS_GRP.ENTITY_OPERATION) THEN
2765: l_batchstep_id := P_ENTITY_KEY;
2766: ELSIF (P_ENTITY_NAME = GMO_CONSTANTS_GRP.ENTITY_ACTIVITY) THEN
2767: open get_step_id_for_activity;
2768: fetch get_step_id_for_activity into l_batchstep_id;
2769: close get_step_id_for_activity;
2770: ELSIF (P_ENTITY_NAME = GMO_CONSTANTS_GRP.ENTITY_RESOURCE) THEN
2766: ELSIF (P_ENTITY_NAME = GMO_CONSTANTS_GRP.ENTITY_ACTIVITY) THEN
2767: open get_step_id_for_activity;
2768: fetch get_step_id_for_activity into l_batchstep_id;
2769: close get_step_id_for_activity;
2770: ELSIF (P_ENTITY_NAME = GMO_CONSTANTS_GRP.ENTITY_RESOURCE) THEN
2771: open get_step_id_for_resource;
2772: fetch get_step_id_for_resource into l_batchstep_id;
2773: close get_step_id_for_resource;
2774: ELSIF (P_ENTITY_NAME = GMO_CONSTANTS_GRP.ENTITY_MATERIAL) THEN
2770: ELSIF (P_ENTITY_NAME = GMO_CONSTANTS_GRP.ENTITY_RESOURCE) THEN
2771: open get_step_id_for_resource;
2772: fetch get_step_id_for_resource into l_batchstep_id;
2773: close get_step_id_for_resource;
2774: ELSIF (P_ENTITY_NAME = GMO_CONSTANTS_GRP.ENTITY_MATERIAL) THEN
2775: open get_step_id_for_material;
2776: fetch get_step_id_for_material into l_batchstep_id;
2777: close get_step_id_for_material;
2778: ELSE
2787: fetch is_step_locked into l_count;
2788: close is_step_locked;
2789:
2790: IF (l_count = 0) THEN
2791: X_LOCK_STATUS := GMO_CONSTANTS_GRP.NO;
2792: ELSE
2793: X_LOCK_STATUS := GMO_CONSTANTS_GRP.YES;
2794: END IF;
2795:
2789:
2790: IF (l_count = 0) THEN
2791: X_LOCK_STATUS := GMO_CONSTANTS_GRP.NO;
2792: ELSE
2793: X_LOCK_STATUS := GMO_CONSTANTS_GRP.YES;
2794: END IF;
2795:
2796: open is_step_locked_by;
2797: fetch is_step_locked_by into l_count;
2797: fetch is_step_locked_by into l_count;
2798: close is_step_locked_by;
2799:
2800: IF (l_count = 0) THEN
2801: X_LOCKED_BY_STATUS := GMO_CONSTANTS_GRP.NO;
2802: ELSE
2803: X_LOCKED_BY_STATUS := GMO_CONSTANTS_GRP.YES;
2804: END IF;
2805:
2799:
2800: IF (l_count = 0) THEN
2801: X_LOCKED_BY_STATUS := GMO_CONSTANTS_GRP.NO;
2802: ELSE
2803: X_LOCKED_BY_STATUS := GMO_CONSTANTS_GRP.YES;
2804: END IF;
2805:
2806: open get_step_detail;
2807: fetch get_step_detail into l_step_status;
2806: open get_step_detail;
2807: fetch get_step_detail into l_step_status;
2808: close get_step_detail;
2809:
2810: IF (l_step_status = GMO_CONSTANTS_GRP.STEP_WIP_STATUS and X_LOCKED_BY_STATUS <> GMO_CONSTANTS_GRP.YES and X_LOCK_STATUS <> GMO_CONSTANTS_GRP.YES) THEN
2811: X_LOCK_ALLOWED := GMO_CONSTANTS_GRP.YES;
2812: ELSE
2813: X_LOCK_ALLOWED := GMO_CONSTANTS_GRP.NO;
2814: END IF;
2807: fetch get_step_detail into l_step_status;
2808: close get_step_detail;
2809:
2810: IF (l_step_status = GMO_CONSTANTS_GRP.STEP_WIP_STATUS and X_LOCKED_BY_STATUS <> GMO_CONSTANTS_GRP.YES and X_LOCK_STATUS <> GMO_CONSTANTS_GRP.YES) THEN
2811: X_LOCK_ALLOWED := GMO_CONSTANTS_GRP.YES;
2812: ELSE
2813: X_LOCK_ALLOWED := GMO_CONSTANTS_GRP.NO;
2814: END IF;
2815:
2809:
2810: IF (l_step_status = GMO_CONSTANTS_GRP.STEP_WIP_STATUS and X_LOCKED_BY_STATUS <> GMO_CONSTANTS_GRP.YES and X_LOCK_STATUS <> GMO_CONSTANTS_GRP.YES) THEN
2811: X_LOCK_ALLOWED := GMO_CONSTANTS_GRP.YES;
2812: ELSE
2813: X_LOCK_ALLOWED := GMO_CONSTANTS_GRP.NO;
2814: END IF;
2815:
2816: if (FND_LOG.LEVEL_EVENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
2817: FND_MESSAGE.SET_NAME('GMO','GMO_VBATCH_ENTITY_LOCK_MSG');
2951: t_entity_level.extend;
2952: l_counter := l_counter + 1;
2953:
2954: t_name(l_counter) := l_oprn_no;
2955: t_entity_name(l_counter) := GMO_CONSTANTS_GRP.ENTITY_OPERATION;
2956: t_entity_key(l_counter) := l_batchstep_id;
2957: t_entity_level(l_counter) := '1';
2958:
2959:
2969: t_entity_level.extend;
2970: l_counter := l_counter + 1;
2971:
2972: t_name(l_counter) := l_material_desc;
2973: t_entity_name(l_counter) := GMO_CONSTANTS_GRP.ENTITY_MATERIAL;
2974: t_entity_key(l_counter) := l_material_detail_id;
2975: t_entity_level(l_counter) := '2';
2976:
2977:
2989: t_entity_level.extend;
2990: l_counter := l_counter + 1;
2991:
2992: t_name(l_counter) := l_activity;
2993: t_entity_name(l_counter) := GMO_CONSTANTS_GRP.ENTITY_ACTIVITY;
2994: t_entity_key(l_counter) := l_batchstep_activity_id;
2995: t_entity_level(l_counter) := '2';
2996:
2997:
3006: t_entity_level.extend;
3007: l_counter := l_counter + 1;
3008:
3009: t_name(l_counter) := l_resources;
3010: t_entity_name(l_counter) := GMO_CONSTANTS_GRP.ENTITY_RESOURCE;
3011: t_entity_key(l_counter) := l_batchstep_resource_id;
3012: t_entity_level(l_counter) := '3';
3013:
3014:
3141: P_API_VERSION => 1.0,
3142: X_RETURN_STATUS => l_return_status,
3143: X_MSG_COUNT => l_msg_count,
3144: X_MSG_DATA => l_msg_data,
3145: P_DEFINITION_ENTITY_NAME => GMO_CONSTANTS_GRP.ENTITY_OPERATION,
3146: P_DEFINITION_ENTITY_KEY => l_routingstep_id || GMO_CONSTANTS_GRP.ENTITY_KEY_SEPARATOR || l_oprn_id,
3147: P_INSTANCE_ENTITY_NAME => GMO_CONSTANTS_GRP.ENTITY_OPERATION,
3148: P_INSTANCE_ENTITY_KEY => l_batchstep_id,
3149: P_INSTRUCTION_TYPE => GMO_CONSTANTS_GRP.VBATCH_INSTRUCTION_TYPE,
3142: X_RETURN_STATUS => l_return_status,
3143: X_MSG_COUNT => l_msg_count,
3144: X_MSG_DATA => l_msg_data,
3145: P_DEFINITION_ENTITY_NAME => GMO_CONSTANTS_GRP.ENTITY_OPERATION,
3146: P_DEFINITION_ENTITY_KEY => l_routingstep_id || GMO_CONSTANTS_GRP.ENTITY_KEY_SEPARATOR || l_oprn_id,
3147: P_INSTANCE_ENTITY_NAME => GMO_CONSTANTS_GRP.ENTITY_OPERATION,
3148: P_INSTANCE_ENTITY_KEY => l_batchstep_id,
3149: P_INSTRUCTION_TYPE => GMO_CONSTANTS_GRP.VBATCH_INSTRUCTION_TYPE,
3150: X_INSTRUCTION_SET_ID => l_instruction_set_id
3143: X_MSG_COUNT => l_msg_count,
3144: X_MSG_DATA => l_msg_data,
3145: P_DEFINITION_ENTITY_NAME => GMO_CONSTANTS_GRP.ENTITY_OPERATION,
3146: P_DEFINITION_ENTITY_KEY => l_routingstep_id || GMO_CONSTANTS_GRP.ENTITY_KEY_SEPARATOR || l_oprn_id,
3147: P_INSTANCE_ENTITY_NAME => GMO_CONSTANTS_GRP.ENTITY_OPERATION,
3148: P_INSTANCE_ENTITY_KEY => l_batchstep_id,
3149: P_INSTRUCTION_TYPE => GMO_CONSTANTS_GRP.VBATCH_INSTRUCTION_TYPE,
3150: X_INSTRUCTION_SET_ID => l_instruction_set_id
3151: );
3145: P_DEFINITION_ENTITY_NAME => GMO_CONSTANTS_GRP.ENTITY_OPERATION,
3146: P_DEFINITION_ENTITY_KEY => l_routingstep_id || GMO_CONSTANTS_GRP.ENTITY_KEY_SEPARATOR || l_oprn_id,
3147: P_INSTANCE_ENTITY_NAME => GMO_CONSTANTS_GRP.ENTITY_OPERATION,
3148: P_INSTANCE_ENTITY_KEY => l_batchstep_id,
3149: P_INSTRUCTION_TYPE => GMO_CONSTANTS_GRP.VBATCH_INSTRUCTION_TYPE,
3150: X_INSTRUCTION_SET_ID => l_instruction_set_id
3151: );
3152:
3153: if l_RETURN_STATUS <> FND_API.G_RET_STS_SUCCESS THEN
3154: RAISE instruction_create_err;
3155: end if;
3156: update_task_attribute
3157: (
3158: P_ENTITY_NAME => GMO_CONSTANTS_GRP.ENTITY_OPERATION,
3159: P_ENTITY_KEY => l_batchstep_id,
3160: P_INSTRUCTION_SET_ID => l_instruction_set_id,
3161: X_ATTRIBUTE_STATUS => l_attribute_status,
3162: X_INVALID_INSTR => l_invalid_instr
3193: P_API_VERSION => 1.0,
3194: X_RETURN_STATUS => l_return_status,
3195: X_MSG_COUNT => l_msg_count,
3196: X_MSG_DATA => l_msg_data,
3197: P_DEFINITION_ENTITY_NAME => GMO_CONSTANTS_GRP.ENTITY_ACTIVITY,
3198: P_DEFINITION_ENTITY_KEY => l_routingstep_id || GMO_CONSTANTS_GRP.ENTITY_KEY_SEPARATOR || l_oprn_line_id,
3199: P_INSTANCE_ENTITY_NAME => GMO_CONSTANTS_GRP.ENTITY_ACTIVITY,
3200: P_INSTANCE_ENTITY_KEY => l_batchstep_activity_id,
3201: P_INSTRUCTION_TYPE => GMO_CONSTANTS_GRP.VBATCH_INSTRUCTION_TYPE,
3194: X_RETURN_STATUS => l_return_status,
3195: X_MSG_COUNT => l_msg_count,
3196: X_MSG_DATA => l_msg_data,
3197: P_DEFINITION_ENTITY_NAME => GMO_CONSTANTS_GRP.ENTITY_ACTIVITY,
3198: P_DEFINITION_ENTITY_KEY => l_routingstep_id || GMO_CONSTANTS_GRP.ENTITY_KEY_SEPARATOR || l_oprn_line_id,
3199: P_INSTANCE_ENTITY_NAME => GMO_CONSTANTS_GRP.ENTITY_ACTIVITY,
3200: P_INSTANCE_ENTITY_KEY => l_batchstep_activity_id,
3201: P_INSTRUCTION_TYPE => GMO_CONSTANTS_GRP.VBATCH_INSTRUCTION_TYPE,
3202: X_INSTRUCTION_SET_ID => l_instruction_set_id
3195: X_MSG_COUNT => l_msg_count,
3196: X_MSG_DATA => l_msg_data,
3197: P_DEFINITION_ENTITY_NAME => GMO_CONSTANTS_GRP.ENTITY_ACTIVITY,
3198: P_DEFINITION_ENTITY_KEY => l_routingstep_id || GMO_CONSTANTS_GRP.ENTITY_KEY_SEPARATOR || l_oprn_line_id,
3199: P_INSTANCE_ENTITY_NAME => GMO_CONSTANTS_GRP.ENTITY_ACTIVITY,
3200: P_INSTANCE_ENTITY_KEY => l_batchstep_activity_id,
3201: P_INSTRUCTION_TYPE => GMO_CONSTANTS_GRP.VBATCH_INSTRUCTION_TYPE,
3202: X_INSTRUCTION_SET_ID => l_instruction_set_id
3203: );
3197: P_DEFINITION_ENTITY_NAME => GMO_CONSTANTS_GRP.ENTITY_ACTIVITY,
3198: P_DEFINITION_ENTITY_KEY => l_routingstep_id || GMO_CONSTANTS_GRP.ENTITY_KEY_SEPARATOR || l_oprn_line_id,
3199: P_INSTANCE_ENTITY_NAME => GMO_CONSTANTS_GRP.ENTITY_ACTIVITY,
3200: P_INSTANCE_ENTITY_KEY => l_batchstep_activity_id,
3201: P_INSTRUCTION_TYPE => GMO_CONSTANTS_GRP.VBATCH_INSTRUCTION_TYPE,
3202: X_INSTRUCTION_SET_ID => l_instruction_set_id
3203: );
3204:
3205: if l_RETURN_STATUS <> FND_API.G_RET_STS_SUCCESS THEN
3207: end if;
3208:
3209: update_task_attribute
3210: (
3211: P_ENTITY_NAME => GMO_CONSTANTS_GRP.ENTITY_ACTIVITY,
3212: P_ENTITY_KEY => l_batchstep_activity_id,
3213: P_INSTRUCTION_SET_ID => l_instruction_set_id,
3214: X_ATTRIBUTE_STATUS => l_attribute_status,
3215: X_INVALID_INSTR => l_invalid_instr
3246: P_API_VERSION => 1.0,
3247: X_RETURN_STATUS => l_return_status,
3248: X_MSG_COUNT => l_msg_count,
3249: X_MSG_DATA => l_msg_data,
3250: P_DEFINITION_ENTITY_NAME => GMO_CONSTANTS_GRP.ENTITY_RESOURCE,
3251: P_DEFINITION_ENTITY_KEY => l_routingstep_id || GMO_CONSTANTS_GRP.ENTITY_KEY_SEPARATOR || l_oprn_line_id || GMO_CONSTANTS_GRP.ENTITY_KEY_SEPARATOR || l_resources,
3252: P_INSTANCE_ENTITY_NAME => GMO_CONSTANTS_GRP.ENTITY_RESOURCE,
3253: P_INSTANCE_ENTITY_KEY => l_batchstep_resource_id,
3254: P_INSTRUCTION_TYPE => GMO_CONSTANTS_GRP.VBATCH_INSTRUCTION_TYPE,
3247: X_RETURN_STATUS => l_return_status,
3248: X_MSG_COUNT => l_msg_count,
3249: X_MSG_DATA => l_msg_data,
3250: P_DEFINITION_ENTITY_NAME => GMO_CONSTANTS_GRP.ENTITY_RESOURCE,
3251: P_DEFINITION_ENTITY_KEY => l_routingstep_id || GMO_CONSTANTS_GRP.ENTITY_KEY_SEPARATOR || l_oprn_line_id || GMO_CONSTANTS_GRP.ENTITY_KEY_SEPARATOR || l_resources,
3252: P_INSTANCE_ENTITY_NAME => GMO_CONSTANTS_GRP.ENTITY_RESOURCE,
3253: P_INSTANCE_ENTITY_KEY => l_batchstep_resource_id,
3254: P_INSTRUCTION_TYPE => GMO_CONSTANTS_GRP.VBATCH_INSTRUCTION_TYPE,
3255: X_INSTRUCTION_SET_ID => l_instruction_set_id
3248: X_MSG_COUNT => l_msg_count,
3249: X_MSG_DATA => l_msg_data,
3250: P_DEFINITION_ENTITY_NAME => GMO_CONSTANTS_GRP.ENTITY_RESOURCE,
3251: P_DEFINITION_ENTITY_KEY => l_routingstep_id || GMO_CONSTANTS_GRP.ENTITY_KEY_SEPARATOR || l_oprn_line_id || GMO_CONSTANTS_GRP.ENTITY_KEY_SEPARATOR || l_resources,
3252: P_INSTANCE_ENTITY_NAME => GMO_CONSTANTS_GRP.ENTITY_RESOURCE,
3253: P_INSTANCE_ENTITY_KEY => l_batchstep_resource_id,
3254: P_INSTRUCTION_TYPE => GMO_CONSTANTS_GRP.VBATCH_INSTRUCTION_TYPE,
3255: X_INSTRUCTION_SET_ID => l_instruction_set_id
3256: );
3250: P_DEFINITION_ENTITY_NAME => GMO_CONSTANTS_GRP.ENTITY_RESOURCE,
3251: P_DEFINITION_ENTITY_KEY => l_routingstep_id || GMO_CONSTANTS_GRP.ENTITY_KEY_SEPARATOR || l_oprn_line_id || GMO_CONSTANTS_GRP.ENTITY_KEY_SEPARATOR || l_resources,
3252: P_INSTANCE_ENTITY_NAME => GMO_CONSTANTS_GRP.ENTITY_RESOURCE,
3253: P_INSTANCE_ENTITY_KEY => l_batchstep_resource_id,
3254: P_INSTRUCTION_TYPE => GMO_CONSTANTS_GRP.VBATCH_INSTRUCTION_TYPE,
3255: X_INSTRUCTION_SET_ID => l_instruction_set_id
3256: );
3257:
3258: if l_RETURN_STATUS <> FND_API.G_RET_STS_SUCCESS THEN
3260: end if;
3261:
3262: update_task_attribute
3263: (
3264: P_ENTITY_NAME => GMO_CONSTANTS_GRP.ENTITY_RESOURCE,
3265: P_ENTITY_KEY => l_batchstep_resource_id,
3266: P_INSTRUCTION_SET_ID => l_instruction_set_id,
3267: X_ATTRIBUTE_STATUS => l_attribute_status,
3268: X_INVALID_INSTR => l_invalid_instr