拆分日记账追溯视图3-来源于采购凭证类型为采购接收

来源于采购凭证类型为采购接收（视图：XLA_PO_AEL_GL_V）

select  gjh.je_source,
       
       gjh.name,
       
       gjh.doc_sequence_value,
       
       xag.vendor_id,
       
       xag.vendor_name vendor_name,  -- 供应商名称
       
       xag.vendor_site_id,
       
       xag.vendor_site_code vendor_address,  -- 供应商地点
       
        null  gl_desc,
       
        ' 采购接收\向供应商退货 '  invoice_desc,  -- 发票说明（摘要）
       
       gjh.default_effective_date,  -- GL日期
       
        --  xag.accounting_date,
       
       gcc.segment4,  -- 科目
       
       nvl(xag.entered_dr,  0 ) dr_quantity,  -- 借方
       
       nvl(xag.entered_cr,  0 ) cr_quantity,  -- 贷方

   from  gl.gl_je_headers gjh,
       
       gl.gl_je_lines gjl,
       
       ( select   201 ,
               
               poh.org_id,
               
               rrs.code_combination_id,
               
               rrs.entered_dr,
               
               rrs.entered_cr,
               
               rrs.accounted_dr,
               
               rrs.accounted_cr,
               
               rrs.accounting_date,
               
                --  RRS.CURRENCY_CONVERSION_DATE,
               
               pov.vendor_id,
               
               pov.vendor_name,
               
               poh.vendor_site_id,
               
               pvs.vendor_site_code,
               
               rrs.accounting_date,
               
                -- NVL(RRS.SOURCE_DOC_QUANTITY, NVL(RCT.SOURCE_DOC_QUANTITY, 0)),
               
                -- NVL(PLL.PRICE_OVERRIDE, POL.UNIT_PRICE),
               
               r.je_header_id,
               
               r.je_line_num
        
           from  gl_import_references r,
               
               rcv_receiving_sub_ledger rrs,
               
               po_distributions_all pod,
               
               po_line_locations_all pll,
               
               po_lines_all pol,
               
               po_headers_all poh,
               
               po_vendors pov,
               
               po_vendor_sites_all pvs
        
          where  pov.vendor_id  =  poh.vendor_id
              
            and  pvs.vendor_site_id  =  poh.vendor_site_id
              
            and  nvl(pvs.org_id,  - 99 )  =  nvl(poh.org_id,  - 99 )
              
            and  poh.po_header_id  =  pol.po_header_id
              
            and  pol.po_line_id  =  pll.po_line_id
              
            and  pll.line_location_id  =  pod.line_location_id
              
            and  pod.po_distribution_id  =  rrs.reference3
              
            and  r.gl_sl_link_table  =   ' RSL '
              
            and  rrs.gl_sl_link_id  =  r.gl_sl_link_id
              
            and  rrs.rcv_transaction_id  =  r.reference_5) xag,
       
        --  XLA_PO_AEL_GL_V xag, --采购来源追溯视图
       
       rcv_vrc_txs_vendint_v rvh,  -- 追溯到采购订单表
       
       gl_code_combinations_kfv gcc

  where  gjh.je_source  =   ' Purchasing '
      
    and  gjl.je_header_id  =  gjh.je_header_id
      
    and  gjh.status  =   ' P '
      
    and  gjl.code_combination_id  =  gcc.code_combination_id
      
    and  gcc.segment4  =   ' 220202 '   -- 应付无票
      
    and  gcc.segment2  =  nvl(p_syb_name, gcc.segment2)  -- 事业部
      
    and  xag.vendor_id  =  nvl(p_vendor_name, xag.vendor_id)
      
    and  xag.vendor_site_id  =  nvl(p_vendor_site, xag.vendor_site_id)
      
    and  gjh.period_name  between   ' 2009-01 '   and   ' 2009-01 '
      
    and  xag.je_header_id  =  gjl.je_header_id
      
    and  xag.je_line_num  =  gjl.je_line_num
      
    and  xag.rcv_receipt_num  =  rvh.order_num  -- 采购订单号