R12_专题知识总结提炼-AP模块

 1 --付款银行信息
 2 SELECT AC.CHECK_NUMBER,
 3        CBA.BANK_ACCOUNT_ID BANK_ACCOUNT_ID,
 4        AC.BANK_ACCOUNT_NAME BANK_ACCOUNT_NAME,
 5        AC.BANK_ACCOUNT_NUM BANK_ACCOUNT_NUM,
 6        CBA.BANK_ACCOUNT_NAME,
 7        CBB.BANK_BRANCH_NAME
 8   FROM AP_CHECKS_ALL         AC,
 9        CE_BANK_ACCOUNTS      CBA,
10        CE_BANK_ACCT_USES_ALL CBAU,
11        CE_BANK_BRANCHES_V    CBB
12  WHERE AC.CE_BANK_ACCT_USE_ID = CBAU.BANK_ACCT_USE_ID(+)
13    AND CBAU.BANK_ACCOUNT_ID = CBA.BANK_ACCOUNT_ID(+)
14    AND CBB.BRANCH_PARTY_ID(+) = CBA.BANK_BRANCH_ID;

 1 Select cs.payment_document_name,
 2        DECODE(cs.MANUAL_PAYMENTS_ONLY_FLAG,
 3               ‘Y‘,
 4               ‘RECORDED‘,
 5               ‘N‘,
 6               ‘COMBINED‘)
 7   From ap_checks_all ch, CE_PAYMENT_DOCUMENTS CS, ap_lookup_codes lk
 8  Where CH.PAYMENT_DOCUMENT_ID = cs.PAYMENT_DOCUMENT_ID(+)
 9    AND DECODE(cs.MANUAL_PAYMENTS_ONLY_FLAG,
10               ‘Y‘,
11               ‘RECORDED‘,
12               ‘N‘,
13               ‘COMBINED‘) = lk.lookup_code(+)
14    AND lk.lookup_type(+) = ‘DISBURSEMENT TYPE‘;

 1 select zl.trx_id,
 2        zl.trx_line_id,
 3        zl.tax_regime_code,
 4        zl.tax,
 5        zl.tax_status_code,
 6        zl.tax_rate_code,
 7        zl.tax_rate
 8   from po_line_locations_all pll, zx_lines zl
 9  where pll.po_header_id = zl.trx_id
10    and pll.line_location_id = zl.trx_line_id
11    and zl.application_id(+) = 201
12    AND zl.trx_level_type(+) = ‘SHIPMENT‘;

/*-- 本例以PO匹配发票为例,请注意导入税的取值*/
DECLARE

  LN_INVOICE_ID NUMBER;

