eTRM uses javascript that opens and focuses a separate window to display reports. Your browser does not appear to support javascript. This should not prevent you from using eTRM but it does mean the window focus feature will not work. Please check the contents of other windows on your desktop if you click on a link that does not appear to do anything.

APPS.IGS_CO_SUBMIT dependencies on FND_MESSAGE

Line 99: || fnd_message.get_string (

95: || l_url
96: || '" '
97: || l_mouse_over_text
98: || '>'
99: || fnd_message.get_string (
100: 'IGS',
101: 'IGS_CO_PREV_VIEW_OUTPUT'
102: ) -- click here if not autotmatically taken to correspondence workbench
103: || ''

Line 299: fnd_message.set_name ('IGS', 'IGS_CO_EMAIL_REQ');

295: IF p_reply_email IS NOT NULL
296: OR p_sender_email IS NOT NULL
297: OR p_cc_email IS NOT NULL THEN
298: IF INSTR (l_delivery_type, 'EMAIL') <= 0 THEN -- Email option not chosen
299: fnd_message.set_name ('IGS', 'IGS_CO_EMAIL_REQ');
300: fnd_file.put_line (fnd_file.LOG, fnd_message.get);
301: fnd_msg_pub.ADD;
302: RAISE fnd_api.g_exc_error;
303: END IF;

Line 300: fnd_file.put_line (fnd_file.LOG, fnd_message.get);

296: OR p_sender_email IS NOT NULL
297: OR p_cc_email IS NOT NULL THEN
298: IF INSTR (l_delivery_type, 'EMAIL') <= 0 THEN -- Email option not chosen
299: fnd_message.set_name ('IGS', 'IGS_CO_EMAIL_REQ');
300: fnd_file.put_line (fnd_file.LOG, fnd_message.get);
301: fnd_msg_pub.ADD;
302: RAISE fnd_api.g_exc_error;
303: END IF;
304: END IF;

Line 313: fnd_message.set_name ('IGS', 'IGS_CO_DEST_INF_REQ');

309: l_printer_name := p_destination;
310: ELSIF fnd_profile.VALUE ('IGS_CO_DESTINATION_NAME') IS NOT NULL THEN
311: l_printer_name := fnd_profile.VALUE ('IGS_CO_DESTINATION_NAME');
312: ELSE
313: fnd_message.set_name ('IGS', 'IGS_CO_DEST_INF_REQ');
314: fnd_message.set_token ('DELTYPE', l_delivery_type);
315: fnd_file.put_line (fnd_file.LOG, fnd_message.get);
316: fnd_msg_pub.ADD;
317: RAISE fnd_api.g_exc_error;

Line 314: fnd_message.set_token ('DELTYPE', l_delivery_type);

310: ELSIF fnd_profile.VALUE ('IGS_CO_DESTINATION_NAME') IS NOT NULL THEN
311: l_printer_name := fnd_profile.VALUE ('IGS_CO_DESTINATION_NAME');
312: ELSE
313: fnd_message.set_name ('IGS', 'IGS_CO_DEST_INF_REQ');
314: fnd_message.set_token ('DELTYPE', l_delivery_type);
315: fnd_file.put_line (fnd_file.LOG, fnd_message.get);
316: fnd_msg_pub.ADD;
317: RAISE fnd_api.g_exc_error;
318: END IF;

Line 315: fnd_file.put_line (fnd_file.LOG, fnd_message.get);

311: l_printer_name := fnd_profile.VALUE ('IGS_CO_DESTINATION_NAME');
312: ELSE
313: fnd_message.set_name ('IGS', 'IGS_CO_DEST_INF_REQ');
314: fnd_message.set_token ('DELTYPE', l_delivery_type);
315: fnd_file.put_line (fnd_file.LOG, fnd_message.get);
316: fnd_msg_pub.ADD;
317: RAISE fnd_api.g_exc_error;
318: END IF;
319: END IF;

Line 329: fnd_message.set_name ('IGS', 'IGS_CO_DEST_INF_REQ');

325: fnd_profile.VALUE (
326: 'IGS_CO_FAX_DESTINATION_NUMBER'
327: );
328: ELSE
329: fnd_message.set_name ('IGS', 'IGS_CO_DEST_INF_REQ');
330: fnd_message.set_token ('DELTYPE', l_delivery_type);
331: fnd_file.put_line (fnd_file.LOG, fnd_message.get);
332: fnd_msg_pub.ADD;
333: RAISE fnd_api.g_exc_error;

Line 330: fnd_message.set_token ('DELTYPE', l_delivery_type);

326: 'IGS_CO_FAX_DESTINATION_NUMBER'
327: );
328: ELSE
329: fnd_message.set_name ('IGS', 'IGS_CO_DEST_INF_REQ');
330: fnd_message.set_token ('DELTYPE', l_delivery_type);
331: fnd_file.put_line (fnd_file.LOG, fnd_message.get);
332: fnd_msg_pub.ADD;
333: RAISE fnd_api.g_exc_error;
334: END IF;

