DBA Data[Home] [Help]

APPS.BIS_VG_COMPILE dependencies on BIS_DEBUG_PUB

Line 72: -- bis_debug_pub.Add('> remove_blank_lines');

68: --bis_vg_types.view_text_table_type , x_return_status OUT VARCHAR2 ,
69: --x_error_Tbl OUT BIS_VG_UTIL.Error_Tbl_Type ) IS l_str
70: --bis_vg_types.view_text_table_rec_type; l_char VARCHAR(1); l_length NUMBER;
71: --BEGIN
72: -- bis_debug_pub.Add('> remove_blank_lines');
73: -- x_return_status := FND_API.G_RET_STS_SUCCESS;
74: --
75: -- FOR i IN 1 .. p_view_text_table.COUNT LOOP
76: -- l_str := p_view_text_table(i);

Line 89: -- bis_debug_pub.Add('< remove_blank_lines');

85: -- END LOOP;
86: -- END IF;
87: -- END LOOP;
88: --
89: -- bis_debug_pub.Add('< remove_blank_lines');
90: --
91: --
92: --EXCEPTION
93: -- when FND_API.G_EXC_ERROR then

Line 138: -- bis_debug_pub.Add('> create_DSQL_view');

134: -- p_SQL_text LONG := null;
135: -- p_dummy INTEGER;
136: ----
137: -- BEGIN
138: -- bis_debug_pub.Add('> create_DSQL_view');
139: -- x_return_status := FND_API.G_RET_STS_SUCCESS;
140: -- FOR i IN 1 .. p_View_Text_Table.COUNT LOOP
141: -- p_SQL_text := p_SQL_text || p_View_Text_Table(i);
142: -- END LOOP;

Line 146: -- bis_debug_pub.Add('< create_DSQL_view');

142: -- END LOOP;
143: -- p_CursorID := DBMS_SQL.OPEN_CURSOR;
144: -- DBMS_SQL.PARSE( p_CursorID, p_SQL_text, DBMS_SQL.NATIVE);
145: -- p_dummy := DBMS_SQL.EXECUTE(p_CursorID);
146: -- bis_debug_pub.Add('< create_DSQL_view');
147: --
148: --
149: -- EXCEPTION
150: -- when FND_API.G_EXC_ERROR then

Line 201: -- bis_debug_pub.Add('> execute_DDL_Statement');

197: --l_lb INTEGER := 1;
198: --l_retvar BOOLEAN;
199: ----
200: --BEGIN
201: -- bis_debug_pub.Add('> execute_DDL_Statement');
202: -- x_return_status := FND_API.G_RET_STS_SUCCESS;
203: -- l_retvar := FND_INSTALLATION.GET_APP_INFO
204: -- ( 'FND'
205: -- , dummy1

Line 209: -- bis_debug_pub.Add('l_applsys_schema = ' || l_applsys_schema);

205: -- , dummy1
206: -- , dummy2
207: -- , l_applsys_schema
208: -- );
209: -- bis_debug_pub.Add('l_applsys_schema = ' || l_applsys_schema);
210: -- bis_debug_pub.Add('p_View_Table_Rec.View_Name = '
211: -- || p_View_Table_Rec.View_Name);
212: --*************************************************************************
213: -- BIG COMMENT

Line 210: -- bis_debug_pub.Add('p_View_Table_Rec.View_Name = '

206: -- , dummy2
207: -- , l_applsys_schema
208: -- );
209: -- bis_debug_pub.Add('l_applsys_schema = ' || l_applsys_schema);
210: -- bis_debug_pub.Add('p_View_Table_Rec.View_Name = '
211: -- || p_View_Table_Rec.View_Name);
212: --*************************************************************************
213: -- BIG COMMENT
214: -- force AD_DDL to behave like a single instance as we want the view

Line 220: -- bis_debug_pub.Add(' l_applsys_schema = '||l_applsys_schema);

216: --*************************************************************************
217: -- l_application_short_name := 'FND';
218: -- l_View_Name := p_View_Table_Rec.View_Name;
219: --
220: -- bis_debug_pub.Add(' l_applsys_schema = '||l_applsys_schema);
221: -- bis_debug_pub.ADD(' l_application_short_name = '||l_application_short_name);
222: -- bis_debug_pub.ADD(' ad_ddl.create_view = '||ad_ddl.create_view);
223: -- bis_debug_pub.ADD(' l_lb = '||l_lb);
224: -- bis_debug_pub.ADD(' p_ub = '||p_ub);

