60: --
61: --
62: TYPE View_Gen_Failure_Type IS -- local type
63: RECORD
64: ( business_view_name bis_vg_types.view_name_type := FND_API.G_MISS_CHAR
65: , Error_Msg_ID Number := FND_API.G_MISS_NUM
66: , Error_Msg_Name VARCHAR2(30) := FND_API.G_MISS_CHAR
67: , Error_Description VARCHAR2(2000) := FND_API.G_MISS_CHAR
68: , Error_Proc_Name VARCHAR2(100) := FND_API.G_MISS_CHAR
61: --
62: TYPE View_Gen_Failure_Type IS -- local type
63: RECORD
64: ( business_view_name bis_vg_types.view_name_type := FND_API.G_MISS_CHAR
65: , Error_Msg_ID Number := FND_API.G_MISS_NUM
66: , Error_Msg_Name VARCHAR2(30) := FND_API.G_MISS_CHAR
67: , Error_Description VARCHAR2(2000) := FND_API.G_MISS_CHAR
68: , Error_Proc_Name VARCHAR2(100) := FND_API.G_MISS_CHAR
69: , Error_Type VARCHAR2(1)
62: TYPE View_Gen_Failure_Type IS -- local type
63: RECORD
64: ( business_view_name bis_vg_types.view_name_type := FND_API.G_MISS_CHAR
65: , Error_Msg_ID Number := FND_API.G_MISS_NUM
66: , Error_Msg_Name VARCHAR2(30) := FND_API.G_MISS_CHAR
67: , Error_Description VARCHAR2(2000) := FND_API.G_MISS_CHAR
68: , Error_Proc_Name VARCHAR2(100) := FND_API.G_MISS_CHAR
69: , Error_Type VARCHAR2(1)
70: );
63: RECORD
64: ( business_view_name bis_vg_types.view_name_type := FND_API.G_MISS_CHAR
65: , Error_Msg_ID Number := FND_API.G_MISS_NUM
66: , Error_Msg_Name VARCHAR2(30) := FND_API.G_MISS_CHAR
67: , Error_Description VARCHAR2(2000) := FND_API.G_MISS_CHAR
68: , Error_Proc_Name VARCHAR2(100) := FND_API.G_MISS_CHAR
69: , Error_Type VARCHAR2(1)
70: );
71: --
64: ( business_view_name bis_vg_types.view_name_type := FND_API.G_MISS_CHAR
65: , Error_Msg_ID Number := FND_API.G_MISS_NUM
66: , Error_Msg_Name VARCHAR2(30) := FND_API.G_MISS_CHAR
67: , Error_Description VARCHAR2(2000) := FND_API.G_MISS_CHAR
68: , Error_Proc_Name VARCHAR2(100) := FND_API.G_MISS_CHAR
69: , Error_Type VARCHAR2(1)
70: );
71: --
72: -- ============================================================================
96: )
97: IS
98: BEGIN
99: bis_debug_pub.Add('> init_log');
100: x_return_status := FND_API.G_RET_STS_SUCCESS;
101: g_gen_success_table.DELETE;
102: g_gen_failure_table.DELETE;
103: bis_debug_pub.Add('< init_log ');
104:
102: g_gen_failure_table.DELETE;
103: bis_debug_pub.Add('< init_log ');
104:
105: EXCEPTION
106: when FND_API.G_EXC_ERROR then
107: x_return_status := FND_API.G_RET_STS_ERROR ;
108: RAISE FND_API.G_EXC_ERROR;
109: when FND_API.G_EXC_UNEXPECTED_ERROR then
110: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
103: bis_debug_pub.Add('< init_log ');
104:
105: EXCEPTION
106: when FND_API.G_EXC_ERROR then
107: x_return_status := FND_API.G_RET_STS_ERROR ;
108: RAISE FND_API.G_EXC_ERROR;
109: when FND_API.G_EXC_UNEXPECTED_ERROR then
110: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
111: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
104:
105: EXCEPTION
106: when FND_API.G_EXC_ERROR then
107: x_return_status := FND_API.G_RET_STS_ERROR ;
108: RAISE FND_API.G_EXC_ERROR;
109: when FND_API.G_EXC_UNEXPECTED_ERROR then
110: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
111: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
112: when others then
105: EXCEPTION
106: when FND_API.G_EXC_ERROR then
107: x_return_status := FND_API.G_RET_STS_ERROR ;
108: RAISE FND_API.G_EXC_ERROR;
109: when FND_API.G_EXC_UNEXPECTED_ERROR then
110: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
111: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
112: when others then
113: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
106: when FND_API.G_EXC_ERROR then
107: x_return_status := FND_API.G_RET_STS_ERROR ;
108: RAISE FND_API.G_EXC_ERROR;
109: when FND_API.G_EXC_UNEXPECTED_ERROR then
110: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
111: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
112: when others then
113: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
114: BIS_VG_UTIL.Add_Error_Message
107: x_return_status := FND_API.G_RET_STS_ERROR ;
108: RAISE FND_API.G_EXC_ERROR;
109: when FND_API.G_EXC_UNEXPECTED_ERROR then
110: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
111: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
112: when others then
113: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
114: BIS_VG_UTIL.Add_Error_Message
115: ( p_error_msg_id => SQLCODE
109: when FND_API.G_EXC_UNEXPECTED_ERROR then
110: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
111: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
112: when others then
113: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
114: BIS_VG_UTIL.Add_Error_Message
115: ( p_error_msg_id => SQLCODE
116: , p_error_description => SQLERRM
117: , p_error_proc_name => G_PKG_NAME||'.init_log'
117: , p_error_proc_name => G_PKG_NAME||'.init_log'
118: , p_error_table => x_error_tbl
119: , x_error_table => x_error_tbl
120: );
121: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
122:
123: END init_log;
124:
125: -- ============================================================================
142: l_result view_gen_success_type;
143: BEGIN
144:
145: bis_debug_pub.Add('> update_success_log');
146: x_return_status := FND_API.G_RET_STS_SUCCESS;
147: l_result.business_view_name := p_origbv;
148: l_result.gen_view_name := p_genbv;
149: g_gen_success_table(g_gen_success_table.COUNT + 1) := l_result;
150: bis_debug_pub.Add('< update_success_log');
149: g_gen_success_table(g_gen_success_table.COUNT + 1) := l_result;
150: bis_debug_pub.Add('< update_success_log');
151:
152: EXCEPTION
153: when FND_API.G_EXC_ERROR then
154: x_return_status := FND_API.G_RET_STS_ERROR ;
155: RAISE FND_API.G_EXC_ERROR;
156: when FND_API.G_EXC_UNEXPECTED_ERROR then
157: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
150: bis_debug_pub.Add('< update_success_log');
151:
152: EXCEPTION
153: when FND_API.G_EXC_ERROR then
154: x_return_status := FND_API.G_RET_STS_ERROR ;
155: RAISE FND_API.G_EXC_ERROR;
156: when FND_API.G_EXC_UNEXPECTED_ERROR then
157: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
158: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
151:
152: EXCEPTION
153: when FND_API.G_EXC_ERROR then
154: x_return_status := FND_API.G_RET_STS_ERROR ;
155: RAISE FND_API.G_EXC_ERROR;
156: when FND_API.G_EXC_UNEXPECTED_ERROR then
157: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
158: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
159: when others then
152: EXCEPTION
153: when FND_API.G_EXC_ERROR then
154: x_return_status := FND_API.G_RET_STS_ERROR ;
155: RAISE FND_API.G_EXC_ERROR;
156: when FND_API.G_EXC_UNEXPECTED_ERROR then
157: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
158: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
159: when others then
160: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
153: when FND_API.G_EXC_ERROR then
154: x_return_status := FND_API.G_RET_STS_ERROR ;
155: RAISE FND_API.G_EXC_ERROR;
156: when FND_API.G_EXC_UNEXPECTED_ERROR then
157: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
158: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
159: when others then
160: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
161: BIS_VG_UTIL.Add_Error_Message
154: x_return_status := FND_API.G_RET_STS_ERROR ;
155: RAISE FND_API.G_EXC_ERROR;
156: when FND_API.G_EXC_UNEXPECTED_ERROR then
157: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
158: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
159: when others then
160: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
161: BIS_VG_UTIL.Add_Error_Message
162: ( p_error_msg_id => SQLCODE
156: when FND_API.G_EXC_UNEXPECTED_ERROR then
157: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
158: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
159: when others then
160: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
161: BIS_VG_UTIL.Add_Error_Message
162: ( p_error_msg_id => SQLCODE
163: , p_error_description => SQLERRM
164: , p_error_proc_name => G_PKG_NAME||'.update_success_log'
164: , p_error_proc_name => G_PKG_NAME||'.update_success_log'
165: , p_error_table => x_error_tbl
166: , x_error_table => x_error_tbl
167: );
168: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
169:
170: END update_success_log;
171:
172:
193: l_result view_gen_failure_type;
194: l_str VARCHAR2(100);
195: BEGIN
196: bis_debug_pub.Add('> update_failure_log');
197: x_return_status := FND_API.G_RET_STS_SUCCESS;
198:
199: l_result.business_view_name := p_origbv;
200: l_result.Error_Msg_ID := p_code;
201: l_result.Error_Description := p_errm;
204:
205: bis_debug_pub.Add('< update_failure_log');
206:
207: EXCEPTION
208: when FND_API.G_EXC_ERROR then
209: x_return_status := FND_API.G_RET_STS_ERROR ;
210: RAISE FND_API.G_EXC_ERROR;
211: when FND_API.G_EXC_UNEXPECTED_ERROR then
212: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
205: bis_debug_pub.Add('< update_failure_log');
206:
207: EXCEPTION
208: when FND_API.G_EXC_ERROR then
209: x_return_status := FND_API.G_RET_STS_ERROR ;
210: RAISE FND_API.G_EXC_ERROR;
211: when FND_API.G_EXC_UNEXPECTED_ERROR then
212: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
213: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
206:
207: EXCEPTION
208: when FND_API.G_EXC_ERROR then
209: x_return_status := FND_API.G_RET_STS_ERROR ;
210: RAISE FND_API.G_EXC_ERROR;
211: when FND_API.G_EXC_UNEXPECTED_ERROR then
212: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
213: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
214: when others then
207: EXCEPTION
208: when FND_API.G_EXC_ERROR then
209: x_return_status := FND_API.G_RET_STS_ERROR ;
210: RAISE FND_API.G_EXC_ERROR;
211: when FND_API.G_EXC_UNEXPECTED_ERROR then
212: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
213: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
214: when others then
215: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
208: when FND_API.G_EXC_ERROR then
209: x_return_status := FND_API.G_RET_STS_ERROR ;
210: RAISE FND_API.G_EXC_ERROR;
211: when FND_API.G_EXC_UNEXPECTED_ERROR then
212: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
213: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
214: when others then
215: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
216: BIS_VG_UTIL.Add_Error_Message
209: x_return_status := FND_API.G_RET_STS_ERROR ;
210: RAISE FND_API.G_EXC_ERROR;
211: when FND_API.G_EXC_UNEXPECTED_ERROR then
212: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
213: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
214: when others then
215: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
216: BIS_VG_UTIL.Add_Error_Message
217: ( p_error_msg_id => SQLCODE
211: when FND_API.G_EXC_UNEXPECTED_ERROR then
212: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
213: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
214: when others then
215: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
216: BIS_VG_UTIL.Add_Error_Message
217: ( p_error_msg_id => SQLCODE
218: , p_error_description => SQLERRM
219: , p_error_proc_name => G_PKG_NAME||'.update_failure_log'
219: , p_error_proc_name => G_PKG_NAME||'.update_failure_log'
220: , p_error_table => x_error_tbl
221: , x_error_table => x_error_tbl
222: );
223: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
224:
225: END update_failure_log;
226:
227: -- ============================================================================
247: bis_debug_pub.Add('> update_failure_log');
248: bis_debug_pub.add('g_gen_failure_table.count = '||g_gen_failure_table.count);
249: bis_debug_pub.add('p_error_Tbl.count = '||p_error_Tbl.count);
250:
251: x_return_status := FND_API.G_RET_STS_SUCCESS;
252:
253: for i in 1 .. p_error_Tbl.count loop
254: l_result.Error_Msg_ID := p_error_Tbl(i).Error_Msg_ID;
255: l_result.Error_Msg_Name := p_error_Tbl(i).Error_Msg_Name;
264: bis_debug_pub.Add('< update_failure_log');
265: bis_debug_pub.debug_off;
266:
267: EXCEPTION
268: when FND_API.G_EXC_ERROR then
269: x_return_status := FND_API.G_RET_STS_ERROR ;
270: RAISE FND_API.G_EXC_ERROR;
271: when FND_API.G_EXC_UNEXPECTED_ERROR then
272: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
265: bis_debug_pub.debug_off;
266:
267: EXCEPTION
268: when FND_API.G_EXC_ERROR then
269: x_return_status := FND_API.G_RET_STS_ERROR ;
270: RAISE FND_API.G_EXC_ERROR;
271: when FND_API.G_EXC_UNEXPECTED_ERROR then
272: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
273: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
266:
267: EXCEPTION
268: when FND_API.G_EXC_ERROR then
269: x_return_status := FND_API.G_RET_STS_ERROR ;
270: RAISE FND_API.G_EXC_ERROR;
271: when FND_API.G_EXC_UNEXPECTED_ERROR then
272: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
273: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
274: when others then
267: EXCEPTION
268: when FND_API.G_EXC_ERROR then
269: x_return_status := FND_API.G_RET_STS_ERROR ;
270: RAISE FND_API.G_EXC_ERROR;
271: when FND_API.G_EXC_UNEXPECTED_ERROR then
272: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
273: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
274: when others then
275: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
268: when FND_API.G_EXC_ERROR then
269: x_return_status := FND_API.G_RET_STS_ERROR ;
270: RAISE FND_API.G_EXC_ERROR;
271: when FND_API.G_EXC_UNEXPECTED_ERROR then
272: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
273: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
274: when others then
275: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
276: BIS_VG_UTIL.Add_Error_Message
269: x_return_status := FND_API.G_RET_STS_ERROR ;
270: RAISE FND_API.G_EXC_ERROR;
271: when FND_API.G_EXC_UNEXPECTED_ERROR then
272: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
273: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
274: when others then
275: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
276: BIS_VG_UTIL.Add_Error_Message
277: ( p_error_msg_id => SQLCODE
271: when FND_API.G_EXC_UNEXPECTED_ERROR then
272: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
273: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
274: when others then
275: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
276: BIS_VG_UTIL.Add_Error_Message
277: ( p_error_msg_id => SQLCODE
278: , p_error_description => SQLERRM
279: , p_error_proc_name => G_PKG_NAME||'.update_failure_log'
279: , p_error_proc_name => G_PKG_NAME||'.update_failure_log'
280: , p_error_table => x_error_tbl
281: , x_error_table => x_error_tbl
282: );
283: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
284:
285: END update_failure_log;
286:
287: -- ============================================================================
307: FOR l_counter IN REVERSE 1..g_gen_failure_table.COUNT
308: LOOP
309: -- Find missing view names starting from ther high end
310: IF g_gen_failure_table(l_counter).business_view_name
311: = FND_API.G_MISS_CHAR
312: THEN
313: g_gen_failure_table(l_counter).business_view_name := p_origbv;
314:
315:
321: END LOOP;
322: bis_debug_pub.Add('< backpatch_failure_log');
323:
324: EXCEPTION
325: when FND_API.G_EXC_ERROR then
326: x_return_status := FND_API.G_RET_STS_ERROR ;
327: RAISE FND_API.G_EXC_ERROR;
328: when FND_API.G_EXC_UNEXPECTED_ERROR then
329: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
322: bis_debug_pub.Add('< backpatch_failure_log');
323:
324: EXCEPTION
325: when FND_API.G_EXC_ERROR then
326: x_return_status := FND_API.G_RET_STS_ERROR ;
327: RAISE FND_API.G_EXC_ERROR;
328: when FND_API.G_EXC_UNEXPECTED_ERROR then
329: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
330: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
323:
324: EXCEPTION
325: when FND_API.G_EXC_ERROR then
326: x_return_status := FND_API.G_RET_STS_ERROR ;
327: RAISE FND_API.G_EXC_ERROR;
328: when FND_API.G_EXC_UNEXPECTED_ERROR then
329: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
330: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
331: when others then
324: EXCEPTION
325: when FND_API.G_EXC_ERROR then
326: x_return_status := FND_API.G_RET_STS_ERROR ;
327: RAISE FND_API.G_EXC_ERROR;
328: when FND_API.G_EXC_UNEXPECTED_ERROR then
329: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
330: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
331: when others then
332: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
325: when FND_API.G_EXC_ERROR then
326: x_return_status := FND_API.G_RET_STS_ERROR ;
327: RAISE FND_API.G_EXC_ERROR;
328: when FND_API.G_EXC_UNEXPECTED_ERROR then
329: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
330: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
331: when others then
332: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
333: BIS_VG_UTIL.Add_Error_Message
326: x_return_status := FND_API.G_RET_STS_ERROR ;
327: RAISE FND_API.G_EXC_ERROR;
328: when FND_API.G_EXC_UNEXPECTED_ERROR then
329: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
330: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
331: when others then
332: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
333: BIS_VG_UTIL.Add_Error_Message
334: ( p_error_msg_id => SQLCODE
328: when FND_API.G_EXC_UNEXPECTED_ERROR then
329: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
330: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
331: when others then
332: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
333: BIS_VG_UTIL.Add_Error_Message
334: ( p_error_msg_id => SQLCODE
335: , p_error_description => SQLERRM
336: , p_error_proc_name => G_PKG_NAME||'.backpatch_failure_log'
336: , p_error_proc_name => G_PKG_NAME||'.backpatch_failure_log'
337: , p_error_table => x_error_tbl
338: , x_error_table => x_error_tbl
339: );
340: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
341:
342: END backpatch_failure_log;
343:
344: -- ============================================================================
360: IS
361: BEGIN
362:
363: bis_debug_pub.Add('> write_string');
364: x_return_status := FND_API.G_RET_STS_SUCCESS;
365: IF (p_mode = bis_vg_types.production_mode) THEN
366: fnd_file.put_line(fnd_file.OUTPUT, p_string);
367: -- fnd_file.new_line(fnd_file.OUTPUT);
368: ELSE
373: bis_debug_pub.Add('< write_string');
374:
375:
376: EXCEPTION
377: when FND_API.G_EXC_ERROR then
378: x_return_status := FND_API.G_RET_STS_ERROR ;
379: RAISE FND_API.G_EXC_ERROR;
380: when FND_API.G_EXC_UNEXPECTED_ERROR then
381: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
374:
375:
376: EXCEPTION
377: when FND_API.G_EXC_ERROR then
378: x_return_status := FND_API.G_RET_STS_ERROR ;
379: RAISE FND_API.G_EXC_ERROR;
380: when FND_API.G_EXC_UNEXPECTED_ERROR then
381: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
382: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
375:
376: EXCEPTION
377: when FND_API.G_EXC_ERROR then
378: x_return_status := FND_API.G_RET_STS_ERROR ;
379: RAISE FND_API.G_EXC_ERROR;
380: when FND_API.G_EXC_UNEXPECTED_ERROR then
381: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
382: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
383: when others then
376: EXCEPTION
377: when FND_API.G_EXC_ERROR then
378: x_return_status := FND_API.G_RET_STS_ERROR ;
379: RAISE FND_API.G_EXC_ERROR;
380: when FND_API.G_EXC_UNEXPECTED_ERROR then
381: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
382: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
383: when others then
384: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
377: when FND_API.G_EXC_ERROR then
378: x_return_status := FND_API.G_RET_STS_ERROR ;
379: RAISE FND_API.G_EXC_ERROR;
380: when FND_API.G_EXC_UNEXPECTED_ERROR then
381: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
382: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
383: when others then
384: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
385: BIS_VG_UTIL.Add_Error_Message
378: x_return_status := FND_API.G_RET_STS_ERROR ;
379: RAISE FND_API.G_EXC_ERROR;
380: when FND_API.G_EXC_UNEXPECTED_ERROR then
381: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
382: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
383: when others then
384: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
385: BIS_VG_UTIL.Add_Error_Message
386: ( p_error_msg_id => SQLCODE
380: when FND_API.G_EXC_UNEXPECTED_ERROR then
381: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
382: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
383: when others then
384: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
385: BIS_VG_UTIL.Add_Error_Message
386: ( p_error_msg_id => SQLCODE
387: , p_error_description => SQLERRM
388: , p_error_proc_name => G_PKG_NAME||'.write_string'
388: , p_error_proc_name => G_PKG_NAME||'.write_string'
389: , p_error_table => x_error_tbl
390: , x_error_table => x_error_tbl
391: );
392: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
393:
394: END write_string;
395:
396: -- ============================================================================
411: )
412: IS
413: BEGIN
414: bis_debug_pub.Add('> write_blank_line');
415: x_return_status := FND_API.G_RET_STS_SUCCESS;
416: FOR i IN 1 .. p_count LOOP
417: write_string ( p_mode
418: , ' '
419: , x_return_status
423: bis_debug_pub.Add('< write_blank_line');
424:
425:
426: EXCEPTION
427: when FND_API.G_EXC_ERROR then
428: x_return_status := FND_API.G_RET_STS_ERROR ;
429: RAISE FND_API.G_EXC_ERROR;
430: when FND_API.G_EXC_UNEXPECTED_ERROR then
431: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
424:
425:
426: EXCEPTION
427: when FND_API.G_EXC_ERROR then
428: x_return_status := FND_API.G_RET_STS_ERROR ;
429: RAISE FND_API.G_EXC_ERROR;
430: when FND_API.G_EXC_UNEXPECTED_ERROR then
431: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
432: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
425:
426: EXCEPTION
427: when FND_API.G_EXC_ERROR then
428: x_return_status := FND_API.G_RET_STS_ERROR ;
429: RAISE FND_API.G_EXC_ERROR;
430: when FND_API.G_EXC_UNEXPECTED_ERROR then
431: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
432: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
433: when others then
426: EXCEPTION
427: when FND_API.G_EXC_ERROR then
428: x_return_status := FND_API.G_RET_STS_ERROR ;
429: RAISE FND_API.G_EXC_ERROR;
430: when FND_API.G_EXC_UNEXPECTED_ERROR then
431: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
432: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
433: when others then
434: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
427: when FND_API.G_EXC_ERROR then
428: x_return_status := FND_API.G_RET_STS_ERROR ;
429: RAISE FND_API.G_EXC_ERROR;
430: when FND_API.G_EXC_UNEXPECTED_ERROR then
431: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
432: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
433: when others then
434: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
435: BIS_VG_UTIL.Add_Error_Message
428: x_return_status := FND_API.G_RET_STS_ERROR ;
429: RAISE FND_API.G_EXC_ERROR;
430: when FND_API.G_EXC_UNEXPECTED_ERROR then
431: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
432: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
433: when others then
434: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
435: BIS_VG_UTIL.Add_Error_Message
436: ( p_error_msg_id => SQLCODE
430: when FND_API.G_EXC_UNEXPECTED_ERROR then
431: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
432: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
433: when others then
434: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
435: BIS_VG_UTIL.Add_Error_Message
436: ( p_error_msg_id => SQLCODE
437: , p_error_description => SQLERRM
438: , p_error_proc_name => G_PKG_NAME||'.write_blank_line'
438: , p_error_proc_name => G_PKG_NAME||'.write_blank_line'
439: , p_error_table => x_error_tbl
440: , x_error_table => x_error_tbl
441: );
442: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
443:
444: END write_blank_line;
445:
446: -- ============================================================================
480: l_length NUMBER;
481: BEGIN
482:
483: bis_debug_pub.Add('> write_inputs');
484: x_return_status := FND_API.G_RET_STS_SUCCESS;
485:
486: l_str := fnd_message.get_string( BIS_VG_TYPES.message_application
487: , 'BIS_VG_INPUT_PARAMETERS'
488: );
506: , x_return_status
507: , x_error_Tbl
508: );
509:
510: IF (p_all_flag = fnd_api.g_true) THEN
511: l_str := fnd_message.get_string( BIS_VG_TYPES.message_application
512: , 'BIS_VG_INPUT_ALL_VIEWS'
513: );
514:
606:
607: bis_debug_pub.Add('< write_inputs');
608:
609: EXCEPTION
610: when FND_API.G_EXC_ERROR then
611: x_return_status := FND_API.G_RET_STS_ERROR ;
612: RAISE FND_API.G_EXC_ERROR;
613: when FND_API.G_EXC_UNEXPECTED_ERROR then
614: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
607: bis_debug_pub.Add('< write_inputs');
608:
609: EXCEPTION
610: when FND_API.G_EXC_ERROR then
611: x_return_status := FND_API.G_RET_STS_ERROR ;
612: RAISE FND_API.G_EXC_ERROR;
613: when FND_API.G_EXC_UNEXPECTED_ERROR then
614: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
615: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
608:
609: EXCEPTION
610: when FND_API.G_EXC_ERROR then
611: x_return_status := FND_API.G_RET_STS_ERROR ;
612: RAISE FND_API.G_EXC_ERROR;
613: when FND_API.G_EXC_UNEXPECTED_ERROR then
614: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
615: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
616: when others then
609: EXCEPTION
610: when FND_API.G_EXC_ERROR then
611: x_return_status := FND_API.G_RET_STS_ERROR ;
612: RAISE FND_API.G_EXC_ERROR;
613: when FND_API.G_EXC_UNEXPECTED_ERROR then
614: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
615: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
616: when others then
617: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
610: when FND_API.G_EXC_ERROR then
611: x_return_status := FND_API.G_RET_STS_ERROR ;
612: RAISE FND_API.G_EXC_ERROR;
613: when FND_API.G_EXC_UNEXPECTED_ERROR then
614: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
615: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
616: when others then
617: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
618: BIS_VG_UTIL.Add_Error_Message
611: x_return_status := FND_API.G_RET_STS_ERROR ;
612: RAISE FND_API.G_EXC_ERROR;
613: when FND_API.G_EXC_UNEXPECTED_ERROR then
614: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
615: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
616: when others then
617: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
618: BIS_VG_UTIL.Add_Error_Message
619: ( p_error_msg_id => SQLCODE
613: when FND_API.G_EXC_UNEXPECTED_ERROR then
614: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
615: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
616: when others then
617: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
618: BIS_VG_UTIL.Add_Error_Message
619: ( p_error_msg_id => SQLCODE
620: , p_error_description => SQLERRM
621: , p_error_proc_name => G_PKG_NAME||'.write_inputs'
621: , p_error_proc_name => G_PKG_NAME||'.write_inputs'
622: , p_error_table => x_error_tbl
623: , x_error_table => x_error_tbl
624: );
625: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
626:
627: END write_inputs;
628:
629: -- ============================================================================
644: l_head VARCHAR2(80);
645: l_str VARCHAR2(120);
646: BEGIN
647: bis_debug_pub.Add('> write_header');
648: x_return_status := FND_API.G_RET_STS_SUCCESS;
649:
650: l_head := fnd_message.get_string( BIS_VG_TYPES.message_application
651: , 'BIS_VG_GENERATOR_NAME'
652: );
663: bis_debug_pub.Add('< write_header');
664:
665:
666: EXCEPTION
667: when FND_API.G_EXC_ERROR then
668: x_return_status := FND_API.G_RET_STS_ERROR ;
669: RAISE FND_API.G_EXC_ERROR;
670: when FND_API.G_EXC_UNEXPECTED_ERROR then
671: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
664:
665:
666: EXCEPTION
667: when FND_API.G_EXC_ERROR then
668: x_return_status := FND_API.G_RET_STS_ERROR ;
669: RAISE FND_API.G_EXC_ERROR;
670: when FND_API.G_EXC_UNEXPECTED_ERROR then
671: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
672: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
665:
666: EXCEPTION
667: when FND_API.G_EXC_ERROR then
668: x_return_status := FND_API.G_RET_STS_ERROR ;
669: RAISE FND_API.G_EXC_ERROR;
670: when FND_API.G_EXC_UNEXPECTED_ERROR then
671: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
672: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
673: when others then
666: EXCEPTION
667: when FND_API.G_EXC_ERROR then
668: x_return_status := FND_API.G_RET_STS_ERROR ;
669: RAISE FND_API.G_EXC_ERROR;
670: when FND_API.G_EXC_UNEXPECTED_ERROR then
671: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
672: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
673: when others then
674: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
667: when FND_API.G_EXC_ERROR then
668: x_return_status := FND_API.G_RET_STS_ERROR ;
669: RAISE FND_API.G_EXC_ERROR;
670: when FND_API.G_EXC_UNEXPECTED_ERROR then
671: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
672: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
673: when others then
674: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
675: BIS_VG_UTIL.Add_Error_Message
668: x_return_status := FND_API.G_RET_STS_ERROR ;
669: RAISE FND_API.G_EXC_ERROR;
670: when FND_API.G_EXC_UNEXPECTED_ERROR then
671: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
672: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
673: when others then
674: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
675: BIS_VG_UTIL.Add_Error_Message
676: ( p_error_msg_id => SQLCODE
670: when FND_API.G_EXC_UNEXPECTED_ERROR then
671: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
672: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
673: when others then
674: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
675: BIS_VG_UTIL.Add_Error_Message
676: ( p_error_msg_id => SQLCODE
677: , p_error_description => SQLERRM
678: , p_error_proc_name => G_PKG_NAME||'.write_header'
678: , p_error_proc_name => G_PKG_NAME||'.write_header'
679: , p_error_table => x_error_tbl
680: , x_error_table => x_error_tbl
681: );
682: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
683:
684: END write_header;
685:
686: -- ============================================================================
706: l_result view_gen_success_type;
707: BEGIN
708:
709: bis_debug_pub.Add('> write_success_views');
710: x_return_status := FND_API.G_RET_STS_SUCCESS;
711:
712: l_src := fnd_message.get_string( BIS_VG_TYPES.message_application
713: , 'BIS_VG_SOURCE_VIEW_HEADING'
714: );
749:
750: bis_debug_pub.Add('< write_success_views');
751:
752: EXCEPTION
753: when FND_API.G_EXC_ERROR then
754: x_return_status := FND_API.G_RET_STS_ERROR ;
755: RAISE FND_API.G_EXC_ERROR;
756: when FND_API.G_EXC_UNEXPECTED_ERROR then
757: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
750: bis_debug_pub.Add('< write_success_views');
751:
752: EXCEPTION
753: when FND_API.G_EXC_ERROR then
754: x_return_status := FND_API.G_RET_STS_ERROR ;
755: RAISE FND_API.G_EXC_ERROR;
756: when FND_API.G_EXC_UNEXPECTED_ERROR then
757: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
758: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
751:
752: EXCEPTION
753: when FND_API.G_EXC_ERROR then
754: x_return_status := FND_API.G_RET_STS_ERROR ;
755: RAISE FND_API.G_EXC_ERROR;
756: when FND_API.G_EXC_UNEXPECTED_ERROR then
757: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
758: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
759: when others then
752: EXCEPTION
753: when FND_API.G_EXC_ERROR then
754: x_return_status := FND_API.G_RET_STS_ERROR ;
755: RAISE FND_API.G_EXC_ERROR;
756: when FND_API.G_EXC_UNEXPECTED_ERROR then
757: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
758: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
759: when others then
760: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
753: when FND_API.G_EXC_ERROR then
754: x_return_status := FND_API.G_RET_STS_ERROR ;
755: RAISE FND_API.G_EXC_ERROR;
756: when FND_API.G_EXC_UNEXPECTED_ERROR then
757: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
758: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
759: when others then
760: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
761: BIS_VG_UTIL.Add_Error_Message
754: x_return_status := FND_API.G_RET_STS_ERROR ;
755: RAISE FND_API.G_EXC_ERROR;
756: when FND_API.G_EXC_UNEXPECTED_ERROR then
757: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
758: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
759: when others then
760: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
761: BIS_VG_UTIL.Add_Error_Message
762: ( p_error_msg_id => SQLCODE
756: when FND_API.G_EXC_UNEXPECTED_ERROR then
757: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
758: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
759: when others then
760: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
761: BIS_VG_UTIL.Add_Error_Message
762: ( p_error_msg_id => SQLCODE
763: , p_error_description => SQLERRM
764: , p_error_proc_name => G_PKG_NAME||'.write_success_views'
764: , p_error_proc_name => G_PKG_NAME||'.write_success_views'
765: , p_error_table => x_error_tbl
766: , x_error_table => x_error_tbl
767: );
768: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
769:
770: END write_success_views;
771:
772: -- ============================================================================
793: l_err_code_prompt VARCHAR2(100);
794: l_err_msg_prompt VARCHAR2(100);
795: BEGIN
796: bis_debug_pub.Add('> write_failure_views');
797: x_return_status := FND_API.G_RET_STS_SUCCESS;
798:
799: FOR i IN l_start .. p_gen_failure_table.COUNT LOOP
800: l_result := p_gen_failure_table(i);
801:
823:
824: bis_debug_pub.Add('< write_failure_views');
825:
826: EXCEPTION
827: when FND_API.G_EXC_ERROR then
828: x_return_status := FND_API.G_RET_STS_ERROR ;
829: RAISE FND_API.G_EXC_ERROR;
830: when FND_API.G_EXC_UNEXPECTED_ERROR then
831: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
824: bis_debug_pub.Add('< write_failure_views');
825:
826: EXCEPTION
827: when FND_API.G_EXC_ERROR then
828: x_return_status := FND_API.G_RET_STS_ERROR ;
829: RAISE FND_API.G_EXC_ERROR;
830: when FND_API.G_EXC_UNEXPECTED_ERROR then
831: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
832: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
825:
826: EXCEPTION
827: when FND_API.G_EXC_ERROR then
828: x_return_status := FND_API.G_RET_STS_ERROR ;
829: RAISE FND_API.G_EXC_ERROR;
830: when FND_API.G_EXC_UNEXPECTED_ERROR then
831: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
832: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
833: when others then
826: EXCEPTION
827: when FND_API.G_EXC_ERROR then
828: x_return_status := FND_API.G_RET_STS_ERROR ;
829: RAISE FND_API.G_EXC_ERROR;
830: when FND_API.G_EXC_UNEXPECTED_ERROR then
831: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
832: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
833: when others then
834: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
827: when FND_API.G_EXC_ERROR then
828: x_return_status := FND_API.G_RET_STS_ERROR ;
829: RAISE FND_API.G_EXC_ERROR;
830: when FND_API.G_EXC_UNEXPECTED_ERROR then
831: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
832: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
833: when others then
834: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
835: BIS_VG_UTIL.Add_Error_Message
828: x_return_status := FND_API.G_RET_STS_ERROR ;
829: RAISE FND_API.G_EXC_ERROR;
830: when FND_API.G_EXC_UNEXPECTED_ERROR then
831: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
832: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
833: when others then
834: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
835: BIS_VG_UTIL.Add_Error_Message
836: ( p_error_msg_id => SQLCODE
830: when FND_API.G_EXC_UNEXPECTED_ERROR then
831: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
832: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
833: when others then
834: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
835: BIS_VG_UTIL.Add_Error_Message
836: ( p_error_msg_id => SQLCODE
837: , p_error_description => SQLERRM
838: , p_error_proc_name => G_PKG_NAME||'.write_failure_views'
838: , p_error_proc_name => G_PKG_NAME||'.write_failure_views'
839: , p_error_table => x_error_tbl
840: , x_error_table => x_error_tbl
841: );
842: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
843:
844: END write_failure_views;
845:
846: -- ============================================================================
878: IS
879: l_msg_str VARCHAR2(2000);
880: BEGIN
881: bis_debug_pub.Add('> write_log');
882: x_return_status := FND_API.G_RET_STS_SUCCESS;
883: write_header ( p_mode, x_return_status, x_error_Tbl);
884: write_blank_line(p_mode, 1, x_return_status, x_error_Tbl);
885: write_inputs( p_mode
886: , p_all_flag
944: END IF;
945: bis_debug_pub.Add('< write_log');
946:
947: EXCEPTION
948: when FND_API.G_EXC_ERROR then
949: x_return_status := FND_API.G_RET_STS_ERROR ;
950: RAISE FND_API.G_EXC_ERROR;
951: when FND_API.G_EXC_UNEXPECTED_ERROR then
952: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
945: bis_debug_pub.Add('< write_log');
946:
947: EXCEPTION
948: when FND_API.G_EXC_ERROR then
949: x_return_status := FND_API.G_RET_STS_ERROR ;
950: RAISE FND_API.G_EXC_ERROR;
951: when FND_API.G_EXC_UNEXPECTED_ERROR then
952: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
953: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
946:
947: EXCEPTION
948: when FND_API.G_EXC_ERROR then
949: x_return_status := FND_API.G_RET_STS_ERROR ;
950: RAISE FND_API.G_EXC_ERROR;
951: when FND_API.G_EXC_UNEXPECTED_ERROR then
952: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
953: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
954: when others then
947: EXCEPTION
948: when FND_API.G_EXC_ERROR then
949: x_return_status := FND_API.G_RET_STS_ERROR ;
950: RAISE FND_API.G_EXC_ERROR;
951: when FND_API.G_EXC_UNEXPECTED_ERROR then
952: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
953: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
954: when others then
955: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
948: when FND_API.G_EXC_ERROR then
949: x_return_status := FND_API.G_RET_STS_ERROR ;
950: RAISE FND_API.G_EXC_ERROR;
951: when FND_API.G_EXC_UNEXPECTED_ERROR then
952: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
953: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
954: when others then
955: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
956: BIS_VG_UTIL.Add_Error_Message
949: x_return_status := FND_API.G_RET_STS_ERROR ;
950: RAISE FND_API.G_EXC_ERROR;
951: when FND_API.G_EXC_UNEXPECTED_ERROR then
952: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
953: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
954: when others then
955: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
956: BIS_VG_UTIL.Add_Error_Message
957: ( p_error_msg_id => SQLCODE
951: when FND_API.G_EXC_UNEXPECTED_ERROR then
952: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
953: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
954: when others then
955: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
956: BIS_VG_UTIL.Add_Error_Message
957: ( p_error_msg_id => SQLCODE
958: , p_error_description => SQLERRM
959: , p_error_proc_name => G_PKG_NAME||'.write_log'
959: , p_error_proc_name => G_PKG_NAME||'.write_log'
960: , p_error_table => x_error_tbl
961: , x_error_table => x_error_tbl
962: );
963: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
964:
965: END write_log;
966:
967:
1007: --- x_error_string
1008: --- || g_newline
1009: --- || 'Error string too long - too many errors';
1010:
1011: WHEN FND_API.G_EXC_ERROR then
1012: x_error_string :=
1013: x_error_string
1014: || g_newline
1015: || '***CAUTION: Error ''G_EXC_ERROR'' occurred in write_error_to_string';
1013: x_error_string
1014: || g_newline
1015: || '***CAUTION: Error ''G_EXC_ERROR'' occurred in write_error_to_string';
1016:
1017: WHEN FND_API.G_EXC_UNEXPECTED_ERROR then
1018: x_error_string :=
1019: x_error_string
1020: || g_newline
1021: || '***CAUTION: Error ''G_EXC_UNEXPECTED_ERROR'' occurred '