;Dateiname -> Layoutname

(command "_.Layout" "_r" ""(vl-filename-base (getvar "DWGNAME")))