DBA Data[Home] [Help]

PACKAGE: APPS.INV_LOT_SERIAL_UPGRADE

Source


1 PACKAGE INV_LOT_SERIAL_UPGRADE  AUTHID CURRENT_USER AS
2 /* $Header: INVLSUGS.pls 120.1 2005/06/11 11:07:16 appldev  $ */
3 
4 /* Global constant holding package name */
5 g_pkg_name CONSTANT VARCHAR2(50) := 'INV_LOT_SERIAL_UPGRADE' ;
6 
7 /* Constant for the option of upgrade lot, or serial, or both */
8 OPTION_LOT    CONSTANT NUMBER := 1;
9 OPTION_SERIAL CONSTANT NUMBER := 2;
10 OPTION_ALL    CONSTANT NUMBER := 3;
11 
12 /* Constant for lot/serial flexfield name and table name */
13 LOT_FLEX_NAME CONSTANT VARCHAR2(30) := 'Lot Attributes';
14 SERIAL_FLEX_NAME CONSTANT VARCHAR2(30) := 'Serial Attributes';
15 LOT_TABLE_NAME CONSTANT VARCHAR2(30) := 'MTL_LOT_NUMBERS';
16 SERIAL_TABLE_NAME CONSTANT VARCHAR2(30) := 'MTL_SERIAL_NUMBERS';
17 
18 /**********************************************************
19   Update lot/serial number with the given attribute record
20    Input Parameter:
21      p_lot_serial_option: specify update lot or serial
22        possible value: OPTION_LOT(1), OPTION_SERIAL(2)
23  **********************************************************/
24 PROCEDURE UPDATE_LOT_SERIAL_ATTR(
25 	x_return_status     OUT NOCOPY /* file.sql.39 change */ VARCHAR2
26 ,	x_msg_count         OUT NOCOPY /* file.sql.39 change */ NUMBER
27 ,  x_msg_data          OUT NOCOPY /* file.sql.39 change */ VARCHAR2
28 ,  x_update_count      OUT NOCOPY /* file.sql.39 change */ NUMBER
29 ,  p_lot_serial_option IN  NUMBER
30 ,  p_organization_id   IN  NUMBER
31 ,  p_inventory_item_id IN  NUMBER
32 ,  p_lot_serial_number IN  VARCHAR2
33 ,	p_attribute_category IN VARCHAR2
34 ,  p_attributes        IN  inv_lot_sel_attr.lot_sel_attributes_tbl_type);
35 
36 /*****************************************************************
37    Upgrade lot/serial API to be called by the concurrent program
38     which follows the concurrent program API standard
39    Input Parameter:
40      p_organization_id: specify an organization or all orgs(if null)
41 *****************************************************************/
42 PROCEDURE UPGRADE_LOT_SERIAL(
43 	x_retcode              OUT NOCOPY /* file.sql.39 change */  NUMBER
44 ,	x_errbuf               OUT NOCOPY /* file.sql.39 change */  VARCHAR2
45 ,	p_organization_id      IN   NUMBER := NULL);
46 
47 
48 END INV_LOT_SERIAL_UPGRADE;