Line 331: fnd_file.put_line (fnd_file.LOG, fnd_message.get);

327: );
328: ELSE
329: fnd_message.set_name ('IGS', 'IGS_CO_DEST_INF_REQ');
330: fnd_message.set_token ('DELTYPE', l_delivery_type);
331: fnd_file.put_line (fnd_file.LOG, fnd_message.get);
332: fnd_msg_pub.ADD;
333: RAISE fnd_api.g_exc_error;
334: END IF;
335: ELSE

Line 388: fnd_message.set_name ('IGS', 'IGS_CO_INVALID_JTF_RES');

384: CLOSE c_valid_resource;
385:
386: IF l_user IS NULL THEN
387: -- log a message that the current user is not a valid CRM resource
388: fnd_message.set_name ('IGS', 'IGS_CO_INVALID_JTF_RES');
389: fnd_file.put_line (fnd_file.LOG, fnd_message.get ());
390: fnd_file.put_line (fnd_file.LOG, ' ');
391: retcode := 2;
392: RETURN;

Line 389: fnd_file.put_line (fnd_file.LOG, fnd_message.get ());

385:
386: IF l_user IS NULL THEN
387: -- log a message that the current user is not a valid CRM resource
388: fnd_message.set_name ('IGS', 'IGS_CO_INVALID_JTF_RES');
389: fnd_file.put_line (fnd_file.LOG, fnd_message.get ());
390: fnd_file.put_line (fnd_file.LOG, ' ');
391: retcode := 2;
392: RETURN;
393: ELSE

Line 403: fnd_message.set_name ('JTF', 'JTF_FM_API_MISSING_USER_ID');

399: -- if all the above checks pass
400: END IF;
401:
402: IF (l_crm_user_id IS NULL) THEN
403: fnd_message.set_name ('JTF', 'JTF_FM_API_MISSING_USER_ID');
404: fnd_file.put_line (fnd_file.LOG, fnd_message.get ());
405: fnd_file.put_line (fnd_file.LOG, ' ');
406: retcode := 0;
407: RETURN;

Line 404: fnd_file.put_line (fnd_file.LOG, fnd_message.get ());

400: END IF;
401:
402: IF (l_crm_user_id IS NULL) THEN
403: fnd_message.set_name ('JTF', 'JTF_FM_API_MISSING_USER_ID');
404: fnd_file.put_line (fnd_file.LOG, fnd_message.get ());
405: fnd_file.put_line (fnd_file.LOG, ' ');
406: retcode := 0;
407: RETURN;
408: END IF;

Line 484: fnd_message.set_name ('IGS', 'IGS_CO_UNAVAIL_DEL_TYPE');

480: FETCH c_lkup_channel INTO l_del_desc;
481: CLOSE c_lkup_channel;
482:
483: IF c_avail_del_channel%NOTFOUND THEN
484: fnd_message.set_name ('IGS', 'IGS_CO_UNAVAIL_DEL_TYPE');
485: fnd_message.set_token ('CHANNEL ', l_del_desc);
486: fnd_file.put_line (fnd_file.LOG, fnd_message.get ());
487: retcode := 2;
488: RETURN;

Line 485: fnd_message.set_token ('CHANNEL ', l_del_desc);

481: CLOSE c_lkup_channel;
482:
483: IF c_avail_del_channel%NOTFOUND THEN
484: fnd_message.set_name ('IGS', 'IGS_CO_UNAVAIL_DEL_TYPE');
485: fnd_message.set_token ('CHANNEL ', l_del_desc);
486: fnd_file.put_line (fnd_file.LOG, fnd_message.get ());
487: retcode := 2;
488: RETURN;
489: END IF;

