iwase/koujo の変更点

• 追加された行はこの色です。
• 削除された行はこの色です。
• iwase/koujo へ行く。
• iwase/koujo の差分を削除

アップロードするのを忘れていたが、今回は扶養控除申告書を作るマクロに若干変更が必要であり、ついでに特定扶養や老人親族などに対応した。

もしかしたら、uplatex でも動くかもしれない。

また、均等割り付けのマクロ fitwidth.sty は http://www.math.nagoya-u.ac.jp/~kubo/ja/latex/tips-003.html から取って来た。

 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
 %					%
 %  扶養控除申告書 by Norio Iwase	%
 %					%
 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
 %                                   %
 %  扶養控除申告書 by Norio Iwase    %
 %                                   %
 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
 %!TEX TS-program = XeLaTeX
 %!TEX encoding = UTF-8 Unicode
 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
 \input fuyou-15.inc
 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
 \平成{30}年分扶養控除申告書	%
 \平成{30}年分扶養控除申告書    %
 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
 %
 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
 %  研究機関のＩＤ		%
 %  研究機関のＩＤ              %
 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
 %
 \税務所轄：{博多}税務署長{福岡市西区}市区町村長
 \所属機関：{国立大学法人　九州大学}番号{}%{３２９０００５００３７４３}
 \所在地〒{812-8581}{福岡県福岡市東区箱崎6丁目10番1号}
 %\所在地〒{819-0395}{福岡県福岡市西区元岡744番地}
 \部局{数理学研究院}（{1200308000}）：{数学部門} % 部局番号と部門か？
 \事務局{理学部等}（{0 0 2 1 7}） % 取り扱い事務局と番号か？
 %
 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
 %  研究代表者のＩＤ		%
 %  研究代表者のＩＤ            %
 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
 %
 \本人姓{九}{キュウ}
 \本人姓{大}{ダイ}
 \本人名{某}{ナニ}
 \本人名{某}{ガシ}
 \本人番号{12345678} % 職員番号
 \本人昭和{1}年{2}月{3}日生 % 生年月日
 \世帯主{九大 何某}（{本人}）% 名前と続き柄
 \住所〒{123}ー{0123}：{福岡市西区元岡1丁目2番3号} % 郵便番号と住所
 %
 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
 %  配偶者データ		%
 %  配偶者データ                %
 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
 %
 \配偶者{九大 何何}昭和{1}年{2}月{3}日住所{福岡市西区元岡 1-2-3}所得{0}円
 %
 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
 %  扶養親族データ		%
 %  扶養親族データ              %
 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
 %
 \扶養親族{九大 何某}続柄{子}平成{4}年{5}月{6}日住所{}所得{0}円
 \特定扶養{九大 某何}続柄{子}平成{7}年{8}月{9}日住所{}所得{0}円
 %
 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
 \これで終り書き出し		%
 \これで終り書き出し            %
 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%

