Oracle Ebs R12 SLA与GL关系变化

Insert All When
  (Line_Id = 1) Then
Into Xla_Transaction_Entities
  (Upg_Batch_Id ,
   Entity_Id,
   ……)
Values
  (……) Into Xla_Events
  (Upg_Batch_Id, Entity_Id, Event_Id, ……)
Values
  (……)
Into Xla_Ae_Headers
  (Upg_Batch_Id,
   Entity_Idnt_Id ,
   Ae_Header_Id  ,
   ……)
Values
  (……) When
  (1 = 1) Then Into Xla_Ae_Lines
  (Upg_Batch_Id, Ae_Header_Id, Ae_Line_Num, ……)
Values
  (……)
Into Xla_Distribution_Links
  (Upg_Batch_Id ,
   Event_Id,
   Ae_Header_Id,
   Ae_Line_Num ,
   ……)
Values
  (……)
  Select …… From ……;

Function Mo_Policy(p_Obj_Schema In Varchar2, p_Obj_Name In Varchar2)
  Return Varchar2 Is
  l_Mo_Policy  Varchar2(4000);
  l_Log_Module Varchar2(240);
Begin
  If g_Log_Enabled Then
    l_Log_Module := c_Default_Module || ‘.MO_Policy‘;
  End If;
  If (c_Level_Procedure >= g_Log_Level) Then
    Trace(‘MO_Policy.Begin‘, c_Level_Procedure, l_Log_Module);
  End If;
  l_Mo_Policy := Mo_Global.Org_Security(Obj_Schema => Null,
                                        Obj_Name   => Null);
  If (c_Level_Statement >= g_Log_Level) Then
    Trace(‘l_mo_policy after calling mo_global.org_security = ‘ ||
          l_Mo_Policy,
          c_Level_Statement,
          l_Log_Module);
  End If;
  l_Mo_Policy := Regexp_Replace(l_Mo_Policy,
                                ‘org_id‘,
                                ‘security_id_int_1‘,
                                1,
                                1);
  -- Security identifiers are not populated. In case of, manual journal entires
  -- or third party merge events.
  -- bug 4717192, add the if condition
  If (l_Mo_Policy Is Not Null) Then
    l_Mo_Policy := l_Mo_Policy || ‘ OR security_id_int_1 IS NULL ‘;
  End If;
  Xla_Utility_Pkg.Print_Logfile(‘l_mo_policy after replace = ‘ ||
                                l_Mo_Policy);
  If (c_Level_Procedure >= g_Log_Level) Then
    Trace(‘MO_Policy.End‘, c_Level_Procedure, l_Log_Module);
  End If;
  Return(l_Mo_Policy);
End Mo_Policy;

Select Aid.Invoice_Id ，
       Aid.Invoice_Distribution_Id  分配ID ,
       Aid.Invoice_Line_Number     行号,
       Distribution_Line_Number    分配行号,
       Aid.Rcv_Transaction_Id      接收事务id,
       Aid.Amount               金额   
  From Ap_Invoice_Distributions Aid, Ap_Invoices Api
 Where Api.Invoice_Id = Aid.Invoice_Id
  -- And Aid.Invoice_Id = 35357
 Order By Aid.Invoice_Line_Number, Distribution_Line_Number;

Begin
  mo_global.init(‘M‘);
  End;

  -- And Xal.Ae_Header_Id = 14012  
   And Xdl.Application_Id = 200
 Order By Xdl.Source_Distribution_Id_Num_1;
 
Begin
  mo_global.init(‘M‘);
  End;

