1package Business::EDI::CodeList::DateAndTimeQualifier;
2
3use base 'Business::EDI::CodeList';
4my $VERSION     = 0.02;
5sub list_number {return "0517";}
6my $usage       = 'B';
7
8# 0517  Date and time qualifier
9# Desc: Specification of the type of date and time.
10# Repr: an..3
11
12my %code_hash = (
13'1' => [ 'Security Timestamp',
14    'Security timestamp of the secured message.' ],
15'2' => [ 'Certificate generation date and time',
16    'Identifies the date and time of generation of the certificate by the Certification Authority.' ],
17'3' => [ 'Certificate start of validity period',
18    'Identifies the date and time from which the certificate must be considered valid.' ],
19'4' => [ 'Certificate end of validity period',
20    'Identifies the date and time until which the certificate must be considered valid.' ],
21'5' => [ 'EDIFACT structure generation date and time',
22    'Date and time of generation of the secured EDIFACT structure.' ],
23'6' => [ 'Certificate revocation date and time',
24    'Identifies the date and time of revocation of the certificate by the Certification Authority.' ],
25'7' => [ 'Key generation date and time',
26    'Identifies the date and time of generation of the key(s).' ],
27);
28sub get_codes { return \%code_hash; }
29
301;
31