DBA Data[Home] [Help]

APPS.GL_DRM_INTEGRATION_PKG dependencies on FND_MESSAGE

Line 118: FND_MESSAGE.SET_ENCODED (l_c_msg);

114: l_s_msg_name fnd_new_messages.message_name%TYPE;
115: l_appl_name VARCHAR2(30);
116: BEGIN
117: l_c_msg := FND_MSG_PUB.GET(p_msg_index => l_n_msg_count, p_encoded => 'T');
118: FND_MESSAGE.SET_ENCODED (l_c_msg);
119: FND_MESSAGE.PARSE_ENCODED(FND_MESSAGE.GET_ENCODED,l_appl_name, l_s_msg_name);
120: RETURN l_s_msg_name;
121: END get_msg_from_stack;
122:

Line 119: FND_MESSAGE.PARSE_ENCODED(FND_MESSAGE.GET_ENCODED,l_appl_name, l_s_msg_name);

115: l_appl_name VARCHAR2(30);
116: BEGIN
117: l_c_msg := FND_MSG_PUB.GET(p_msg_index => l_n_msg_count, p_encoded => 'T');
118: FND_MESSAGE.SET_ENCODED (l_c_msg);
119: FND_MESSAGE.PARSE_ENCODED(FND_MESSAGE.GET_ENCODED,l_appl_name, l_s_msg_name);
120: RETURN l_s_msg_name;
121: END get_msg_from_stack;
122:
123: --

Line 256: FND_MESSAGE.set_name('SQLGL', 'GL_DRM_VALUE_NOT_SET');

252: IF Nvl(p_enabled_flag,'X') NOT IN ('Y','N')
253: THEN
254: IF p_enabled_flag IS NULL THEN
255: log_message('Enabled Flag is not set');
256: FND_MESSAGE.set_name('SQLGL', 'GL_DRM_VALUE_NOT_SET');
257: ELSE
258: log_message('Invalid Enabled Flag='||p_enabled_flag);
259: FND_MESSAGE.set_name('SQLGL', 'GL_DRM_VALUE_INVALID');
260: END IF;

Line 259: FND_MESSAGE.set_name('SQLGL', 'GL_DRM_VALUE_INVALID');

255: log_message('Enabled Flag is not set');
256: FND_MESSAGE.set_name('SQLGL', 'GL_DRM_VALUE_NOT_SET');
257: ELSE
258: log_message('Invalid Enabled Flag='||p_enabled_flag);
259: FND_MESSAGE.set_name('SQLGL', 'GL_DRM_VALUE_INVALID');
260: END IF;
261: FND_MESSAGE.set_token('TOKEN_VALUE', 'Enabled Flag');
262: RETURN;
263: END IF;

Line 261: FND_MESSAGE.set_token('TOKEN_VALUE', 'Enabled Flag');

257: ELSE
258: log_message('Invalid Enabled Flag='||p_enabled_flag);
259: FND_MESSAGE.set_name('SQLGL', 'GL_DRM_VALUE_INVALID');
260: END IF;
261: FND_MESSAGE.set_token('TOKEN_VALUE', 'Enabled Flag');
262: RETURN;
263: END IF;
264:
265: -- Check for summary flag

Line 270: FND_MESSAGE.set_name('SQLGL', 'GL_DRM_VALUE_NOT_SET');

266: IF Nvl(p_summary_flag,'X') NOT IN ('Y','N')
267: THEN
268: IF p_summary_flag IS NULL THEN
269: log_message('Summary Flag is not set');
270: FND_MESSAGE.set_name('SQLGL', 'GL_DRM_VALUE_NOT_SET');
271: ELSE
272: log_message('Invalid Summary Flag='||p_summary_flag);
273: FND_MESSAGE.set_name('SQLGL', 'GL_DRM_VALUE_INVALID');
274: END IF;

Line 273: FND_MESSAGE.set_name('SQLGL', 'GL_DRM_VALUE_INVALID');

