diff options
author | mark <mark> | 2010-07-29 23:11:31 +0000 |
---|---|---|
committer | mark <mark> | 2010-07-29 23:11:31 +0000 |
commit | 0063bd00a5fcdb09d03619728160edc6a1bea213 (patch) | |
tree | 4e9a878b8a4cc130baef5b760aa58eb4f8065c59 /FS/FS/Misc.pm | |
parent | 6bb9ed43ce2f094d5b36c7882e9efb85bdd3bfe1 (diff) |
add pkg_freq event condition, RT#8896
Diffstat (limited to 'FS/FS/Misc.pm')
-rw-r--r-- | FS/FS/Misc.pm | 35 |
1 files changed, 35 insertions, 0 deletions
diff --git a/FS/FS/Misc.pm b/FS/FS/Misc.pm index 19ac35c..3b0616a 100644 --- a/FS/FS/Misc.pm +++ b/FS/FS/Misc.pm @@ -8,6 +8,7 @@ use Data::Dumper; use IPC::Run qw( run timeout ); # for _pslatex use IPC::Run3; # for do_print... should just use IPC::Run i guess use File::Temp; +use Tie::IxHash; #do NOT depend on any FS:: modules here, causes weird (sometimes unreproducable #until on client machine) dependancy loops. put them in FS::Misc::Something #instead @@ -16,6 +17,7 @@ use File::Temp; @EXPORT_OK = qw( send_email generate_email send_fax states_hash counties cities state_label card_types + pkg_freqs generate_ps generate_pdf do_print csv_from_fixed ); @@ -608,6 +610,39 @@ sub card_types { \%card_types; } +=item pkg_freqs + +Returns a hash reference of allowed package billing frequencies. + +=cut + +sub pkg_freqs { + tie my %freq, 'Tie::IxHash', ( + '0' => '(no recurring fee)', + '1h' => 'hourly', + '1d' => 'daily', + '2d' => 'every two days', + '3d' => 'every three days', + '1w' => 'weekly', + '2w' => 'biweekly (every 2 weeks)', + '1' => 'monthly', + '45d' => 'every 45 days', + '2' => 'bimonthly (every 2 months)', + '3' => 'quarterly (every 3 months)', + '4' => 'every 4 months', + '137d' => 'every 4 1/2 months (137 days)', + '6' => 'semiannually (every 6 months)', + '12' => 'annually', + '13' => 'every 13 months (annually +1 month)', + '24' => 'biannually (every 2 years)', + '36' => 'triannually (every 3 years)', + '48' => '(every 4 years)', + '60' => '(every 5 years)', + '120' => '(every 10 years)', + ) ; + \%freq; +} + =item generate_ps FILENAME Returns an postscript rendition of the LaTex file, as a scalar. |