PACKAGE BODY: APPS.OKE_GLOBALS

Source

1 PACKAGE BODY OKE_GLOBALS AS
2 /* $Header: OKEGBLB.pls 115.0 2003/11/24 23:09:50 alaw noship $ */
3 
4 -- -------------------------------------------------------------------
5 -- PL/SQL Globals
6 -- -------------------------------------------------------------------
7 G_K_Header_ID          NUMBER := NULL;
8 
9 -- -------------------------------------------------------------------
10 -- Functions and Procedures
11 -- -------------------------------------------------------------------
12 PROCEDURE Set_Globals
13 ( P_K_Header_ID      IN      NUMBER
14 ) IS
15 BEGIN
16   G_K_Header_ID := P_K_Header_ID;
17 END Set_Globals;
18 
19 FUNCTION K_Header_ID RETURN NUMBER IS
20 BEGIN
21   RETURN ( G_K_Header_ID );
22 END K_Header_ID;
23 
24 END OKE_GLOBALS;