How to join (ap invoice distributions all) AP table info with PO Table

Below is the SQL for AP->PO->SLA->GL  for *R12*.
========================

select ph.segment1 po_number,
       aps.vendor_name,
       msi.segment1 item_number,
       msi.description item_description,
       
       'A/P PO Match' accrual_transaction,
       'AP*' source,
       (select organization_name
          from apps.org_organization_definitions
         where organization_id = pd.destination_organization_id)
       
       org,
       ai.invoice_num doc_number,
       ai.invoice_date doc_date,
       aid.invoice_line_number line,
       pl.unit_meas_lookup_code uom,
       
       aid.quantity_invoiced quantity,
       aid.unit_price,
       (nvl(xdl.unrounded_accounted_dr, 0) -
       nvl(xdl.unrounded_accounted_cr, 0)) accounted_amount,
       (nvl(xdl.unrounded_entered_cr, 0) - nvl(xdl.unrounded_entered_cr, 0)) entered_amount,
       xal.currency_code
  from apps.gl_je_headers                gjh,
       apps.gl_je_lines                  gjl,
       apps.gl_import_references         gir,
       apps.xla_ae_lines                 xal,
       apps.xla_ae_headers               xah,
       apps.xla_events                   xe,
       apps.xla_event_types_tl           xet,
       apps.xla_event_classes_tl         xect,
       apps.xla_distribution_links       xdl,
       apps.ap_invoice_distributions_all aid,
       apps.ap_invoices_all              ai,
       apps.po_headers_all               ph,
       apps.po_distributions_all         pd,
       apps.po_lines_all                 pl,
       apps.ap_suppliers                 aps,
       apps.mtl_system_items_b           msi
 where gjh.je_header_id = gjl.je_header_id
   and gjh.je_header_id = gir.je_header_id
   and gjl.je_header_id = gir.je_header_id
   and gir.je_line_num = gjl.je_line_num
   and gir.gl_sl_link_id = xal.gl_sl_link_id
   and xal.ae_header_id = xah.ae_header_id
   and xah.event_id = xe.event_id
   and xe.event_type_code = xet.event_type_code
   and xe.application_id = xet.application_id
   and xet.language = userenv('LANG')
   and xect.entity_code = xet.entity_code
   and xect.event_class_code = xet.event_class_code
   and xect.application_id = xe.application_id
   and xect.language = userenv('LANG')
   and xah.ae_header_id = xdl.ae_header_id
   and xal.ae_line_num = xdl.ae_line_num
   and xdl.source_distribution_type = 'AP_INV_DIST'
   and xdl.source_distribution_id_num_1 = aid.invoice_distribution_id
   and ai.invoice_id = aid.invoice_id
   and aid.po_distribution_id = pd.po_distribution_id
   and gjh.je_source = 'Payables'
   and ph.po_header_id = pd.po_header_id
   and pl.po_header_id = ph.po_header_id
   and pd.po_line_id = pl.po_line_id
   and pd.org_id = &org_id
   and ph.org_id = &org_id
   and ai.org_id = &org_id
   and aid.org_id = &org_id
   and gjl.code_combination_id = &ccid
   and ph.vendor_id = aps.vendor_id
   and msi.inventory_item_id = pl.item_id
   and msi.organization_id = pd.destination_organization_id