Module: Redmine::Export::PDF

176
177
178
179
180
181
182
183
184
185
186
187
188
189
190
191
192
193
194
195
196
197
198
199
200
201
202
203
204
205
206
207
208
209
210
211
212
213
214
215
216
217
218
219
220
221
222
223
224
225
226
227
228
229
230
231
232
233
234
235
236
237
238
239
240
241
242
243
244
245
246
247
248
249
250
251
252
253
254
255
256
257
258
259
260
261
262
263
264
265
266
267
268
269
270
271
272
273
274
275
276
277
278
279
280
281
282
283
284
285
286

# File 'lib/redmine/export/pdf.rb', line 176

def issues_to_pdf(issues, project, query)
  if ( current_language.to_s.downcase == 'ko'    ||
       current_language.to_s.downcase == 'ja'    ||
       current_language.to_s.downcase == 'zh'    ||
       current_language.to_s.downcase == 'zh-tw' ||
       current_language.to_s.downcase == 'th'    )
    pdf = IFPDF.new(current_language)
  else
    pdf = ITCPDF.new(current_language)
  end
  title = query.new_record? ? l(:label_issue_plural) : query.name
  title = "#{project} - #{title}" if project
  pdf.SetTitle(title)
  pdf.alias_nb_pages
  pdf.footer_date = format_date(Date.today)
  pdf.SetAutoPageBreak(false)
  pdf.AddPage("L")

  # Landscape A4 = 210 x 297 mm
  page_height = 210
  page_width = 297
  right_margin = 10
  bottom_margin = 20
  col_id_width = 10
  row_height = 5

  # column widths
  table_width = page_width - right_margin - 10  # fixed left margin
  col_width = []
  unless query.columns.empty?
    col_width = query.columns.collect do |c|
      (c.name == :subject || (c.is_a?(QueryCustomFieldColumn) && ['string', 'text'].include?(c.custom_field.field_format)))? 4.0 : 1.0
    end
    ratio = (table_width - col_id_width) / col_width.inject(0) {|s,w| s += w}
    col_width = col_width.collect {|w| w * ratio}
  end

  # title
  pdf.SetFontStyle('B',11)
  pdf.RDMCell(190,10, title)
  pdf.Ln

  # headers
  pdf.SetFontStyle('B',8)
  pdf.SetFillColor(230, 230, 230)
  pdf.RDMCell(col_id_width, row_height, "#", 1, 0, 'L', 1)
  query.columns.each_with_index do |column, i|
    pdf.RDMCell(col_width[i], row_height, column.caption, 1, 0, 'L', 1)
  end
  pdf.Ln

  # rows
  pdf.SetFontStyle('',8)
  pdf.SetFillColor(255, 255, 255)
  previous_group = false
  issues.each do |issue|
    if query.grouped? && (group = query.group_by_column.value(issue)) != previous_group
      pdf.SetFontStyle('B',9)
      pdf.RDMCell(277, row_height,
        (group.blank? ? 'None' : group.to_s) + " (#{query.issue_count_by_group[group]})",
        1, 1, 'L')
      pdf.SetFontStyle('',8)
      previous_group = group
    end

    # fetch all the row values
    col_values = query.columns.collect do |column|
      s = if column.is_a?(QueryCustomFieldColumn)
        cv = issue.custom_values.detect {|v| v.custom_field_id == column.custom_field.id}
        show_value(cv)
      else
        value = issue.send(column.name)
        if value.is_a?(Date)
          format_date(value)
        elsif value.is_a?(Time)
          format_time(value)
        else
          value
        end
          end
      s.to_s
    end

    # render it off-page to find the max height used
    base_x = pdf.GetX
    base_y = pdf.GetY
    pdf.SetY(2 * page_height)
    max_height = issues_to_pdf_write_cells(pdf, col_values, col_width, row_height)
    pdf.SetXY(base_x, base_y)

    # make new page if it doesn't fit on the current one
    space_left = page_height - base_y - bottom_margin
    if max_height > space_left
      pdf.AddPage("L")
      base_x = pdf.GetX
      base_y = pdf.GetY
    end

    # write the cells on page
    pdf.Cell(col_id_width, row_height, issue.id.to_s, "T", 0, 'C', 1)
    issues_to_pdf_write_cells(pdf, col_values, col_width, row_height)
    issues_to_pdf_draw_borders(pdf, base_x, base_y, base_y + max_height, col_id_width, col_width)
    pdf.SetY(base_y + max_height);
  end

  if issues.size == Setting.issues_export_limit.to_i
    pdf.SetFontStyle('B',10)
    pdf.RDMCell(0, row_height, '...')
  end
  pdf.Output
end

302
303
304
305
306
307
308
309
310
311

# File 'lib/redmine/export/pdf.rb', line 302

def issues_to_pdf_draw_borders(pdf, top_x, top_y, lower_y, id_width, col_widths)
  col_x = top_x + id_width
  pdf.Line(col_x, top_y, col_x, lower_y)    # id right border
  col_widths.each do |width|
    col_x += width
    pdf.Line(col_x, top_y, col_x, lower_y)  # columns right border
  end
  pdf.Line(top_x, top_y, top_x, lower_y)    # left border
  pdf.Line(top_x, lower_y, col_x, lower_y)  # bottom border
end

289
290
291
292
293
294
295
296
297
298
299

# File 'lib/redmine/export/pdf.rb', line 289

def issues_to_pdf_write_cells(pdf, col_values, col_widths, row_height)
  base_y = pdf.GetY
  max_height = row_height
  col_values.each_with_index do |column, i|
    col_x = pdf.GetX
    pdf.RDMMultiCell(col_widths[i], row_height, col_values[i], "T", 'L', 1)
    max_height = (pdf.GetY - base_y) if (pdf.GetY - base_y) > max_height
    pdf.SetXY(col_x + col_widths[i], base_y);
  end
  return max_height
end