Class: Stupidedi::Versions::FunctionalGroups::FortyTen::ElementTypes::DateVal::Improper

Inherits:
Stupidedi::Versions::FunctionalGroups::FortyTen::ElementTypes::DateVal show all
Defined in:
lib/stupidedi/versions/functional_groups/004010/element_types/date_val.rb

Overview

Date with a partially-specified year (two digits, missing century). Shouldn’t be directly instantiated – instead, use the constuctor method value

Instance Attribute Summary collapse

Attributes inherited from Stupidedi::Values::SimpleElementVal

#position, #usage

Instance Method Summary collapse

Methods inherited from Stupidedi::Versions::FunctionalGroups::FortyTen::ElementTypes::DateVal

#date?, empty, value

Methods inherited from Stupidedi::Values::SimpleElementVal

#allowed?, #component?, #date?, #id?, #leaf?, #numeric?, #simple?, #string?, #time?

Methods inherited from Stupidedi::Values::AbstractElementVal

#element?, #size

Methods inherited from Stupidedi::Values::AbstractVal

#blank?, #characters, #component?, #composite?, #definition, #element?, #functional_group?, #interchange?, #invalid?, #loop?, #present?, #repeated?, #segment?, #separator?, #simple?, #size, #table?, #transaction_set?, #transmission?

Methods included from Color

ansi, #ansi

Constructor Details

#initialize(year, month, day, usage, position) ⇒ Improper

Returns a new instance of Improper.



335
336
337
338
339
340
341
342
343
344
345
 
# File 'lib/stupidedi/versions/functional_groups/004010/element_types/date_val.rb', line 335

def initialize(year, month, day, usage, position)
  @year, @month, @day = year, month, day

  # Check that date is reasonably valid
  unless @year.between?(0, 99) and @month.between?(1, 12) and @day.between?(1, 31)
    raise Exceptions::InvalidElementError,
      "invalid date year: #{year}, month: #{month}, day: #{day}"
  end

  super(usage, position)
end

Instance Attribute Details

#day ⇒ Integer (readonly)

Returns:



333
334
335
 
# File 'lib/stupidedi/versions/functional_groups/004010/element_types/date_val.rb', line 333

def day
  @day
end

#month ⇒ Integer (readonly)

Returns:



330
331
332
 
# File 'lib/stupidedi/versions/functional_groups/004010/element_types/date_val.rb', line 330

def month
  @month
end

#year ⇒ Integer (readonly)

Returns:



327
328
329
 
# File 'lib/stupidedi/versions/functional_groups/004010/element_types/date_val.rb', line 327

def year
  @year
end

Instance Method Details

#==(other) ⇒ Boolean

Note:

Not commutative

Returns:

  • (Boolean) 


499
500
501
502
503
504
 
# File 'lib/stupidedi/versions/functional_groups/004010/element_types/date_val.rb', line 499

def ==(other)
  eql?(other) or
   (@day   == other.day  and
    @year  == other.year and
    @month == other.month)
end

#century(cc) ⇒ Proper

Create a proper date using the given century ‘cc`

Examples:

DateVal.value("501015").century(19) #=> DateVal.value("19501230")

Returns:



375
376
377
378
 
# File 'lib/stupidedi/versions/functional_groups/004010/element_types/date_val.rb', line 375

def century(cc)
  date = ::Date.civil(100 * cc + @year, @month, @day)
  Proper.new(date, usage, position)
end

#copy(changes = {}) ⇒ Improper

Returns:



348
349
350
351
352
353
354
355
 
# File 'lib/stupidedi/versions/functional_groups/004010/element_types/date_val.rb', line 348

def copy(changes = {})
  Improper.new \
    changes.fetch(:year, @year),
    changes.fetch(:month, @month),
    changes.fetch(:day, @day),
    changes.fetch(:usage, usage),
    changes.fetch(:position, position)
end

#empty? ⇒ Boolean

Returns:

  • (Boolean) 


361
362
363
 
# File 'lib/stupidedi/versions/functional_groups/004010/element_types/date_val.rb', line 361

def empty?
  false
end

#future ⇒ Proper

Create a proper date which cannot be older than the current date

Returns:



452
453
454
 
# File 'lib/stupidedi/versions/functional_groups/004010/element_types/date_val.rb', line 452

def future
  oldest(Date.today)
end

#inspect ⇒ String

Returns:



457
458
459
460
461
462
463
464
465
466
467
468
469
470
471
 
# File 'lib/stupidedi/versions/functional_groups/004010/element_types/date_val.rb', line 457

def inspect
  id = definition.bind do |d|
    "[#{"% 5s" % d.id}: #{d.name}]".bind do |s|
      if usage.forbidden?
        ansi.forbidden(s)
      elsif usage.required?
        ansi.required(s)
      else
        ansi.optional(s)
      end
    end
  end

  ansi.element("DT.value#{id}") << "(XX#{"%02d-%02d-%02d" % [@year, @month, @day]})"
end

#newest(date) ⇒ Proper

Create a proper date which cannot be newer than the given ‘date` and cannot be older than one year before the given `date`.

