855: --
856: BEGIN
857: SELECT USER_NAME
858: INTO l_tpc_name
859: FROM FND_USER
860: WHERE USER_ID = l_user_id;
861:
862: EXCEPTION
863: WHEN NO_DATA_FOUND THEN
1591: l_trading_partner_contact_id PON_AUCTION_HEADERS_ALL.TRADING_PARTNER_CONTACT_ID%TYPE;
1592: l_doctype_id PON_AUCTION_HEADERS_ALL.DOCTYPE_ID%TYPE;
1593: l_is_award_approval_reqd PON_AUCTION_HEADERS_ALL.AWARD_APPROVAL_FLAG%TYPE;
1594: l_style_id PON_AUCTION_HEADERS_ALL.STYLE_ID%TYPE;
1595: l_mgr_id FND_USER.USER_ID%TYPE;
1596: -- user id is derived from pon_auction_headers_all instead of using fnd_global.user_id
1597: l_user_id FND_USER.USER_ID%TYPE;
1598: l_user_name FND_USER.USER_NAME%TYPE;
1599:
1593: l_is_award_approval_reqd PON_AUCTION_HEADERS_ALL.AWARD_APPROVAL_FLAG%TYPE;
1594: l_style_id PON_AUCTION_HEADERS_ALL.STYLE_ID%TYPE;
1595: l_mgr_id FND_USER.USER_ID%TYPE;
1596: -- user id is derived from pon_auction_headers_all instead of using fnd_global.user_id
1597: l_user_id FND_USER.USER_ID%TYPE;
1598: l_user_name FND_USER.USER_NAME%TYPE;
1599:
1600: -- Bug:9954903-start
1601: l_return_value number;
1594: l_style_id PON_AUCTION_HEADERS_ALL.STYLE_ID%TYPE;
1595: l_mgr_id FND_USER.USER_ID%TYPE;
1596: -- user id is derived from pon_auction_headers_all instead of using fnd_global.user_id
1597: l_user_id FND_USER.USER_ID%TYPE;
1598: l_user_name FND_USER.USER_NAME%TYPE;
1599:
1600: -- Bug:9954903-start
1601: l_return_value number;
1602: l_doc_number PON_AUCTION_HEADERS_ALL.DOCUMENT_NUMBER%TYPE;
1615: FROM PON_AUCTION_HEADERS_ALL
1616: WHERE AUCTION_HEADER_ID = p_source_auction_header_id;
1617:
1618: SELECT USER_NAME INTO l_user_name
1619: FROM FND_USER
1620: WHERE USER_ID = l_user_id;
1621:
1622: LOG_MESSAGE(l_module_name,' p_source_auction_header_id - ' || p_source_auction_header_id
1623: || 'TRADING_PARTNER_ID - ' || l_trading_partner_id
1633: SUP.USER_ID USER_ID
1634: INTO l_mgr_id
1635: FROM PER_ALL_ASSIGNMENTS_F ASS,
1636: PER_ALL_ASSIGNMENTS_F SUPASS,
1637: FND_USER SUP,
1638: FND_USER EMP,
1639: PER_ALL_PEOPLE_F PER,
1640: PER_ALL_POSITIONS POS
1641: WHERE ASS.PERSON_ID = EMP.EMPLOYEE_ID
1634: INTO l_mgr_id
1635: FROM PER_ALL_ASSIGNMENTS_F ASS,
1636: PER_ALL_ASSIGNMENTS_F SUPASS,
1637: FND_USER SUP,
1638: FND_USER EMP,
1639: PER_ALL_PEOPLE_F PER,
1640: PER_ALL_POSITIONS POS
1641: WHERE ASS.PERSON_ID = EMP.EMPLOYEE_ID
1642: AND ASS.SUPERVISOR_ID = SUP.EMPLOYEE_ID
7341: l_modified_flag,
7342: l_last_notif_date,
7343: l_auc_business_group_id
7344: FROM PON_NEG_TEAM_MEMBERS PNTM,
7345: FND_USER U,
7346: PER_ALL_PEOPLE_F P,
7347: PER_ALL_ASSIGNMENTS_F A,
7348: PER_ALL_POSITIONS S,
7349: PON_AUCTION_HEADERS_ALL AH,
7620: INTO
7621: l_full_name
7622: FROM (SELECT PNTM.USER_ID, P.FULL_NAME
7623: FROM PON_NEG_TEAM_MEMBERS PNTM,
7624: FND_USER U, PER_ALL_PEOPLE_F P
7625: WHERE U.USER_ID = PNTM.USER_ID
7626: AND PNTM.AUCTION_HEADER_ID = p_source_auction_header_id
7627: AND PNTM.MEMBER_TYPE = 'N'
7628: AND P.PERSON_ID = U.EMPLOYEE_ID
7628: AND P.PERSON_ID = U.EMPLOYEE_ID
7629: MINUS
7630: SELECT PNTM.USER_ID, P.FULL_NAME
7631: FROM PON_NEG_TEAM_MEMBERS PNTM,
7632: FND_USER U, PER_ALL_PEOPLE_F P
7633: WHERE U.USER_ID = PNTM.USER_ID
7634: AND PNTM.AUCTION_HEADER_ID = p_auction_header_id
7635: AND P.PERSON_ID = U.EMPLOYEE_ID);
7636:
11835: -- This logic of getting the contact id is based on the PON_SOURCING_OPENAPI_GRP
11836: -- API which is simpler version of the UserInfoVO
11837: --
11838: BEGIN
11839: SELECT FND_USER.EMPLOYEE_ID
11840: INTO l_auc_contact_id
11841: FROM FND_USER, HZ_RELATIONSHIPS
11842: WHERE FND_USER.USER_ID = FND_GLOBAL.USER_ID()
11843: AND HZ_RELATIONSHIPS.OBJECT_ID = l_site_id
11837: --
11838: BEGIN
11839: SELECT FND_USER.EMPLOYEE_ID
11840: INTO l_auc_contact_id
11841: FROM FND_USER, HZ_RELATIONSHIPS
11842: WHERE FND_USER.USER_ID = FND_GLOBAL.USER_ID()
11843: AND HZ_RELATIONSHIPS.OBJECT_ID = l_site_id
11844: AND HZ_RELATIONSHIPS.SUBJECT_ID = FND_USER.PERSON_PARTY_ID
11845: AND HZ_RELATIONSHIPS.RELATIONSHIP_TYPE = 'POS_EMPLOYMENT'
11838: BEGIN
11839: SELECT FND_USER.EMPLOYEE_ID
11840: INTO l_auc_contact_id
11841: FROM FND_USER, HZ_RELATIONSHIPS
11842: WHERE FND_USER.USER_ID = FND_GLOBAL.USER_ID()
11843: AND HZ_RELATIONSHIPS.OBJECT_ID = l_site_id
11844: AND HZ_RELATIONSHIPS.SUBJECT_ID = FND_USER.PERSON_PARTY_ID
11845: AND HZ_RELATIONSHIPS.RELATIONSHIP_TYPE = 'POS_EMPLOYMENT'
11846: AND HZ_RELATIONSHIPS.RELATIONSHIP_CODE = 'EMPLOYEE_OF'
11840: INTO l_auc_contact_id
11841: FROM FND_USER, HZ_RELATIONSHIPS
11842: WHERE FND_USER.USER_ID = FND_GLOBAL.USER_ID()
11843: AND HZ_RELATIONSHIPS.OBJECT_ID = l_site_id
11844: AND HZ_RELATIONSHIPS.SUBJECT_ID = FND_USER.PERSON_PARTY_ID
11845: AND HZ_RELATIONSHIPS.RELATIONSHIP_TYPE = 'POS_EMPLOYMENT'
11846: AND HZ_RELATIONSHIPS.RELATIONSHIP_CODE = 'EMPLOYEE_OF'
11847: AND HZ_RELATIONSHIPS.START_DATE <= SYSDATE
11848: AND HZ_RELATIONSHIPS.END_DATE >= SYSDATE;
11849: EXCEPTION
11850: WHEN OTHERS THEN
11851: l_auc_contact_id := NULL;
11852: -- Log Error
11853: LOG_MESSAGE('copy_negotiation','Could not determine contact_id for fnd_user_id ' || fnd_global.user_id());
11854: --
11855: -- The way I am adding this error may get changed in the future.
11856: -- So, please be aware of that
11857: FND_MESSAGE.SET_NAME('PON','PON_CONTRACT_COPY_ERR');
11854: --
11855: -- The way I am adding this error may get changed in the future.
11856: -- So, please be aware of that
11857: FND_MESSAGE.SET_NAME('PON','PON_CONTRACT_COPY_ERR');
11858: FND_MESSAGE.SET_TOKEN('REASON','Could not determine contact_id for fnd_user_id ' || fnd_global.user_id());
11859: FND_MSG_PUB.ADD;
11860: RAISE FND_API.G_EXC_ERROR;
11861: RETURN;
11862: END;