Значитъ так, мне не нравитца ета! Есле на клиент депозит стал "0" примерна на 2007-01-02, то "Data Activation" автоматична минитса (change) на ета дата 2007-01-02. Патом примерна клиент хочит платит на 2007-01-05
я ваведу денги но "Data Activation" астала "2007-01-02". А що палочила мои клиент автоматична затирял 3 дня, ето не коректна!
edit "/usr/abills/Abills/mysql/Bills.pm", add after 90 row
sub action {
my $self = shift;
my ($type, $BILL_ID, $SUM, $attr) = @_;
my $value = '';
if ($type eq 'take') {
$value = "-$SUM";
}
elsif($type eq 'add') {
$value = "+$SUM";
}
### add from ILIA ##### 90 row !!!
my $sth = $db->prepare("SELECT * FROM bills WHERE uid=$BILL_ID");$sth->execute();
my $ref =$sth->fetchrow_hashref();
my $sumata = "$ref->{'deposit'}";
$sth->finish();
if (($sumata <= 0) and ($type eq 'add')) {
$self->query($db, "UPDATE users SET activate=curdate() WHERE uid='$BILL_ID';", 'do');
}
#######################
После ета patch фаил /usr/abills/Abills/mysql/Bills.pm, дата плата атоматична минаитса на текущая дата!
Пажалоста дабавите ета в новая версиу примерна так:
add /usr/abills/libexec
data_activation = yes;
add after 90 row /usr/abills/Abills/mysql/Bills.pm"
if (defined($conf{data_activation}) && $conf{data_activation} eq 'yes') {
my $sth = $db->prepare("SELECT * FROM bills WHERE uid=$BILL_ID");$sth->execute();
my $ref =$sth->fetchrow_hashref();
my $sumata = "$ref->{'deposit'}";
$sth->finish();
if (($sumata <= 0) and ($type eq 'add')) {
$self->query($db, "UPDATE users SET activate=curdate() WHERE uid='$BILL_ID';", 'do');
}
Data Activation automatic change!
-
- Site Admin
- Сообщения: 5746
- Зарегистрирован: Пт янв 28, 2005 3:11 pm
- Контактная информация:
-
- Site Admin
- Сообщения: 5746
- Зарегистрирован: Пт янв 28, 2005 3:11 pm
- Контактная информация: