9: -------------------------------------------------------------------
10: PROCEDURE print_report_title IS
11: c_text_files VARCHAR2(200);
12: BEGIN
13: fnd_file.put_line(fnd_file.output, ' ');
14: fnd_message.set_name('SQLGL', 'CRM0023');
15: c_text_files :=
16: RPAD(fnd_message.get || ' '
17: || TO_CHAR(SYSDATE, 'DD-MON-YYYY HH:MM:SS'),
20: c_text_files := c_text_files || LPAD(fnd_message.get, 48, ' ');
21: fnd_message.set_name('SQLGL', 'CRM0024');
22: c_text_files :=
23: c_text_files || LPAD(fnd_message.get || ' ' || page_count, 49, ' ');
24: fnd_file.put_line(fnd_file.output, c_text_files);
25: page_line_count := page_line_count + 2;
26: END print_report_title;
27:
28: -------------------------------------------------------------------
28: -------------------------------------------------------------------
29: PROCEDURE print_validation_failure IS
30: c_text_files VARCHAR2(200);
31: BEGIN
32: fnd_file.put_line(fnd_file.output, ' ');
33: fnd_file.put_line(fnd_file.output, ' ');
34: fnd_message.set_name('SQLGL', 'CRM0026');
35: fnd_file.put_line(fnd_file.output,
36: LPAD(' ', 45, '=') || fnd_message.get
29: PROCEDURE print_validation_failure IS
30: c_text_files VARCHAR2(200);
31: BEGIN
32: fnd_file.put_line(fnd_file.output, ' ');
33: fnd_file.put_line(fnd_file.output, ' ');
34: fnd_message.set_name('SQLGL', 'CRM0026');
35: fnd_file.put_line(fnd_file.output,
36: LPAD(' ', 45, '=') || fnd_message.get
37: || RPAD(' ', 45, '='));
31: BEGIN
32: fnd_file.put_line(fnd_file.output, ' ');
33: fnd_file.put_line(fnd_file.output, ' ');
34: fnd_message.set_name('SQLGL', 'CRM0026');
35: fnd_file.put_line(fnd_file.output,
36: LPAD(' ', 45, '=') || fnd_message.get
37: || RPAD(' ', 45, '='));
38: fnd_file.put_line(fnd_file.output, ' ');
39: fnd_message.set_name('SQLGL', 'CRM0032');
34: fnd_message.set_name('SQLGL', 'CRM0026');
35: fnd_file.put_line(fnd_file.output,
36: LPAD(' ', 45, '=') || fnd_message.get
37: || RPAD(' ', 45, '='));
38: fnd_file.put_line(fnd_file.output, ' ');
39: fnd_message.set_name('SQLGL', 'CRM0032');
40: c_text_files := RPAD(fnd_message.get, 31, ' ');
41: fnd_message.set_name('SQLGL', 'CRM0033');
42: c_text_files := c_text_files || RPAD(fnd_message.get, 15, ' ');
51: fnd_message.set_name('SQLGL', 'CRM0038');
52: c_text_files := c_text_files || LPAD(fnd_message.get || ' ', 13, ' ');
53: fnd_message.set_name('SQLGL', 'CRM0039');
54: c_text_files := c_text_files || RPAD(fnd_message.get, 14, ' ');
55: fnd_file.put_line(fnd_file.output, c_text_files);
56: fnd_file.put_line(fnd_file.output,
57: LPAD(' ', 31, '-') || LPAD(' ', 15, '-')
58: || LPAD(' ', 15, '-') || LPAD(' ', 16, '-')
59: || LPAD(' ', 16, '-') || LPAD(' ', 13, '-')
52: c_text_files := c_text_files || LPAD(fnd_message.get || ' ', 13, ' ');
53: fnd_message.set_name('SQLGL', 'CRM0039');
54: c_text_files := c_text_files || RPAD(fnd_message.get, 14, ' ');
55: fnd_file.put_line(fnd_file.output, c_text_files);
56: fnd_file.put_line(fnd_file.output,
57: LPAD(' ', 31, '-') || LPAD(' ', 15, '-')
58: || LPAD(' ', 15, '-') || LPAD(' ', 16, '-')
59: || LPAD(' ', 16, '-') || LPAD(' ', 13, '-')
60: || LPAD(' ', 13, '-') || LPAD('-', 14, '-'));
64: -------------------------------------------------------------------
65: PROCEDURE print_delete_user_rate_warning IS
66: c_text_files VARCHAR2(200);
67: BEGIN
68: fnd_file.put_line(fnd_file.output, ' ');
69: fnd_file.put_line(fnd_file.output, ' ');
70: fnd_message.set_name('SQLGL', 'CRM0027');
71: fnd_file.put_line(fnd_file.output,
72: LPAD(' ', 45, '=') || fnd_message.get
65: PROCEDURE print_delete_user_rate_warning IS
66: c_text_files VARCHAR2(200);
67: BEGIN
68: fnd_file.put_line(fnd_file.output, ' ');
69: fnd_file.put_line(fnd_file.output, ' ');
70: fnd_message.set_name('SQLGL', 'CRM0027');
71: fnd_file.put_line(fnd_file.output,
72: LPAD(' ', 45, '=') || fnd_message.get
73: || RPAD(' ', 46, '='));
67: BEGIN
68: fnd_file.put_line(fnd_file.output, ' ');
69: fnd_file.put_line(fnd_file.output, ' ');
70: fnd_message.set_name('SQLGL', 'CRM0027');
71: fnd_file.put_line(fnd_file.output,
72: LPAD(' ', 45, '=') || fnd_message.get
73: || RPAD(' ', 46, '='));
74: fnd_file.put_line(fnd_file.output, ' ');
75: fnd_message.set_name('SQLGL', 'CRM0032');
70: fnd_message.set_name('SQLGL', 'CRM0027');
71: fnd_file.put_line(fnd_file.output,
72: LPAD(' ', 45, '=') || fnd_message.get
73: || RPAD(' ', 46, '='));
74: fnd_file.put_line(fnd_file.output, ' ');
75: fnd_message.set_name('SQLGL', 'CRM0032');
76: c_text_files := RPAD(fnd_message.get, 31, ' ');
77: fnd_message.set_name('SQLGL', 'CRM0040');
78: c_text_files := c_text_files || RPAD(fnd_message.get, 30, ' ');
83: fnd_message.set_name('SQLGL', 'CRM0037');
84: c_text_files := c_text_files || LPAD(fnd_message.get || ' ', 13, ' ');
85: fnd_message.set_name('SQLGL', 'CRM0041');
86: c_text_files := c_text_files || RPAD(fnd_message.get, 26, ' ');
87: fnd_file.put_line(fnd_file.output, c_text_files);
88: fnd_file.put_line(fnd_file.output,
89: LPAD(' ', 31, '-') || LPAD(' ', 30, '-')
90: || LPAD(' ', 16, '-') || LPAD(' ', 16, '-')
91: || LPAD(' ', 13, '-') || LPAD('-', 26, '-'));
84: c_text_files := c_text_files || LPAD(fnd_message.get || ' ', 13, ' ');
85: fnd_message.set_name('SQLGL', 'CRM0041');
86: c_text_files := c_text_files || RPAD(fnd_message.get, 26, ' ');
87: fnd_file.put_line(fnd_file.output, c_text_files);
88: fnd_file.put_line(fnd_file.output,
89: LPAD(' ', 31, '-') || LPAD(' ', 30, '-')
90: || LPAD(' ', 16, '-') || LPAD(' ', 16, '-')
91: || LPAD(' ', 13, '-') || LPAD('-', 26, '-'));
92: page_line_count := page_line_count + 6;
95: -------------------------------------------------------------------
96: PROCEDURE print_override_user_rate_warn IS
97: c_text_files VARCHAR2(200);
98: BEGIN
99: fnd_file.put_line(fnd_file.output, ' ');
100: fnd_file.put_line(fnd_file.output, ' ');
101: fnd_message.set_name('SQLGL', 'CRM0028');
102: fnd_file.put_line(fnd_file.output,
103: LPAD(' ', 45, '=') || fnd_message.get
96: PROCEDURE print_override_user_rate_warn IS
97: c_text_files VARCHAR2(200);
98: BEGIN
99: fnd_file.put_line(fnd_file.output, ' ');
100: fnd_file.put_line(fnd_file.output, ' ');
101: fnd_message.set_name('SQLGL', 'CRM0028');
102: fnd_file.put_line(fnd_file.output,
103: LPAD(' ', 45, '=') || fnd_message.get
104: || RPAD(' ', 46, '='));
98: BEGIN
99: fnd_file.put_line(fnd_file.output, ' ');
100: fnd_file.put_line(fnd_file.output, ' ');
101: fnd_message.set_name('SQLGL', 'CRM0028');
102: fnd_file.put_line(fnd_file.output,
103: LPAD(' ', 45, '=') || fnd_message.get
104: || RPAD(' ', 46, '='));
105: fnd_file.put_line(fnd_file.output, ' ');
106: fnd_message.set_name('SQLGL', 'CRM0032');
101: fnd_message.set_name('SQLGL', 'CRM0028');
102: fnd_file.put_line(fnd_file.output,
103: LPAD(' ', 45, '=') || fnd_message.get
104: || RPAD(' ', 46, '='));
105: fnd_file.put_line(fnd_file.output, ' ');
106: fnd_message.set_name('SQLGL', 'CRM0032');
107: c_text_files := RPAD(fnd_message.get, 31, ' ');
108: fnd_message.set_name('SQLGL', 'CRM0040');
109: c_text_files := c_text_files || RPAD(fnd_message.get, 30, ' ');
114: fnd_message.set_name('SQLGL', 'CRM0037');
115: c_text_files := c_text_files || LPAD(fnd_message.get || ' ', 13, ' ');
116: fnd_message.set_name('SQLGL', 'CRM0041');
117: c_text_files := c_text_files || RPAD(fnd_message.get, 26, ' ');
118: fnd_file.put_line(fnd_file.output, c_text_files);
119: fnd_file.put_line(fnd_file.output,
120: LPAD(' ', 31, '-') || LPAD(' ', 30, '-')
121: || LPAD(' ', 16, '-') || LPAD(' ', 16, '-')
122: || LPAD(' ', 13, '-') || LPAD('-', 26, '-'));
115: c_text_files := c_text_files || LPAD(fnd_message.get || ' ', 13, ' ');
116: fnd_message.set_name('SQLGL', 'CRM0041');
117: c_text_files := c_text_files || RPAD(fnd_message.get, 26, ' ');
118: fnd_file.put_line(fnd_file.output, c_text_files);
119: fnd_file.put_line(fnd_file.output,
120: LPAD(' ', 31, '-') || LPAD(' ', 30, '-')
121: || LPAD(' ', 16, '-') || LPAD(' ', 16, '-')
122: || LPAD(' ', 13, '-') || LPAD('-', 26, '-'));
123: page_line_count := page_line_count + 6;
126: -------------------------------------------------------------------
127: PROCEDURE print_delete_sys_rate_warning IS
128: c_text_files VARCHAR2(200);
129: BEGIN
130: fnd_file.put_line(fnd_file.output, ' ');
131: fnd_file.put_line(fnd_file.output, ' ');
132: fnd_message.set_name('SQLGL', 'CRM0029');
133: fnd_file.put_line(fnd_file.output,
134: LPAD(' ', 43, '=') || fnd_message.get
127: PROCEDURE print_delete_sys_rate_warning IS
128: c_text_files VARCHAR2(200);
129: BEGIN
130: fnd_file.put_line(fnd_file.output, ' ');
131: fnd_file.put_line(fnd_file.output, ' ');
132: fnd_message.set_name('SQLGL', 'CRM0029');
133: fnd_file.put_line(fnd_file.output,
134: LPAD(' ', 43, '=') || fnd_message.get
135: || RPAD(' ', 44, '='));
129: BEGIN
130: fnd_file.put_line(fnd_file.output, ' ');
131: fnd_file.put_line(fnd_file.output, ' ');
132: fnd_message.set_name('SQLGL', 'CRM0029');
133: fnd_file.put_line(fnd_file.output,
134: LPAD(' ', 43, '=') || fnd_message.get
135: || RPAD(' ', 44, '='));
136: fnd_file.put_line(fnd_file.output, ' ');
137: fnd_message.set_name('SQLGL', 'CRM0032');
132: fnd_message.set_name('SQLGL', 'CRM0029');
133: fnd_file.put_line(fnd_file.output,
134: LPAD(' ', 43, '=') || fnd_message.get
135: || RPAD(' ', 44, '='));
136: fnd_file.put_line(fnd_file.output, ' ');
137: fnd_message.set_name('SQLGL', 'CRM0032');
138: c_text_files := RPAD(fnd_message.get, 31, ' ');
139: fnd_message.set_name('SQLGL', 'CRM0040');
140: c_text_files := c_text_files || RPAD(fnd_message.get, 30, ' ');
145: fnd_message.set_name('SQLGL', 'CRM0037');
146: c_text_files := c_text_files || LPAD(fnd_message.get || ' ', 13, ' ');
147: fnd_message.set_name('SQLGL', 'CRM0041');
148: c_text_files := c_text_files || RPAD(fnd_message.get, 26, ' ');
149: fnd_file.put_line(fnd_file.output, c_text_files);
150: fnd_file.put_line(fnd_file.output,
151: LPAD(' ', 31, '-') || LPAD(' ', 30, '-')
152: || LPAD(' ', 16, '-') || LPAD(' ', 16, '-')
153: || LPAD(' ', 13, '-') || LPAD('-', 26, '-'));
146: c_text_files := c_text_files || LPAD(fnd_message.get || ' ', 13, ' ');
147: fnd_message.set_name('SQLGL', 'CRM0041');
148: c_text_files := c_text_files || RPAD(fnd_message.get, 26, ' ');
149: fnd_file.put_line(fnd_file.output, c_text_files);
150: fnd_file.put_line(fnd_file.output,
151: LPAD(' ', 31, '-') || LPAD(' ', 30, '-')
152: || LPAD(' ', 16, '-') || LPAD(' ', 16, '-')
153: || LPAD(' ', 13, '-') || LPAD('-', 26, '-'));
154: page_line_count := page_line_count + 6;
157: -------------------------------------------------------------------
158: PROCEDURE print_override_sys_rate_warn IS
159: c_text_files VARCHAR2(200);
160: BEGIN
161: fnd_file.put_line(fnd_file.output, ' ');
162: fnd_file.put_line(fnd_file.output, ' ');
163: fnd_message.set_name('SQLGL', 'CRM0030');
164: fnd_file.put_line(fnd_file.output,
165: LPAD(' ', 43, '=') || fnd_message.get
158: PROCEDURE print_override_sys_rate_warn IS
159: c_text_files VARCHAR2(200);
160: BEGIN
161: fnd_file.put_line(fnd_file.output, ' ');
162: fnd_file.put_line(fnd_file.output, ' ');
163: fnd_message.set_name('SQLGL', 'CRM0030');
164: fnd_file.put_line(fnd_file.output,
165: LPAD(' ', 43, '=') || fnd_message.get
166: || RPAD(' ', 44, '='));
160: BEGIN
161: fnd_file.put_line(fnd_file.output, ' ');
162: fnd_file.put_line(fnd_file.output, ' ');
163: fnd_message.set_name('SQLGL', 'CRM0030');
164: fnd_file.put_line(fnd_file.output,
165: LPAD(' ', 43, '=') || fnd_message.get
166: || RPAD(' ', 44, '='));
167: fnd_file.put_line(fnd_file.output, ' ');
168: fnd_message.set_name('SQLGL', 'CRM0032');
163: fnd_message.set_name('SQLGL', 'CRM0030');
164: fnd_file.put_line(fnd_file.output,
165: LPAD(' ', 43, '=') || fnd_message.get
166: || RPAD(' ', 44, '='));
167: fnd_file.put_line(fnd_file.output, ' ');
168: fnd_message.set_name('SQLGL', 'CRM0032');
169: c_text_files := RPAD(fnd_message.get, 31, ' ');
170: fnd_message.set_name('SQLGL', 'CRM0040');
171: c_text_files := c_text_files || RPAD(fnd_message.get, 30, ' ');
176: fnd_message.set_name('SQLGL', 'CRM0037');
177: c_text_files := c_text_files || LPAD(fnd_message.get || ' ', 13, ' ');
178: fnd_message.set_name('SQLGL', 'CRM0041');
179: c_text_files := c_text_files || RPAD(fnd_message.get, 26, ' ');
180: fnd_file.put_line(fnd_file.output, c_text_files);
181: fnd_file.put_line(fnd_file.output,
182: LPAD(' ', 31, '-') || LPAD(' ', 30, '-')
183: || LPAD(' ', 16, '-') || LPAD(' ', 16, '-')
184: || LPAD(' ', 13, '-') || LPAD('-', 26, '-'));
177: c_text_files := c_text_files || LPAD(fnd_message.get || ' ', 13, ' ');
178: fnd_message.set_name('SQLGL', 'CRM0041');
179: c_text_files := c_text_files || RPAD(fnd_message.get, 26, ' ');
180: fnd_file.put_line(fnd_file.output, c_text_files);
181: fnd_file.put_line(fnd_file.output,
182: LPAD(' ', 31, '-') || LPAD(' ', 30, '-')
183: || LPAD(' ', 16, '-') || LPAD(' ', 16, '-')
184: || LPAD(' ', 13, '-') || LPAD('-', 26, '-'));
185: page_line_count := page_line_count + 6;
188: -------------------------------------------------------------------
189: PROCEDURE print_missing_pivot_rate IS
190: c_text_files VARCHAR2(200);
191: BEGIN
192: fnd_file.put_line(fnd_file.output, ' ');
193: fnd_file.put_line(fnd_file.output, ' ');
194: fnd_message.set_name('SQLGL', 'CRM0031');
195: fnd_file.put_line(fnd_file.output,
196: LPAD(' ', 51, '=') || fnd_message.get
189: PROCEDURE print_missing_pivot_rate IS
190: c_text_files VARCHAR2(200);
191: BEGIN
192: fnd_file.put_line(fnd_file.output, ' ');
193: fnd_file.put_line(fnd_file.output, ' ');
194: fnd_message.set_name('SQLGL', 'CRM0031');
195: fnd_file.put_line(fnd_file.output,
196: LPAD(' ', 51, '=') || fnd_message.get
197: || RPAD(' ', 51, '='));
191: BEGIN
192: fnd_file.put_line(fnd_file.output, ' ');
193: fnd_file.put_line(fnd_file.output, ' ');
194: fnd_message.set_name('SQLGL', 'CRM0031');
195: fnd_file.put_line(fnd_file.output,
196: LPAD(' ', 51, '=') || fnd_message.get
197: || RPAD(' ', 51, '='));
198: fnd_file.put_line(fnd_file.output, ' ');
199: fnd_message.set_name('SQLGL', 'CRM0032');
194: fnd_message.set_name('SQLGL', 'CRM0031');
195: fnd_file.put_line(fnd_file.output,
196: LPAD(' ', 51, '=') || fnd_message.get
197: || RPAD(' ', 51, '='));
198: fnd_file.put_line(fnd_file.output, ' ');
199: fnd_message.set_name('SQLGL', 'CRM0032');
200: c_text_files := RPAD(fnd_message.get, 31, ' ');
201: fnd_message.set_name('SQLGL', 'CRM0040');
202: c_text_files := c_text_files || RPAD(fnd_message.get, 30, ' ');
203: fnd_message.set_name('SQLGL', 'CRM0042');
204: c_text_files := c_text_files || RPAD(fnd_message.get, 16, ' ');
205: fnd_message.set_name('SQLGL', 'CRM0043');
206: c_text_files := c_text_files || RPAD(fnd_message.get, 16, ' ');
207: fnd_file.put_line(fnd_file.output, c_text_files);
208: fnd_file.put_line(fnd_file.output,
209: LPAD(' ', 31, '-') || LPAD(' ', 30, '-')
210: || LPAD(' ', 16, '-') || LPAD('-', 16, '-'));
211: page_line_count := page_line_count + 6;
204: c_text_files := c_text_files || RPAD(fnd_message.get, 16, ' ');
205: fnd_message.set_name('SQLGL', 'CRM0043');
206: c_text_files := c_text_files || RPAD(fnd_message.get, 16, ' ');
207: fnd_file.put_line(fnd_file.output, c_text_files);
208: fnd_file.put_line(fnd_file.output,
209: LPAD(' ', 31, '-') || LPAD(' ', 30, '-')
210: || LPAD(' ', 16, '-') || LPAD('-', 16, '-'));
211: page_line_count := page_line_count + 6;
212: END print_missing_pivot_rate;
213:
214: -------------------------------------------------------------------
215: PROCEDURE print_validation_failure_codes IS
216: BEGIN
217: fnd_file.put_line(fnd_file.output, ' ');
218: fnd_file.put_line(fnd_file.output, ' ');
219: fnd_message.set_name('SQLGL', 'CRM0022');
220: fnd_file.put_line(fnd_file.output,
221: LPAD(' ', 61, '=') || fnd_message.get
214: -------------------------------------------------------------------
215: PROCEDURE print_validation_failure_codes IS
216: BEGIN
217: fnd_file.put_line(fnd_file.output, ' ');
218: fnd_file.put_line(fnd_file.output, ' ');
219: fnd_message.set_name('SQLGL', 'CRM0022');
220: fnd_file.put_line(fnd_file.output,
221: LPAD(' ', 61, '=') || fnd_message.get
222: || RPAD(' ', 61, '='));
216: BEGIN
217: fnd_file.put_line(fnd_file.output, ' ');
218: fnd_file.put_line(fnd_file.output, ' ');
219: fnd_message.set_name('SQLGL', 'CRM0022');
220: fnd_file.put_line(fnd_file.output,
221: LPAD(' ', 61, '=') || fnd_message.get
222: || RPAD(' ', 61, '='));
223: fnd_file.put_line(fnd_file.output, ' ');
224: fnd_message.set_name('SQLGL', 'CRM0021');
219: fnd_message.set_name('SQLGL', 'CRM0022');
220: fnd_file.put_line(fnd_file.output,
221: LPAD(' ', 61, '=') || fnd_message.get
222: || RPAD(' ', 61, '='));
223: fnd_file.put_line(fnd_file.output, ' ');
224: fnd_message.set_name('SQLGL', 'CRM0021');
225: fnd_file.put_line(fnd_file.output, fnd_message.get);
226: fnd_file.put_line(fnd_file.output, RPAD('-', 133, '-'));
227: fnd_message.set_name('SQLGL', 'CRM0007');
221: LPAD(' ', 61, '=') || fnd_message.get
222: || RPAD(' ', 61, '='));
223: fnd_file.put_line(fnd_file.output, ' ');
224: fnd_message.set_name('SQLGL', 'CRM0021');
225: fnd_file.put_line(fnd_file.output, fnd_message.get);
226: fnd_file.put_line(fnd_file.output, RPAD('-', 133, '-'));
227: fnd_message.set_name('SQLGL', 'CRM0007');
228: fnd_file.put_line(fnd_file.output, ' VF01 ' || fnd_message.get);
229: fnd_message.set_name('SQLGL', 'CRM0008');
222: || RPAD(' ', 61, '='));
223: fnd_file.put_line(fnd_file.output, ' ');
224: fnd_message.set_name('SQLGL', 'CRM0021');
225: fnd_file.put_line(fnd_file.output, fnd_message.get);
226: fnd_file.put_line(fnd_file.output, RPAD('-', 133, '-'));
227: fnd_message.set_name('SQLGL', 'CRM0007');
228: fnd_file.put_line(fnd_file.output, ' VF01 ' || fnd_message.get);
229: fnd_message.set_name('SQLGL', 'CRM0008');
230: fnd_file.put_line(fnd_file.output, ' VF02 ' || fnd_message.get);
224: fnd_message.set_name('SQLGL', 'CRM0021');
225: fnd_file.put_line(fnd_file.output, fnd_message.get);
226: fnd_file.put_line(fnd_file.output, RPAD('-', 133, '-'));
227: fnd_message.set_name('SQLGL', 'CRM0007');
228: fnd_file.put_line(fnd_file.output, ' VF01 ' || fnd_message.get);
229: fnd_message.set_name('SQLGL', 'CRM0008');
230: fnd_file.put_line(fnd_file.output, ' VF02 ' || fnd_message.get);
231: fnd_message.set_name('SQLGL', 'CRM0009');
232: fnd_file.put_line(fnd_file.output, ' VF03 ' || fnd_message.get);
226: fnd_file.put_line(fnd_file.output, RPAD('-', 133, '-'));
227: fnd_message.set_name('SQLGL', 'CRM0007');
228: fnd_file.put_line(fnd_file.output, ' VF01 ' || fnd_message.get);
229: fnd_message.set_name('SQLGL', 'CRM0008');
230: fnd_file.put_line(fnd_file.output, ' VF02 ' || fnd_message.get);
231: fnd_message.set_name('SQLGL', 'CRM0009');
232: fnd_file.put_line(fnd_file.output, ' VF03 ' || fnd_message.get);
233: fnd_message.set_name('SQLGL', 'CRM0010');
234: fnd_file.put_line(fnd_file.output, ' VF04 ' || fnd_message.get);
228: fnd_file.put_line(fnd_file.output, ' VF01 ' || fnd_message.get);
229: fnd_message.set_name('SQLGL', 'CRM0008');
230: fnd_file.put_line(fnd_file.output, ' VF02 ' || fnd_message.get);
231: fnd_message.set_name('SQLGL', 'CRM0009');
232: fnd_file.put_line(fnd_file.output, ' VF03 ' || fnd_message.get);
233: fnd_message.set_name('SQLGL', 'CRM0010');
234: fnd_file.put_line(fnd_file.output, ' VF04 ' || fnd_message.get);
235: fnd_message.set_name('SQLGL', 'CRM0011');
236: fnd_file.put_line(fnd_file.output, ' VF05 ' || fnd_message.get);
230: fnd_file.put_line(fnd_file.output, ' VF02 ' || fnd_message.get);
231: fnd_message.set_name('SQLGL', 'CRM0009');
232: fnd_file.put_line(fnd_file.output, ' VF03 ' || fnd_message.get);
233: fnd_message.set_name('SQLGL', 'CRM0010');
234: fnd_file.put_line(fnd_file.output, ' VF04 ' || fnd_message.get);
235: fnd_message.set_name('SQLGL', 'CRM0011');
236: fnd_file.put_line(fnd_file.output, ' VF05 ' || fnd_message.get);
237: fnd_message.set_name('SQLGL', 'CRM0012');
238: fnd_file.put_line(fnd_file.output, ' VF06 ' || fnd_message.get);
232: fnd_file.put_line(fnd_file.output, ' VF03 ' || fnd_message.get);
233: fnd_message.set_name('SQLGL', 'CRM0010');
234: fnd_file.put_line(fnd_file.output, ' VF04 ' || fnd_message.get);
235: fnd_message.set_name('SQLGL', 'CRM0011');
236: fnd_file.put_line(fnd_file.output, ' VF05 ' || fnd_message.get);
237: fnd_message.set_name('SQLGL', 'CRM0012');
238: fnd_file.put_line(fnd_file.output, ' VF06 ' || fnd_message.get);
239: fnd_message.set_name('SQLGL', 'CRM0013');
240: fnd_file.put_line(fnd_file.output, ' VF07 ' || fnd_message.get);
234: fnd_file.put_line(fnd_file.output, ' VF04 ' || fnd_message.get);
235: fnd_message.set_name('SQLGL', 'CRM0011');
236: fnd_file.put_line(fnd_file.output, ' VF05 ' || fnd_message.get);
237: fnd_message.set_name('SQLGL', 'CRM0012');
238: fnd_file.put_line(fnd_file.output, ' VF06 ' || fnd_message.get);
239: fnd_message.set_name('SQLGL', 'CRM0013');
240: fnd_file.put_line(fnd_file.output, ' VF07 ' || fnd_message.get);
241: fnd_message.set_name('SQLGL', 'CRM0014');
242: fnd_file.put_line(fnd_file.output, ' VF08 ' || fnd_message.get);
236: fnd_file.put_line(fnd_file.output, ' VF05 ' || fnd_message.get);
237: fnd_message.set_name('SQLGL', 'CRM0012');
238: fnd_file.put_line(fnd_file.output, ' VF06 ' || fnd_message.get);
239: fnd_message.set_name('SQLGL', 'CRM0013');
240: fnd_file.put_line(fnd_file.output, ' VF07 ' || fnd_message.get);
241: fnd_message.set_name('SQLGL', 'CRM0014');
242: fnd_file.put_line(fnd_file.output, ' VF08 ' || fnd_message.get);
243: fnd_message.set_name('SQLGL', 'CRM0015');
244: fnd_file.put_line(fnd_file.output, ' VF09 ' || fnd_message.get);
238: fnd_file.put_line(fnd_file.output, ' VF06 ' || fnd_message.get);
239: fnd_message.set_name('SQLGL', 'CRM0013');
240: fnd_file.put_line(fnd_file.output, ' VF07 ' || fnd_message.get);
241: fnd_message.set_name('SQLGL', 'CRM0014');
242: fnd_file.put_line(fnd_file.output, ' VF08 ' || fnd_message.get);
243: fnd_message.set_name('SQLGL', 'CRM0015');
244: fnd_file.put_line(fnd_file.output, ' VF09 ' || fnd_message.get);
245: fnd_message.set_name('SQLGL', 'CRM0016');
246: fnd_file.put_line(fnd_file.output, ' VF10 ' || fnd_message.get);
240: fnd_file.put_line(fnd_file.output, ' VF07 ' || fnd_message.get);
241: fnd_message.set_name('SQLGL', 'CRM0014');
242: fnd_file.put_line(fnd_file.output, ' VF08 ' || fnd_message.get);
243: fnd_message.set_name('SQLGL', 'CRM0015');
244: fnd_file.put_line(fnd_file.output, ' VF09 ' || fnd_message.get);
245: fnd_message.set_name('SQLGL', 'CRM0016');
246: fnd_file.put_line(fnd_file.output, ' VF10 ' || fnd_message.get);
247: fnd_message.set_name('SQLGL', 'CRM0017');
248: fnd_file.put_line(fnd_file.output, ' VF11 ' || fnd_message.get);
242: fnd_file.put_line(fnd_file.output, ' VF08 ' || fnd_message.get);
243: fnd_message.set_name('SQLGL', 'CRM0015');
244: fnd_file.put_line(fnd_file.output, ' VF09 ' || fnd_message.get);
245: fnd_message.set_name('SQLGL', 'CRM0016');
246: fnd_file.put_line(fnd_file.output, ' VF10 ' || fnd_message.get);
247: fnd_message.set_name('SQLGL', 'CRM0017');
248: fnd_file.put_line(fnd_file.output, ' VF11 ' || fnd_message.get);
249: fnd_message.set_name('SQLGL', 'CRM0018');
250: fnd_file.put_line(fnd_file.output, ' VF12 ' || fnd_message.get);
244: fnd_file.put_line(fnd_file.output, ' VF09 ' || fnd_message.get);
245: fnd_message.set_name('SQLGL', 'CRM0016');
246: fnd_file.put_line(fnd_file.output, ' VF10 ' || fnd_message.get);
247: fnd_message.set_name('SQLGL', 'CRM0017');
248: fnd_file.put_line(fnd_file.output, ' VF11 ' || fnd_message.get);
249: fnd_message.set_name('SQLGL', 'CRM0018');
250: fnd_file.put_line(fnd_file.output, ' VF12 ' || fnd_message.get);
251: fnd_message.set_name('SQLGL', 'CRM0019');
252: fnd_file.put_line(fnd_file.output, ' VF13 ' || fnd_message.get);
246: fnd_file.put_line(fnd_file.output, ' VF10 ' || fnd_message.get);
247: fnd_message.set_name('SQLGL', 'CRM0017');
248: fnd_file.put_line(fnd_file.output, ' VF11 ' || fnd_message.get);
249: fnd_message.set_name('SQLGL', 'CRM0018');
250: fnd_file.put_line(fnd_file.output, ' VF12 ' || fnd_message.get);
251: fnd_message.set_name('SQLGL', 'CRM0019');
252: fnd_file.put_line(fnd_file.output, ' VF13 ' || fnd_message.get);
253: fnd_message.set_name('SQLGL', 'CRM0020');
254: fnd_file.put_line(fnd_file.output, ' VF14 ' || fnd_message.get);
248: fnd_file.put_line(fnd_file.output, ' VF11 ' || fnd_message.get);
249: fnd_message.set_name('SQLGL', 'CRM0018');
250: fnd_file.put_line(fnd_file.output, ' VF12 ' || fnd_message.get);
251: fnd_message.set_name('SQLGL', 'CRM0019');
252: fnd_file.put_line(fnd_file.output, ' VF13 ' || fnd_message.get);
253: fnd_message.set_name('SQLGL', 'CRM0020');
254: fnd_file.put_line(fnd_file.output, ' VF14 ' || fnd_message.get);
255: fnd_message.set_name('SQLGL', 'CRM0044');
256: fnd_file.put_line(fnd_file.output, ' VF15 ' || fnd_message.get);
250: fnd_file.put_line(fnd_file.output, ' VF12 ' || fnd_message.get);
251: fnd_message.set_name('SQLGL', 'CRM0019');
252: fnd_file.put_line(fnd_file.output, ' VF13 ' || fnd_message.get);
253: fnd_message.set_name('SQLGL', 'CRM0020');
254: fnd_file.put_line(fnd_file.output, ' VF14 ' || fnd_message.get);
255: fnd_message.set_name('SQLGL', 'CRM0044');
256: fnd_file.put_line(fnd_file.output, ' VF15 ' || fnd_message.get);
257: END print_validation_failure_codes;
258:
252: fnd_file.put_line(fnd_file.output, ' VF13 ' || fnd_message.get);
253: fnd_message.set_name('SQLGL', 'CRM0020');
254: fnd_file.put_line(fnd_file.output, ' VF14 ' || fnd_message.get);
255: fnd_message.set_name('SQLGL', 'CRM0044');
256: fnd_file.put_line(fnd_file.output, ' VF15 ' || fnd_message.get);
257: END print_validation_failure_codes;
258:
259: -------------------------------------------------------------------
260: PROCEDURE insert_cross_rate_set(
650: AND dr.conversion_date BETWEEN ri.from_conversion_date
651: AND ri.to_conversion_date)));
652:
653: IF DEBUG_MODE THEN
654: fnd_file.put_line(fnd_file.LOG,
655: SQL%ROWCOUNT || ' Error records');
656: END IF;
657:
658: UPDATE gl_daily_rates_interface
659: SET inverse_conversion_rate = 1 / conversion_rate
660: WHERE inverse_conversion_rate IS NULL AND conversion_rate > 0;
661:
662: IF DEBUG_MODE THEN
663: fnd_file.put_line
664: (fnd_file.LOG,
665: 'Finish Validation on GL_DAILY_RATES_INTERFACE table.');
666: END IF;
667:
660: WHERE inverse_conversion_rate IS NULL AND conversion_rate > 0;
661:
662: IF DEBUG_MODE THEN
663: fnd_file.put_line
664: (fnd_file.LOG,
665: 'Finish Validation on GL_DAILY_RATES_INTERFACE table.');
666: END IF;
667:
668: SELECT from_currency,
706: gl_crm_utilities_pkg.print_validation_failure;
707: END IF;
708:
709: page_line_count := page_line_count + 1;
710: fnd_file.put_line
711: (fnd_file.output,
712: RPAD(daily_rate_validation_failure.r_type(i), 31, ' ')
713: || RPAD(daily_rate_validation_failure.r_from_date(i), 15,
714: ' ')
707: END IF;
708:
709: page_line_count := page_line_count + 1;
710: fnd_file.put_line
711: (fnd_file.output,
712: RPAD(daily_rate_validation_failure.r_type(i), 31, ' ')
713: || RPAD(daily_rate_validation_failure.r_from_date(i), 15,
714: ' ')
715: || RPAD(daily_rate_validation_failure.r_to_date(i), 15,
729:
730: IF page_line_count >= page_line_numbers - 2 THEN
731: page_line_count := 1;
732: page_count := page_count + 1;
733: fnd_file.put_line(fnd_file.output, ' ');
734: fnd_file.put_line(fnd_file.output, ' ');
735: END IF;
736: END LOOP;
737:
730: IF page_line_count >= page_line_numbers - 2 THEN
731: page_line_count := 1;
732: page_count := page_count + 1;
733: fnd_file.put_line(fnd_file.output, ' ');
734: fnd_file.put_line(fnd_file.output, ' ');
735: END IF;
736: END LOOP;
737:
738: IF DEBUG_MODE THEN
736: END LOOP;
737:
738: IF DEBUG_MODE THEN
739: IF page_count * page_line_count = 1 THEN
740: fnd_file.put_line(fnd_file.LOG, 'No Validation Failure.');
741: ELSE
742: fnd_file.put_line(fnd_file.LOG,
743: page_count * page_line_count - 1
744: || ' rows failed validation.');
738: IF DEBUG_MODE THEN
739: IF page_count * page_line_count = 1 THEN
740: fnd_file.put_line(fnd_file.LOG, 'No Validation Failure.');
741: ELSE
742: fnd_file.put_line(fnd_file.LOG,
743: page_count * page_line_count - 1
744: || ' rows failed validation.');
745: END IF;
746: END IF;
759: END IF;
760:
761: IF (golden_rule_flag = 'SYSTEM') OR(golden_rule_flag = 'BOTH') THEN
762: IF DEBUG_MODE THEN
763: fnd_file.put_line
764: (fnd_file.LOG,
765: 'Searching system rates that cannot be override.');
766: END IF;
767:
760:
761: IF (golden_rule_flag = 'SYSTEM') OR(golden_rule_flag = 'BOTH') THEN
762: IF DEBUG_MODE THEN
763: fnd_file.put_line
764: (fnd_file.LOG,
765: 'Searching system rates that cannot be override.');
766: END IF;
767:
768: /*********************************************************************************
800: AND dr.conversion_type = gldct.conversion_type;
801:
802: IF DEBUG_MODE THEN
803: IF sys_daily_rate_cannot_delete.r_from_curr.COUNT > 0 THEN
804: fnd_file.put_line
805: (fnd_file.LOG,
806: sys_daily_rate_cannot_delete.r_from_curr.COUNT
807: || ' system rates found (which cannot be deleted)!');
808: ELSE
801:
802: IF DEBUG_MODE THEN
803: IF sys_daily_rate_cannot_delete.r_from_curr.COUNT > 0 THEN
804: fnd_file.put_line
805: (fnd_file.LOG,
806: sys_daily_rate_cannot_delete.r_from_curr.COUNT
807: || ' system rates found (which cannot be deleted)!');
808: ELSE
809: fnd_file.put_line
805: (fnd_file.LOG,
806: sys_daily_rate_cannot_delete.r_from_curr.COUNT
807: || ' system rates found (which cannot be deleted)!');
808: ELSE
809: fnd_file.put_line
810: (fnd_file.LOG,
811: 'No system rate found (which cannot be deleted)!');
812: END IF;
813: END IF;
806: sys_daily_rate_cannot_delete.r_from_curr.COUNT
807: || ' system rates found (which cannot be deleted)!');
808: ELSE
809: fnd_file.put_line
810: (fnd_file.LOG,
811: 'No system rate found (which cannot be deleted)!');
812: END IF;
813: END IF;
814:
820: gl_crm_utilities_pkg.print_delete_user_rate_warning;
821: END IF;
822:
823: page_line_count := page_line_count + 1;
824: fnd_file.put_line
825: (fnd_file.output,
826: RPAD(sys_daily_rate_cannot_delete.r_type(i), 31, ' ')
827: || RPAD
828: (sys_daily_rate_cannot_delete.r_conversion_date(i),
821: END IF;
822:
823: page_line_count := page_line_count + 1;
824: fnd_file.put_line
825: (fnd_file.output,
826: RPAD(sys_daily_rate_cannot_delete.r_type(i), 31, ' ')
827: || RPAD
828: (sys_daily_rate_cannot_delete.r_conversion_date(i),
829: 30, ' ')
839:
840: IF page_line_count >= page_line_numbers - 2 THEN
841: page_line_count := 1;
842: page_count := page_count + 1;
843: fnd_file.put_line(fnd_file.output, ' ');
844: fnd_file.put_line(fnd_file.output, ' ');
845: END IF;
846: END LOOP;
847:
840: IF page_line_count >= page_line_numbers - 2 THEN
841: page_line_count := 1;
842: page_count := page_count + 1;
843: fnd_file.put_line(fnd_file.output, ' ');
844: fnd_file.put_line(fnd_file.output, ' ');
845: END IF;
846: END LOOP;
847:
848: /*********************************************************************************
890: gl_crm_utilities_pkg.print_override_user_rate_warn;
891: END IF;
892:
893: page_line_count := page_line_count + 1;
894: fnd_file.put_line
895: (fnd_file.output,
896: RPAD(sys_daily_rate_cannot_override.r_type(i), 31, ' ')
897: || RPAD
898: (sys_daily_rate_cannot_override.r_conversion_date(i),
891: END IF;
892:
893: page_line_count := page_line_count + 1;
894: fnd_file.put_line
895: (fnd_file.output,
896: RPAD(sys_daily_rate_cannot_override.r_type(i), 31, ' ')
897: || RPAD
898: (sys_daily_rate_cannot_override.r_conversion_date(i),
899: 30, ' ')
909:
910: IF page_line_count >= page_line_numbers - 2 THEN
911: page_line_count := 1;
912: page_count := page_count + 1;
913: fnd_file.put_line(fnd_file.output, ' ');
914: fnd_file.put_line(fnd_file.output, ' ');
915: END IF;
916: END LOOP;
917:
910: IF page_line_count >= page_line_numbers - 2 THEN
911: page_line_count := 1;
912: page_count := page_count + 1;
913: fnd_file.put_line(fnd_file.output, ' ');
914: fnd_file.put_line(fnd_file.output, ' ');
915: END IF;
916: END LOOP;
917:
918: IF DEBUG_MODE THEN
915: END IF;
916: END LOOP;
917:
918: IF DEBUG_MODE THEN
919: fnd_file.put_line
920: (fnd_file.LOG,
921: 'Ended finding system rates that cannot be override.');
922: END IF;
923: END IF;
916: END LOOP;
917:
918: IF DEBUG_MODE THEN
919: fnd_file.put_line
920: (fnd_file.LOG,
921: 'Ended finding system rates that cannot be override.');
922: END IF;
923: END IF;
924:
961:
962: END;
963:
964: IF DEBUG_MODE THEN
965: fnd_file.put_line
966: (fnd_file.LOG,
967: 'Marking D for rates meant to delete with types used for ab translation');
968: END IF;
969:
962: END;
963:
964: IF DEBUG_MODE THEN
965: fnd_file.put_line
966: (fnd_file.LOG,
967: 'Marking D for rates meant to delete with types used for ab translation');
968: END IF;
969:
970: UPDATE gl_daily_rates dr
1015: );
1016:
1017: -- Delete existing rows with conversion rate in GL_DAILY_RATES
1018: IF DEBUG_MODE THEN
1019: fnd_file.put_line(fnd_file.LOG,
1020: SQL%ROWCOUNT || ' rows marked');
1021: fnd_file.put_line
1022: (fnd_file.LOG,
1023: 'Deleting rates meant for insert and for deleted rates with types not used for ab translation');
1017: -- Delete existing rows with conversion rate in GL_DAILY_RATES
1018: IF DEBUG_MODE THEN
1019: fnd_file.put_line(fnd_file.LOG,
1020: SQL%ROWCOUNT || ' rows marked');
1021: fnd_file.put_line
1022: (fnd_file.LOG,
1023: 'Deleting rates meant for insert and for deleted rates with types not used for ab translation');
1024: END IF;
1025:
1018: IF DEBUG_MODE THEN
1019: fnd_file.put_line(fnd_file.LOG,
1020: SQL%ROWCOUNT || ' rows marked');
1021: fnd_file.put_line
1022: (fnd_file.LOG,
1023: 'Deleting rates meant for insert and for deleted rates with types not used for ab translation');
1024: END IF;
1025:
1026: DELETE gl_daily_rates dr
1071: + 1
1072: );
1073:
1074: IF DEBUG_MODE THEN
1075: fnd_file.put_line(fnd_file.LOG,
1076: SQL%ROWCOUNT || ' rows deleted');
1077: END IF;
1078:
1079: BEGIN
1078:
1079: BEGIN
1080: -- Insert all rows with conversion rate
1081: IF DEBUG_MODE THEN
1082: fnd_file.put_line(fnd_file.LOG, 'Insert all rates.');
1083: END IF;
1084:
1085: INSERT INTO gl_daily_rates
1086: (from_currency, to_currency, conversion_date,
1155: TRUNC(ri.from_conversion_date)
1156: + rm.multiplier - 1);
1157:
1158: IF DEBUG_MODE THEN
1159: fnd_file.put_line(fnd_file.LOG,
1160: SQL%ROWCOUNT || ' rows inserted');
1161: END IF;
1162:
1163: EXCEPTION
1162:
1163: EXCEPTION
1164: WHEN OTHERS THEN
1165: ROLLBACK;
1166: fnd_file.put_line
1167: (fnd_file.LOG,
1168: 'Error: Duplicate Row or Overlapping Date Range found.');
1169: fnd_file.put_line
1170: (fnd_file.output,
1163: EXCEPTION
1164: WHEN OTHERS THEN
1165: ROLLBACK;
1166: fnd_file.put_line
1167: (fnd_file.LOG,
1168: 'Error: Duplicate Row or Overlapping Date Range found.');
1169: fnd_file.put_line
1170: (fnd_file.output,
1171: 'Error: Duplicate Row or Overlapping Date Range found.');
1165: ROLLBACK;
1166: fnd_file.put_line
1167: (fnd_file.LOG,
1168: 'Error: Duplicate Row or Overlapping Date Range found.');
1169: fnd_file.put_line
1170: (fnd_file.output,
1171: 'Error: Duplicate Row or Overlapping Date Range found.');
1172: set_completion_status_result :=
1173: fnd_concurrent.set_completion_status
1166: fnd_file.put_line
1167: (fnd_file.LOG,
1168: 'Error: Duplicate Row or Overlapping Date Range found.');
1169: fnd_file.put_line
1170: (fnd_file.output,
1171: 'Error: Duplicate Row or Overlapping Date Range found.');
1172: set_completion_status_result :=
1173: fnd_concurrent.set_completion_status
1174: ('ERROR',
1176: END;
1177:
1178: -- Bug 4758732 JVARKEY Call to raise Business Events
1179: IF DEBUG_MODE THEN
1180: fnd_file.put_line(fnd_file.LOG, 'Firing Business events');
1181: END IF;
1182:
1183: FOR dri_rec in raise_buz_events LOOP
1184:
1202: AND rownum < 2;
1203:
1204: IF DEBUG_MODE THEN
1205: IF rows_need_calculation = 0 THEN
1206: fnd_file.put_line(fnd_file.LOG,
1207: 'NO need cross rate calculation.');
1208: ELSE
1209: fnd_file.put_line(fnd_file.LOG,
1210: 'Cross rates calculation needed.');
1205: IF rows_need_calculation = 0 THEN
1206: fnd_file.put_line(fnd_file.LOG,
1207: 'NO need cross rate calculation.');
1208: ELSE
1209: fnd_file.put_line(fnd_file.LOG,
1210: 'Cross rates calculation needed.');
1211: END IF;
1212: END IF;
1213:
1225: gl_message.func_ent('Cross Rates Calculation');
1226:
1227: -- select all the lines who can be calculate cross rate from the gl_daily_rates table
1228: IF DEBUG_MODE THEN
1229: fnd_file.put_line(fnd_file.LOG, 'Clean gl_cross_rate_temp.');
1230: END IF;
1231:
1232: DELETE FROM gl_cross_rate_temp;
1233:
1231:
1232: DELETE FROM gl_cross_rate_temp;
1233:
1234: IF DEBUG_MODE THEN
1235: fnd_file.put_line
1236: (fnd_file.LOG,
1237: 'Copy rows from interface table to gl_cross_rate_temp.');
1238: END IF;
1239:
1232: DELETE FROM gl_cross_rate_temp;
1233:
1234: IF DEBUG_MODE THEN
1235: fnd_file.put_line
1236: (fnd_file.LOG,
1237: 'Copy rows from interface table to gl_cross_rate_temp.');
1238: END IF;
1239:
1240: INSERT INTO gl_cross_rate_temp
1294: gldri.from_currency)
1295: AND glcrsd.enabled_flag = 'Y';
1296:
1297: IF DEBUG_MODE THEN
1298: fnd_file.put_line(fnd_file.LOG, 'Update the used for ab translation');
1299: END IF;
1300:
1301: UPDATE gl_cross_rate_temp ri
1302: SET used_for_ab_translation =
1340:
1341: IF ((golden_rule_flag = 'USER') OR(golden_rule_flag = 'BOTH')) THEN
1342: -- user defined rates overrides, user defined rates rules
1343: IF DEBUG_MODE THEN
1344: fnd_file.put_line
1345: (fnd_file.LOG,
1346: 'User Rate Rule or Both Rule; Checking if any user-defined rates cannot been cross-deleted.');
1347: END IF;
1348:
1341: IF ((golden_rule_flag = 'USER') OR(golden_rule_flag = 'BOTH')) THEN
1342: -- user defined rates overrides, user defined rates rules
1343: IF DEBUG_MODE THEN
1344: fnd_file.put_line
1345: (fnd_file.LOG,
1346: 'User Rate Rule or Both Rule; Checking if any user-defined rates cannot been cross-deleted.');
1347: END IF;
1348:
1349: SELECT DISTINCT gldr.from_currency,
1394: gl_crm_utilities_pkg.print_delete_sys_rate_warning;
1395: END IF;
1396:
1397: page_line_count := page_line_count + 1;
1398: fnd_file.put_line
1399: (fnd_file.output,
1400: RPAD(usr_daily_rate_cannot_delete.r_type(i), 31, ' ')
1401: || RPAD
1402: (usr_daily_rate_cannot_delete.r_conversion_date(i),
1395: END IF;
1396:
1397: page_line_count := page_line_count + 1;
1398: fnd_file.put_line
1399: (fnd_file.output,
1400: RPAD(usr_daily_rate_cannot_delete.r_type(i), 31, ' ')
1401: || RPAD
1402: (usr_daily_rate_cannot_delete.r_conversion_date(i),
1403: 30, ' ')
1413:
1414: IF page_line_count >= page_line_numbers - 2 THEN
1415: page_line_count := 1;
1416: page_count := page_count + 1;
1417: fnd_file.put_line(fnd_file.output, ' ');
1418: fnd_file.put_line(fnd_file.output, ' ');
1419: END IF;
1420: END LOOP;
1421:
1414: IF page_line_count >= page_line_numbers - 2 THEN
1415: page_line_count := 1;
1416: page_count := page_count + 1;
1417: fnd_file.put_line(fnd_file.output, ' ');
1418: fnd_file.put_line(fnd_file.output, ' ');
1419: END IF;
1420: END LOOP;
1421:
1422: SELECT DISTINCT gldr.from_currency,
1467: gl_crm_utilities_pkg.print_override_sys_rate_warn;
1468: END IF;
1469:
1470: page_line_count := page_line_count + 1;
1471: fnd_file.put_line
1472: (fnd_file.output,
1473: RPAD(usr_daily_rate_cannot_override.r_type(i), 31, ' ')
1474: || RPAD
1475: (usr_daily_rate_cannot_override.r_conversion_date
1468: END IF;
1469:
1470: page_line_count := page_line_count + 1;
1471: fnd_file.put_line
1472: (fnd_file.output,
1473: RPAD(usr_daily_rate_cannot_override.r_type(i), 31, ' ')
1474: || RPAD
1475: (usr_daily_rate_cannot_override.r_conversion_date
1476: (i),
1488:
1489: IF page_line_count >= page_line_numbers - 2 THEN
1490: page_line_count := 1;
1491: page_count := page_count + 1;
1492: fnd_file.put_line(fnd_file.output, ' ');
1493: fnd_file.put_line(fnd_file.output, ' ');
1494: END IF;
1495: END LOOP;
1496: END IF;
1489: IF page_line_count >= page_line_numbers - 2 THEN
1490: page_line_count := 1;
1491: page_count := page_count + 1;
1492: fnd_file.put_line(fnd_file.output, ' ');
1493: fnd_file.put_line(fnd_file.output, ' ');
1494: END IF;
1495: END LOOP;
1496: END IF;
1497:
1496: END IF;
1497:
1498: -- if golden rule as user override, that's user rates rile, we can only delete SYSTEM rates
1499: IF DEBUG_MODE THEN
1500: fnd_file.put_line
1501: (fnd_file.LOG,
1502: 'Mark D for Cross Rates');
1503: END IF;
1504:
1497:
1498: -- if golden rule as user override, that's user rates rile, we can only delete SYSTEM rates
1499: IF DEBUG_MODE THEN
1500: fnd_file.put_line
1501: (fnd_file.LOG,
1502: 'Mark D for Cross Rates');
1503: END IF;
1504:
1505: -- For each row with conversion rate in
1560: + 1
1561: );
1562:
1563: IF DEBUG_MODE THEN
1564: fnd_file.put_line(fnd_file.LOG,
1565: SQL%ROWCOUNT || ' rows marked.');
1566: fnd_file.put_line
1567: (fnd_file.LOG,
1568: 'Delete for Cross Rates');
1562:
1563: IF DEBUG_MODE THEN
1564: fnd_file.put_line(fnd_file.LOG,
1565: SQL%ROWCOUNT || ' rows marked.');
1566: fnd_file.put_line
1567: (fnd_file.LOG,
1568: 'Delete for Cross Rates');
1569: END IF;
1570:
1563: IF DEBUG_MODE THEN
1564: fnd_file.put_line(fnd_file.LOG,
1565: SQL%ROWCOUNT || ' rows marked.');
1566: fnd_file.put_line
1567: (fnd_file.LOG,
1568: 'Delete for Cross Rates');
1569: END IF;
1570:
1571: DELETE FROM gl_daily_rates gldr
1628: + 1
1629: );
1630:
1631: IF DEBUG_MODE THEN
1632: fnd_file.put_line(fnd_file.LOG,
1633: SQL%ROWCOUNT || ' rows deleted.');
1634: END IF;
1635:
1636: UPDATE gl_cross_rate_temp rt
1650: AND rt.to_conversion_date));
1651:
1652: BEGIN
1653: IF DEBUG_MODE THEN
1654: fnd_file.put_line(fnd_file.LOG,
1655: 'creating all cross rates ....');
1656: END IF;
1657:
1658: INSERT INTO gl_daily_rates
1750: + glrm.multiplier - 1));
1751:
1752:
1753: IF DEBUG_MODE THEN
1754: fnd_file.put_line(fnd_file.LOG,
1755: SQL%ROWCOUNT || ' rows inserted.');
1756: END IF;
1757: EXCEPTION
1758: WHEN OTHERS THEN
1757: EXCEPTION
1758: WHEN OTHERS THEN
1759: ROLLBACK;
1760: gl_message.write_log('CRM0002', 0);
1761: fnd_file.put_line
1762: (fnd_file.LOG,
1763: 'Error: Duplicate Row or Overlapping Date Range found.');
1764: fnd_file.put_line
1765: (fnd_file.output,
1758: WHEN OTHERS THEN
1759: ROLLBACK;
1760: gl_message.write_log('CRM0002', 0);
1761: fnd_file.put_line
1762: (fnd_file.LOG,
1763: 'Error: Duplicate Row or Overlapping Date Range found.');
1764: fnd_file.put_line
1765: (fnd_file.output,
1766: 'Error: Duplicate Row or Overlapping Date Range found.');
1760: gl_message.write_log('CRM0002', 0);
1761: fnd_file.put_line
1762: (fnd_file.LOG,
1763: 'Error: Duplicate Row or Overlapping Date Range found.');
1764: fnd_file.put_line
1765: (fnd_file.output,
1766: 'Error: Duplicate Row or Overlapping Date Range found.');
1767: set_completion_status_result :=
1768: fnd_concurrent.set_completion_status
1761: fnd_file.put_line
1762: (fnd_file.LOG,
1763: 'Error: Duplicate Row or Overlapping Date Range found.');
1764: fnd_file.put_line
1765: (fnd_file.output,
1766: 'Error: Duplicate Row or Overlapping Date Range found.');
1767: set_completion_status_result :=
1768: fnd_concurrent.set_completion_status
1769: ('ERROR',
1781: -- Launch the Rate Change Program if needed
1782: IF (l_launch_rate_change = 'Y') THEN
1783:
1784: IF DEBUG_MODE THEN
1785: fnd_file.put_line(fnd_file.LOG,
1786: 'Launching Rate Change Program');
1787: END IF;
1788:
1789: RESULT := fnd_request.set_mode(TRUE);