documentclass[english]{scrartcl}
usepackage{babel,blindtext,framed}
newcommandlorname{Highlights}
newcommandlorext{lor} %Dateierweiterung
newcommandlortmp{}
newcounter{Highlights}
setcounter{Highlights}{0}
newcommand{HigH}[2][empty]{%
  textit{%
    Highlight refstepcounter{Highlights}theHighlights:}%
  vspace{-0.75baselineskip}
  begin{framed}%
    #2
  end{framed}%
  ifx#1empty
  renewcommandlortmp{#2}
  elserenewcommandlortmp{#1}
  fi%
addcontentsline{lorext}{subsection}{theHighlightsquadlortmp}
}
makeatletter
newcommandlistofrecommendations{%
section*{lorname}
markboth{lorname}{}
@starttoc{lorext}
}
makeatother
begin{document}


section{First section}
label{CLA:first-section}


HigH{First recommendation}
HigH{Second highlight}
HigH[Too long to print (not: to long to print)]{blindtext}
clearpage
listofrecommendations
end{document}