1 PACKAGE BODY ont_os_categories AS
2 /* $Header: ontcatib.pls 120.1 2006/03/29 16:54:00 spooruli noship $ */
3
4 /* Wrapper for printing report line */
5 PROCEDURE PRINT_LINE
6 (line_text IN VARCHAR2) IS
7 --
8 l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
9 --
10 BEGIN
11 FND_FILE.PUT_LINE ( FND_FILE.OUTPUT,line_text);
12 --DBMS_OUTPUT.PUT_LINE ( line_text);
13
14 END;
15
16 --------------------------------------------------------------------------------
17 -- Parameters p_structure_name and p_level is currently defaulted for Oracle IT,
18 -- it will be used in future to flatten any hiearical value set like GL#Product
19 -- to create Categories in applications. This program can be run in test mode to
20 -- see what categories it will create when parameter p_mode is passed other then
21 -- 2.
22 --------------------------------------------------------------------------------
23
24 PROCEDURE catinsert( errbuf OUT NOCOPY VARCHAR2,
25
26 retcode OUT NOCOPY NUMBER,
27
28 p_valueset_name IN VARCHAR2 DEFAULT 'GL#Product',
29 p_top_level_value IN VARCHAR2 DEFAULT '0Y53',
30 p_mode IN NUMBER DEFAULT 2,
31 p_structure_name IN VARCHAR2 DEFAULT 'Product Reporting Hierarchy',
32 p_level IN NUMBER DEFAULT 8) IS
33
34 BEGIN
35 null;
36 END catinsert;
37 END ont_os_categories;