[Home] [Help]
PACKAGE BODY: APPS.ONT_MGD_EURO_REPORT_GEN
Source
1 PACKAGE BODY ONT_MGD_EURO_REPORT_GEN AS
2 -- $Header: ONTREURB.pls 120.0 2005/06/01 00:19:43 appldev noship $
3 ---=======================================================================+
4 --| Copyright (c) 1999 Oracle Corporation |
5 --| Redwood Shores, CA, USA |
6 --| All rights reserved. |
7 --+=======================================================================+
8 --| FILENAME |
9 --| ONTREURB.pls |
10 --| |
11 --| DESCRIPTION |
12 --| Use this package to generate output report for Euro conversion |
13 --| |
14 --| PROCEDURE LIST |
15 --| Initialize |
16 --| Log |
17 --| Add_Item |
18 --| Generate_Report |
19 --| |
20 --| HISTORY |
21 --| 17-Aug-2000 Created
22 --| Jul-20-2001 rajkrish BUG 1881301 tca table
23 --| 03-APR-2002 tsimmond removed code |
24 --+======================================================================-
25
26 --===================
27 -- COMMENT : PL/SQL Table definition. This table will be used to record
28 -- log information.
29 --===================
30 TYPE EURO_REPORT_REC IS RECORD
31 ( action VARCHAR2(100)
32 , object_ref VARCHAR2(30)
33 , copy_object_ref VARCHAR2(30)
34 , reason VARCHAR2(100)
35 );
36
37
38 TYPE EURO_REPORT_TABLE IS TABLE OF EURO_REPORT_REC
39 INDEX BY BINARY_INTEGER;
40
41
42 --===================
43 -- CONSTANTS
44 --===================
45 G_PKG_NAME CONSTANT VARCHAR2(30) := 'ONT_MGD_EURO_REPORT_GEN';
46
47
48 --===================
49 -- PUBLIC VARIABLES
50 --===================
51 g_program_type VARCHAR2(30);
52 g_rec_no NUMBER :=0;
53 g_mode VARCHAR2(15);
54 g_log_level NUMBER :=
55 NVL(FND_PROFILE.VALUE('ONT_DEBUG_LEVEL'),5) ;
56
57 g_log_mode VARCHAR2(3) := 'OFF'; -- possible values: OFF, SQL, SRS
58 g_customer_table ONT_MGD_EURO_REPORT_GEN.EURO_REPORT_TABLE;
59 g_cust_site_table ONT_MGD_EURO_REPORT_GEN.EURO_REPORT_TABLE;
60 g_price_list_table ONT_MGD_EURO_REPORT_GEN.EURO_REPORT_TABLE;
61 g_modifiers_table ONT_MGD_EURO_REPORT_GEN.EURO_REPORT_TABLE;
62 g_so_table ONT_MGD_EURO_REPORT_GEN.EURO_REPORT_TABLE;
63 g_formulas_table ONT_MGD_EURO_REPORT_GEN.EURO_REPORT_TABLE;
64
65
66
67 --===================
68 --PROCEDURES AND FUNCTIONS
69 --===================
70
71 --===================
72 -- PROCEDURE : Initialize PUBLIC
73 -- PARAMETERS: p_program_type customer or vendor program
74 -- COMMENT : This is the procedure to initialize pls/sql tables
75 -- for recording action information.
76 --===================
77 PROCEDURE Initialize
78 IS
79 BEGIN
80
81 NULL;
82 ---code is removed, since Euro Customer Conversion program
83 ---is decomissioned
84
85 END Initialize;
86
87
88 --========================================================================
89 -- PROCEDURE : Log PUBLIC
90 -- PARAMETERS: p_level IN priority of the message -
91 -- from highest to lowest:
92 -- G_LOG_ERROR
93 -- G_LOG_EXCEPTION
94 -- G_LOG_EVENT
95 -- G_LOG_PROCEDURE
96 -- G_LOG_STATEMENT
97 -- p_msg IN message to be print on the log file
98 -- COMMENT : Add an entry to the log
99 --=======================================================================--
100 PROCEDURE Log
101 ( p_priority IN NUMBER := 10
102 , p_msg IN VARCHAR2
103 )
104 IS
105 BEGIN
106
107 NULL;
108 ---code is removed, since Euro Customer Conversion program
109 ---is decomissioned
110
111 END Log;
112
113
114 --===================
115 -- PROCEDURE : Add_Item PUBLIC
116 -- PARAMETERS: p_object_type converted object
117 -- p_action_code convert,ignore,copy
118 -- p_object_ref name of the converted object
119 -- p_copy_object_ref name of the new object after convertion
120 -- p_reason_code why object wasn't converted
121 -- COMMENT : This is the procedure to record action information.
122 --====================
123 PROCEDURE Add_Item
124 ( p_object_type IN VARCHAR2
125 , p_action_code IN VARCHAR2
126 , p_object_ref IN VARCHAR2
127 , p_copy_object_ref IN VARCHAR2 DEFAULT NULL
128 , p_reason_code IN VARCHAR2 DEFAULT NULL
129 )
130 IS
131 BEGIN
132
133 NULL;
134 ---code is removed, since Euro Customer Conversion program
135 ---is decomissioned
136
137 END Add_Item;
138
139 --====================
140 -- PROCEDURE : Generate_Report PUBLIC
141 -- PARAMETERS: p_customer_num customer number
142 -- p_customer_address_id customer site address
143 -- p_convert_so_flag Y/N convert SOs?
144 -- p_so_conversion_ncu SO initial currency
145 -- p_convert_partial_so Y/N convert SO with partial shipment
146 -- p_line_invoice_to_org_id Line level Bill to site
147 -- p_so_reprice_flag Reiprice flag
148
149 -- COMMENT : This is the procedure to print action information.
150 --====================
151 PROCEDURE Generate_Report
152 ( p_customer_num IN VARCHAR2
153 , p_customer_name IN VARCHAR2
154 , p_customer_id IN NUMBER
155 , p_customer_address_id IN NUMBER
156 , p_so_conversion_ncu IN VARCHAR2
157 , p_convert_so_flag IN VARCHAR2
158 , p_convert_partial_so IN VARCHAR2
159 , p_line_invoice_to_org_id IN NUMBER
160 , p_so_reprice_flag IN VARCHAR2
161 )
162 IS
163 BEGIN
164
165 NULL;
166 ---code is removed, since Euro Customer Conversion program
167 ---is decomissioned
168
169 END Generate_Report;
170
171
172 END ONT_MGD_EURO_REPORT_GEN ;