[Home] [Help]
145: ', Identifier : '||l_identifier);
146: END IF;
147: -- Extend array size
148:
149: MSC_ATP_GLOBAL.Extend_ATP(l_atp_table, x_return_status);
150:
151: --Assign values to input record
152: l_atp_table.Inventory_Item_Id := Mrp_Atp_Pub.number_arr(p_inventory_item_id);
153: l_atp_table.Source_Organization_Id := Mrp_Atp_Pub.number_arr(p_organization_id);
246: END IF;
247: END IF;
248:
249: -- SKPATHAK :: Bug 12833742 :: 11-AUG-2011 :: Commented the below
250: --MSC_ATP_GLOBAL.Extend_ATP(x_atp_table, x_return_status);
251:
252: IF (l_log_statement >= l_log_current_level) THEN
253: fnd_log.string(l_log_statement,
254: L_DEBUG_KEY,
289: END IF;
290:
291: IF l_return_status = FND_API.G_RET_STS_SUCCESS THEN
292:
293: MSC_ATP_GLOBAL.Extend_ATP(x_atp_table, l_return_status);
294:
295: x_available_date := to_char(x_atp_table.Ship_Date(1));
296: --
297: MSC_ATP_GLOBAL.Extend_ATP(x_atp_table, l_return_status);
293: MSC_ATP_GLOBAL.Extend_ATP(x_atp_table, l_return_status);
294:
295: x_available_date := to_char(x_atp_table.Ship_Date(1));
296: --
297: MSC_ATP_GLOBAL.Extend_ATP(x_atp_table, l_return_status);
298:
299: IF x_atp_table.Error_code(1) IN (0,52,53) THEN
300:
301: MSC_ATP_GLOBAL.Extend_ATP(l_atp_table, x_return_status);
297: MSC_ATP_GLOBAL.Extend_ATP(x_atp_table, l_return_status);
298:
299: IF x_atp_table.Error_code(1) IN (0,52,53) THEN
300:
301: MSC_ATP_GLOBAL.Extend_ATP(l_atp_table, x_return_status);
302:
303: x_available_qty := trunc(x_atp_table.Available_Quantity(1));
304: x_error_code := x_atp_table.Error_code(1);
305:
320: L_DEBUG_KEY,
321: 'After Calling Mrp Atp Pub Error Message : '||x_error_message);
322: END IF;
323: ELSE
324: MSC_ATP_GLOBAL.Extend_ATP(x_atp_table, l_return_status);
325:
326: IF (l_log_statement >= l_log_current_level) THEN
327: fnd_log.string(l_log_statement,
328: L_DEBUG_KEY,
328: L_DEBUG_KEY,
329: 'After calling MSC EXTEND');
330: END IF;
331:
332: MSC_ATP_GLOBAL.Extend_ATP(l_atp_table, x_return_status);
333: x_error_code := x_atp_table.Error_code(1);
334:
335: x_available_qty := trunc(x_atp_table.Available_Quantity(1));
336:
1082: LOOP
1083: --
1084: IF l_planned_matrl_tbl.EXISTS(i) THEN
1085: --Call extend Atp
1086: MSC_ATP_GLOBAL.Extend_ATP(l_atp_table, x_return_status);
1087: --
1088: l_atp_table.inventory_item_id(i) := l_planned_matrl_tbl(i).inventory_item_id;
1089: l_atp_table.inventory_item_name(i) := l_planned_matrl_tbl(i).item_description;
1090: l_atp_table.instance_id(i) := l_instance_id;
1211: --Check for error code
1212: IF x_atp_table.Error_Code.COUNT > 0 THEN
1213: FOR i IN x_atp_table.Error_Code.FIRST .. x_atp_table.Error_Code.LAST
1214: LOOP
1215: MSC_ATP_GLOBAL.Extend_ATP(x_atp_table, x_return_status);
1216: IF (x_atp_table.Error_Code.EXISTS(i) AND x_atp_table.error_code(i) <> 0) THEN
1217: IF (l_log_statement >= l_log_current_level)THEN
1218: fnd_log.string(l_log_statement,
1219: L_DEBUG_KEY,
1218: fnd_log.string(l_log_statement,
1219: L_DEBUG_KEY,
1220: 'x_atp_table.error_code(i) : '||x_atp_table.error_code(i));
1221: END IF;
1222: MSC_ATP_GLOBAL.Extend_ATP(x_atp_table, x_return_status);
1223:
1224: --SKPATHAK :: Bug 8392521 :: 02-APR-2009
1225: --Update ahl_schedule_materials table with the ship_date even if the error is not zero
1226: IF (x_atp_table.ship_date(i) IS NOT NULL)THEN
1240: FETCH Error_Message_Cur INTO l_temp_atp_table(i).error_message;
1241: CLOSE Error_Message_Cur;
1242: ELSE
1243: --Error code is zero update the record
1244: MSC_ATP_GLOBAL.Extend_ATP(x_atp_table, x_return_status);
1245:
1246: IF (l_log_statement >= l_log_current_level)THEN
1247: fnd_log.string(l_log_statement,
1248: L_DEBUG_KEY,
2034: END IF;
2035: -- End changes by surrkuma on 11-JUN-2009 for the bug 9901811
2036:
2037: --Call extend Atp
2038: MSC_ATP_GLOBAL.Extend_ATP(l_atp_table, x_return_status);
2039: --
2040: l_atp_table.inventory_item_id(i) := p_deleted_matrl_tbl(i).inventory_item_id;
2041: l_atp_table.inventory_item_name(i) := p_deleted_matrl_tbl(i).item_description;
2042: l_atp_table.instance_id(i) := l_instance_id;