115: -- handle_manual_pay
116: select UPPER(currency_conversion_type),
117: currency_conversion_rate,
118: currency_conversion_date
119: from okl_k_headers
120: where id =p_contract_id;
121:
122: l_functional_currency okl_trx_contracts.currency_code%TYPE;
123:
180: l_rctv_rec.ORG_ID := l_org_id;
181: i := 1;
182:
183: -- populate the currency conversion fields
184: -- get the 3 fields from okl_k_headers for a contract
185: --for bug #(3040085)
186: --jsanju 07/10
187: -- populate this only if receipt currency is diff from
188: -- functional currency.
326: cursor c_get_exchange_info (p_invoice_id IN NUMBER) IS
327: select upper(chr.currency_conversion_type),
328: chr.currency_conversion_rate,
329: chr.currency_conversion_date
330: from okl_k_headers chr,
331: okl_cnsld_ar_lines_b lln,
332: okl_cnsld_ar_strms_b strm
333: where strm.khr_id =chr.id
334: and lln.cnr_id =p_invoice_id
382: END IF;
383:
384:
385: -- populate the currency conversion fields
386: -- get the 3 fields from okl_k_headers for a contract
387: --for bug #(3040085)
388: --jsanju 07/10
389: -- populate this only if receipt currency is diff from
390: -- functional currency.