269: log_message('Summary Flag is not set');
270: FND_MESSAGE.set_name('SQLGL', 'GL_DRM_VALUE_NOT_SET');
271: ELSE
272: log_message('Invalid Summary Flag='||p_summary_flag);
273: FND_MESSAGE.set_name('SQLGL', 'GL_DRM_VALUE_INVALID');
274: END IF;
275: FND_MESSAGE.set_token('TOKEN_VALUE', 'Summary Flag');
276: RETURN;
277: ELSE

Line 275: FND_MESSAGE.set_token('TOKEN_VALUE', 'Summary Flag');

271: ELSE
272: log_message('Invalid Summary Flag='||p_summary_flag);
273: FND_MESSAGE.set_name('SQLGL', 'GL_DRM_VALUE_INVALID');
274: END IF;
275: FND_MESSAGE.set_token('TOKEN_VALUE', 'Summary Flag');
276: RETURN;
277: ELSE
278: -- for an existing value check that summary flag does not change
279: IF l_val_exists AND p_summary_flag <> rec_existing_value.SUMMARY_FLAG

Line 283: FND_MESSAGE.set_name('SQLGL', 'GL_DRM_VALUE_CHANGED');

279: IF l_val_exists AND p_summary_flag <> rec_existing_value.SUMMARY_FLAG
280: THEN
281: log_message('Summary differs: Old Value='||rec_existing_value.SUMMARY_FLAG
282: ||', New Value='||p_summary_flag);
283: FND_MESSAGE.set_name('SQLGL', 'GL_DRM_VALUE_CHANGED');
284: FND_MESSAGE.set_token('TOKEN_VALUE', 'Summary Flag');
285: RETURN;
286: END IF;
287: END IF;

Line 284: FND_MESSAGE.set_token('TOKEN_VALUE', 'Summary Flag');

280: THEN
281: log_message('Summary differs: Old Value='||rec_existing_value.SUMMARY_FLAG
282: ||', New Value='||p_summary_flag);
283: FND_MESSAGE.set_name('SQLGL', 'GL_DRM_VALUE_CHANGED');
284: FND_MESSAGE.set_token('TOKEN_VALUE', 'Summary Flag');
285: RETURN;
286: END IF;
287: END IF;
288:

Line 301: FND_MESSAGE.set_name('SQLGL', 'GL_DRM_VALUE_INVALID');

297: AND ffh.hierarchy_code = p_rollup_group;
298: EXCEPTION
299: WHEN No_Data_Found THEN
300: log_message('Invalid Summary Flag='||p_summary_flag);
301: FND_MESSAGE.set_name('SQLGL', 'GL_DRM_VALUE_INVALID');
302: FND_MESSAGE.set_token('TOKEN_VALUE', 'Roll Up Group');
303: x_success := FALSE;
304: RETURN;
305: END;

Line 302: FND_MESSAGE.set_token('TOKEN_VALUE', 'Roll Up Group');

298: EXCEPTION
299: WHEN No_Data_Found THEN
300: log_message('Invalid Summary Flag='||p_summary_flag);
301: FND_MESSAGE.set_name('SQLGL', 'GL_DRM_VALUE_INVALID');
302: FND_MESSAGE.set_token('TOKEN_VALUE', 'Roll Up Group');
303: x_success := FALSE;
304: RETURN;
305: END;
306: END IF;

Line 313: FND_MESSAGE.set_name('SQLGL', 'GL_DRM_DATES_INVALID');

309: IF Nvl(p_start_date,Nvl(p_end_date,Trunc(SYSDATE))) > Nvl(p_end_date,Trunc(SYSDATE))
310: THEN
311: log_message('Date range is not proper. Start_date='||to_char(p_start_date)
312: ||'End_date='||to_char(p_end_date));
313: FND_MESSAGE.set_name('SQLGL', 'GL_DRM_DATES_INVALID');
314: RETURN;
315: END IF;
316:
317: -- Check for GL attributes of a value

Line 328: FND_MESSAGE.set_name('SQLGL', 'GL_DRM_VALUE_INVALID');