Examples:

DateVal.value("501015").newest(Date.civil(1950, 10, 20)) #=> DateVal.value("19501015")
DateVal.value("501015").newest(Date.civil(1950, 10, 15)) #=> DateVal.value("19501015")
DateVal.value("501015").newest(Date.civil(1950, 10, 10)) #=> DateVal.value("18501015")

Returns:



420
421
422
423
424
425
426
427
428
429
430
431
432
433
434
435
436
437
438
439
440
 
# File 'lib/stupidedi/versions/functional_groups/004010/element_types/date_val.rb', line 420

def newest(date)
  cc, yy = date.year.divmod(100)

  if @year < yy
    century(cc)
  elsif @year > yy
    century(cc - 1)
  else
    if @month < date.month
      century(cc)
    elsif @month > date.month
      century(cc - 1)
    else
      if @day <= date.day
        century(cc)
      else
        century(cc - 1)
      end
    end
  end
end

#oldest(date) ⇒ Proper

Create a proper date which cannot be older than the given ‘date` and cannot be newer than one year after the given `date`.

Examples:

DateVal.value("501015").oldest(Date.civil(1950, 10, 20)) #=> DateVal.value("20501015")
DateVal.value("501015").oldest(Date.civil(1950, 10, 15)) #=> DateVal.value("19501015")
DateVal.value("501015").oldest(Date.civil(1950, 10, 10)) #=> DateVal.value("19501015")

Returns:



389
390
391
392
393
394
395
396
397
398
399
400
401
402
403
404
405
406
407
408
409
 
# File 'lib/stupidedi/versions/functional_groups/004010/element_types/date_val.rb', line 389

def oldest(date)
  cc, yy = date.year.divmod(100)

  if @year < yy
    century(cc + 1)
  elsif @year > yy
    century(cc)
  else
    if @month < date.month
      century(cc + 1)
    elsif @month > date.month
      century(cc)
    else
      if @day < date.day
        century(cc + 1)
      else
        century(cc)
      end
    end
  end
end

#past ⇒ Proper

Create a proper date which cannot be newer than the current date

Returns:



445
446
447
 
# File 'lib/stupidedi/versions/functional_groups/004010/element_types/date_val.rb', line 445

def past
  newest(Date.today)
end

#proper? ⇒ Boolean

Returns:

  • (Boolean) 


365
366
367
 
# File 'lib/stupidedi/versions/functional_groups/004010/element_types/date_val.rb', line 365

def proper?
  false
end

#to_s ⇒ String

Returns:



474
475
476
 
# File 'lib/stupidedi/versions/functional_groups/004010/element_types/date_val.rb', line 474

def to_s
  "XX%02d%02d%02d" % [@year, @month, @day]
end

#to_x12(truncate = true) ⇒ String

Returns:



479
480
481
482
 
# File 'lib/stupidedi/versions/functional_groups/004010/element_types/date_val.rb', line 479

def to_x12(truncate = true)
  x12 = "%02d%02d%02d" % [@year, @month, @day]
  truncate ? x12.slice(0, definition.max_length) : x12
end

#too_long? ⇒ Boolean

Returns:

  • (Boolean) 


490
491
492
493
494
495
 
# File 'lib/stupidedi/versions/functional_groups/004010/element_types/date_val.rb', line 490

def too_long?
  # We know month and day occupy four characters, but year *could*
  # occupy either three or two characters. If the max_length can't
  # accomodate a three-digit year, make sure we don't have one
  definition.max_length < 7 and @year > 99
end

#too_short? ⇒ Boolean

Returns:

  • (Boolean) 


484
485
486
487
488
 
# File 'lib/stupidedi/versions/functional_groups/004010/element_types/date_val.rb', line 484

def too_short?
  # Less than a 4-digit year means our max length is 7, but in
  # practice the definition min/max lengths are either 6 or 8
  definition.min_length > 6
end

#valid? ⇒ Boolean

Returns:

  • (Boolean) 


357
358
359
 
# File 'lib/stupidedi/versions/functional_groups/004010/element_types/date_val.rb', line 357

def valid?
  true
end