根据PO NO找PR NO

作者：Sky

FUNCTION get_req_nbr(p_po_no IN VARCHAR2) RETURN VARCHAR2 IS
    CURSOR csr_req IS
      SELECT pod.req_header_reference_num
        FROM po_headers_all             poh,
             po_distributions_all       pod,
             po_req_distributions_all   prod,
             po_line_locations_all      poll,
             po_requisition_lines_all   prl,
             po_requisition_headers_all prh
       WHERE prh.requisition_header_id = prl.requisition_header_id
         AND prod.requisition_line_id = prl.requisition_line_id
         AND prod.distribution_id = pod.req_distribution_id
         AND poll.line_location_id = pod.line_location_id
         AND poll.po_header_id = poh.po_header_id
         AND poh.segment1 = p_po_no
    retval po_distributions_all.req_header_reference_num%TYPE
  BEGIN
    OPEN csr_req
    FETCH csr_req
      INTO retval
    CLOSE csr_req
    RETURN retval
  END

posted on 2011-05-10 22:20 Gutirez 阅读(309) 评论(0) 收藏举报