|
Packit |
f3e6b9 |
#!/usr/bin/perl -w
|
|
Packit |
f3e6b9 |
# Copyright (c) 2010-2018 Sullivan Beck. All rights reserved.
|
|
Packit |
f3e6b9 |
# This program is free software; you can redistribute it and/or modify it
|
|
Packit |
f3e6b9 |
# under the same terms as Perl itself.
|
|
Packit |
f3e6b9 |
|
|
Packit |
f3e6b9 |
$Data{'currency'}{'link'} =
|
|
Packit |
f3e6b9 |
[
|
|
Packit |
f3e6b9 |
];
|
|
Packit |
f3e6b9 |
|
|
Packit |
f3e6b9 |
################################################################################
|
|
Packit |
f3e6b9 |
|
|
Packit |
f3e6b9 |
$Data{'currency'}{'iso'}{'orig'}{'name'} = {
|
|
Packit |
f3e6b9 |
"CFA Franc BCEAO " => "CFA Franc BCEAO",
|
|
Packit |
f3e6b9 |
"CFA Franc BEAC " => "CFA Franc BEAC",
|
|
Packit |
f3e6b9 |
"Ngultrum " => "Ngultrum",
|
|
Packit |
f3e6b9 |
"Unidades de fomento " => "Unidades de fomento",
|
|
Packit |
f3e6b9 |
"Pa’anga" => "Pa'anga",
|
|
Packit |
f3e6b9 |
"Pa\x{2019}anga" => "Pa'anga",
|
|
Packit |
f3e6b9 |
"Pa ?anga" => "Pa'anga",
|
|
Packit |
f3e6b9 |
"US Dollar (Next day) " => "US Dollar (Next day)",
|
|
Packit |
f3e6b9 |
"US Dollar (Same day) " => "US Dollar (Same day)",
|
|
Packit |
f3e6b9 |
"Bond Markets Unit European Monetary Unit (E.M.U.-6) "
|
|
Packit |
f3e6b9 |
=> "Bond Markets Unit European Monetary Unit (E.M.U.-6)",
|
|
Packit |
f3e6b9 |
"?LAND ISLANDS" => "Aland Islands",
|
|
Packit |
f3e6b9 |
"C?TE D'IVOIRE" => "Cote d'Ivoire",
|
|
Packit |
f3e6b9 |
"CURA?AO" => "Curacao",
|
|
Packit |
f3e6b9 |
"INTERNATIONAL MONETARY FUND (IMF)?"
|
|
Packit |
f3e6b9 |
=> "International Monetary Fund (IMF)?",
|
|
Packit |
f3e6b9 |
"KOREA, DEMOCRATIC PEOPLE’S REPUBLIC OF"
|
|
Packit |
f3e6b9 |
=> "Korea, Democratic People's Republic of",
|
|
Packit |
f3e6b9 |
"LAO PEOPLE’S DEMOCRATIC REPUBLIC"
|
|
Packit |
f3e6b9 |
=> "Lao People's Democratic Republic",
|
|
Packit |
f3e6b9 |
"R?UNION" => "Reunion",
|
|
Packit |
f3e6b9 |
"SAINT BARTH?LEMY" => "Saint Barthelemy",
|
|
Packit |
f3e6b9 |
"Bolívar" => "Bolivar",
|
|
Packit |
f3e6b9 |
"Bol\x{ed}var" => "Bolivar",
|
|
Packit |
f3e6b9 |
};
|
|
Packit |
f3e6b9 |
|
|
Packit |
f3e6b9 |
$Data{'currency'}{'iso'}{'ignore'} = {
|
|
Packit |
f3e6b9 |
"name" => {
|
|
Packit |
f3e6b9 |
"Codes specifically reserved for testing purposes" => 1,
|
|
Packit |
f3e6b9 |
"The codes assigned for transactions where no currency is involved" => 1,
|
|
Packit |
f3e6b9 |
},
|
|
Packit |
f3e6b9 |
"num" => {},
|
|
Packit |
f3e6b9 |
"alpha" => {},
|
|
Packit |
f3e6b9 |
};
|
|
Packit |
f3e6b9 |
|
|
Packit |
f3e6b9 |
1;
|
|
Packit |
f3e6b9 |
|
|
Packit |
f3e6b9 |
# Local Variables:
|
|
Packit |
f3e6b9 |
# mode: cperl
|
|
Packit |
f3e6b9 |
# indent-tabs-mode: nil
|
|
Packit |
f3e6b9 |
# cperl-indent-level: 3
|
|
Packit |
f3e6b9 |
# cperl-continued-statement-offset: 2
|
|
Packit |
f3e6b9 |
# cperl-continued-brace-offset: 0
|
|
Packit |
f3e6b9 |
# cperl-brace-offset: 0
|
|
Packit |
f3e6b9 |
# cperl-brace-imaginary-offset: 0
|
|
Packit |
f3e6b9 |
# cperl-label-offset: 0
|
|
Packit |
f3e6b9 |
# End:
|