一般フォーラム

とりあえず動きますがデバック希望です。

% pLaTeX
\documentclass[14pt]{jsarticle}

%\year=2019 \month=4%% 新元号施行前
\year=2019 \month=5%% 新元号
%\year=2020 \month=3%% 東京オリンピックの年

\和暦

\makeatletter
\newcount\heisei \heisei\year \advance\heisei-1988\relax
\newcount\shingengou \shingengou\year \advance\shingengou-2018\relax

\def\today{%
  \if@english
    \ifcase\month\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
      \space\number\day, \number\year
  \else
    \if西暦
      \number\year 年
      \number\month 月
      \number\day 日
    \else
      \ifnum\year=2019%% 2019年
        \ifnum\month<5%% 5月1日から新元号
          平成31年
        \else
          新元号元年
        \fi
      \else
        \ifnum\year<2019
          平成\number\heisei 年
        \else
          新元号\number\shingengou 年
        \fi
      \fi
      \number\month 月
      \number\day 日
    \fi
  \fi}
\makeatother
\begin{document}


\today


\end{document}