line |
stmt |
bran |
cond |
sub |
pod |
time |
code |
1
|
|
|
|
|
|
|
package Business::EDI::CodeList::ControllingAgencyCoded; |
2
|
|
|
|
|
|
|
|
3
|
7
|
|
|
7
|
|
39
|
use base 'Business::EDI::CodeList'; |
|
7
|
|
|
|
|
14
|
|
|
7
|
|
|
|
|
4440
|
|
4
|
|
|
|
|
|
|
my $VERSION = 0.02; |
5
|
19
|
|
|
19
|
0
|
77
|
sub list_number {return "0051";} |
6
|
|
|
|
|
|
|
my $usage = 'B'; |
7
|
|
|
|
|
|
|
|
8
|
|
|
|
|
|
|
# 0051 Controlling agency, coded |
9
|
|
|
|
|
|
|
# Desc: Code identifying a controlling agency. |
10
|
|
|
|
|
|
|
# Repr: an..3 |
11
|
|
|
|
|
|
|
|
12
|
|
|
|
|
|
|
my %code_hash = ( |
13
|
|
|
|
|
|
|
'AA' => [ 'EDICONSTRUCT', |
14
|
|
|
|
|
|
|
'French construction project.' ], |
15
|
|
|
|
|
|
|
'AB' => [ 'DIN (Deutsches Institut fuer Normung)', |
16
|
|
|
|
|
|
|
'German standardization institute.' ], |
17
|
|
|
|
|
|
|
'AC' => [ 'ICS (International Chamber of Shipping)', |
18
|
|
|
|
|
|
|
'The International Chamber of Shipping.' ], |
19
|
|
|
|
|
|
|
'AD' => [ 'UPU (Union Postale Universelle)', |
20
|
|
|
|
|
|
|
'Universal Postal Union.' ], |
21
|
|
|
|
|
|
|
'AE' => [ 'United Kingdom ANA (Article Numbering Association)', |
22
|
|
|
|
|
|
|
'Identifies the Article Numbering Association of the United Kingdom.' ], |
23
|
|
|
|
|
|
|
'AF' => [ 'ANSI ASC X12 (American National Standard Institute', |
24
|
|
|
|
|
|
|
], |
25
|
|
|
|
|
|
|
'Accredited' => [ 'Standards Committee X12)', |
26
|
|
|
|
|
|
|
'Identifies the United States electronic data interchange standards body.' ], |
27
|
|
|
|
|
|
|
'AG' => [ 'US DoD (United States Department of Defense)', |
28
|
|
|
|
|
|
|
'The United States Department of Defense is the entity controlling the message specification.' ], |
29
|
|
|
|
|
|
|
'AH' => [ 'US Federal Government', |
30
|
|
|
|
|
|
|
'The United States Federal Government is the entity controlling the message specification.' ], |
31
|
|
|
|
|
|
|
'AI' => [ 'EDIFICAS', |
32
|
|
|
|
|
|
|
'European EDI association for financial, informational, cost, accounting, auditing and social areas.' ], |
33
|
|
|
|
|
|
|
'CC' => [ 'CCC (Customs Co-operation Council)', |
34
|
|
|
|
|
|
|
'The Customs Co-operation Council.' ], |
35
|
|
|
|
|
|
|
'CE' => [ "CEFIC (Conseil Europeen des Federations de l'Industrie", |
36
|
|
|
|
|
|
|
], |
37
|
|
|
|
|
|
|
'EDI' => [ 'project for chemical industry.', |
38
|
|
|
|
|
|
|
], |
39
|
|
|
|
|
|
|
'EC' => [ 'EDICON', |
40
|
|
|
|
|
|
|
'UK Construction project.' ], |
41
|
|
|
|
|
|
|
'ED' => [ 'EDIFICE (Electronic industries project)', |
42
|
|
|
|
|
|
|
'EDI Forum for companies with Interest in Computing and Electronics (EDI project for EDP/ADP sector).' ], |
43
|
|
|
|
|
|
|
'EE' => [ 'EC + EFTA (European Communities and European Free Trade', |
44
|
|
|
|
|
|
|
], |
45
|
|
|
|
|
|
|
'The' => [ 'European Communities and the European Free Trade', |
46
|
|
|
|
|
|
|
'Association.' ], |
47
|
|
|
|
|
|
|
'EN' => [ 'GS1', |
48
|
|
|
|
|
|
|
'Partner identification code assigned by GS1, an international organization of GS1 Member Organizations that manages the GS1 System.' ], |
49
|
|
|
|
|
|
|
'ER' => [ 'UIC (International Union of railways)', |
50
|
|
|
|
|
|
|
'European railways.' ], |
51
|
|
|
|
|
|
|
'EU' => [ 'European Union', |
52
|
|
|
|
|
|
|
'The European Union.' ], |
53
|
|
|
|
|
|
|
'EW' => [ 'UN/EDIFACT Working Group (EWG)', |
54
|
|
|
|
|
|
|
'United Nations working group responsible for UN/EDIFACT (United Nations, Electronic Data Interchange for Administration, Commerce and Transport).' ], |
55
|
|
|
|
|
|
|
'EX' => [ 'IECC (International Express Carriers Conference)', |
56
|
|
|
|
|
|
|
'The International Express Carriers Conference.' ], |
57
|
|
|
|
|
|
|
'IA' => [ 'IATA (International Air Transport Association)', |
58
|
|
|
|
|
|
|
'The International Air Transport Association.' ], |
59
|
|
|
|
|
|
|
'KE' => [ 'KEC (Korea EDIFACT Committee)', |
60
|
|
|
|
|
|
|
'The Korea EDIFACT Committee.' ], |
61
|
|
|
|
|
|
|
'LI' => [ 'LIMNET', |
62
|
|
|
|
|
|
|
'UK Insurance project.' ], |
63
|
|
|
|
|
|
|
'OD' => [ 'ODETTE (Organization for Data Exchange through Tele-', |
64
|
|
|
|
|
|
|
], |
65
|
|
|
|
|
|
|
'Transmission' => [ 'in Europe)', |
66
|
|
|
|
|
|
|
'European automotive industry project.' ], |
67
|
|
|
|
|
|
|
'RI' => [ 'RINET (Reinsurance and Insurance Network)', |
68
|
|
|
|
|
|
|
'The Reinsurance and Insurance Network.' ], |
69
|
|
|
|
|
|
|
'RT' => [ "UN/ECE/TRADE/WP.4/GE.1/EDIFACT Rapporteurs' Teams", |
70
|
|
|
|
|
|
|
"United Nations Economic UN Economic Commission for Europe (UN/ECE), Committee on the development of trade (TRADE), Working Party on facilitation of international trade procedures (WP.4), Group of Experts on data elements and automatic data interchange (GE.1), EDIFACT Rapporteurs' Teams." ], |
71
|
|
|
|
|
|
|
'UN' => [ 'UN/CEFACT', |
72
|
|
|
|
|
|
|
'United Nations Centre for Trade Facilitation and Electronic Business (UN/CEFACT).' ], |
73
|
|
|
|
|
|
|
); |
74
|
19
|
|
|
19
|
0
|
60
|
sub get_codes { return \%code_hash; } |
75
|
|
|
|
|
|
|
|
76
|
|
|
|
|
|
|
1; |