59: -- segments reqd.
60: -- 6. x_return_status error or normal
61: -- 7. x_error_Tbl table of error messages
62: -- COMMENT : Call this procedure to parse the KF view column tag.
63: -- --- EXCEPTION : FND_API.G_EXC_UNEXPECTED_ERROR
64: --- FND_API.G_EXC_ERROR;
65: -- ============================================================================
66: PROCEDURE parse_KF_Column_Line
67: ( p_View_Column_Table IN bis_vg_types.View_Text_Table_Type
60: -- 6. x_return_status error or normal
61: -- 7. x_error_Tbl table of error messages
62: -- COMMENT : Call this procedure to parse the KF view column tag.
63: -- --- EXCEPTION : FND_API.G_EXC_UNEXPECTED_ERROR
64: --- FND_API.G_EXC_ERROR;
65: -- ============================================================================
66: PROCEDURE parse_KF_Column_Line
67: ( p_View_Column_Table IN bis_vg_types.View_Text_Table_Type
68: , p_Column_Pointer IN bis_vg_types.View_Character_Pointer_Type
83: l_message_token VARCHAR2(2000);
84: --
85: BEGIN
86: bis_debug_pub.Add('> parse_KF_Column_Line');
87: x_return_status := FND_API.G_RET_STS_SUCCESS;
88: -- get row of text from table
89: l_string := bis_vg_util.get_row ( p_View_Column_Table
90: , p_Column_Pointer
91: , x_return_status
128: bis_vg_log.update_failure_log( x_error_tbl
129: , x_return_status
130: , x_error_Tbl
131: );
132: RAISE FND_API.G_EXC_ERROR;
133: END IF;
134: --
135: IF(l_pos IS NOT NULL) THEN
136: -- get next token, if any
170: bis_vg_log.update_failure_log( x_error_tbl
171: , x_return_status
172: , x_error_Tbl
173: );
174: RAISE FND_API.G_EXC_ERROR;
175:
176: END IF;
177:
178: --
214: bis_vg_log.update_failure_log( x_error_tbl
215: , x_return_status
216: , x_error_Tbl
217: );
218: RAISE FND_API.G_EXC_ERROR;
219: --
220: END IF;
221: END IF;
222: END IF;
229: );
230: bis_debug_pub.Add('< parse_KF_Column_Line');
231: --
232: EXCEPTION
233: when FND_API.G_EXC_ERROR then
234: x_return_status := FND_API.G_RET_STS_ERROR ;
235: RAISE FND_API.G_EXC_ERROR;
236: when FND_API.G_EXC_UNEXPECTED_ERROR then
237: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
230: bis_debug_pub.Add('< parse_KF_Column_Line');
231: --
232: EXCEPTION
233: when FND_API.G_EXC_ERROR then
234: x_return_status := FND_API.G_RET_STS_ERROR ;
235: RAISE FND_API.G_EXC_ERROR;
236: when FND_API.G_EXC_UNEXPECTED_ERROR then
237: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
238: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
231: --
232: EXCEPTION
233: when FND_API.G_EXC_ERROR then
234: x_return_status := FND_API.G_RET_STS_ERROR ;
235: RAISE FND_API.G_EXC_ERROR;
236: when FND_API.G_EXC_UNEXPECTED_ERROR then
237: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
238: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
239: when others then
232: EXCEPTION
233: when FND_API.G_EXC_ERROR then
234: x_return_status := FND_API.G_RET_STS_ERROR ;
235: RAISE FND_API.G_EXC_ERROR;
236: when FND_API.G_EXC_UNEXPECTED_ERROR then
237: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
238: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
239: when others then
240: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
233: when FND_API.G_EXC_ERROR then
234: x_return_status := FND_API.G_RET_STS_ERROR ;
235: RAISE FND_API.G_EXC_ERROR;
236: when FND_API.G_EXC_UNEXPECTED_ERROR then
237: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
238: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
239: when others then
240: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
241: BIS_VG_UTIL.Add_Error_Message
234: x_return_status := FND_API.G_RET_STS_ERROR ;
235: RAISE FND_API.G_EXC_ERROR;
236: when FND_API.G_EXC_UNEXPECTED_ERROR then
237: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
238: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
239: when others then
240: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
241: BIS_VG_UTIL.Add_Error_Message
242: ( p_error_msg_id => SQLCODE
236: when FND_API.G_EXC_UNEXPECTED_ERROR then
237: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
238: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
239: when others then
240: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
241: BIS_VG_UTIL.Add_Error_Message
242: ( p_error_msg_id => SQLCODE
243: , p_error_description => SQLERRM
244: , p_error_proc_name => G_PKG_NAME||'.parse_KF_Column_Line'
248: bis_vg_log.update_failure_log( x_error_tbl
249: , x_return_status
250: , x_error_Tbl
251: );
252: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
253:
254: END parse_KF_Column_Line;
255: --
256: -- ============================================================================
259: -- 1. p_app short name of application
260: --
261: -- COMMENT : Checks against the FND_APPLICATION_ALL_VIEW.
262: -- Called from parse_DF_Select_Line.
263: -- --- EXCEPTION : FND_API.G_EXC_UNEXPECTED_ERROR
264: --- FND_API.G_EXC_ERROR;
265: -- ==========================================================================
266: FUNCTION CHECK_APPLICATION_VALIDITY
267: ( p_app IN VARCHAR2
260: --
261: -- COMMENT : Checks against the FND_APPLICATION_ALL_VIEW.
262: -- Called from parse_DF_Select_Line.
263: -- --- EXCEPTION : FND_API.G_EXC_UNEXPECTED_ERROR
264: --- FND_API.G_EXC_ERROR;
265: -- ==========================================================================
266: FUNCTION CHECK_APPLICATION_VALIDITY
267: ( p_app IN VARCHAR2
268: )
301: -- 8. x_Structure_Column Structure Column Name
302: -- 9. x_return_status error or normal
303: -- 10. x_error_Tbl table of error messages
304: -- COMMENT : Call this procedure to parse the KF selected tag.
305: -- --- EXCEPTION : FND_API.G_EXC_UNEXPECTED_ERROR
306: --- FND_API.G_EXC_ERROR;
307: -- =============================================================================
308: PROCEDURE parse_KF_Select_Line
309: ( p_View_Select_Table IN bis_vg_types.View_Text_Table_Type
302: -- 9. x_return_status error or normal
303: -- 10. x_error_Tbl table of error messages
304: -- COMMENT : Call this procedure to parse the KF selected tag.
305: -- --- EXCEPTION : FND_API.G_EXC_UNEXPECTED_ERROR
306: --- FND_API.G_EXC_ERROR;
307: -- =============================================================================
308: PROCEDURE parse_KF_Select_Line
309: ( p_View_Select_Table IN bis_vg_types.View_Text_Table_Type
310: , p_Select_Pointer IN bis_vg_types.View_Character_Pointer_Type
325: l_tmp_pointer bis_vg_types.View_Character_Pointer_Type;
326: --
327: BEGIN
328: bis_debug_pub.Add('> parse_KF_Select_Line');
329: x_return_status := FND_API.G_RET_STS_SUCCESS;
330: l_message_token := bis_vg_parser.get_expression( p_View_Select_Table
331: , p_Select_Pointer
332: , l_tmp_pointer
333: , x_return_status
433: bis_vg_log.update_failure_log( x_error_tbl
434: , x_return_status
435: , x_error_Tbl
436: );
437: RAISE FND_API.G_EXC_ERROR;
438: END IF;
439: x_Key_Flex_Code := bis_vg_parser.get_token_increment_pointer
440: ( p_View_Select_Table
441: , x_Select_Pointer
503:
504: EXCEPTION
505: when MALFORMED_KFX_SEL_TAG_NO_FIELD
506: THEN
507: x_return_status := FND_API.G_RET_STS_ERROR ;
508: BIS_VG_UTIL.Add_Error_message
509: ( p_error_msg_name => BIS_VG_KEY_FLEX.KFX_SEL_TAG_EXP_NO_FIELD_MSG
510: , p_error_proc_name => G_PKG_NAME||'.parse_KF_Select_Line'
511: , p_error_msg_level => FND_MSG_PUB.G_MSG_LVL_ERROR
517: bis_vg_log.update_failure_log( x_error_tbl
518: , x_return_status
519: , x_error_Tbl
520: );
521: RAISE FND_API.G_EXC_ERROR;
522:
523: when FND_API.G_EXC_ERROR then
524: x_return_status := FND_API.G_RET_STS_ERROR ;
525: RAISE FND_API.G_EXC_ERROR;
519: , x_error_Tbl
520: );
521: RAISE FND_API.G_EXC_ERROR;
522:
523: when FND_API.G_EXC_ERROR then
524: x_return_status := FND_API.G_RET_STS_ERROR ;
525: RAISE FND_API.G_EXC_ERROR;
526: when FND_API.G_EXC_UNEXPECTED_ERROR then
527: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
520: );
521: RAISE FND_API.G_EXC_ERROR;
522:
523: when FND_API.G_EXC_ERROR then
524: x_return_status := FND_API.G_RET_STS_ERROR ;
525: RAISE FND_API.G_EXC_ERROR;
526: when FND_API.G_EXC_UNEXPECTED_ERROR then
527: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
528: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
521: RAISE FND_API.G_EXC_ERROR;
522:
523: when FND_API.G_EXC_ERROR then
524: x_return_status := FND_API.G_RET_STS_ERROR ;
525: RAISE FND_API.G_EXC_ERROR;
526: when FND_API.G_EXC_UNEXPECTED_ERROR then
527: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
528: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
529: when others then
522:
523: when FND_API.G_EXC_ERROR then
524: x_return_status := FND_API.G_RET_STS_ERROR ;
525: RAISE FND_API.G_EXC_ERROR;
526: when FND_API.G_EXC_UNEXPECTED_ERROR then
527: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
528: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
529: when others then
530: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
523: when FND_API.G_EXC_ERROR then
524: x_return_status := FND_API.G_RET_STS_ERROR ;
525: RAISE FND_API.G_EXC_ERROR;
526: when FND_API.G_EXC_UNEXPECTED_ERROR then
527: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
528: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
529: when others then
530: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
531: BIS_VG_UTIL.Add_Error_Message
524: x_return_status := FND_API.G_RET_STS_ERROR ;
525: RAISE FND_API.G_EXC_ERROR;
526: when FND_API.G_EXC_UNEXPECTED_ERROR then
527: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
528: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
529: when others then
530: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
531: BIS_VG_UTIL.Add_Error_Message
532: ( p_error_msg_id => SQLCODE
526: when FND_API.G_EXC_UNEXPECTED_ERROR then
527: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
528: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
529: when others then
530: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
531: BIS_VG_UTIL.Add_Error_Message
532: ( p_error_msg_id => SQLCODE
533: , p_error_description => SQLERRM
534: , p_error_proc_name => G_PKG_NAME||'.parse_KF_Select_Line'
538: bis_vg_log.update_failure_log( x_error_tbl
539: , x_return_status
540: , x_error_Tbl
541: );
542: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
543:
544:
545: END parse_KF_Select_Line;
546: --
565: -- 12. x_return_status error or normal
566: -- 13. x_error_Tbl table of error messages
567: -- COMMENT : Call this procedure to build the column and select tables for
568: -- key flexfields.
569: -- --- EXCEPTION : FND_API.G_EXC_UNEXPECTED_ERROR
570: --- FND_API.G_EXC_ERROR;
571: -- ============================================================================
572: PROCEDURE add_key_flexfield_segments
573: ( p_dummy_flag IN BOOLEAN
566: -- 13. x_error_Tbl table of error messages
567: -- COMMENT : Call this procedure to build the column and select tables for
568: -- key flexfields.
569: -- --- EXCEPTION : FND_API.G_EXC_UNEXPECTED_ERROR
570: --- FND_API.G_EXC_ERROR;
571: -- ============================================================================
572: PROCEDURE add_key_flexfield_segments
573: ( p_dummy_flag IN BOOLEAN
574: , p_Structure_Num IN NUMBER
599: l_Segment_Name NUMBER := 0;
600: --
601: BEGIN
602: bis_debug_pub.Add('> add_key_flexfield_segments');
603: x_return_status := FND_API.G_RET_STS_SUCCESS;
604: l_Concat_Segment_Flag := FALSE;
605: --
606: FND_FLEX_KEY_API.GET_SEGMENTS( flexfield => p_Flexfield
607: , structure => p_Structure
680: bis_debug_pub.Add('< add_key_flexfield_segments');
681:
682:
683: EXCEPTION
684: when FND_API.G_EXC_ERROR then
685: x_return_status := FND_API.G_RET_STS_ERROR ;
686: RAISE FND_API.G_EXC_ERROR;
687: when FND_API.G_EXC_UNEXPECTED_ERROR then
688: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
681:
682:
683: EXCEPTION
684: when FND_API.G_EXC_ERROR then
685: x_return_status := FND_API.G_RET_STS_ERROR ;
686: RAISE FND_API.G_EXC_ERROR;
687: when FND_API.G_EXC_UNEXPECTED_ERROR then
688: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
689: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
682:
683: EXCEPTION
684: when FND_API.G_EXC_ERROR then
685: x_return_status := FND_API.G_RET_STS_ERROR ;
686: RAISE FND_API.G_EXC_ERROR;
687: when FND_API.G_EXC_UNEXPECTED_ERROR then
688: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
689: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
690: when others then
683: EXCEPTION
684: when FND_API.G_EXC_ERROR then
685: x_return_status := FND_API.G_RET_STS_ERROR ;
686: RAISE FND_API.G_EXC_ERROR;
687: when FND_API.G_EXC_UNEXPECTED_ERROR then
688: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
689: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
690: when others then
691: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
684: when FND_API.G_EXC_ERROR then
685: x_return_status := FND_API.G_RET_STS_ERROR ;
686: RAISE FND_API.G_EXC_ERROR;
687: when FND_API.G_EXC_UNEXPECTED_ERROR then
688: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
689: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
690: when others then
691: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
692: BIS_VG_UTIL.Add_Error_Message
685: x_return_status := FND_API.G_RET_STS_ERROR ;
686: RAISE FND_API.G_EXC_ERROR;
687: when FND_API.G_EXC_UNEXPECTED_ERROR then
688: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
689: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
690: when others then
691: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
692: BIS_VG_UTIL.Add_Error_Message
693: ( p_error_msg_id => SQLCODE
687: when FND_API.G_EXC_UNEXPECTED_ERROR then
688: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
689: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
690: when others then
691: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
692: BIS_VG_UTIL.Add_Error_Message
693: ( p_error_msg_id => SQLCODE
694: , p_error_description => SQLERRM
695: , p_error_proc_name => G_PKG_NAME||'.add_key_flexfield_segments'
699: bis_vg_log.update_failure_log( x_error_tbl
700: , x_return_status
701: , x_error_Tbl
702: );
703: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
704:
705: END add_key_flexfield_segments;
706:
707: -- =============================================================================
714: -- of view text
715: -- 6. x_return_status error or normal
716: -- 7. x_error_Tbl table of error messages
717: -- COMMENT : Call this procedure to build the concatenated segments for a structure
718: -- --- EXCEPTION : FND_API.G_EXC_UNEXPECTED_ERROR
719: --- FND_API.G_EXC_ERROR;
720: -- =============================================================================
721: PROCEDURE add_kfx_segments_concat
722: ( p_nStructures IN NUMBER
715: -- 6. x_return_status error or normal
716: -- 7. x_error_Tbl table of error messages
717: -- COMMENT : Call this procedure to build the concatenated segments for a structure
718: -- --- EXCEPTION : FND_API.G_EXC_UNEXPECTED_ERROR
719: --- FND_API.G_EXC_ERROR;
720: -- =============================================================================
721: PROCEDURE add_kfx_segments_concat
722: ( p_nStructures IN NUMBER
723: , p_Flexfield IN FND_FLEX_KEY_API.FLEXFIELD_TYPE
740: l_Segment_Name NUMBER := 0;
741: --
742: BEGIN
743: bis_debug_pub.Add('> add_kfx_segments_concat');
744: x_return_status := FND_API.G_RET_STS_SUCCESS;
745: FND_FLEX_KEY_API.GET_SEGMENTS( flexfield => p_Flexfield
746: , structure => p_Structure
747: , enabled_only => TRUE
748: , nsegments => l_nSegments
783: --
784:
785:
786: EXCEPTION
787: when FND_API.G_EXC_ERROR then
788: x_return_status := FND_API.G_RET_STS_ERROR ;
789: RAISE FND_API.G_EXC_ERROR;
790: when FND_API.G_EXC_UNEXPECTED_ERROR then
791: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
784:
785:
786: EXCEPTION
787: when FND_API.G_EXC_ERROR then
788: x_return_status := FND_API.G_RET_STS_ERROR ;
789: RAISE FND_API.G_EXC_ERROR;
790: when FND_API.G_EXC_UNEXPECTED_ERROR then
791: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
792: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
785:
786: EXCEPTION
787: when FND_API.G_EXC_ERROR then
788: x_return_status := FND_API.G_RET_STS_ERROR ;
789: RAISE FND_API.G_EXC_ERROR;
790: when FND_API.G_EXC_UNEXPECTED_ERROR then
791: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
792: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
793: when others then
786: EXCEPTION
787: when FND_API.G_EXC_ERROR then
788: x_return_status := FND_API.G_RET_STS_ERROR ;
789: RAISE FND_API.G_EXC_ERROR;
790: when FND_API.G_EXC_UNEXPECTED_ERROR then
791: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
792: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
793: when others then
794: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
787: when FND_API.G_EXC_ERROR then
788: x_return_status := FND_API.G_RET_STS_ERROR ;
789: RAISE FND_API.G_EXC_ERROR;
790: when FND_API.G_EXC_UNEXPECTED_ERROR then
791: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
792: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
793: when others then
794: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
795: BIS_VG_UTIL.Add_Error_Message
788: x_return_status := FND_API.G_RET_STS_ERROR ;
789: RAISE FND_API.G_EXC_ERROR;
790: when FND_API.G_EXC_UNEXPECTED_ERROR then
791: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
792: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
793: when others then
794: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
795: BIS_VG_UTIL.Add_Error_Message
796: ( p_error_msg_id => SQLCODE
790: when FND_API.G_EXC_UNEXPECTED_ERROR then
791: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
792: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
793: when others then
794: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
795: BIS_VG_UTIL.Add_Error_Message
796: ( p_error_msg_id => SQLCODE
797: , p_error_description => SQLERRM
798: , p_error_proc_name => G_PKG_NAME||'.add_kfx_segments_concat'
802: bis_vg_log.update_failure_log( x_error_tbl
803: , x_return_status
804: , x_error_Tbl
805: );
806: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
807:
808: END add_kfx_segments_concat;
809: --
810: -- ============================================================================
839: -- 17. x_error_Tbl table of error messages
840: -- of view text
841: -- COMMENT : Call this procedure to build the column and select
842: -- tables for key flexfields.
843: -- --- EXCEPTION : FND_API.G_EXC_UNEXPECTED_ERROR
844: --- FND_API.G_EXC_ERROR;
845: -- ============================================================================
846: PROCEDURE update_Key_Flex_Tables
847: ( p_Concat_Seg_Name IN VARCHAR2
840: -- of view text
841: -- COMMENT : Call this procedure to build the column and select
842: -- tables for key flexfields.
843: -- --- EXCEPTION : FND_API.G_EXC_UNEXPECTED_ERROR
844: --- FND_API.G_EXC_ERROR;
845: -- ============================================================================
846: PROCEDURE update_Key_Flex_Tables
847: ( p_Concat_Seg_Name IN VARCHAR2
848: , p_Concat_Segment_Flag IN BOOLEAN
888: BEGIN
889: --
890: bis_debug_pub.debug_on;
891: bis_debug_pub.Add('> update_Key_Flex_Tables');
892: x_return_status := FND_API.G_RET_STS_SUCCESS;
893: bis_debug_pub.Add('p_Table_Alias = ' || p_Table_Alias);
894: IF(p_prefix IS NOT NULL) THEN
895: l_prefix := p_prefix || '_';
896: END IF;
1195: --- bis_vg_log.update_failure_log( x_error_tbl
1196: --- , x_return_status
1197: --- , x_error_Tbl
1198: --- );
1199: --- RAISE FND_API.G_EXC_ERROR;
1200: ---
1201: ---
1202: --- END IF;
1203:
1206: x_select_table(1) := 'NULL';
1207: END IF;
1208:
1209: EXCEPTION
1210: when FND_API.G_EXC_ERROR then
1211: x_return_status := FND_API.G_RET_STS_ERROR ;
1212: RAISE FND_API.G_EXC_ERROR;
1213: when FND_API.G_EXC_UNEXPECTED_ERROR then
1214: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1207: END IF;
1208:
1209: EXCEPTION
1210: when FND_API.G_EXC_ERROR then
1211: x_return_status := FND_API.G_RET_STS_ERROR ;
1212: RAISE FND_API.G_EXC_ERROR;
1213: when FND_API.G_EXC_UNEXPECTED_ERROR then
1214: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1215: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1208:
1209: EXCEPTION
1210: when FND_API.G_EXC_ERROR then
1211: x_return_status := FND_API.G_RET_STS_ERROR ;
1212: RAISE FND_API.G_EXC_ERROR;
1213: when FND_API.G_EXC_UNEXPECTED_ERROR then
1214: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1215: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1216: when others then
1209: EXCEPTION
1210: when FND_API.G_EXC_ERROR then
1211: x_return_status := FND_API.G_RET_STS_ERROR ;
1212: RAISE FND_API.G_EXC_ERROR;
1213: when FND_API.G_EXC_UNEXPECTED_ERROR then
1214: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1215: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1216: when others then
1217: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1210: when FND_API.G_EXC_ERROR then
1211: x_return_status := FND_API.G_RET_STS_ERROR ;
1212: RAISE FND_API.G_EXC_ERROR;
1213: when FND_API.G_EXC_UNEXPECTED_ERROR then
1214: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1215: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1216: when others then
1217: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1218: BIS_VG_UTIL.Add_Error_Message
1211: x_return_status := FND_API.G_RET_STS_ERROR ;
1212: RAISE FND_API.G_EXC_ERROR;
1213: when FND_API.G_EXC_UNEXPECTED_ERROR then
1214: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1215: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1216: when others then
1217: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1218: BIS_VG_UTIL.Add_Error_Message
1219: ( p_error_msg_id => SQLCODE
1213: when FND_API.G_EXC_UNEXPECTED_ERROR then
1214: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1215: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1216: when others then
1217: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1218: BIS_VG_UTIL.Add_Error_Message
1219: ( p_error_msg_id => SQLCODE
1220: , p_error_description => SQLERRM
1221: , p_error_proc_name => G_PKG_NAME||'.update_Key_Flex_Tables'
1225: bis_vg_log.update_failure_log( x_error_tbl
1226: , x_return_status
1227: , x_error_Tbl
1228: );
1229: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1230:
1231: END update_Key_Flex_Tables;
1232:
1233: ---
1256: --- 13. x_return_status error or normal
1257: --- 14. x_error_Tbl table of error messages
1258: ---
1259: --- COMMENT : Call this procedure to add particular key flexfield information to a view.
1260: --- EXCEPTION : FND_API.G_EXC_UNEXPECTED_ERROR
1261: --- FND_API.G_EXC_ERROR;
1262: --- ==================================================================================== */
1263:
1264: PROCEDURE add_Key_Flex_Info
1257: --- 14. x_error_Tbl table of error messages
1258: ---
1259: --- COMMENT : Call this procedure to add particular key flexfield information to a view.
1260: --- EXCEPTION : FND_API.G_EXC_UNEXPECTED_ERROR
1261: --- FND_API.G_EXC_ERROR;
1262: --- ==================================================================================== */
1263:
1264: PROCEDURE add_Key_Flex_Info
1265: ( p_View_Column_Table IN bis_vg_types.View_Text_Table_Type
1295: --
1296: BEGIN
1297: --
1298: bis_debug_pub.Add('> add_Key_Flex_Info');
1299: x_return_status := FND_API.G_RET_STS_SUCCESS;
1300: parse_KF_Column_Line( p_View_Column_Table
1301: , p_Column_Pointer
1302: , x_Column_Pointer
1303: , l_Concat_Seg_Name
1403:
1404: EXCEPTION
1405: when bis_view_generator_pvt.cannot_prune_non_edw_view THEN
1406: RAISE; -- same exception
1407: when FND_API.G_EXC_ERROR then
1408: x_return_status := FND_API.G_RET_STS_ERROR ;
1409: RAISE; -- same exception
1410: when FND_API.G_EXC_UNEXPECTED_ERROR then
1411: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1404: EXCEPTION
1405: when bis_view_generator_pvt.cannot_prune_non_edw_view THEN
1406: RAISE; -- same exception
1407: when FND_API.G_EXC_ERROR then
1408: x_return_status := FND_API.G_RET_STS_ERROR ;
1409: RAISE; -- same exception
1410: when FND_API.G_EXC_UNEXPECTED_ERROR then
1411: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1412: RAISE; -- same exception
1406: RAISE; -- same exception
1407: when FND_API.G_EXC_ERROR then
1408: x_return_status := FND_API.G_RET_STS_ERROR ;
1409: RAISE; -- same exception
1410: when FND_API.G_EXC_UNEXPECTED_ERROR then
1411: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1412: RAISE; -- same exception
1413: when others then
1414: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1407: when FND_API.G_EXC_ERROR then
1408: x_return_status := FND_API.G_RET_STS_ERROR ;
1409: RAISE; -- same exception
1410: when FND_API.G_EXC_UNEXPECTED_ERROR then
1411: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1412: RAISE; -- same exception
1413: when others then
1414: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1415: BIS_VG_UTIL.Add_Error_Message
1410: when FND_API.G_EXC_UNEXPECTED_ERROR then
1411: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1412: RAISE; -- same exception
1413: when others then
1414: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1415: BIS_VG_UTIL.Add_Error_Message
1416: ( p_error_msg_id => SQLCODE
1417: , p_error_description => SQLERRM
1418: , p_error_proc_name => G_PKG_NAME||'.add_Key_Flex_Info'
1422: bis_vg_log.update_failure_log( x_error_tbl
1423: , x_return_status
1424: , x_error_Tbl
1425: );
1426: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1427:
1428: END add_Key_Flex_Info;
1429: --
1430: --