324: THEN
325: IF p_allow_budgeting IS NOT NULL
326: THEN
327: log_message('Allow_Budgeting is not set');
328: FND_MESSAGE.set_name('SQLGL', 'GL_DRM_VALUE_INVALID');
329: ELSE
330: log_message('Invalid Allow_Budgeting ='||p_allow_budgeting);
331: FND_MESSAGE.set_name('SQLGL', 'GL_DRM_VALUE_NOT_SET');
332: END IF;

Line 331: FND_MESSAGE.set_name('SQLGL', 'GL_DRM_VALUE_NOT_SET');

327: log_message('Allow_Budgeting is not set');
328: FND_MESSAGE.set_name('SQLGL', 'GL_DRM_VALUE_INVALID');
329: ELSE
330: log_message('Invalid Allow_Budgeting ='||p_allow_budgeting);
331: FND_MESSAGE.set_name('SQLGL', 'GL_DRM_VALUE_NOT_SET');
332: END IF;
333: FND_MESSAGE.set_token('TOKEN_VALUE', 'Allow Budgeting');
334: RETURN;
335: END IF; /* end of check for p_allow_budgeting */

Line 333: FND_MESSAGE.set_token('TOKEN_VALUE', 'Allow Budgeting');

329: ELSE
330: log_message('Invalid Allow_Budgeting ='||p_allow_budgeting);
331: FND_MESSAGE.set_name('SQLGL', 'GL_DRM_VALUE_NOT_SET');
332: END IF;
333: FND_MESSAGE.set_token('TOKEN_VALUE', 'Allow Budgeting');
334: RETURN;
335: END IF; /* end of check for p_allow_budgeting */
336:
337: -- check for allow posting

Line 345: FND_MESSAGE.set_name('SQLGL', 'GL_DRM_VALUE_INVALID');

341: THEN
342: IF p_allow_posting IS NOT NULL
343: THEN
344: log_message('Allow_Posting is not set');
345: FND_MESSAGE.set_name('SQLGL', 'GL_DRM_VALUE_INVALID');
346: ELSE
347: log_message('Invalid Allow_Posting ='||p_allow_posting);
348: FND_MESSAGE.set_name('SQLGL', 'GL_DRM_VALUE_NOT_SET');
349: END IF;

Line 348: FND_MESSAGE.set_name('SQLGL', 'GL_DRM_VALUE_NOT_SET');

344: log_message('Allow_Posting is not set');
345: FND_MESSAGE.set_name('SQLGL', 'GL_DRM_VALUE_INVALID');
346: ELSE
347: log_message('Invalid Allow_Posting ='||p_allow_posting);
348: FND_MESSAGE.set_name('SQLGL', 'GL_DRM_VALUE_NOT_SET');
349: END IF;
350: FND_MESSAGE.set_token('TOKEN_VALUE', 'Allow Posting');
351: RETURN;
352: END IF; /* end of check for p_allow_posting */

Line 350: FND_MESSAGE.set_token('TOKEN_VALUE', 'Allow Posting');

346: ELSE
347: log_message('Invalid Allow_Posting ='||p_allow_posting);
348: FND_MESSAGE.set_name('SQLGL', 'GL_DRM_VALUE_NOT_SET');
349: END IF;
350: FND_MESSAGE.set_token('TOKEN_VALUE', 'Allow Posting');
351: RETURN;
352: END IF; /* end of check for p_allow_posting */
353:
354: -- check for account type

Line 362: FND_MESSAGE.set_name('SQLGL', 'GL_DRM_VALUE_INVALID');

358: THEN
359: IF p_account_type IS NOT NULL
360: THEN
361: log_message('Invalid account_type ='||p_account_type);
362: FND_MESSAGE.set_name('SQLGL', 'GL_DRM_VALUE_INVALID');
363: ELSE
364: log_message('account_type is not set');
365: FND_MESSAGE.set_name('SQLGL', 'GL_DRM_VALUE_NOT_SET');
366: END IF;

Line 365: FND_MESSAGE.set_name('SQLGL', 'GL_DRM_VALUE_NOT_SET');