インクルードファイル fuyou-15.inc は xelatex ではテストしたが、uplatex ではテストしていない。

 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
 %					%
 %  扶養控除申告書 form	by Norio Iwase	%
 %					%
 %                                      %
 %  扶養控除申告書 form by Norio Iwase  %
 %                                      %
 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
 \ifx\undefined\XeTeXversion
  \documentclass[12pt,a4j]{jarticle}
  \usepackage[dvipdfmx]{graphicx}
  \usepackage[deluxe]{otf}
 \else
  \documentclass[12pt,a4paper]{article}
  \usepackage[xetex]{graphicx}
  \usepackage[no-math]{fontspec}
  \usepackage[boldfont,slantfont]{xeCJK}
  \usepackage{zxjatype}
  \usepackage{zxotf}
  \usepackage{xunicode}\usepackage{xltxtra}
  \CJKspace
 %
  \defaultfontfeatures{Mapping=tex-text}
  \setromanfont{Times}\setsansfont{Papyrus}\setmonofont{Arial}
  \setjamainfont[Scale=0.95]{HGSeikaishotaiPRO}
  \setjasansfont[Scale=0.9]{IPAexMincho}
  \setjamonofont[Scale=0.9]{Osaka-Mono}
 \fi
 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
 \setlength{\voffset}		{  39.0mm}
 \setlength{\hoffset}		{ -13.0mm}
 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
 \usepackage{amssymb}
 \usepackage{ifthen,numbersty}
 \usepackage{lscape}
 \usepackage{curves}
 \usepackage{fitwidth}
 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
 %  マクロ				%
 %  マクロ                              %
 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
 %
 \def\税務所轄：#1税務署長#2市区町村長{%
 \put(6.0,359.5){\makebox(35,0)[bc]{#1}}%
 \put(6.0,336.5){\makebox(35,0)[bc]{\small#2}}}
 \def\所属機関：#1番号#2{%
 \put(96.0,367.5){\makebox(115,0)[bc]{#1}}%
 \put(96.5,347.0){\makebox(115,0)[bc]{\fitwidth{13.5em}{#2}}}}
 \def\機関代表：#1氏名#2{\gdef\kikanchou{#1}\gdef\souchou{#2}}
 \def\所在地〒#1#2{\gdef\kikanzip{#1}%
 \put(96.0,332.5){\makebox(115,0)[bc]{\footnotesize #2}}}
 \def\出納員#1個人番号#2{%
 \put(96.0,348.0){\makebox(30,8)[cl]{#1}}%
 \put(260.0,348.0){\makebox(30,8)[cl]{#2}}}
 \def\部局#1（#2）：#3{\gdef\bukyoku{#1}\gdef\bukyokucode{#2}\gdef\bumon{#3}}
 \def\事務局#1（#2）{\gdef\jimu{#1}\gdef\jimucode{#2}}
 %
 \def\本人所属：#1職#2{\gdef\shozoku{#1}\gdef\shoku{#2}}
 \def\電話#1{\gdef\denwa{#1}}
 \def\電子郵便#1{\gdef\denshimail{#1}}
 \def\ファックス#1{\gdef\fax{#1}}
 \def\住所〒#1ー#2：#3{
 \put(273.0,339.5)	{\makebox(15,0)[br]{\scriptsize #1}}
 \put(296.5,339.5)	{\makebox(15,0)[bl]{\scriptsize #2}}
 \put(255.0,328.5)	{\makebox(140,0)[bl]{\small #3}}
 }
 \def\本人年月日#1#2#3{%
 \put(406,376.0){\makebox(5,0)[br]{\footnotesize #1}}%
 \put(428,376.0){\makebox(5,0)[br]{\footnotesize #2}}%
 \put(450,376.0){\makebox(5,0)[br]{\footnotesize #3}}}
 \def\本人昭和#1年#2月#3日生{%
 \put(387.5,374.3){\makebox(5,0)[br]{\small 〇}}%
 \本人年月日{#1}{#2}{#3}}
 \def\本人平成#1年#2月#3日生{%
 \put(395.0,374.3){\makebox(5,0)[br]{\small 〇}}%
 \本人年月日{#1}{#2}{#3}}
 \def\世帯主#1（#2）{%
 \put(403,363.3){\makebox(45,0)[bc]{#1}}%
 \put(403,349.3){\makebox(45,0)[bc]{#2}}}
 \newcount{\cntLINE} \cntLINE=2749
 \newcount{\cntline} \cntline=0
 \newcount{\cntkingaku} \cntkingaku=0
 \def\配偶者なし{
 \put(459.1,331.3){\makebox(5,6)[bc]{\Large 〇}}%
 }
 \def\配偶者あり#1年#2月#3日生（#4）#5#6住所#7所得#8円{
 \advance\cntline by -2
 \put(58.0,\number\cntline.5){\makebox(50,6)[bc]{\rubi{#5}{#6}}}
 \advance\cntline by -4
 \put(193.5,\number\cntline.5){\makebox(4.5,7)[cr]{\scriptsize #1}}
 \put(207.5,\number\cntline.5){\makebox(4.5,7)[cr]{\scriptsize #2}}
 \put(221.5,\number\cntline.5){\makebox(4.5,7)[cr]{\scriptsize #3}}
 \advance\cntline by 7
 \put(332,\number\cntline.5){\makebox(90,7)[cl]{\begin{minipage}[cl]{54mm}#7\end{minipage}}}
 \advance\cntline by 5
 \cntkingaku=#8
 \put(288.0,\number\cntline.5){\makebox(32,7)[cr]{\tt\small\milnumber\cntkingaku}}
 }
 \def\配偶者昭和#1年#2月#3日生（#4）#5#6住所#7所得#8円{
 \put(447.6,331.3){\makebox(5,6)[bc]{\Large 〇}}%
 \cntline=\cntLINE \divide\cntline by 10
 \advance\cntline by -7
 \put(176.6,\number\cntline.5){\makebox(4,6)[bc]{\small 〇}}
 \advance\cntline by 7
 \配偶者あり{#1}年{#2}月{#3}日生（{#4}）{#5}{#6}住所{#7}所得{#8}円
 }
 \def\配偶者平成#1年#2月#3日生（#4）#5#6住所#7所得#8円{
 \put(447.6,331.3){\makebox(5,6)[bc]{\Large 〇}}%
 \cntline=\cntLINE \divide\cntline by 10
 \advance\cntline by -7
 \put(184.5,\number\cntline.5){\makebox(4,6)[bc]{\small 〇}}
 \advance\cntline by 7
 \配偶者あり{#1}年{#2}月{#3}日生（{#4}）{#5}{#6}住所{#7}所得{#8}円
 }
 \def\扶養親族あり#1年#2月#3日生（#4）#5#6住所#7所得#8円{
 \advance\cntline by -2
 \put(62.0,\number\cntline){\makebox(50,6)[bc]{\rubi{#5}{#6}}}
 \advance\cntline by -3
 \put(146.5,\number\cntline){\makebox(5,6)[cc]{#4}}
 \advance\cntline by -1
 \put(193.5,\number\cntline.5){\makebox(4.5,7)[cr]{\scriptsize #1}}
 \put(207.5,\number\cntline.5){\makebox(4.5,7)[cr]{\scriptsize #2}}
 \put(221.5,\number\cntline.5){\makebox(4.5,7)[cr]{\scriptsize #3}}
 \advance\cntline by 7
 \put(332,\number\cntline.5){\makebox(90,7)[cl]{\begin{minipage}[cl]{54mm}#7\end{minipage}}}
 \advance\cntline by 5
 \cntkingaku=#8
 \put(288.0,\number\cntline.5){\makebox(32,7)[cr]{\tt\small\milnumber\cntkingaku}}
 }
 \def\扶養親族昭和#1年#2月#3日生（#4）#5#6住所#7所得#8円{
 \advance\cntLINE by -250
 \cntline=\cntLINE \divide\cntline by 10
 \advance\cntline by -8
 \put(176.2,\number\cntline.5){\makebox(5,7)[cc]{\small 〇}}
 \advance\cntline by 8
 \扶養親族あり{#1}年{#2}月{#3}日生（{#4}）{#5}{#6}住所{#7}所得{#8}円
 }
 \def\扶養親族平成#1年#2月#3日生（#4）#5#6住所#7所得#8円{
 \advance\cntLINE by -250
 \cntline=\cntLINE \divide\cntline by 10
 \advance\cntline by -8
 \put(184.0,\number\cntline.5){\makebox(5,7)[cc]{\small 〇}}
 \advance\cntline by 8
 \扶養親族あり{#1}年{#2}月{#3}日生（{#4}）{#5}{#6}住所{#7}所得{#8}円
 }
 \def\特定扶養昭和#1年#2月#3日生（#4）#5#6住所#7所得#8円{
 \advance\cntLINE by -250
 \cntline=\cntLINE \divide\cntline by 10
 \advance\cntline by -3
 \put(232.0,\number\cntline.0){\makebox(5,7)[bc]{\small\checkmark}}
 \advance\cntline by 3
 \advance\cntline by -8
 \put(176.2,\number\cntline.5){\makebox(5,7)[cc]{\small 〇}}
 \advance\cntline by 8
 \扶養親族あり{#1}年{#2}月{#3}日生（{#4}）{#5}{#6}住所{#7}所得{#8}円
 }
 \def\特定扶養平成#1年#2月#3日生（#4）#5#6住所#7所得#8円{
 \advance\cntLINE by -250
 \cntline=\cntLINE \divide\cntline by 10
 \advance\cntline by -3
 \put(232.0,\number\cntline.0){\makebox(5,7)[bc]{\small\checkmark}}
 \advance\cntline by 3
 \advance\cntline by -8
 \put(184.0,\number\cntline.5){\makebox(5,7)[cc]{\small 〇}}
 \advance\cntline by 8
 \扶養親族あり{#1}年{#2}月{#3}日生（{#4}）{#5}{#6}住所{#7}所得{#8}円
 }
 \def\同居老親明治#1年#2月#3日生（#4）#5#6住所#7所得#8円{
 \advance\cntLINE by -250
 \cntline=\cntLINE \divide\cntline by 10
 \advance\cntline by 12
 \put(232.0,\number\cntline.0){\makebox(5,7)[bc]{\small\checkmark}}
 \advance\cntline by -12
 \advance\cntline by -4
 \put(176.2,\number\cntline.9){\makebox(5,7)[cc]{\small 〇}}
 \advance\cntline by 4
 \扶養親族あり{#1}年{#2}月{#3}日生（{#4}）{#5}{#6}住所{#7}所得{#8}円
 }
 \def\同居老親大正#1年#2月#3日生（#4）#5#6住所#7所得#8円{
 \advance\cntLINE by -250
 \cntline=\cntLINE \divide\cntline by 10
 \advance\cntline by 12
 \put(232.0,\number\cntline.0){\makebox(5,7)[bc]{\small\checkmark}}
 \advance\cntline by -12
 \advance\cntline by -4
 \put(184.0,\number\cntline.9){\makebox(5,7)[cc]{\small 〇}}
 \advance\cntline by 4
 \扶養親族あり{#1}年{#2}月{#3}日生（{#4}）{#5}{#6}住所{#7}所得{#8}円
 }
 \def\同居老親昭和#1年#2月#3日生（#4）#5#6住所#7所得#8円{
 \advance\cntLINE by -250
 \cntline=\cntLINE \divide\cntline by 10
 \advance\cntline by 12
 \put(232.0,\number\cntline.0){\makebox(5,7)[bc]{\small\checkmark}}
 \advance\cntline by -12
 \advance\cntline by -8
 \put(176.2,\number\cntline.5){\makebox(5,7)[cc]{\small 〇}}
 \advance\cntline by 8
 \扶養親族あり{#1}年{#2}月{#3}日生（{#4}）{#5}{#6}住所{#7}所得{#8}円
 }
 \def\同居老親平成#1年#2月#3日生（#4）#5#6住所#7所得#8円{
 \advance\cntLINE by -250
 \cntline=\cntLINE \divide\cntline by 10
 \advance\cntline by 12
 \put(232.0,\number\cntline.0){\makebox(5,7)[bc]{\small\checkmark}}
 \advance\cntline by -12
 \advance\cntline by -8
 \put(184.0,\number\cntline.5){\makebox(5,7)[cc]{\small 〇}}
 \advance\cntline by 8
 \扶養親族あり{#1}年{#2}月{#3}日生（{#4}）{#5}{#6}住所{#7}所得{#8}円
 }
 \def\その他老親明治#1年#2月#3日生（#4）#5#6住所#7所得#8円{
 \advance\cntLINE by -250
 \cntline=\cntLINE \divide\cntline by 10
 \advance\cntline by 6
 \put(232.0,\number\cntline.0){\makebox(5,7)[bc]{\small\checkmark}}
 \advance\cntline by -6
 \advance\cntline by -4
 \put(176.2,\number\cntline.9){\makebox(5,7)[cc]{\small 〇}}
 \advance\cntline by 4
 \扶養親族あり{#1}年{#2}月{#3}日生（{#4}）{#5}{#6}住所{#7}所得{#8}円
 }
 \def\その他老親大正#1年#2月#3日生（#4）#5#6住所#7所得#8円{
 \advance\cntLINE by -250
 \cntline=\cntLINE \divide\cntline by 10
 \advance\cntline by 6
 \put(232.0,\number\cntline.0){\makebox(5,7)[bc]{\small\checkmark}}
 \advance\cntline by -6
 \advance\cntline by -4
 \put(184.0,\number\cntline.9){\makebox(5,7)[cc]{\small 〇}}
 \advance\cntline by 4
 \扶養親族あり{#1}年{#2}月{#3}日生（{#4}）{#5}{#6}住所{#7}所得{#8}円
 }
 \def\その他老親昭和#1年#2月#3日生（#4）#5#6住所#7所得#8円{
 \advance\cntLINE by -250
 \cntline=\cntLINE \divide\cntline by 10
 \advance\cntline by 6
 \put(232.0,\number\cntline.0){\makebox(5,7)[bc]{\small\checkmark}}
 \advance\cntline by -6
 \advance\cntline by -8
 \put(176.2,\number\cntline.5){\makebox(5,7)[cc]{\small 〇}}
 \advance\cntline by 8
 \扶養親族あり{#1}年{#2}月{#3}日生（{#4}）{#5}{#6}住所{#7}所得{#8}円
 }
 \def\その他老親平成#1年#2月#3日生（#4）#5#6住所#7所得#8円{
 \advance\cntLINE by -250
 \cntline=\cntLINE \divide\cntline by 10
 \advance\cntline by 6
 \put(232.0,\number\cntline.0){\makebox(5,7)[bc]{\small\checkmark}}
 \advance\cntline by -6
 \advance\cntline by -8
 \put(184.0,\number\cntline.5){\makebox(5,7)[cc]{\small 〇}}
 \advance\cntline by 8
 \扶養親族あり{#1}年{#2}月{#3}日生（{#4}）{#5}{#6}住所{#7}所得{#8}円
 }
 %
 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
 %	特種設定					%
 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
 %  特種設定                            %
 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
 %
 \makeatletter
 \makeatother
 %
 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
 %	\姓・\名 コマンド				%
 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
 %  \姓・\名 コマンド                   %
 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
 %
 \newcommand{\rubi}[2]{\hbox{\shortstack{{\scriptsize #2}\\[1.8mm]{#1}}}}
 \newcommand{\Sei}{}\newcommand{\Mei}{}
 \newcommand{\sei}{}\newcommand{\mei}{}
 \def\本人姓#1#2{\begingroup\def\protect{\noexpand\protect\noexpand}%
   \ifthenelse{\equal{\Sei}{}}{}{\xdef\Sei{\Sei\protect{ \ }}}%
   \xdef\Sei{\Sei\protect\rubi{#1}{#2}}%
   \ifthenelse{\equal{\sei}{}}{}{\xdef\sei{\sei\protect{}}}%
   \xdef\sei{\sei{\protect\bgroup\protect #1\protect\egroup}}%
   \endgroup}
 \def\本人名#1#2{\begingroup\def\protect{\noexpand\protect\noexpand}%
   \ifthenelse{\equal{\Mei}{}}{}{\xdef\Mei{\Mei\protect{ \ }}}%
   \xdef\Mei{\Mei\protect\rubi{#1}{#2}}%
   \ifthenelse{\equal{\mei}{}}{}{\xdef\mei{\mei\protect{}}}%
   \xdef\mei{\mei{\protect\bgroup\protect #1\protect\egroup}}%
   \endgroup}
 \def\本人番号#1{\gdef\ID{#1}}
 %
 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
 %\ここから文書開始			%
 %  ここから文書開始                    %
 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
 %
 \def\平成#1年分扶養控除申告書{
 \def\fuyou{h#1_01}
 \pagestyle{empty}
 %
 \begin{document}
 \begin{landscape}
 \setlength{\textwidth}		{ 200.0mm}
 \setlength{\textheight}		{ 280.0mm}
 \setlength{\oddsidemargin}	{  -6.8mm}
 \setlength{\unitlength}		{   0.5mm}
 %\setlength\unitlength{0.5mm}
 \begin{picture}(280,200)(0,200)
 %
 \put(-.3,-.5)	{\makebox(550,395){\includegraphics[page=1]{\fuyou}}}
 %
 }
 %
 \def\これで終り書き出し{
 \put(280,365)	{\makebox( 60,0)[bc]{\Sei {　} \Mei}}
 \put(252,376)		{\makebox(30,8)[lc]{\scriptsize \ID}}
 \put(522,390)		{\makebox(30,8)[rc]{\scriptsize \jimucode}}
 \ifx\jimu\empty
 \put(0,395){\makebox(30,8)[lc]{\tiny {\bukyokucode}・{\bukyoku}}}
 \else
 \put(0,395){\makebox(30,8)[lc]{\tiny {\bukyokucode}・{\bukyoku}（{\jimu}）}}
 \fi
 \put(0,390){\makebox(30,8)[lc]{\tiny {\bukyoku}\ifx\bumon\empty\else{・{\bumon}}\fi}}
 %
 \end{picture}
 \clearpage
 \addtolength{\hoffset}{-0.5mm}
 \addtolength{\voffset}{ 0.3mm}
 \begin{picture}(280,200)(0,200)
 \put(-.3,-.5){\makebox(550,395){\includegraphics[page=2,angle=180,origin=c]{\fuyou}}}
 \end{picture}
 \end{landscape}
 \end{document}
 }
 
給与所得者の保険料控除申告書 兼 給与所得者の配偶者特別控除申告書のマクロは、また場所が若干ずれた為変更した。もしかしたら、uplatex でも動くかもしれない。
 
 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
 %					%
 %  保険配偶者控除申告書 by Norio Iwase	%
 %					%
 %                                      %
 %  保険配偶者控除申告書 by Norio Iwase %
 %                                      %
 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
 %!TEX TS-program = XeLaTeX
 %!TEX encoding = UTF-8 Unicode
 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
 \input hoken-haigusha-17.inc
 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
 \平成{29}年分保険料配偶者特別控除申請書	%
 \平成{29}年分保険料配偶者特別控除申請書        %
 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
 %
 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
 %  研究機関のＩＤ		%
 %  研究機関のＩＤ              %
 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
 %
 \税務所轄：{博多}税務署長
 \所属機関：{国立大学法人　九州大学}番号{}%{３２９０００５００３７４３}
 \所在地〒{812-8581}{福岡県福岡市東区箱崎6丁目10番1号}
 %\所在地〒{819-0395}{福岡県福岡市西区元岡744番地}
 \部局{数理学研究院}（{1200308000}）：{数学部門} % 部局番号と部門か？
 \事務局{理学部等}（{0 0 2 1 7}） % 取り扱い事務局と番号か？
 %
 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
 %  研究代表者のＩＤ		%
 %  研究代表者のＩＤ            %
 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
 %
 \本人姓{九}{キュウ}
 \本人姓{大}{ダイ}
 \本人名{某}{ナニ}
 \本人名{某}{ガシ}
 \本人番号{12345678} % 職員番号
 \配偶者姓{九}{キュウ}
 \配偶者姓{大}{ダイ}
 \配偶者名{何}{ナニ}
 \配偶者名{何}{ガシ}
 \配偶者昭和{xx}年{xx}月{xx}日生まれ % 明治、大正、昭和、平成に対応
 \配偶者続柄{ＸＸ}
 \住所{福岡市西区元岡 1 丁目 2 番 3 号} % 住所
 %
 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
 %  保険料控除			%
 %  保険料控除                  %
 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
 %
 %\一般生命{何何生命}{}{}{\sei\mei}{\hsei\hmei}{\htuduki}{123450}
 \新一般生命{何何生命}{}{}{\sei\mei}{\hsei\hmei}{\htuduki}{123450}
 \介護医療{某何生命}{}{}{\sei\mei}{\hsei\hmei}{\htuduki}{123450}
 %\個人年金{某某生命}{}{}{\sei\mei}{\hsei\hmei}{\htuduki}{123450}
 \新個人年金{何々生命}{}{}{\sei\mei}{\hsei\hmei}{\htuduki}{123450}
 \保険控除額{0}{0}{0} % 自分で計算してください
 \地震保険{某々労災}{}{}{\sei\mei}{\sei\mei}{本人}{12340}
 \地震控除額{0}{0} % 自分で計算してください
 %
 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
 %  配偶者控除			%
 %  配偶者控除                  %
 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
 %
 \配偶者収入{0}（特別控除{0}万円） % 自分で計算してください
 %
 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
 %  社会保険料控除		%
 %  社会保険料控除              %
 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
 %
 \社会保険{〇△}{}{}{}{123450}
 %
 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
 \これで終り書き出し		%
 \これで終り書き出し            %
 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%

こちらのインクルードファイル hoken-haigusha-17-x.inc も同じようなものである。

 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
 %						%
 %  保険配偶者控除申告書 form By Norio Iwase	%
 %						%
 %                                              %
 %  保険配偶者控除申告書 form By Norio Iwase    %
 %                                              %
 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
 \ifx\undefined\XeTeXversion
  \documentclass[12pt,a4j]{jarticle}
  \usepackage[dvipdfmx]{graphicx}
  \usepackage[deluxe]{otf}
 \else
  \documentclass[12pt,a4paper]{article}
  \usepackage[xetex]{graphicx}
  \usepackage[no-math]{fontspec}
  \usepackage[boldfont,slantfont]{xeCJK}
  \usepackage{zxjatype}
  \usepackage{zxotf}
  \usepackage{xunicode}\usepackage{xltxtra}
  \CJKspace
 %
  \defaultfontfeatures{Mapping=tex-text}
  \setromanfont{Times}\setsansfont{Papyrus}\setmonofont{Arial}
  \setjamainfont[Scale=0.95]{HGSeikaishotaiPRO}
  \setjasansfont[Scale=0.9]{IPAexMincho}
  \setjamonofont[Scale=0.9]{Osaka-Mono}
 \fi
 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
 \setlength{\voffset}		{  42.5mm}
 \setlength{\hoffset}		{ -13.0mm}
 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
 \usepackage{amssymb}
 \usepackage{ifthen,numbersty}
 \usepackage{lscape}
 \usepackage{curves}
 \usepackage{fitwidth}
 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
 %  マクロ			%
 %  マクロ                      %
 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
 %
 \def\税務所轄：#1税務署長{%
  \put(30.0,344.5){\makebox(35,0)[bc]{\Large #1}}}
 \def\所属機関：#1番号#2{%
 \put(146.8,366.5){\makebox(90,0)[bc]{\large #1}}%
 \put(146.8,347.5){\makebox(90,0)[bc]{\fitwidth{18.1em}{#2}}}}
 \def\機関代表：#1氏名#2{\gdef\kikanchou{#1}\gdef\souchou{#2}}
 \def\所在地〒#1#2{\gdef\kikanzip{#1}%
 \put(147.0,332.5){\makebox(90,7)[cc]{%{〒#1} 
 #2}}}
 \def\部局#1（#2）：#3{\gdef\bukyoku{#1}\gdef\bukyokucode{#2}\gdef\bumon{#3}}
 \def\事務局#1（#2）{\gdef\jimu{#1}\gdef\jimucode{#2}}
 %
 \def\本人所属：#1職#2{\gdef\shozoku{#1}\gdef\shoku{#2}}
 \def\電話#1{\gdef\denwa{#1}}
 \def\電子郵便#1{\gdef\denshimail{#1}}
 \def\ファックス#1{\gdef\fax{#1}}
 \def\住所#1{
  \put(330.0,339.0)	{\makebox(140,7)[cl]{#1}}
 }
 \newcount\HUmare \HUmare=496
 \newcount\HUmareh \HUmareh=287
 \def\配偶者昭和#1年#2月#3日生まれ{
  \def\HYear{#1}\def\HMonth{#2}\def\HDay{#3}
 }
 \def\配偶者平成#1年#2月#3日生まれ{
  \advance\HUmare 12
  \def\HYear{#1}\def\HMonth{#2}\def\HDay{#3}
 }
 \def\配偶者明治#1年#2月#3日生まれ{
  \advance\HUmareh 5
  \def\HYear{#1}\def\HMonth{#2}\def\HDay{#3}
 }
 \def\配偶者大正#1年#2月#3日生まれ{
  \advance\HUmare 12
  \advance\HUmareh 5
  \def\HYear{#1}\def\HMonth{#2}\def\HDay{#3}
 }
 \def\隅黒{\def\sumi{1}}\def\kuro{1}\def\sumi{0}
 %
 \newcount\Line
 \newcount{\ippangaku}\ippangaku=0
 \newcount{\nippangaku}\nippangaku=0
 \newcount{\kaigogaku}\kaigogaku=0
 \newcount{\kojingaku}\kojingaku=0
 \newcount{\nkojingaku}\nkojingaku=0
 \newcount{\ippangakukei}\ippangakukei=0
 \newcount{\nippangakukei}\nippangakukei=0
 \newcount{\kaigogakukei}\kaigogakukei=0
 \newcount{\kojingakukei}\kojingakukei=0
 \newcount{\nkojingakukei}\nkojingakukei=0
 \def\一般生命#1#2#3#4#5#6#7{\gdef\ippan{#1}\gdef\ippanshurui{#2}\gdef\ippankikan{#3}\gdef\ippankeiyaku{#4}\gdef\ippanshimei{#5}\gdef\ippantuduki{#6}\ippangaku=#7\advance\ippangakukei by #7\ippankojo=\ippangakukei}
 \def\新一般生命#1#2#3#4#5#6#7{\gdef\nippan{#1}\gdef\nippanshurui{#2}\gdef\nippankikan{#3}\gdef\nippankeiyaku{#4}\gdef\nippanshimei{#5}\gdef\nippantuduki{#6}\nippangaku=#7\advance\nippangakukei by #7\nippankojo=\nippangakukei}
 \def\介護医療#1#2#3#4#5#6#7{\gdef\kaigo{#1}\gdef\kaigoshurui{#2}\gdef\kaigokikan{#3}\gdef\kaigokeiyaku{#4}\gdef\kaigoshimei{#5}\gdef\kaigotuduki{#6}\kaigogaku=#7\advance\kaigogakukei by #7\kaigokojo=\kaigogakukei}
 \def\個人年金#1#2#3#4#5#6#7{\gdef\kojin{#1}\gdef\kojinshurui{#2}\gdef\kojinkikan{#3}\gdef\kojinkeiyaku{#4}\gdef\kojinshimei{#5}\gdef\kojintuduki{#6}\kojingaku=#7\advance \kojingakukei by #7\kojinkojo=\kojingakukei}
 \def\新個人年金#1#2#3#4#5#6#7{\gdef\nkojin{#1}\gdef\nkojinshurui{#2}\gdef\nkojinkikan{#3}\gdef\nkojinkeiyaku{#4}\gdef\nkojinshimei{#5}\gdef\nkojintuduki{#6}\nkojingaku=#7\advance \nkojingakukei by #7\nkojinkojo=\nkojingakukei}
 \newcount{\ippankojo}\ippankojo=0
 \newcount{\nippankojo}\nippankojo=0
 \newcount{\kaigokojo}\kaigokojo=0
 \newcount{\kojinkojo}\kojinkojo=0
 \newcount{\nkojinkojo}\nkojinkojo=0
 \newcount{\dishinkojo}\dishinkojo=0
 \newcount{\shakaikojo}\shakaikojo=0
 \newcount{\songaikojo}\songaikojo=0
 \newcount{\kojokei}\kojokei=0
 \newcount{\dkojokei}\dkojokei=0
 \def\保険控除額#1#2#3{\ippankojo=#1\kojokei=#1\kaigokojo=#2\advance\kojokei by #2\kojinkojo=#3\advance\kojokei by #3}
 \def\地震控除額#1#2{\dishinkojo=#1\dkojokei=#1\songaikojo=#2\advance\dkojokei by #2}
 \newcount{\dishingaku}\dishingaku=0
 \newcount{\dishingakukei}\dishingakukei=0
 \def\地震保険#1#2#3#4#5#6#7{\gdef\dishin{#1}\gdef\dishinshurui{#2}\def\dishinkikan{#3}\gdef\dishinkeiyaku{#4}\gdef\dishinshimei{#5}\gdef\dishintuduki{#6}\dishingaku=#7\advance \dishingakukei by #7\dishinkojo=\dishingakukei\advance \dishinkojokei by \dishinkojo}
 \newcount{\dishinkojo}\dishinkojo=0
 \newcount{\dishinkojokei}\dishinkojokei=0
 %
 \newcount{\shakaigaku}\shakaigaku=0
 \newcount{\shakaigakux}\shakaigakux=0
 \newcount{\shakaigakukei}\shakaigakukei=0
 \gdef\shakai{}\gdef\shakaix{}
 \def\社会保険Ｕ#1#2#3#4#5{\gdef\shakai{#1}\gdef\shakaishurui{#2}\gdef\shakaishimei{#3}\gdef\shakaituduki{#4}\shakaigaku=#5\advance \shakaigakukei by #5\shakaikojo=\shakaigakukei\advance \shakaikojokei by \shakaikojo}
 \def\社会保険Ｌ#1#2#3#4#5{\gdef\shakaix{#1}\gdef\shakaishuruix{#2}\gdef\shakaishimeix{#3}\gdef\shakaitudukix{#4}\shakaigakux=#5\advance \shakaigakukei by #5\shakaikojox=\shakaigakukei\advance \shakaikojokei by \shakaikojox}
 \newcount{\shakaikojo}\shakaikojo=0
 \newcount{\shakaikojox}\shakaikojox=0
 \newcount{\shakaikojokei}\shakaikojokei=0
 %
 \newcount{\hshunyu}\hshunyu=0
 \newcount{\hshotoku}\hshotoku=0
 \def\配偶者収入#1（特別控除#2万円）{
 \hshotoku=#1 \advance \hshotoku by -650000
 \ifthenelse{\hshotoku<0}{\hshotoku=0}{}
 \Line=220
 \put(435.0,\number\Line)	{\makebox( 18,7)[cr]{ \scriptsize\tt\milnumber#1}}
 \put(522.0,\number\Line)	{\makebox( 20,7)[cr]{ \scriptsize\tt\milnumber\hshotoku}}
 \advance\Line -60
 \put(520.0,\number\Line)	{\makebox( 20,7)[cr]{ \small\tt\milnumber\hshotoku}}
 \advance\Line 60
 \advance\Line -112
 \put(519.0,\number\Line)	{\makebox( 20,7)[cr]{ #2}}
 \advance\Line 112
 }
 %
 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
 %	特種設定					%
 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
 %  特種設定                            %
 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
 %
 \makeatletter
 \makeatother
 %
 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
 %	\姓・\名 コマンド				%
 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
 %  \姓・\名 コマンド                   %
 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
 %
 \newcommand{\rubi}[2]{\hbox{\shortstack{{\scriptsize #2}\\[2.5mm]{#1}}}}
 \newcommand{\hrubi}[2]{\hbox{\shortstack{{\tiny #2}\\[-.4mm]{#1}}}}
 \newcommand{\Sei}{}\newcommand{\Mei}{}
 \newcommand{\sei}{}\newcommand{\mei}{}
 \def\本人姓#1#2{\begingroup\def\protect{\noexpand\protect\noexpand}%
   \ifthenelse{\equal{\Sei}{}}{}{\xdef\Sei{\Sei\protect{　}}}%
   \xdef\Sei{\Sei\protect\rubi{#1}{#2}}%
   \ifthenelse{\equal{\sei}{}}{}{\xdef\sei{\sei\protect{}}}%
   \xdef\sei{\sei{\protect\bgroup\protect #1\protect\egroup}}%
   \endgroup}
 \def\本人名#1#2{\begingroup\def\protect{\noexpand\protect\noexpand}%
   \ifthenelse{\equal{\Mei}{}}{}{\xdef\Mei{\Mei\protect{　}}}%
   \xdef\Mei{\Mei\protect\rubi{#1}{#2}}%
   \ifthenelse{\equal{\mei}{}}{}{\xdef\mei{\mei\protect{}}}%
   \xdef\mei{\mei{\protect\bgroup\protect #1\protect\egroup}}%
   \endgroup}
 \def\本人番号#1{\gdef\ID{#1}}
 %
 \newcommand{\HSei}{}\newcommand{\HMei}{}
 \newcommand{\hsei}{}\newcommand{\hmei}{}
 \def\配偶者姓#1#2{\begingroup\def\protect{\noexpand\protect\noexpand}%
   \ifthenelse{\equal{\HSei}{}}{}{\xdef\HSei{\HSei\protect{　}}}%
   \xdef\HSei{\HSei\protect\hrubi{#1}{#2}}%
   \ifthenelse{\equal{\hsei}{}}{}{\xdef\hsei{\hsei\protect{}}}%
   \xdef\hsei{\hsei{\protect\bgroup\protect #1\protect\egroup}}%
   \endgroup}
 \def\配偶者名#1#2{\begingroup\def\protect{\noexpand\protect\noexpand}%
   \ifthenelse{\equal{\HMei}{}}{}{\xdef\HMei{\HMei\protect{　}}}%
   \xdef\HMei{\HMei\protect\hrubi{#1}{#2}}%
   \ifthenelse{\equal{\hmei}{}}{}{\xdef\hmei{\hmei\protect{}}}%
   \xdef\hmei{\hmei{\protect\bgroup\protect #1\protect\egroup}}%
   \endgroup}
 \def\配偶者続柄#1{\gdef\htuduki{#1}}
 %
 \def\平成#1年分保険料配偶者特別控除申請書{%
 \def\nendo{#1}\gdef\filename{h#1_05}
 \pagestyle{empty}
 %
 \begin{document}
 \begin{landscape}
 \setlength{\textwidth}		{ 200.0mm}
 \setlength{\textheight}		{ 280.0mm}
 \setlength{\oddsidemargin}	{  -6.8mm}
 \setlength{\unitlength}		{   0.5mm}
 \setlength\unitlength{0.5mm}
 \begin{picture}(280,200)(0,200)
 %
 \put(8.6,-2.5)	{\makebox(547,398){\includegraphics[page=1]{\filename}}}
 %
 }
 %
 \def\これで終り書き出し{
 \put(371.0,360.2)	{\makebox( 60,14)[cc]{\large \Sei {　} \Mei}}
 \put(408.0,288.0)	{\makebox( 60,14)[cc]{ \scriptsize\HSei {　} \HMei}}
 \put(\number\HUmare.5,\number\HUmareh.8)	{\scaleput(5,5){\bigcircle{5}}}
 \put(517.0,288.0)	{\makebox( 10,14)[cr]{ \scriptsize\HYear}}
 \put(528.5,288.0)	{\makebox( 10,14)[cc]{ \scriptsize\HMonth}}
 \put(541.5,288.0)	{\makebox( 10,14)[cl]{ \scriptsize\HDay}}
 \put(321,371.0)		{\makebox(30,8)[lc]{\scriptsize \ID}}
 \put(528,393.0)		{\makebox(30,8)[rc]{\scriptsize \jimucode}}
 \ifx\jimu\empty
 \put(20,395){\makebox(30,8)[lc]{\tt\tiny {\bukyokucode}・{\bukyoku}}}
 \else
 \put(20,395){\makebox(30,8)[lc]{\tt\tiny {\bukyokucode}・{\bukyoku}（{\jimu}）}}
 \fi
 \put(20,390){\makebox(30,8)[lc]{\tt\tiny {\bukyoku}\ifx\bumon\empty\else{・{\bumon}}\fi}}
 %
 \Line=280
 %
 \ifx\undefined\ippan\else
 \put( 50.0,\number\Line)	{\makebox( 45,7)[cc]{ \ippan}}
 \put( 93.0,\number\Line)	{\makebox( 37,7)[cc]{ \scriptsize\ippanshurui}}
 \put(127.5,\number\Line)	{\makebox( 13,7)[cc]{ \scriptsize\ippankikan}}
 \put(148.0,\number\Line)	{\makebox( 39,7)[cc]{ \ippankeiyaku}}
 \put(198.0,\number\Line)	{\makebox( 41,7)[cc]{ \ippanshimei}}
 \put(242.5,\number\Line)	{\makebox( 12,7)[cc]{ \ippantuduki}}
 \advance\Line -3
 \put(263.2,\number\Line)	{\scaleput(7,7){\bigcircle{7}}}
 \advance\Line 3
 %\put(262.5,\number\Line)	{\makebox( 12,8)[cc]{ \large 〇}}
 \put(278.0,\number\Line)	{\makebox( 44,7)[cr]{ \tt\milnumber\ippangaku}}
 \advance\Line -60
 \put( 76.0,\number\Line)	{\makebox( 44,7)[cr]{ \scriptsize\tt\milnumber\ippangakukei}}
 \put(205.0,\number\Line)	{\makebox( 44,7)[cr]{ \scriptsize \tt\milnumber\ippankojo}}
 \put(298.0,\number\Line)	{\makebox( 44,7)[cr]{ \scriptsize \tt\milnumber\ippankojo}}
 \advance\Line 60
 \fi
 %
 \ifx\undefined\nippan\else
 \put( 50.0,\number\Line)	{\makebox( 45,7)[cc]{ \nippan}}
 \put( 93.0,\number\Line)	{\makebox( 37,7)[cc]{ \scriptsize\nippanshurui}}
 \put(127.5,\number\Line)	{\makebox( 13,7)[cc]{ \scriptsize\nippankikan}}
 \put(148.0,\number\Line)	{\makebox( 39,7)[cc]{ \nippankeiyaku}}
 \put(198.0,\number\Line)	{\makebox( 41,7)[cc]{ \nippanshimei}}
 \put(242.5,\number\Line)	{\makebox( 12,7)[cc]{ \nippantuduki}}
 \advance\Line -3
 \put(254.5,\number\Line)	{\scaleput(7,7){\bigcircle{7}}}
 \advance\Line 3
 %\put(254.0,\number\Line)	{\makebox( 12,8)[cc]{ \large 〇}}
 \put(278.0,\number\Line)	{\makebox( 44,7)[cr]{ \tt\milnumber\ippangaku}}
 \advance\Line -60
 \put( 76.0,\number\Line)	{\makebox( 44,7)[cr]{ \scriptsize\tt\milnumber\nippangakukei}}
 \put(205.0,\number\Line)	{\makebox( 44,7)[cr]{ \scriptsize \tt\milnumber\nippankojo}}
 \put(298.0,\number\Line)	{\makebox( 44,7)[cr]{ \scriptsize \tt\milnumber\nippankojo}}
 \advance\Line 60
 \fi
 %
 \ifx\undefined\kaigo\else
 \advance\Line -70
 \put( 50.0,\number\Line)	{\makebox( 45,7)[cc]{ \kaigo}}
 \put( 93.0,\number\Line)	{\makebox( 37,7)[cc]{ \scriptsize\kaigoshurui}}
 \put(127.5,\number\Line)	{\makebox( 13,7)[cc]{ \scriptsize\kaigokikan}}
 \put(148.0,\number\Line)	{\makebox( 39,7)[cc]{ \kaigokeiyaku}}
 \put(198.0,\number\Line)	{\makebox( 41,7)[cc]{ \kaigoshimei}}
 \put(242.5,\number\Line)	{\makebox( 12,7)[cc]{ \kaigotuduki}}
 \put(278.0,\number\Line)	{\makebox( 44,7)[cr]{ \tt\milnumber\kaigogaku}}
 \advance\Line 70
 \fi
 \advance\Line -95
 \put( 76.0,\number\Line)	{\makebox( 44,7)[cr]{ \scriptsize\tt\milnumber\kaigogakukei}}
 \put(298.0,\number\Line)	{\makebox( 44,7)[cr]{ \scriptsize \tt\milnumber\kaigokojo}}
 %
 \ifx\undefined\kojin\else
 \advance\Line -11
 \put( 50.0,\number\Line)	{\makebox( 45,7)[cc]{ \kojin}}
 \put( 93.0,\number\Line)	{\makebox( 37,7)[cc]{ \scriptsize\kojinshurui}}
 \put(127.5,\number\Line)	{\makebox( 13,7)[cc]{ \scriptsize\kojinkikan}}
 \put(148.0,\number\Line)	{\makebox( 39,7)[cc]{ \kojinkeiyaku}}
 \advance\Line 3
 \put(198.0,\number\Line)	{\makebox( 41,7)[cc]{ \scriptsize\kojinshimei}}
 \advance\Line -3
 \put(242.5,\number\Line)	{\makebox( 12,7)[cc]{ \scriptsize\kojintuduki}}
 \advance\Line -3
 \put(263.2,\number\Line)	{\scaleput(7,7){\bigcircle{7}}}
 \advance\Line 3
 %\put(262.5,\number\Line)	{\makebox( 12,8)[cc]{ \large 〇}}
 \put(278.0,\number\Line)	{\makebox( 44,7)[cr]{ \tt\milnumber\kojingaku}}
 \advance\Line -49
 \put( 76.0,\number\Line)	{\makebox( 44,7)[cr]{ \scriptsize\tt\milnumber\kojingakukei}}
 \put(205.0,\number\Line)	{\makebox( 44,7)[cr]{ \scriptsize \tt\milnumber\kojinkojo}}
 \put(298.0,\number\Line)	{\makebox( 44,7)[cr]{ \scriptsize \tt\milnumber\kojinkojo}}
 \advance\Line 49
 \advance\Line 11
 \fi
 %
 \ifx\undefined\nkojin\else
 \advance\Line -11
 \put( 50.0,\number\Line)	{\makebox( 45,7)[cc]{ \nkojin}}
 \put( 93.0,\number\Line)	{\makebox( 37,7)[cc]{ \scriptsize\nkojinshurui}}
 \put(127.5,\number\Line)	{\makebox( 13,7)[cc]{ \scriptsize\nkojinkikan}}
 \put(148.0,\number\Line)	{\makebox( 39,7)[cc]{ \nkojinkeiyaku}}
 \advance\Line 3
 \put(198.0,\number\Line)	{\makebox( 41,7)[cc]{ \scriptsize\nkojinshimei}}
 \advance\Line -3
 \put(242.5,\number\Line)	{\makebox( 12,7)[cc]{ \scriptsize\nkojintuduki}}
 \advance\Line -3
 \put(254.5,\number\Line)	{\scaleput(7,7){\bigcircle{7}}}
 \advance\Line 3
 %\put(254.0,\number\Line)	{\makebox( 12,8)[cc]{ \large 〇}}
 \put(278.0,\number\Line)	{\makebox( 44,7)[cr]{ \tt\milnumber\nkojingaku}}
 \advance\Line -49
 \put( 76.0,\number\Line)	{\makebox( 44,7)[cr]{ \scriptsize\tt\milnumber\nkojingakukei}}
 \put(205.0,\number\Line)	{\makebox( 44,7)[cr]{ \scriptsize \tt\milnumber\nkojinkojo}}
 \put(298.0,\number\Line)	{\makebox( 44,7)[cr]{ \scriptsize \tt\milnumber\nkojinkojo}}
 \advance\Line 49
 \advance\Line 11
 \fi
 %
 \advance\Line -101
 \put(298.0, \number\Line)	{\makebox( 44,7)[cr]{ \tt\milnumber\kojokei}}
 %
 \Line=76
 %
 \ifx\dishin\empty\else
 \advance\Line -32
 \put( 33.0, \number\Line)	{\makebox( 45,8)[cc]{ \dishin}}
 \put( 81.5, \number\Line)	{\makebox( 37,8)[cc]{ \small\dishinshurui}}
 \put(125.0, \number\Line)	{\makebox( 13,8)[cc]{ \small\dishinkikan}}
 \put(144.0, \number\Line)	{\makebox( 39,8)[cc]{ \dishinkeiyaku}}
 \put(187.0, \number\Line)	{\makebox( 41,8)[cc]{ \dishinshimei}}
 \put(234.0, \number\Line)	{\makebox( 12,8)[cc]{ \dishintuduki}}
 \advance\Line -9
 \put(257.5,\number\Line.5){
     \renewcommand{\xscale}{1}
     \renewcommand{\xscaley}{-1}
     \renewcommand{\yscale}{0.7}
     \renewcommand{\yscalex}{0.7}
     \scaleput(9,9){\bigcircle{9}}
     }
 \advance\Line 9
 %\put(249.5, \number\Line)	{\makebox( 12,8)[cc]{ \large 〇}}
 \put(278.0, \number\Line)	{\makebox( 44,7)[cr]{ \tt\milnumber\dishingaku}}
 \advance\Line -20
 \put(134.5, \number\Line)	{\makebox( 44,7)[cr]{ \small\tt\milnumber\dishingakukei}}
 \put(298.0, \number\Line)	{\makebox( 44,7)[cr]{ \small 0}}
 \advance\Line 20
 \advance\Line -39
 \put( 95.0,  \number\Line)	{\makebox( 44,7)[cr]{ \tt\milnumber\dishinkojo}}
 \put(221.0,  \number\Line)	{\makebox( 44,7)[cr]{ \tt\milnumber\songaikojo}}
 \put(297.0,  \number\Line)	{\makebox( 44,7)[cr]{ \tt\milnumber\dishinkojokei}}
 \advance\Line 39
 \advance\Line 32
 \fi
 %
 \ifx\shakai\empty\else
 \Line=77
 \put(361.5, \number\Line)	{\makebox( 30,7)[cc]{ \scriptsize\shakai}}
 \put(391.5, \number\Line)	{\makebox( 37,7)[cc]{ \scriptsize\shakaishurui}}
 \put(432.5, \number\Line)	{\makebox( 41,7)[cc]{ \shakaishimei}}
 \put(478.5, \number\Line)	{\makebox( 12,7)[cc]{ \shakaituduki}}
 \put(501.0, \number\Line)	{\makebox( 44,7)[cr]{ \tt\milnumber\shakaigaku}}
 %\advance\Line -20
 %\put(499.7, \number\Line)	{\makebox( 44,7)[cr]{ \small\tt\milnumber\shakaigakukei}}
 %\advance\Line 20
 \fi
 %
 \ifx\shakaix\empty\else
 \Line=67
 \put(361.5, \number\Line)	{\makebox( 30,7)[cc]{ \scriptsize\shakai}}
 \put(391.5, \number\Line)	{\makebox( 37,7)[cc]{ \scriptsize\shakaishuruix}}
 \put(432.5, \number\Line)	{\makebox( 41,7)[cc]{ \shakaishimeix}}
 \put(478.5, \number\Line)	{\makebox( 12,7)[cc]{ \shakaitudukix}}
 \put(501.0, \number\Line)	{\makebox( 44,7)[cr]{ \tt\milnumber\shakaigakux}}
 %\advance\Line -20
 %\put(499.7, \number\Line)	{\makebox( 44,7)[cr]{ \small\tt\milnumber\shakaigakukei}}
 %\advance\Line 20
 \fi
 %
 \ifnum\shakaigakukei=0\else
 \put(499.7, 57)	{\makebox( 44,7)[cr]{ \small\tt\milnumber\shakaigakukei}}
 \fi
 %
 \ifx\sumi\kuro
 \put(569.5, 2.5)	{\makebox(0,0){\rule{11mm}{11mm}}}
 \fi
 %
 \end{picture}
 \clearpage
 \addtolength{\voffset}		{ -4.8mm}
 \addtolength{\hoffset}		{ -3.8mm}
 \begin{picture}(280,200)(0,200)
 \put(8.6,-2.5)	{\makebox(547,403){\includegraphics[page=2,angle=180,origin=c]{\filename}}}
 \end{picture}
 \end{landscape}
 \end{document}
 }