45: l_api_version_number CONSTANT NUMBER := 1.0;
46: l_return_status_full VARCHAR2(1);
47: l_object_version_number NUMBER := 1;
48: l_partner_update_text VARCHAR2(2000) :=
49: ' update hz_organization_profiles org set org.curr_fy_potential_revenue= :attr_value where ' ||
50: ' org.party_id = :party_id'
51: ;
52:
53:
58:
59: x_profile_id NUMBER;
60: l_org_rec HZ_PARTY_V2PUB.organization_rec_type;
61: CURSOR c_get_party_ids (pc_entity_id IN NUMBER) IS
62: select orgp.party_id from hz_organization_profiles orgp, hz_relationships hz,
63: hz_organization_profiles orgp2 where hz.party_id = pc_entity_id and
64: hz.subject_id = orgp.party_id and hz.object_id = orgp2.party_id and orgp2.internal_flag = 'Y'
65: and orgp2.effective_end_date is null and nvl(orgp.effective_end_date, sysdate+1) > sysdate
66: ;
59: x_profile_id NUMBER;
60: l_org_rec HZ_PARTY_V2PUB.organization_rec_type;
61: CURSOR c_get_party_ids (pc_entity_id IN NUMBER) IS
62: select orgp.party_id from hz_organization_profiles orgp, hz_relationships hz,
63: hz_organization_profiles orgp2 where hz.party_id = pc_entity_id and
64: hz.subject_id = orgp.party_id and hz.object_id = orgp2.party_id and orgp2.internal_flag = 'Y'
65: and orgp2.effective_end_date is null and nvl(orgp.effective_end_date, sysdate+1) > sysdate
66: ;
67: