\ProvidesPackage{officeoverview}[2006/08/27 v0.5 by daleif]
% 
% HISTORY
% 20060228 Fixed a bug in the continued header
% 20060301 Changed the name of the color used to separate the columns
% 20060404 Fixed a bug in \PrintSimpleOfficeList, forgotten to add 1
%          to the number of entries
% 20060827 Fixed a bug reported by Holger Andreas Nielsen. The
%          autodelete feature did not work as it should
%
%%
%% This package be distributed and/or modified under the
%% conditions of the LaTeX Project Public License, either version 1.3
%% of this license or (at your option) any later version.
%% The latest version of this license is in
%%   http://www.latex-project.org/lppl.txt
%% and version 1.3 or later is part of all distributions of LaTeX
%% version 2003/12/01 or later.
%% 
%% This work has the LPPL maintenance status "maintained".
%% 
%% The Current Maintainer of this work is Lars Madsen (daleif@imf.au.dk).
%%

\RequirePackage{calc,ifthen,color,longtable}

\def\blankheight{0pt}
\newif\ifDLFnosort
\newif\ifDLFnoautodel

\def\dlf@Spring@Title{Forår}
\def\dlf@Fall@Title{Efterår}
\def\dlf@Continues@String{Fortsættes}
\def\dlf@Continued@String{Fortsat}
\def\dlf@LastCompile{Senest kompileret}
\def\dlf@PlacedIn{placeret i}
\def\dlf@ShortListTitle{Kort oversigt}

 \newcommand\dlf@month@NumToName[1]{%
  \dlf@Title@FontSize%
  \ifcase#1\relax%
  \or Januar%
  \or Februar%
  \or Marts%
  \or April%
  \or Maj%
  \or Juni%
  \or Juli%
  \or August%
  \or September%
  \or Oktober%
  \or November%
  \or December\fi%
}

\newcommand\dlf@month@NumToName@English[1]{%
  \dlf@Title@FontSize%
  \ifcase#1\relax%
  \or January%
  \or February%
  \or March%
  \or April%
  \or May%
  \or June%
  \or July%
  \or August%
  \or September%
  \or October%
  \or November%
  \or December\fi%
}



\DeclareOption{english}{
  \def\dlf@Spring@Title{Spring}
  \def\dlf@Fall@Title{Fall}
  \def\dlf@Continues@String{Continues}
  \def\dlf@Continued@String{Continued}
  \def\dlf@LastCompile{Last complied at}
  \def\dlf@PlacedIn{placed in}
  \def\dlf@ShortListTitle{Short overview}
  \let\dlf@month@NumToName\dlf@month@NumToName@English
}


\DeclareOption{showblank}{\def\blankheight{3pt}}
\DeclareOption{nosort}{\DLFnosorttrue}
\DeclareOption{noautodelete}{\DLFnoautodeltrue}
\ProcessOptions\relax


\def\monthrulewidth{1pt}

% internal variables


\newlength\dlf@len
\newcounter{dlfa}
\newlength\dlf@dayscale
\newcounter{hours}
\newcounter{minutes}
\definecolor{ColSepColor}{gray}{0.9}
\newlength\dlf@bs
\setlength\dlf@bs{\baselineskip}
\newcounter{dlf@entry}
\newcounter{dlf@Spring@NumberOfLines}
\newcounter{dlf@Fall@NumberOfLines}
\newlength\dlf@Spring@MaxWidth
\newlength\dlf@Fall@MaxWidth
\newlength\dlf@NamePad
\setlength\dlf@NamePad{1em}
\newlength\dlf@LapBlank
\settowidth\dlf@LapBlank{00/00}
%\addtolength\dlf@LapBlank{1em}

