How to Update the Alias Table in Essbase & Planning Cube

Hi,

In this page you are going to see how to update an Alias Table using one of the method as below

For one Cube We can update maximum of 10 Alias Tables

1.User will request us to updated the Alias Table by sending an attachment which contains the new Alias description.

2.We have a macro which will extract that Alias Table by running a query to extract all the different dimension Alias tables.

Macro script of Alias_Macro :

Dim Filenam As String

Dim testcell As String

Dim ValidAcc(12xx, 1), ValidDept(2xx, 1), ValidDetail(xxx, 1), ValidCat(xx0, 1) As String

Dim q, NumAcc, NumDept, NumDet, NumCat, NotMatch As Integer

Private Sub Test1()

 Dim MyObj As Object, MySource As Object, file As Variant

 Dim filepath As String

 filepath = "C:\Temp\Aliases\"

   file = Dir(filepath)

   While (file <> "")

      If InStr(file, "xls") > 0 Then

        FileCopy filepath & file, "C:\Users\user\Desktop\Alias\Alias.xls"

        Workbooks.Open "C:\Users\user\Desktop\Alias\Alias.xls"

        Call AAMain

        Workbooks("Alias.xls").Close SaveChanges:=False

        Kill "C:\Users\user\Desktop\Alias\Alias.xls"

      End If

     file = Dir

  Wend

  MsgBox "DONE!"

End Sub

3.Use  " Allload  AppName" using the Alias Table bat file we update the Alias information

Eg: allload Training

It will run the below macro while loading the Alias Tables using Alload command

Private Sub Dim1_List()

       

    Workbooks("Alias_Macro.xls").Activate

    NumDept = Worksheets("Setup").Range("NumDim1").Value

    

    

    

    Worksheets("Valid Dim1").Activate

    Range("A1").Select

    

    For r = 1 To NumDept

        ValidDept(r, 1) = Worksheets("Valid Dim1").Cells(r, 1).Value

    Next r

    

    'MsgBox (ValidDept(10, 1))

    

End Sub

Private Sub Dim3_List()

       

    Workbooks("Alias_Macro.xls").Activate

    NumDet = Worksheets("Setup").Range("NumDetail").Value

    

    

    

    Worksheets("Valid Detail").Activate

    Range("A1").Select

    

    For r = 1 To NumDet

        ValidDetail(r, 1) = Worksheets("Valid Detail").Cells(r, 1).Value

    Next r

    

End Sub

Private Sub Load_Dim3_List()

       

    Workbooks("Alias_Macro.xls").Activate

    NumCat = Worksheets("Setup").Range("NumDim3").Value

        

    Worksheets("Valid Dim3").Activate

    Range("A1").Select

    

    For r = 1 To NumCat

        ValidCat(r, 1) = Worksheets("Valid Dim3").Cells(r, 1).Value

    Next r

    'MsgBox (ValidCat(20, 1))

End Sub

    

4.Using EAS Console we import the BalanceSheet Alias Table w.r.t the Location of our business. 

a.Login to the EAS  and Expand respective Application & Database

b.Open the Outline and select Properties to check the Alias Tables

c.Import the Alias by click on the Respective Alias table and Save it.

5. RefreshApp After updating the Alias Tables.

Eg: refreshapp AppName

Please read this page and let me know if you have any questions....

Addtional information :

Look at 609  Page about this "https://docs.oracle.com/cd/E40248_01/epm.1112/essbase_tech_ref.pdf"

Look at 153 page for more in detail "https://docs.oracle.com/cd/E40248_01/epm.1112/essbase_tech_ref.pdf"

A page file in Essbase will store the business data and this page will give you how to save that data....😃