100ねんごの未来予想図

■今回行ったこと．
・ガントチャートの日付表示
・ガントチャートの曜日に色付け
・さらに上記の2つをPDF出力でも対応

<2011.05.26に上記の文章追記．>


Redmineのガントチャート，上司に作業を方向したりするには便利なのだけど日付がでないのがいつも不便だと思ってました．最新版でも出ません．どうやら，海外の人は日付よりも週単位の表示に慣れているらしいのですが本当のところは分かりません．


だいぶ前に対応したことがあったのだけど，それからRedmineのバージョンが上がり，ソースコードが大きく変更されたりで毎回修正するのも面倒になって対応していませんでした．

以前に対応したときのメモ:
この時は今とサーバーが違ったので添付ファイルが見られないかもしれません．

・Redmine ガントチャートに日付を表示してみた。




・Redmine とガントチャートPDF 出力と整形


今回，ちょっと頑張ろうと思って色々試行錯誤した結果，綺麗に出力されるようになったので報告します．




修正箇所を以下に記します．パッチは多分役立たないので貼り付けません．

理由: 今回の自分の環境のRedmineは4月9日付の最新版Trunkから引っ張ってきた環境であり，リリースされたものではありません．そのため，リリース版とは当然ファイルのコードに差分がありますし，現在も開発が進んでいるため差が生じる可能性があるため，参考程度にしかならないと思うため．


そのかわり，修正したファイルは貼り付けます．
こちらからどうぞ．
・show.html.erb

・gantts_controller.rb

・gantt.rb


参考にしたサイト: Special Thanks!
"redmineのガントチャートに日付を追加 - 雑多な日々"


以下，修正した箇所を記述していきます．当該ファイルを開いてそれぞれの場所を直していきます．

■修正ファイル

- /app/controllers/gantts_controller.rb

# add date for output.
# これはプロジェクトの名前を出力するだけです．

#basename = (@project ? "#{@project.identifier}-" : '') + 'gantt'
basename = Time.now.strftime("%Y%m%d-") + (@project ? "#{@project.identifier}-" : '') + 'gantt'

- /app/views/gantts/show.html.erb

# ガントチャートの表示領域によって判定する日付用フラグを追加します．

show_weeks = false
show_days = false
# add show day
show_day_num = false # <= ここ

#----------------------
# 日付を表示する条件を追記します．

# if @gantt.zoom >1
show_weeks = true
headers_height = 2*header_heigth
if @gantt.zoom > 2
show_days = true
headers_height = 3*header_heigth
end
if @gantt.zoom > 3 # <= ここの条件を丸々追加
show_day_num = true
headers_height = 4*header_heigth
end
end

#----------------------





#----------------------
# 日付を表示するメイン処理を追加 Days headers の直前あたりに挿入．

<%
#add show day
#
# Days headers Num
#
if show_day_num
left = 0
height = g_height + header_heigth*2 - 1
wday = @gantt.date_from.cwday
day_num = @gantt.date_from
(@gantt.date_to - @gantt.date_from + 1).to_i.times do
width = zoom - 1
%>

5 %><%= "color:blue;" if wday == 6 %><%= "color:red;" if wday == 7 %>" class="gantt_hdr">
<%= day_num.day %>

<%
left = left + width+1
day_num = day_num + 1
wday = wday + 1
wday = 1 if wday > 7
end
end %>

#----------------------
#----------------------
# 曜日表示の変更も日付表示ありとなしで高さを変える．

<%
#
# Days headers
#
if show_days
left = 0
height = g_height + header_heigth - 1
top = (show_day_num ? 55 : 37) # <= ここ
wday = @gantt.date_from.cwday
(@gantt.date_to - @gantt.date_from + 1).to_i.times do
width = zoom - 1
%>

5 %><%= "color:blue;" if wday == 6 %><%= "color:red;" if wday == 7 %>" class="gantt_hdr"> # <= ここ
<%= day_name(wday).first %>

#----------------------



- lib/redmine/export/pdf.rb

ここは修正不要だった(というか，ファイルがリンク先の情報と異なってて分からなかった)．ここをしないでガントチャートの処理は全て以下のファイルで行うようになったらしい．


以下は，独自で改造してうまく言った日付付きPDF出力．

=========================
PDF出力で表示する場合は，lib/redmine/helpers/gantt.rb を修正する．ここでImageファイルも色々できるけどしない．

Line533 付近

show_weeks = false
show_days = false
show_day_num = false # <= 追加

#--------------------------------
# PDF出力が3ヶ月未満の場合は日付も出す(曜日と同じでよいと思う)

if self.months < 3
show_days = true
show_day_num = true # <= 追加
headers_heigth = 4*header_heigth # <= 追加
end

#--------------------------------
# Line607 付近
# Days headers の処理の後に以下を全て追加

# Day num headers
if show_days # num
left = subject_width
height = header_heigth
wday = self.date_from.cwday
day_num = self.date_from
pdf.SetFontStyle('B',7)
(self.date_to - self.date_from + 1).to_i.times do
width = zoom
pdf.SetY(y_start + 3 * header_heigth)
pdf.SetX(left)
# pdf.rbでは文字列で渡ってくることを期待している．
pdf.RDMCell(width, height, day_num.day.to_s, "LTR", 0, "C")
left = left + width
day_num = day_num + 1
wday = wday + 1
wday = 1 if wday > 7
end
end

これでいけるはず．day_num.day をstring に変換して渡してあげるところで苦戦してました…情けない．



=========================
■ もう一つ別の改造。
以下はガントチャートのチケットの並びが発行した順番になってて見づらいので，それをチケットの開始日時で並び替える改造です．


参考にしたサイト: Special Thanks!
"【Redmine 1.1.2】ガントチャートを開始日順にソートする｜渋谷ではたらくイタズラ者、マー君のブログ。"



- lib/redmine/helpers/gantt.rb

# TODO: top level issues should be sorted by start date
#-----

def gantt_issue_compare(x, y, issues)
#if x.root_id == y.root_id
if x.start_date == y.start_date
x.lft <=> y.lft
else
#x.root_id <=> y.root_id
x.start_date <=> y.start_date
end

-----
以上の変更で，ガントチャートが開始日毎に並び替えられる．


...と書かれていますが，私の環境では，"<=>"がundefineだよって怒られてしまいました．

このif文の箇所をまるごとコメントアウトして，以下のコードに置き換えることで現状うまくいっています．

多重配列の比較・並び替え使ってます．

# TODO: top level issues should be sorted by start date
def gantt_issue_compare(x, y, issues)
[(x.root.start_date or x.start_date or Date.new()), x.root_id, (x.start_date or Date.new()), x.lft] <=> [(y.root.start_date or y.start_date or Date.new()), y.root_id, (y.start_date or Date.new()), y.lft]

ふぅ，満足．