1 PACKAGE IBE_M_MIGRATION_PVT AUTHID CURRENT_USER AS
2 /* $Header: IBEVMMGS.pls 115.7 2002/12/24 01:54:55 jshang ship $ */
3
4 g_pkg_name CONSTANT VARCHAR2(30):='IBE_M_MIGRATION_PVT';
5 g_api_version CONSTANT NUMBER := 1.0;
6
7 -- Fo debug
8 g_debug VARCHAR2(1) := NVL(fnd_profile.value('APPS_DEBUG'),'N');
9
10 TYPE STRING_TBL_TYPE IS TABLE OF VARCHAR2(4) INDEX BY BINARY_INTEGER;
11 TYPE STRING_240_TBL_TYPE IS TABLE OF VARCHAR2(240) INDEX BY BINARY_INTEGER;
12 TYPE STRING_255_TBL_TYPE IS TABLE OF VARCHAR2(255) INDEX BY BINARY_INTEGER;
13 TYPE NUMBER_TBL_TYPE IS TABLE OF NUMBER INDEX BY BINARY_INTEGER;
14
15 -- Type defination for content component
16 TYPE CONTENT_COMPONENT_REC_TYPE IS RECORD (
17 CONTEXT_ID NUMBER := NULL,
18 ACCESS_NAME VARCHAR2(40) := NULL,
19 COMPONENT_TYPE_CODE VARCHAR2(30) := NULL);
20
21 NULL_CONTENT_COMPONENT_REC CONTENT_COMPONENT_REC_TYPE;
22
23 TYPE CONTENT_COMPONENT_TBL_TYPE IS TABLE OF
24 CONTENT_COMPONENT_REC_TYPE INDEX BY BINARY_INTEGER;
25
26 NULL_CONTENT_COMPONENT_TBL CONTENT_COMPONENT_TBL_TYPE;
27
28 -- Type defination for media objects and templates
29 TYPE MEDIA_TEMPLATE_REC_TYPE IS RECORD (
30 ITEM_ID NUMBER := NULL,
31 ACCESS_NAME VARCHAR2(40) := NULL,
32 DELIVERABLE_TYPE_CODE VARCHAR2(40) := NULL,
33 APPLICABLE_TO_CODE VARCHAR2(40) := NULL,
34 NEW_DELIVERABLE VARCHAR2(40) := NULL,
35 NEW_APPLICABLE VARCHAR2(40) := NULL);
36
37 NULL_MEDIA_TEMPLATE_REC MEDIA_TEMPLATE_REC_TYPE;
38
39 TYPE MEDIA_TEMPLATE_TBL_TYPE IS TABLE OF
40 MEDIA_TEMPLATE_REC_TYPE INDEX BY BINARY_INTEGER;
41
42 NULL_MEDIA_TEMPLATE_TBL MEDIA_TEMPLATE_TBL_TYPE;
43
44 -- TYPE ATTACHMENT
45 TYPE ATTACHMENT_REC_TYPE IS RECORD (
46 ITEM_ID NUMBER,
47 ACCESS_NAME VARCHAR2(40),
48 MSITE_ID NUMBER,
49 STORE_CODE VARCHAR2(240),
50 DEFAULT_SITE VARCHAR2(3),
51 LANGUAGE VARCHAR2(4),
52 LANGDESC VARCHAR2(255),
53 CONTENT_TYPE_CODE VARCHAR2(100),
54 CONTENT_ITEM_ID NUMBER,
55 CITEM_VERSION_ID NUMBER,
56 CONTENT_ITEM_CODE VARCHAR2(100),
57 FILE_ID NUMBER,
58 FILE_NAME VARCHAR2(240),
59 HEIGHT NUMBER,
60 WIDTH NUMBER,
61 SEED_DATA_FLAG VARCHAR2(1),
62 CONFLICT_FLAG VARCHAR2(1),
63 DUPLICATE_FLAG VARCHAR2(1),
64 START_TRANS NUMBER,
65 END_TRANS NUMBER
66 );
67
68 TYPE ATTACHMENT_TBL_TYPE IS TABLE OF
69 ATTACHMENT_REC_TYPE INDEX BY BINARY_INTEGER;
70
71 TYPE TRANS_ATTACHMENT_REC_TYPE IS RECORD (
72 TRANS_LANGUAGES VARCHAR2(4),
73 TRANS_LANGDESC VARCHAR2(255),
74 FILE_IDS NUMBER,
75 FILE_NAMES VARCHAR2(240),
76 HIGHTS NUMBER,
77 WIDTHS NUMBER
78 );
79
80 TYPE TRANS_ATTACHMENT_TBL_TYPE IS TABLE OF
81 TRANS_ATTACHMENT_REC_TYPE INDEX BY BINARY_INTEGER;
82
83 TYPE CONTENT_REC_TYPE IS RECORD (
84 ACCESS_NAME VARCHAR2(40),
85 SEED_FLAG VARCHAR2(1),
86 STORE_CODE VARCHAR2(240),
87 CONTENT_ITEM_CODE VARCHAR2(100),
88 LANGUAGE VARCHAR2(30),
89 FILE_NAME VARCHAR2(240)
90 );
91
92 TYPE CONTENT_TBL_TYPE IS TABLE OF
93 CONTENT_REC_TYPE INDEX BY BINARY_INTEGER;
94
95 PROCEDURE context_mig(p_mode IN VARCHAR2,
96 x_status OUT NOCOPY VARCHAR2,
97 x_content_component_tbl OUT NOCOPY CONTENT_COMPONENT_TBL_TYPE);
98
99 PROCEDURE media_template_mig(p_mode IN VARCHAR2,
100 x_status OUT NOCOPY VARCHAR2,
101 x_media_tbl OUT NOCOPY MEDIA_TEMPLATE_TBL_TYPE,
102 x_template_tbl OUT NOCOPY MEDIA_TEMPLATE_TBL_TYPE);
103
104 -- This migration procedure is for IBE.O
105 PROCEDURE attachment_mig(p_mode IN VARCHAR2,
106 p_default_mig_lang IN VARCHAR2,
107 x_status OUT NOCOPY VARCHAR2);
108
109 PROCEDURE attachType;
110
111 PROCEDURE ocmMigration(errbuf OUT NOCOPY VARCHAR2,
112 retcode OUT NOCOPY VARCHAR2,
113 p_mode IN VARCHAR2,
114 p_default_lang IN VARCHAR2,
115 p_debug_flag IN VARCHAR2,
116 p_clean_flag IN VARCHAR2 DEFAULT 'N');
117
118 END IBE_M_MIGRATION_PVT;