Line 221: -- bis_debug_pub.ADD(' l_application_short_name = '||l_application_short_name);

217: -- l_application_short_name := 'FND';
218: -- l_View_Name := p_View_Table_Rec.View_Name;
219: --
220: -- bis_debug_pub.Add(' l_applsys_schema = '||l_applsys_schema);
221: -- bis_debug_pub.ADD(' l_application_short_name = '||l_application_short_name);
222: -- bis_debug_pub.ADD(' ad_ddl.create_view = '||ad_ddl.create_view);
223: -- bis_debug_pub.ADD(' l_lb = '||l_lb);
224: -- bis_debug_pub.ADD(' p_ub = '||p_ub);
225: -- bis_debug_pub.ADD(' l_View_Name = '||l_View_Name);

Line 222: -- bis_debug_pub.ADD(' ad_ddl.create_view = '||ad_ddl.create_view);

218: -- l_View_Name := p_View_Table_Rec.View_Name;
219: --
220: -- bis_debug_pub.Add(' l_applsys_schema = '||l_applsys_schema);
221: -- bis_debug_pub.ADD(' l_application_short_name = '||l_application_short_name);
222: -- bis_debug_pub.ADD(' ad_ddl.create_view = '||ad_ddl.create_view);
223: -- bis_debug_pub.ADD(' l_lb = '||l_lb);
224: -- bis_debug_pub.ADD(' p_ub = '||p_ub);
225: -- bis_debug_pub.ADD(' l_View_Name = '||l_View_Name);
226: --

Line 223: -- bis_debug_pub.ADD(' l_lb = '||l_lb);

