1 PACKAGE BODY INV_EBI_FLAGS AS
2 /* $Header: INVEIFLGB.pls 120.1 2011/02/02 10:45:17 smukka noship $ */
3
4 /************************************************************************************
5 -- API name : get_allow_unimp_bom_updates
6 -- Type : Public
7 -- Function :
8 ************************************************************************************/
9
10 FUNCTION get_allow_unimp_bom_updates RETURN VARCHAR2
11 IS
12 BEGIN
13 RETURN G_ALLOW_UNIMP_BOM_UPDATES ;
14
15 END get_allow_unimp_bom_updates;
16
17 /************************************************************************************
18 -- API name : set_allow_unimp_bom_updates
19 -- Type : Public
20 -- Function :
21 ************************************************************************************/
22
23 PROCEDURE set_allow_unimp_bom_updates(
24 p_unimp_bom_updates_allowed IN VARCHAR2
25 )
26 IS
27 BEGIN
28 G_ALLOW_UNIMP_BOM_UPDATES := p_unimp_bom_updates_allowed;
29
30 END set_allow_unimp_bom_updates;
31
32 /************************************************************************************
33 -- API name : get_allow_lifecycle_phase_skip
34 -- Type : Public
35 -- Function :
36 -- Added for bug 11066016
37 ************************************************************************************/
38
39 FUNCTION get_allow_lifecycle_phase_skip RETURN VARCHAR2
40 IS
41 BEGIN
42
43 RETURN G_ALLOW_LIFECYCLE_PHASE_SKIP;
44
45 END get_allow_lifecycle_phase_skip;
46
47 /************************************************************************************
48 -- API name : set_allow_lifecycle_phase_skip
49 -- Type : Public
50 -- Function :
51 -- Added for bug 11066016
52 ************************************************************************************/
53
54 PROCEDURE set_allow_lifecycle_phase_skip(
55 p_allow_lifecycle_phase_skip IN VARCHAR2
56 ) IS
57
58 BEGIN
59
60 G_ALLOW_LIFECYCLE_PHASE_SKIP := p_allow_lifecycle_phase_skip;
61
62 END set_allow_lifecycle_phase_skip;
63
64 END INV_EBI_FLAGS;