[Home] [Help]
1121: cursor c_bill_to_ship_to (v_instance_id number, v_type varchar2) is
1122: SELECT
1123: c.party_id party_id,
1124: nvl(a.party_site_id , 0) party_site_id
1125: from hz_party_sites a, hz_party_site_uses b ,csi_i_parties c
1126: where a.party_id(+) = c.party_id
1127: and c.RELATIONSHIP_TYPE_CODE = v_type
1128: and c.instance_id = v_instance_id
1129: and b.party_site_id(+) = a.party_site_id
1137:
1138:
1139: cursor c_install_site(v_party_id number, v_location_id number ) is
1140: select party_site_id
1141: from hz_party_sites
1142: where party_id = v_party_id
1143: and location_id = v_location_id;
1144:
1145: BEGIN
1187: l_system_id := r_from_ib_instance.SYSTEM_ID;
1188:
1189: /*
1190: Chenged for FS Asstets Flow
1191: IF (r_from_ib_instance.INSTALL_LOCATION_TYPE_CODE = 'HZ_PARTY_SITES') THEN
1192: l_install_site_id := r_from_ib_instance.INSTALL_LOCATION_ID;
1193: ELSIF (r_from_ib_instance.INSTALL_LOCATION_TYPE_CODE = 'HZ_LOCATIONS') THEN
1194: open c_install_site(l_party_id, r_from_ib_instance.INSTALL_LOCATION_ID);
1195: fetch c_install_site into l_install_site_id;
1200: ELSE
1201: l_install_site_id := null;
1202: END IF;*/
1203:
1204: IF (r_from_ib_instance.LOCATION_TYPE_CODE = 'HZ_PARTY_SITES') THEN
1205: l_install_site_id := r_from_ib_instance.LOCATION_ID;
1206: l_service_request_rec.incident_location_type := 'HZ_PARTY_SITE';
1207: l_service_request_rec.incident_location_id := r_from_ib_instance.LOCATION_ID;
1208: ELSIF (r_from_ib_instance.LOCATION_TYPE_CODE = 'HZ_LOCATIONS') THEN
1504: BEGIN
1505: l_count := 0;
1506: SELECT count(*)
1507: INTO l_count
1508: FROM Hz_Party_Sites s
1509: WHERE s.party_site_id = p_install_site_id
1510: AND s.status = 'A'
1511: -- Belongs to SR Customer
1512: AND ( s.party_id = p_customer_id