361: log_message('Invalid account_type ='||p_account_type);
362: FND_MESSAGE.set_name('SQLGL', 'GL_DRM_VALUE_INVALID');
363: ELSE
364: log_message('account_type is not set');
365: FND_MESSAGE.set_name('SQLGL', 'GL_DRM_VALUE_NOT_SET');
366: END IF;
367: FND_MESSAGE.set_token('TOKEN_VALUE', 'Account Type');
368: RETURN;
369: END IF; /* end of check for p_account_type */

Line 367: FND_MESSAGE.set_token('TOKEN_VALUE', 'Account Type');

363: ELSE
364: log_message('account_type is not set');
365: FND_MESSAGE.set_name('SQLGL', 'GL_DRM_VALUE_NOT_SET');
366: END IF;
367: FND_MESSAGE.set_token('TOKEN_VALUE', 'Account Type');
368: RETURN;
369: END IF; /* end of check for p_account_type */
370:
371: -- For an existing value ensure the account type does not change

Line 380: FND_MESSAGE.set_name('SQLGL', 'GL_DRM_VALUE_CHANGED');

376: IF l_old_account_type <> p_account_type
377: THEN
378: log_message('account_type differs: Old Value='||l_old_account_type
379: ||', New Value='||p_account_type);
380: FND_MESSAGE.set_name('SQLGL', 'GL_DRM_VALUE_CHANGED');
381: FND_MESSAGE.set_token('TOKEN_VALUE', 'Account Type');
382: RETURN;
383: END IF;
384: END IF; /* end of check for existing_account_type */

Line 381: FND_MESSAGE.set_token('TOKEN_VALUE', 'Account Type');

377: THEN
378: log_message('account_type differs: Old Value='||l_old_account_type
379: ||', New Value='||p_account_type);
380: FND_MESSAGE.set_name('SQLGL', 'GL_DRM_VALUE_CHANGED');
381: FND_MESSAGE.set_token('TOKEN_VALUE', 'Account Type');
382: RETURN;
383: END IF;
384: END IF; /* end of check for existing_account_type */
385:

Line 394: FND_MESSAGE.set_name('SQLGL', 'GL_DRM_VALUE_INVALID');

390: THEN
391: IF p_third_party_ctrl_acct IS NOT NULL
392: THEN
393: log_message('Invalid third_party_ctrl_acct ='||p_third_party_ctrl_acct);
394: FND_MESSAGE.set_name('SQLGL', 'GL_DRM_VALUE_INVALID');
395: ELSE
396: log_message('third_party_ctrl_acct is not set');
397: FND_MESSAGE.set_name('SQLGL', 'GL_DRM_VALUE_NOT_SET');
398: END IF;

Line 397: FND_MESSAGE.set_name('SQLGL', 'GL_DRM_VALUE_NOT_SET');

393: log_message('Invalid third_party_ctrl_acct ='||p_third_party_ctrl_acct);
394: FND_MESSAGE.set_name('SQLGL', 'GL_DRM_VALUE_INVALID');
395: ELSE
396: log_message('third_party_ctrl_acct is not set');
397: FND_MESSAGE.set_name('SQLGL', 'GL_DRM_VALUE_NOT_SET');
398: END IF;
399: FND_MESSAGE.set_token('TOKEN_VALUE', 'Third Party Control Account');
400: RETURN;
401: END IF; /* end of check for p_third_party_ctrl_acct */

Line 399: FND_MESSAGE.set_token('TOKEN_VALUE', 'Third Party Control Account');

395: ELSE
396: log_message('third_party_ctrl_acct is not set');
397: FND_MESSAGE.set_name('SQLGL', 'GL_DRM_VALUE_NOT_SET');
398: END IF;
399: FND_MESSAGE.set_token('TOKEN_VALUE', 'Third Party Control Account');
400: RETURN;
401: END IF; /* end of check for p_third_party_ctrl_acct */
402:
403: -- check for recon flag

Line 410: FND_MESSAGE.set_name('SQLGL', 'GL_DRM_VALUE_INVALID');

