Tool Dateinnamen

Vielleich hilft dieses Script. Es muss vom View aus gestartet werden und gibt eine Meldung mit den Themennamen und Datenquellen. Die Angaben werden auch in die Zwischenablage kopiert und können in z.B. Excel eingefügt werden.
Funktioniert allerdings nicht bei Ereignisthemen.

enter=10.aschar'+13.aschar
txt=""
txt2=""

if (av.getactivedoc.getthemes.count=0) then return nil end
for each th in av.getactivedoc.getthemes
ds=th.GetSrcName.getdatasource.asstring
'msgbox.info("-"+ds+"-","")
if((ds="") or (ds=nil)) then

if(th.is(ftheme)) then ds=th.getftab.getsrcname.asstring+enter end

if((ds=enter)) then
ds="Datenquelle für "+th.asstring.ucase.quote+ " nicht ermittelt"+enter
end
else
ds=th.asstring.ucase + 9.aschar+th.GetSrcName.getdatasource.asstring+enter
end
txt=txt+ds'(th.asstring.ucase +enter+th.GetSrcName.getdatasource.asstring+enter)
txt2=txt2+(th.GetSrcName.getdatasource.asstring)+enter
'txt=txt+"------------------------------------------------------------ --------------------------------------"+enter
end
clipboard.the.empty
clipboard.the.add(txt2)
clipboard.the.update
msgbox.report(txt,"Datenquelles der Themen im View (auch in Zwischenablage)")


Gruß
Jürgen

Hallo Roland,

in den MemoTools gibt es im Projektfenster den Eintrag 'Write Sources and Documents to Text File'. Hier werden dir alle Views und die jeweils enthaltene Themen übersichtlich mit Zusatzinfos in eine Datei geschrieben. Dazu werden die im Projekt vorhandenen Extensions, Layouts, Skripte, usw. aufgelistet. Ich finde die Funktion ganz hilfreich, kannst du ja neben Jürgens Skript auch mal ausprobieren...

Gruß von Maxilla