[Home] [Help]
1457: --org outside the accessible orgs
1458: BEGIN
1459: SELECT 1
1460: INTO l_count2
1461: FROM qp_price_book_headers_all_b b, qp_price_book_headers_tl t
1462: WHERE b.price_book_header_id = t.price_book_header_id
1463: AND t.language = userenv('LANG')
1464: AND b.price_book_type_code = p_pb_input_header_rec.price_book_type_code
1465: AND b.customer_id = p_pb_input_header_rec.customer_attr_value
2378: --Check if the price book already exists for an org that is not accessible
2379: BEGIN
2380: SELECT 1
2381: INTO l_count
2382: FROM qp_price_book_headers_all_b b, qp_price_book_headers_tl t
2383: WHERE b.price_book_header_id = t.price_book_header_id
2384: AND t.language = userenv('LANG')
2385: AND b.price_book_type_code = p_pb_input_header_rec.price_book_type_code
2386: AND b.customer_id = p_pb_input_header_rec.customer_attr_value
2441: l_user_id,
2442: fnd_global.conc_login_id
2443: ) RETURNING price_book_header_id INTO l_price_book_header_id;
2444:
2445: INSERT INTO qp_price_book_headers_tl (
2446: price_book_header_id,
2447: price_book_name,
2448: pl_agr_bsa_name,
2449: creation_date,
2467: userenv('LANG')
2468: FROM FND_LANGUAGES L
2469: WHERE L.INSTALLED_FLAG in ('I','B')
2470: AND NOT EXISTS (SELECT NULL
2471: FROM qp_price_book_headers_tl T
2472: WHERE t.price_book_header_id =
2473: l_price_book_header_id
2474: AND t.language = l.language_code);
2475:
2895: IF SQL%FOUND THEN
2896: COMMIT;
2897: END IF;
2898:
2899: DELETE FROM QP_PRICE_BOOK_HEADERS_TL WHERE PRICE_BOOK_HEADER_ID in (p_price_book_header_id,d_price_book_header_id);
2900: IF SQL%FOUND THEN
2901: COMMIT;
2902: END IF;
2903: