一般フォーラム

> tarticleでplatexを動作させた場合の頭注の事例と解しました。
> ………
> 縦書きuplatex、jlreq.sty（tate, bookオプションつき｝で書いたものです。

とのことですが、私の手元の古い jlreq.cls [jlreq 2020/05/01] で
やってみましたら、一応、こんな感じにはなりました。

#「とりあえずちょっと試してみました」というだけで、私は jlreq
# にも、縦組みにも詳しいわけではありませんので、この件について
# 何かお尋ねいただいたとしましても、私には何もお答えできること
# はありません…。
#
# 無責任な言いっ放しで誠に申し訳ありませんが、あとはお詳しい
# 皆さまにお任せいたします。

\documentclass[
  dvipdfmx,uplatex,tate,book,paper=a5,
  sidenote_length=13zw,head_space=15zw,headfoot_sidemargin=-2zw,
  open_bracket_pos=zenkaku_tentsuki,hanging_punctuation
]{jlreq}
\reversemarginpar

% ----- https://okumuralab.org/tex/mod/forum/discuss.php?d=3964#p24656 -----
\makeatletter
\newbox\@mpar@carry@over
\global\setbox\@mpar@carry@over\box\voidb@x
\newbox\@migrated@marginpar
\global\setbox\@migrated@marginpar\vbox{}
\def\@addmarginpar{%
  \let\@addmarginpar@warning\relax
  \@next\@marbox\@currlist
      {\@cons\@freelist\@marbox \@cons\@freelist\@currbox}%
      \@latexbug
  \@tempcnta\@ne
  \@addmarginpar@side@check
  \ifnum\@tempcnta <\z@  \global\setbox\@marbox\box\@currbox \fi
  \ifvoid\@mpar@carry@over
      \@tempdima\@mparbottom
      \advance\@tempdima -\@pageht
      \advance\@tempdima\ht\@marbox
      \ifdim\@tempdima >\z@
        \def\@addmarginpar@warning{%
            \@latex@warning@no@line{Marginpar on page \thepage\space moved}}%
      \else
        \@tempdima\z@
      \fi
      \global\@mparbottom\@pageht
      \global\advance\@mparbottom\@tempdima
      \ifdim\@mparbottom>\textheight
        \def\@addmarginpar@warning{%
            \@latex@warning@no@line{Marginpar on page \thepage\space migrated to the next page}}%
        \global\setbox\@mpar@carry@over\box\@marbox
      \else
        \global\advance\@mparbottom\dp\@marbox
        \@tempdimb\ht\@marbox
        \ifdim\@mparbottom>\textheight
            \dimen@\ht\@marbox
            \advance\dimen@\dp\@marbox
            \advance\dimen@\textheight
            \advance\dimen@-\@mparbottom
            \begingroup \vbadness\@M \vfuzz\maxdimen
            \splittopskip\z@ \splitmaxdepth\maxdimen
            \setbox\z@\vsplit \@marbox to \dimen@
            \global\setbox\@mpar@carry@over\vtop{\unvbox\@marbox}%
            \setbox\tw@\copy\@mpar@carry@over
            \setbox\tw@\vsplit\tw@ to\z@
            \setbox\tw@\vbox{\unvbox\tw@ \global\setbox\@ne\lastbox}%
            \global\ht\@mpar@carry@over\ht\@ne
            \global\setbox\@marbox\vtop{\unvbox\z@}%
            \endgroup
            \def\@addmarginpar@warning{%
              \@latex@warning@no@line{Marginpar on page \thepage\space is split}}%
        \else
            \global\advance\@mparbottom\marginparpush
        \fi
      \fi
      \@addmarginpar@warning
      \ifvoid\@marbox\else
        \advance\@tempdima -\@tempdimb
        \global\setbox\@marbox\vbox{\vskip \@tempdima \box\@marbox}%
        \global\ht\@marbox\z@
        \global\dp\@marbox\z@
        \kern -\@pagedp
        \nointerlineskip
        \hb@xt@\columnwidth{\ifnum \@tempcnta >\z@
              \hskip\columnwidth \hskip\marginparsep
            \else
              \hskip -\marginparsep \hskip -\marginparwidth
            \fi
            \box\@marbox \hss}%
          \nointerlineskip
          \hbox{\vrule \@height\z@ \@width\z@ \@depth\@pagedp}%
      \fi
  \else
      \@latex@warning@no@line{Marginpar on page \thepage\space migrated to the next page}%
      \global\setbox\@mpar@carry@over\vtop{%
        \box\@mpar@carry@over
        \vskip\marginparpush
        \box\@marbox}%
  \fi}
\def\@addmarginpar@side@check{%
  \if@twocolumn
      \if@firstcolumn \@tempcnta\m@ne \fi
  \else
      \if@mparswitch
        \ifodd\c@page \else\@tempcnta\m@ne \fi
      \fi
      \if@reversemargin \@tempcnta -\@tempcnta \fi
  \fi}
\def\@opcol{%
  \global\setbox\@outputbox\vbox{%
      \box\@migrated@marginpar
      \nointerlineskip
      \box\@outputbox}%
  \ifvoid\@mpar@carry@over
      \global\@mparbottom\z@
  \else
      \dimen@\dp\@mpar@carry@over
      \advance\dimen@\topskip
      \advance\dimen@\marginparpush
      \global\@mparbottom\dimen@
  \fi
  \@addmarginpar@side@check
  \ifvoid\@mpar@carry@over
      \global\setbox\@migrated@marginpar\vbox{}%
  \else
      \global\setbox\@migrated@marginpar\vbox to\z@{%
        \vskip\topskip
        \vskip-\ht\@mpar@carry@over
        \hb@xt@\columnwidth{\ifnum \@tempcnta >\z@
              \hskip\columnwidth \hskip\marginparsep
            \else
              \hskip -\marginparsep \hskip -\marginparwidth
            \fi
            \box\@mpar@carry@over
            \hss}%
        \vss}%
  \fi
  \if@twocolumn \@outputdblcol
  \else        \@outputpage
  \fi
  \global\@textfloatsheight\z@
  \@floatplacement}
\makeatother

\def\Text{これは、意味のないサンプルテキストです。
  これは、意味のないサンプルテキストです。
  これは、意味のないサンプルテキストです。
  これは、意味のないサンプルテキストです。
  これは、意味のないサンプルテキストです。}
 
\def\longtext{\Text\Text\Text\Text\Text\par}
% ----- https://okumuralab.org/tex/mod/forum/discuss.php?d=3964#p24656 -----

\begin{document}

\Text\Text\Text\Text
これは、意味のないサンプルテキストです□
\sidenote{Symbolの譯語。ギリシア語のシュンポロンが語源で、もと
割符の意味であったのが記号・符牒の意味になり、さらに抽象的な事物
を示すための形象または心象の意味となった。十字架がキリスト教の、
鳩が平和の、白百合が純潔の、それぞれ象徴であるというがごときである。
この意味での「象徴」は古くから用いられていた。}。

これは、意味のないサンプルテキストです。
これは、意味のないサンプルテキストです。
これは、意味のないサンプルテキストです。
これは、意味のないサンプルテキストです。
\Text

\longtext

\Text
これは、意味のないサンプルテキストです□
\sidenote{「雨雲」と解する説もあるが（辰野隆『え・びやん』所収
「雨の日」）、おそらく「天雲」の意であろう。}。
これは、意味のないサンプルテキストです。
これは、意味のないサンプルテキストです。
これは、意味のないサンプルテキストです。
これは、意味のないサンプルテキストです。
これは、意味のないサンプルテキストです。
これは、意味のないサンプルテキストです。
これは、意味のないサンプルテキストです□
\sidenote{上田敏は何に拠ったものか明らかでないが、前田林外選訂
『日本民謡全集（明40・3)』には、下総国玉造村の「香取神社祭獅子
舞ひ歌」として、「大てらの香のけぶりはほそくともそらにのぼりて
あまくもとなる」と載っている。}。
\Text

\end{document}