20: * DESCRIPTION
21: * Turn on debug mode.
22: *
23: * EXTERNAL PROCEDURES/FUNCTIONS ACCESSED
24: * hz_utility_v2pub.enable_debug
25: *
26: */
27:
28: /*PROCEDURE enable_debug IS
33: IF g_debug_count = 1 THEN
34: IF fnd_profile.value('HZ_API_FILE_DEBUG_ON') = 'Y' OR
35: fnd_profile.value('HZ_API_DBMS_DEBUG_ON') = 'Y'
36: THEN
37: hz_utility_v2pub.enable_debug;
38: g_debug := TRUE;
39: END IF;
40: END IF;
41: END enable_debug;
47: * DESCRIPTION
48: * Turn off debug mode.
49: *
50: * EXTERNAL PROCEDURES/FUNCTIONS ACCESSED
51: * hz_utility_v2pub.disable_debug
52: *
53: */
54:
55: /*PROCEDURE disable_debug IS
59: IF g_debug THEN
60: g_debug_count := g_debug_count - 1;
61:
62: IF g_debug_count = 0 THEN
63: hz_utility_v2pub.disable_debug;
64: g_debug := FALSE;
65: END IF;
66: END IF;
67:
241: BEGIN
242: --enable_debug;
243:
244: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
245: hz_utility_v2pub.debug(p_message=>'transpose_domain (+)',
246: p_prefix=>l_debug_prefix,
247: p_msg_level=>fnd_log.level_procedure);
248: END IF;
249: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
246: p_prefix=>l_debug_prefix,
247: p_msg_level=>fnd_log.level_procedure);
248: END IF;
249: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
250: hz_utility_v2pub.debug(p_message=>'l_domain_name: ' || l_domain_name,
251: p_prefix =>l_debug_prefix,
252: p_msg_level=>fnd_log.level_statement);
253: END IF;
254:
257: l_domain_name := substrb( l_domain_name, 0, instrb( l_domain_name, '.', -1, 1) -1);
258: END LOOP;
259: l_ret_domain := l_ret_domain || l_domain_name;
260: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
261: hz_utility_v2pub.debug(p_message=>'l_ret_domain: ' || l_ret_domain,
262: p_prefix =>l_debug_prefix,
263: p_msg_level=>fnd_log.level_statement);
264: END IF;
265: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
262: p_prefix =>l_debug_prefix,
263: p_msg_level=>fnd_log.level_statement);
264: END IF;
265: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
266: hz_utility_v2pub.debug(p_message=>'transpose_domain (-)',
267: p_prefix=>l_debug_prefix,
268: p_msg_level=>fnd_log.level_procedure);
269: END IF;
270: --disable_debug;
325: BEGIN
326:
327: --enable_debug;
328: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
329: hz_utility_v2pub.debug(p_message=>'create_email_domain (+)',
330: p_prefix=>l_debug_prefix,
331: p_msg_level=>fnd_log.level_procedure);
332: END IF;
333:
350: END IF;
351: CLOSE c_unique_email_domain;
352:
353: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
354: hz_utility_v2pub.debug(p_message=>'The following column combination should be unique:' ||
355: ' PARTY_ID, DOMAIN_NAME. ' ||
356: ' x_return_status = ' || x_return_status,
357: p_prefix =>l_debug_prefix,
358: p_msg_level=>fnd_log.level_statement);
369: p_column_value => p_party_id,
370: x_return_status => x_return_status);
371:
372: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
373: hz_utility_v2pub.debug(p_message=>'party_id is mandatory field. ' ||
374: 'x_return_status = ' || x_return_status,
375: p_prefix =>l_debug_prefix,
376: p_msg_level=>fnd_log.level_statement);
377: END IF;
398: END;
399:
400:
401: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
402: hz_utility_v2pub.debug(p_message=>'party_id has foreign key hz_parties.party_id. ' ||
403: 'x_return_status = ' || x_return_status,
404: p_prefix =>l_debug_prefix,
405: p_msg_level=>fnd_log.level_statement);
406: END IF;
438: , p_party_id
439: , transpose_domain( p_domain_name)
440: , p_domain_name
441: , 'A'
442: , hz_utility_v2pub.creation_date
443: , hz_utility_v2pub.last_update_login
444: , hz_utility_v2pub.last_update_date
445: , hz_utility_v2pub.last_updated_by
446: , hz_utility_v2pub.created_by
439: , transpose_domain( p_domain_name)
440: , p_domain_name
441: , 'A'
442: , hz_utility_v2pub.creation_date
443: , hz_utility_v2pub.last_update_login
444: , hz_utility_v2pub.last_update_date
445: , hz_utility_v2pub.last_updated_by
446: , hz_utility_v2pub.created_by
447: );
440: , p_domain_name
441: , 'A'
442: , hz_utility_v2pub.creation_date
443: , hz_utility_v2pub.last_update_login
444: , hz_utility_v2pub.last_update_date
445: , hz_utility_v2pub.last_updated_by
446: , hz_utility_v2pub.created_by
447: );
448:
441: , 'A'
442: , hz_utility_v2pub.creation_date
443: , hz_utility_v2pub.last_update_login
444: , hz_utility_v2pub.last_update_date
445: , hz_utility_v2pub.last_updated_by
446: , hz_utility_v2pub.created_by
447: );
448:
449: -- VJN introduced changes for the domain name project for ensuring
442: , hz_utility_v2pub.creation_date
443: , hz_utility_v2pub.last_update_login
444: , hz_utility_v2pub.last_update_date
445: , hz_utility_v2pub.last_updated_by
446: , hz_utility_v2pub.created_by
447: );
448:
449: -- VJN introduced changes for the domain name project for ensuring
450: -- DQM sync happens, when ever an email domain is created, using this API.