18: --
19: -- 21-AUG-98 ANSINGHA created
20: -- 12-MAY-99 WNASRALL replaced call to do_array_ddl with do_ddl for eficiency
21: -- 06-APR-01 DBOWLES modified make_column_len30 and write view procedures. Add two
22: -- new parameters of bis_vg_types.Flex_Column_Comment_Table_Type
23: -- to each procedure.
24: -- 25-OCT-05 Edited by donald.bowles Made changes for NOCOPY hint.
25: --
26: --
34: --TYPE : View_Text_Count_Rec_Type
35: -- ============================================================================
36: TYPE View_Text_Count_Rec_Type IS -- local type
37: RECORD
38: ( Column_name bis_vg_types.View_Text_Table_Rec_Type
39: , Count NUMBER
40: );
41:
42: --
63: --COMMENT : Call this procedure to remove blank lines from the view table
64: --EXCEPTION : None
65: --============================================================================
66: --PROCEDURE remove_blank_lines ( p_view_text_table IN
67: --bis_vg_types.view_text_table_type , x_view_text_table out
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
64: --EXCEPTION : None
65: --============================================================================
66: --PROCEDURE remove_blank_lines ( p_view_text_table IN
67: --bis_vg_types.view_text_table_type , x_view_text_table out
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');
66: --PROCEDURE remove_blank_lines ( p_view_text_table IN
67: --bis_vg_types.view_text_table_type , x_view_text_table out
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: --
123: --RETURN : application short name
124: --EXCEPTION : None
125: -- ============================================================================
126: --PROCEDURE create_DSQL_view
127: --( p_View_Text_Table IN bis_vg_types.View_Text_Table_Type
128: --, x_return_status OUT VARCHAR2
129: --, x_error_Tbl OUT BIS_VG_UTIL.Error_Tbl_Type
130: --)
131: -- IS
181: -- create the view.
182: --EXCEPTION : None
183: -- ============================================================================
184: --PROCEDURE execute_DDL_Statement -- PRIVATE PROCEDURE
185: --( p_View_Table_Rec IN bis_vg_types.View_Table_Rec_Type
186: --, p_ub IN INTEGER
187: --, x_return_status OUT VARCHAR2
188: --, x_error_Tbl OUT BIS_VG_UTIL.Error_Tbl_Type
189: --)
272: -- of the view.
273: --EXCEPTION : None
274: -- ============================================================================
275: --PROCEDURE build_DDL_Statement -- PRIVATE PROCEDURE
276: --( p_View_Text_Table IN bis_vg_types.View_Text_Table_Type
277: --, x_return_status OUT VARCHAR2
278: --, x_error_Tbl OUT BIS_VG_UTIL.Error_Tbl_Type
279: --)
280: --IS
333: -- ============================================================================
334: PROCEDURE DO_LONG_DDL
335: ( p_mode IN NUMBER
336: , p_view_name IN VARCHAR2
337: , p_View_Create_Text_Table IN bis_vg_types.View_Text_Table_Type
338: , p_View_Select_Text_Table IN bis_vg_types.View_Text_Table_Type
339: , p_applsys_schema IN VARCHAR2
340: , x_return_status OUT NOCOPY VARCHAR2
341: , x_error_Tbl OUT NOCOPY BIS_VG_UTIL.Error_Tbl_Type
334: PROCEDURE DO_LONG_DDL
335: ( p_mode IN NUMBER
336: , p_view_name IN VARCHAR2
337: , p_View_Create_Text_Table IN bis_vg_types.View_Text_Table_Type
338: , p_View_Select_Text_Table IN bis_vg_types.View_Text_Table_Type
339: , p_applsys_schema IN VARCHAR2
340: , x_return_status OUT NOCOPY VARCHAR2
341: , x_error_Tbl OUT NOCOPY BIS_VG_UTIL.Error_Tbl_Type
342: )
353: FOR l_count IN 1 .. p_View_Create_Text_Table.COUNT
354: LOOP
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;
354: LOOP
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;
365: LOOP
366: l_total := l_total+1;
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:
366: l_total := l_total+1;
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;
423: PROCEDURE DO_SHORT_DDL
424:
425: ( p_mode IN NUMBER
426: , p_view_name IN VARCHAR2
427: , p_View_Create_Text_Table IN bis_vg_types.View_Text_Table_Type
428: , p_View_Select_Text_Table IN bis_vg_types.View_Text_Table_Type
429: , p_applsys_schema IN VARCHAR2
430: , x_return_status OUT NOCOPY VARCHAR2
431: , x_error_Tbl OUT NOCOPY BIS_VG_UTIL.Error_Tbl_Type
424:
425: ( p_mode IN NUMBER
426: , p_view_name IN VARCHAR2
427: , p_View_Create_Text_Table IN bis_vg_types.View_Text_Table_Type
428: , p_View_Select_Text_Table IN bis_vg_types.View_Text_Table_Type
429: , p_applsys_schema IN VARCHAR2
430: , x_return_status OUT NOCOPY VARCHAR2
431: , x_error_Tbl OUT NOCOPY BIS_VG_UTIL.Error_Tbl_Type
432: )
445: LOOP
446: l_length := l_length + length(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);
446: l_length := l_length + length(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;
458: l_buffer:=l_buffer || p_View_Select_Text_Table(l_count);
459: l_length := l_length + length(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;
459: l_length := l_length + length(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:
531: --COMMENT : Call this procedure to ensure column names <= 30 bytes
532: --EXCEPTION : None
533: -- ============================================================================
534: PROCEDURE make_column_len30 -- PRIVATE PROCEDURE
535: ( p_View_Column_Table IN bis_vg_types.View_Text_Table_Type
536: , p_View_Column_Comment_Table IN bis_vg_types.Flex_Column_Comment_Table_Type
537: , x_View_Column_Table IN OUT NOCOPY bis_vg_types.View_Text_Table_Type
538: , x_View_Column_Comment_Table IN OUT NOCOPY bis_vg_types.Flex_Column_Comment_Table_Type
539: , x_return_status OUT NOCOPY VARCHAR2
532: --EXCEPTION : None
533: -- ============================================================================
534: PROCEDURE make_column_len30 -- PRIVATE PROCEDURE
535: ( p_View_Column_Table IN bis_vg_types.View_Text_Table_Type
536: , p_View_Column_Comment_Table IN bis_vg_types.Flex_Column_Comment_Table_Type
537: , x_View_Column_Table IN OUT NOCOPY bis_vg_types.View_Text_Table_Type
538: , x_View_Column_Comment_Table IN OUT NOCOPY bis_vg_types.Flex_Column_Comment_Table_Type
539: , x_return_status OUT NOCOPY VARCHAR2
540: , x_error_Tbl OUT NOCOPY BIS_VG_UTIL.Error_Tbl_Type
533: -- ============================================================================
534: PROCEDURE make_column_len30 -- PRIVATE PROCEDURE
535: ( p_View_Column_Table IN bis_vg_types.View_Text_Table_Type
536: , p_View_Column_Comment_Table IN bis_vg_types.Flex_Column_Comment_Table_Type
537: , x_View_Column_Table IN OUT NOCOPY bis_vg_types.View_Text_Table_Type
538: , x_View_Column_Comment_Table IN OUT NOCOPY bis_vg_types.Flex_Column_Comment_Table_Type
539: , x_return_status OUT NOCOPY VARCHAR2
540: , x_error_Tbl OUT NOCOPY BIS_VG_UTIL.Error_Tbl_Type
541: )
534: PROCEDURE make_column_len30 -- PRIVATE PROCEDURE
535: ( p_View_Column_Table IN bis_vg_types.View_Text_Table_Type
536: , p_View_Column_Comment_Table IN bis_vg_types.Flex_Column_Comment_Table_Type
537: , x_View_Column_Table IN OUT NOCOPY bis_vg_types.View_Text_Table_Type
538: , x_View_Column_Comment_Table IN OUT NOCOPY bis_vg_types.Flex_Column_Comment_Table_Type
539: , x_return_status OUT NOCOPY VARCHAR2
540: , x_error_Tbl OUT NOCOPY BIS_VG_UTIL.Error_Tbl_Type
541: )
542: IS
540: , x_error_Tbl OUT NOCOPY BIS_VG_UTIL.Error_Tbl_Type
541: )
542: IS
543: --
544: l_column_name bis_vg_types.View_Text_Table_Rec_Type;
545: l_start_string bis_vg_types.View_Text_Table_Rec_Type;
546: l_end_string bis_vg_types.View_Text_Table_Rec_Type;
547: l_original_column_name bis_vg_types.View_Text_Table_Rec_Type;
548: l_pos NUMBER;
541: )
542: IS
543: --
544: l_column_name bis_vg_types.View_Text_Table_Rec_Type;
545: l_start_string bis_vg_types.View_Text_Table_Rec_Type;
546: l_end_string bis_vg_types.View_Text_Table_Rec_Type;
547: l_original_column_name bis_vg_types.View_Text_Table_Rec_Type;
548: l_pos NUMBER;
549: --
542: IS
543: --
544: l_column_name bis_vg_types.View_Text_Table_Rec_Type;
545: l_start_string bis_vg_types.View_Text_Table_Rec_Type;
546: l_end_string bis_vg_types.View_Text_Table_Rec_Type;
547: l_original_column_name bis_vg_types.View_Text_Table_Rec_Type;
548: l_pos NUMBER;
549: --
550: BEGIN
543: --
544: l_column_name bis_vg_types.View_Text_Table_Rec_Type;
545: l_start_string bis_vg_types.View_Text_Table_Rec_Type;
546: l_end_string bis_vg_types.View_Text_Table_Rec_Type;
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');
630: -- p_View_Text_Count_Table; else return 0;
631: --EXCEPTION : None
632: -- ============================================================================
633: FUNCTION find_column -- PRIVATE FUNCTION
634: ( p_column_name IN bis_vg_types.View_Text_Table_Rec_Type
635: , p_View_Text_Count_Table IN View_Text_Count_Table_Type
636: , x_return_status OUT NOCOPY VARCHAR2
637: , x_error_Tbl OUT NOCOPY BIS_VG_UTIL.Error_Tbl_Type
638: )
687: -- p_table_column_name has a hat
688: --EXCEPTION : None
689: -- ============================================================================
690: PROCEDURE insert_hat_in_column -- PRIVATE PROCEDURE
691: ( p_column_name IN bis_vg_types.View_Text_Table_Rec_Type
692: , p_table_column_name IN bis_vg_types.View_Text_Table_Rec_Type
693: , x_column_name IN OUT NOCOPY bis_vg_types.View_Text_Table_Rec_Type
694: , x_return_status OUT NOCOPY VARCHAR2
695: , x_error_Tbl OUT NOCOPY BIS_VG_UTIL.Error_Tbl_Type
688: --EXCEPTION : None
689: -- ============================================================================
690: PROCEDURE insert_hat_in_column -- PRIVATE PROCEDURE
691: ( p_column_name IN bis_vg_types.View_Text_Table_Rec_Type
692: , p_table_column_name IN bis_vg_types.View_Text_Table_Rec_Type
693: , x_column_name IN OUT NOCOPY bis_vg_types.View_Text_Table_Rec_Type
694: , x_return_status OUT NOCOPY VARCHAR2
695: , x_error_Tbl OUT NOCOPY BIS_VG_UTIL.Error_Tbl_Type
696: )
689: -- ============================================================================
690: PROCEDURE insert_hat_in_column -- PRIVATE PROCEDURE
691: ( p_column_name IN bis_vg_types.View_Text_Table_Rec_Type
692: , p_table_column_name IN bis_vg_types.View_Text_Table_Rec_Type
693: , x_column_name IN OUT NOCOPY bis_vg_types.View_Text_Table_Rec_Type
694: , x_return_status OUT NOCOPY VARCHAR2
695: , x_error_Tbl OUT NOCOPY BIS_VG_UTIL.Error_Tbl_Type
696: )
697: IS
748: --COMMENT : Call this procedure to ensure column names are unique
749: --EXCEPTION : None
750: -- ============================================================================
751: PROCEDURE make_unique_columns -- PRIVATE PROCEDURE
752: ( p_View_Column_Table IN bis_vg_types.View_Text_Table_Type
753: , p_View_Column_Comment_Table IN bis_vg_types.Flex_Column_Comment_Table_Type
754: , x_View_Column_Table IN OUT NOCOPY bis_vg_types.View_Text_Table_Type
755: , x_View_Column_Comment_Table IN OUT NOCOPY bis_vg_types.Flex_Column_Comment_Table_Type
756: , x_return_status OUT NOCOPY VARCHAR2
749: --EXCEPTION : None
750: -- ============================================================================
751: PROCEDURE make_unique_columns -- PRIVATE PROCEDURE
752: ( p_View_Column_Table IN bis_vg_types.View_Text_Table_Type
753: , p_View_Column_Comment_Table IN bis_vg_types.Flex_Column_Comment_Table_Type
754: , x_View_Column_Table IN OUT NOCOPY bis_vg_types.View_Text_Table_Type
755: , x_View_Column_Comment_Table IN OUT NOCOPY bis_vg_types.Flex_Column_Comment_Table_Type
756: , x_return_status OUT NOCOPY VARCHAR2
757: , x_error_Tbl OUT NOCOPY BIS_VG_UTIL.Error_Tbl_Type
750: -- ============================================================================
751: PROCEDURE make_unique_columns -- PRIVATE PROCEDURE
752: ( p_View_Column_Table IN bis_vg_types.View_Text_Table_Type
753: , p_View_Column_Comment_Table IN bis_vg_types.Flex_Column_Comment_Table_Type
754: , x_View_Column_Table IN OUT NOCOPY bis_vg_types.View_Text_Table_Type
755: , x_View_Column_Comment_Table IN OUT NOCOPY bis_vg_types.Flex_Column_Comment_Table_Type
756: , x_return_status OUT NOCOPY VARCHAR2
757: , x_error_Tbl OUT NOCOPY BIS_VG_UTIL.Error_Tbl_Type
758: )
751: PROCEDURE make_unique_columns -- PRIVATE PROCEDURE
752: ( p_View_Column_Table IN bis_vg_types.View_Text_Table_Type
753: , p_View_Column_Comment_Table IN bis_vg_types.Flex_Column_Comment_Table_Type
754: , x_View_Column_Table IN OUT NOCOPY bis_vg_types.View_Text_Table_Type
755: , x_View_Column_Comment_Table IN OUT NOCOPY bis_vg_types.Flex_Column_Comment_Table_Type
756: , x_return_status OUT NOCOPY VARCHAR2
757: , x_error_Tbl OUT NOCOPY BIS_VG_UTIL.Error_Tbl_Type
758: )
759: IS
759: IS
760: --
761: l_View_Text_Count_Table View_Text_Count_Table_Type;
762: l_View_Text_Count_Rec View_Text_Count_Rec_Type;
763: l_column_name bis_vg_types.View_Text_Table_Rec_Type;
764: l_count_string VARCHAR2(10);
765: l_end_string VARCHAR2(100);
766: l_start_string VARCHAR2(100);
767: l_index NUMBER;
848: --COMMENT : Call this procedure to ensure column names dont have hats
849: --EXCEPTION : None
850: -- ============================================================================
851: PROCEDURE format_columns -- PRIVATE PROCEDURE
852: ( p_View_Column_Table IN bis_vg_types.View_Text_Table_Type
853: , p_View_Column_Comment_Table IN bis_vg_types.Flex_Column_Comment_Table_Type
854: , x_View_Column_Table IN OUT NOCOPY bis_vg_types.View_Text_Table_Type
855: , x_View_Column_Comment_Table IN OUT NOCOPY bis_vg_types.Flex_Column_Comment_Table_Type
856: , x_return_status OUT NOCOPY VARCHAR2
849: --EXCEPTION : None
850: -- ============================================================================
851: PROCEDURE format_columns -- PRIVATE PROCEDURE
852: ( p_View_Column_Table IN bis_vg_types.View_Text_Table_Type
853: , p_View_Column_Comment_Table IN bis_vg_types.Flex_Column_Comment_Table_Type
854: , x_View_Column_Table IN OUT NOCOPY bis_vg_types.View_Text_Table_Type
855: , x_View_Column_Comment_Table IN OUT NOCOPY bis_vg_types.Flex_Column_Comment_Table_Type
856: , x_return_status OUT NOCOPY VARCHAR2
857: , x_error_Tbl OUT NOCOPY BIS_VG_UTIL.Error_Tbl_Type
850: -- ============================================================================
851: PROCEDURE format_columns -- PRIVATE PROCEDURE
852: ( p_View_Column_Table IN bis_vg_types.View_Text_Table_Type
853: , p_View_Column_Comment_Table IN bis_vg_types.Flex_Column_Comment_Table_Type
854: , x_View_Column_Table IN OUT NOCOPY bis_vg_types.View_Text_Table_Type
855: , x_View_Column_Comment_Table IN OUT NOCOPY bis_vg_types.Flex_Column_Comment_Table_Type
856: , x_return_status OUT NOCOPY VARCHAR2
857: , x_error_Tbl OUT NOCOPY BIS_VG_UTIL.Error_Tbl_Type
858: )
851: PROCEDURE format_columns -- PRIVATE PROCEDURE
852: ( p_View_Column_Table IN bis_vg_types.View_Text_Table_Type
853: , p_View_Column_Comment_Table IN bis_vg_types.Flex_Column_Comment_Table_Type
854: , x_View_Column_Table IN OUT NOCOPY bis_vg_types.View_Text_Table_Type
855: , x_View_Column_Comment_Table IN OUT NOCOPY bis_vg_types.Flex_Column_Comment_Table_Type
856: , x_return_status OUT NOCOPY VARCHAR2
857: , x_error_Tbl OUT NOCOPY BIS_VG_UTIL.Error_Tbl_Type
858: )
859: IS
857: , x_error_Tbl OUT NOCOPY BIS_VG_UTIL.Error_Tbl_Type
858: )
859: IS
860: l_length NUMBER;
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');
980: --EXCEPTION : None
981: -- ============================================================================
982: PROCEDURE format_Table -- PRIVATE PROCEDURE
983: ( p_View_name IN VARCHAR2
984: , p_view_column_table IN bis_vg_types.View_Text_Table_Type
985: , p_View_Column_Comment_Table IN bis_vg_types.Flex_Column_Comment_Table_Type
986: , x_View_name OUT NOCOPY VARCHAR2
987: , x_View_Column_Table OUT NOCOPY bis_vg_types.View_Text_Table_Type
988: , x_View_Column_Comment_Table OUT NOCOPY bis_vg_types.Flex_Column_Comment_Table_Type
981: -- ============================================================================
982: PROCEDURE format_Table -- PRIVATE PROCEDURE
983: ( p_View_name IN VARCHAR2
984: , p_view_column_table IN bis_vg_types.View_Text_Table_Type
985: , p_View_Column_Comment_Table IN bis_vg_types.Flex_Column_Comment_Table_Type
986: , x_View_name OUT NOCOPY VARCHAR2
987: , x_View_Column_Table OUT NOCOPY bis_vg_types.View_Text_Table_Type
988: , x_View_Column_Comment_Table OUT NOCOPY bis_vg_types.Flex_Column_Comment_Table_Type
989:
983: ( p_View_name IN VARCHAR2
984: , p_view_column_table IN bis_vg_types.View_Text_Table_Type
985: , p_View_Column_Comment_Table IN bis_vg_types.Flex_Column_Comment_Table_Type
986: , x_View_name OUT NOCOPY VARCHAR2
987: , x_View_Column_Table OUT NOCOPY bis_vg_types.View_Text_Table_Type
988: , x_View_Column_Comment_Table OUT NOCOPY bis_vg_types.Flex_Column_Comment_Table_Type
989:
990: ---, x_return_status OUT VARCHAR2
991: , x_error_Tbl OUT NOCOPY BIS_VG_UTIL.Error_Tbl_Type
984: , p_view_column_table IN bis_vg_types.View_Text_Table_Type
985: , p_View_Column_Comment_Table IN bis_vg_types.Flex_Column_Comment_Table_Type
986: , x_View_name OUT NOCOPY VARCHAR2
987: , x_View_Column_Table OUT NOCOPY bis_vg_types.View_Text_Table_Type
988: , x_View_Column_Comment_Table OUT NOCOPY bis_vg_types.Flex_Column_Comment_Table_Type
989:
990: ---, x_return_status OUT VARCHAR2
991: , x_error_Tbl OUT NOCOPY BIS_VG_UTIL.Error_Tbl_Type
992: )
996: l_flag BOOLEAN := TRUE;
997:
998: l_dummy VARCHAR2(1000);
999: l_pos NUMBER;
1000: l_View_Column_Table bis_vg_types.View_Text_Table_Type;
1001: l_View_Column_Comment_Table bis_vg_types.Flex_Column_Comment_Table_Type;
1002: l_View_Column_Table1 bis_vg_types.View_Text_Table_Type;
1003: l_View_Column_Comment_Table1 bis_vg_types.Flex_Column_Comment_Table_Type;
1004: l_View_Column_Table2 bis_vg_types.View_Text_Table_Type;
997:
998: l_dummy VARCHAR2(1000);
999: l_pos NUMBER;
1000: l_View_Column_Table bis_vg_types.View_Text_Table_Type;
1001: l_View_Column_Comment_Table bis_vg_types.Flex_Column_Comment_Table_Type;
1002: l_View_Column_Table1 bis_vg_types.View_Text_Table_Type;
1003: l_View_Column_Comment_Table1 bis_vg_types.Flex_Column_Comment_Table_Type;
1004: l_View_Column_Table2 bis_vg_types.View_Text_Table_Type;
1005: l_View_Column_Comment_Table2 bis_vg_types.Flex_Column_Comment_Table_Type;
998: l_dummy VARCHAR2(1000);
999: l_pos NUMBER;
1000: l_View_Column_Table bis_vg_types.View_Text_Table_Type;
1001: l_View_Column_Comment_Table bis_vg_types.Flex_Column_Comment_Table_Type;
1002: l_View_Column_Table1 bis_vg_types.View_Text_Table_Type;
1003: l_View_Column_Comment_Table1 bis_vg_types.Flex_Column_Comment_Table_Type;
1004: l_View_Column_Table2 bis_vg_types.View_Text_Table_Type;
1005: l_View_Column_Comment_Table2 bis_vg_types.Flex_Column_Comment_Table_Type;
1006: l_View_Column_Table3 bis_vg_types.View_Text_Table_Type;
999: l_pos NUMBER;
1000: l_View_Column_Table bis_vg_types.View_Text_Table_Type;
1001: l_View_Column_Comment_Table bis_vg_types.Flex_Column_Comment_Table_Type;
1002: l_View_Column_Table1 bis_vg_types.View_Text_Table_Type;
1003: l_View_Column_Comment_Table1 bis_vg_types.Flex_Column_Comment_Table_Type;
1004: l_View_Column_Table2 bis_vg_types.View_Text_Table_Type;
1005: l_View_Column_Comment_Table2 bis_vg_types.Flex_Column_Comment_Table_Type;
1006: l_View_Column_Table3 bis_vg_types.View_Text_Table_Type;
1007: l_View_Column_Comment_Table3 bis_vg_types.Flex_Column_Comment_Table_Type;
1000: l_View_Column_Table bis_vg_types.View_Text_Table_Type;
1001: l_View_Column_Comment_Table bis_vg_types.Flex_Column_Comment_Table_Type;
1002: l_View_Column_Table1 bis_vg_types.View_Text_Table_Type;
1003: l_View_Column_Comment_Table1 bis_vg_types.Flex_Column_Comment_Table_Type;
1004: l_View_Column_Table2 bis_vg_types.View_Text_Table_Type;
1005: l_View_Column_Comment_Table2 bis_vg_types.Flex_Column_Comment_Table_Type;
1006: l_View_Column_Table3 bis_vg_types.View_Text_Table_Type;
1007: l_View_Column_Comment_Table3 bis_vg_types.Flex_Column_Comment_Table_Type;
1008: l_View_Column_Table4 bis_vg_types.View_Text_Table_Type;
1001: l_View_Column_Comment_Table bis_vg_types.Flex_Column_Comment_Table_Type;
1002: l_View_Column_Table1 bis_vg_types.View_Text_Table_Type;
1003: l_View_Column_Comment_Table1 bis_vg_types.Flex_Column_Comment_Table_Type;
1004: l_View_Column_Table2 bis_vg_types.View_Text_Table_Type;
1005: l_View_Column_Comment_Table2 bis_vg_types.Flex_Column_Comment_Table_Type;
1006: l_View_Column_Table3 bis_vg_types.View_Text_Table_Type;
1007: l_View_Column_Comment_Table3 bis_vg_types.Flex_Column_Comment_Table_Type;
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;
1002: l_View_Column_Table1 bis_vg_types.View_Text_Table_Type;
1003: l_View_Column_Comment_Table1 bis_vg_types.Flex_Column_Comment_Table_Type;
1004: l_View_Column_Table2 bis_vg_types.View_Text_Table_Type;
1005: l_View_Column_Comment_Table2 bis_vg_types.Flex_Column_Comment_Table_Type;
1006: l_View_Column_Table3 bis_vg_types.View_Text_Table_Type;
1007: l_View_Column_Comment_Table3 bis_vg_types.Flex_Column_Comment_Table_Type;
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: --
1003: l_View_Column_Comment_Table1 bis_vg_types.Flex_Column_Comment_Table_Type;
1004: l_View_Column_Table2 bis_vg_types.View_Text_Table_Type;
1005: l_View_Column_Comment_Table2 bis_vg_types.Flex_Column_Comment_Table_Type;
1006: l_View_Column_Table3 bis_vg_types.View_Text_Table_Type;
1007: l_View_Column_Comment_Table3 bis_vg_types.Flex_Column_Comment_Table_Type;
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
1004: l_View_Column_Table2 bis_vg_types.View_Text_Table_Type;
1005: l_View_Column_Comment_Table2 bis_vg_types.Flex_Column_Comment_Table_Type;
1006: l_View_Column_Table3 bis_vg_types.View_Text_Table_Type;
1007: l_View_Column_Comment_Table3 bis_vg_types.Flex_Column_Comment_Table_Type;
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');
1005: l_View_Column_Comment_Table2 bis_vg_types.Flex_Column_Comment_Table_Type;
1006: l_View_Column_Table3 bis_vg_types.View_Text_Table_Type;
1007: l_View_Column_Comment_Table3 bis_vg_types.Flex_Column_Comment_Table_Type;
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;
1133: -- ============================================================================
1134: PROCEDURE write_View -- PUBLIC PROCEDURE
1135: ( p_mode IN NUMBER
1136: , p_View_Name IN VARCHAR2
1137: , p_View_Create_Text_Table IN bis_vg_types.View_Text_Table_Type
1138: , p_View_Select_Text_Table IN bis_vg_types.view_text_table_type
1139: , p_View_Column_Comment_Table IN bis_vg_types.Flex_Column_Comment_Table_Type
1140: , x_View_Column_Comment_Table OUT bis_vg_types.Flex_Column_Comment_Table_Type
1141: ---, x_return_status OUT VARCHAR2
1134: PROCEDURE write_View -- PUBLIC PROCEDURE
1135: ( p_mode IN NUMBER
1136: , p_View_Name IN VARCHAR2
1137: , p_View_Create_Text_Table IN bis_vg_types.View_Text_Table_Type
1138: , p_View_Select_Text_Table IN bis_vg_types.view_text_table_type
1139: , p_View_Column_Comment_Table IN bis_vg_types.Flex_Column_Comment_Table_Type
1140: , x_View_Column_Comment_Table OUT bis_vg_types.Flex_Column_Comment_Table_Type
1141: ---, x_return_status OUT VARCHAR2
1142: , x_error_Tbl OUT BIS_VG_UTIL.Error_Tbl_Type
1135: ( p_mode IN NUMBER
1136: , p_View_Name IN VARCHAR2
1137: , p_View_Create_Text_Table IN bis_vg_types.View_Text_Table_Type
1138: , p_View_Select_Text_Table IN bis_vg_types.view_text_table_type
1139: , p_View_Column_Comment_Table IN bis_vg_types.Flex_Column_Comment_Table_Type
1140: , x_View_Column_Comment_Table OUT bis_vg_types.Flex_Column_Comment_Table_Type
1141: ---, x_return_status OUT VARCHAR2
1142: , x_error_Tbl OUT BIS_VG_UTIL.Error_Tbl_Type
1143: )
1136: , p_View_Name IN VARCHAR2
1137: , p_View_Create_Text_Table IN bis_vg_types.View_Text_Table_Type
1138: , p_View_Select_Text_Table IN bis_vg_types.view_text_table_type
1139: , p_View_Column_Comment_Table IN bis_vg_types.Flex_Column_Comment_Table_Type
1140: , x_View_Column_Comment_Table OUT bis_vg_types.Flex_Column_Comment_Table_Type
1141: ---, x_return_status OUT VARCHAR2
1142: , x_error_Tbl OUT BIS_VG_UTIL.Error_Tbl_Type
1143: )
1144: IS
1142: , x_error_Tbl OUT BIS_VG_UTIL.Error_Tbl_Type
1143: )
1144: IS
1145: --
1146: l_View_Create_Text_Table bis_vg_types.View_Text_Table_Type;
1147: l_View_name VARCHAR2(100);
1148: l_applsys_schema VARCHAR2(100);
1149: dummy_char VARCHAR2(100);
1150: