[Home] [Help]
509: and nvl(end_date, sysdate+1) > sysdate;
510: EXCEPTION
511: WHEN TOO_MANY_ROWS THEN
512: IF (NVL(FND_PROFILE.VALUE('AFLOG_ENABLED'),'N') = 'Y') THEN
513: IF (FND_LOG.level_unexpected >= FND_LOG.g_current_runtime_level) THEN
514: FND_LOG.string(log_level => FND_LOG.level_unexpected,
515: module => 'pon.plsql.pon_auction_pkg.email_list',
516: message => 'Multiple Users found for person_party_id:'|| x_auction_contact_id);
517: END IF;
510: EXCEPTION
511: WHEN TOO_MANY_ROWS THEN
512: IF (NVL(FND_PROFILE.VALUE('AFLOG_ENABLED'),'N') = 'Y') THEN
513: IF (FND_LOG.level_unexpected >= FND_LOG.g_current_runtime_level) THEN
514: FND_LOG.string(log_level => FND_LOG.level_unexpected,
515: module => 'pon.plsql.pon_auction_pkg.email_list',
516: message => 'Multiple Users found for person_party_id:'|| x_auction_contact_id);
517: END IF;
518: END IF;
670: avalue => x_language_code);
671:
672: -- Set the userenv language so the message token (attribute) values that we retrieve using the
673: -- getMessage call return the message in the correct language => x_language_code
674: IF (FND_LOG.level_statement >= FND_LOG.g_current_runtime_level) THEN --{
675: FND_LOG.string(log_level => FND_LOG.level_statement,
676: module => g_module_prefix || 'EMAIL_LIST',
677: message => '1. Calling SET_SESSION_LANGUAGE with x_language_code : ' || x_language_code);
678: END IF; --}
671:
672: -- Set the userenv language so the message token (attribute) values that we retrieve using the
673: -- getMessage call return the message in the correct language => x_language_code
674: IF (FND_LOG.level_statement >= FND_LOG.g_current_runtime_level) THEN --{
675: FND_LOG.string(log_level => FND_LOG.level_statement,
676: module => g_module_prefix || 'EMAIL_LIST',
677: message => '1. Calling SET_SESSION_LANGUAGE with x_language_code : ' || x_language_code);
678: END IF; --}
679:
1035:
1036:
1037: -- Set the userenv language so the message token (attribute) values that we retrieve using the
1038: -- getMessage call return the message in the correct language => x_language_code
1039: IF (FND_LOG.level_statement >= FND_LOG.g_current_runtime_level) THEN --{
1040: FND_LOG.string(log_level => FND_LOG.level_statement,
1041: module => g_module_prefix || 'START_AUCTION',
1042: message => '2. Calling SET_SESSION_LANGUAGE with x_language_code : ' || x_language_code);
1043: END IF; --}
1036:
1037: -- Set the userenv language so the message token (attribute) values that we retrieve using the
1038: -- getMessage call return the message in the correct language => x_language_code
1039: IF (FND_LOG.level_statement >= FND_LOG.g_current_runtime_level) THEN --{
1040: FND_LOG.string(log_level => FND_LOG.level_statement,
1041: module => g_module_prefix || 'START_AUCTION',
1042: message => '2. Calling SET_SESSION_LANGUAGE with x_language_code : ' || x_language_code);
1043: END IF; --}
1044:
1660:
1661: -- Set the userenv language so the message token (attribute) values that we retrieve using the
1662: -- getMessage call return the message in the correct language => x_language_code
1663:
1664: IF (FND_LOG.level_statement >= FND_LOG.g_current_runtime_level) THEN --{
1665: FND_LOG.string(log_level => FND_LOG.level_statement,
1666: module => g_module_prefix || 'DISQUALIFY_BID',
1667: message => '3. Calling SET_SESSION_LANGUAGE with x_language_code : ' || x_language_code);
1668: END IF; --}
1661: -- Set the userenv language so the message token (attribute) values that we retrieve using the
1662: -- getMessage call return the message in the correct language => x_language_code
1663:
1664: IF (FND_LOG.level_statement >= FND_LOG.g_current_runtime_level) THEN --{
1665: FND_LOG.string(log_level => FND_LOG.level_statement,
1666: module => g_module_prefix || 'DISQUALIFY_BID',
1667: message => '3. Calling SET_SESSION_LANGUAGE with x_language_code : ' || x_language_code);
1668: END IF; --}
1669:
2219: END IF;
2220:
2221: -- Set the userenv language so the message token (attribute) values that we retrieve using the
2222: -- getMessage call return the message in the correct language => x_language_code
2223: IF (FND_LOG.level_statement >= FND_LOG.g_current_runtime_level) THEN --{
2224: FND_LOG.string(log_level => FND_LOG.level_statement,
2225: module => g_module_prefix || 'AWARD_BID',
2226: message => '4. Calling SET_SESSION_LANGUAGE with x_language_code : ' || x_language_code);
2227: END IF; --}
2220:
2221: -- Set the userenv language so the message token (attribute) values that we retrieve using the
2222: -- getMessage call return the message in the correct language => x_language_code
2223: IF (FND_LOG.level_statement >= FND_LOG.g_current_runtime_level) THEN --{
2224: FND_LOG.string(log_level => FND_LOG.level_statement,
2225: module => g_module_prefix || 'AWARD_BID',
2226: message => '4. Calling SET_SESSION_LANGUAGE with x_language_code : ' || x_language_code);
2227: END IF; --}
2228:
2900: msg_name => p_message_name);
2901:
2902: IF (p_language_code is not null) THEN
2903:
2904: IF (FND_LOG.level_statement >= FND_LOG.g_current_runtime_level) THEN --{
2905: FND_LOG.string(log_level => FND_LOG.level_statement,
2906: module => g_module_prefix || 'SEND_BIDDERS_NOTIFICATION',
2907: message => '5. Calling SET_SESSION_LANGUAGE with x_language_code : ' || p_language_code);
2908: END IF; --}
2901:
2902: IF (p_language_code is not null) THEN
2903:
2904: IF (FND_LOG.level_statement >= FND_LOG.g_current_runtime_level) THEN --{
2905: FND_LOG.string(log_level => FND_LOG.level_statement,
2906: module => g_module_prefix || 'SEND_BIDDERS_NOTIFICATION',
2907: message => '5. Calling SET_SESSION_LANGUAGE with x_language_code : ' || p_language_code);
2908: END IF; --}
2909: SET_SESSION_LANGUAGE(null, p_language_code);
3845: and nvl(end_date, sysdate+1) > sysdate;
3846: EXCEPTION
3847: when too_many_rows then
3848: if (nvl(fnd_profile.value('AFLOG_ENABLED'),'N') = 'Y') then
3849: if (fnd_log.level_unexpected >= fnd_log.g_current_runtime_level) then
3850: fnd_log.string(log_level => fnd_log.level_unexpected,
3851: module => 'pon.plsql.pon_auction_pkg.populate_role_with_invitees',
3852: message => 'Multiple Users found for person_party_id:'|| x_person_party_id);
3853: end if;
3846: EXCEPTION
3847: when too_many_rows then
3848: if (nvl(fnd_profile.value('AFLOG_ENABLED'),'N') = 'Y') then
3849: if (fnd_log.level_unexpected >= fnd_log.g_current_runtime_level) then
3850: fnd_log.string(log_level => fnd_log.level_unexpected,
3851: module => 'pon.plsql.pon_auction_pkg.populate_role_with_invitees',
3852: message => 'Multiple Users found for person_party_id:'|| x_person_party_id);
3853: end if;
3854: end if;
4248: and nvl(end_date, sysdate+1) > sysdate;
4249: EXCEPTION
4250: when too_many_rows then
4251: if (nvl(fnd_profile.value('AFLOG_ENABLED'),'N') = 'Y') then
4252: if (fnd_log.level_unexpected >= fnd_log.g_current_runtime_level) then
4253: fnd_log.string(log_level => fnd_log.level_unexpected,
4254: module => 'pon.plsql.pon_auction_pkg.check_auction_bidder',
4255: message => 'Multiple Users found for person_party_id:'|| p_trading_partner_contact_id);
4256: end if;
4249: EXCEPTION
4250: when too_many_rows then
4251: if (nvl(fnd_profile.value('AFLOG_ENABLED'),'N') = 'Y') then
4252: if (fnd_log.level_unexpected >= fnd_log.g_current_runtime_level) then
4253: fnd_log.string(log_level => fnd_log.level_unexpected,
4254: module => 'pon.plsql.pon_auction_pkg.check_auction_bidder',
4255: message => 'Multiple Users found for person_party_id:'|| p_trading_partner_contact_id);
4256: end if;
4257: end if;
4756: v_hours := trunc(mod(v_difference*24,24));
4757: v_minutes := trunc(mod(v_difference*(24*60),60));
4758: v_seconds := trunc(mod(v_difference*(24*60*60),60));
4759:
4760: IF (FND_LOG.level_statement>= FND_LOG.g_current_runtime_level) THEN
4761: FND_LOG.string(log_level => FND_LOG.level_statement,
4762: module => g_module_prefix || 'TIME_REMAINING',
4763: message => 'v_days = ' || v_days
4764: || ' v_hours = ' || v_hours
4757: v_minutes := trunc(mod(v_difference*(24*60),60));
4758: v_seconds := trunc(mod(v_difference*(24*60*60),60));
4759:
4760: IF (FND_LOG.level_statement>= FND_LOG.g_current_runtime_level) THEN
4761: FND_LOG.string(log_level => FND_LOG.level_statement,
4762: module => g_module_prefix || 'TIME_REMAINING',
4763: message => 'v_days = ' || v_days
4764: || ' v_hours = ' || v_hours
4765: || ' v_minutes = ' || v_minutes
5333: and nvl(end_date, sysdate+1) > sysdate;
5334: EXCEPTION
5335: WHEN TOO_MANY_ROWS THEN
5336: if (nvl(fnd_profile.value('AFLOG_ENABLED'),'N') = 'Y') then
5337: if (fnd_log.level_unexpected >= fnd_log.g_current_runtime_level) then
5338: fnd_log.string(log_level => fnd_log.level_unexpected,
5339: module => 'pon.plsql.pon_auction_pkg.closeearly_auction',
5340: message => 'Multiple Users found for person_party_id:'|| x_contact_id);
5341: end if;
5334: EXCEPTION
5335: WHEN TOO_MANY_ROWS THEN
5336: if (nvl(fnd_profile.value('AFLOG_ENABLED'),'N') = 'Y') then
5337: if (fnd_log.level_unexpected >= fnd_log.g_current_runtime_level) then
5338: fnd_log.string(log_level => fnd_log.level_unexpected,
5339: module => 'pon.plsql.pon_auction_pkg.closeearly_auction',
5340: message => 'Multiple Users found for person_party_id:'|| x_contact_id);
5341: end if;
5342: end if;
5446: and nvl(end_date, sysdate+1) > sysdate;
5447: EXCEPTION
5448: WHEN TOO_MANY_ROWS THEN
5449: if (nvl(fnd_profile.value('AFLOG_ENABLED'),'N') = 'Y') then
5450: if (fnd_log.level_unexpected >= fnd_log.g_current_runtime_level) then
5451: fnd_log.string(log_level => fnd_log.level_unexpected,
5452: module => 'pon.plsql.pon_auction_pkg.closechanged_auction',
5453: message => 'Multiple Users found for person_party_id:'|| x_contact_id);
5454: end if;
5447: EXCEPTION
5448: WHEN TOO_MANY_ROWS THEN
5449: if (nvl(fnd_profile.value('AFLOG_ENABLED'),'N') = 'Y') then
5450: if (fnd_log.level_unexpected >= fnd_log.g_current_runtime_level) then
5451: fnd_log.string(log_level => fnd_log.level_unexpected,
5452: module => 'pon.plsql.pon_auction_pkg.closechanged_auction',
5453: message => 'Multiple Users found for person_party_id:'|| x_contact_id);
5454: end if;
5455: end if;
5783:
5784: x_language_code VARCHAR2(60);
5785: x_language VARCHAR2(60);
5786: BEGIN
5787: IF (FND_LOG.level_statement >= FND_LOG.g_current_runtime_level) THEN --{
5788: FND_LOG.string(log_level => FND_LOG.level_statement,
5789: module => g_module_prefix || 'SET_SESSION_LANGUAGE',
5790: message => 'Entered procedure : p_language_code ' || p_language_code);
5791: END IF; --}
5784: x_language_code VARCHAR2(60);
5785: x_language VARCHAR2(60);
5786: BEGIN
5787: IF (FND_LOG.level_statement >= FND_LOG.g_current_runtime_level) THEN --{
5788: FND_LOG.string(log_level => FND_LOG.level_statement,
5789: module => g_module_prefix || 'SET_SESSION_LANGUAGE',
5790: message => 'Entered procedure : p_language_code ' || p_language_code);
5791: END IF; --}
5792:
5791: END IF; --}
5792:
5793: g_original_lang_code := fnd_global.current_language;
5794:
5795: IF (FND_LOG.level_statement >= FND_LOG.g_current_runtime_level) THEN --{
5796: FND_LOG.string(log_level => FND_LOG.level_statement,
5797: module => g_module_prefix || 'SET_SESSION_LANGUAGE',
5798: message => 'g_original_lang_code ' || g_original_lang_code);
5799: END IF; --}
5792:
5793: g_original_lang_code := fnd_global.current_language;
5794:
5795: IF (FND_LOG.level_statement >= FND_LOG.g_current_runtime_level) THEN --{
5796: FND_LOG.string(log_level => FND_LOG.level_statement,
5797: module => g_module_prefix || 'SET_SESSION_LANGUAGE',
5798: message => 'g_original_lang_code ' || g_original_lang_code);
5799: END IF; --}
5800:
5799: END IF; --}
5800:
5801: if (g_original_lang_code is not null) then
5802:
5803: IF (FND_LOG.level_statement >= FND_LOG.g_current_runtime_level) THEN --{
5804: FND_LOG.string(log_level => FND_LOG.level_statement,
5805: module => g_module_prefix || 'SET_SESSION_LANGUAGE',
5806: message => 'g_original_lang_code is not null so selecting g_original_language from the DB ');
5807: END IF; --}
5800:
5801: if (g_original_lang_code is not null) then
5802:
5803: IF (FND_LOG.level_statement >= FND_LOG.g_current_runtime_level) THEN --{
5804: FND_LOG.string(log_level => FND_LOG.level_statement,
5805: module => g_module_prefix || 'SET_SESSION_LANGUAGE',
5806: message => 'g_original_lang_code is not null so selecting g_original_language from the DB ');
5807: END IF; --}
5808:
5810: into g_original_language
5811: from fnd_languages
5812: where language_code = g_original_lang_code;
5813:
5814: IF (FND_LOG.level_statement >= FND_LOG.g_current_runtime_level) THEN --{
5815: FND_LOG.string(log_level => FND_LOG.level_statement,
5816: module => g_module_prefix || 'SET_SESSION_LANGUAGE',
5817: message => 'g_original_lang_code is : ' || g_original_lang_code || ' after selecting it from the DB ');
5818: END IF; --}
5811: from fnd_languages
5812: where language_code = g_original_lang_code;
5813:
5814: IF (FND_LOG.level_statement >= FND_LOG.g_current_runtime_level) THEN --{
5815: FND_LOG.string(log_level => FND_LOG.level_statement,
5816: module => g_module_prefix || 'SET_SESSION_LANGUAGE',
5817: message => 'g_original_lang_code is : ' || g_original_lang_code || ' after selecting it from the DB ');
5818: END IF; --}
5819:
5818: END IF; --}
5819:
5820:
5821: else
5822: IF (FND_LOG.level_statement >= FND_LOG.g_current_runtime_level) THEN --{
5823: FND_LOG.string(log_level => FND_LOG.level_statement,
5824: module => g_module_prefix || 'SET_SESSION_LANGUAGE',
5825: message => 'g_original_lang_code is null, so defaulting the language to US');
5826: END IF; --}
5819:
5820:
5821: else
5822: IF (FND_LOG.level_statement >= FND_LOG.g_current_runtime_level) THEN --{
5823: FND_LOG.string(log_level => FND_LOG.level_statement,
5824: module => g_module_prefix || 'SET_SESSION_LANGUAGE',
5825: message => 'g_original_lang_code is null, so defaulting the language to US');
5826: END IF; --}
5827:
5830:
5831: end if;
5832:
5833: begin
5834: IF (FND_LOG.level_statement >= FND_LOG.g_current_runtime_level) THEN --{
5835: FND_LOG.string(log_level => FND_LOG.level_statement,
5836: module => g_module_prefix || 'SET_SESSION_LANGUAGE',
5837: message => 'p_language_code : ' || p_language_code);
5838: END IF; --}
5831: end if;
5832:
5833: begin
5834: IF (FND_LOG.level_statement >= FND_LOG.g_current_runtime_level) THEN --{
5835: FND_LOG.string(log_level => FND_LOG.level_statement,
5836: module => g_module_prefix || 'SET_SESSION_LANGUAGE',
5837: message => 'p_language_code : ' || p_language_code);
5838: END IF; --}
5839:
5838: END IF; --}
5839:
5840: if (p_language_code is null) then
5841:
5842: IF (FND_LOG.level_statement >= FND_LOG.g_current_runtime_level) THEN --{
5843: FND_LOG.string(log_level => FND_LOG.level_statement,
5844: module => g_module_prefix || 'SET_SESSION_LANGUAGE',
5845: message => 'p_language_code is NULL so selecting it from fnd_language ');
5846: END IF; --}
5839:
5840: if (p_language_code is null) then
5841:
5842: IF (FND_LOG.level_statement >= FND_LOG.g_current_runtime_level) THEN --{
5843: FND_LOG.string(log_level => FND_LOG.level_statement,
5844: module => g_module_prefix || 'SET_SESSION_LANGUAGE',
5845: message => 'p_language_code is NULL so selecting it from fnd_language ');
5846: END IF; --}
5847:
5849: into x_language_code
5850: from fnd_languages
5851: where nls_language = p_language;
5852:
5853: IF (FND_LOG.level_statement >= FND_LOG.g_current_runtime_level) THEN --{
5854: FND_LOG.string(log_level => FND_LOG.level_statement,
5855: module => g_module_prefix || 'SET_SESSION_LANGUAGE',
5856: message => 'x_language_code : ' || x_language_code);
5857: END IF; --}
5850: from fnd_languages
5851: where nls_language = p_language;
5852:
5853: IF (FND_LOG.level_statement >= FND_LOG.g_current_runtime_level) THEN --{
5854: FND_LOG.string(log_level => FND_LOG.level_statement,
5855: module => g_module_prefix || 'SET_SESSION_LANGUAGE',
5856: message => 'x_language_code : ' || x_language_code);
5857: END IF; --}
5858:
5857: END IF; --}
5858:
5859: else
5860:
5861: IF (FND_LOG.level_statement >= FND_LOG.g_current_runtime_level) THEN --{
5862: FND_LOG.string(log_level => FND_LOG.level_statement,
5863: module => g_module_prefix || 'SET_SESSION_LANGUAGE',
5864: message => 'p_language_code is NOT NULL so assigning it to x_language_code');
5865: END IF; --}
5858:
5859: else
5860:
5861: IF (FND_LOG.level_statement >= FND_LOG.g_current_runtime_level) THEN --{
5862: FND_LOG.string(log_level => FND_LOG.level_statement,
5863: module => g_module_prefix || 'SET_SESSION_LANGUAGE',
5864: message => 'p_language_code is NOT NULL so assigning it to x_language_code');
5865: END IF; --}
5866:
5866:
5867: x_language_code := p_language_code;
5868:
5869:
5870: IF (FND_LOG.level_statement >= FND_LOG.g_current_runtime_level) THEN --{
5871: FND_LOG.string(log_level => FND_LOG.level_statement,
5872: module => g_module_prefix || 'SET_SESSION_LANGUAGE',
5873: message => 'x_language_code : ' || x_language_code);
5874: END IF; --}
5867: x_language_code := p_language_code;
5868:
5869:
5870: IF (FND_LOG.level_statement >= FND_LOG.g_current_runtime_level) THEN --{
5871: FND_LOG.string(log_level => FND_LOG.level_statement,
5872: module => g_module_prefix || 'SET_SESSION_LANGUAGE',
5873: message => 'x_language_code : ' || x_language_code);
5874: END IF; --}
5875: end if;
5873: message => 'x_language_code : ' || x_language_code);
5874: END IF; --}
5875: end if;
5876:
5877: IF (FND_LOG.level_statement >= FND_LOG.g_current_runtime_level) THEN --{
5878: FND_LOG.string(log_level => FND_LOG.level_statement,
5879: module => g_module_prefix || 'SET_SESSION_LANGUAGE',
5880: message => 'p_language : ' || p_language);
5881: END IF; --}
5874: END IF; --}
5875: end if;
5876:
5877: IF (FND_LOG.level_statement >= FND_LOG.g_current_runtime_level) THEN --{
5878: FND_LOG.string(log_level => FND_LOG.level_statement,
5879: module => g_module_prefix || 'SET_SESSION_LANGUAGE',
5880: message => 'p_language : ' || p_language);
5881: END IF; --}
5882:
5881: END IF; --}
5882:
5883: if (p_language is not null) then
5884:
5885: IF (FND_LOG.level_statement >= FND_LOG.g_current_runtime_level) THEN --{
5886: FND_LOG.string(log_level => FND_LOG.level_statement,
5887: module => g_module_prefix || 'SET_SESSION_LANGUAGE',
5888: message => 'p_language is not NULL so calling the dbms_session.set_nls with p_language : '|| p_language);
5889: END IF; --}
5882:
5883: if (p_language is not null) then
5884:
5885: IF (FND_LOG.level_statement >= FND_LOG.g_current_runtime_level) THEN --{
5886: FND_LOG.string(log_level => FND_LOG.level_statement,
5887: module => g_module_prefix || 'SET_SESSION_LANGUAGE',
5888: message => 'p_language is not NULL so calling the dbms_session.set_nls with p_language : '|| p_language);
5889: END IF; --}
5890:
5890:
5891: dbms_session.set_nls('NLS_LANGUAGE', p_language);
5892: else
5893:
5894: IF (FND_LOG.level_statement >= FND_LOG.g_current_runtime_level) THEN --{
5895: FND_LOG.string(log_level => FND_LOG.level_statement,
5896: module => g_module_prefix || 'SET_SESSION_LANGUAGE',
5897: message => 'p_language is NULL so selecting it from fnd_languages');
5898: END IF; --}
5891: dbms_session.set_nls('NLS_LANGUAGE', p_language);
5892: else
5893:
5894: IF (FND_LOG.level_statement >= FND_LOG.g_current_runtime_level) THEN --{
5895: FND_LOG.string(log_level => FND_LOG.level_statement,
5896: module => g_module_prefix || 'SET_SESSION_LANGUAGE',
5897: message => 'p_language is NULL so selecting it from fnd_languages');
5898: END IF; --}
5899:
5903: where language_code = x_language_code;
5904:
5905: dbms_session.set_nls('NLS_LANGUAGE', x_language);
5906:
5907: IF (FND_LOG.level_statement >= FND_LOG.g_current_runtime_level) THEN --{
5908: FND_LOG.string(log_level => FND_LOG.level_statement,
5909: module => g_module_prefix || 'SET_SESSION_LANGUAGE',
5910: message => 'x_language : ' || x_language ||'; calling dbms_session.set_nls with x_language : '|| x_language);
5911: END IF; --}
5904:
5905: dbms_session.set_nls('NLS_LANGUAGE', x_language);
5906:
5907: IF (FND_LOG.level_statement >= FND_LOG.g_current_runtime_level) THEN --{
5908: FND_LOG.string(log_level => FND_LOG.level_statement,
5909: module => g_module_prefix || 'SET_SESSION_LANGUAGE',
5910: message => 'x_language : ' || x_language ||'; calling dbms_session.set_nls with x_language : '|| x_language);
5911: END IF; --}
5912:
5913: end if;
5914: exception
5915: when others then
5916:
5917: IF (FND_LOG.level_statement >= FND_LOG.g_current_runtime_level) THEN --{
5918: FND_LOG.string(log_level => FND_LOG.level_statement,
5919: module => g_module_prefix || 'SET_SESSION_LANGUAGE',
5920: message => 'Exception when running the procedure; doing nothing');
5921: END IF; --}
5914: exception
5915: when others then
5916:
5917: IF (FND_LOG.level_statement >= FND_LOG.g_current_runtime_level) THEN --{
5918: FND_LOG.string(log_level => FND_LOG.level_statement,
5919: module => g_module_prefix || 'SET_SESSION_LANGUAGE',
5920: message => 'Exception when running the procedure; doing nothing');
5921: END IF; --}
5922:
5922:
5923: null;
5924: end;
5925:
5926: IF (FND_LOG.level_statement >= FND_LOG.g_current_runtime_level) THEN --{
5927: FND_LOG.string(log_level => FND_LOG.level_statement,
5928: module => g_module_prefix || 'SET_SESSION_LANGUAGE',
5929: message => 'Setting PON_AUCTION_PKG.SessionLanguage to x_language_code : ' || x_language_code);
5930: END IF; --}
5923: null;
5924: end;
5925:
5926: IF (FND_LOG.level_statement >= FND_LOG.g_current_runtime_level) THEN --{
5927: FND_LOG.string(log_level => FND_LOG.level_statement,
5928: module => g_module_prefix || 'SET_SESSION_LANGUAGE',
5929: message => 'Setting PON_AUCTION_PKG.SessionLanguage to x_language_code : ' || x_language_code);
5930: END IF; --}
5931:
5931:
5932: -- set this package variable to be used with the get_message calls.
5933: PON_AUCTION_PKG.SessionLanguage := x_language_code;
5934:
5935: IF (FND_LOG.level_statement >= FND_LOG.g_current_runtime_level) THEN --{
5936: FND_LOG.string(log_level => FND_LOG.level_statement,
5937: module => g_module_prefix || 'SET_SESSION_LANGUAGE',
5938: message => 'Setting PON_AUCTION_PKG.SessionLanguage : ' || PON_AUCTION_PKG.SessionLanguage);
5939: END IF; --}
5932: -- set this package variable to be used with the get_message calls.
5933: PON_AUCTION_PKG.SessionLanguage := x_language_code;
5934:
5935: IF (FND_LOG.level_statement >= FND_LOG.g_current_runtime_level) THEN --{
5936: FND_LOG.string(log_level => FND_LOG.level_statement,
5937: module => g_module_prefix || 'SET_SESSION_LANGUAGE',
5938: message => 'Setting PON_AUCTION_PKG.SessionLanguage : ' || PON_AUCTION_PKG.SessionLanguage);
5939: END IF; --}
5940:
5942:
5943:
5944: PROCEDURE UNSET_SESSION_LANGUAGE is
5945: BEGIN
5946: IF (FND_LOG.level_statement >= FND_LOG.g_current_runtime_level) THEN --{
5947: FND_LOG.string(log_level => FND_LOG.level_statement,
5948: module => g_module_prefix || 'UNSET_SESSION_LANGUAGE',
5949: message => 'Entered the procedure; g_original_language : ' || g_original_language);
5950: END IF; --}
5943:
5944: PROCEDURE UNSET_SESSION_LANGUAGE is
5945: BEGIN
5946: IF (FND_LOG.level_statement >= FND_LOG.g_current_runtime_level) THEN --{
5947: FND_LOG.string(log_level => FND_LOG.level_statement,
5948: module => g_module_prefix || 'UNSET_SESSION_LANGUAGE',
5949: message => 'Entered the procedure; g_original_language : ' || g_original_language);
5950: END IF; --}
5951:
5950: END IF; --}
5951:
5952: begin
5953: --dbms_session.set_nls('NLS_LANGUAGE', 'AMERICAN');
5954: IF (FND_LOG.level_statement >= FND_LOG.g_current_runtime_level) THEN --{
5955: FND_LOG.string(log_level => FND_LOG.level_statement,
5956: module => g_module_prefix || 'UNSET_SESSION_LANGUAGE',
5957: message => 'calling dbms_session.set_nls with g_original_language : ' || g_original_language);
5958: END IF; --}
5951:
5952: begin
5953: --dbms_session.set_nls('NLS_LANGUAGE', 'AMERICAN');
5954: IF (FND_LOG.level_statement >= FND_LOG.g_current_runtime_level) THEN --{
5955: FND_LOG.string(log_level => FND_LOG.level_statement,
5956: module => g_module_prefix || 'UNSET_SESSION_LANGUAGE',
5957: message => 'calling dbms_session.set_nls with g_original_language : ' || g_original_language);
5958: END IF; --}
5959:
5959:
5960: dbms_session.set_nls('NLS_LANGUAGE', g_original_language);
5961: exception
5962: when others then
5963: IF (FND_LOG.level_statement >= FND_LOG.g_current_runtime_level) THEN --{
5964: FND_LOG.string(log_level => FND_LOG.level_statement,
5965: module => g_module_prefix || 'UNSET_SESSION_LANGUAGE',
5966: message => 'Exception when running the procedure; doing nothing');
5967: END IF; --}
5960: dbms_session.set_nls('NLS_LANGUAGE', g_original_language);
5961: exception
5962: when others then
5963: IF (FND_LOG.level_statement >= FND_LOG.g_current_runtime_level) THEN --{
5964: FND_LOG.string(log_level => FND_LOG.level_statement,
5965: module => g_module_prefix || 'UNSET_SESSION_LANGUAGE',
5966: message => 'Exception when running the procedure; doing nothing');
5967: END IF; --}
5968:
5968:
5969: null;
5970: end;
5971:
5972: IF (FND_LOG.level_statement >= FND_LOG.g_current_runtime_level) THEN --{
5973: FND_LOG.string(log_level => FND_LOG.level_statement,
5974: module => g_module_prefix || 'UNSET_SESSION_LANGUAGE',
5975: message => 'Setting PON_AUCTION_PKG.SessionLanguage to g_original_lang_code : ' || g_original_lang_code);
5976: END IF; --}
5969: null;
5970: end;
5971:
5972: IF (FND_LOG.level_statement >= FND_LOG.g_current_runtime_level) THEN --{
5973: FND_LOG.string(log_level => FND_LOG.level_statement,
5974: module => g_module_prefix || 'UNSET_SESSION_LANGUAGE',
5975: message => 'Setting PON_AUCTION_PKG.SessionLanguage to g_original_lang_code : ' || g_original_lang_code);
5976: END IF; --}
5977: -- unset this package variable (used by the get_message calls).
5977: -- unset this package variable (used by the get_message calls).
5978: -- PON_AUCTION_PKG.SessionLanguage := 'US';
5979: PON_AUCTION_PKG.SessionLanguage := g_original_lang_code;
5980:
5981: IF (FND_LOG.level_statement >= FND_LOG.g_current_runtime_level) THEN --{
5982: FND_LOG.string(log_level => FND_LOG.level_statement,
5983: module => g_module_prefix || 'UNSET_SESSION_LANGUAGE',
5984: message => 'Setting PON_AUCTION_PKG.SessionLanguage : ' || PON_AUCTION_PKG.SessionLanguage);
5985: END IF; --}
5978: -- PON_AUCTION_PKG.SessionLanguage := 'US';
5979: PON_AUCTION_PKG.SessionLanguage := g_original_lang_code;
5980:
5981: IF (FND_LOG.level_statement >= FND_LOG.g_current_runtime_level) THEN --{
5982: FND_LOG.string(log_level => FND_LOG.level_statement,
5983: module => g_module_prefix || 'UNSET_SESSION_LANGUAGE',
5984: message => 'Setting PON_AUCTION_PKG.SessionLanguage : ' || PON_AUCTION_PKG.SessionLanguage);
5985: END IF; --}
5986:
6857: END;
6858:
6859: IF (x_language_code is not null) THEN
6860:
6861: IF (FND_LOG.level_statement >= FND_LOG.g_current_runtime_level) THEN --{
6862: FND_LOG.string(log_level => FND_LOG.level_statement,
6863: module => g_module_prefix || 'NOTIFY_ADDED_INVITEES',
6864: message => '7. Calling SET_SESSION_LANGUAGE with x_language_code : ' || x_language_code);
6865: END IF; --}
6858:
6859: IF (x_language_code is not null) THEN
6860:
6861: IF (FND_LOG.level_statement >= FND_LOG.g_current_runtime_level) THEN --{
6862: FND_LOG.string(log_level => FND_LOG.level_statement,
6863: module => g_module_prefix || 'NOTIFY_ADDED_INVITEES',
6864: message => '7. Calling SET_SESSION_LANGUAGE with x_language_code : ' || x_language_code);
6865: END IF; --}
6866:
7236: and nvl(end_date,sysdate+1) > sysdate;
7237: exception
7238: when too_many_rows then
7239: if (nvl(fnd_profile.value('AFLOG_ENABLED'),'N') = 'Y') then
7240: if (fnd_log.level_unexpected >= fnd_log.g_current_runtime_level) then
7241: fnd_log.string(log_level => fnd_log.level_unexpected,
7242: module => 'pon.plsql.pon_auction_pkg.get_user_name',
7243: message => 'Multiple Users found for person_party_id:'|| p_user_id);
7244: end if;
7237: exception
7238: when too_many_rows then
7239: if (nvl(fnd_profile.value('AFLOG_ENABLED'),'N') = 'Y') then
7240: if (fnd_log.level_unexpected >= fnd_log.g_current_runtime_level) then
7241: fnd_log.string(log_level => fnd_log.level_unexpected,
7242: module => 'pon.plsql.pon_auction_pkg.get_user_name',
7243: message => 'Multiple Users found for person_party_id:'|| p_user_id);
7244: end if;
7245: end if;
7355: x_timezone := fnd_profile.value_specific('CLIENT_TIMEZONE_ID',x_user_id);
7356: exception
7357: when too_many_rows then
7358: if (nvl(fnd_profile.value('AFLOG_ENABLED'),'N') = 'Y') then
7359: if (fnd_log.level_unexpected >= fnd_log.g_current_runtime_level) then
7360: fnd_log.string(log_level => fnd_log.level_unexpected,
7361: module => 'pon.plsql.pon_auction_pkg.get_time_zone',
7362: message => 'Multiple Users found for person_party_id:'|| contact_id);
7363: end if;
7356: exception
7357: when too_many_rows then
7358: if (nvl(fnd_profile.value('AFLOG_ENABLED'),'N') = 'Y') then
7359: if (fnd_log.level_unexpected >= fnd_log.g_current_runtime_level) then
7360: fnd_log.string(log_level => fnd_log.level_unexpected,
7361: module => 'pon.plsql.pon_auction_pkg.get_time_zone',
7362: message => 'Multiple Users found for person_party_id:'|| contact_id);
7363: end if;
7364: end if;
7373: x_timezone := fnd_profile.value_specific('CLIENT_TIMEZONE_ID',x_user_id);
7374:
7375: when NO_DATA_FOUND then
7376: if (nvl(fnd_profile.value('AFLOG_ENABLED'),'N') = 'Y') then
7377: if (fnd_log.level_unexpected >= fnd_log.g_current_runtime_level) then
7378: fnd_log.string(log_level => fnd_log.level_unexpected,
7379: module => 'pon.plsql.pon_auction_pkg.get_time_zone',
7380: message => 'No Active Users found for person_party_id:'|| contact_id);
7381: end if;
7374:
7375: when NO_DATA_FOUND then
7376: if (nvl(fnd_profile.value('AFLOG_ENABLED'),'N') = 'Y') then
7377: if (fnd_log.level_unexpected >= fnd_log.g_current_runtime_level) then
7378: fnd_log.string(log_level => fnd_log.level_unexpected,
7379: module => 'pon.plsql.pon_auction_pkg.get_time_zone',
7380: message => 'No Active Users found for person_party_id:'|| contact_id);
7381: end if;
7382: end if;
7390: x_timezone := fnd_profile.value_specific('CLIENT_TIMEZONE_ID',x_user_id);
7391:
7392: when OTHERS then
7393: if (nvl(fnd_profile.value('AFLOG_ENABLED'),'N') = 'Y') then
7394: if (fnd_log.level_unexpected >= fnd_log.g_current_runtime_level) then
7395: fnd_log.string(log_level => fnd_log.level_unexpected,
7396: module => 'pon.plsql.pon_auction_pkg.get_time_zone',
7397: message => 'Unknown exception for person_party_id:'|| contact_id);
7398: end if;
7391:
7392: when OTHERS then
7393: if (nvl(fnd_profile.value('AFLOG_ENABLED'),'N') = 'Y') then
7394: if (fnd_log.level_unexpected >= fnd_log.g_current_runtime_level) then
7395: fnd_log.string(log_level => fnd_log.level_unexpected,
7396: module => 'pon.plsql.pon_auction_pkg.get_time_zone',
7397: message => 'Unknown exception for person_party_id:'|| contact_id);
7398: end if;
7399: end if;
8553:
8554: end if; -- }
8555:
8556: IF (x_language_code is not null) THEN
8557: IF (FND_LOG.level_statement >= FND_LOG.g_current_runtime_level) THEN --{
8558: FND_LOG.string(log_level => FND_LOG.level_statement,
8559: module => g_module_prefix || 'NOTIFY_BIDDER_LIST_REMINDER',
8560: message => '8. Calling SET_SESSION_LANGUAGE with x_language_code : ' || x_language_code);
8561: END IF; --}
8554: end if; -- }
8555:
8556: IF (x_language_code is not null) THEN
8557: IF (FND_LOG.level_statement >= FND_LOG.g_current_runtime_level) THEN --{
8558: FND_LOG.string(log_level => FND_LOG.level_statement,
8559: module => g_module_prefix || 'NOTIFY_BIDDER_LIST_REMINDER',
8560: message => '8. Calling SET_SESSION_LANGUAGE with x_language_code : ' || x_language_code);
8561: END IF; --}
8562:
9182: -- Get the current policy
9183: v_old_policy := mo_global.get_access_mode();
9184: v_old_org_id := mo_global.get_current_org_id();
9185:
9186: if (fnd_log.level_statement >= fnd_log.g_current_runtime_level) then
9187: fnd_log.string(
9188: fnd_log.level_statement,
9189: g_module || '.check_unique_order_number',
9190: 'old_policy = ' || v_old_policy || ', old_org_id = ' || v_old_org_id);
9183: v_old_policy := mo_global.get_access_mode();
9184: v_old_org_id := mo_global.get_current_org_id();
9185:
9186: if (fnd_log.level_statement >= fnd_log.g_current_runtime_level) then
9187: fnd_log.string(
9188: fnd_log.level_statement,
9189: g_module || '.check_unique_order_number',
9190: 'old_policy = ' || v_old_policy || ', old_org_id = ' || v_old_org_id);
9191: end if;
9184: v_old_org_id := mo_global.get_current_org_id();
9185:
9186: if (fnd_log.level_statement >= fnd_log.g_current_runtime_level) then
9187: fnd_log.string(
9188: fnd_log.level_statement,
9189: g_module || '.check_unique_order_number',
9190: 'old_policy = ' || v_old_policy || ', old_org_id = ' || v_old_org_id);
9191: end if;
9192:
9837: BEGIN
9838:
9839: l_progress := '000';
9840: x_return_status := FND_API.G_RET_STS_SUCCESS;
9841: IF (FND_LOG.level_procedure >= FND_LOG.g_current_runtime_level) THEN
9842: FND_LOG.string (log_level => FND_LOG.level_procedure,
9843: module => g_module || l_module_name,
9844: message => 'Entering to Procedure ' || g_module || l_module_name
9845: || ', l_progress = ' || l_progress
9838:
9839: l_progress := '000';
9840: x_return_status := FND_API.G_RET_STS_SUCCESS;
9841: IF (FND_LOG.level_procedure >= FND_LOG.g_current_runtime_level) THEN
9842: FND_LOG.string (log_level => FND_LOG.level_procedure,
9843: module => g_module || l_module_name,
9844: message => 'Entering to Procedure ' || g_module || l_module_name
9845: || ', l_progress = ' || l_progress
9846: || ', p_auction_header_id = ' || p_auction_header_id
9904: AND pad.doctype_id = auh.doctype_id;
9905:
9906: l_progress := '030';
9907:
9908: IF (FND_LOG.level_procedure >= FND_LOG.g_current_runtime_level) THEN
9909: FND_LOG.string (log_level => FND_LOG.level_procedure,
9910: module => g_module || l_module_name,
9911: message => 'After query execution : ' || g_module || l_module_name
9912: || ', l_progress = ' || l_progress
9905:
9906: l_progress := '030';
9907:
9908: IF (FND_LOG.level_procedure >= FND_LOG.g_current_runtime_level) THEN
9909: FND_LOG.string (log_level => FND_LOG.level_procedure,
9910: module => g_module || l_module_name,
9911: message => 'After query execution : ' || g_module || l_module_name
9912: || ', l_progress = ' || l_progress
9913: || ', l_doc_number = ' || l_doc_number
9935: -- retrieved in that language.
9936: IF p_user_id IS NOT NULL THEN
9937: PON_PROFILE_UTIL_PKG.GET_WF_LANGUAGE (p_user_id, l_lang_code);
9938:
9939: IF (FND_LOG.level_statement >= FND_LOG.g_current_runtime_level) THEN --{
9940: FND_LOG.string(log_level => FND_LOG.level_statement,
9941: module => g_module_prefix || 'SEND_TASK_ASSIGN_NOTIF',
9942: message => '9. Calling SET_SESSION_LANGUAGE with l_lang_code : ' || l_lang_code);
9943: END IF; --}
9936: IF p_user_id IS NOT NULL THEN
9937: PON_PROFILE_UTIL_PKG.GET_WF_LANGUAGE (p_user_id, l_lang_code);
9938:
9939: IF (FND_LOG.level_statement >= FND_LOG.g_current_runtime_level) THEN --{
9940: FND_LOG.string(log_level => FND_LOG.level_statement,
9941: module => g_module_prefix || 'SEND_TASK_ASSIGN_NOTIF',
9942: message => '9. Calling SET_SESSION_LANGUAGE with l_lang_code : ' || l_lang_code);
9943: END IF; --}
9944:
9966: token2_value => replaceHtmlChars(l_auction_title));
9967: l_progress := '050';
9968:
9969:
9970: IF (FND_LOG.level_procedure >= FND_LOG.g_current_runtime_level) THEN
9971: FND_LOG.string (log_level => FND_LOG.level_procedure,
9972: module => g_module || l_module_name,
9973: message => 'After getting new time and subject : ' || g_module || l_module_name
9974: || ', l_progress = ' || l_progress
9967: l_progress := '050';
9968:
9969:
9970: IF (FND_LOG.level_procedure >= FND_LOG.g_current_runtime_level) THEN
9971: FND_LOG.string (log_level => FND_LOG.level_procedure,
9972: module => g_module || l_module_name,
9973: message => 'After getting new time and subject : ' || g_module || l_module_name
9974: || ', l_progress = ' || l_progress
9975: || ', l_auction_start_date = ' || l_auction_start_date
9991: itemkey => x_itemkey,
9992: process => 'TEAM_MEM_TASK_ASSIGNED');
9993: l_progress := '060';
9994:
9995: IF (FND_LOG.level_procedure >= FND_LOG.g_current_runtime_level) THEN
9996: FND_LOG.string (log_level => FND_LOG.level_procedure,
9997: module => g_module || l_module_name,
9998: message => 'After CreateProcess ' || g_module || l_module_name
9999: || ', l_progress = ' || l_progress
9992: process => 'TEAM_MEM_TASK_ASSIGNED');
9993: l_progress := '060';
9994:
9995: IF (FND_LOG.level_procedure >= FND_LOG.g_current_runtime_level) THEN
9996: FND_LOG.string (log_level => FND_LOG.level_procedure,
9997: module => g_module || l_module_name,
9998: message => 'After CreateProcess ' || g_module || l_module_name
9999: || ', l_progress = ' || l_progress
10000: || ', x_itemtype = ' || x_itemtype
10088:
10089:
10090: l_progress := 'END';
10091:
10092: IF (FND_LOG.level_procedure >= FND_LOG.g_current_runtime_level) THEN
10093: FND_LOG.string (log_level => FND_LOG.level_procedure,
10094: module => g_module || l_module_name,
10095: message => 'Procedure Ends ' || g_module || l_module_name
10096: || ', l_progress = ' || l_progress);
10089:
10090: l_progress := 'END';
10091:
10092: IF (FND_LOG.level_procedure >= FND_LOG.g_current_runtime_level) THEN
10093: FND_LOG.string (log_level => FND_LOG.level_procedure,
10094: module => g_module || l_module_name,
10095: message => 'Procedure Ends ' || g_module || l_module_name
10096: || ', l_progress = ' || l_progress);
10097: END IF;
10098:
10099: UNSET_SESSION_LANGUAGE;
10100:
10101: EXCEPTION WHEN OTHERS THEN
10102: IF (FND_LOG.level_procedure >= FND_LOG.g_current_runtime_level) THEN
10103: FND_LOG.string (log_level => FND_LOG.level_procedure,
10104: module => g_module || l_module_name,
10105: message => 'In Exception Block : ' || g_module || l_module_name
10106: || ', l_progress = ' || l_progress
10099: UNSET_SESSION_LANGUAGE;
10100:
10101: EXCEPTION WHEN OTHERS THEN
10102: IF (FND_LOG.level_procedure >= FND_LOG.g_current_runtime_level) THEN
10103: FND_LOG.string (log_level => FND_LOG.level_procedure,
10104: module => g_module || l_module_name,
10105: message => 'In Exception Block : ' || g_module || l_module_name
10106: || ', l_progress = ' || l_progress
10107: || ', p_auction_header_id = ' || p_auction_header_id
10173:
10174: l_progress := '000';
10175: x_return_status := FND_API.G_RET_STS_SUCCESS;
10176:
10177: IF (FND_LOG.level_procedure >= FND_LOG.g_current_runtime_level) THEN
10178: FND_LOG.string (log_level => FND_LOG.level_procedure,
10179: module => g_module || l_module_name,
10180: message => 'Entering to Procedure ' || g_module || l_module_name
10181: || ', l_progress = ' || l_progress
10174: l_progress := '000';
10175: x_return_status := FND_API.G_RET_STS_SUCCESS;
10176:
10177: IF (FND_LOG.level_procedure >= FND_LOG.g_current_runtime_level) THEN
10178: FND_LOG.string (log_level => FND_LOG.level_procedure,
10179: module => g_module || l_module_name,
10180: message => 'Entering to Procedure ' || g_module || l_module_name
10181: || ', l_progress = ' || l_progress
10182: || ', p_auction_header_id = ' || p_auction_header_id
10218:
10219: EXCEPTION
10220: WHEN TOO_MANY_ROWS THEN
10221: if (nvl(fnd_profile.value('AFLOG_ENABLED'),'N') = 'Y') then
10222: if (fnd_log.level_unexpected >= fnd_log.g_current_runtime_level) then
10223: fnd_log.string(log_level => fnd_log.level_unexpected,
10224: module => 'pon.plsql.pon_auction_pkg.send_task_compl_notif',
10225: message => 'Multiple Users found for auction_header_id:'|| p_auction_header_id);
10226: end if;
10219: EXCEPTION
10220: WHEN TOO_MANY_ROWS THEN
10221: if (nvl(fnd_profile.value('AFLOG_ENABLED'),'N') = 'Y') then
10222: if (fnd_log.level_unexpected >= fnd_log.g_current_runtime_level) then
10223: fnd_log.string(log_level => fnd_log.level_unexpected,
10224: module => 'pon.plsql.pon_auction_pkg.send_task_compl_notif',
10225: message => 'Multiple Users found for auction_header_id:'|| p_auction_header_id);
10226: end if;
10227: end if;
10261: END;
10262:
10263: l_progress := '005';
10264:
10265: IF (FND_LOG.level_procedure >= FND_LOG.g_current_runtime_level) THEN
10266: FND_LOG.string (log_level => FND_LOG.level_procedure,
10267: module => g_module || l_module_name,
10268: message => 'Entering to Procedure ' || g_module || l_module_name
10269: || ', l_progress = ' || l_progress
10262:
10263: l_progress := '005';
10264:
10265: IF (FND_LOG.level_procedure >= FND_LOG.g_current_runtime_level) THEN
10266: FND_LOG.string (log_level => FND_LOG.level_procedure,
10267: module => g_module || l_module_name,
10268: message => 'Entering to Procedure ' || g_module || l_module_name
10269: || ', l_progress = ' || l_progress
10270: || ', l_doc_number = ' || l_doc_number
10314:
10315:
10316: l_progress := '030';
10317:
10318: IF (FND_LOG.level_procedure >= FND_LOG.g_current_runtime_level) THEN
10319: FND_LOG.string (log_level => FND_LOG.level_procedure,
10320: module => g_module || l_module_name,
10321: message => 'After query execution : ' || g_module || l_module_name
10322: || ', l_progress = ' || l_progress
10315:
10316: l_progress := '030';
10317:
10318: IF (FND_LOG.level_procedure >= FND_LOG.g_current_runtime_level) THEN
10319: FND_LOG.string (log_level => FND_LOG.level_procedure,
10320: module => g_module || l_module_name,
10321: message => 'After query execution : ' || g_module || l_module_name
10322: || ', l_progress = ' || l_progress
10323: || ', l_language_code = ' || l_language_code
10333: -- retrieved in that language.
10334: IF l_tp_contact_usr_id IS NOT NULL THEN
10335: PON_PROFILE_UTIL_PKG.GET_WF_LANGUAGE (l_tp_contact_usr_id, l_lang_code);
10336:
10337: IF (FND_LOG.level_statement >= FND_LOG.g_current_runtime_level) THEN --{
10338: FND_LOG.string(log_level => FND_LOG.level_statement,
10339: module => g_module_prefix || 'SEND_TASK_COMPL_NOTIF',
10340: message => '10. Calling SET_SESSION_LANGUAGE with l_lang_code : ' || l_lang_code);
10341: END IF; --}
10334: IF l_tp_contact_usr_id IS NOT NULL THEN
10335: PON_PROFILE_UTIL_PKG.GET_WF_LANGUAGE (l_tp_contact_usr_id, l_lang_code);
10336:
10337: IF (FND_LOG.level_statement >= FND_LOG.g_current_runtime_level) THEN --{
10338: FND_LOG.string(log_level => FND_LOG.level_statement,
10339: module => g_module_prefix || 'SEND_TASK_COMPL_NOTIF',
10340: message => '10. Calling SET_SESSION_LANGUAGE with l_lang_code : ' || l_lang_code);
10341: END IF; --}
10342:
10366:
10367: l_progress := '050';
10368:
10369:
10370: IF (FND_LOG.level_procedure >= FND_LOG.g_current_runtime_level) THEN
10371: FND_LOG.string (log_level => FND_LOG.level_procedure,
10372: module => g_module || l_module_name,
10373: message => 'After getting new time and subject : ' || g_module || l_module_name
10374: || ', l_progress = ' || l_progress
10367: l_progress := '050';
10368:
10369:
10370: IF (FND_LOG.level_procedure >= FND_LOG.g_current_runtime_level) THEN
10371: FND_LOG.string (log_level => FND_LOG.level_procedure,
10372: module => g_module || l_module_name,
10373: message => 'After getting new time and subject : ' || g_module || l_module_name
10374: || ', l_progress = ' || l_progress
10375: || ', l_auction_start_date = ' || l_auction_start_date
10393: itemkey => x_itemkey,
10394: process => 'TEAM_MEM_TASK_COMPLTD');
10395: l_progress := '060';
10396:
10397: IF (FND_LOG.level_procedure >= FND_LOG.g_current_runtime_level) THEN
10398: FND_LOG.string (log_level => FND_LOG.level_procedure,
10399: module => g_module || l_module_name,
10400: message => 'After CreateProcess ' || g_module || l_module_name
10401: || ', l_progress = ' || l_progress
10394: process => 'TEAM_MEM_TASK_COMPLTD');
10395: l_progress := '060';
10396:
10397: IF (FND_LOG.level_procedure >= FND_LOG.g_current_runtime_level) THEN
10398: FND_LOG.string (log_level => FND_LOG.level_procedure,
10399: module => g_module || l_module_name,
10400: message => 'After CreateProcess ' || g_module || l_module_name
10401: || ', l_progress = ' || l_progress
10402: || ', x_itemtype = ' || x_itemtype
10484:
10485:
10486: l_progress := 'END';
10487:
10488: IF (FND_LOG.level_procedure >= FND_LOG.g_current_runtime_level) THEN
10489: FND_LOG.string (log_level => FND_LOG.level_procedure,
10490: module => g_module || l_module_name,
10491: message => 'Procedure Ends ' || g_module || l_module_name
10492: || ', l_progress = ' || l_progress);
10485:
10486: l_progress := 'END';
10487:
10488: IF (FND_LOG.level_procedure >= FND_LOG.g_current_runtime_level) THEN
10489: FND_LOG.string (log_level => FND_LOG.level_procedure,
10490: module => g_module || l_module_name,
10491: message => 'Procedure Ends ' || g_module || l_module_name
10492: || ', l_progress = ' || l_progress);
10493: END IF;
10494:
10495: UNSET_SESSION_LANGUAGE;
10496:
10497: EXCEPTION WHEN OTHERS THEN
10498: IF (FND_LOG.level_procedure >= FND_LOG.g_current_runtime_level) THEN
10499: FND_LOG.string (log_level => FND_LOG.level_procedure,
10500: module => g_module || l_module_name,
10501: message => 'In Exception Block : ' || g_module || l_module_name
10502: || ', l_progress = ' || l_progress
10495: UNSET_SESSION_LANGUAGE;
10496:
10497: EXCEPTION WHEN OTHERS THEN
10498: IF (FND_LOG.level_procedure >= FND_LOG.g_current_runtime_level) THEN
10499: FND_LOG.string (log_level => FND_LOG.level_procedure,
10500: module => g_module || l_module_name,
10501: message => 'In Exception Block : ' || g_module || l_module_name
10502: || ', l_progress = ' || l_progress
10503: || ', p_auction_header_id = ' || p_auction_header_id
10563: l_progress := '000';
10564: x_return_status := FND_API.G_RET_STS_SUCCESS;
10565: l_null_date := null;
10566:
10567: IF (FND_LOG.level_procedure >= FND_LOG.g_current_runtime_level) THEN
10568: FND_LOG.string (log_level => FND_LOG.level_procedure,
10569: module => g_module || l_module_name,
10570: message => 'Entering to Procedure ' || g_module || l_module_name
10571: || ', l_progress = ' || l_progress
10564: x_return_status := FND_API.G_RET_STS_SUCCESS;
10565: l_null_date := null;
10566:
10567: IF (FND_LOG.level_procedure >= FND_LOG.g_current_runtime_level) THEN
10568: FND_LOG.string (log_level => FND_LOG.level_procedure,
10569: module => g_module || l_module_name,
10570: message => 'Entering to Procedure ' || g_module || l_module_name
10571: || ', l_progress = ' || l_progress
10572: || ', p_bid_number = ' || p_bid_number);
10616: AND nvl(fu.end_date, sysdate+1) > sysdate;
10617: EXCEPTION
10618: WHEN TOO_MANY_ROWS THEN
10619: if (nvl(fnd_profile.value('AFLOG_ENABLED'),'N') = 'Y') then
10620: if (fnd_log.level_unexpected >= fnd_log.g_current_runtime_level) then
10621: fnd_log.string(log_level => fnd_log.level_unexpected,
10622: module => 'pon.plsql.pon_auction_pkg.send_resp_notif',
10623: message => 'Multiple Users found for bid number:'|| p_bid_number);
10624: end if;
10617: EXCEPTION
10618: WHEN TOO_MANY_ROWS THEN
10619: if (nvl(fnd_profile.value('AFLOG_ENABLED'),'N') = 'Y') then
10620: if (fnd_log.level_unexpected >= fnd_log.g_current_runtime_level) then
10621: fnd_log.string(log_level => fnd_log.level_unexpected,
10622: module => 'pon.plsql.pon_auction_pkg.send_resp_notif',
10623: message => 'Multiple Users found for bid number:'|| p_bid_number);
10624: end if;
10625: end if;
10671: END;
10672:
10673: l_progress := '010';
10674:
10675: IF (FND_LOG.level_procedure >= FND_LOG.g_current_runtime_level) THEN
10676: FND_LOG.string (log_level => FND_LOG.level_procedure,
10677: module => g_module || l_module_name,
10678: message => 'Entering to Procedure ' || g_module || l_module_name
10679: || ', l_progress = ' || l_progress
10672:
10673: l_progress := '010';
10674:
10675: IF (FND_LOG.level_procedure >= FND_LOG.g_current_runtime_level) THEN
10676: FND_LOG.string (log_level => FND_LOG.level_procedure,
10677: module => g_module || l_module_name,
10678: message => 'Entering to Procedure ' || g_module || l_module_name
10679: || ', l_progress = ' || l_progress
10680: || ', l_doc_number = ' || l_doc_number
10697: l_progress := '020';
10698:
10699: PON_PROFILE_UTIL_PKG.GET_WF_LANGUAGE(l_auctioneer_user_name,l_lang_code);
10700:
10701: IF (FND_LOG.level_statement >= FND_LOG.g_current_runtime_level) THEN --{
10702: FND_LOG.string(log_level => FND_LOG.level_statement,
10703: module => g_module_prefix ||l_module_name,
10704: message => '11. Calling SET_SESSION_LANGUAGE with l_lang_code : ' || l_lang_code);
10705: END IF; --}
10698:
10699: PON_PROFILE_UTIL_PKG.GET_WF_LANGUAGE(l_auctioneer_user_name,l_lang_code);
10700:
10701: IF (FND_LOG.level_statement >= FND_LOG.g_current_runtime_level) THEN --{
10702: FND_LOG.string(log_level => FND_LOG.level_statement,
10703: module => g_module_prefix ||l_module_name,
10704: message => '11. Calling SET_SESSION_LANGUAGE with l_lang_code : ' || l_lang_code);
10705: END IF; --}
10706: SET_SESSION_LANGUAGE (null, l_lang_code);
10706: SET_SESSION_LANGUAGE (null, l_lang_code);
10707:
10708: l_progress := '030';
10709:
10710: IF (FND_LOG.level_procedure >= FND_LOG.g_current_runtime_level) THEN
10711: FND_LOG.string (log_level => FND_LOG.level_procedure,
10712: module => g_module || l_module_name,
10713: message => 'After query execution : ' || g_module || l_module_name
10714: || ', l_progress = ' || l_progress
10707:
10708: l_progress := '030';
10709:
10710: IF (FND_LOG.level_procedure >= FND_LOG.g_current_runtime_level) THEN
10711: FND_LOG.string (log_level => FND_LOG.level_procedure,
10712: module => g_module || l_module_name,
10713: message => 'After query execution : ' || g_module || l_module_name
10714: || ', l_progress = ' || l_progress
10715: || ', l_language_code = ' || l_language_code
10742:
10743: l_progress := '050';
10744:
10745:
10746: IF (FND_LOG.level_procedure >= FND_LOG.g_current_runtime_level) THEN
10747: FND_LOG.string (log_level => FND_LOG.level_procedure,
10748: module => g_module || l_module_name,
10749: message => 'After getting new time and subject : ' || g_module || l_module_name
10750: || ', l_progress = ' || l_progress
10743: l_progress := '050';
10744:
10745:
10746: IF (FND_LOG.level_procedure >= FND_LOG.g_current_runtime_level) THEN
10747: FND_LOG.string (log_level => FND_LOG.level_procedure,
10748: module => g_module || l_module_name,
10749: message => 'After getting new time and subject : ' || g_module || l_module_name
10750: || ', l_progress = ' || l_progress
10751: || ', l_auction_start_date = ' || l_auction_start_date
10769: itemkey => l_itemkey,
10770: process => 'RESPONSE_PUBLISH');
10771: l_progress := '060';
10772:
10773: IF (FND_LOG.level_procedure >= FND_LOG.g_current_runtime_level) THEN
10774: FND_LOG.string (log_level => FND_LOG.level_procedure,
10775: module => g_module || l_module_name,
10776: message => 'After CreateProcess ' || g_module || l_module_name
10777: || ', l_progress = ' || l_progress
10770: process => 'RESPONSE_PUBLISH');
10771: l_progress := '060';
10772:
10773: IF (FND_LOG.level_procedure >= FND_LOG.g_current_runtime_level) THEN
10774: FND_LOG.string (log_level => FND_LOG.level_procedure,
10775: module => g_module || l_module_name,
10776: message => 'After CreateProcess ' || g_module || l_module_name
10777: || ', l_progress = ' || l_progress
10778: || ', l_itemtype = ' || l_itemtype
10918:
10919:
10920: l_progress := 'END';
10921:
10922: IF (FND_LOG.level_procedure >= FND_LOG.g_current_runtime_level) THEN
10923: FND_LOG.string (log_level => FND_LOG.level_procedure,
10924: module => g_module || l_module_name,
10925: message => 'Procedure Ends ' || g_module || l_module_name
10926: || ', l_progress = ' || l_progress);
10919:
10920: l_progress := 'END';
10921:
10922: IF (FND_LOG.level_procedure >= FND_LOG.g_current_runtime_level) THEN
10923: FND_LOG.string (log_level => FND_LOG.level_procedure,
10924: module => g_module || l_module_name,
10925: message => 'Procedure Ends ' || g_module || l_module_name
10926: || ', l_progress = ' || l_progress);
10927: END IF;
10928:
10929: UNSET_SESSION_LANGUAGE;
10930:
10931: EXCEPTION WHEN OTHERS THEN
10932: IF (FND_LOG.level_procedure >= FND_LOG.g_current_runtime_level) THEN
10933: FND_LOG.string (log_level => FND_LOG.level_procedure,
10934: module => g_module || l_module_name,
10935: message => 'In Exception Block : ' || g_module || l_module_name
10936: || ', l_progress = ' || l_progress
10929: UNSET_SESSION_LANGUAGE;
10930:
10931: EXCEPTION WHEN OTHERS THEN
10932: IF (FND_LOG.level_procedure >= FND_LOG.g_current_runtime_level) THEN
10933: FND_LOG.string (log_level => FND_LOG.level_procedure,
10934: module => g_module || l_module_name,
10935: message => 'In Exception Block : ' || g_module || l_module_name
10936: || ', l_progress = ' || l_progress
10937: || ', l_auction_header_id = ' || l_auction_header_id);
11162:
11163: l_progress := '000';
11164: l_null_date := null;
11165:
11166: IF (FND_LOG.level_procedure >= FND_LOG.g_current_runtime_level) THEN
11167: FND_LOG.string (log_level => FND_LOG.level_procedure,
11168: module => g_module || l_module_name,
11169: message => 'Entering to Procedure ' || g_module || l_module_name
11170: || ', l_progress = ' || l_progress
11163: l_progress := '000';
11164: l_null_date := null;
11165:
11166: IF (FND_LOG.level_procedure >= FND_LOG.g_current_runtime_level) THEN
11167: FND_LOG.string (log_level => FND_LOG.level_procedure,
11168: module => g_module || l_module_name,
11169: message => 'Entering to Procedure ' || g_module || l_module_name
11170: || ', l_progress = ' || l_progress
11171: || ', p_entryid = ' || p_entryid
11235: AND auh.auction_header_id = pd.pk1_value
11236: AND pad.doctype_id = auh.doctype_id;
11237:
11238: l_progress := '002';
11239: IF (FND_LOG.level_procedure >= FND_LOG.g_current_runtime_level) THEN
11240: FND_LOG.string (log_level => FND_LOG.level_procedure,
11241: module => g_module || l_module_name,
11242: message => 'Negotiation Data retrieved for Document Number: ' || l_doc_number);
11243: END IF;
11236: AND pad.doctype_id = auh.doctype_id;
11237:
11238: l_progress := '002';
11239: IF (FND_LOG.level_procedure >= FND_LOG.g_current_runtime_level) THEN
11240: FND_LOG.string (log_level => FND_LOG.level_procedure,
11241: module => g_module || l_module_name,
11242: message => 'Negotiation Data retrieved for Document Number: ' || l_doc_number);
11243: END IF;
11244:
11623: actid,
11624: 'PON_WF_MESSAGE_NAME');
11625:
11626:
11627: IF (FND_LOG.level_procedure >= FND_LOG.g_current_runtime_level) THEN
11628: FND_LOG.string (log_level => FND_LOG.level_procedure,
11629: module => g_module || l_module_name,
11630: message => 'In ' || g_module || l_module_name
11631: || ', itemtype = ' || itemtype
11624: 'PON_WF_MESSAGE_NAME');
11625:
11626:
11627: IF (FND_LOG.level_procedure >= FND_LOG.g_current_runtime_level) THEN
11628: FND_LOG.string (log_level => FND_LOG.level_procedure,
11629: module => g_module || l_module_name,
11630: message => 'In ' || g_module || l_module_name
11631: || ', itemtype = ' || itemtype
11632: || ', itemkey = ' || itemkey
11703:
11704: EXCEPTION --}
11705: WHEN OTHERS THEN
11706: resultout := PON_WF_UTL_PKG.G_NO;
11707: IF (FND_LOG.level_procedure >= FND_LOG.g_current_runtime_level) THEN
11708: FND_LOG.string (log_level => FND_LOG.level_procedure,
11709: module => g_module || l_module_name,
11710: message => 'Exception Block ' || g_module || l_module_name
11711: || ', l_negotiation_id = ' || l_negotiation_id
11704: EXCEPTION --}
11705: WHEN OTHERS THEN
11706: resultout := PON_WF_UTL_PKG.G_NO;
11707: IF (FND_LOG.level_procedure >= FND_LOG.g_current_runtime_level) THEN
11708: FND_LOG.string (log_level => FND_LOG.level_procedure,
11709: module => g_module || l_module_name,
11710: message => 'Exception Block ' || g_module || l_module_name
11711: || ', l_negotiation_id = ' || l_negotiation_id
11712: || ', l_wf_message_name = ' || l_wf_message_name
11795:
11796: EXCEPTION
11797: WHEN TOO_MANY_ROWS THEN
11798: IF (NVL(FND_PROFILE.VALUE('AFLOG_ENABLED'),'N') = 'Y') THEN
11799: IF (FND_LOG.level_unexpected >= FND_LOG.g_current_runtime_level) THEN
11800: FND_LOG.string(log_level => FND_LOG.level_unexpected,
11801: module => 'pon.plsql.pon_auction_pkg.notify_member 1',
11802: message => 'Multiple Users found for person_party_id:'|| p_userPartyId);
11803: END IF;
11796: EXCEPTION
11797: WHEN TOO_MANY_ROWS THEN
11798: IF (NVL(FND_PROFILE.VALUE('AFLOG_ENABLED'),'N') = 'Y') THEN
11799: IF (FND_LOG.level_unexpected >= FND_LOG.g_current_runtime_level) THEN
11800: FND_LOG.string(log_level => FND_LOG.level_unexpected,
11801: module => 'pon.plsql.pon_auction_pkg.notify_member 1',
11802: message => 'Multiple Users found for person_party_id:'|| p_userPartyId);
11803: END IF;
11804: END IF;
11828:
11829: EXCEPTION
11830: WHEN TOO_MANY_ROWS THEN
11831: IF (NVL(FND_PROFILE.VALUE('AFLOG_ENABLED'),'N') = 'Y') THEN
11832: IF (FND_LOG.level_unexpected >= FND_LOG.g_current_runtime_level) THEN
11833: FND_LOG.string(log_level => FND_LOG.level_unexpected,
11834: module => 'pon.plsql.pon_auction_pkg.notify_member 2',
11835: message => 'Multiple Users found for person_party_id:'|| p_from_id);
11836: END IF;
11829: EXCEPTION
11830: WHEN TOO_MANY_ROWS THEN
11831: IF (NVL(FND_PROFILE.VALUE('AFLOG_ENABLED'),'N') = 'Y') THEN
11832: IF (FND_LOG.level_unexpected >= FND_LOG.g_current_runtime_level) THEN
11833: FND_LOG.string(log_level => FND_LOG.level_unexpected,
11834: module => 'pon.plsql.pon_auction_pkg.notify_member 2',
11835: message => 'Multiple Users found for person_party_id:'|| p_from_id);
11836: END IF;
11837: END IF;
11869: PON_PROFILE_UTIL_PKG.GET_WF_PREFERENCES(l_user_name ,x_language_code,x_territory_code);
11870: END IF;
11871:
11872: IF (x_language_code is not null) THEN
11873: IF (FND_LOG.level_statement >= FND_LOG.g_current_runtime_level) THEN --{
11874: FND_LOG.string(log_level => FND_LOG.level_statement,
11875: module => g_module_prefix || 'EMAIL_LIST',
11876: message => '12. Calling SET_SESSION_LANGUAGE with x_language_code : ' || x_language_code);
11877: END IF; --}
11870: END IF;
11871:
11872: IF (x_language_code is not null) THEN
11873: IF (FND_LOG.level_statement >= FND_LOG.g_current_runtime_level) THEN --{
11874: FND_LOG.string(log_level => FND_LOG.level_statement,
11875: module => g_module_prefix || 'EMAIL_LIST',
11876: message => '12. Calling SET_SESSION_LANGUAGE with x_language_code : ' || x_language_code);
11877: END IF; --}
11878: SET_SESSION_LANGUAGE(null, x_language_code);
11888: x_timezone_disp =>l_timezone_disp);
11889:
11890:
11891: l_progress := '020';
11892: IF (FND_LOG.level_procedure >= FND_LOG.g_current_runtime_level) THEN
11893: FND_LOG.string (log_level => FND_LOG.level_procedure,
11894: module => g_module || l_module_name,
11895: message => 'Negotiation Dates are converted to destination timezone: ' || l_timezone_disp);
11896: END IF;
11889:
11890:
11891: l_progress := '020';
11892: IF (FND_LOG.level_procedure >= FND_LOG.g_current_runtime_level) THEN
11893: FND_LOG.string (log_level => FND_LOG.level_procedure,
11894: module => g_module || l_module_name,
11895: message => 'Negotiation Dates are converted to destination timezone: ' || l_timezone_disp);
11896: END IF;
11897:
11903: token2_value => replaceHtmlChars(p_auction_title));
11904:
11905:
11906: l_progress := '030';
11907: IF (FND_LOG.level_procedure >= FND_LOG.g_current_runtime_level) THEN
11908: FND_LOG.string (log_level => FND_LOG.level_procedure,
11909: module => g_module || l_module_name,
11910: message => 'Disc. Message Subject: ' || l_msg_sent_subject);
11911: END IF;
11904:
11905:
11906: l_progress := '030';
11907: IF (FND_LOG.level_procedure >= FND_LOG.g_current_runtime_level) THEN
11908: FND_LOG.string (log_level => FND_LOG.level_procedure,
11909: module => g_module || l_module_name,
11910: message => 'Disc. Message Subject: ' || l_msg_sent_subject);
11911: END IF;
11912:
11921: l_timezone_nodisp := PON_AUCTION_PKG.getMessage('PON_AUC_PREVIEW_DATE_NOTSPEC');
11922: END IF;
11923:
11924: l_progress := '040';
11925: IF (FND_LOG.level_procedure >= FND_LOG.g_current_runtime_level) THEN
11926: FND_LOG.string (log_level => FND_LOG.level_procedure,
11927: module => g_module || l_module_name,
11928: message => 'Negotiation Preview Date is: ' || p_preview_date);
11929: END IF;
11922: END IF;
11923:
11924: l_progress := '040';
11925: IF (FND_LOG.level_procedure >= FND_LOG.g_current_runtime_level) THEN
11926: FND_LOG.string (log_level => FND_LOG.level_procedure,
11927: module => g_module || l_module_name,
11928: message => 'Negotiation Preview Date is: ' || p_preview_date);
11929: END IF;
11930:
11928: message => 'Negotiation Preview Date is: ' || p_preview_date);
11929: END IF;
11930:
11931: l_progress := '050';
11932: IF (FND_LOG.level_procedure >= FND_LOG.g_current_runtime_level) THEN
11933: FND_LOG.string (log_level => FND_LOG.level_procedure,
11934: module => g_module || l_module_name,
11935: message => 'This is a Point to Point Message');
11936: END IF;
11929: END IF;
11930:
11931: l_progress := '050';
11932: IF (FND_LOG.level_procedure >= FND_LOG.g_current_runtime_level) THEN
11933: FND_LOG.string (log_level => FND_LOG.level_procedure,
11934: module => g_module || l_module_name,
11935: message => 'This is a Point to Point Message');
11936: END IF;
11937:
11936: END IF;
11937:
11938:
11939: l_progress := '060';
11940: IF (FND_LOG.level_procedure >= FND_LOG.g_current_runtime_level) THEN
11941: FND_LOG.string (log_level => FND_LOG.level_procedure,
11942: module => g_module || l_module_name,
11943: message => 'Fetched the Formatted To Name:'|| l_recipient_name ||' , '||'and From Name:'|| l_sender_name);
11944: END IF;
11937:
11938:
11939: l_progress := '060';
11940: IF (FND_LOG.level_procedure >= FND_LOG.g_current_runtime_level) THEN
11941: FND_LOG.string (log_level => FND_LOG.level_procedure,
11942: module => g_module || l_module_name,
11943: message => 'Fetched the Formatted To Name:'|| l_recipient_name ||' , '||'and From Name:'|| l_sender_name);
11944: END IF;
11945:
11971: itemkey => l_itemkey,
11972: process => 'DISC_MESSAGE_SENT');
11973:
11974: l_progress := '070';
11975: IF (FND_LOG.level_procedure >= FND_LOG.g_current_runtime_level) THEN
11976: FND_LOG.string (log_level => FND_LOG.level_procedure,
11977: module => g_module || l_module_name,
11978: message => 'Created the DISC_MESSAGE_SENT Workflow process');
11979: END IF;
11972: process => 'DISC_MESSAGE_SENT');
11973:
11974: l_progress := '070';
11975: IF (FND_LOG.level_procedure >= FND_LOG.g_current_runtime_level) THEN
11976: FND_LOG.string (log_level => FND_LOG.level_procedure,
11977: module => g_module || l_module_name,
11978: message => 'Created the DISC_MESSAGE_SENT Workflow process');
11979: END IF;
11980:
12111:
12112: l_progress := '080';
12113:
12114:
12115: IF (FND_LOG.level_procedure >= FND_LOG.g_current_runtime_level) THEN
12116: FND_LOG.string (log_level => FND_LOG.level_procedure,
12117: module => g_module || l_module_name,
12118: message => 'Procedure Ends ' || g_module || l_module_name
12119: || ', l_progress = ' || l_progress);
12112: l_progress := '080';
12113:
12114:
12115: IF (FND_LOG.level_procedure >= FND_LOG.g_current_runtime_level) THEN
12116: FND_LOG.string (log_level => FND_LOG.level_procedure,
12117: module => g_module || l_module_name,
12118: message => 'Procedure Ends ' || g_module || l_module_name
12119: || ', l_progress = ' || l_progress);
12120: END IF;
12212:
12213: BEGIN
12214:
12215: IF (NVL(FND_PROFILE.VALUE('AFLOG_ENABLED'),'N') = 'Y') THEN
12216: IF (FND_LOG.level_statement >= FND_LOG.g_current_runtime_level) THEN
12217: FND_LOG.string(log_level => FND_LOG.level_statement,
12218: module => 'pon.plsql.pon_auction_pkg.set_preview_date',
12219: message => 'Entered the procedure with params --- ' ||
12220: 'p_itemtype : ' || p_itemtype||
12213: BEGIN
12214:
12215: IF (NVL(FND_PROFILE.VALUE('AFLOG_ENABLED'),'N') = 'Y') THEN
12216: IF (FND_LOG.level_statement >= FND_LOG.g_current_runtime_level) THEN
12217: FND_LOG.string(log_level => FND_LOG.level_statement,
12218: module => 'pon.plsql.pon_auction_pkg.set_preview_date',
12219: message => 'Entered the procedure with params --- ' ||
12220: 'p_itemtype : ' || p_itemtype||
12221: ',p_itemkey : ' ||p_itemkey||
12277: avalue => null);
12278: END IF;
12279:
12280: IF (NVL(FND_PROFILE.VALUE('AFLOG_ENABLED'),'N') = 'Y') THEN
12281: IF (FND_LOG.level_statement >= FND_LOG.g_current_runtime_level) THEN
12282: FND_LOG.string(log_level => FND_LOG.level_statement,
12283: module => 'pon.plsql.pon_auction_pkg.set_preview_date',
12284: message => 'Exiting the procedure');
12285: END IF;
12278: END IF;
12279:
12280: IF (NVL(FND_PROFILE.VALUE('AFLOG_ENABLED'),'N') = 'Y') THEN
12281: IF (FND_LOG.level_statement >= FND_LOG.g_current_runtime_level) THEN
12282: FND_LOG.string(log_level => FND_LOG.level_statement,
12283: module => 'pon.plsql.pon_auction_pkg.set_preview_date',
12284: message => 'Exiting the procedure');
12285: END IF;
12286: END IF;
12297:
12298: BEGIN
12299:
12300: IF (NVL(FND_PROFILE.VALUE('AFLOG_ENABLED'),'N') = 'Y') THEN
12301: IF (FND_LOG.level_statement >= FND_LOG.g_current_runtime_level) THEN
12302: FND_LOG.string(log_level => FND_LOG.level_statement,
12303: module => 'pon.plsql.pon_auction_pkg.set_open_date',
12304: message => 'Entered the procedure with params --- ' ||
12305: 'p_itemtype : ' || p_itemtype||
12298: BEGIN
12299:
12300: IF (NVL(FND_PROFILE.VALUE('AFLOG_ENABLED'),'N') = 'Y') THEN
12301: IF (FND_LOG.level_statement >= FND_LOG.g_current_runtime_level) THEN
12302: FND_LOG.string(log_level => FND_LOG.level_statement,
12303: module => 'pon.plsql.pon_auction_pkg.set_open_date',
12304: message => 'Entered the procedure with params --- ' ||
12305: 'p_itemtype : ' || p_itemtype||
12306: ',p_itemkey : ' ||p_itemkey||
12362:
12363: END IF;
12364:
12365: IF (NVL(FND_PROFILE.VALUE('AFLOG_ENABLED'),'N') = 'Y') THEN
12366: IF (FND_LOG.level_statement >= FND_LOG.g_current_runtime_level) THEN
12367: FND_LOG.string(log_level => FND_LOG.level_statement,
12368: module => 'pon.plsql.pon_auction_pkg.set_open_date',
12369: message => 'Exiting the procedure');
12370: END IF;
12363: END IF;
12364:
12365: IF (NVL(FND_PROFILE.VALUE('AFLOG_ENABLED'),'N') = 'Y') THEN
12366: IF (FND_LOG.level_statement >= FND_LOG.g_current_runtime_level) THEN
12367: FND_LOG.string(log_level => FND_LOG.level_statement,
12368: module => 'pon.plsql.pon_auction_pkg.set_open_date',
12369: message => 'Exiting the procedure');
12370: END IF;
12371: END IF;
12381:
12382: BEGIN
12383:
12384: IF (NVL(FND_PROFILE.VALUE('AFLOG_ENABLED'),'N') = 'Y') THEN
12385: IF (FND_LOG.level_statement >= FND_LOG.g_current_runtime_level) THEN
12386: FND_LOG.string(log_level => FND_LOG.level_statement,
12387: module => 'pon.plsql.pon_auction_pkg.set_close_date',
12388: message => 'Entered the procedure with params --- ' ||
12389: 'p_itemtype : ' || p_itemtype||
12382: BEGIN
12383:
12384: IF (NVL(FND_PROFILE.VALUE('AFLOG_ENABLED'),'N') = 'Y') THEN
12385: IF (FND_LOG.level_statement >= FND_LOG.g_current_runtime_level) THEN
12386: FND_LOG.string(log_level => FND_LOG.level_statement,
12387: module => 'pon.plsql.pon_auction_pkg.set_close_date',
12388: message => 'Entered the procedure with params --- ' ||
12389: 'p_itemtype : ' || p_itemtype||
12390: ',p_itemkey : ' ||p_itemkey||
12430: END IF;
12431:
12432:
12433: IF (NVL(FND_PROFILE.VALUE('AFLOG_ENABLED'),'N') = 'Y') THEN
12434: IF (FND_LOG.level_statement >= FND_LOG.g_current_runtime_level) THEN
12435: FND_LOG.string(log_level => FND_LOG.level_statement,
12436: module => 'pon.plsql.pon_auction_pkg.set_close_date',
12437: message => 'Exiting the procedure');
12438: END IF;
12431:
12432:
12433: IF (NVL(FND_PROFILE.VALUE('AFLOG_ENABLED'),'N') = 'Y') THEN
12434: IF (FND_LOG.level_statement >= FND_LOG.g_current_runtime_level) THEN
12435: FND_LOG.string(log_level => FND_LOG.level_statement,
12436: module => 'pon.plsql.pon_auction_pkg.set_close_date',
12437: message => 'Exiting the procedure');
12438: END IF;
12439: END IF;
12473: v_temp NUMBER;
12474:
12475: BEGIN
12476:
12477: IF (FND_LOG.level_statement >= FND_LOG.g_current_runtime_level) THEN
12478: FND_LOG.string(log_level => FND_LOG.level_statement,
12479: module => g_module_prefix || '.get_negotiation_details',
12480: message => 'Entered the procedure ' ||
12481: 'p_auction_header_id = ' || p_auction_header_id ||
12474:
12475: BEGIN
12476:
12477: IF (FND_LOG.level_statement >= FND_LOG.g_current_runtime_level) THEN
12478: FND_LOG.string(log_level => FND_LOG.level_statement,
12479: module => g_module_prefix || '.get_negotiation_details',
12480: message => 'Entered the procedure ' ||
12481: 'p_auction_header_id = ' || p_auction_header_id ||
12482: ', p_trading_partner_contact_id = ' || p_user_trading_partner_id);
12508: x_carrier := PON_PRINTING_PKG.GET_CARRIER_DESCRIPTION(v_org_id,v_carrier_code);
12509: x_unlocked_by_display := PON_LOCALE_PKG.GET_PARTY_DISPLAY_NAME(v_sealed_unlock_tp_contact_id);
12510: x_unsealed_by_display := PON_LOCALE_PKG.GET_PARTY_DISPLAY_NAME(v_sealed_unseal_tp_contact_id);
12511:
12512: IF (FND_LOG.level_statement >= FND_LOG.g_current_runtime_level) THEN
12513: FND_LOG.string( log_level => FND_LOG.level_statement,
12514: module => g_module_prefix || '.get_negotiation_details',
12515: message => 'x_time_left = ' || x_time_left
12516: || ', x_buyer_display = ' || x_buyer_display
12509: x_unlocked_by_display := PON_LOCALE_PKG.GET_PARTY_DISPLAY_NAME(v_sealed_unlock_tp_contact_id);
12510: x_unsealed_by_display := PON_LOCALE_PKG.GET_PARTY_DISPLAY_NAME(v_sealed_unseal_tp_contact_id);
12511:
12512: IF (FND_LOG.level_statement >= FND_LOG.g_current_runtime_level) THEN
12513: FND_LOG.string( log_level => FND_LOG.level_statement,
12514: module => g_module_prefix || '.get_negotiation_details',
12515: message => 'x_time_left = ' || x_time_left
12516: || ', x_buyer_display = ' || x_buyer_display
12517: || ', x_carrier = ' || x_carrier
12588: x_is_paused
12589: FROM
12590: DUAL;
12591:
12592: IF (FND_LOG.level_statement >= FND_LOG.g_current_runtime_level) THEN
12593: FND_LOG.string (log_level => FND_LOG.level_statement,
12594: module => g_module_prefix || '.get_negotiation_details',
12595: message => 'x_has_active_company_bid = ' || x_has_active_company_bid
12596: || ' x_is_multi_site = ' || x_is_multi_site
12589: FROM
12590: DUAL;
12591:
12592: IF (FND_LOG.level_statement >= FND_LOG.g_current_runtime_level) THEN
12593: FND_LOG.string (log_level => FND_LOG.level_statement,
12594: module => g_module_prefix || '.get_negotiation_details',
12595: message => 'x_has_active_company_bid = ' || x_has_active_company_bid
12596: || ' x_is_multi_site = ' || x_is_multi_site
12597: || ' x_all_site_bid_on = ' || x_all_site_bid_on
12624: AND pspay.pay_item_type(+) ='RATE'
12625: AND fl_pay_item.lookup_type(+) = 'PAYMENT TYPE'
12626: AND fl_pay_item.lookup_code(+) = pspay.pay_item_type;
12627:
12628: IF (FND_LOG.level_statement >= FND_LOG.g_current_runtime_level) THEN
12629: FND_LOG.string (log_level => FND_LOG.level_statement,
12630: module => g_module_prefix || '.get_negotiation_details',
12631: message => 'x_outcome_display = ' || x_outcome_display
12632: || ' x_advances_flag = ' || x_advances_flag
12625: AND fl_pay_item.lookup_type(+) = 'PAYMENT TYPE'
12626: AND fl_pay_item.lookup_code(+) = pspay.pay_item_type;
12627:
12628: IF (FND_LOG.level_statement >= FND_LOG.g_current_runtime_level) THEN
12629: FND_LOG.string (log_level => FND_LOG.level_statement,
12630: module => g_module_prefix || '.get_negotiation_details',
12631: message => 'x_outcome_display = ' || x_outcome_display
12632: || ' x_advances_flag = ' || x_advances_flag
12633: || ' x_retainage_flag = ' || x_retainage_flag
12664: v_time_remaining number; -- to store the time remaining for auction to close
12665: l_show_countdown varchar2(1) := 'N'; -- return value, default 'N'
12666:
12667: BEGIN
12668: IF (FND_LOG.level_statement >= FND_LOG.g_current_runtime_level) THEN
12669: FND_LOG.string (log_level => FND_LOG.level_statement,
12670: module => g_module_prefix || '.show_countdown',
12671: message => 'Entered show_countdown with p_auction_header_id = ' || p_auction_header_id);
12672: END IF;
12665: l_show_countdown varchar2(1) := 'N'; -- return value, default 'N'
12666:
12667: BEGIN
12668: IF (FND_LOG.level_statement >= FND_LOG.g_current_runtime_level) THEN
12669: FND_LOG.string (log_level => FND_LOG.level_statement,
12670: module => g_module_prefix || '.show_countdown',
12671: message => 'Entered show_countdown with p_auction_header_id = ' || p_auction_header_id);
12672: END IF;
12673:
12680: FROM pon_auction_headers_all
12681: WHERE auction_header_id = p_auction_header_id
12682: AND open_bidding_date < sysdate;
12683:
12684: IF (FND_LOG.level_statement >= FND_LOG.g_current_runtime_level) THEN
12685: FND_LOG.string (log_level => FND_LOG.level_statement,
12686: module => g_module_prefix || '.show_countdown',
12687: message => 'p_auction_header_id = ' || p_auction_header_id
12688: || ', v_auction_status = ' || v_auction_status
12681: WHERE auction_header_id = p_auction_header_id
12682: AND open_bidding_date < sysdate;
12683:
12684: IF (FND_LOG.level_statement >= FND_LOG.g_current_runtime_level) THEN
12685: FND_LOG.string (log_level => FND_LOG.level_statement,
12686: module => g_module_prefix || '.show_countdown',
12687: message => 'p_auction_header_id = ' || p_auction_header_id
12688: || ', v_auction_status = ' || v_auction_status
12689: || ', v_time_remaining = ' || v_time_remaining);
12702: ELSE -- more than 24 hours left
12703: l_show_countdown := 'N';
12704: END IF;
12705:
12706: IF (FND_LOG.level_statement >= FND_LOG.g_current_runtime_level) THEN
12707: FND_LOG.string (log_level => FND_LOG.level_statement,
12708: module => g_module_prefix || '.show_countdown',
12709: message => 'Returning l_show_countdown = ' || l_show_countdown);
12710: END IF;
12703: l_show_countdown := 'N';
12704: END IF;
12705:
12706: IF (FND_LOG.level_statement >= FND_LOG.g_current_runtime_level) THEN
12707: FND_LOG.string (log_level => FND_LOG.level_statement,
12708: module => g_module_prefix || '.show_countdown',
12709: message => 'Returning l_show_countdown = ' || l_show_countdown);
12710: END IF;
12711:
12714:
12715: EXCEPTION
12716: WHEN NO_DATA_FOUND THEN -- auction is in preview mode, return 'N'
12717: l_show_countdown := 'N';
12718: IF (FND_LOG.level_statement >= FND_LOG.g_current_runtime_level) THEN
12719: FND_LOG.string (log_level => FND_LOG.level_statement,
12720: module => g_module_prefix || '.show_countdown',
12721: message => 'Returning l_show_countdown = ' || l_show_countdown);
12722: END IF;
12715: EXCEPTION
12716: WHEN NO_DATA_FOUND THEN -- auction is in preview mode, return 'N'
12717: l_show_countdown := 'N';
12718: IF (FND_LOG.level_statement >= FND_LOG.g_current_runtime_level) THEN
12719: FND_LOG.string (log_level => FND_LOG.level_statement,
12720: module => g_module_prefix || '.show_countdown',
12721: message => 'Returning l_show_countdown = ' || l_show_countdown);
12722: END IF;
12723: Return l_show_countdown;
12726: x_result := FND_API.G_RET_STS_UNEXP_ERROR;
12727: x_error_code := SQLCODE;
12728: x_error_message := SUBSTR(SQLERRM, 1, 100);
12729:
12730: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.g_current_runtime_level) THEN
12731: FND_LOG.string (log_level => FND_LOG.level_exception,
12732: module => g_module_prefix || '.show_countdown',
12733: message => 'Exception occured in show_countdown'
12734: || ' Error Number :' || SQLCODE || ' Exception Message :' || SUBSTR(SQLERRM, 1, 200) );
12727: x_error_code := SQLCODE;
12728: x_error_message := SUBSTR(SQLERRM, 1, 100);
12729:
12730: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.g_current_runtime_level) THEN
12731: FND_LOG.string (log_level => FND_LOG.level_exception,
12732: module => g_module_prefix || '.show_countdown',
12733: message => 'Exception occured in show_countdown'
12734: || ' Error Number :' || SQLCODE || ' Exception Message :' || SUBSTR(SQLERRM, 1, 200) );
12735: END IF;
12768: v_ext_all_lines varchar2(1); -- whether auto extend all lines
12769: l_flag varchar2(1) := 'N'; -- Return value defaulted to 'N'
12770: BEGIN
12771:
12772: IF (FND_LOG.level_statement >= FND_LOG.g_current_runtime_level) THEN
12773: FND_LOG.string (log_level => FND_LOG.level_statement,
12774: module => g_module_prefix || '.has_distinct_closing_dates',
12775: message => 'Entered has_distinct_closing_dates with p_auction_header_id = ' || p_auction_header_id);
12776: END IF;
12769: l_flag varchar2(1) := 'N'; -- Return value defaulted to 'N'
12770: BEGIN
12771:
12772: IF (FND_LOG.level_statement >= FND_LOG.g_current_runtime_level) THEN
12773: FND_LOG.string (log_level => FND_LOG.level_statement,
12774: module => g_module_prefix || '.has_distinct_closing_dates',
12775: message => 'Entered has_distinct_closing_dates with p_auction_header_id = ' || p_auction_header_id);
12776: END IF;
12777:
12785: INTO v_time_left, v_is_staggered, v_ext_all_lines
12786: FROM pon_auction_headers_all
12787: WHERE auction_header_id = p_auction_header_id;
12788:
12789: IF (FND_LOG.level_statement >= FND_LOG.g_current_runtime_level) THEN
12790: FND_LOG.string (log_level => FND_LOG.level_statement,
12791: module => g_module_prefix || '.has_distinct_closing_dates',
12792: message => 'p_auction_header_id = ' || p_auction_header_id
12793: || ', v_time_left = ' || v_time_left
12786: FROM pon_auction_headers_all
12787: WHERE auction_header_id = p_auction_header_id;
12788:
12789: IF (FND_LOG.level_statement >= FND_LOG.g_current_runtime_level) THEN
12790: FND_LOG.string (log_level => FND_LOG.level_statement,
12791: module => g_module_prefix || '.has_distinct_closing_dates',
12792: message => 'p_auction_header_id = ' || p_auction_header_id
12793: || ', v_time_left = ' || v_time_left
12794: || ', v_is_staggered = ' || v_is_staggered
12804: ELSE
12805: l_flag := 'N';
12806: END IF;
12807:
12808: IF (FND_LOG.level_statement >= FND_LOG.g_current_runtime_level) THEN
12809: FND_LOG.string (log_level => FND_LOG.level_statement,
12810: module => g_module_prefix || '.has_distinct_closing_dates',
12811: message => 'Returning l_flag = ' || l_flag);
12812: END IF;
12805: l_flag := 'N';
12806: END IF;
12807:
12808: IF (FND_LOG.level_statement >= FND_LOG.g_current_runtime_level) THEN
12809: FND_LOG.string (log_level => FND_LOG.level_statement,
12810: module => g_module_prefix || '.has_distinct_closing_dates',
12811: message => 'Returning l_flag = ' || l_flag);
12812: END IF;
12813:
12818: x_result := FND_API.G_RET_STS_UNEXP_ERROR;
12819: x_error_code := SQLCODE;
12820: x_error_message := SUBSTR(SQLERRM, 1, 100);
12821:
12822: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.g_current_runtime_level) THEN
12823: FND_LOG.string (log_level => FND_LOG.level_exception,
12824: module => g_module_prefix || '.has_distinct_closing_dates',
12825: message => 'Exception occured in has_distinct_closing_dates'
12826: || ' Error Number :' || SQLCODE || ' Exception Message :' || SUBSTR(SQLERRM, 1, 200) );
12819: x_error_code := SQLCODE;
12820: x_error_message := SUBSTR(SQLERRM, 1, 100);
12821:
12822: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.g_current_runtime_level) THEN
12823: FND_LOG.string (log_level => FND_LOG.level_exception,
12824: module => g_module_prefix || '.has_distinct_closing_dates',
12825: message => 'Exception occured in has_distinct_closing_dates'
12826: || ' Error Number :' || SQLCODE || ' Exception Message :' || SUBSTR(SQLERRM, 1, 200) );
12827: END IF;
12854:
12855: -- update g_tp_cache_rec from the cache
12856: update_cache_rec;
12857:
12858: IF (FND_LOG.level_statement >= FND_LOG.g_current_runtime_level) THEN
12859: FND_LOG.string (log_level => FND_LOG.level_statement,
12860: module => g_module_prefix || '.get_technical_meaning',
12861: message => 'Returning technical_meaning = ' || g_tp_cache_rec.technical_meaning);
12862: END IF;
12855: -- update g_tp_cache_rec from the cache
12856: update_cache_rec;
12857:
12858: IF (FND_LOG.level_statement >= FND_LOG.g_current_runtime_level) THEN
12859: FND_LOG.string (log_level => FND_LOG.level_statement,
12860: module => g_module_prefix || '.get_technical_meaning',
12861: message => 'Returning technical_meaning = ' || g_tp_cache_rec.technical_meaning);
12862: END IF;
12863:
12864: -- return technical_meaning
12865: return g_tp_cache_rec.technical_meaning;
12866: EXCEPTION
12867: WHEN OTHERS THEN
12868: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.g_current_runtime_level) THEN
12869: FND_LOG.string (log_level => FND_LOG.level_exception,
12870: module => g_module_prefix || '.get_technical_meaning',
12871: message => 'Exception occured in get_technical_meaning'
12872: || ' Error Number :' || SQLCODE || ' Exception Message :' || SUBSTR(SQLERRM, 1, 200) );
12865: return g_tp_cache_rec.technical_meaning;
12866: EXCEPTION
12867: WHEN OTHERS THEN
12868: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.g_current_runtime_level) THEN
12869: FND_LOG.string (log_level => FND_LOG.level_exception,
12870: module => g_module_prefix || '.get_technical_meaning',
12871: message => 'Exception occured in get_technical_meaning'
12872: || ' Error Number :' || SQLCODE || ' Exception Message :' || SUBSTR(SQLERRM, 1, 200) );
12873: END IF;
12900:
12901: -- update g_tp_cache_rec from the cache
12902: update_cache_rec;
12903:
12904: IF (FND_LOG.level_statement >= FND_LOG.g_current_runtime_level) THEN
12905: FND_LOG.string (log_level => FND_LOG.level_statement,
12906: module => g_module_prefix || '.get_commercial_meaning',
12907: message => 'Returning commercial_meaning = ' || g_tp_cache_rec.commercial_meaning);
12908: END IF;
12901: -- update g_tp_cache_rec from the cache
12902: update_cache_rec;
12903:
12904: IF (FND_LOG.level_statement >= FND_LOG.g_current_runtime_level) THEN
12905: FND_LOG.string (log_level => FND_LOG.level_statement,
12906: module => g_module_prefix || '.get_commercial_meaning',
12907: message => 'Returning commercial_meaning = ' || g_tp_cache_rec.commercial_meaning);
12908: END IF;
12909:
12910: -- return commercial_meaning
12911: return g_tp_cache_rec.commercial_meaning;
12912: EXCEPTION
12913: WHEN OTHERS THEN
12914: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.g_current_runtime_level) THEN
12915: FND_LOG.string (log_level => FND_LOG.level_exception,
12916: module => g_module_prefix || '.get_commercial_meaning',
12917: message => 'Exception occured in get_commercial_meaning'
12918: || ' Error Number :' || SQLCODE || ' Exception Message :' || SUBSTR(SQLERRM, 1, 200) );
12911: return g_tp_cache_rec.commercial_meaning;
12912: EXCEPTION
12913: WHEN OTHERS THEN
12914: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.g_current_runtime_level) THEN
12915: FND_LOG.string (log_level => FND_LOG.level_exception,
12916: module => g_module_prefix || '.get_commercial_meaning',
12917: message => 'Exception occured in get_commercial_meaning'
12918: || ' Error Number :' || SQLCODE || ' Exception Message :' || SUBSTR(SQLERRM, 1, 200) );
12919: END IF;
12963: l_document_number pon_auction_headers_all.document_number%TYPE;
12964: l_trading_partner_name pon_auction_headers_all.trading_partner_name%TYPE;
12965:
12966: BEGIN
12967: IF (FND_LOG.level_statement >= FND_LOG.g_current_runtime_level) THEN
12968: FND_LOG.string (log_level => FND_LOG.level_statement,
12969: module => g_module_prefix || '.notify_bidders_tech_complete',
12970: message => 'Entered notify_bidders_tech_complete with p_auction_header_id = ' || p_auction_header_id);
12971: END IF;
12964: l_trading_partner_name pon_auction_headers_all.trading_partner_name%TYPE;
12965:
12966: BEGIN
12967: IF (FND_LOG.level_statement >= FND_LOG.g_current_runtime_level) THEN
12968: FND_LOG.string (log_level => FND_LOG.level_statement,
12969: module => g_module_prefix || '.notify_bidders_tech_complete',
12970: message => 'Entered notify_bidders_tech_complete with p_auction_header_id = ' || p_auction_header_id);
12971: END IF;
12972:
12983: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
12984: x_error_code := SQLCODE;
12985: x_error_message := SUBSTR(SQLERRM, 1, 100);
12986:
12987: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.g_current_runtime_level) THEN
12988: FND_LOG.string (log_level => FND_LOG.level_exception,
12989: module => g_module_prefix || '.notify_bidders_tech_complete',
12990: message => 'NO_DATA_FOUND in pon_auction_headers_all for p_auction_header_id :'
12991: || p_auction_header_id || ' Error Number :' || SQLCODE || ' Exception Message :' || SUBSTR(SQLERRM, 1, 200) );
12984: x_error_code := SQLCODE;
12985: x_error_message := SUBSTR(SQLERRM, 1, 100);
12986:
12987: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.g_current_runtime_level) THEN
12988: FND_LOG.string (log_level => FND_LOG.level_exception,
12989: module => g_module_prefix || '.notify_bidders_tech_complete',
12990: message => 'NO_DATA_FOUND in pon_auction_headers_all for p_auction_header_id :'
12991: || p_auction_header_id || ' Error Number :' || SQLCODE || ' Exception Message :' || SUBSTR(SQLERRM, 1, 200) );
12992: END IF;
12995: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
12996: x_error_code := SQLCODE;
12997: x_error_message := SUBSTR(SQLERRM, 1, 100);
12998:
12999: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.g_current_runtime_level) THEN
13000: FND_LOG.string (log_level => FND_LOG.level_exception,
13001: module => g_module_prefix || '.notify_bidders_tech_complete',
13002: message => 'TOO_MANY_ROWS in pon_auction_headers_all for p_auction_header_id :'
13003: || p_auction_header_id || ' Error Number :' || SQLCODE || ' Exception Message :' || SUBSTR(SQLERRM, 1, 200) );
12996: x_error_code := SQLCODE;
12997: x_error_message := SUBSTR(SQLERRM, 1, 100);
12998:
12999: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.g_current_runtime_level) THEN
13000: FND_LOG.string (log_level => FND_LOG.level_exception,
13001: module => g_module_prefix || '.notify_bidders_tech_complete',
13002: message => 'TOO_MANY_ROWS in pon_auction_headers_all for p_auction_header_id :'
13003: || p_auction_header_id || ' Error Number :' || SQLCODE || ' Exception Message :' || SUBSTR(SQLERRM, 1, 200) );
13004: END IF;
13007: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
13008: x_error_code := SQLCODE;
13009: x_error_message := SUBSTR(SQLERRM, 1, 100);
13010:
13011: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.g_current_runtime_level) THEN
13012: FND_LOG.string (log_level => FND_LOG.level_exception,
13013: module => g_module_prefix || '.notify_bidders_tech_complete',
13014: message => 'Exception occured in notify_bidders_tech_complete'
13015: || ' Error Number :' || SQLCODE || ' Exception Message :' || SUBSTR(SQLERRM, 1, 200) );
13008: x_error_code := SQLCODE;
13009: x_error_message := SUBSTR(SQLERRM, 1, 100);
13010:
13011: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.g_current_runtime_level) THEN
13012: FND_LOG.string (log_level => FND_LOG.level_exception,
13013: module => g_module_prefix || '.notify_bidders_tech_complete',
13014: message => 'Exception occured in notify_bidders_tech_complete'
13015: || ' Error Number :' || SQLCODE || ' Exception Message :' || SUBSTR(SQLERRM, 1, 200) );
13016: END IF;
13032: wf_engine.CreateProcess(itemtype => x_item_type,
13033: itemkey => x_item_key,
13034: process => 'PON_TECH_SHORTLIST_NOTIFY');
13035:
13036: IF (FND_LOG.level_statement >= FND_LOG.g_current_runtime_level) THEN
13037: FND_LOG.string (log_level => FND_LOG.level_statement,
13038: module => g_module_prefix || '.notify_bidders_tech_complete',
13039: message => 'Created workflow process with itemtype = ' || x_item_type || ' and itemkey = '
13040: || x_item_key);
13033: itemkey => x_item_key,
13034: process => 'PON_TECH_SHORTLIST_NOTIFY');
13035:
13036: IF (FND_LOG.level_statement >= FND_LOG.g_current_runtime_level) THEN
13037: FND_LOG.string (log_level => FND_LOG.level_statement,
13038: module => g_module_prefix || '.notify_bidders_tech_complete',
13039: message => 'Created workflow process with itemtype = ' || x_item_type || ' and itemkey = '
13040: || x_item_key);
13041: END IF;
13099: itemkey => x_item_key,
13100: aname => 'ORIGIN_USER_NAME',
13101: avalue => fnd_global.user_name);
13102:
13103: IF (FND_LOG.level_statement >= FND_LOG.g_current_runtime_level) THEN
13104: FND_LOG.string (log_level => FND_LOG.level_statement,
13105: module => g_module_prefix || '.notify_bidders_tech_complete',
13106: message => ' Passed these attributes -- BIDDER_TP_CONTACT_NAME :' || l_bidder_name ||
13107: ' PREPARER_TP_NAME :' || l_trading_partner_name || ' AUCTION_ID :' || p_auction_header_id ||
13100: aname => 'ORIGIN_USER_NAME',
13101: avalue => fnd_global.user_name);
13102:
13103: IF (FND_LOG.level_statement >= FND_LOG.g_current_runtime_level) THEN
13104: FND_LOG.string (log_level => FND_LOG.level_statement,
13105: module => g_module_prefix || '.notify_bidders_tech_complete',
13106: message => ' Passed these attributes -- BIDDER_TP_CONTACT_NAME :' || l_bidder_name ||
13107: ' PREPARER_TP_NAME :' || l_trading_partner_name || ' AUCTION_ID :' || p_auction_header_id ||
13108: ' BID_ID :' || bidder.bid_number || ' AUCTION_TITLE :' || l_auction_title ||
13113: -- start the workflow
13114: wf_engine.StartProcess( itemtype => x_item_type,
13115: itemkey => x_item_key);
13116:
13117: IF (FND_LOG.level_statement >= FND_LOG.g_current_runtime_level) THEN
13118: FND_LOG.string (log_level => FND_LOG.level_statement,
13119: module => g_module_prefix || '.notify_bidders_tech_complete',
13120: message => ' Workflow process started');
13121: END IF;
13114: wf_engine.StartProcess( itemtype => x_item_type,
13115: itemkey => x_item_key);
13116:
13117: IF (FND_LOG.level_statement >= FND_LOG.g_current_runtime_level) THEN
13118: FND_LOG.string (log_level => FND_LOG.level_statement,
13119: module => g_module_prefix || '.notify_bidders_tech_complete',
13120: message => ' Workflow process started');
13121: END IF;
13122:
13127: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
13128: x_error_code := SQLCODE;
13129: x_error_message := SUBSTR(SQLERRM, 1, 100);
13130:
13131: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.g_current_runtime_level) THEN
13132: FND_LOG.string (log_level => FND_LOG.level_exception,
13133: module => g_module_prefix || '.notify_bidders_tech_complete',
13134: message => 'Exception occured in notify_bidders_tech_complete'
13135: || ' Error Number :' || SQLCODE || ' Exception Message :' || SUBSTR(SQLERRM, 1, 200) );
13128: x_error_code := SQLCODE;
13129: x_error_message := SUBSTR(SQLERRM, 1, 100);
13130:
13131: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.g_current_runtime_level) THEN
13132: FND_LOG.string (log_level => FND_LOG.level_exception,
13133: module => g_module_prefix || '.notify_bidders_tech_complete',
13134: message => 'Exception occured in notify_bidders_tech_complete'
13135: || ' Error Number :' || SQLCODE || ' Exception Message :' || SUBSTR(SQLERRM, 1, 200) );
13136: END IF;
13158: l_commercial_lock_meaning VARCHAR2(30);
13159:
13160: BEGIN
13161:
13162: IF (FND_LOG.level_statement>= FND_LOG.g_current_runtime_level) THEN
13163: FND_LOG.string(log_level => FND_LOG.level_statement,
13164: module => g_module_prefix || 'GET_AUCTION_STATUS_DISPLAY',
13165: message => 'Entering the function with params -- p_auction_header_id = ' || p_auction_header_id
13166: || ' p_user_trading_partner_id = ' || p_user_trading_partner_id
13159:
13160: BEGIN
13161:
13162: IF (FND_LOG.level_statement>= FND_LOG.g_current_runtime_level) THEN
13163: FND_LOG.string(log_level => FND_LOG.level_statement,
13164: module => g_module_prefix || 'GET_AUCTION_STATUS_DISPLAY',
13165: message => 'Entering the function with params -- p_auction_header_id = ' || p_auction_header_id
13166: || ' p_user_trading_partner_id = ' || p_user_trading_partner_id
13167: );
13189: l_award_status
13190: FROM pon_auction_headers_all
13191: WHERE auction_header_id = p_auction_header_id;
13192:
13193: IF (FND_LOG.level_statement>= FND_LOG.g_current_runtime_level) THEN
13194: FND_LOG.string(log_level => FND_LOG.level_statement,
13195: module => g_module_prefix || 'GET_AUCTION_STATUS_DISPLAY',
13196: message => 'l_two_part_flag = ' || l_two_part_flag
13197: || ' l_technical_lock_status = ' || l_technical_lock_status
13190: FROM pon_auction_headers_all
13191: WHERE auction_header_id = p_auction_header_id;
13192:
13193: IF (FND_LOG.level_statement>= FND_LOG.g_current_runtime_level) THEN
13194: FND_LOG.string(log_level => FND_LOG.level_statement,
13195: module => g_module_prefix || 'GET_AUCTION_STATUS_DISPLAY',
13196: message => 'l_two_part_flag = ' || l_two_part_flag
13197: || ' l_technical_lock_status = ' || l_technical_lock_status
13198: || ' l_technical_evaluation_status = ' || l_technical_evaluation_status
13229:
13230: THEN --{
13231: -- comes here when we should show the status old style.
13232: -- check if it is buyer
13233: IF (FND_LOG.level_statement>= FND_LOG.g_current_runtime_level) THEN
13234: FND_LOG.string(log_level => FND_LOG.level_statement,
13235: module => g_module_prefix || 'GET_AUCTION_STATUS_DISPLAY',
13236: message => 'Old style status has to be shown for this auction'
13237: );
13230: THEN --{
13231: -- comes here when we should show the status old style.
13232: -- check if it is buyer
13233: IF (FND_LOG.level_statement>= FND_LOG.g_current_runtime_level) THEN
13234: FND_LOG.string(log_level => FND_LOG.level_statement,
13235: module => g_module_prefix || 'GET_AUCTION_STATUS_DISPLAY',
13236: message => 'Old style status has to be shown for this auction'
13237: );
13238: END IF;
13238: END IF;
13239:
13240: IF (l_is_buyer) THEN
13241:
13242: IF (FND_LOG.level_statement>= FND_LOG.g_current_runtime_level) THEN
13243: FND_LOG.string(log_level => FND_LOG.level_statement,
13244: module => g_module_prefix || 'GET_AUCTION_STATUS_DISPLAY',
13245: message => '1. Buyer Status'
13246: );
13239:
13240: IF (l_is_buyer) THEN
13241:
13242: IF (FND_LOG.level_statement>= FND_LOG.g_current_runtime_level) THEN
13243: FND_LOG.string(log_level => FND_LOG.level_statement,
13244: module => g_module_prefix || 'GET_AUCTION_STATUS_DISPLAY',
13245: message => '1. Buyer Status'
13246: );
13247: END IF;
13266: WHERE pav.auction_header_id = p_auction_header_id
13267: AND fl.lookup_type = 'PON_AUCTION_STATUS'
13268: AND fl.lookup_code = pav.negotiation_status;
13269:
13270: IF (FND_LOG.level_statement>= FND_LOG.g_current_runtime_level) THEN
13271: FND_LOG.string(log_level => FND_LOG.level_statement,
13272: module => g_module_prefix || 'GET_AUCTION_STATUS_DISPLAY',
13273: message => 'l_buyer_meaning : ' || l_buyer_meaning
13274: || '; l_buyer_sealed_meaning = ' || l_buyer_sealed_meaning
13267: AND fl.lookup_type = 'PON_AUCTION_STATUS'
13268: AND fl.lookup_code = pav.negotiation_status;
13269:
13270: IF (FND_LOG.level_statement>= FND_LOG.g_current_runtime_level) THEN
13271: FND_LOG.string(log_level => FND_LOG.level_statement,
13272: module => g_module_prefix || 'GET_AUCTION_STATUS_DISPLAY',
13273: message => 'l_buyer_meaning : ' || l_buyer_meaning
13274: || '; l_buyer_sealed_meaning = ' || l_buyer_sealed_meaning
13275: );
13276: END IF;
13277: -- set up message
13278: l_message := l_buyer_meaning || l_buyer_sealed_meaning;
13279:
13280: IF (FND_LOG.level_statement>= FND_LOG.g_current_runtime_level) THEN
13281: FND_LOG.string(log_level => FND_LOG.level_statement,
13282: module => g_module_prefix || 'GET_AUCTION_STATUS_DISPLAY',
13283: message => 'l_message : ' || l_message
13284: );
13277: -- set up message
13278: l_message := l_buyer_meaning || l_buyer_sealed_meaning;
13279:
13280: IF (FND_LOG.level_statement>= FND_LOG.g_current_runtime_level) THEN
13281: FND_LOG.string(log_level => FND_LOG.level_statement,
13282: module => g_module_prefix || 'GET_AUCTION_STATUS_DISPLAY',
13283: message => 'l_message : ' || l_message
13284: );
13285: END IF;
13288:
13289: -- not a buyer, generate message for supplier
13290: ELSE
13291:
13292: IF (FND_LOG.level_statement>= FND_LOG.g_current_runtime_level) THEN
13293: FND_LOG.string(log_level => FND_LOG.level_statement,
13294: module => g_module_prefix || 'GET_AUCTION_STATUS_DISPLAY',
13295: message => '3. Supplier Status'
13296: );
13289: -- not a buyer, generate message for supplier
13290: ELSE
13291:
13292: IF (FND_LOG.level_statement>= FND_LOG.g_current_runtime_level) THEN
13293: FND_LOG.string(log_level => FND_LOG.level_statement,
13294: module => g_module_prefix || 'GET_AUCTION_STATUS_DISPLAY',
13295: message => '3. Supplier Status'
13296: );
13297: END IF;
13314: WHERE pav.auction_header_id = p_auction_header_id
13315: AND fl.lookup_type = 'PON_AUCTION_STATUS'
13316: AND fl.lookup_code = pav.suppl_negotiation_status;
13317:
13318: IF (FND_LOG.level_statement>= FND_LOG.g_current_runtime_level) THEN
13319: FND_LOG.string(log_level => FND_LOG.level_statement,
13320: module => g_module_prefix || 'GET_AUCTION_STATUS_DISPLAY',
13321: message => 'l_supp_meaning : ' || l_supp_meaning
13322: || '; l_supp_sealed_meaning : ' || l_supp_sealed_meaning
13315: AND fl.lookup_type = 'PON_AUCTION_STATUS'
13316: AND fl.lookup_code = pav.suppl_negotiation_status;
13317:
13318: IF (FND_LOG.level_statement>= FND_LOG.g_current_runtime_level) THEN
13319: FND_LOG.string(log_level => FND_LOG.level_statement,
13320: module => g_module_prefix || 'GET_AUCTION_STATUS_DISPLAY',
13321: message => 'l_supp_meaning : ' || l_supp_meaning
13322: || '; l_supp_sealed_meaning : ' || l_supp_sealed_meaning
13323: );
13325:
13326: -- set up message
13327: l_message := l_supp_meaning || l_supp_sealed_meaning;
13328:
13329: IF (FND_LOG.level_statement>= FND_LOG.g_current_runtime_level) THEN
13330: FND_LOG.string(log_level => FND_LOG.level_statement,
13331: module => g_module_prefix || 'GET_AUCTION_STATUS_DISPLAY',
13332: message => '4. l_message : ' || l_message
13333: );
13326: -- set up message
13327: l_message := l_supp_meaning || l_supp_sealed_meaning;
13328:
13329: IF (FND_LOG.level_statement>= FND_LOG.g_current_runtime_level) THEN
13330: FND_LOG.string(log_level => FND_LOG.level_statement,
13331: module => g_module_prefix || 'GET_AUCTION_STATUS_DISPLAY',
13332: message => '4. l_message : ' || l_message
13333: );
13334: END IF;
13339: --}
13340: ELSE -- it is a two part RFQ, conditions for new-style messages are met
13341: --{
13342:
13343: IF (FND_LOG.level_statement>= FND_LOG.g_current_runtime_level) THEN
13344: FND_LOG.string(log_level => FND_LOG.level_statement,
13345: module => g_module_prefix || 'GET_AUCTION_STATUS_DISPLAY',
13346: message => '5. This is a Two Part RFQ'
13347: );
13340: ELSE -- it is a two part RFQ, conditions for new-style messages are met
13341: --{
13342:
13343: IF (FND_LOG.level_statement>= FND_LOG.g_current_runtime_level) THEN
13344: FND_LOG.string(log_level => FND_LOG.level_statement,
13345: module => g_module_prefix || 'GET_AUCTION_STATUS_DISPLAY',
13346: message => '5. This is a Two Part RFQ'
13347: );
13348: END IF;
13358: INTO l_technical_lock_meaning, l_commercial_lock_meaning
13359: FROM pon_auction_headers_all
13360: WHERE auction_header_id = p_auction_header_id;
13361:
13362: IF (FND_LOG.level_statement>= FND_LOG.g_current_runtime_level) THEN
13363: FND_LOG.string(log_level => FND_LOG.level_statement,
13364: module => g_module_prefix || 'GET_AUCTION_STATUS_DISPLAY',
13365: message => 'l_technical_lock_meaning : ' || l_technical_lock_meaning
13366: || ';l_commercial_lock_meaning : ' || l_commercial_lock_meaning
13359: FROM pon_auction_headers_all
13360: WHERE auction_header_id = p_auction_header_id;
13361:
13362: IF (FND_LOG.level_statement>= FND_LOG.g_current_runtime_level) THEN
13363: FND_LOG.string(log_level => FND_LOG.level_statement,
13364: module => g_module_prefix || 'GET_AUCTION_STATUS_DISPLAY',
13365: message => 'l_technical_lock_meaning : ' || l_technical_lock_meaning
13366: || ';l_commercial_lock_meaning : ' || l_commercial_lock_meaning
13367: );
13373: IF (l_auction_status2 in ('CANCELLED') ) THEN
13374:
13375: fnd_message.set_name('PON', 'PON_TWO_PART_CANCELLED');
13376:
13377: IF (FND_LOG.level_statement>= FND_LOG.g_current_runtime_level) THEN
13378: FND_LOG.string(log_level => FND_LOG.level_statement,
13379: module => g_module_prefix || 'GET_AUCTION_STATUS_DISPLAY',
13380: message => 'The auction is cancelled after technically unlocking/unsealing it');
13381: END IF;
13374:
13375: fnd_message.set_name('PON', 'PON_TWO_PART_CANCELLED');
13376:
13377: IF (FND_LOG.level_statement>= FND_LOG.g_current_runtime_level) THEN
13378: FND_LOG.string(log_level => FND_LOG.level_statement,
13379: module => g_module_prefix || 'GET_AUCTION_STATUS_DISPLAY',
13380: message => 'The auction is cancelled after technically unlocking/unsealing it');
13381: END IF;
13382:
13389:
13390: -- check if it is buyer
13391: if (l_is_buyer) then
13392:
13393: IF (FND_LOG.level_statement>= FND_LOG.g_current_runtime_level) THEN
13394: FND_LOG.string(log_level => FND_LOG.level_statement,
13395: module => g_module_prefix || 'GET_AUCTION_STATUS_DISPLAY',
13396: message => '6. Buyer Status '
13397: );
13390: -- check if it is buyer
13391: if (l_is_buyer) then
13392:
13393: IF (FND_LOG.level_statement>= FND_LOG.g_current_runtime_level) THEN
13394: FND_LOG.string(log_level => FND_LOG.level_statement,
13395: module => g_module_prefix || 'GET_AUCTION_STATUS_DISPLAY',
13396: message => '6. Buyer Status '
13397: );
13398: END IF;
13402: -- it means round is completed
13403: -- show Round Completed (Unlocked/Unsealed: Technical)
13404: if l_auction_status2 = 'AUCTION_CLOSED' and l_award_status = 'NO' then
13405:
13406: IF (FND_LOG.level_statement>= FND_LOG.g_current_runtime_level) THEN
13407: FND_LOG.string(log_level => FND_LOG.level_statement,
13408: module => g_module_prefix || 'GET_AUCTION_STATUS_DISPLAY',
13409: message => 'l_auction_status2 : '|| l_auction_status2
13410: ||'l_award_status : '|| l_award_status
13403: -- show Round Completed (Unlocked/Unsealed: Technical)
13404: if l_auction_status2 = 'AUCTION_CLOSED' and l_award_status = 'NO' then
13405:
13406: IF (FND_LOG.level_statement>= FND_LOG.g_current_runtime_level) THEN
13407: FND_LOG.string(log_level => FND_LOG.level_statement,
13408: module => g_module_prefix || 'GET_AUCTION_STATUS_DISPLAY',
13409: message => 'l_auction_status2 : '|| l_auction_status2
13410: ||'l_award_status : '|| l_award_status
13411: ||'That is Round is complete. So showing Round Completed (Unlocked/Unsealed: Technical)'
13414: END IF;
13415:
13416: if l_commercial_lock_status = 'LOCKED' then
13417:
13418: IF (FND_LOG.level_statement>= FND_LOG.g_current_runtime_level) THEN
13419: FND_LOG.string(log_level => FND_LOG.level_statement,
13420: module => g_module_prefix || 'GET_AUCTION_STATUS_DISPLAY',
13421: message => 'Auction has a commercial lock on it'
13422: );
13415:
13416: if l_commercial_lock_status = 'LOCKED' then
13417:
13418: IF (FND_LOG.level_statement>= FND_LOG.g_current_runtime_level) THEN
13419: FND_LOG.string(log_level => FND_LOG.level_statement,
13420: module => g_module_prefix || 'GET_AUCTION_STATUS_DISPLAY',
13421: message => 'Auction has a commercial lock on it'
13422: );
13423: END IF;
13426: fnd_message.set_token('SEALED_STATUS', l_technical_lock_meaning);
13427: fnd_message.set_token('ROUND',get_technical_meaning);
13428: l_message := fnd_message.get;
13429:
13430: IF (FND_LOG.level_statement>= FND_LOG.g_current_runtime_level) THEN
13431: FND_LOG.string(log_level => FND_LOG.level_statement,
13432: module => g_module_prefix || 'GET_AUCTION_STATUS_DISPLAY',
13433: message => '7. l_message : '|| l_message
13434: );
13427: fnd_message.set_token('ROUND',get_technical_meaning);
13428: l_message := fnd_message.get;
13429:
13430: IF (FND_LOG.level_statement>= FND_LOG.g_current_runtime_level) THEN
13431: FND_LOG.string(log_level => FND_LOG.level_statement,
13432: module => g_module_prefix || 'GET_AUCTION_STATUS_DISPLAY',
13433: message => '7. l_message : '|| l_message
13434: );
13435: END IF;
13437: else
13438: fnd_message.set_name('PON', 'PON_AUC_ROUNDCOMP');
13439: l_message := fnd_message.get || ' (' || l_commercial_lock_meaning || ')';
13440:
13441: IF (FND_LOG.level_statement>= FND_LOG.g_current_runtime_level) THEN
13442: FND_LOG.string(log_level => FND_LOG.level_statement,
13443: module => g_module_prefix || 'GET_AUCTION_STATUS_DISPLAY',
13444: message => '8. l_message : '|| l_message
13445: );
13438: fnd_message.set_name('PON', 'PON_AUC_ROUNDCOMP');
13439: l_message := fnd_message.get || ' (' || l_commercial_lock_meaning || ')';
13440:
13441: IF (FND_LOG.level_statement>= FND_LOG.g_current_runtime_level) THEN
13442: FND_LOG.string(log_level => FND_LOG.level_statement,
13443: module => g_module_prefix || 'GET_AUCTION_STATUS_DISPLAY',
13444: message => '8. l_message : '|| l_message
13445: );
13446: END IF;
13448: end if;
13449: -- if technical evaluation is complete,
13450: elsif l_technical_evaluation_status = 'COMPLETED' and l_commercial_lock_status = 'LOCKED' then
13451:
13452: IF (FND_LOG.level_statement>= FND_LOG.g_current_runtime_level) THEN
13453: FND_LOG.string(log_level => FND_LOG.level_statement,
13454: module => g_module_prefix || 'GET_AUCTION_STATUS_DISPLAY',
13455: message => 'Technical evaluation is completed and the commercial lock is still on'
13456: );
13449: -- if technical evaluation is complete,
13450: elsif l_technical_evaluation_status = 'COMPLETED' and l_commercial_lock_status = 'LOCKED' then
13451:
13452: IF (FND_LOG.level_statement>= FND_LOG.g_current_runtime_level) THEN
13453: FND_LOG.string(log_level => FND_LOG.level_statement,
13454: module => g_module_prefix || 'GET_AUCTION_STATUS_DISPLAY',
13455: message => 'Technical evaluation is completed and the commercial lock is still on'
13456: );
13457: END IF;
13461: --fnd_message.set_token('EVALUATION_COMPLETE', eval_complete_meaning);
13462: fnd_message.set_token('ROUND',get_technical_meaning);
13463: l_message := fnd_message.get;
13464:
13465: IF (FND_LOG.level_statement>= FND_LOG.g_current_runtime_level) THEN
13466: FND_LOG.string(log_level => FND_LOG.level_statement,
13467: module => g_module_prefix || 'GET_AUCTION_STATUS_DISPLAY',
13468: message => '9. l_message : ' ||l_message
13469: );
13462: fnd_message.set_token('ROUND',get_technical_meaning);
13463: l_message := fnd_message.get;
13464:
13465: IF (FND_LOG.level_statement>= FND_LOG.g_current_runtime_level) THEN
13466: FND_LOG.string(log_level => FND_LOG.level_statement,
13467: module => g_module_prefix || 'GET_AUCTION_STATUS_DISPLAY',
13468: message => '9. l_message : ' ||l_message
13469: );
13470: END IF;
13472:
13473: -- technical evaluation is in progress, check commercial seal status
13474: elsif l_commercial_lock_status = 'LOCKED' then
13475:
13476: IF (FND_LOG.level_statement>= FND_LOG.g_current_runtime_level) THEN
13477: FND_LOG.string(log_level => FND_LOG.level_statement,
13478: module => g_module_prefix || 'GET_AUCTION_STATUS_DISPLAY',
13479: message => 'Technical evaluation is in progress and the commercial lock is still on'
13480: );
13473: -- technical evaluation is in progress, check commercial seal status
13474: elsif l_commercial_lock_status = 'LOCKED' then
13475:
13476: IF (FND_LOG.level_statement>= FND_LOG.g_current_runtime_level) THEN
13477: FND_LOG.string(log_level => FND_LOG.level_statement,
13478: module => g_module_prefix || 'GET_AUCTION_STATUS_DISPLAY',
13479: message => 'Technical evaluation is in progress and the commercial lock is still on'
13480: );
13481: END IF;
13481: END IF;
13482:
13483: if l_technical_lock_status = 'ACTIVE' then
13484:
13485: IF (FND_LOG.level_statement>= FND_LOG.g_current_runtime_level) THEN
13486: FND_LOG.string(log_level => FND_LOG.level_statement,
13487: module => g_module_prefix || 'GET_AUCTION_STATUS_DISPLAY',
13488: message => 'Technical lock status is ACTIVE'
13489: );
13482:
13483: if l_technical_lock_status = 'ACTIVE' then
13484:
13485: IF (FND_LOG.level_statement>= FND_LOG.g_current_runtime_level) THEN
13486: FND_LOG.string(log_level => FND_LOG.level_statement,
13487: module => g_module_prefix || 'GET_AUCTION_STATUS_DISPLAY',
13488: message => 'Technical lock status is ACTIVE'
13489: );
13490: END IF;
13495: fnd_message.set_token('ROUND',get_technical_meaning);
13496: --fnd_message.set_token('SEALED_AUCTION_STATUS', l_commercial_lock_meaning);
13497: l_message := fnd_message.get || ' (' || l_technical_lock_meaning || ')';
13498:
13499: IF (FND_LOG.level_statement>= FND_LOG.g_current_runtime_level) THEN
13500: FND_LOG.string(log_level => FND_LOG.level_statement,
13501: module => g_module_prefix || 'GET_AUCTION_STATUS_DISPLAY',
13502: message => '10. l_message : ' || l_message
13503: );
13496: --fnd_message.set_token('SEALED_AUCTION_STATUS', l_commercial_lock_meaning);
13497: l_message := fnd_message.get || ' (' || l_technical_lock_meaning || ')';
13498:
13499: IF (FND_LOG.level_statement>= FND_LOG.g_current_runtime_level) THEN
13500: FND_LOG.string(log_level => FND_LOG.level_statement,
13501: module => g_module_prefix || 'GET_AUCTION_STATUS_DISPLAY',
13502: message => '10. l_message : ' || l_message
13503: );
13504: END IF;
13504: END IF;
13505:
13506: else -- technical unlocked, commercial locked
13507: -- show Evaluation in Progress: Technical
13508: IF (FND_LOG.level_statement>= FND_LOG.g_current_runtime_level) THEN
13509: FND_LOG.string(log_level => FND_LOG.level_statement,
13510: module => g_module_prefix || 'GET_AUCTION_STATUS_DISPLAY',
13511: message => 'Technical unclocked but commercially locked '
13512: );
13505:
13506: else -- technical unlocked, commercial locked
13507: -- show Evaluation in Progress: Technical
13508: IF (FND_LOG.level_statement>= FND_LOG.g_current_runtime_level) THEN
13509: FND_LOG.string(log_level => FND_LOG.level_statement,
13510: module => g_module_prefix || 'GET_AUCTION_STATUS_DISPLAY',
13511: message => 'Technical unclocked but commercially locked '
13512: );
13513: END IF;
13516: --fnd_message.set_token('EVALUATION_IN_PROGRESS', eval_in_prog_meaning);
13517: fnd_message.set_token('ROUND',get_technical_meaning);
13518: l_message := fnd_message.get;
13519:
13520: IF (FND_LOG.level_statement>= FND_LOG.g_current_runtime_level) THEN
13521: FND_LOG.string(log_level => FND_LOG.level_statement,
13522: module => g_module_prefix || 'GET_AUCTION_STATUS_DISPLAY',
13523: message => '11. l_message : ' ||l_message
13524: );
13517: fnd_message.set_token('ROUND',get_technical_meaning);
13518: l_message := fnd_message.get;
13519:
13520: IF (FND_LOG.level_statement>= FND_LOG.g_current_runtime_level) THEN
13521: FND_LOG.string(log_level => FND_LOG.level_statement,
13522: module => g_module_prefix || 'GET_AUCTION_STATUS_DISPLAY',
13523: message => '11. l_message : ' ||l_message
13524: );
13525: END IF;
13529: -- commercial part unlocked
13530: elsif l_commercial_lock_status = 'UNLOCKED' then
13531: -- show Evaluation in Progress: Commercial
13532:
13533: IF (FND_LOG.level_statement>= FND_LOG.g_current_runtime_level) THEN
13534: FND_LOG.string(log_level => FND_LOG.level_statement,
13535: module => g_module_prefix || 'GET_AUCTION_STATUS_DISPLAY',
13536: message => 'commercial part unlocked'
13537: );
13530: elsif l_commercial_lock_status = 'UNLOCKED' then
13531: -- show Evaluation in Progress: Commercial
13532:
13533: IF (FND_LOG.level_statement>= FND_LOG.g_current_runtime_level) THEN
13534: FND_LOG.string(log_level => FND_LOG.level_statement,
13535: module => g_module_prefix || 'GET_AUCTION_STATUS_DISPLAY',
13536: message => 'commercial part unlocked'
13537: );
13538: END IF;
13541: --fnd_message.set_token('EVALUATION_IN_PROGRESS', eval_in_prog_meaning);
13542: fnd_message.set_token('ROUND',get_commercial_meaning);
13543: l_message := fnd_message.get;
13544:
13545: IF (FND_LOG.level_statement>= FND_LOG.g_current_runtime_level) THEN
13546: FND_LOG.string(log_level => FND_LOG.level_statement,
13547: module => g_module_prefix || 'GET_AUCTION_STATUS_DISPLAY',
13548: message => '12. l_message'
13549: );
13542: fnd_message.set_token('ROUND',get_commercial_meaning);
13543: l_message := fnd_message.get;
13544:
13545: IF (FND_LOG.level_statement>= FND_LOG.g_current_runtime_level) THEN
13546: FND_LOG.string(log_level => FND_LOG.level_statement,
13547: module => g_module_prefix || 'GET_AUCTION_STATUS_DISPLAY',
13548: message => '12. l_message'
13549: );
13550: END IF;
13553: else
13554: -- if auction_status is AUCTION_CLOSED and AWARD_STATUS is NO
13555: -- it means round is completed
13556: -- show Round Completed (Unsealed)
13557: IF (FND_LOG.level_statement>= FND_LOG.g_current_runtime_level) THEN
13558: FND_LOG.string(log_level => FND_LOG.level_statement,
13559: module => g_module_prefix || 'GET_AUCTION_STATUS_DISPLAY',
13560: message => 'commercial unsealed ; Auction Statuses : '||
13561: 'l_auction_status2 ' || l_auction_status2 || '; l_award_status : ' || l_award_status
13554: -- if auction_status is AUCTION_CLOSED and AWARD_STATUS is NO
13555: -- it means round is completed
13556: -- show Round Completed (Unsealed)
13557: IF (FND_LOG.level_statement>= FND_LOG.g_current_runtime_level) THEN
13558: FND_LOG.string(log_level => FND_LOG.level_statement,
13559: module => g_module_prefix || 'GET_AUCTION_STATUS_DISPLAY',
13560: message => 'commercial unsealed ; Auction Statuses : '||
13561: 'l_auction_status2 ' || l_auction_status2 || '; l_award_status : ' || l_award_status
13562: );
13567: --fnd_message.set_token('EVALUATION_IN_PROGRESS', eval_in_prog_meaning);
13568: fnd_message.set_token('ROUND',get_commercial_meaning);
13569: l_message := fnd_message.get || ' (' || l_commercial_lock_meaning || ')';
13570:
13571: IF (FND_LOG.level_statement>= FND_LOG.g_current_runtime_level) THEN
13572: FND_LOG.string(log_level => FND_LOG.level_statement,
13573: module => g_module_prefix || 'GET_AUCTION_STATUS_DISPLAY',
13574: message => 'l_message : ' || l_message);
13575: END IF;
13568: fnd_message.set_token('ROUND',get_commercial_meaning);
13569: l_message := fnd_message.get || ' (' || l_commercial_lock_meaning || ')';
13570:
13571: IF (FND_LOG.level_statement>= FND_LOG.g_current_runtime_level) THEN
13572: FND_LOG.string(log_level => FND_LOG.level_statement,
13573: module => g_module_prefix || 'GET_AUCTION_STATUS_DISPLAY',
13574: message => 'l_message : ' || l_message);
13575: END IF;
13576:
13578:
13579: -- is a supplier
13580: else
13581:
13582: IF (FND_LOG.level_statement>= FND_LOG.g_current_runtime_level) THEN
13583: FND_LOG.string(log_level => FND_LOG.level_statement,
13584: module => g_module_prefix || 'GET_AUCTION_STATUS_DISPLAY',
13585: message => '14. Supplier Status');
13586: END IF;
13579: -- is a supplier
13580: else
13581:
13582: IF (FND_LOG.level_statement>= FND_LOG.g_current_runtime_level) THEN
13583: FND_LOG.string(log_level => FND_LOG.level_statement,
13584: module => g_module_prefix || 'GET_AUCTION_STATUS_DISPLAY',
13585: message => '14. Supplier Status');
13586: END IF;
13587:
13594: fnd_message.set_token('SEALED_STATUS',l_technical_lock_meaning);
13595: fnd_message.set_token('ROUND',get_technical_meaning);
13596: l_message := fnd_message.get;
13597:
13598: IF (FND_LOG.level_statement>= FND_LOG.g_current_runtime_level) THEN
13599: FND_LOG.string(log_level => FND_LOG.level_statement,
13600: module => g_module_prefix || 'GET_AUCTION_STATUS_DISPLAY',
13601: message => '15. l_message : ' || l_message );
13602: END IF;
13595: fnd_message.set_token('ROUND',get_technical_meaning);
13596: l_message := fnd_message.get;
13597:
13598: IF (FND_LOG.level_statement>= FND_LOG.g_current_runtime_level) THEN
13599: FND_LOG.string(log_level => FND_LOG.level_statement,
13600: module => g_module_prefix || 'GET_AUCTION_STATUS_DISPLAY',
13601: message => '15. l_message : ' || l_message );
13602: END IF;
13603:
13607: END IF;
13608:
13609: END IF;
13610:
13611: IF (FND_LOG.level_statement>= FND_LOG.g_current_runtime_level) THEN
13612: FND_LOG.string(log_level => FND_LOG.level_statement,
13613: module => g_module_prefix || 'GET_AUCTION_STATUS_DISPLAY',
13614: message => 'Returning l_message : ' || l_message );
13615: END IF;
13608:
13609: END IF;
13610:
13611: IF (FND_LOG.level_statement>= FND_LOG.g_current_runtime_level) THEN
13612: FND_LOG.string(log_level => FND_LOG.level_statement,
13613: module => g_module_prefix || 'GET_AUCTION_STATUS_DISPLAY',
13614: message => 'Returning l_message : ' || l_message );
13615: END IF;
13616:
13618:
13619: EXCEPTION
13620: WHEN OTHERS THEN
13621:
13622: IF (FND_LOG.level_unexpected>= FND_LOG.g_current_runtime_level) THEN
13623: FND_LOG.string(log_level => FND_LOG.level_unexpected,
13624: module => g_module_prefix || 'GET_AUCTION_STATUS_DISPLAY',
13625: message => 'Exception encountered for auction : ' || p_auction_header_id
13626: ||'and p_user_trading_partner_id : ' || p_user_trading_partner_id
13619: EXCEPTION
13620: WHEN OTHERS THEN
13621:
13622: IF (FND_LOG.level_unexpected>= FND_LOG.g_current_runtime_level) THEN
13623: FND_LOG.string(log_level => FND_LOG.level_unexpected,
13624: module => g_module_prefix || 'GET_AUCTION_STATUS_DISPLAY',
13625: message => 'Exception encountered for auction : ' || p_auction_header_id
13626: ||'and p_user_trading_partner_id : ' || p_user_trading_partner_id
13627: ||' Returning l_message : ' || l_message);
13649: x_auction_status_display OUT NOCOPY VARCHAR2)
13650: AS
13651: BEGIN
13652:
13653: IF (FND_LOG.level_statement>= FND_LOG.g_current_runtime_level) THEN
13654: FND_LOG.string(log_level => FND_LOG.level_statement,
13655: module => g_module_prefix || 'GET_MONITOR_IMAGE_AND_STATUS',
13656: message => 'Entering the function with params --'
13657: || 'p_auction_header_id = ' || p_auction_header_id
13650: AS
13651: BEGIN
13652:
13653: IF (FND_LOG.level_statement>= FND_LOG.g_current_runtime_level) THEN
13654: FND_LOG.string(log_level => FND_LOG.level_statement,
13655: module => g_module_prefix || 'GET_MONITOR_IMAGE_AND_STATUS',
13656: message => 'Entering the function with params --'
13657: || 'p_auction_header_id = ' || p_auction_header_id
13658: || ';p_doctype_id = ' || p_doctype_id
13683: p_auction_header_id ,
13684: p_has_scoring_teams_flag);
13685:
13686:
13687: IF (FND_LOG.level_statement>= FND_LOG.g_current_runtime_level) THEN
13688: FND_LOG.string(log_level => FND_LOG.level_statement,
13689: module => g_module_prefix || 'GET_MONITOR_IMAGE_AND_STATUS',
13690: message => 'x_buyer_monitor_image = ' || x_buyer_monitor_image);
13691: END IF;
13684: p_has_scoring_teams_flag);
13685:
13686:
13687: IF (FND_LOG.level_statement>= FND_LOG.g_current_runtime_level) THEN
13688: FND_LOG.string(log_level => FND_LOG.level_statement,
13689: module => g_module_prefix || 'GET_MONITOR_IMAGE_AND_STATUS',
13690: message => 'x_buyer_monitor_image = ' || x_buyer_monitor_image);
13691: END IF;
13692:
13692:
13693: x_auction_status_display := GET_AUCTION_STATUS_DISPLAY(p_auction_header_id,
13694: p_user_trading_partner_id);
13695:
13696: IF (FND_LOG.level_statement>= FND_LOG.g_current_runtime_level) THEN
13697: FND_LOG.string(log_level => FND_LOG.level_statement,
13698: module => g_module_prefix || 'GET_MONITOR_IMAGE_AND_STATUS',
13699: message => 'x_auction_status_display = ' || x_auction_status_display);
13700: END IF;
13693: x_auction_status_display := GET_AUCTION_STATUS_DISPLAY(p_auction_header_id,
13694: p_user_trading_partner_id);
13695:
13696: IF (FND_LOG.level_statement>= FND_LOG.g_current_runtime_level) THEN
13697: FND_LOG.string(log_level => FND_LOG.level_statement,
13698: module => g_module_prefix || 'GET_MONITOR_IMAGE_AND_STATUS',
13699: message => 'x_auction_status_display = ' || x_auction_status_display);
13700: END IF;
13701:
13701:
13702: EXCEPTION
13703: WHEN OTHERS THEN
13704:
13705: IF (FND_LOG.level_unexpected>= FND_LOG.g_current_runtime_level) THEN
13706: FND_LOG.string(log_level => FND_LOG.level_unexpected,
13707: module => g_module_prefix || 'GET_MONITOR_IMAGE_AND_STATUS',
13708: message => 'Exception encountered for auction : ' || p_auction_header_id);
13709: END IF;
13702: EXCEPTION
13703: WHEN OTHERS THEN
13704:
13705: IF (FND_LOG.level_unexpected>= FND_LOG.g_current_runtime_level) THEN
13706: FND_LOG.string(log_level => FND_LOG.level_unexpected,
13707: module => g_module_prefix || 'GET_MONITOR_IMAGE_AND_STATUS',
13708: message => 'Exception encountered for auction : ' || p_auction_header_id);
13709: END IF;
13710:
13736: l_return_value VARCHAR2(40);
13737:
13738: BEGIN
13739:
13740: IF (FND_LOG.level_statement >= FND_LOG.g_current_runtime_level) THEN --{
13741: FND_LOG.string(log_level => FND_LOG.level_statement,
13742: module => g_module_prefix || l_module_name,
13743: message => 'Entered procedure with p_auction_status = ' ||
13744: p_auction_status || ', p_is_paused = ' || p_is_paused
13737:
13738: BEGIN
13739:
13740: IF (FND_LOG.level_statement >= FND_LOG.g_current_runtime_level) THEN --{
13741: FND_LOG.string(log_level => FND_LOG.level_statement,
13742: module => g_module_prefix || l_module_name,
13743: message => 'Entered procedure with p_auction_status = ' ||
13744: p_auction_status || ', p_is_paused = ' || p_is_paused
13745: || ', p_view_by_date = ' || p_view_by_date ||
13764: ELSE
13765: l_return_value := 'CLOSED';
13766: END IF; --}
13767:
13768: IF (FND_LOG.level_statement >= FND_LOG.g_current_runtime_level) THEN --{
13769: FND_LOG.string(log_level => FND_LOG.level_statement,
13770: module => g_module_prefix || l_module_name,
13771: message => 'Returning value = ' || l_return_value);
13772: END IF; --}
13765: l_return_value := 'CLOSED';
13766: END IF; --}
13767:
13768: IF (FND_LOG.level_statement >= FND_LOG.g_current_runtime_level) THEN --{
13769: FND_LOG.string(log_level => FND_LOG.level_statement,
13770: module => g_module_prefix || l_module_name,
13771: message => 'Returning value = ' || l_return_value);
13772: END IF; --}
13773:
13807: l_return_value VARCHAR2(40);
13808:
13809: BEGIN
13810:
13811: IF (FND_LOG.level_statement >= FND_LOG.g_current_runtime_level) THEN --{
13812: FND_LOG.string(log_level => FND_LOG.level_statement,
13813: module => g_module_prefix || l_module_name,
13814: message => 'Entered with p_auction_status = ' || p_auction_status ||
13815: ', p_is_paused = ' || p_is_paused || ', p_view_by_date = ' ||
13808:
13809: BEGIN
13810:
13811: IF (FND_LOG.level_statement >= FND_LOG.g_current_runtime_level) THEN --{
13812: FND_LOG.string(log_level => FND_LOG.level_statement,
13813: module => g_module_prefix || l_module_name,
13814: message => 'Entered with p_auction_status = ' || p_auction_status ||
13815: ', p_is_paused = ' || p_is_paused || ', p_view_by_date = ' ||
13816: p_view_by_date || ', p_open_bidding_date = ' || p_open_bidding_date
13883: l_return_value := p_outcome_status;
13884: END IF; -- }
13885: END IF; -- }
13886:
13887: IF (FND_LOG.level_statement >= FND_LOG.g_current_runtime_level) THEN --{
13888: FND_LOG.string(log_level => FND_LOG.level_statement,
13889: module => g_module_prefix || l_module_name,
13890: message => 'Returning ' || l_return_value);
13891: END IF; --}
13884: END IF; -- }
13885: END IF; -- }
13886:
13887: IF (FND_LOG.level_statement >= FND_LOG.g_current_runtime_level) THEN --{
13888: FND_LOG.string(log_level => FND_LOG.level_statement,
13889: module => g_module_prefix || l_module_name,
13890: message => 'Returning ' || l_return_value);
13891: END IF; --}
13892:
13922: l_rfi_doctype_id NUMBER;
13923:
13924: BEGIN
13925:
13926: IF (FND_LOG.level_statement >= FND_LOG.g_current_runtime_level) THEN --{
13927: FND_LOG.string(log_level => FND_LOG.level_statement,
13928: module => g_module_prefix || l_module_name,
13929: message => 'Entered with p_contract_type = ' || p_contract_type ||
13930: ', p_price_breaks_enabled = ' || p_price_breaks_enabled || ', p_qty_price_tiers_enabled = ' ||
13923:
13924: BEGIN
13925:
13926: IF (FND_LOG.level_statement >= FND_LOG.g_current_runtime_level) THEN --{
13927: FND_LOG.string(log_level => FND_LOG.level_statement,
13928: module => g_module_prefix || l_module_name,
13929: message => 'Entered with p_contract_type = ' || p_contract_type ||
13930: ', p_price_breaks_enabled = ' || p_price_breaks_enabled || ', p_qty_price_tiers_enabled = ' ||
13931: p_qty_price_tiers_enabled || ', p_doctype_id = ' || p_doctype_id);
13949:
13950: IF ( (p_doctype_id = l_rfi_doctype_id) OR (p_contract_type = 'STANDARD' and p_qty_price_tiers_enabled = 'N')
13951: OR (p_contract_type <> 'STANDARD' and p_qty_price_tiers_enabled = 'N' and p_price_breaks_enabled = 'N') ) THEN --{
13952:
13953: IF (FND_LOG.level_statement >= FND_LOG.g_current_runtime_level) THEN --{
13954: FND_LOG.string(log_level => FND_LOG.level_statement,
13955: module => g_module_prefix || l_module_name,
13956: message => '(Neg is RFI) or(SPO and Sourcing style does not allows quantity based tiers.) or ' ||
13957: '(BPA/CPA and Sourcing style doe not allows quantity based tiers and PO Flag disables price breaks)');
13950: IF ( (p_doctype_id = l_rfi_doctype_id) OR (p_contract_type = 'STANDARD' and p_qty_price_tiers_enabled = 'N')
13951: OR (p_contract_type <> 'STANDARD' and p_qty_price_tiers_enabled = 'N' and p_price_breaks_enabled = 'N') ) THEN --{
13952:
13953: IF (FND_LOG.level_statement >= FND_LOG.g_current_runtime_level) THEN --{
13954: FND_LOG.string(log_level => FND_LOG.level_statement,
13955: module => g_module_prefix || l_module_name,
13956: message => '(Neg is RFI) or(SPO and Sourcing style does not allows quantity based tiers.) or ' ||
13957: '(BPA/CPA and Sourcing style doe not allows quantity based tiers and PO Flag disables price breaks)');
13958: FND_LOG.string(log_level => FND_LOG.level_statement,
13954: FND_LOG.string(log_level => FND_LOG.level_statement,
13955: module => g_module_prefix || l_module_name,
13956: message => '(Neg is RFI) or(SPO and Sourcing style does not allows quantity based tiers.) or ' ||
13957: '(BPA/CPA and Sourcing style doe not allows quantity based tiers and PO Flag disables price breaks)');
13958: FND_LOG.string(log_level => FND_LOG.level_statement,
13959: module => g_module_prefix || l_module_name,
13960: message => ' Setting the default price tiers indicator as null.');
13961: END IF; --}
13962:
13971: --
13972:
13973: ELSIF ( p_contract_type <> 'STANDARD' and p_price_breaks_enabled = 'Y') THEN --{
13974:
13975: IF (FND_LOG.level_statement >= FND_LOG.g_current_runtime_level) THEN --{
13976: FND_LOG.string(log_level => FND_LOG.level_statement,
13977: module => g_module_prefix || l_module_name,
13978: message => 'BPA/CPA; price breaks are enabled. Setting default value to price_breaks');
13979: END IF; --}
13972:
13973: ELSIF ( p_contract_type <> 'STANDARD' and p_price_breaks_enabled = 'Y') THEN --{
13974:
13975: IF (FND_LOG.level_statement >= FND_LOG.g_current_runtime_level) THEN --{
13976: FND_LOG.string(log_level => FND_LOG.level_statement,
13977: module => g_module_prefix || l_module_name,
13978: message => 'BPA/CPA; price breaks are enabled. Setting default value to price_breaks');
13979: END IF; --}
13980:
13990: --
13991:
13992: ELSE --{
13993:
13994: IF (FND_LOG.level_statement >= FND_LOG.g_current_runtime_level) THEN --{
13995: FND_LOG.string(log_level => FND_LOG.level_statement,
13996: module => g_module_prefix || l_module_name,
13997: message => 'Price tiers are enabled and ( price breaks are disabled for BPA/CPA OR is an SPO) Setting default value to none');
13998: END IF; --}
13991:
13992: ELSE --{
13993:
13994: IF (FND_LOG.level_statement >= FND_LOG.g_current_runtime_level) THEN --{
13995: FND_LOG.string(log_level => FND_LOG.level_statement,
13996: module => g_module_prefix || l_module_name,
13997: message => 'Price tiers are enabled and ( price breaks are disabled for BPA/CPA OR is an SPO) Setting default value to none');
13998: END IF; --}
13999:
14000: x_price_tiers_indicator := 'NONE';
14001:
14002: END IF; --} End of else
14003:
14004: IF (FND_LOG.level_statement >= FND_LOG.g_current_runtime_level) THEN --{
14005: FND_LOG.string(log_level => FND_LOG.level_statement,
14006: module => g_module_prefix || l_module_name,
14007: message => 'Returning to the caller with x_price_tiers_indicator as '|| x_price_tiers_indicator);
14008: END IF; --}
14001:
14002: END IF; --} End of else
14003:
14004: IF (FND_LOG.level_statement >= FND_LOG.g_current_runtime_level) THEN --{
14005: FND_LOG.string(log_level => FND_LOG.level_statement,
14006: module => g_module_prefix || l_module_name,
14007: message => 'Returning to the caller with x_price_tiers_indicator as '|| x_price_tiers_indicator);
14008: END IF; --}
14009:
14013: -- populate the two part meanings' cache
14014: procedure init_two_part_cache
14015: as
14016: begin
14017: IF (FND_LOG.level_procedure >= FND_LOG.g_current_runtime_level) THEN --{
14018: FND_LOG.string(log_level => FND_LOG.level_procedure,
14019: module => g_module_prefix || 'init_two_part_cache',
14020: message => 'Entered procedure init_two_part_cache');
14021: END IF; --}
14014: procedure init_two_part_cache
14015: as
14016: begin
14017: IF (FND_LOG.level_procedure >= FND_LOG.g_current_runtime_level) THEN --{
14018: FND_LOG.string(log_level => FND_LOG.level_procedure,
14019: module => g_module_prefix || 'init_two_part_cache',
14020: message => 'Entered procedure init_two_part_cache');
14021: END IF; --}
14022:
14030: AND flv1.LANGUAGE=flv2.LANGUAGE;
14031:
14032: g_tp_cache_rec := g_two_part_cache(1); -- first time initialisation
14033:
14034: IF (FND_LOG.level_procedure >= FND_LOG.g_current_runtime_level) THEN --{
14035: FND_LOG.string(log_level => FND_LOG.level_procedure,
14036: module => g_module_prefix || 'init_two_part_cache',
14037: message => 'Exiting procedure init_two_part_cache');
14038: END IF; --}
14031:
14032: g_tp_cache_rec := g_two_part_cache(1); -- first time initialisation
14033:
14034: IF (FND_LOG.level_procedure >= FND_LOG.g_current_runtime_level) THEN --{
14035: FND_LOG.string(log_level => FND_LOG.level_procedure,
14036: module => g_module_prefix || 'init_two_part_cache',
14037: message => 'Exiting procedure init_two_part_cache');
14038: END IF; --}
14039:
14043: -- update record from from cache table when needed
14044: PROCEDURE update_cache_rec
14045: AS
14046: BEGIN
14047: IF (FND_LOG.level_procedure >= FND_LOG.g_current_runtime_level) THEN --{
14048: FND_LOG.string(log_level => FND_LOG.level_procedure,
14049: module => g_module_prefix || 'update_cache_rec',
14050: message => 'Entered procedure update_cache_rec');
14051: END IF; --}
14044: PROCEDURE update_cache_rec
14045: AS
14046: BEGIN
14047: IF (FND_LOG.level_procedure >= FND_LOG.g_current_runtime_level) THEN --{
14048: FND_LOG.string(log_level => FND_LOG.level_procedure,
14049: module => g_module_prefix || 'update_cache_rec',
14050: message => 'Entered procedure update_cache_rec');
14051: END IF; --}
14052:
14051: END IF; --}
14052:
14053: IF (g_tp_cache_rec.language <> USERENV('LANG')) THEN -- {
14054:
14055: IF (FND_LOG.level_statement >= FND_LOG.g_current_runtime_level) THEN --{
14056: FND_LOG.string(log_level => FND_LOG.level_statement,
14057: module => g_module_prefix || 'update_cache_rec',
14058: message => 'User session language is now ' || USERENV('LANG'));
14059: END IF; --}
14052:
14053: IF (g_tp_cache_rec.language <> USERENV('LANG')) THEN -- {
14054:
14055: IF (FND_LOG.level_statement >= FND_LOG.g_current_runtime_level) THEN --{
14056: FND_LOG.string(log_level => FND_LOG.level_statement,
14057: module => g_module_prefix || 'update_cache_rec',
14058: message => 'User session language is now ' || USERENV('LANG'));
14059: END IF; --}
14060:
14065: END IF;
14066: END LOOP;
14067: END IF; -- }
14068:
14069: IF (FND_LOG.level_procedure >= FND_LOG.g_current_runtime_level) THEN --{
14070: FND_LOG.string(log_level => FND_LOG.level_procedure,
14071: module => g_module_prefix || 'update_cache_rec',
14072: message => 'Exiting procedure update_cache_rec');
14073: END IF; --}
14066: END LOOP;
14067: END IF; -- }
14068:
14069: IF (FND_LOG.level_procedure >= FND_LOG.g_current_runtime_level) THEN --{
14070: FND_LOG.string(log_level => FND_LOG.level_procedure,
14071: module => g_module_prefix || 'update_cache_rec',
14072: message => 'Exiting procedure update_cache_rec');
14073: END IF; --}
14074: END update_cache_rec;