111:
112: EXCEPTION WHEN OTHERS THEN
113: retcode := G_ERROR;
114: errbuf := substr(SQLERRM,1,500);
115: MRP_UTIL.MRP_LOG('Error at '||l_stmt_num|| ' in Purge_Kanban_Card');
116:
117: End Purge_Kanban_Cards;
118:
119: PROCEDURE CHECK_RESTRICTIONS(
272:
273: EXCEPTION WHEN OTHERS THEN
274: retcode := G_ERROR;
275: errbuf := substr(SQLERRM,1,500);
276: MRP_UTIL.MRP_LOG('Error at '||l_stmt_num|| ' in Check_Restrictions');
277: End Check_Restrictions;
278:
279: PROCEDURE PURGE_KANBAN (
280: errbuf out NOCOPY varchar2,
334: l_group_id := arg_group_id;
335: retcode := G_SUCCESS;
336:
337:
338: MRP_UTIL.MRP_LOG('Org-id --> '||to_char(arg_org_id));
339: MRP_UTIL.MRP_LOG('Item From --> '||arg_item_from);
340: MRP_UTIL.MRP_LOG('Item To --> '||arg_item_to);
341: MRP_UTIL.MRP_LOG('Sub From --> '||arg_subinv_from);
342: MRP_UTIL.MRP_LOG('Sub To --> '||arg_subinv_to);
335: retcode := G_SUCCESS;
336:
337:
338: MRP_UTIL.MRP_LOG('Org-id --> '||to_char(arg_org_id));
339: MRP_UTIL.MRP_LOG('Item From --> '||arg_item_from);
340: MRP_UTIL.MRP_LOG('Item To --> '||arg_item_to);
341: MRP_UTIL.MRP_LOG('Sub From --> '||arg_subinv_from);
342: MRP_UTIL.MRP_LOG('Sub To --> '||arg_subinv_to);
343: MRP_UTIL.MRP_LOG('WIP Line --> '||to_char(arg_line_id));
336:
337:
338: MRP_UTIL.MRP_LOG('Org-id --> '||to_char(arg_org_id));
339: MRP_UTIL.MRP_LOG('Item From --> '||arg_item_from);
340: MRP_UTIL.MRP_LOG('Item To --> '||arg_item_to);
341: MRP_UTIL.MRP_LOG('Sub From --> '||arg_subinv_from);
342: MRP_UTIL.MRP_LOG('Sub To --> '||arg_subinv_to);
343: MRP_UTIL.MRP_LOG('WIP Line --> '||to_char(arg_line_id));
344: MRP_UTIL.MRP_LOG('Source Org --> '||to_char(arg_source_org_id));
337:
338: MRP_UTIL.MRP_LOG('Org-id --> '||to_char(arg_org_id));
339: MRP_UTIL.MRP_LOG('Item From --> '||arg_item_from);
340: MRP_UTIL.MRP_LOG('Item To --> '||arg_item_to);
341: MRP_UTIL.MRP_LOG('Sub From --> '||arg_subinv_from);
342: MRP_UTIL.MRP_LOG('Sub To --> '||arg_subinv_to);
343: MRP_UTIL.MRP_LOG('WIP Line --> '||to_char(arg_line_id));
344: MRP_UTIL.MRP_LOG('Source Org --> '||to_char(arg_source_org_id));
345: MRP_UTIL.MRP_LOG('Source Sub --> '||arg_source_subinv);
338: MRP_UTIL.MRP_LOG('Org-id --> '||to_char(arg_org_id));
339: MRP_UTIL.MRP_LOG('Item From --> '||arg_item_from);
340: MRP_UTIL.MRP_LOG('Item To --> '||arg_item_to);
341: MRP_UTIL.MRP_LOG('Sub From --> '||arg_subinv_from);
342: MRP_UTIL.MRP_LOG('Sub To --> '||arg_subinv_to);
343: MRP_UTIL.MRP_LOG('WIP Line --> '||to_char(arg_line_id));
344: MRP_UTIL.MRP_LOG('Source Org --> '||to_char(arg_source_org_id));
345: MRP_UTIL.MRP_LOG('Source Sub --> '||arg_source_subinv);
346: MRP_UTIL.MRP_LOG('Source type --> '||to_char(arg_source_type));
339: MRP_UTIL.MRP_LOG('Item From --> '||arg_item_from);
340: MRP_UTIL.MRP_LOG('Item To --> '||arg_item_to);
341: MRP_UTIL.MRP_LOG('Sub From --> '||arg_subinv_from);
342: MRP_UTIL.MRP_LOG('Sub To --> '||arg_subinv_to);
343: MRP_UTIL.MRP_LOG('WIP Line --> '||to_char(arg_line_id));
344: MRP_UTIL.MRP_LOG('Source Org --> '||to_char(arg_source_org_id));
345: MRP_UTIL.MRP_LOG('Source Sub --> '||arg_source_subinv);
346: MRP_UTIL.MRP_LOG('Source type --> '||to_char(arg_source_type));
347: MRP_UTIL.MRP_LOG('Supplier-id --> '||to_char(arg_supplier_id));
340: MRP_UTIL.MRP_LOG('Item To --> '||arg_item_to);
341: MRP_UTIL.MRP_LOG('Sub From --> '||arg_subinv_from);
342: MRP_UTIL.MRP_LOG('Sub To --> '||arg_subinv_to);
343: MRP_UTIL.MRP_LOG('WIP Line --> '||to_char(arg_line_id));
344: MRP_UTIL.MRP_LOG('Source Org --> '||to_char(arg_source_org_id));
345: MRP_UTIL.MRP_LOG('Source Sub --> '||arg_source_subinv);
346: MRP_UTIL.MRP_LOG('Source type --> '||to_char(arg_source_type));
347: MRP_UTIL.MRP_LOG('Supplier-id --> '||to_char(arg_supplier_id));
348: MRP_UTIL.MRP_LOG('Delete Card --> '||to_char(arg_delete_card));
341: MRP_UTIL.MRP_LOG('Sub From --> '||arg_subinv_from);
342: MRP_UTIL.MRP_LOG('Sub To --> '||arg_subinv_to);
343: MRP_UTIL.MRP_LOG('WIP Line --> '||to_char(arg_line_id));
344: MRP_UTIL.MRP_LOG('Source Org --> '||to_char(arg_source_org_id));
345: MRP_UTIL.MRP_LOG('Source Sub --> '||arg_source_subinv);
346: MRP_UTIL.MRP_LOG('Source type --> '||to_char(arg_source_type));
347: MRP_UTIL.MRP_LOG('Supplier-id --> '||to_char(arg_supplier_id));
348: MRP_UTIL.MRP_LOG('Delete Card --> '||to_char(arg_delete_card));
349:
342: MRP_UTIL.MRP_LOG('Sub To --> '||arg_subinv_to);
343: MRP_UTIL.MRP_LOG('WIP Line --> '||to_char(arg_line_id));
344: MRP_UTIL.MRP_LOG('Source Org --> '||to_char(arg_source_org_id));
345: MRP_UTIL.MRP_LOG('Source Sub --> '||arg_source_subinv);
346: MRP_UTIL.MRP_LOG('Source type --> '||to_char(arg_source_type));
347: MRP_UTIL.MRP_LOG('Supplier-id --> '||to_char(arg_supplier_id));
348: MRP_UTIL.MRP_LOG('Delete Card --> '||to_char(arg_delete_card));
349:
350: /* This is the first cursor which will pick up all those sequences
343: MRP_UTIL.MRP_LOG('WIP Line --> '||to_char(arg_line_id));
344: MRP_UTIL.MRP_LOG('Source Org --> '||to_char(arg_source_org_id));
345: MRP_UTIL.MRP_LOG('Source Sub --> '||arg_source_subinv);
346: MRP_UTIL.MRP_LOG('Source type --> '||to_char(arg_source_type));
347: MRP_UTIL.MRP_LOG('Supplier-id --> '||to_char(arg_supplier_id));
348: MRP_UTIL.MRP_LOG('Delete Card --> '||to_char(arg_delete_card));
349:
350: /* This is the first cursor which will pick up all those sequences
351: which do not form a chain in the mtl_kanban_pull_sequences.
344: MRP_UTIL.MRP_LOG('Source Org --> '||to_char(arg_source_org_id));
345: MRP_UTIL.MRP_LOG('Source Sub --> '||arg_source_subinv);
346: MRP_UTIL.MRP_LOG('Source type --> '||to_char(arg_source_type));
347: MRP_UTIL.MRP_LOG('Supplier-id --> '||to_char(arg_supplier_id));
348: MRP_UTIL.MRP_LOG('Delete Card --> '||to_char(arg_delete_card));
349:
350: /* This is the first cursor which will pick up all those sequences
351: which do not form a chain in the mtl_kanban_pull_sequences.
352: (i.e) If there are 2 pull sequences which form a chain because the
470: errbuf := SUBSTR(SQLERRM, 1, 500);
471: end if;
472: dbms_sql.close_cursor(l_sql_p);
473: ROLLBACK;
474: MRP_UTIL.MRP_LOG('Error at '||l_stmt_num|| ' in Purge_Kanban_Card');
475: End Purge_Kanban;
476: END FLM_KANBAN_PURGE;