Query to find rcv shipment lines not yet deliver ( Pending For Binning)

 SELECT   msi.segment1 part_num,
           poh.segment1 po_num,
           pra.release_num,
           TRUNC (poh.creation_date) po_date,
           TRUNC (PRA.APPROVED_DATE) Release_Approved_Date,
           SUM (quantity) Quantity,
           (SELECT   shipment_num
              FROM   rcv_shipment_headers
             WHERE   shipment_header_id = rs.shipment_header_id)
              shipment_num
    FROM   rcv_supply rs,
           mtl_system_items_b msi,
           po_headers_all poh,
           po_releases_all pra
   WHERE       to_organization_id = :p_org_id --171
           AND rs.item_id = msi.inventory_item_id
           AND rs.to_organization_id = msi.organization_id
           AND rs.PO_HEADER_ID = poh.PO_HEADER_ID
           AND rs.po_release_id = pra.po_release_id
           AND poh.po_header_id = pra.po_header_id
--and             substr(quantity,1,1) = '-' 
GROUP BY   msi.segment1,
           poh.segment1,
           pra.release_num,
           rs.shipment_header_id,
           PRA.APPROVED_DATE,
           poh.creation_date