1: PACKAGE BODY INV_Globals AS
2: /* $Header: INVSGLBB.pls 120.1 2005/05/31 04:59:27 appldev $ */
3:
4: -- Global constant holding the package name
5:
2: /* $Header: INVSGLBB.pls 120.1 2005/05/31 04:59:27 appldev $ */
3:
4: -- Global constant holding the package name
5:
6: G_PKG_NAME CONSTANT VARCHAR2(30) := 'INV_Globals';
7:
8:
9: -- Procedure Get_Entities_Tbl.
10: --
34: Function Is_Issue_Xfr_Transaction
35: (p_transaction_action_id In Number) Return Boolean
36: Is
37: Begin
38: If p_transaction_action_id in (INV_GLOBALS.G_Action_Issue,
39: INV_GLOBALS.G_Action_Subxfr,
40: INV_GLOBALS.G_Action_Planxfr,
41: INV_GLOBALS.G_Action_Stgxfr,
42: INV_GLOBALS.G_Action_Orgxfr,
35: (p_transaction_action_id In Number) Return Boolean
36: Is
37: Begin
38: If p_transaction_action_id in (INV_GLOBALS.G_Action_Issue,
39: INV_GLOBALS.G_Action_Subxfr,
40: INV_GLOBALS.G_Action_Planxfr,
41: INV_GLOBALS.G_Action_Stgxfr,
42: INV_GLOBALS.G_Action_Orgxfr,
43: INV_GLOBALS.G_Action_IntransitShipment,
36: Is
37: Begin
38: If p_transaction_action_id in (INV_GLOBALS.G_Action_Issue,
39: INV_GLOBALS.G_Action_Subxfr,
40: INV_GLOBALS.G_Action_Planxfr,
41: INV_GLOBALS.G_Action_Stgxfr,
42: INV_GLOBALS.G_Action_Orgxfr,
43: INV_GLOBALS.G_Action_IntransitShipment,
44: INV_GLOBALS.G_Action_AssyReturn,
37: Begin
38: If p_transaction_action_id in (INV_GLOBALS.G_Action_Issue,
39: INV_GLOBALS.G_Action_Subxfr,
40: INV_GLOBALS.G_Action_Planxfr,
41: INV_GLOBALS.G_Action_Stgxfr,
42: INV_GLOBALS.G_Action_Orgxfr,
43: INV_GLOBALS.G_Action_IntransitShipment,
44: INV_GLOBALS.G_Action_AssyReturn,
45: INV_GLOBALS.g_action_negcompreturn,
38: If p_transaction_action_id in (INV_GLOBALS.G_Action_Issue,
39: INV_GLOBALS.G_Action_Subxfr,
40: INV_GLOBALS.G_Action_Planxfr,
41: INV_GLOBALS.G_Action_Stgxfr,
42: INV_GLOBALS.G_Action_Orgxfr,
43: INV_GLOBALS.G_Action_IntransitShipment,
44: INV_GLOBALS.G_Action_AssyReturn,
45: INV_GLOBALS.g_action_negcompreturn,
46: INV_GLOBALS.G_Action_ownxfr)
39: INV_GLOBALS.G_Action_Subxfr,
40: INV_GLOBALS.G_Action_Planxfr,
41: INV_GLOBALS.G_Action_Stgxfr,
42: INV_GLOBALS.G_Action_Orgxfr,
43: INV_GLOBALS.G_Action_IntransitShipment,
44: INV_GLOBALS.G_Action_AssyReturn,
45: INV_GLOBALS.g_action_negcompreturn,
46: INV_GLOBALS.G_Action_ownxfr)
47: then
40: INV_GLOBALS.G_Action_Planxfr,
41: INV_GLOBALS.G_Action_Stgxfr,
42: INV_GLOBALS.G_Action_Orgxfr,
43: INV_GLOBALS.G_Action_IntransitShipment,
44: INV_GLOBALS.G_Action_AssyReturn,
45: INV_GLOBALS.g_action_negcompreturn,
46: INV_GLOBALS.G_Action_ownxfr)
47: then
48: Return TRUE;
41: INV_GLOBALS.G_Action_Stgxfr,
42: INV_GLOBALS.G_Action_Orgxfr,
43: INV_GLOBALS.G_Action_IntransitShipment,
44: INV_GLOBALS.G_Action_AssyReturn,
45: INV_GLOBALS.g_action_negcompreturn,
46: INV_GLOBALS.G_Action_ownxfr)
47: then
48: Return TRUE;
49: Else
42: INV_GLOBALS.G_Action_Orgxfr,
43: INV_GLOBALS.G_Action_IntransitShipment,
44: INV_GLOBALS.G_Action_AssyReturn,
45: INV_GLOBALS.g_action_negcompreturn,
46: INV_GLOBALS.G_Action_ownxfr)
47: then
48: Return TRUE;
49: Else
50: Return False;
182: ( p_org_id In NUMBER
183: )
184: IS
185: BEGIN
186: INV_GLOBALS.G_ORG_ID := p_org_id;
187:
188: END Set_Org_Id;
189:
190:
425: END IF;
426: END IF;
427: END GET_LEDGER_INFO;
428:
429: END INV_Globals;