BEGIN
  
  LN_INVOICE_ID := AP.AP_INVOICE_LINES_INTERFACE_S.NEXTVAL;
  --Header
  INSERT INTO AP_INVOICES_INTERFACE
    (INVOICE_ID,
     INVOICE_NUM,
     INVOICE_TYPE_LOOKUP_CODE,
     INVOICE_DATE,
     VENDOR_SITE_ID,
     INVOICE_AMOUNT,
     INVOICE_CURRENCY_CODE,
     EXCHANGE_DATE,
     TERMS_ID,
     SOURCE,
     GROUP_ID,
     DESCRIPTION,
     PAYMENT_METHOD_LOOKUP_CODE,
     ORG_ID,
     PAYMENT_CURRENCY_CODE,
     VENDOR_ID,
     GOODS_RECEIVED_DATE,
     INVOICE_RECEIVED_DATE,
     PAYMENT_CROSS_RATE_DATE,
     GL_DATE,
     LAST_UPDATE_DATE
     
     )
    SELECT LN_INVOICE_ID,
           T.INVOICE_NUM||‘-‘||TO_CHAR(SYSDATE,‘YYYY/MM/DD‘),
           T.INVOICE_TYPE_LOOKUP_CODE,
           T.INVOICE_DATE,
           T.VENDOR_SITE_ID,
           T.INVOICE_AMOUNT,
           T.INVOICE_CURRENCY_CODE,
           T.EXCHANGE_DATE,
           T.TERMS_ID,
           T.SOURCE,
           10000 GROUP_ID,
           T.DESCRIPTION,
           T.PAYMENT_METHOD_LOOKUP_CODE,
           T.ORG_ID,
           T.PAYMENT_CURRENCY_CODE,
           T.VENDOR_ID,
           T.GOODS_RECEIVED_DATE,
           T.INVOICE_RECEIVED_DATE,
           T.PAYMENT_CROSS_RATE_DATE,
           T.GL_DATE,
           SYSDATE
      FROM AP_INVOICES_ALL T
     WHERE T.INVOICE_ID = 12261;
  
  -- LINES
  INSERT INTO AP_INVOICE_LINES_INTERFACE
    (INVOICE_ID,
     INVOICE_LINE_ID,
     LINE_TYPE_LOOKUP_CODE,
     DESCRIPTION,
     AMOUNT,
     PO_HEADER_ID,
     PO_LINE_ID,
     PO_LINE_LOCATION_ID,
     PO_DISTRIBUTION_ID,
     ASSETS_TRACKING_FLAG,
     QUANTITY_INVOICED,
     UNIT_PRICE,
     ORG_ID,
     PA_ADDITION_FLAG,
     LAST_UPDATE_DATE,
     CREATION_DATE,
     LINE_NUMBER,
     LINE_GROUP_NUMBER
     )
  
    SELECT LN_INVOICE_ID,
           AP.AP_INVOICE_LINES_INTERFACE_S.NEXTVAL INVOICE_LINE_ID,
           T.LINE_TYPE_LOOKUP_CODE,
           T.DESCRIPTION,
           T.AMOUNT,
           T.PO_HEADER_ID,
           T.PO_LINE_ID,
           T.PO_LINE_LOCATION_ID,
           T.PO_DISTRIBUTION_ID,
           T.ASSETS_TRACKING_FLAG,
           T.QUANTITY_INVOICED,
           T.UNIT_PRICE,
           T.ORG_ID,
           ‘N‘ PA_ADDITION_FLAG,
           T.LAST_UPDATE_DATE,
           SYSDATE,
           T.LINE_NUMBER,
           T.LINE_GROUP_NUMBER
           
      FROM AP_INVOICE_LINES_ALL T, AP_INVOICE_DISTRIBUTIONS_ALL T1
     WHERE T.INVOICE_ID = T1.INVOICE_ID
       AND T.LINE_NUMBER = T1.INVOICE_LINE_NUMBER
       AND T.LINE_TYPE_LOOKUP_CODE = ‘ITEM‘
       AND T.INVOICE_ID = 12261;

  
  -- TAX 
  INSERT INTO AP_INVOICE_LINES_INTERFACE
    (INVOICE_ID,
     INVOICE_LINE_ID,
     LINE_TYPE_LOOKUP_CODE,
     AMOUNT,
     ORG_ID,
     LAST_UPDATE_DATE,
     CREATION_DATE,
     PA_ADDITION_FLAG,
     LINE_NUMBER,
     LINE_GROUP_NUMBER,
     TAX_REGIME_CODE,
     TAX,
     TAX_RATE_CODE,
     TAX_STATUS_CODE,
     TAX_JURISDICTION_CODE,
     TAX_RATE,
     TAX_RATE_ID,
     PRORATE_ACROSS_FLAG
     
     )
  
    SELECT LN_INVOICE_ID,
           AP.AP_INVOICE_LINES_INTERFACE_S.NEXTVAL INVOICE_LINE_ID,
           LINE_TYPE_LOOKUP_CODE,
           AMOUNT,
           ORG_ID,
           SYSDATE,
           CREATION_DATE,
           ‘N‘ PA_ADDITION_FLAG,
           LINE_NUMBER,
           LINE_GROUP_NUMBER,
           TAX_REGIME_CODE,
           TAX,
           TAX_RATE_CODE,
           TAX_STATUS_CODE,
           TAX_JURISDICTION_CODE,
           TAX_RATE,
           TAX_RATE_ID,
           ‘Y‘ PRORATE_ACROSS_FLAG
           
      FROM AP_INVOICE_LINES_ALL T
     WHERE T.INVOICE_ID = 12261
       AND T.LINE_TYPE_LOOKUP_CODE = ‘TAX‘;
   COMMIT;
   EXCEPTION 
     WHEN OTHERS THEN 
       ROLLBACK;

END;