219: --
220: -- bis_debug_pub.Add(' l_applsys_schema = '||l_applsys_schema);
221: -- bis_debug_pub.ADD(' l_application_short_name = '||l_application_short_name);
222: -- bis_debug_pub.ADD(' ad_ddl.create_view = '||ad_ddl.create_view);
223: -- bis_debug_pub.ADD(' l_lb = '||l_lb);
224: -- bis_debug_pub.ADD(' p_ub = '||p_ub);
225: -- bis_debug_pub.ADD(' l_View_Name = '||l_View_Name);
226: --
227: -- AD_DDL.do_array_ddl( l_applsys_schema

Line 224: -- bis_debug_pub.ADD(' p_ub = '||p_ub);

220: -- bis_debug_pub.Add(' l_applsys_schema = '||l_applsys_schema);
221: -- bis_debug_pub.ADD(' l_application_short_name = '||l_application_short_name);
222: -- bis_debug_pub.ADD(' ad_ddl.create_view = '||ad_ddl.create_view);
223: -- bis_debug_pub.ADD(' l_lb = '||l_lb);
224: -- bis_debug_pub.ADD(' p_ub = '||p_ub);
225: -- bis_debug_pub.ADD(' l_View_Name = '||l_View_Name);
226: --
227: -- AD_DDL.do_array_ddl( l_applsys_schema
228: -- , l_application_short_name

Line 225: -- bis_debug_pub.ADD(' l_View_Name = '||l_View_Name);

221: -- bis_debug_pub.ADD(' l_application_short_name = '||l_application_short_name);
222: -- bis_debug_pub.ADD(' ad_ddl.create_view = '||ad_ddl.create_view);
223: -- bis_debug_pub.ADD(' l_lb = '||l_lb);
224: -- bis_debug_pub.ADD(' p_ub = '||p_ub);
225: -- bis_debug_pub.ADD(' l_View_Name = '||l_View_Name);
226: --
227: -- AD_DDL.do_array_ddl( l_applsys_schema
228: -- , l_application_short_name
229: -- , ad_ddl.create_view

Line 235: -- bis_debug_pub.Add('< execute_DDL_Statement');

231: -- , p_ub
232: -- , l_View_Name
233: -- );
234: --
235: -- bis_debug_pub.Add('< execute_DDL_Statement');
236: ----
237: --
238: --
239: --EXCEPTION

Line 285: -- bis_debug_pub.Add('> build_DDL_Statement');

281: --
282: --l_count INTEGER;
283: --
284: --BEGIN
285: -- bis_debug_pub.Add('> build_DDL_Statement');
286: -- x_return_status := FND_API.G_RET_STS_SUCCESS;
287: -- FOR l_count IN 1 .. p_View_Text_Table.COUNT LOOP
288: -- AD_DDL.build_statement(' '||p_View_Text_Table(l_count)||' ', l_count);
289: -- END LOOP;

Line 290: -- bis_debug_pub.Add('< build_DDL_Statement');

286: -- x_return_status := FND_API.G_RET_STS_SUCCESS;
287: -- FOR l_count IN 1 .. p_View_Text_Table.COUNT LOOP
288: -- AD_DDL.build_statement(' '||p_View_Text_Table(l_count)||' ', l_count);
289: -- END LOOP;
290: -- bis_debug_pub.Add('< build_DDL_Statement');
291: --
292: --
293: --EXCEPTION
294: -- when FND_API.G_EXC_ERROR then

Line 349: bis_debug_pub.Add('> do_long_ddl');

345: l_count NUMBER;
346: l_total NUMBER;
347: l_dummy VARCHAR2(100);
348: BEGIN
349: bis_debug_pub.Add('> do_long_ddl');
350: --- x_return_status := FND_API.G_RET_STS_SUCCESS;
351:
352:
353: FOR l_count IN 1 .. p_View_Create_Text_Table.COUNT

Line 359: BIS_DEBUG_PUB.Add(p_View_Create_Text_Table(l_count));

355: AD_DDL.build_statement(p_View_Create_Text_Table(l_count)
356: , l_count);
357: IF (p_mode <> bis_vg_types.production_mode AND
358: p_mode <> bis_vg_types.sqlplus_production_mode) THEN
359: BIS_DEBUG_PUB.Add(p_View_Create_Text_Table(l_count));
360: END IF;
361: l_total := l_count;
362: END LOOP;
363:

Line 371: BIS_DEBUG_PUB.Add(p_View_Select_Text_Table(l_count));

367: AD_DDL.build_statement(p_View_Select_Text_Table(l_count)
368: , l_total);
369: IF (p_mode <> bis_vg_types.production_mode AND
370: p_mode <> bis_vg_types.sqlplus_production_mode) THEN
371: BIS_DEBUG_PUB.Add(p_View_Select_Text_Table(l_count));
372: END IF;
373:
374: END LOOP;
375: AD_DDL.do_array_ddl( p_applsys_schema

Line 383: bis_debug_pub.Add('< do_long_ddl');

379: , 1
380: , l_total
381: , p_View_Name
382: );
383: bis_debug_pub.Add('< do_long_ddl');
384:
385: EXCEPTION
386: when FND_API.G_EXC_ERROR then
387: --- x_return_status := FND_API.G_RET_STS_ERROR ;

Line 439: bis_debug_pub.Add('> do_short_ddl');

435: l_buffer VARCHAR2(29000);
436: l_count NUMBER;
437: l_length NUMBER := 0;
438: BEGIN
439: bis_debug_pub.Add('> do_short_ddl');
440: x_return_status := FND_API.G_RET_STS_SUCCESS;
441:
442:
443: BEGIN

Line 451: BIS_DEBUG_PUB.Add(p_View_Create_Text_Table(l_count));

447: if l_length > 30999 then raise expected_overflow_error;
448: end if;
449: IF (p_mode <> bis_vg_types.production_mode AND
450: p_mode <> bis_vg_types.sqlplus_production_mode) THEN
451: BIS_DEBUG_PUB.Add(p_View_Create_Text_Table(l_count));
452: END IF;
453: l_buffer:=l_buffer || p_View_Create_Text_Table(l_count);
454: END LOOP;
455:

Line 464: BIS_DEBUG_PUB.Add(p_View_Select_Text_Table(l_count) );

460: --- if l_length > 30999 then raise expected_overflow_error;
461: --- end if;
462: IF (p_mode <> bis_vg_types.production_mode AND
463: p_mode <> bis_vg_types.sqlplus_production_mode) THEN
464: BIS_DEBUG_PUB.Add(p_View_Select_Text_Table(l_count) );
465: END IF;
466: END LOOP;
467:
468: IF l_buffer IS NULL

Line 474: bis_debug_pub.Add('Failed do_short');

470: END IF;
471: EXCEPTION
472: when numeric_or_value_error then
473: -- This is propagated because it is expected
474: bis_debug_pub.Add('Failed do_short');
475: raise expected_overflow_error;
476: when expected_overflow_error then
477: raise;
478:

Line 488: bis_debug_pub.Add('< do_short_ddl');

484: , ad_ddl.create_view -- type
485: , l_buffer
486: , p_View_Name
487: );
488: bis_debug_pub.Add('< do_short_ddl');
489:
490: EXCEPTION
491: when expected_overflow_error
492: -- This is propagated because it is expected

Line 494: bis_debug_pub.Add('Expected exit from do_short_ddl');

490: EXCEPTION
491: when expected_overflow_error
492: -- This is propagated because it is expected
493: then
494: bis_debug_pub.Add('Expected exit from do_short_ddl');
495: raise;
496: when numeric_or_value_error then
497: bis_debug_pub.Add('Numeric_or_value error unexpected in do_short_ddl');
498: RAISE;

Line 497: bis_debug_pub.Add('Numeric_or_value error unexpected in do_short_ddl');

493: then
494: bis_debug_pub.Add('Expected exit from do_short_ddl');
495: raise;
496: when numeric_or_value_error then
497: bis_debug_pub.Add('Numeric_or_value error unexpected in do_short_ddl');
498: RAISE;
499: when FND_API.G_EXC_ERROR then
500: x_return_status := FND_API.G_RET_STS_ERROR ;
501: RAISE FND_API.G_EXC_ERROR;

Line 551: bis_debug_pub.Add('> make_column_len30');

547: l_original_column_name bis_vg_types.View_Text_Table_Rec_Type;
548: l_pos NUMBER;
549: --
550: BEGIN
551: bis_debug_pub.Add('> make_column_len30');
552: x_return_status := FND_API.G_RET_STS_SUCCESS;
553: x_View_Column_Table := p_View_Column_Table;
554: x_View_Column_Comment_Table := p_View_Column_Comment_Table;
555: FOR i IN 1 .. p_View_Column_Table.COUNT LOOP

Line 595: bis_debug_pub.Add('< make_column_len30');

591: END LOOP comment_loop;
592:
593: END IF;
594: END LOOP;
595: bis_debug_pub.Add('< make_column_len30');
596:
597: EXCEPTION
598: when FND_API.G_EXC_ERROR then
599: x_return_status := FND_API.G_RET_STS_ERROR ;

Line 642: bis_debug_pub.Add('> find_column');

638: )
639: RETURN NUMBER IS
640: --
641: BEGIN
642: bis_debug_pub.Add('> find_column');
643: x_return_status := FND_API.G_RET_STS_SUCCESS;
644: FOR i IN 1 .. p_View_Text_Count_Table.COUNT LOOP
645: IF( REPLACE(p_column_name, '^', '_') =
646: REPLACE(p_View_Text_Count_Table(i).Column_name, '^', '_') ) THEN

