1 PACKAGE BODY MRP_PUB_KANBAN_QTY_CALC AS
2 /* $Header: MRPPKQCB.pls 120.1 2005/06/21 09:21:52 appldev ship $ */
3
4 l_api_version constant number := 1.0;
5
6 PROCEDURE Calculate_Kanban_Quantity (
7 p_version_number IN NUMBER,
8 p_average_demand IN NUMBER,
9 p_minimum_order_quantity IN NUMBER,
10 p_fixed_lot_multiplier IN NUMBER,
11 p_safety_stock_days IN NUMBER,
12 p_replenishment_lead_time IN NUMBER,
13 p_kanban_flag IN NUMBER,
14 p_kanban_size IN OUT NOCOPY NUMBER,
15 p_kanban_number IN OUT NOCOPY NUMBER,
16 p_return_status OUT NOCOPY VARCHAR2 ) IS
17 BEGIN
18
19 null;
20 p_return_status := 'S';
21
22 Exception
23 WHEN OTHERS THEN
24 p_return_status := 'E';
25
26 END Calculate_Kanban_Quantity;
27
28 END MRP_PUB_KANBAN_QTY_CALC;