PACKAGE BODY: APPS.GLIQAVG_PKG

Source

1 PACKAGE BODY GLIQAVG_PKG AS
2 /* $Header: gliqavgb.pls 120.2 2005/05/05 01:18:54 kvora ship $ */
3 
4 
5 	PROCEDURE set_ccid ( X_code_combination_id    	NUMBER) IS
6 	BEGIN
7         	GLIQAVG_PKG.code_combination_id := X_code_combination_id;
8 	END set_ccid;
9 
10 	PROCEDURE set_template_id ( X_template_id    	NUMBER) IS
11 	BEGIN
12         	GLIQAVG_PKG.template_id := X_template_id;
13 	END set_template_id;
14 
15 	PROCEDURE set_factor ( X_factor    	NUMBER) IS
16 	BEGIN
17         	GLIQAVG_PKG.factor := X_factor;
18 	END set_factor;
19 
20 	FUNCTION	get_ccid	RETURN NUMBER IS
21         BEGIN
22                 RETURN GLIQAVG_pkg.code_combination_id;
23         END get_ccid;
24 
25 	FUNCTION	get_template_id	RETURN NUMBER IS
26         BEGIN
27                 RETURN GLIQAVG_pkg.template_id;
28         END get_template_id;
29 
30 	FUNCTION	get_factor	RETURN NUMBER IS
31         BEGIN
32                 RETURN GLIQAVG_pkg.factor;
33         END get_factor;
34 
35 END GLIQAVG_PKG;