479: p_process_flag := jai_constants.successful ;
480: p_process_message := null ;
481:
482: for receipt_rec IN (SELECT receipt_num
483: FROM rcv_shipment_headers
484: WHERE shipment_header_id = p_shipment_header_id)
485: loop
486: v_receipt_num := receipt_rec.receipt_num;
487: end loop;