...
Code Block |
---|
language | perl |
---|
title | sub proccess() |
---|
|
#**********************************************************
=head2 proccess(\%FORM) - function that proccessing payment
on paysys_check.cgi
Arguments:
$FORM - HASH REF to %FORM
Returns:
=cut
#**********************************************************
sub proccess {
my $self = shift;
my ($FORM) = @_;
} |
Функция user_portal() должна быть для оплаты из клиентского кабинета.
Функция запускается после введения суммы и нажатия Дальше.
Code Block |
---|
language | perl |
---|
title | sub proccess() |
---|
|
#**********************************************************
=head2 user_portal () -
Arguments:
Returns:
=cut
#**********************************************************
sub user_portal {
my $self = shift;
my ($user, $attr) = @_;
} |