Line 486: fnd_file.put_line (fnd_file.LOG, fnd_message.get ());

482:
483: IF c_avail_del_channel%NOTFOUND THEN
484: fnd_message.set_name ('IGS', 'IGS_CO_UNAVAIL_DEL_TYPE');
485: fnd_message.set_token ('CHANNEL ', l_del_desc);
486: fnd_file.put_line (fnd_file.LOG, fnd_message.get ());
487: retcode := 2;
488: RETURN;
489: END IF;
490:

Line 502: fnd_message.set_name ('IGS', 'IGS_CO_UNAVAIL_DEL_TYPE');

498: FETCH c_lkup_channel INTO l_del_desc;
499: CLOSE c_lkup_channel;
500:
501: IF c_avail_del_channel%NOTFOUND THEN
502: fnd_message.set_name ('IGS', 'IGS_CO_UNAVAIL_DEL_TYPE');
503: fnd_message.set_token ('CHANNEL ', l_del_desc);
504: fnd_file.put_line (fnd_file.LOG, fnd_message.get ());
505: retcode := 2;
506: RETURN;

Line 503: fnd_message.set_token ('CHANNEL ', l_del_desc);

499: CLOSE c_lkup_channel;
500:
501: IF c_avail_del_channel%NOTFOUND THEN
502: fnd_message.set_name ('IGS', 'IGS_CO_UNAVAIL_DEL_TYPE');
503: fnd_message.set_token ('CHANNEL ', l_del_desc);
504: fnd_file.put_line (fnd_file.LOG, fnd_message.get ());
505: retcode := 2;
506: RETURN;
507: END IF;

Line 504: fnd_file.put_line (fnd_file.LOG, fnd_message.get ());

500:
501: IF c_avail_del_channel%NOTFOUND THEN
502: fnd_message.set_name ('IGS', 'IGS_CO_UNAVAIL_DEL_TYPE');
503: fnd_message.set_token ('CHANNEL ', l_del_desc);
504: fnd_file.put_line (fnd_file.LOG, fnd_message.get ());
505: retcode := 2;
506: RETURN;
507: END IF;
508:

Line 520: fnd_message.set_name ('IGS', 'IGS_CO_UNAVAIL_DEL_TYPE');

516: FETCH c_lkup_channel INTO l_del_desc;
517: CLOSE c_lkup_channel;
518:
519: IF c_avail_del_channel%NOTFOUND THEN
520: fnd_message.set_name ('IGS', 'IGS_CO_UNAVAIL_DEL_TYPE');
521: fnd_message.set_token ('CHANNEL ', l_del_desc);
522: fnd_file.put_line (fnd_file.LOG, fnd_message.get ());
523: retcode := 2;
524: RETURN;

Line 521: fnd_message.set_token ('CHANNEL ', l_del_desc);

517: CLOSE c_lkup_channel;
518:
519: IF c_avail_del_channel%NOTFOUND THEN
520: fnd_message.set_name ('IGS', 'IGS_CO_UNAVAIL_DEL_TYPE');
521: fnd_message.set_token ('CHANNEL ', l_del_desc);
522: fnd_file.put_line (fnd_file.LOG, fnd_message.get ());
523: retcode := 2;
524: RETURN;
525: END IF;

Line 522: fnd_file.put_line (fnd_file.LOG, fnd_message.get ());

518:
519: IF c_avail_del_channel%NOTFOUND THEN
520: fnd_message.set_name ('IGS', 'IGS_CO_UNAVAIL_DEL_TYPE');
521: fnd_message.set_token ('CHANNEL ', l_del_desc);
522: fnd_file.put_line (fnd_file.LOG, fnd_message.get ());
523: retcode := 2;
524: RETURN;
525: END IF;
526:

Line 902: fnd_message.set_name ('IGS', 'IGS_CO_PRSN_NO_EMAIL');

898: OPEN c_person_number (l_person_id_dy);
899: FETCH c_person_number INTO l_person_number, l_full_name;
900: CLOSE c_person_number;
901: -- log a message that Email ID is Null
902: fnd_message.set_name ('IGS', 'IGS_CO_PRSN_NO_EMAIL');
903: fnd_message.set_token (
904: 'STUDENT',
905: l_person_number || ' - ' || l_full_name
906: );

