12: p_subinventory_name IN VARCHAR2,
13: p_locator_id IN NUMBER,
14: p_kanban_size IN NUMBER,
15: p_number_of_cards IN NUMBER,
16: p_source_type IN NUMBER := FND_API.G_MISS_NUM,
17: p_source_organization_id IN NUMBER := FND_API.G_MISS_NUM,
18: p_source_subinventory IN VARCHAR2 := FND_API.G_MISS_CHAR,
19: p_source_locator_id IN NUMBER := FND_API.G_MISS_NUM,
20: p_line_id IN NUMBER := FND_API.G_MISS_NUM,
13: p_locator_id IN NUMBER,
14: p_kanban_size IN NUMBER,
15: p_number_of_cards IN NUMBER,
16: p_source_type IN NUMBER := FND_API.G_MISS_NUM,
17: p_source_organization_id IN NUMBER := FND_API.G_MISS_NUM,
18: p_source_subinventory IN VARCHAR2 := FND_API.G_MISS_CHAR,
19: p_source_locator_id IN NUMBER := FND_API.G_MISS_NUM,
20: p_line_id IN NUMBER := FND_API.G_MISS_NUM,
21: p_supplier_id IN NUMBER := FND_API.G_MISS_NUM,
14: p_kanban_size IN NUMBER,
15: p_number_of_cards IN NUMBER,
16: p_source_type IN NUMBER := FND_API.G_MISS_NUM,
17: p_source_organization_id IN NUMBER := FND_API.G_MISS_NUM,
18: p_source_subinventory IN VARCHAR2 := FND_API.G_MISS_CHAR,
19: p_source_locator_id IN NUMBER := FND_API.G_MISS_NUM,
20: p_line_id IN NUMBER := FND_API.G_MISS_NUM,
21: p_supplier_id IN NUMBER := FND_API.G_MISS_NUM,
22: p_supplier_site_id IN NUMBER := FND_API.G_MISS_NUM,
15: p_number_of_cards IN NUMBER,
16: p_source_type IN NUMBER := FND_API.G_MISS_NUM,
17: p_source_organization_id IN NUMBER := FND_API.G_MISS_NUM,
18: p_source_subinventory IN VARCHAR2 := FND_API.G_MISS_CHAR,
19: p_source_locator_id IN NUMBER := FND_API.G_MISS_NUM,
20: p_line_id IN NUMBER := FND_API.G_MISS_NUM,
21: p_supplier_id IN NUMBER := FND_API.G_MISS_NUM,
22: p_supplier_site_id IN NUMBER := FND_API.G_MISS_NUM,
23: p_calculate_kanban_flag IN NUMBER := FND_API.G_MISS_NUM,
16: p_source_type IN NUMBER := FND_API.G_MISS_NUM,
17: p_source_organization_id IN NUMBER := FND_API.G_MISS_NUM,
18: p_source_subinventory IN VARCHAR2 := FND_API.G_MISS_CHAR,
19: p_source_locator_id IN NUMBER := FND_API.G_MISS_NUM,
20: p_line_id IN NUMBER := FND_API.G_MISS_NUM,
21: p_supplier_id IN NUMBER := FND_API.G_MISS_NUM,
22: p_supplier_site_id IN NUMBER := FND_API.G_MISS_NUM,
23: p_calculate_kanban_flag IN NUMBER := FND_API.G_MISS_NUM,
24: p_replenishment_lead_time IN NUMBER := FND_API.G_MISS_NUM,
17: p_source_organization_id IN NUMBER := FND_API.G_MISS_NUM,
18: p_source_subinventory IN VARCHAR2 := FND_API.G_MISS_CHAR,
19: p_source_locator_id IN NUMBER := FND_API.G_MISS_NUM,
20: p_line_id IN NUMBER := FND_API.G_MISS_NUM,
21: p_supplier_id IN NUMBER := FND_API.G_MISS_NUM,
22: p_supplier_site_id IN NUMBER := FND_API.G_MISS_NUM,
23: p_calculate_kanban_flag IN NUMBER := FND_API.G_MISS_NUM,
24: p_replenishment_lead_time IN NUMBER := FND_API.G_MISS_NUM,
25: p_release_kanban_flag IN NUMBER := FND_API.G_MISS_NUM,
18: p_source_subinventory IN VARCHAR2 := FND_API.G_MISS_CHAR,
19: p_source_locator_id IN NUMBER := FND_API.G_MISS_NUM,
20: p_line_id IN NUMBER := FND_API.G_MISS_NUM,
21: p_supplier_id IN NUMBER := FND_API.G_MISS_NUM,
22: p_supplier_site_id IN NUMBER := FND_API.G_MISS_NUM,
23: p_calculate_kanban_flag IN NUMBER := FND_API.G_MISS_NUM,
24: p_replenishment_lead_time IN NUMBER := FND_API.G_MISS_NUM,
25: p_release_kanban_flag IN NUMBER := FND_API.G_MISS_NUM,
26: p_minimum_order_quantity IN NUMBER := FND_API.G_MISS_NUM,
19: p_source_locator_id IN NUMBER := FND_API.G_MISS_NUM,
20: p_line_id IN NUMBER := FND_API.G_MISS_NUM,
21: p_supplier_id IN NUMBER := FND_API.G_MISS_NUM,
22: p_supplier_site_id IN NUMBER := FND_API.G_MISS_NUM,
23: p_calculate_kanban_flag IN NUMBER := FND_API.G_MISS_NUM,
24: p_replenishment_lead_time IN NUMBER := FND_API.G_MISS_NUM,
25: p_release_kanban_flag IN NUMBER := FND_API.G_MISS_NUM,
26: p_minimum_order_quantity IN NUMBER := FND_API.G_MISS_NUM,
27: p_fixed_lot_multiplier IN NUMBER := FND_API.G_MISS_NUM,
20: p_line_id IN NUMBER := FND_API.G_MISS_NUM,
21: p_supplier_id IN NUMBER := FND_API.G_MISS_NUM,
22: p_supplier_site_id IN NUMBER := FND_API.G_MISS_NUM,
23: p_calculate_kanban_flag IN NUMBER := FND_API.G_MISS_NUM,
24: p_replenishment_lead_time IN NUMBER := FND_API.G_MISS_NUM,
25: p_release_kanban_flag IN NUMBER := FND_API.G_MISS_NUM,
26: p_minimum_order_quantity IN NUMBER := FND_API.G_MISS_NUM,
27: p_fixed_lot_multiplier IN NUMBER := FND_API.G_MISS_NUM,
28: p_safety_stock_days IN NUMBER := FND_API.G_MISS_NUM) IS
21: p_supplier_id IN NUMBER := FND_API.G_MISS_NUM,
22: p_supplier_site_id IN NUMBER := FND_API.G_MISS_NUM,
23: p_calculate_kanban_flag IN NUMBER := FND_API.G_MISS_NUM,
24: p_replenishment_lead_time IN NUMBER := FND_API.G_MISS_NUM,
25: p_release_kanban_flag IN NUMBER := FND_API.G_MISS_NUM,
26: p_minimum_order_quantity IN NUMBER := FND_API.G_MISS_NUM,
27: p_fixed_lot_multiplier IN NUMBER := FND_API.G_MISS_NUM,
28: p_safety_stock_days IN NUMBER := FND_API.G_MISS_NUM) IS
29:
22: p_supplier_site_id IN NUMBER := FND_API.G_MISS_NUM,
23: p_calculate_kanban_flag IN NUMBER := FND_API.G_MISS_NUM,
24: p_replenishment_lead_time IN NUMBER := FND_API.G_MISS_NUM,
25: p_release_kanban_flag IN NUMBER := FND_API.G_MISS_NUM,
26: p_minimum_order_quantity IN NUMBER := FND_API.G_MISS_NUM,
27: p_fixed_lot_multiplier IN NUMBER := FND_API.G_MISS_NUM,
28: p_safety_stock_days IN NUMBER := FND_API.G_MISS_NUM) IS
29:
30: l_pull_sequence_rec INV_Kanban_PVT.pull_sequence_rec_type;
23: p_calculate_kanban_flag IN NUMBER := FND_API.G_MISS_NUM,
24: p_replenishment_lead_time IN NUMBER := FND_API.G_MISS_NUM,
25: p_release_kanban_flag IN NUMBER := FND_API.G_MISS_NUM,
26: p_minimum_order_quantity IN NUMBER := FND_API.G_MISS_NUM,
27: p_fixed_lot_multiplier IN NUMBER := FND_API.G_MISS_NUM,
28: p_safety_stock_days IN NUMBER := FND_API.G_MISS_NUM) IS
29:
30: l_pull_sequence_rec INV_Kanban_PVT.pull_sequence_rec_type;
31: l_return_status VARCHAR2(1);
24: p_replenishment_lead_time IN NUMBER := FND_API.G_MISS_NUM,
25: p_release_kanban_flag IN NUMBER := FND_API.G_MISS_NUM,
26: p_minimum_order_quantity IN NUMBER := FND_API.G_MISS_NUM,
27: p_fixed_lot_multiplier IN NUMBER := FND_API.G_MISS_NUM,
28: p_safety_stock_days IN NUMBER := FND_API.G_MISS_NUM) IS
29:
30: l_pull_sequence_rec INV_Kanban_PVT.pull_sequence_rec_type;
31: l_return_status VARCHAR2(1);
32: BEGIN
42:
43: -- If source type is passed as -1 then only update size and number
44: -- information. Set values to default.
45: IF (p_source_type = -1) THEN
46: l_pull_sequence_rec.source_type := FND_API.G_MISS_NUM;
47: l_pull_sequence_rec.source_organization_id := FND_API.G_MISS_NUM;
48: l_pull_sequence_rec.source_subinventory := FND_API.G_MISS_CHAR;
49: l_pull_sequence_rec.source_locator_id := FND_API.G_MISS_NUM;
50: l_pull_sequence_rec.wip_line_id := FND_API.G_MISS_NUM;
43: -- If source type is passed as -1 then only update size and number
44: -- information. Set values to default.
45: IF (p_source_type = -1) THEN
46: l_pull_sequence_rec.source_type := FND_API.G_MISS_NUM;
47: l_pull_sequence_rec.source_organization_id := FND_API.G_MISS_NUM;
48: l_pull_sequence_rec.source_subinventory := FND_API.G_MISS_CHAR;
49: l_pull_sequence_rec.source_locator_id := FND_API.G_MISS_NUM;
50: l_pull_sequence_rec.wip_line_id := FND_API.G_MISS_NUM;
51: l_pull_sequence_rec.supplier_id := FND_API.G_MISS_NUM;
44: -- information. Set values to default.
45: IF (p_source_type = -1) THEN
46: l_pull_sequence_rec.source_type := FND_API.G_MISS_NUM;
47: l_pull_sequence_rec.source_organization_id := FND_API.G_MISS_NUM;
48: l_pull_sequence_rec.source_subinventory := FND_API.G_MISS_CHAR;
49: l_pull_sequence_rec.source_locator_id := FND_API.G_MISS_NUM;
50: l_pull_sequence_rec.wip_line_id := FND_API.G_MISS_NUM;
51: l_pull_sequence_rec.supplier_id := FND_API.G_MISS_NUM;
52: l_pull_sequence_rec.supplier_site_id := FND_API.G_MISS_NUM;
45: IF (p_source_type = -1) THEN
46: l_pull_sequence_rec.source_type := FND_API.G_MISS_NUM;
47: l_pull_sequence_rec.source_organization_id := FND_API.G_MISS_NUM;
48: l_pull_sequence_rec.source_subinventory := FND_API.G_MISS_CHAR;
49: l_pull_sequence_rec.source_locator_id := FND_API.G_MISS_NUM;
50: l_pull_sequence_rec.wip_line_id := FND_API.G_MISS_NUM;
51: l_pull_sequence_rec.supplier_id := FND_API.G_MISS_NUM;
52: l_pull_sequence_rec.supplier_site_id := FND_API.G_MISS_NUM;
53: l_pull_sequence_rec.calculate_kanban_flag := FND_API.G_MISS_NUM;
46: l_pull_sequence_rec.source_type := FND_API.G_MISS_NUM;
47: l_pull_sequence_rec.source_organization_id := FND_API.G_MISS_NUM;
48: l_pull_sequence_rec.source_subinventory := FND_API.G_MISS_CHAR;
49: l_pull_sequence_rec.source_locator_id := FND_API.G_MISS_NUM;
50: l_pull_sequence_rec.wip_line_id := FND_API.G_MISS_NUM;
51: l_pull_sequence_rec.supplier_id := FND_API.G_MISS_NUM;
52: l_pull_sequence_rec.supplier_site_id := FND_API.G_MISS_NUM;
53: l_pull_sequence_rec.calculate_kanban_flag := FND_API.G_MISS_NUM;
54: l_pull_sequence_rec.replenishment_lead_time := FND_API.G_MISS_NUM;
47: l_pull_sequence_rec.source_organization_id := FND_API.G_MISS_NUM;
48: l_pull_sequence_rec.source_subinventory := FND_API.G_MISS_CHAR;
49: l_pull_sequence_rec.source_locator_id := FND_API.G_MISS_NUM;
50: l_pull_sequence_rec.wip_line_id := FND_API.G_MISS_NUM;
51: l_pull_sequence_rec.supplier_id := FND_API.G_MISS_NUM;
52: l_pull_sequence_rec.supplier_site_id := FND_API.G_MISS_NUM;
53: l_pull_sequence_rec.calculate_kanban_flag := FND_API.G_MISS_NUM;
54: l_pull_sequence_rec.replenishment_lead_time := FND_API.G_MISS_NUM;
55:
48: l_pull_sequence_rec.source_subinventory := FND_API.G_MISS_CHAR;
49: l_pull_sequence_rec.source_locator_id := FND_API.G_MISS_NUM;
50: l_pull_sequence_rec.wip_line_id := FND_API.G_MISS_NUM;
51: l_pull_sequence_rec.supplier_id := FND_API.G_MISS_NUM;
52: l_pull_sequence_rec.supplier_site_id := FND_API.G_MISS_NUM;
53: l_pull_sequence_rec.calculate_kanban_flag := FND_API.G_MISS_NUM;
54: l_pull_sequence_rec.replenishment_lead_time := FND_API.G_MISS_NUM;
55:
56: l_pull_sequence_rec.release_kanban_flag := FND_API.G_MISS_NUM;
49: l_pull_sequence_rec.source_locator_id := FND_API.G_MISS_NUM;
50: l_pull_sequence_rec.wip_line_id := FND_API.G_MISS_NUM;
51: l_pull_sequence_rec.supplier_id := FND_API.G_MISS_NUM;
52: l_pull_sequence_rec.supplier_site_id := FND_API.G_MISS_NUM;
53: l_pull_sequence_rec.calculate_kanban_flag := FND_API.G_MISS_NUM;
54: l_pull_sequence_rec.replenishment_lead_time := FND_API.G_MISS_NUM;
55:
56: l_pull_sequence_rec.release_kanban_flag := FND_API.G_MISS_NUM;
57: l_pull_sequence_rec.minimum_order_quantity := FND_API.G_MISS_NUM;
50: l_pull_sequence_rec.wip_line_id := FND_API.G_MISS_NUM;
51: l_pull_sequence_rec.supplier_id := FND_API.G_MISS_NUM;
52: l_pull_sequence_rec.supplier_site_id := FND_API.G_MISS_NUM;
53: l_pull_sequence_rec.calculate_kanban_flag := FND_API.G_MISS_NUM;
54: l_pull_sequence_rec.replenishment_lead_time := FND_API.G_MISS_NUM;
55:
56: l_pull_sequence_rec.release_kanban_flag := FND_API.G_MISS_NUM;
57: l_pull_sequence_rec.minimum_order_quantity := FND_API.G_MISS_NUM;
58: l_pull_sequence_rec.fixed_lot_multiplier := FND_API.G_MISS_NUM;
52: l_pull_sequence_rec.supplier_site_id := FND_API.G_MISS_NUM;
53: l_pull_sequence_rec.calculate_kanban_flag := FND_API.G_MISS_NUM;
54: l_pull_sequence_rec.replenishment_lead_time := FND_API.G_MISS_NUM;
55:
56: l_pull_sequence_rec.release_kanban_flag := FND_API.G_MISS_NUM;
57: l_pull_sequence_rec.minimum_order_quantity := FND_API.G_MISS_NUM;
58: l_pull_sequence_rec.fixed_lot_multiplier := FND_API.G_MISS_NUM;
59: l_pull_sequence_rec.safety_stock_days := FND_API.G_MISS_NUM;
60: ELSE
53: l_pull_sequence_rec.calculate_kanban_flag := FND_API.G_MISS_NUM;
54: l_pull_sequence_rec.replenishment_lead_time := FND_API.G_MISS_NUM;
55:
56: l_pull_sequence_rec.release_kanban_flag := FND_API.G_MISS_NUM;
57: l_pull_sequence_rec.minimum_order_quantity := FND_API.G_MISS_NUM;
58: l_pull_sequence_rec.fixed_lot_multiplier := FND_API.G_MISS_NUM;
59: l_pull_sequence_rec.safety_stock_days := FND_API.G_MISS_NUM;
60: ELSE
61: l_pull_sequence_rec.source_type := p_source_type;
54: l_pull_sequence_rec.replenishment_lead_time := FND_API.G_MISS_NUM;
55:
56: l_pull_sequence_rec.release_kanban_flag := FND_API.G_MISS_NUM;
57: l_pull_sequence_rec.minimum_order_quantity := FND_API.G_MISS_NUM;
58: l_pull_sequence_rec.fixed_lot_multiplier := FND_API.G_MISS_NUM;
59: l_pull_sequence_rec.safety_stock_days := FND_API.G_MISS_NUM;
60: ELSE
61: l_pull_sequence_rec.source_type := p_source_type;
62: l_pull_sequence_rec.source_organization_id := p_source_organization_id;
55:
56: l_pull_sequence_rec.release_kanban_flag := FND_API.G_MISS_NUM;
57: l_pull_sequence_rec.minimum_order_quantity := FND_API.G_MISS_NUM;
58: l_pull_sequence_rec.fixed_lot_multiplier := FND_API.G_MISS_NUM;
59: l_pull_sequence_rec.safety_stock_days := FND_API.G_MISS_NUM;
60: ELSE
61: l_pull_sequence_rec.source_type := p_source_type;
62: l_pull_sequence_rec.source_organization_id := p_source_organization_id;
63: l_pull_sequence_rec.source_subinventory := p_source_subinventory;
79: l_pull_sequence_rec);
80:
81: x_return_status := l_return_status;
82:
83: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
84: RAISE FND_API.G_EXC_ERROR;
85: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
86: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
87: ELSE
80:
81: x_return_status := l_return_status;
82:
83: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
84: RAISE FND_API.G_EXC_ERROR;
85: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
86: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
87: ELSE
88: commit work;
81: x_return_status := l_return_status;
82:
83: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
84: RAISE FND_API.G_EXC_ERROR;
85: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
86: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
87: ELSE
88: commit work;
89: END IF;
82:
83: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
84: RAISE FND_API.G_EXC_ERROR;
85: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
86: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
87: ELSE
88: commit work;
89: END IF;
90:
88: commit work;
89: END IF;
90:
91: EXCEPTION
92: WHEN FND_API.G_EXC_ERROR THEN
93: FND_MSG_PUB.count_and_get
94: (p_count => x_msg_count,
95: p_data => x_msg_data );
96: WHEN OTHERS THEN
110: INV_Kanban_PVT.delete_pull_sequence(l_return_status,
111: p_kanban_plan_id);
112: x_return_status := l_return_status;
113:
114: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
115: RAISE FND_API.G_EXC_ERROR;
116: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
117: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
118: END IF;
111: p_kanban_plan_id);
112: x_return_status := l_return_status;
113:
114: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
115: RAISE FND_API.G_EXC_ERROR;
116: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
117: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
118: END IF;
119:
112: x_return_status := l_return_status;
113:
114: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
115: RAISE FND_API.G_EXC_ERROR;
116: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
117: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
118: END IF;
119:
120: EXCEPTION
113:
114: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
115: RAISE FND_API.G_EXC_ERROR;
116: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
117: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
118: END IF;
119:
120: EXCEPTION
121: WHEN FND_API.G_EXC_ERROR THEN
117: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
118: END IF;
119:
120: EXCEPTION
121: WHEN FND_API.G_EXC_ERROR THEN
122: FND_MSG_PUB.count_and_get
123: (p_count => x_msg_count,
124: p_data => x_msg_data );
125: WHEN OTHERS THEN
146: INV_Kanban_PVT.Insert_Pull_Sequence(l_return_status,l_pull_sequence_rec);
147:
148: x_return_status := l_return_status;
149:
150: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
151: RAISE FND_API.G_EXC_ERROR;
152: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
153: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
154: ELSE
147:
148: x_return_status := l_return_status;
149:
150: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
151: RAISE FND_API.G_EXC_ERROR;
152: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
153: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
154: ELSE
155: commit work;
148: x_return_status := l_return_status;
149:
150: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
151: RAISE FND_API.G_EXC_ERROR;
152: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
153: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
154: ELSE
155: commit work;
156: END IF;
149:
150: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
151: RAISE FND_API.G_EXC_ERROR;
152: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
153: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
154: ELSE
155: commit work;
156: END IF;
157:
155: commit work;
156: END IF;
157:
158: EXCEPTION
159: WHEN FND_API.G_EXC_ERROR THEN
160: FND_MSG_PUB.count_and_get
161: (p_count => x_msg_count,
162: p_data => x_msg_data );
163: WHEN OTHERS THEN
220: WHERE pull_sequence_id = l_prod_pull_sequence_id;
221: end if;
222: if( (l_flag=l_delplanprodcards ) or ( l_flag = l_delplanprod) ) then -- Delete Production
223: INV_pullsequence_PKG.delete_row(l_return_status,l_prod_pull_sequence_id);
224: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
225: RAISE FND_API.G_EXC_ERROR;
226: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
227: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
228: END IF;
221: end if;
222: if( (l_flag=l_delplanprodcards ) or ( l_flag = l_delplanprod) ) then -- Delete Production
223: INV_pullsequence_PKG.delete_row(l_return_status,l_prod_pull_sequence_id);
224: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
225: RAISE FND_API.G_EXC_ERROR;
226: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
227: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
228: END IF;
229:
222: if( (l_flag=l_delplanprodcards ) or ( l_flag = l_delplanprod) ) then -- Delete Production
223: INV_pullsequence_PKG.delete_row(l_return_status,l_prod_pull_sequence_id);
224: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
225: RAISE FND_API.G_EXC_ERROR;
226: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
227: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
228: END IF;
229:
230: end if;
223: INV_pullsequence_PKG.delete_row(l_return_status,l_prod_pull_sequence_id);
224: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
225: RAISE FND_API.G_EXC_ERROR;
226: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
227: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
228: END IF;
229:
230: end if;
231: -- Delete planning pull sequence
230: end if;
231: -- Delete planning pull sequence
232:
233: INV_pullsequence_pkg.delete_row(l_return_status,l_pull_seq_id);
234: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
235: RAISE FND_API.G_EXC_ERROR;
236: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
237: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
238: END IF;
231: -- Delete planning pull sequence
232:
233: INV_pullsequence_pkg.delete_row(l_return_status,l_pull_seq_id);
234: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
235: RAISE FND_API.G_EXC_ERROR;
236: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
237: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
238: END IF;
239: commit; --The above procedure does not do a commit ,so we add it here
232:
233: INV_pullsequence_pkg.delete_row(l_return_status,l_pull_seq_id);
234: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
235: RAISE FND_API.G_EXC_ERROR;
236: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
237: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
238: END IF;
239: commit; --The above procedure does not do a commit ,so we add it here
240: end if;
233: INV_pullsequence_pkg.delete_row(l_return_status,l_pull_seq_id);
234: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
235: RAISE FND_API.G_EXC_ERROR;
236: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
237: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
238: END IF;
239: commit; --The above procedure does not do a commit ,so we add it here
240: end if;
241:
249: l_operation_tbl);
250:
251: x_return_status := l_return_status;
252:
253: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
254: RAISE FND_API.G_EXC_ERROR;
255: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
256: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
257: ELSE
250:
251: x_return_status := l_return_status;
252:
253: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
254: RAISE FND_API.G_EXC_ERROR;
255: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
256: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
257: ELSE
258:
251: x_return_status := l_return_status;
252:
253: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
254: RAISE FND_API.G_EXC_ERROR;
255: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
256: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
257: ELSE
258:
259: DELETE FROM mrp_form_query
252:
253: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
254: RAISE FND_API.G_EXC_ERROR;
255: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
256: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
257: ELSE
258:
259: DELETE FROM mrp_form_query
260: WHERE query_id = p_query_id;
262: COMMIT WORK;
263: END IF;
264:
265: EXCEPTION
266: WHEN FND_API.G_EXC_ERROR THEN
267: FND_MSG_PUB.count_and_get
268: (p_count => x_msg_count,
269: p_data => x_msg_data );
270: WHEN OTHERS THEN