406: IF p_reconcile NOT IN ('Y','N')
407: THEN
408: IF p_reconcile IS NOT NULL THEN
409: log_message('Invalid reconcile ='||p_reconcile);
410: FND_MESSAGE.set_name('SQLGL', 'GL_DRM_VALUE_INVALID');
411: ELSE
412: log_message('reconcile is not set');
413: FND_MESSAGE.set_name('SQLGL', 'GL_DRM_VALUE_NOT_SET');
414: END IF;

Line 413: FND_MESSAGE.set_name('SQLGL', 'GL_DRM_VALUE_NOT_SET');

409: log_message('Invalid reconcile ='||p_reconcile);
410: FND_MESSAGE.set_name('SQLGL', 'GL_DRM_VALUE_INVALID');
411: ELSE
412: log_message('reconcile is not set');
413: FND_MESSAGE.set_name('SQLGL', 'GL_DRM_VALUE_NOT_SET');
414: END IF;
415: FND_MESSAGE.set_token('TOKEN_VALUE', 'Reconcile');
416: RETURN;
417: END IF; /* end of check for p_reconcile */

Line 415: FND_MESSAGE.set_token('TOKEN_VALUE', 'Reconcile');

411: ELSE
412: log_message('reconcile is not set');
413: FND_MESSAGE.set_name('SQLGL', 'GL_DRM_VALUE_NOT_SET');
414: END IF;
415: FND_MESSAGE.set_token('TOKEN_VALUE', 'Reconcile');
416: RETURN;
417: END IF; /* end of check for p_reconcile */
418: END IF; /* end of check for value_attribute_type */
419: END LOOP;

Line 451: FND_MESSAGE.set_name('SQLGL','GL_DRM_PARENT_NO_SUMM');

447:
448: IF p_parent_summary <> 'Y'
449: THEN
450: log_message('Parent Summary_flag = '||p_parent_summary);
451: FND_MESSAGE.set_name('SQLGL','GL_DRM_PARENT_NO_SUMM');
452: FND_MESSAGE.set_token('TOKEN_VALUE',p_parent_value);
453: x_success := FALSE;
454: END IF;
455:

Line 452: FND_MESSAGE.set_token('TOKEN_VALUE',p_parent_value);

448: IF p_parent_summary <> 'Y'
449: THEN
450: log_message('Parent Summary_flag = '||p_parent_summary);
451: FND_MESSAGE.set_name('SQLGL','GL_DRM_PARENT_NO_SUMM');
452: FND_MESSAGE.set_token('TOKEN_VALUE',p_parent_value);
453: x_success := FALSE;
454: END IF;
455:
456: EXCEPTION

Line 689: l_rec_err := FND_MESSAGE.get;

685: IF l_val_valid AND l_val_attr_valid
686: THEN
687: log_message('----->Value is OK.');
688: ELSE
689: l_rec_err := FND_MESSAGE.get;
690: log_message('----->'||l_rec_err);
691: l_err_count := l_err_count + 1;
692: l_valid_segval := FALSE;
693:

Line 765: l_rec_err := FND_MESSAGE.get;

761:
762: IF l_rec_valid THEN
763: log_message('----->Relationship is OK.');
764: ELSE
765: l_rec_err := FND_MESSAGE.get;
766: log_message('----->'||l_rec_err);
767: l_err_count := l_err_count + 1;
768: l_valid_hier := FALSE;
769:

Line 996: FND_MESSAGE.set_name('SQLGL','GL_DRM_SEGVAL_HIER_ERROR');

992: write_xml_element(XT_numOfValImported, g_flex_values_tbl.COUNT);
993: write_xml_element(XT_numOfRelImported, g_norm_hierarchy_tbl.COUNT);
994: write_xml_element(XT_loadDone, XML_TEXT_YES);
995: ELSIF x_retcode = 'E' THEN
996: FND_MESSAGE.set_name('SQLGL','GL_DRM_SEGVAL_HIER_ERROR');
997: write_xml_tag(XT_loadError,XML_TAG_OPEN);
998: write_xml_element(XT_errorMsg, FND_MESSAGE.get);
999: write_xml_tag(XT_loadError,XML_TAG_CLOSE);
1000: write_xml_element(XT_loadDone, XML_TEXT_NO);