\newcounter{dlf@counterA}
\newcounter{dlf@counterB}
\newcounter{dlf@counterC}
\newcounter{dlf@counterD}
% this will only work on eTeX-systems
\def\int@div@truncate@nn#1#2{\numexpr (2*#1 - #2) / (2* #2)\relax}
\edef\dlf@now{\two@digits{\the\day}.\two@digits{\the\month}.\the\year,
  \two@digits{\number\int@div@truncate@nn{\time}{60}}:%
  \two@digits{\number\numexpr\time-\int@div@truncate@nn{\time}{60}*60\relax}
}

\setcounter{dlf@counterA}{\month*100+\day}
\edef\dlf@today@MMDD{\thedlf@counterA}



\def\dlf@start@DD{}
\def\dlf@start@MM{}
\def\dlf@end@DD{}
\def\dlf@end@MM{}
\def\dlf@slsplit#1#2#3/#4\delimiter{\def#1{#3}\def#2{#4}}
\newcommand\@ParseDate[3]{%
  \def\dlf@slcheck##1/##2\delimiter{% tests whether there is a /
    \ifx\dlf@slcheck##2\slcheck%
    \relax\PackageError{test}{Bad date syntax, missing /}{}%
    \else%
     \expandafter\dlf@slsplit\expandafter#1\expandafter#2#3\delimiter%
    \fi%
  }%
  \dlf@slcheck#3/\delimiter% runs the \aucheck command defined above
}

\def\dlf@Title@FontSize{}
\newcommand\dlf@TWidth@adjust{%
  \settowidth\@tempdima{September}%
  \setlength\@tempdimb{\dlf@dayscale*31-5pt}%
  \ifdim\@tempdimb<\@tempdima%
    \settowidth\@tempdima{\small September}%
    \ifdim\@tempdimb<\@tempdima%
      \settowidth\@tempdima{\footnotesize September}%
      \ifdim\@tempdimb<\@tempdima%
        \settowidth\@tempdima{\scriptsize September}%
        \ifdim\@tempdimb<\@tempdima%
          \def\dlf@Title@FontSize{\tiny}%
        \else%
          \def\dlf@Title@FontSize{\scriptsize}%
        \fi%
      \else%
        \def\dlf@Title@FontSize{\footnotesize}%
      \fi%
    \else%
      \def\dlf@Title@FontSize{\small}%
    \fi%
  \fi%
}


