% my $title = ($var{revise} ? '修正' : '追加'); my $dbi = $nvar{dbi}; my $cv = $var{data}{cv}; %>
次のデータをデータベースに挿入します。
データの内容が正しいことを確認した後、よろしければ「<% print $title %>を決定する」 のボタンを押してください。
項目 | 値 |
---|---|
姓 / 名 | <% print "$cv->{family_name} / $cv->{first_name}"; %> |
姓 / 名 (カナ) | <% print "$cv->{family_name_kana} / $cv->{first_name_kana}"; %> |
性別 | <% print $dbi->{code}{sex}{ $cv->{sex} }; %> |
生年月日 | <% print $cv->{birth}; %> |
郵便番号 | <% print $cv->{zip}; %> |
現住所 | <% print $cv->{address}; %> |
電話番号 | <% print $cv->{tel}; %> |
写真 | <%
if($cv->{photo}) {
my ($imguri, $imgpath) = $dbi->fileinfo($cv->{photo});
my $size = int((stat($imgpath))[7] / 1024);
my $tnuri = $dbi->fileinfo($var{data}{cv}{photo_s}); %>
画像あり
( <% print $size %> kBytes ) |