Line 998: write_xml_element(XT_errorMsg, FND_MESSAGE.get);

994: write_xml_element(XT_loadDone, XML_TEXT_YES);
995: ELSIF x_retcode = 'E' THEN
996: FND_MESSAGE.set_name('SQLGL','GL_DRM_SEGVAL_HIER_ERROR');
997: write_xml_tag(XT_loadError,XML_TAG_OPEN);
998: write_xml_element(XT_errorMsg, FND_MESSAGE.get);
999: write_xml_tag(XT_loadError,XML_TAG_CLOSE);
1000: write_xml_element(XT_loadDone, XML_TEXT_NO);
1001: END IF;
1002: write_xml_tag(XT_docRoot,XML_TAG_CLOSE);

Line 1019: FND_MESSAGE.set_name('SQLGL','GL_DRM_EXCEPTION');

1015: ROLLBACK;
1016: x_retcode := 'X';
1017:
1018: -- write exception details to output
1019: FND_MESSAGE.set_name('SQLGL','GL_DRM_EXCEPTION');
1020: write_xml_tag(XT_loadError,XML_TAG_OPEN);
1021: write_xml_element(XT_errorMsg, FND_MESSAGE.get);
1022: write_xml_tag(XT_loadError,XML_TAG_CLOSE);
1023: write_xml_element(XT_exception,SQLERRM);

Line 1021: write_xml_element(XT_errorMsg, FND_MESSAGE.get);

1017:
1018: -- write exception details to output
1019: FND_MESSAGE.set_name('SQLGL','GL_DRM_EXCEPTION');
1020: write_xml_tag(XT_loadError,XML_TAG_OPEN);
1021: write_xml_element(XT_errorMsg, FND_MESSAGE.get);
1022: write_xml_tag(XT_loadError,XML_TAG_CLOSE);
1023: write_xml_element(XT_exception,SQLERRM);
1024:
1025: -- close out output xml

Line 1051: FND_MESSAGE.set_name('SQLGL', p_message_name);

1047: x_message_text OUT NOCOPY VARCHAR2)
1048: AS
1049: l_message_text FND_NEW_MESSAGES.message_text%TYPE;
1050: BEGIN
1051: FND_MESSAGE.set_name('SQLGL', p_message_name);
1052: IF p_message_token IS NOT NULL THEN
1053: FND_MESSAGE.set_token('TOKEN_VALUE', p_message_token);
1054: END IF;
1055: x_message_text := FND_MESSAGE.get;

Line 1053: FND_MESSAGE.set_token('TOKEN_VALUE', p_message_token);

1049: l_message_text FND_NEW_MESSAGES.message_text%TYPE;
1050: BEGIN
1051: FND_MESSAGE.set_name('SQLGL', p_message_name);
1052: IF p_message_token IS NOT NULL THEN
1053: FND_MESSAGE.set_token('TOKEN_VALUE', p_message_token);
1054: END IF;
1055: x_message_text := FND_MESSAGE.get;
1056: EXCEPTION
1057: WHEN OTHERS THEN

Line 1055: x_message_text := FND_MESSAGE.get;

1051: FND_MESSAGE.set_name('SQLGL', p_message_name);
1052: IF p_message_token IS NOT NULL THEN
1053: FND_MESSAGE.set_token('TOKEN_VALUE', p_message_token);
1054: END IF;
1055: x_message_text := FND_MESSAGE.get;
1056: EXCEPTION
1057: WHEN OTHERS THEN
1058: log_message(sqlerrm);
1059: RAISE;

Line 1672: errbuf := fnd_message.get_string('SQLGL','GL_DRM_EXPORT_ERROR');

1668: WHEN OTHERS THEN
1669: ROLLBACK;
1670: retcode := 2;
1671: log_message(SQLERRM);
1672: errbuf := fnd_message.get_string('SQLGL','GL_DRM_EXPORT_ERROR');
1673: END gl_drm_export_process;
1674:
1675: END gl_drm_integration_pkg;