AP发票导入程序（WEB ADI）

 

CREATE OR REPLACE PACKAGE MEW_BATCH_IMPINVOICES_PKG IS

  PROCEDURE MAIN(P_BATCH_ID                  NUMBER,
                 P_ORG_ID                    NUMBER,
                 P_INVOICE_TYPE              VARCHAR2,
                 P_VENDOR_NUMBER             VARCHAR2,
                 P_VENDOR_SITE_CODE          VARCHAR2,
                 P_INVOICE_DATE              DATE,
                 P_INVOICE_NUMBER            VARCHAR2,
                 P_INVOICE_CURRENCY_CODE     VARCHAR2,
                 P_INVOICE_AMOUNT            VARCHAR2,
                 P_GL_DATE                   DATE,
                 P_EXCHANGE_RATE_TYPE        VARCHAR2 DEFAULT NULL,
                 P_EXCHANGE_RATE_DATE        DATE DEFAULT NULL,
                 P_EXCHANGE_RATE             NUMBER DEFAULT NULL,
                 P_INVOICE_DESCRIPTION       VARCHAR2 DEFAULT NULL,
                 P_TERMS                     VARCHAR2,
                 P_TERMS_DATE                DATE,
                 P_LINE_TYPE                 VARCHAR2,
                 P_DEBIT_ACCOUNT_AMOUNT      NUMBER,
                 P_DISTRIBUTION_ACCOUNT_CODE VARCHAR2,
                 P_LINE_DESCRIPTION          VARCHAR2 DEFAULT NULL);

END;
/
CREATE OR REPLACE PACKAGE BODY MEW_BATCH_IMPINVOICES_PKG IS
  /*===============================================
    copyright (c) sie business consulting services
                allrights reserved
  *================================================
  *================================================
  *   program name:
  *                MEW_BATCH_IMPINVOICES_PKG
  *   description:
  *                发票批量导入
  *   history:
  *   1.00   2011-01-06   sie_chenyueyong  creation
  *===============================================*/
  PROCEDURE MAIN(P_BATCH_ID                  NUMBER,
                 P_ORG_ID                    NUMBER,
                 P_INVOICE_TYPE              VARCHAR2,
                 P_VENDOR_NUMBER             VARCHAR2,
                 P_VEND