The following lines contain the word 'select', 'insert', 'update' or 'delete':
, p_last_update_date IN DATE
, p_last_updated_by IN NUMBER
, p_last_update_login IN NUMBER
, p_context IN VARCHAR2
, p_attribute1 IN VARCHAR2
, p_attribute2 IN VARCHAR2
, p_attribute3 IN VARCHAR2
, p_attribute4 IN VARCHAR2
, p_attribute5 IN VARCHAR2
, p_attribute6 IN VARCHAR2
, p_attribute7 IN VARCHAR2
, p_attribute8 IN VARCHAR2
, p_attribute9 IN VARCHAR2
, p_attribute10 IN VARCHAR2
, p_attribute11 IN VARCHAR2
, p_attribute12 IN VARCHAR2
, p_attribute13 IN VARCHAR2
, p_attribute14 IN VARCHAR2
, p_attribute15 IN VARCHAR2
, p_ac_context IN VARCHAR2
, p_ac_attribute1 IN VARCHAR2
, p_ac_attribute2 IN VARCHAR2
, p_ac_attribute3 IN VARCHAR2
, p_ac_attribute4 IN VARCHAR2
, p_ac_attribute5 IN VARCHAR2
, p_ac_attribute6 IN VARCHAR2
, p_ac_attribute7 IN VARCHAR2
, p_ac_attribute8 IN VARCHAR2
, p_ac_attribute9 IN VARCHAR2
, p_ac_attribute10 IN VARCHAR2
, p_ac_attribute11 IN VARCHAR2
, p_ac_attribute12 IN VARCHAR2
, p_ac_attribute13 IN VARCHAR2
, p_ac_attribute14 IN VARCHAR2
, p_ac_attribute15 IN VARCHAR2
, x_return_status OUT NOCOPY VARCHAR2
) IS
l_price_adjustment_id NUMBER;
SELECT count(*)
INTO l_count
FROM OE_PRICE_ADJUSTMENTS
WHERE header_id = p_header_id
AND line_id = p_line_id
AND cost_id = p_freight_charge_id;
SELECT DISTINCT b.list_header_id,
a.list_line_id,
a.pricing_phase_id,
a.pricing_group_sequence
INTO l_list_header_id,
l_list_line_id,
l_pricing_phase_id,
l_pricing_group_sequence
FROM qp_list_lines a,
qp_list_headers_b b,
qp_list_headers_tl tl
WHERE b.currency_code = p_currency_code
AND tl.list_header_id = b.list_header_id
AND b.list_type_code = 'CHARGES'
AND tl.name = 'FREIGHTUPGIN'||p_currency_code
AND b.list_header_id = a.list_header_id
AND a.list_line_type_code = 'FREIGHT_CHARGE'
AND a.charge_type_code = l_charge_type_code
AND a.modifier_level_code = 'LINE'
AND ROWNUM = 1;
SELECT OE_PRICE_ADJUSTMENTS_S.nextval INTO l_price_adjustment_id FROM DUAL;
INSERT INTO OE_PRICE_ADJUSTMENTS
(
PRICE_ADJUSTMENT_ID
, CREATION_DATE
, CREATED_BY
, LAST_UPDATE_DATE
, LAST_UPDATED_BY
, LAST_UPDATE_LOGIN
, HEADER_ID
, AUTOMATIC_FLAG
, LINE_ID
, CONTEXT
, ATTRIBUTE1
, ATTRIBUTE2
, ATTRIBUTE3
, ATTRIBUTE4
, ATTRIBUTE5
, ATTRIBUTE6
, ATTRIBUTE7
, ATTRIBUTE8
, ATTRIBUTE9
, ATTRIBUTE10
, ATTRIBUTE11
, ATTRIBUTE12
, ATTRIBUTE13
, ATTRIBUTE14
, ATTRIBUTE15
, LIST_HEADER_ID
, LIST_LINE_ID
, LIST_LINE_TYPE_CODE
, UPDATED_FLAG
, UPDATE_ALLOWED
, APPLIED_FLAG
, CHANGE_REASON_CODE
, CHANGE_REASON_TEXT
, OPERAND
, ARITHMETIC_OPERATOR
, INVOICED_FLAG
, ESTIMATED_FLAG
, INC_IN_SALES_PERFORMANCE
, SPLIT_ACTION_CODE
, ADJUSTED_AMOUNT
, PRICING_PHASE_ID
, PRICING_GROUP_SEQUENCE
, CHARGE_TYPE_CODE
, CHARGE_SUBTYPE_CODE
, CREDIT_OR_CHARGE_FLAG
, INCLUDE_ON_RETURNS_FLAG
, COST_ID
, AC_CONTEXT
, AC_ATTRIBUTE1
, AC_ATTRIBUTE2
, AC_ATTRIBUTE3
, AC_ATTRIBUTE4
, AC_ATTRIBUTE5
, AC_ATTRIBUTE6
, AC_ATTRIBUTE7
, AC_ATTRIBUTE8
, AC_ATTRIBUTE9
, AC_ATTRIBUTE10
, AC_ATTRIBUTE11
, AC_ATTRIBUTE12
, AC_ATTRIBUTE13
, AC_ATTRIBUTE14
, AC_ATTRIBUTE15
)
VALUES
(
l_price_adjustment_id
, p_creation_date
, p_created_by
, p_LAST_UPDATE_DATE
, p_LAST_UPDATED_BY
, p_LAST_UPDATE_LOGIN
, p_HEADER_ID
, 'Y'
, p_LINE_ID
, p_CONTEXT
, p_ATTRIBUTE1
, p_ATTRIBUTE2
, p_ATTRIBUTE3
, p_ATTRIBUTE4
, p_ATTRIBUTE5
, p_ATTRIBUTE6
, p_ATTRIBUTE7
, p_ATTRIBUTE8
, p_ATTRIBUTE9
, p_ATTRIBUTE10
, p_ATTRIBUTE11
, p_ATTRIBUTE12
, p_ATTRIBUTE13
, p_ATTRIBUTE14
, p_ATTRIBUTE15
, l_LIST_HEADER_ID
, l_LIST_LINE_ID
, 'FREIGHT_CHARGE'
, 'Y'
, 'Y'
, 'Y'
, 'MISC'
, 'Upgraded Freight Charge'
, p_adjusted_amount
, 'LUMPSUM'
, 'Y'
, 'N'
, NULL
, NULL
, p_adjusted_amount
, l_PRICING_PHASE_ID
, l_PRICING_GROUP_SEQUENCE
, l_CHARGE_TYPE_CODE
, NULL
, 'D'
, 'Y'
, p_freight_charge_id
, p_AC_CONTEXT
, p_AC_ATTRIBUTE1
, p_AC_ATTRIBUTE2
, p_AC_ATTRIBUTE3
, p_AC_ATTRIBUTE4
, p_AC_ATTRIBUTE5
, p_AC_ATTRIBUTE6
, p_AC_ATTRIBUTE7
, p_AC_ATTRIBUTE8
, p_AC_ATTRIBUTE9
, p_AC_ATTRIBUTE10
, p_AC_ATTRIBUTE11
, p_AC_ATTRIBUTE12
, p_AC_ATTRIBUTE13
, p_AC_ATTRIBUTE14
, p_AC_ATTRIBUTE15
);
SELECT precision, nvl(minimum_accountable_unit, 0)
INTO l_precision, l_minimum_accountable_unit
FROM fnd_currencies
WHERE currency_code = p_Currency_Code;
SELECT b.currency_code
INTO l_curr_code
FROM ar_system_parameters_all a,
GL_SETS_OF_BOOKS b
WHERE NVL(a.org_id,-99) = NVL(p_org_id,-99)
AND a.set_of_books_id = b.set_of_books_id
AND ROWNUM =1;
SELECT b.currency_code
INTO l_curr_code
FROM GL_SETS_OF_BOOKS b
WHERE b.set_of_books_id = l_sob_id
AND ROWNUM =1;