625: EXIT;
626: END LOOP; -- end only one receipt record
627:
628: -- update transaction receipt status ...
629: UPDATE okl_trx_csh_receipt_b
630: SET rcpt_status_code = l_rcpt_status_code
631: WHERE ID = l_rct_id;
632:
633: -- Update Ar receipt Id , if it successfully created
631: WHERE ID = l_rct_id;
632:
633: -- Update Ar receipt Id , if it successfully created
634: IF (l_return_status = okl_api.g_ret_sts_success) THEN
635: UPDATE okl_trx_csh_receipt_b
636: SET ID = l_cash_receipt_id
637: WHERE ID = l_rct_id;
638:
639: UPDATE okl_trx_csh_receipt_tl