Revision e09347c8
Von Geoffrey Richardson vor mehr als 15 Jahren hinzugefügt
| SL/IS.pm | ||
|---|---|---|
| 44 | 44 |
use SL::Common; |
| 45 | 45 |
use SL::DBUtils; |
| 46 | 46 |
use SL::DO; |
| 47 |
use SL::GenericTranslations; |
|
| 47 | 48 |
use SL::MoreCommon; |
| 48 | 49 |
use SL::IC; |
| 49 | 50 |
use Data::Dumper; |
| ... | ... | |
| 423 | 424 |
# connect to database |
| 424 | 425 |
my $dbh = $form->dbconnect($myconfig); |
| 425 | 426 |
|
| 427 |
my $language_id = $form->{language_id};
|
|
| 428 |
|
|
| 426 | 429 |
# get contact id, set it if nessessary |
| 427 | 430 |
$form->{cp_id} *= 1;
|
| 428 | 431 |
|
| ... | ... | |
| 484 | 487 |
'trans_id' => $form->{customer_id});
|
| 485 | 488 |
map { $form->{"vc_cvar_$_->{name}"} = $_->{value} } @{ $custom_variables };
|
| 486 | 489 |
|
| 490 |
$form->{cp_greeting} = GenericTranslations->get('dbh' => $dbh,
|
|
| 491 |
'translation_type' => 'greetings::' . ($form->{cp_gender} eq 'f' ? 'female' : 'male'),
|
|
| 492 |
'language_id' => $language_id, |
|
| 493 |
'allow_fallback' => 1); |
|
| 494 |
|
|
| 495 |
|
|
| 487 | 496 |
$dbh->disconnect; |
| 488 | 497 |
|
| 489 | 498 |
$main::lxdebug->leave_sub(); |
Auch abrufbar als: Unified diff
Ansprechpartner: cp_greeting durch cp_gender ersetzt
contacts->cp_greeting, was normalerweise fuer Frau/Herr benutzt wird,
wird durch cp_gender (m/f) ersetzt, was den Vorteil hat, dass man je
nach beim Kunden definierter Sprache verschiedene Anreden generieren und
die Anreden zentral verwalten kann.
1. cp_gender wird fuer alle Ansprechpartner auf "m" gesetzt
2. cp_gender wird fuer die Ansprechpartner auf "f" gesetzt, bei denen in
cp_greeting Frau/Mrs/Miss vorkam, bei abweichender weiblicher Deklaration muss
hier also noch nachgepflegt werden
3. alle cp_greeting-Eintraege, die nicht Herr/Frau/Mrs/Miss enthalten
werden nach cp_title verschoben
4. cp_greeting wird geloescht