Oracle EBS应付模块批量支付

CREATE OR REPLACE Package xxx_STD_AP_AutoPMTs_pkg Is

  ----  ----

  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 get_BankUseID(P_Org_ID in Number, P_BankAcc_Number in varchar2)

    Return Number;

  Function get_BankAccID(P_Org_ID in Number, P_BankAcc_Number in varchar2)

    Return Number;

  Function get_BankDocID(P_BankAcc_ID   in Number,

                         P_BankDoc_Name in varchar2) Return Number;

  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 Build_PMTISs(P_Batch_ID Out Number,

                         P_Org_ID   in Number,

                         P_TPName   in varchar2,

                         P_PMT_Mode in varchar2);

  Procedure Build_InvISs(P_Batch_ID In Number,

                         P_Org_ID   In Number,

                         P_TPName   in varchar2,

                         P_PMT_Mode in varchar2);

  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 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 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;