How To get A Text list Of All Templates In All Teams?

[former_member674480]

Hello. My question is similar to this question, but is none answered. I have many teams and many folders and excel templates. I need a string list of all to handle a testing check list. Doing this manually would take days maybe a week. Is there a way to get a full list of Excel templates by Team (including Company) ---> Folder(s)---> file name?

I look at apis and saw GetFolderListApplies which says it could get file name, but I do not understand how to run this and not showing up when I look at normal VBA api tools like getActiveConnetion.

Here is example of what I have:

This would be great solution (but needed for probably 300 reports)

[msapey · Accepted solution]

Hi Anish,

I suggest getting a list of the files from the back end.

Use transaction SE16 and export UJF_DOC.

Enter the environment name in APPSET, and remove the max number of hits (defaults to 500)

One thing you need to remember with this is to hide the column DOC_CONTENT as this actually contains the file and won't export to Excel.

Just doing this you end up with a list of all files on the server (you could filter the docdesc to a particular path) but I prefer to do the filter in Excel.

If you filter in excel for DocName containing "TEAM FILES" you will get the list of files in the team folders that you wanted.

You will probably have to tidy this up a little, but you should be able to get the list in a couple of minutes....

Regards,

Mark

[former_member186338 · Accepted solution]

Good solution, but also possible using VBA and EPM API

[former_member674480 · Accepted solution]

I was able to get this to work by adding a filter for the DOCTYPE to only include:

• xlt
• xltx
• xls
• xlsb
• xltm
• xlsx
• xlsm

Thank you for help.

[former_member186338]

Easy! Sample code:

Public Sub Test()
Dim epm As New FPMXLClient.EPMAddInAutomation
Dim fld() As FolderContent
Dim lngTemp As Long

'List for Root Report folder for team Company
fld = epm.GetFolderList("WEBEXCEL", "REPORTLIBRARY", "")

For lngTemp = 0 To UBound(fld)
    Debug.Print fld(lngTemp).Name & " " & fld(lngTemp).Type
Next lngTemp

End Sub

Look on Type property - if it's "Folder" then you can look on the content of this folder same way...

[msapey]

Hi Vadim,

Wouldn't you have to be a member of all of the teams in order to be able to use VBA to get the list of files.

With the export, this should not matter.

Regards,

Mark

[former_member186338]

msapey

If you have access to SE16 then you have some administrative privileges 🙂

If you are BPC admin the you can list all Teams folders.

[former_member674480]

Good Day Vadim. Thank you for friendly response. I am getting this error in code. I do have FPMXL reference on, and can run other API with epm object (msgbox code works as expected). Not sure why FolderContent is not recognized?

[former_member186338]

anish.patel420

AO version/SP used? No issues on the latest with EPM 38 patch 3!

or use standalone EPM Add-in...

Also try:

Dim fld() As FPMXLClient.FolderContent