FS/FS/svc_CGP_Mixin.pm

   1 package FS::svc_CGP_Mixin;
   2
   3 use strict;
   4
   5 =head1 NAME
   6
   7 FS::svc_CGP_Mixin - Mixin class for svc_classes which can be related to cgp_rule
   8
   9 =head1 SYNOPSIS
  10
  11 package FS::svc_table;
  12 use base qw( FS::svc_CGP_Mixin FS::svc_Common );
  13
  14 =head1 DESCRIPTION
  15
  16 This is a mixin class for svc_ classes that are exported to Communigate Pro.
  17
  18 It currently contains timezone data for domains and accounts.
  19
  20 =head1 METHODS
  21
  22 =over 4
  23
  24 =item cgp_timezone
  25
  26 Returns an arrayref of Communigate time zones.
  27
  28 =cut
  29
  30 #http://www.communigate.com/pub/client/TimeZones.data
  31 #http://www.communigate.com/cgatepro/WebMail.html#Settings
  32
  33 sub cgp_timezone_values {
  34   #my $self = shift; #i'm used as a class and object method but just return data
  35
  36   [ '',
  37     'HostOS',
  38     '(+0100) Algeria/Congo',
  39     '(+0200) Egypt/South Africa',
  40     '(+0300) Saudi Arabia',
  41     '(+0400) Oman',
  42     '(+0500) Pakistan',
  43     '(+0600) Bangladesh',
  44     '(+0700) Thailand/Vietnam',
  45     '(+0800) China/Malaysia',
  46     '(+0900) Japan/Korea',
  47     '(+1000) Queensland',
  48     '(+1100) Micronesia',
  49     '(+1200) Fiji',
  50     '(+1300) Tonga/Kiribati',
  51     '(+1400) Christmas Islands',
  52     '(-0100) Azores/Cape Verde',
  53     '(-0200) Fernando de Noronha',
  54     '(-0300) Argentina/Uruguay',
  55     '(-0400) Venezuela/Guyana',
  56     '(-0500) Haiti/Peru',
  57     '(-0600) Central America',
  58     '(-0700) Arisona', #Arizona?
  59     '(-0800) Adamstown',
  60     '(-0900) Marquesas Islands',
  61     '(-1000) Hawaii/Tahiti',
  62     '(-1100) Samoa',
  63     'Asia/Afghanistan',
  64     'Asia/India',
  65     'Asia/Iran',
  66     'Asia/Iraq',
  67     'Asia/Israel',
  68     'Asia/Jordan',
  69     'Asia/Lebanon',
  70     'Asia/Syria',
  71     'Australia/Adelaide',
  72     'Australia/East',
  73     'Australia/NorthernTerritory',
  74     'Europe/Central',
  75     'Europe/Eastern',
  76     'Europe/Moscow',
  77     'Europe/Western',
  78     'GMT (+0000)',
  79     'Newfoundland',
  80     'NewZealand/Auckland',
  81     'NorthAmerica/Alaska',
  82     'NorthAmerica/Atlantic',
  83     'NorthAmerica/Central',
  84     'NorthAmerica/Eastern',
  85     'NorthAmerica/Mountain',
  86     'NorthAmerica/Pacific',
  87     'Russia/Ekaterinburg',
  88     'Russia/Irkutsk',
  89     'Russia/Kamchatka',
  90     'Russia/Krasnoyarsk',
  91     'Russia/Magadan',
  92     'Russia/Novosibirsk',
  93     'Russia/Vladivostok',
  94     'Russia/Yakutsk',
  95     'SouthAmerica/Brasil',
  96     'SouthAmerica/Chile',
  97     'SouthAmerica/Paraguay',
  98   ];
  99 }
 100
 101 =item cgp_emptytrash_values
 102
 103 Returns an arrayref of possible EmptyTrash values.
 104
 105 =cut
 106
 107 #http://www.communigate.com/cgatepro/WebMail.html#Trash
 108
 109 sub cgp_emptytrash_values {
 110   #my $self = shift; #i'm used as a class and object method but just return data
 111
 112   [ '', #<option value="-1">default(92 days)
 113     '0 seconds',
 114     '60 minutes',
 115     '2 hours',
 116     '3 hours',
 117     '6 hours',
 118     '12 hours',
 119     '24 hours',
 120     '2 days',
 121     '3 days',
 122     '7 days',
 123     '10 days',
 124     '2 weeks',
 125     '3 weeks',
 126     '30 days',
 127     '60 days',
 128     '90 days',
 129     '180 days',
 130     '360 days',
 131   ];
 132 }
 133
 134 =back
 135
 136 =head1 BUGS
 137
 138 =head1 SEE ALSO
 139
 140 =cut
 141
 142 1;