Line 650: bis_debug_pub.Add('< find_column');

646: REPLACE(p_View_Text_Count_Table(i).Column_name, '^', '_') ) THEN
647: RETURN i;
648: END IF;
649: END LOOP;
650: bis_debug_pub.Add('< find_column');
651: RETURN 0;
652:
653:
654:

Line 702: bis_debug_pub.Add('> insert_hat_in_column');

698: --
699: l_pos NUMBER;
700: --
701: BEGIN
702: bis_debug_pub.Add('> insert_hat_in_column');
703: x_return_status := FND_API.G_RET_STS_SUCCESS;
704: x_column_name := p_column_name;
705: l_pos := INSTRB(p_table_column_name, '^');
706: IF(l_pos > 0) THEN

Line 711: bis_debug_pub.Add('< insert_hat_in_column');

707: x_column_name := SUBSTRB(p_column_name, 1, l_pos - 1) ||
708: '^' ||
709: SUBSTRB(p_column_name, l_pos + 1);
710: END IF;
711: bis_debug_pub.Add('< insert_hat_in_column');
712:
713:
714: EXCEPTION
715: when FND_API.G_EXC_ERROR then

Line 771: bis_debug_pub.Add('> make_unique_columns');

767: l_index NUMBER;
768: l_pos NUMBER;
769: --
770: BEGIN
771: bis_debug_pub.Add('> make_unique_columns');
772: x_return_status := FND_API.G_RET_STS_SUCCESS;
773: x_View_Column_Table := p_View_Column_Table;
774: x_View_Column_Comment_Table := p_View_Column_Comment_Table;
775: FOR i IN 1 .. x_View_Column_Table.COUNT LOOP

