Wie erstelle ich doppelseitige Tabellen?

\documentclass[a4paper,twoside]{scrartcl}

\newwrite\longtablefile
\makeatletter
%
% Erzeugung einer Beispieltabelle
%
\AtBeginDocument{%
\immediate\openout\longtablefile \jobname-longtable.tex
\immediate\write\longtablefile{%
  \detokenize{%
    \documentclass{article}^^J%
  }
}
\immediate\write\longtablefile{%
  \noexpand\usepackage[paperwidth=\the\dimexpr 2\textwidth\relax,
    paperheight=\the\textheight,margin=0pt]{geometry}
}
\immediate\write\longtablefile{%
  \detokenize{%
    \usepackage{longtable}^^J%
    \usepackage{booktabs}^^J%
    \begin{document}^^J%
    \begin{longtable}{@{}*4{p{.25\dimexpr
            \textwidth-6\tabcolsep\relax}}@{}}^^J%
      \toprule^^J%
      A & B & C & D \\^^J%
      \midrule^^J%
      \endhead
  }%
}%
\@tempcnta\z@
\@whilenum \@tempcnta<1000\do {%
  \advance\@tempcnta\@ne
  \immediate\write\longtablefile{%
    \the\@tempcnta: \detokenize{%
      erste Spalte & zweite Spalte & dritte Spalte & vierte Spalte \\
    }%
  }%
}
\immediate\write\longtablefile{%
  \detokenize{%
    \end{longtable}^^J%
    \label{pages}^^J%
    \end{document}
  }%
}
\immediate\closeout\longtablefile
\immediate\write18 {pdflatex \jobname-longtable.tex}
\immediate\write18 {pdflatex \jobname-longtable.tex}}
\makeatother

%
% Hier nun der Code, um die Beispieltabelle auf Doppelseiten einzubinden
%
\usepackage{xr}
\externaldocument[\jobname-longtable-]{\jobname-longtable}
\usepackage{refcount}
\usepackage{graphicx}

\makeatletter
\newcommand*\includedoublepages[2]{%
  \cleardoubleevenpage
  \@tempcnta\@ne
  \@whilenum \@tempcnta<#1\do{%
    \edef\reserved@a{%
      \noexpand\includegraphics[%
        page=\the\@tempcnta,
        viewport=0 0 \the\textwidth\space \the\textheight,%
        clip
      ]{#2}%
    }%
    \noindent\reserved@a
    \newpage
    \edef\reserved@a{%
      \noexpand\includegraphics[%
        page=\the\@tempcnta,
        viewport=\the\textwidth\space 0 \the\dimexpr 2\textwidth\relax\space \the\textheight,%
        clip
      ]{#2}%
    }%
    \noindent\reserved@a
    \newpage
    \advance\@tempcnta\@ne
  }%
}
\makeatother

\begin{document}
Auf den folgenden Seiten findet sich die Beispieltabelle.
\includedoublepages{\getpagerefnumber{\jobname-longtable-pages}}{\jobname-longtable.pdf}
\end{document}