Line 903: fnd_message.set_token (

899: FETCH c_person_number INTO l_person_number, l_full_name;
900: CLOSE c_person_number;
901: -- log a message that Email ID is Null
902: fnd_message.set_name ('IGS', 'IGS_CO_PRSN_NO_EMAIL');
903: fnd_message.set_token (
904: 'STUDENT',
905: l_person_number || ' - ' || l_full_name
906: );
907: fnd_file.put_line (fnd_file.LOG, fnd_message.get);

Line 907: fnd_file.put_line (fnd_file.LOG, fnd_message.get);

903: fnd_message.set_token (
904: 'STUDENT',
905: l_person_number || ' - ' || l_full_name
906: );
907: fnd_file.put_line (fnd_file.LOG, fnd_message.get);
908: ELSE
909: IF l_sys_ltr_code IN ('FAAWARD', 'FAMISTM', 'FADISBT')
910: AND (l_letter_type = 'SYSTEM') THEN
911: --** exec level logging.

Line 1166: fnd_message.set_name ('IGS', 'IGS_CO_NO_REC');

1162: --**
1163: build_preview_html (fnd_global.conc_request_id);
1164: END IF;
1165: ELSE
1166: fnd_message.set_name ('IGS', 'IGS_CO_NO_REC');
1167: fnd_file.put_line (fnd_file.LOG, fnd_message.get ());
1168: fnd_file.put_line (fnd_file.LOG, ' ');
1169: RETURN;
1170: END IF;

Line 1167: fnd_file.put_line (fnd_file.LOG, fnd_message.get ());

1163: build_preview_html (fnd_global.conc_request_id);
1164: END IF;
1165: ELSE
1166: fnd_message.set_name ('IGS', 'IGS_CO_NO_REC');
1167: fnd_file.put_line (fnd_file.LOG, fnd_message.get ());
1168: fnd_file.put_line (fnd_file.LOG, ' ');
1169: RETURN;
1170: END IF;
1171:

Line 1173: fnd_message.set_name ('IGS', 'IGS_CO_NO_REC');

1169: RETURN;
1170: END IF;
1171:
1172: IF l_person_processed = 0 THEN
1173: fnd_message.set_name ('IGS', 'IGS_CO_NO_REC');
1174: fnd_file.put_line (fnd_file.LOG, fnd_message.get ());
1175: fnd_file.put_line (fnd_file.LOG, ' ');
1176:
1177: --fnd_file.put_line(FND_FILE.LOG,l_sql_stmt);

Line 1174: fnd_file.put_line (fnd_file.LOG, fnd_message.get ());

1170: END IF;
1171:
1172: IF l_person_processed = 0 THEN
1173: fnd_message.set_name ('IGS', 'IGS_CO_NO_REC');
1174: fnd_file.put_line (fnd_file.LOG, fnd_message.get ());
1175: fnd_file.put_line (fnd_file.LOG, ' ');
1176:
1177: --fnd_file.put_line(FND_FILE.LOG,l_sql_stmt);
1178:

Line 1465: fnd_message.set_name ('IGS', 'IGS_CO_PRSN_NO_EMAIL');

1461: OPEN c_person_number (l_person_id_dy);
1462: FETCH c_person_number INTO l_person_number, l_full_name;
1463: CLOSE c_person_number;
1464: -- log a message that Email ID is Null
1465: fnd_message.set_name ('IGS', 'IGS_CO_PRSN_NO_EMAIL');
1466: fnd_message.set_token (
1467: 'STUDENT',
1468: l_person_number || ' - ' || l_full_name
1469: );

Line 1466: fnd_message.set_token (

1462: FETCH c_person_number INTO l_person_number, l_full_name;
1463: CLOSE c_person_number;
1464: -- log a message that Email ID is Null
1465: fnd_message.set_name ('IGS', 'IGS_CO_PRSN_NO_EMAIL');
1466: fnd_message.set_token (
1467: 'STUDENT',
1468: l_person_number || ' - ' || l_full_name
1469: );
1470: fnd_file.put_line (fnd_file.LOG, fnd_message.get);

Line 1470: fnd_file.put_line (fnd_file.LOG, fnd_message.get);

1466: fnd_message.set_token (
1467: 'STUDENT',
1468: l_person_number || ' - ' || l_full_name
1469: );
1470: fnd_file.put_line (fnd_file.LOG, fnd_message.get);
1471: ELSE
1472: IF l_sys_ltr_code NOT IN ('FAAWARD', 'FAMISTM', 'FADISTM') THEN
1473: igs_co_process.corp_check_interaction_history (
1474: p_person_id => l_person_id_dy,

Line 1763: fnd_message.set_name ('IGS', 'IGS_CO_NO_REC');

1759: --** exec level logging.
1760:
1761:
1762: ELSE
1763: fnd_message.set_name ('IGS', 'IGS_CO_NO_REC');
1764: fnd_file.put_line (fnd_file.LOG, fnd_message.get ());
1765: fnd_file.put_line (fnd_file.LOG, ' ');
1766: RETURN;
1767: END IF;

Line 1764: fnd_file.put_line (fnd_file.LOG, fnd_message.get ());

1760:
1761:
1762: ELSE
1763: fnd_message.set_name ('IGS', 'IGS_CO_NO_REC');
1764: fnd_file.put_line (fnd_file.LOG, fnd_message.get ());
1765: fnd_file.put_line (fnd_file.LOG, ' ');
1766: RETURN;
1767: END IF;
1768:

Line 1770: fnd_message.set_name ('IGS', 'IGS_CO_NO_REC');

1766: RETURN;
1767: END IF;
1768:
1769: IF l_person_processed = 0 THEN
1770: fnd_message.set_name ('IGS', 'IGS_CO_NO_REC');
1771: fnd_file.put_line (fnd_file.LOG, fnd_message.get ());
1772: fnd_file.put_line (fnd_file.LOG, ' ');
1773:
1774: --fnd_file.put_line(FND_FILE.LOG,l_sql_stmt);

Line 1771: fnd_file.put_line (fnd_file.LOG, fnd_message.get ());

1767: END IF;
1768:
1769: IF l_person_processed = 0 THEN
1770: fnd_message.set_name ('IGS', 'IGS_CO_NO_REC');
1771: fnd_file.put_line (fnd_file.LOG, fnd_message.get ());
1772: fnd_file.put_line (fnd_file.LOG, ' ');
1773:
1774: --fnd_file.put_line(FND_FILE.LOG,l_sql_stmt);
1775: --** exec level logging.

Line 1805: fnd_message.set_name ('IGS', 'IGS_GE_UNHANDLED_EXP');

1801: EXCEPTION
1802: WHEN OTHERS THEN
1803: ROLLBACK;
1804: retcode := 2;
1805: fnd_message.set_name ('IGS', 'IGS_GE_UNHANDLED_EXP');
1806: fnd_message.set_token (
1807: 'NAME',
1808: 'igs_co_submit.submit_correspondence_request' || '-' || SQLERRM
1809: );

Line 1806: fnd_message.set_token (

1802: WHEN OTHERS THEN
1803: ROLLBACK;
1804: retcode := 2;
1805: fnd_message.set_name ('IGS', 'IGS_GE_UNHANDLED_EXP');
1806: fnd_message.set_token (
1807: 'NAME',
1808: 'igs_co_submit.submit_correspondence_request' || '-' || SQLERRM
1809: );
1810: igs_ge_msg_stack.conc_exception_hndl;

Line 1970: fnd_message.set_name ('IGF', 'IGF_AW_PROC_STUD');

1966:
1967: IF l_return_status = 'S' THEN
1968: OPEN c_per_processed (l_person_id);
1969: FETCH c_per_processed INTO l_person_number, l_full_name;
1970: fnd_message.set_name ('IGF', 'IGF_AW_PROC_STUD');
1971: fnd_message.set_token (
1972: 'STDNT',
1973: l_person_number || ' - ' || l_full_name
1974: );

Line 1971: fnd_message.set_token (

1967: IF l_return_status = 'S' THEN
1968: OPEN c_per_processed (l_person_id);
1969: FETCH c_per_processed INTO l_person_number, l_full_name;
1970: fnd_message.set_name ('IGF', 'IGF_AW_PROC_STUD');
1971: fnd_message.set_token (
1972: 'STDNT',
1973: l_person_number || ' - ' || l_full_name
1974: );
1975: fnd_file.put_line (fnd_file.LOG, fnd_message.get);

Line 1975: fnd_file.put_line (fnd_file.LOG, fnd_message.get);

1971: fnd_message.set_token (
1972: 'STDNT',
1973: l_person_number || ' - ' || l_full_name
1974: );
1975: fnd_file.put_line (fnd_file.LOG, fnd_message.get);
1976: fnd_message.set_name ('IGS', 'IGS_CO_REQ_INFO');
1977: fnd_message.set_token ('REQUEST_ID', l_ff_request_hist_id);
1978: fnd_file.put_line (fnd_file.LOG, fnd_message.get);
1979: CLOSE c_per_processed;

Line 1976: fnd_message.set_name ('IGS', 'IGS_CO_REQ_INFO');

1972: 'STDNT',
1973: l_person_number || ' - ' || l_full_name
1974: );
1975: fnd_file.put_line (fnd_file.LOG, fnd_message.get);
1976: fnd_message.set_name ('IGS', 'IGS_CO_REQ_INFO');
1977: fnd_message.set_token ('REQUEST_ID', l_ff_request_hist_id);
1978: fnd_file.put_line (fnd_file.LOG, fnd_message.get);
1979: CLOSE c_per_processed;
1980: OPEN c_content_version (

Line 1977: fnd_message.set_token ('REQUEST_ID', l_ff_request_hist_id);

1973: l_person_number || ' - ' || l_full_name
1974: );
1975: fnd_file.put_line (fnd_file.LOG, fnd_message.get);
1976: fnd_message.set_name ('IGS', 'IGS_CO_REQ_INFO');
1977: fnd_message.set_token ('REQUEST_ID', l_ff_request_hist_id);
1978: fnd_file.put_line (fnd_file.LOG, fnd_message.get);
1979: CLOSE c_per_processed;
1980: OPEN c_content_version (
1981: l_current_content_id,

Line 1978: fnd_file.put_line (fnd_file.LOG, fnd_message.get);

1974: );
1975: fnd_file.put_line (fnd_file.LOG, fnd_message.get);
1976: fnd_message.set_name ('IGS', 'IGS_CO_REQ_INFO');
1977: fnd_message.set_token ('REQUEST_ID', l_ff_request_hist_id);
1978: fnd_file.put_line (fnd_file.LOG, fnd_message.get);
1979: CLOSE c_per_processed;
1980: OPEN c_content_version (
1981: l_current_content_id,
1982: l_currentversion_id

Line 2062: fnd_message.set_name ('IGS', 'IGS_CO_ERR_INVLD_DIST_ID');

2058: -- Explicitly close the cursor...
2059: CLOSE c_preview_requests;
2060: ELSE
2061: -- log message "Invalid distribution identifier supplied"
2062: fnd_message.set_name ('IGS', 'IGS_CO_ERR_INVLD_DIST_ID');
2063: fnd_file.put_line (fnd_file.LOG, fnd_message.get ());
2064: fnd_file.put_line (fnd_file.LOG, ' ');
2065: retcode := 2;
2066: RETURN;

Line 2063: fnd_file.put_line (fnd_file.LOG, fnd_message.get ());

2059: CLOSE c_preview_requests;
2060: ELSE
2061: -- log message "Invalid distribution identifier supplied"
2062: fnd_message.set_name ('IGS', 'IGS_CO_ERR_INVLD_DIST_ID');
2063: fnd_file.put_line (fnd_file.LOG, fnd_message.get ());
2064: fnd_file.put_line (fnd_file.LOG, ' ');
2065: retcode := 2;
2066: RETURN;
2067: END IF;

Line 2072: fnd_message.set_name ('IGS', 'IGS_GE_UNHANDLED_EXP');

2068: EXCEPTION
2069: WHEN OTHERS THEN
2070: ROLLBACK;
2071: retcode := 2;
2072: fnd_message.set_name ('IGS', 'IGS_GE_UNHANDLED_EXP');
2073: fnd_message.set_token (
2074: 'NAME',
2075: l_prog_label || '.distribute_preview_request' || '-' || SQLERRM
2076: );

Line 2073: fnd_message.set_token (

2069: WHEN OTHERS THEN
2070: ROLLBACK;
2071: retcode := 2;
2072: fnd_message.set_name ('IGS', 'IGS_GE_UNHANDLED_EXP');
2073: fnd_message.set_token (
2074: 'NAME',
2075: l_prog_label || '.distribute_preview_request' || '-' || SQLERRM
2076: );
2077: igs_ge_msg_stack.conc_exception_hndl;