Line 789: bis_debug_pub.add('l_column_name = ' || l_column_name);

785: l_View_Text_Count_Rec.Count := 0;
786: l_View_Text_Count_Table(l_View_Text_Count_Table.COUNT + 1)
787: := l_View_Text_Count_Rec;
788: ELSE
789: bis_debug_pub.add('l_column_name = ' || l_column_name);
790: bis_debug_pub.add('l_index = ' || l_index);
791: bis_debug_pub.add('l_View_Text_Count_Table(l_index).Column_name = '
792: || l_View_Text_Count_Table(l_index).Column_name);
793: bis_debug_pub.add('l_View_Text_Count_Table(l_index).Count = '

Line 790: bis_debug_pub.add('l_index = ' || l_index);

786: l_View_Text_Count_Table(l_View_Text_Count_Table.COUNT + 1)
787: := l_View_Text_Count_Rec;
788: ELSE
789: bis_debug_pub.add('l_column_name = ' || l_column_name);
790: bis_debug_pub.add('l_index = ' || l_index);
791: bis_debug_pub.add('l_View_Text_Count_Table(l_index).Column_name = '
792: || l_View_Text_Count_Table(l_index).Column_name);
793: bis_debug_pub.add('l_View_Text_Count_Table(l_index).Count = '
794: || l_View_Text_Count_Table(l_index).Count);

Line 791: bis_debug_pub.add('l_View_Text_Count_Table(l_index).Column_name = '

787: := l_View_Text_Count_Rec;
788: ELSE
789: bis_debug_pub.add('l_column_name = ' || l_column_name);
790: bis_debug_pub.add('l_index = ' || l_index);
791: bis_debug_pub.add('l_View_Text_Count_Table(l_index).Column_name = '
792: || l_View_Text_Count_Table(l_index).Column_name);
793: bis_debug_pub.add('l_View_Text_Count_Table(l_index).Count = '
794: || l_View_Text_Count_Table(l_index).Count);
795: l_View_Text_Count_Table(l_index).Count

Line 793: bis_debug_pub.add('l_View_Text_Count_Table(l_index).Count = '

789: bis_debug_pub.add('l_column_name = ' || l_column_name);
790: bis_debug_pub.add('l_index = ' || l_index);
791: bis_debug_pub.add('l_View_Text_Count_Table(l_index).Column_name = '
792: || l_View_Text_Count_Table(l_index).Column_name);
793: bis_debug_pub.add('l_View_Text_Count_Table(l_index).Count = '
794: || l_View_Text_Count_Table(l_index).Count);
795: l_View_Text_Count_Table(l_index).Count
796: := l_View_Text_Count_Table(l_index).Count + 1;
797: l_count_string := TO_CHAR(l_View_Text_Count_Table(l_index).Count);

Line 815: bis_debug_pub.Add('< make_unique_columns');

811: EXIT comment_loop;
812: END IF;
813: END LOOP comment_loop;
814: END LOOP;
815: bis_debug_pub.Add('< make_unique_columns');
816:
817:
818: EXCEPTION
819: when FND_API.G_EXC_ERROR then

Line 865: bis_debug_pub.Add('> format_columns');

861: l_x_View_Column_Table bis_vg_types.View_Text_Table_Type;
862: l_counter NUMBER;
863: l_occurence_counter NUMBER;
864: BEGIN
865: bis_debug_pub.Add('> format_columns');
866: x_return_status := FND_API.G_RET_STS_SUCCESS;
867: FOR i IN 1 .. p_View_Column_Table.COUNT LOOP
868: x_View_Column_Table(i) := REPLACE(p_View_Column_Table(i), '&', '_');
869: x_View_Column_Table(i) := REPLACE(x_View_Column_Table(i), '"','_');

Line 943: bis_debug_pub.Add('< format_columns');

939: x_View_Column_Table(i) := '"'
940: || x_View_Column_Table(i)
941: || '"';
942: END LOOP;
943: bis_debug_pub.Add('< format_columns');
944:
945:
946: EXCEPTION
947: when FND_API.G_EXC_ERROR then

Line 1012: bis_debug_pub.Add('> format_Table');

1008: l_View_Column_Table4 bis_vg_types.View_Text_Table_Type;
1009: l_View_Column_Comment_Table4 bis_vg_types.Flex_Column_Comment_Table_Type;
1010: --
1011: BEGIN
1012: bis_debug_pub.Add('> format_Table');
1013: --- x_return_status := FND_API.G_RET_STS_SUCCESS;
1014: l_pos := INSTRB(p_View_Name, 'V_');
1015: x_View_Name := bis_vg_util.get_generated_view_name
1016: ( p_View_name

Line 1021: bis_debug_pub.Add('view name is '||x_view_name);

1017: , l_dummy
1018: , x_error_Tbl
1019: );
1020:
1021: bis_debug_pub.Add('view name is '||x_view_name);
1022: --
1023: l_View_Column_Table := p_View_Column_Table;
1024: l_View_Column_Comment_Table := p_View_Column_Comment_Table;
1025: FOR i IN 1 .. p_View_Column_Table.COUNT LOOP

Line 1092: bis_debug_pub.Add('< format_Table');

1088: END LOOP;
1089:
1090: x_View_Column_Table(l_count+1) := ' ) AS ';
1091: --
1092: bis_debug_pub.Add('< format_Table');
1093:
1094:
1095: EXCEPTION
1096: when FND_API.G_EXC_ERROR then

Line 1155: bis_debug_pub.Add('> write_View');

1151:
1152: --
1153: BEGIN
1154:
1155: bis_debug_pub.Add('> write_View');
1156: --- x_return_status := FND_API.G_RET_STS_SUCCESS;
1157: format_Table( p_View_name
1158: , p_View_Create_Text_Table
1159: , p_View_Column_Comment_Table

Line 1180: bis_debug_pub.debug_on;

1176:
1177:
1178: declare
1179: BEGIN
1180: bis_debug_pub.debug_on;
1181: bis_debug_pub.Add('l_applsys_schema = ' || l_applsys_schema);
1182: bis_debug_pub.Add('l_View_Name = '
1183: || l_View_Name);
1184:

Line 1181: bis_debug_pub.Add('l_applsys_schema = ' || l_applsys_schema);

1177:
1178: declare
1179: BEGIN
1180: bis_debug_pub.debug_on;
1181: bis_debug_pub.Add('l_applsys_schema = ' || l_applsys_schema);
1182: bis_debug_pub.Add('l_View_Name = '
1183: || l_View_Name);
1184:
1185: do_short_ddl(p_mode

Line 1182: bis_debug_pub.Add('l_View_Name = '

1178: declare
1179: BEGIN
1180: bis_debug_pub.debug_on;
1181: bis_debug_pub.Add('l_applsys_schema = ' || l_applsys_schema);
1182: bis_debug_pub.Add('l_View_Name = '
1183: || l_View_Name);
1184:
1185: do_short_ddl(p_mode
1186: , l_View_name

Line 1193: bis_debug_pub.debug_off;

1189: , l_applsys_schema
1190: , dummy_char
1191: , x_error_Tbl
1192: );
1193: bis_debug_pub.debug_off;
1194: EXCEPTION
1195: WHEN expected_overflow_error
1196: -- We have a view that is too large to fit in a 28000 varchar2
1197: THEN

Line 1198: bis_debug_pub.debug_on;

1194: EXCEPTION
1195: WHEN expected_overflow_error
1196: -- We have a view that is too large to fit in a 28000 varchar2
1197: THEN
1198: bis_debug_pub.debug_on;
1199:
1200: do_long_ddl( p_mode
1201: , l_View_name
1202: , l_View_Create_Text_Table

Line 1208: bis_debug_pub.debug_off;

1204: , l_applsys_schema
1205: , dummy_char
1206: , x_error_Tbl
1207: );
1208: bis_debug_pub.debug_off;
1209: END;
1210:
1211: bis_debug_pub.Add('< write_View');
1212:

Line 1211: bis_debug_pub.Add('< write_View');

1207: );
1208: bis_debug_pub.debug_off;
1209: END;
1210:
1211: bis_debug_pub.Add('< write_View');
1212:
1213: EXCEPTION
1214: when FND_API.G_EXC_ERROR then
1215: --- x_return_status := FND_API.G_RET_STS_ERROR ;