Select ‘_^_‘ Key,
       Gir.Je_Batch_Id ,
       --======xla_transaction_entities=========--------
       Xte.Application_Id         应用,
       Xte.Entity_Id,
       Xte.Ledger_Id              分类帐sob,
       Xte.Entity_Code,
       Xett.Name                  事务实体类型,
       Le.Name                    法人主体,
       Le.Legal_Entity_Identifier 人主体所得税纳税登记 ,--legal_entity_tax 
       
       ------------------------------
       /*  --AP_INVOICES
        Ap ** Invoice_Id
       
       --AP_PAYMENTS
        Ap付款 Check_Id
       
       --RECEIPTS
        收款
       
        Cash_Receipt_Id
       
       --TRANSACTIONS 事务处理
        销售 ** Customer_Trx_Id  
       ,
       Xte.Source_Id_Int_1 事务源对应ID , 
       ------------------------------
       /*--下面两个字段折旧的时候会有值
       ,xte.source_id_int_2       
       ,xte.source_id_int_3*/ 
       Xte.Security_Id_Int_1 Org_Id,
       Xte.Source_Application_Id  源对应应用,
       --======xla_event=========--------      
       Xe.Event_Type_Code, --Event type code
       Xent.Name              事件类型,
       Xe.Event_Status_Code, --Event status code
       Xe.Process_Status_Code, --Processing status code
       /*This flag indicates whether the event is on hold or not.
       
       possible values: (Y)--yes, (N)--No*/
       Xe.On_Hold_Flag,
       --==============xla_ae_headers=======-----
       Xah.Ledger_Id        Sob,
       Xah.Je_Category_Name, --General Ledger category name
       Xah.Accounting_Date,
       Xah.Period_Name      期间,
       
       /* ,xah.balance_type_code --Balance type (Actual, Budget, or Encumbrance) 
       ,xah.gl_transfer_date
       ,xah.accounting_entry_status_code
       ,xah.accounting_entry_type_code
       ,xah.zero_amount_flag*/
       --==============xla_ae_line=======-----
       
       Xal.Ae_Line_Num         行号,
       Xal.Code_Combination_Id 账户id,
       Gjl.Code_Combination_Id 日记帐gcc,
       /* ,xal.gl_transfer_mode_code  
       ,xal.accounting_class_code "会计分类"*/
       Xlp.Meaning        会计分类,
       Xal.Accounted_Dr  入账借项本位币,
       Xal.Accounted_Cr  入账贷项本位币,
       Xal.Currency_Code  币种,
       Xal.Entered_Dr     账户原币借项,
       Xal.Entered_Cr     账户原币贷项,
       Gir.Je_Line_Num    日记帐行号,
       Xte.Entity_Id,
       Xte.Application_Id,
       Xe.Event_Id,
       Xah.Ae_Header_Id,
       Xal.Ae_Line_Num
  From Xla_Transaction_Entities Xte,
       Xla_Entity_Types_Tl      Xett,
       Xle_Entity_Profiles      Le,
       Xla_Events               Xe,
       Xla_Event_Types_Tl       Xent,
       Xla_Ae_Headers           Xah,
       Xla_Ae_Lines             Xal,
       Xla_Lookups              Xlp,
       Gl_Import_References     Gir,
       Gl_Je_Lines              Gjl
 Where 1 = 1
   And Xte.Entity_Id = Xe.Entity_Id
   And Xte.Application_Id = Xe.Application_Id
   And Xte.Legal_Entity_Id = Le.Legal_Entity_Id(+)
   And Xah.Event_Id = Xe.Event_Id
   And Xah.Application_Id = Xe.Application_Id
   And Xent.Event_Type_Code = Xe.Event_Type_Code
   And Xent.Application_Id = Xe.Application_Id
   And Xent.Language = ‘ZHS‘
   And Xah.Ae_Header_Id = Xal.Ae_Header_Id
   And Xah.Application_Id = Xal.Application_Id
   And Xlp.Lookup_Type(+) = ‘XLA_ACCOUNTING_CLASS‘
   And Xlp.Lookup_Code(+) = Xal.Accounting_Class_Code
   And Gir.Gl_Sl_Link_Id = Xal.Gl_Sl_Link_Id
   And Gir.Gl_Sl_Link_Table = Xal.Gl_Sl_Link_Table
   And Gjl.Je_Header_Id = Gir.Je_Header_Id
   And Gjl.Je_Line_Num = Gir.Je_Line_Num
   And Xett.Entity_Code = Xte.Entity_Code
   And Xett.Application_Id = Xte.Application_Id
   And Xett.Language = ‘ZHS‘
   And Gir.Je_Batch_Id = 5511
   ;