PACKAGE BODY: APPS.POS_ISP_UPDMODIFIERS

Source

1 PACKAGE BODY POS_ISP_UPDMODIFIERS AS
2 /* $Header: POSUMODB.pls 120.0 2005/06/01 16:47:48 appldev noship $ */
3 
4 /*===========================================================================
5   PROCEDURE NAME:	updmodifiers()
6 ===========================================================================*/
7 
8 PROCEDURE updmodifiers(
9         p_asl_id                    IN   PO_ASL_ATTRIBUTES.ASL_ID%TYPE,
10         p_proc_lead_time            IN   PO_ASL_ATTRIBUTES.PROCESSING_LEAD_TIME%TYPE,
11         p_min_order_qty             IN   PO_ASL_ATTRIBUTES.MIN_ORDER_QTY%TYPE,
12         p_fixed_lot_multiple        IN   PO_ASL_ATTRIBUTES.FIXED_LOT_MULTIPLE%TYPE,
13         p_error_code                OUT  NOCOPY VARCHAR2,
14         p_error_message             OUT  NOCOPY VARCHAR2) IS
15 
16 
17 
18 BEGIN
19 
20     /* Update PO_ASL_ATTRIBUTES form ISP     */
21 
22     UPDATE PO_ASL_ATTRIBUTES
23     SET PROCESSING_LEAD_TIME = p_proc_lead_time,
24         MIN_ORDER_QTY        = p_min_order_qty,
25         FIXED_LOT_MULTIPLE   = p_fixed_lot_multiple
26     WHERE asl_id  = p_asl_id
27       and using_organization_id = -1;
28 
29 
30 
31  EXCEPTION
32 
33   WHEN OTHERS THEN
34 
35     p_ERROR_CODE := 'Y';
36     p_ERROR_MESSAGE := 'exception raised during Update';
37 
38 END;
39 
40 
41 END POS_ISP_UPDMODIFIERS;
42