[Home] [Help]
396: where agreement_id = p_contract_id;
397:
398: cursor c_payment_id(p_quote_hdr_id number) is
399: select payment_id
400: from aso_payments
401: where quote_header_id = p_quote_hdr_id
402: and quote_line_id is null;
403:
404: L_API_NAME CONSTANT VARCHAR2(30) := 'handle_header_agreements';
771: ELSE
772: IBE_Util.Debug('existing cart,x_qte_header_rec.quote_header_id='|| x_qte_header_rec.quote_header_id);
773: IBE_Util.Debug('checking if a header payment record is already present...');
774: BEGIN
775: SELECT payment_id into l_org_payment_id FROM ASO_payments
776: WHERE QUOTE_HEADER_ID = x_qte_header_rec.quote_header_id AND quote_line_id is null;
777: IBE_Util.Debug('header payment record found,l_org_payment_id='||l_org_payment_id);
778: EXCEPTION
779: WHEN NO_DATA_FOUND THEN
3227: ,
3228: p_ln_Payment_Tbl IN OUT NOCOPY ASO_Quote_Pub.Payment_Tbl_Type
3229:
3230: ) is
3231: /*This cursor selects price_list_id and term_id(payment_term_id as in aso_payments) */
3232: cursor c_term_pricelist(p_agreement_id number) is
3233: select price_list_id, term_id
3234: from oe_agreements_b
3235: where agreement_id = p_agreement_id;
3232: cursor c_term_pricelist(p_agreement_id number) is
3233: select price_list_id, term_id
3234: from oe_agreements_b
3235: where agreement_id = p_agreement_id;
3236: /*This cursor selects payment_id from aso_payments based on the qte_header_id and quote_line_id*/
3237: cursor c_payment_id(p_quote_header_id number, p_quote_line_id number) is
3238: select payment_id
3239: from aso_payments
3240: where quote_header_id = p_quote_header_id
3235: where agreement_id = p_agreement_id;
3236: /*This cursor selects payment_id from aso_payments based on the qte_header_id and quote_line_id*/
3237: cursor c_payment_id(p_quote_header_id number, p_quote_line_id number) is
3238: select payment_id
3239: from aso_payments
3240: where quote_header_id = p_quote_header_id
3241: and quote_line_id = p_quote_line_id;
3242:
3243: rec_term_pricelist c_term_pricelist%rowtype;
3311: -- take care of price list id
3312: l_qte_line_tbl(l_ql_loop_counter).price_list_id := l_price_list_id;
3313:
3314: -- now deal with payment term id -
3315: /*Check for the presence of the payment record in the database(aso_payments),
3316: if the record is present then operation code in the l_ln_payment_tbl= 'UPDATE'
3317: else it is 'CREATE'*/
3318: l_payment_id := fnd_api.g_miss_num;
3319: for rec_payment_id in c_payment_id( l_qte_line_tbl(l_ql_loop_counter).quote_header_id,
6409:
6410: cursor c_check_payment_rec_exist(l_quote_header_id number)
6411: is
6412: select payment_id, PAYMENT_TYPE_CODE
6413: from ASO_payments
6414: where QUOTE_HEADER_ID = l_quote_header_id and
6415: quote_line_id is null;
6416: rec_payment_rec_exist c_check_payment_rec_exist%rowtype;
6417: