[Home] [Help]
1: PACKAGE BODY GMA_EDITEXT_ATTACH_MIG AS
2: /* $Header: GMAEATHB.pls 120.3 2006/11/03 21:28:20 txdaniel noship $ */
3:
4: -- Read the profile option that enables/disables the debug log
5: g_fnd_debug VARCHAR2(1) := NVL(FND_PROFILE.VALUE('AFLOG_ENABLED'),'N');
3:
4: -- Read the profile option that enables/disables the debug log
5: g_fnd_debug VARCHAR2(1) := NVL(FND_PROFILE.VALUE('AFLOG_ENABLED'),'N');
6:
7: G_PKG_NAME CONSTANT VARCHAR2(30) :='GMA_EDITEXT_ATTACH_MIG';
8: g_module_prefix CONSTANT VARCHAR2(40) := g_pkg_name || '.';
9:
10: -- All top API's should call Attachment_Main Procedure
11: PROCEDURE Attachment_Main(
64: l_paragraph_exists BOOLEAN;
65: l_seq_num PLS_INTEGER DEFAULT 0;
66: Begin
67: -- First Check the if Attachment functionality is enabled/not and retreive funciton_id
68: GMA_EDITEXT_ATTACH_MIG.Check_Fnd_Attachment_Defined
69: (
70: p_text_code => p_text_code,
71: p_sy_para_cds_table_name => p_sy_para_cds_table_name,
72: p_form_short_name => p_attach_form_short_name,
92:
93: l_para_count := l_para_count + 1;
94:
95: -- Enable all languages if not in FND_LANGUAGES
96: GMA_EDITEXT_ATTACH_MIG.Fnd_Document_Set_Languages
97: (
98: p_text_code => p_text_code,
99: p_sy_para_cds_table_name => p_sy_para_cds_table_name,
100: p_text_tl_table => p_text_table_tl,
105: l_document_id:=null;
106:
107: -- Lets check if the document is already exist or not for all paragraphs with each Text code
108: -- if exists then do not create otherwise create additional if any one is missing
109: GMA_EDITEXT_ATTACH_MIG.Check_Fnd_Document_Exists
110: (
111: p_text_tl_table => p_text_table_tl,
112: p_sy_para_cds_table_name => p_sy_para_cds_table_name,
113: p_Text_code => p_text_code,
132: l_document_id := NULL;
133: l_seq_num := l_seq_num + 10;
134:
135: -- Lets create the Attachment for all paragraphs with each Text code
136: GMA_EDITEXT_ATTACH_MIG.Create_Fnd_Document
137: (
138: p_text_code => p_text_code,
139: p_sy_para_cds_table_name => p_sy_para_cds_table_name,
140: p_entity_name => p_attach_table_name,
151: p_attachment_function_id => l_attachment_function_id,
152: p_sequence_num => l_seq_num
153: );
154:
155: GMA_EDITEXT_ATTACH_MIG.Create_Fnd_Short_Text
156: (
157: p_text_tl_table => p_text_table_tl,
158: p_sy_para_cds_table_name => p_sy_para_cds_table_name,
159: p_Text_code => p_text_code,
192: EXCEPTION
193: WHEN OTHERS THEN
194: FND_MESSAGE.SET_NAME('FND', 'FND_AS_UNEXPECTED_ERROR');
195: FND_MESSAGE.SET_TOKEN('ERROR_TEXT', SQLERRM);
196: FND_MESSAGE.SET_TOKEN('PKG_NAME', 'GMA_EDITEXT_ATTACH_MIG');
197: FND_MESSAGE.SET_TOKEN('PROCEDURE_NAME', l_api_name);
198: FND_MSG_PUB.ADD;
199:
200: RAISE;
254:
255: WHEN OTHERS THEN
256: FND_MESSAGE.SET_NAME('FND', 'FND_AS_UNEXPECTED_ERROR');
257: FND_MESSAGE.SET_TOKEN('ERROR_TEXT', SQLERRM);
258: FND_MESSAGE.SET_TOKEN('PKG_NAME', 'GMA_EDITEXT_ATTACH_MIG');
259: FND_MESSAGE.SET_TOKEN('PROCEDURE_NAME', l_api_name);
260: FND_MSG_PUB.ADD;
261:
262: RAISE;
374: EXCEPTION
375: WHEN OTHERS THEN
376: FND_MESSAGE.SET_NAME('FND', 'FND_AS_UNEXPECTED_ERROR');
377: FND_MESSAGE.SET_TOKEN('ERROR_TEXT', SQLERRM);
378: FND_MESSAGE.SET_TOKEN('PKG_NAME', 'GMA_EDITEXT_ATTACH_MIG');
379: FND_MESSAGE.SET_TOKEN('PROCEDURE_NAME', l_api_name);
380: FND_MSG_PUB.ADD;
381: RAISE;
382:
444:
445: WHEN OTHERS THEN
446: FND_MESSAGE.SET_NAME('FND', 'FND_AS_UNEXPECTED_ERROR');
447: FND_MESSAGE.SET_TOKEN('ERROR_TEXT', SQLERRM);
448: FND_MESSAGE.SET_TOKEN('PKG_NAME', 'GMA_EDITEXT_ATTACH_MIG');
449: FND_MESSAGE.SET_TOKEN('PROCEDURE_NAME', l_api_name);
450: FND_MSG_PUB.ADD;
451:
452: RAISE;
547: WHEN OTHERS THEN
548:
549: FND_MESSAGE.SET_NAME('FND', 'FND_AS_UNEXPECTED_ERROR');
550: FND_MESSAGE.SET_TOKEN('ERROR_TEXT', SQLERRM);
551: FND_MESSAGE.SET_TOKEN('PKG_NAME', 'GMA_EDITEXT_ATTACH_MIG');
552: FND_MESSAGE.SET_TOKEN('PROCEDURE_NAME', l_api_name);
553: FND_MSG_PUB.ADD;
554:
555:
677: FND_MSG_PUB.ADD;
678: WHEN OTHERS THEN
679: FND_MESSAGE.SET_NAME('FND', 'FND_AS_UNEXPECTED_ERROR');
680: FND_MESSAGE.SET_TOKEN('ERROR_TEXT', SQLERRM);
681: FND_MESSAGE.SET_TOKEN('PKG_NAME', 'GMA_EDITEXT_ATTACH_MIG');
682: FND_MESSAGE.SET_TOKEN('PROCEDURE_NAME', l_api_name);
683: FND_MSG_PUB.ADD;
684:
685: RAISE;
751:
752: WHEN OTHERS THEN
753: FND_MESSAGE.SET_NAME('FND', 'FND_AS_UNEXPECTED_ERROR');
754: FND_MESSAGE.SET_TOKEN('ERROR_TEXT', SQLERRM);
755: FND_MESSAGE.SET_TOKEN('PKG_NAME', 'GMA_EDITEXT_ATTACH_MIG');
756: FND_MESSAGE.SET_TOKEN('PROCEDURE_NAME', l_api_name);
757: FND_MSG_PUB.ADD;
758:
759: RAISE;
893: EXCEPTION
894: WHEN OTHERS THEN
895: FND_MESSAGE.SET_NAME('FND', 'FND_AS_UNEXPECTED_ERROR');
896: FND_MESSAGE.SET_TOKEN('ERROR_TEXT', SQLERRM);
897: FND_MESSAGE.SET_TOKEN('PKG_NAME', 'GMA_EDITEXT_ATTACH_MIG');
898: FND_MESSAGE.SET_TOKEN('PROCEDURE_NAME', l_api_name);
899: FND_MSG_PUB.ADD;
900:
901: RAISE;
1010: EXCEPTION
1011: WHEN OTHERS THEN
1012: FND_MESSAGE.SET_NAME('FND', 'FND_AS_UNEXPECTED_ERROR');
1013: FND_MESSAGE.SET_TOKEN('ERROR_TEXT', SQLERRM);
1014: FND_MESSAGE.SET_TOKEN('PKG_NAME', 'GMA_EDITEXT_ATTACH_MIG');
1015: FND_MESSAGE.SET_TOKEN('PROCEDURE_NAME', l_api_name);
1016: FND_MSG_PUB.ADD;
1017: RAISE;
1018: End Create_Fnd_Short_Text;
1061: WHEN OTHERS THEN
1062:
1063: FND_MESSAGE.SET_NAME('FND', 'FND_AS_UNEXPECTED_ERROR');
1064: FND_MESSAGE.SET_TOKEN('ERROR_TEXT', SQLERRM);
1065: FND_MESSAGE.SET_TOKEN('PKG_NAME', 'GMA_EDITEXT_ATTACH_MIG');
1066: FND_MESSAGE.SET_TOKEN('PROCEDURE_NAME', l_api_name);
1067: FND_MSG_PUB.ADD;
1068:
1069: RAISE;
1069: RAISE;
1070:
1071: End Check_Text_Paragraph_Match;
1072:
1073: END GMA_EDITEXT_ATTACH_MIG;