\newcommand\dlf@insertblankmonths[1]{%
  \begingroup%
  \setcounter{dlf@counterC}{#1}%
  \ifnum\value{dlf@counterC}>0%
  \addtocounter{dlf@counterC}{-1}%
  \fi%
  \dlf@monthtodays{\value{dlf@counterC}}%
  \edef\scale{\value{dlfa}}%
  {\color{blue}\rule{\dlf@dayscale*\scale}{\blankheight}}%
  \endgroup%
}
\newcommand\dlf@insertblankdays[1]{%
  \begingroup%
  \setcounter{dlf@counterC}{#1}%
  \ifnum\value{dlf@counterC}>0%
  \addtocounter{dlf@counterC}{-1}%
  \fi%
  \edef\scale{\value{dlf@counterC}}%
  {\color{red}\rule{\dlf@dayscale*\scale}{\blankheight}}%
  \endgroup%
}

\newcommand\dlf@insertblankspaceSpring[2]{%
  \dlf@insertblankmonths{#2}%
  \dlf@insertblankdays{#1}%
}

\newcommand\dlf@insertblankspaceFall[2]{%
  \dlf@monthtodays{#2-1}%
  \setcounter{dlf@counterC}{\value{dlfa}}%
  \dlf@monthtodays{6}%
  \addtocounter{dlf@counterC}{-\value{dlfa}}%
  \edef\scale{\value{dlf@counterC}}%
  \setlength\@tempdima{\dlf@dayscale*\scale}%
  \hspace*{\@tempdima}%
  \dlf@insertblankdays{#1}%
}



\newcommand\dlf@print@MonthRule[4]{%
  \setcounter{dlf@counterC}{0}%
  \ifnum#4>#2%
  \edef\mynum{\dlf@daysinmonth{#2}}% days in start month
  \addtocounter{dlf@counterC}{\mynum}%
  \addtocounter{dlf@counterC}{-#1+1}%  subtract the number of days gone in this
                         % month
  \dlf@monthtodays{#4-1}%
  \addtocounter{dlf@counterC}{\value{dlfa}}% 
  \dlf@monthtodays{#2}%
  \addtocounter{dlf@counterC}{-\value{dlfa}}%
  \addtocounter{dlf@counterC}{#3}%
  \else%
    % because of pretest we know that #2=#4
    \addtocounter{dlf@counterC}{#3-#1+1}%
  \fi%
  \edef\scale{\value{dlf@counterC}}%
  \rule[2pt]{\dlf@dayscale*\scale}{\monthrulewidth}
}



\newcommand\dlf@sometext[2][l]{\colorbox{white}{\makebox[\widthof{00/00}][#1]{#2}}}
\newcommand\dlf@sometextR[2][l]{\colorbox{white}{\makebox[\widthof{00/00}][#1]{#2}}}


\newcommand\dlf@daysinmonth[1]{%
  \ifcase#1\PackageError{officeoverview}{Bad month number}{}%
  \or31%
  \or\ifnum\year=2008 29\else28\fi%
  \or31%
  \or30%
  \or31%
  \or30%
  \or31%
  \or31%
  \or30%
  \or31%
  \or30%
  \or31%
  \fi}
  


\newcommand\dlf@monthtodays[1]{%
  \setcounter{dlfa}{0}%
  \setcounter{dlf@counterD}{#1}%
  \whiledo{\value{dlf@counterD}>0}{%
  \ifcase\value{dlf@counterD}\relax%
  \or\addtocounter{dlfa}{31}% jan
  \or\ifnum\year=2008\addtocounter{dlfa}{29}%
  \else\addtocounter{dlfa}{28}\fi% feb
  \or\addtocounter{dlfa}{31}% mar
  \or\addtocounter{dlfa}{30}% apr
  \or\addtocounter{dlfa}{31}% may
  \or\addtocounter{dlfa}{30}% jun
  \or\addtocounter{dlfa}{31}% jul
  \or\addtocounter{dlfa}{31}% aug
  \or\addtocounter{dlfa}{30}% sep
  \or\addtocounter{dlfa}{31}% oct
  \or\addtocounter{dlfa}{30}% nov
  \or\addtocounter{dlfa}{31}\fi% dec
  \addtocounter{dlf@counterD}{-1}}}


\newcommand\dlf@marker{\rlap{\color{ColSepColor}\smash{\rule[-5cm]{.5pt}{5cm+5pt}}}}

\newcommand\dlf@Print@Spring@Months{%
  \setcounter{dlf@counterD}{1}%
  \whiledo{\value{dlf@counterD}<7}{%
    \makebox[\dlf@dayscale*\dlf@daysinmonth{\value{dlf@counterD}}][c]{%
      \dlf@month@NumToName{\value{dlf@counterD}}}%
    \stepcounter{dlf@counterD}%
  }%
}

\newcommand\dlf@Print@Fall@Months{%
  \setcounter{dlf@counterD}{7}%
  \whiledo{\value{dlf@counterD}<13}{%
    \makebox[\dlf@dayscale*\dlf@daysinmonth{\value{dlf@counterD}}][c]{%
      \dlf@month@NumToName{\value{dlf@counterD}}}%
    \stepcounter{dlf@counterD}%
  }%
}



\newcommand\dlf@markmonths@Spring[1][ColSepColor]{%
  \renewcommand\dlf@marker{%
    \rlap{\color{#1}\raisebox{0pt}[0pt][0pt]{\rule[-25pt]{.5pt}{\dlf@bs+25pt}}}}%
  \dlf@marker%
  \setcounter{dlf@counterD}{1}%
  \whiledo{\value{dlf@counterD}<7}{%
    \setlength\@tempdima{\dlf@dayscale*\dlf@daysinmonth{\value{dlf@counterD}}}%
    \hspace\@tempdima\dlf@marker%
    \stepcounter{dlf@counterD}%
  }%
}

\newcommand\dlf@markmonths@Fall[1][ColSepColor]{%
  \renewcommand\dlf@marker{\rlap{\color{#1}\smash{\rule[-25pt]{.5pt}{\dlf@bs+25pt}}}}%
  \dlf@marker%
  \setcounter{dlf@counterD}{7}%
  \whiledo{\value{dlf@counterD}<13}{%
    \setlength\@tempdima{\dlf@dayscale*\dlf@daysinmonth{\value{dlf@counterD}}}%
    \hspace\@tempdima\dlf@marker%
    \stepcounter{dlf@counterD}%
  }
}


\newcommand\dlf@verify@dates[4]{%
  % #1,#2: start DD/MM
  % #3,#4: end DD/MM
  % start month
  \ifnum#2>12%
    \PackageError{officeoverview}{Start month too large}{}%
  \fi%
  \ifnum#2<1%
    \PackageError{officeoverview}{Start month too small}{}%
  \fi%
  \ifnum#4>12%
    \PackageError{officeoverview}{End month too large}{}%
  \fi%
  \ifnum#4<1%
    \PackageError{officeoverview}{End month too small}{}%
  \fi%
  \ifnum#1<1%
    \PackageError{officeoverview}{Start day <1 ????}{}%
  \fi%
  \ifnum#3<1%
    \PackageError{officeoverview}{End day <1 ????}{}%
  \fi%
  \ifnum#4<#2%
    \PackageError{officeoverview}{End month should not be less than the start
      month}{}%
  \fi% 
  \ifnum#4=#2%
    \ifnum#3<#1%
     \PackageError{officeoverview}{End day should not be less than the start
       day (when the months are equal)}{}%
    \fi%
  \fi%
  \ifnum#1>\dlf@daysinmonth{#2}%
    \PackageError{officeoverview}{Excatly how many days is there in
      the start month?}{}%
  \fi%
  \ifnum#3>\dlf@daysinmonth{#4}%
    \PackageError{officeoverview}{Excatly how many days is there in
      the end month?}{}%
  \fi%
}





\newcommand\Office[4]{%
  % #1 = Full name
  % #2 = Start date, DD/MM
  % #3 = End date, DD/MM
  % #4 = Office, IMF notation, e.g. A3.15
  \@bsphack%
  \stepcounter{dlf@entry}%
  \@namedef{dlf@\thedlf@entry @Name}  {#1}%
  \ifx\@empty#4\@empty\relax%
    \@namedef{dlf@\thedlf@entry @Office}{xxx}%
  \else%
    \@namedef{dlf@\thedlf@entry @Office}{#4}%
  \fi%
  \@ParseDate\dlf@start@DD\dlf@start@MM{#2}%
  \@ParseDate\dlf@end@DD\dlf@end@MM{#3}%
  \dlf@verify@dates{\dlf@start@DD}{\dlf@start@MM}{\dlf@end@DD}{\dlf@end@MM}%
  \expandafter\edef\csname dlf@\thedlf@entry @Spring@Marker\endcsname{1}%
  \expandafter\edef\csname dlf@\thedlf@entry @Fall@Marker\endcsname{1}%
  \ifnum\dlf@start@MM>6%
    \expandafter\edef\csname dlf@\thedlf@entry @Fall@SD\endcsname{\dlf@start@DD}%
    \expandafter\edef\csname dlf@\thedlf@entry @Fall@SM\endcsname{\dlf@start@MM}%
    \expandafter\edef\csname dlf@\thedlf@entry @Fall@ED\endcsname{\dlf@end@DD}%
    \expandafter\edef\csname dlf@\thedlf@entry @Fall@EM\endcsname{\dlf@end@MM}%
    \stepcounter{dlf@Fall@NumberOfLines}%
    \setlength\@tempdima{\widthof{#1}}%
    \ifnum\dlf@Fall@MaxWidth<\@tempdima%
      \setlength\dlf@Fall@MaxWidth{\widthof{#1}}%
%      \typeout{max width: \the\dlf@Fall@MaxWidth}
    \fi%
  \else%
    \ifnum\dlf@end@MM<7%
      \expandafter\edef\csname dlf@\thedlf@entry @Spring@SD\endcsname{\dlf@start@DD}%
      \expandafter\edef\csname dlf@\thedlf@entry @Spring@SM\endcsname{\dlf@start@MM}%
      \expandafter\edef\csname dlf@\thedlf@entry @Spring@ED\endcsname{\dlf@end@DD}%
      \expandafter\edef\csname dlf@\thedlf@entry @Spring@EM\endcsname{\dlf@end@MM}%
      \stepcounter{dlf@Spring@NumberOfLines}%
      \setlength\@tempdima{\widthof{#1}}%
      \ifnum\@tempdima>\dlf@Spring@MaxWidth%
        \setlength\dlf@Spring@MaxWidth{\widthof{#1}}%
%        \typeout{max width: \the\dlf@Spring@MaxWidth}
      \fi%
    \else%
    % we need a break
      \expandafter\edef\csname dlf@\thedlf@entry @Spring@SD\endcsname{\dlf@start@DD}%
      \expandafter\edef\csname dlf@\thedlf@entry @Spring@SM\endcsname{\dlf@start@MM}%
      \expandafter\edef\csname dlf@\thedlf@entry @Spring@ED\endcsname{30}%
      \expandafter\edef\csname dlf@\thedlf@entry @Spring@EM\endcsname{06}%
      \expandafter\edef\csname dlf@\thedlf@entry @Fall@SD\endcsname{01}%
      \expandafter\edef\csname dlf@\thedlf@entry @Fall@SM\endcsname{07}%
      \expandafter\edef\csname dlf@\thedlf@entry @Fall@ED\endcsname{\dlf@end@DD}%
      \expandafter\edef\csname dlf@\thedlf@entry @Fall@EM\endcsname{\dlf@end@MM}%
      \expandafter\edef\csname dlf@\thedlf@entry @Break\endcsname{1}%
      \stepcounter{dlf@Spring@NumberOfLines}%
      \stepcounter{dlf@Fall@NumberOfLines}%
      \setlength\@tempdima{\widthof{#1}}%
      \ifnum\@tempdima>\dlf@Fall@MaxWidth%
        \setlength\dlf@Fall@MaxWidth{\widthof{#1}}%
      \fi%
      \ifnum\@tempdima>\dlf@Spring@MaxWidth%
        \setlength\dlf@Spring@MaxWidth{\widthof{#1}}%
      \fi%
    \fi%
  \fi%
  \@esphack%
  \ignorespaces%
}


\newcommand\dlf@PrintEntry[2]{%
  % #1 'Spring' or 'Fall'
  % #2 number to print
  \@ifundefined{dlf@#2@#1@SD}{}{%
%    \par\noindent%
    \parbox{\@nameuse{dlf@#1@MaxWidth}+\dlf@NamePad}{\@nameuse{dlf@#2@Name} }%
    \parbox{\widthof{(XX.XX)}}{(\@nameuse{dlf@#2@Office})}%
    \hspace\dlf@LapBlank\quad\quad%
    \rlap{\@nameuse{dlf@markmonths@#1}}%
    \def\@tempa{#1}%
    \def\@tempb{Fall}%
    \ifx\@tempa\@tempb\relax%
    \dlf@insertblankspaceFall{\@nameuse{dlf@#2@#1@SD}}{\@nameuse{dlf@#2@#1@SM}}%
    \else%
    \dlf@insertblankspaceSpring{\@nameuse{dlf@#2@#1@SD}}{\@nameuse{dlf@#2@#1@SM}}%
    \fi%
    \def\@tempa{Fall}%
    \def\@tempb{#1}%
    \ifx\@tempa\@tempb%
      \@ifundefined{dlf@#2@Break}{%
        \makebox[0pt][r]{%
          \dlf@sometext[r]{%
            \@nameuse{dlf@#2@#1@SD}/\@nameuse{dlf@#2@#1@SM}
            %(\@nameuse{dlf@#2@Office})
          }}%
      }{%
        \makebox[0pt][r]{%
          \dlf@sometext[r]{%
          \bfseries 
          \@nameuse{dlf@#2@Spring@SD}/\@nameuse{dlf@#2@Spring@SM} $\to$
%          (\@nameuse{dlf@#2@Office})
        }}%
      }%
    \else%
      \makebox[0pt][r]{%
        \dlf@sometext[r]{%
          \@nameuse{dlf@#2@#1@SD}/\@nameuse{dlf@#2@#1@SM} 
          % (\@nameuse{dlf@#2@Office})
        }}%
    \fi%  
    \dlf@print@MonthRule{\@nameuse{dlf@#2@#1@SD}}{\@nameuse{dlf@#2@#1@SM}}%
    {\@nameuse{dlf@#2@#1@ED}}{\@nameuse{dlf@#2@#1@EM}}%
    \def\@tempa{Spring}%
    \def\@tempb{#1}%
    \ifx\@tempa\@tempb%
      \@ifundefined{dlf@#2@Break}{%
        \makebox[0pt][l]{%
          \dlf@sometextR{\@nameuse{dlf@#2@#1@ED}/\@nameuse{dlf@#2@#1@EM}}%
        }%
      }{%
        %\makebox[0pt][l]{%
          \dlf@sometextR{\bfseries$\to$ \@nameuse{dlf@#2@Fall@ED}/\@nameuse{dlf@#2@Fall@EM}}%
        %}
      }%
    \else
%      \makebox[0pt][l]{%
    \dlf@sometextR{\@nameuse{dlf@#2@#1@ED}/\@nameuse{dlf@#2@#1@EM}}%
%}
    \fi%  
  }\ignorespacesafterend%
}

\def\dlf@Spring@Comment{}
\def\dlf@Fall@COmment{}
\newcommand\SetSpringComment[1]{\def\dlf@Spring@Comment{#1}}
\newcommand\SetFallComment[1]{\def\dlf@Fall@Comment{#1}}



\newcommand\dlf@MakePrintCommands[2]{%
  % #2 'Spring' or 'Fall'
  \expandafter\newcommand{#1}{%
    \begingroup%
    \par\vskip\abovedisplayskip%
    \setlength\dlf@dayscale{%
      \textwidth
      -\dlf@NamePad
      -2\dlf@LapBlank
      -\@nameuse{dlf@#2@MaxWidth}
      -\widthof{(XX.XX)}
      -4em
    }%
    \def\@tempa{#2}%
    \def\@tempb{Fall}%
    \ifx\@tempa\@tempb\relax%
    \setlength\dlf@dayscale{\dlf@dayscale/184}% in the fall we know excatly
                                % how many dayes there is
    \else%
    \dlf@monthtodays{6}% in spring it depends on february
    \setlength\dlf@dayscale{\dlf@dayscale/\value{dlfa}}%
    \fi%
    \dlf@TWidth@adjust%
    \begin{longtable}[l]{l}%
      \strut\hfill\LARGE\bfseries \@nameuse{dlf@#2@Title}\hfill\strut\\[2ex]\noindent%
      \parbox{0.9\linewidth}{\@nameuse{dlf@#2@Comment}}\\[3ex]
      \rule{\@nameuse{dlf@#2@MaxWidth}+\dlf@NamePad+\widthof{(XX.XX)}+2em}{0pt}\hspace\dlf@LapBlank%
      \@nameuse{dlf@Print@#2@Months}\\%
      \endfirsthead
      %
      \strut\hfill\LARGE\bfseries \@nameuse{dlf@#2@Title} 
      (\dlf@Continued@String)\hfill\strut\\[4mm]\noindent%
      \parbox{0.9\linewidth}{\@nameuse{dlf@#2@Comment}}\\[3ex]
      \rule{\@nameuse{dlf@#2@MaxWidth}+\dlf@NamePad+\widthof{(XX.XX)}+2em}{0pt}\hspace\dlf@LapBlank%
      \@nameuse{dlf@Print@#2@Months}\\%
      \endhead
      %
      \parbox{\@nameuse{dlf@#2@MaxWidth}+\dlf@NamePad}{~}%
      \hspace\dlf@LapBlank\quad\rule{\widthof{(XX.XX)}}{0pt}\quad%
      \rlap{\@nameuse{dlf@markmonths@#2}[white]}%
      \\
      \small\textit{\dlf@LastCompile\ \dlf@now}\hfill\textit{\dlf@Continues@String}\\
      \endfoot
      %
      \parbox{\@nameuse{dlf@#2@MaxWidth}+\dlf@NamePad}{~}%
      \hspace\dlf@LapBlank\quad\rule{\widthof{(XX.XX)}}{0pt}\quad%
      \rlap{\@nameuse{dlf@markmonths@#2}[white]}%
      \\
      \small\textit{\dlf@LastCompile\ \dlf@now}
      \endlastfoot
      %
      \setcounter{dlf@counterA}{1}%
      \addtocounter{dlf@entry}{1}%
      % print entries
      \whiledo{\value{dlf@counterA}<\value{dlf@entry}}{%
        \ifDLFnosort%
          \ifDLFnoautodel% aka print all
            \expandafter\ifx\csname dlf@\thedlf@counterA @#2@SD\endcsname\relax\else%
            \dlf@PrintEntry{#2}{\thedlf@counterA}\\
            \fi
          \else
            \expandafter\ifx\csname dlf@\thedlf@counterA  @#2@SD\endcsname\relax\else%
              \setcounter{dlf@counterC}{%
                \@nameuse{dlf@\thedlf@counterA @#2@EM}*100
                + \@nameuse{dlf@\thedlf@counterA @#2@ED}
              }%
              \ifnum\thedlf@counterC<\dlf@today@MMDD\relax%
              \else
                \dlf@PrintEntry{#2}{\thedlf@counterA}\\
              \fi%
            \fi%
          \fi% end noautodel
        \else% we need to sort
          \setcounter{dlf@counterB}{1}%
          \def\dlf@mini{0}%%
          \def\dlf@min{20000000}%
          % this sort this entry
          \whiledo{\value{dlf@counterB}<\value{dlf@entry}}{%
            \@ifundefined{dlf@\thedlf@counterB @#2@SD}{}{%
              \ifnum\@nameuse{dlf@\thedlf@counterB @#2@Marker}>0%
                \setcounter{dlf@counterC}{%
                  \@nameuse{dlf@\thedlf@counterB @#2@SM}*1000000
                  + \@nameuse{dlf@\thedlf@counterB @#2@SD}*10000
                  + \@nameuse{dlf@\thedlf@counterB @#2@EM}*100
                  + \@nameuse{dlf@\thedlf@counterB @#2@ED}
                }%
%              \typeout{counter: \thedlf@counterC}%
                \ifnum\thedlf@counterC<\dlf@min%
                  \global\edef\dlf@min{\thedlf@counterC}%
                  \global\edef\dlf@mini{\thedlf@counterB}%
                \fi%
              \fi%
            }% end undefined
            \stepcounter{dlf@counterB}%
          }% end while sort
          % if \dlf@A@#2@SD is undefined then there is nothig to do
          % here for this entry
          \@ifundefined{dlf@\thedlf@counterA @#2@SD}{}{%
            % why do we test for this here?
            \ifnum\dlf@mini>0%
              \ifDLFnoautodel
                \dlf@PrintEntry{#2}{\dlf@mini}\\
              \else
                % remember that we are dealing with \dlf@mini
                \setcounter{dlf@counterC}{%
                  \@nameuse{dlf@\dlf@mini @#2@EM}*100
                  + \@nameuse{dlf@\dlf@mini @#2@ED}
                }%
                % take care of the auto delete stuff
                \ifnum\value{dlf@counterC} < \dlf@today@MMDD \relax%
                \else%
                  \dlf@PrintEntry{#2}{\dlf@mini}\\
                \fi%
              \fi% end noautodel
              % make sure that this entry does not get printed again
              \global\@namedef{dlf@\dlf@mini @#2@Marker}{0}%
            \fi% end \ifnum\dlf@mini>0
          }% end \ifx 
        \fi% end nosort
        \stepcounter{dlf@counterA}%
      }% end outer while
    \end{longtable}%
    \addtocounter{dlf@entry}{-1}% to bring it back
    \par\vskip\belowdisplayskip\noindent\ignorespacesafterend\endgroup%
  }%
}

\dlf@MakePrintCommands\PrintSpring{Spring}
\dlf@MakePrintCommands\PrintFall{Fall}


\newcommand\dlf@print@SimpleEntry[1]{%
  % #1 num
        \parbox{\dlf@len+\dlf@NamePad}{%
      \@nameuse{dlf@#1@Name} }%
      \@ifundefined{dlf@#1@Break}{%
        \@ifundefined{dlf@#1@Spring@SD}{%
          \@nameuse{dlf@#1@Fall@SD}/%
          \@nameuse{dlf@#1@Fall@SM}
          --
          \@nameuse{dlf@#1@Fall@ED}/%
          \@nameuse{dlf@#1@Fall@EM}
        }{%
          \@nameuse{dlf@#1@Spring@SD}/%
          \@nameuse{dlf@#1@Spring@SM}
          --
          \@nameuse{dlf@#1@Spring@ED}/%
          \@nameuse{dlf@#1@Spring@EM}
        }%
      }{%
        \@nameuse{dlf@#1@Spring@SD}/%
        \@nameuse{dlf@#1@Spring@SM}
        --
        \@nameuse{dlf@#1@Fall@ED}/%
        \@nameuse{dlf@#1@Fall@EM}
        }
        \quad\dlf@PlacedIn\ 
        \@nameuse{dlf@#1@Office}
}


\newcommand\PrintSimpleOfficeList{%
  \setcounter{dlf@counterA}{1}%
  \addtocounter{dlf@entry}{1}% remember to bring it back
  \ifnum\@nameuse{dlf@Spring@MaxWidth} > \@nameuse{dlf@Fall@MaxWidth}
    \setlength\dlf@len{\@nameuse{dlf@Spring@MaxWidth}}
  \else
    \setlength\dlf@len{\@nameuse{dlf@Fall@MaxWidth}}
  \fi
  \section*{\dlf@ShortListTitle}
  \begin{description}
    \setlength\itemsep{0pt}
    \setlength\parskip{0pt}
    \renewcommand\makelabel[1]{}
    \whiledo{\value{dlf@counterA} < \value{dlf@entry}}{%
    \item \dlf@print@SimpleEntry{\thedlf@counterA}
      \stepcounter{dlf@counterA}%
    }
    \item ~
    \item \small\textit{\dlf@LastCompile\ \dlf@now}
  \end{description}
  \addtocounter{dlf@entry}{-1}
}