Oracle EBS应付模块批量支付

CREATE OR REPLACE Package xxx_STD_AP_AutoPMTs_pkg Is

  /*===============================================================

  *   Copyright (C) Andy P. Consulting Co., Ltd All rights reserved

  * ===============================================================

  *    Program Name:   xxx_STD_AP_AutoPMTs_pkg

  *    Author      :   Andy P.@xxxxxx.Com

  *    Date        :   2013-02-28

  *    Purpose     :   Pl/Sql Html Report PKG

  *                    To Aotu PMTs The Invoiis.

  *

  *    Update History

  *    Version    Date          Name                              Description

  *    --------  ----------  ----------------------------------  --------------------

  *     V1.0     20136-02-28     Andy P.@xxxxxx.Com.         Creation

  *

    ===============================================================*/

  ----  ----

  P_FULLPMT_DFlag varchar2(2) := 'P';

  L_Check_PName   varchar2(50) := 'AutoPMTs@AndyPengYu.Com:';

  L_Check_Auto_PPMTs  varchar2(30) := 'Auto_PPMTs*';

  L_Check_Auto_FOPMTs varchar2(30) := 'Auto_FOPMTs*';

  L_Check_Auto_FMPMTs varchar2(30) := 'Auto_FMPMTs*';

  P_PMTsTii_FlagM varchar2(2) := 'M';

  P_PMTsTii_FlagQ varchar2(2) := 'Q';

  P_PMTsTii_FlagR varchar2(2) := 'R';

  type DCAmount is table Of Number index by binary_integer;

  type DCVarChar is table Of varchar2(30000) index by binary_integer;

  P_CPMTsLookup_Code varchar2(20) := 'NEGOTIABLE';

  P_WPMTsLookup_Code varchar2(20) := 'ISSUED';

  P_STDInvoii_Status varchar2(20) := 'APPROVED';

  P_PREInvoii_Status varchar2(20) := 'UNPAID';

  /*===========================================================

  ---- Function Name:    get_BankUseID()

  ---- To get the BankUseID.

  =============================================================*/

  Function get_BankUseID(P_Org_ID in Number, P_BankAcc_Number in varchar2)

    Return Number;

  /*===========================================================

  ---- Function Name:    get_BankAccID()

  ---- To get the get_BankAccID.

  =============================================================*/

  Function get_BankAccID(P_Org_ID in Number, P_BankAcc_Number in varchar2)

    Return Number;

  /*===========================================================

  ---- Function Name:    get_BankDocID()

  ---- To get the get_BankDocID.

  =============================================================*/

  Function get_BankDocID(P_BankAcc_ID   in Number,

                         P_BankDoc_Name in varchar2) Return Number;

  /*===========================================================

  ---- Function Name:    get_xxxRate()

  ---- To get the get_xxxRate.

  =============================================================*/

  Function get_xxxRate(P_From_Curr       in varchar2,

                       P_To_Curr         in varchar2,

                       P_xRate_Ti        varchar2,

                       P_Accounting_Date in Date) Return Number;

  /*===========================================================

  ---- Procedure Name:    Build_PMTISs()

  ---- To Build the PMTs Of The Details.

  =============================================================*/

  Procedure Build_PMTISs(P_Batch_ID Out Number,

                         P_Org_ID   in Number,

                         P_TPName   in varchar2,

                         P_PMT_Mode in varchar2);

  /*===========================================================

  ---- Procedure Name:    Build_InvISs()

  ---- To Build the Invoices Need to Be Paid Of The Details.

  =============================================================*/

  Procedure Build_InvISs(P_Batch_ID In Number,

                         P_Org_ID   In Number,

                         P_TPName   in varchar2,

                         P_PMT_Mode in varchar2);

  /*===========================================================

  ---- Procedure Name:    Auto_PPMTs()

  =============================================================*/

  Procedure Auto_PPMTs(P_Suc_Flag Out Varchar2,

                       P_Suc_Log  Out Varchar2,

                       P_Batch_ID in Number,

                       P_Org_ID   In Number,

                       P_TPName   in varchar2,

                       P_PMT_Mode in varchar2);

  /*===========================================================

  ---- Procedure Name:    Auto_FOPMTs() Of FullPMTs. For One Installment

  =============================================================*/

  Procedure Auto_FOPMTs(P_Suc_Flag Out Varchar2,

                        P_Suc_Log  Out Varchar2,

                        P_Batch_ID In Number,

                        P_Org_ID   In Number,

                        P_TPName   in varchar2,

                        P_PMT_Mode in varchar2);

  /*===========================================================

  ---- Procedure Name:    xxxMain()

  ---- The Main Procedure Of This pkg.

  =============================================================*/

  Procedure xxxMain(P_Suc_Flag     Out Varchar2,

                    P_Suc_Log      Out Varchar2,

                    P_Org_ID       in Number,

                    P_TPName       in varchar2,

                    P_PMT_Mode     in varchar2,

                    P_FULLPMT_Flag in varchar2 Default P_FULLPMT_DFlag);

End xxx_STD_AP_AutoPMTs_pkg;

来自 “ ITPUB博客 ” ，链接：http://blog.itpub.net/31515388/viewspace-2637278/，如需转载，请注明出处，否则将追究法律责任。

转载于:http://blog.itpub.net/31515388/viewspace-2637278/