Page History

#**********************************************************
=head2 get_settings() - return hash of settings

  Arguments:


  Returns:
    HASH
=cut
#**********************************************************
sub get_settings {
  my %SETTINGS = ();

  $SETTINGS{VERSION} = $PAYSYSTEM_VERSION; # объявляется в шапке модуля
  $SETTINGS{ID}      = $PAYSYSTEM_ID;      # объявляется в шапке модуля
  $SETTINGS{NAME}    = $PAYSYSTEM_NAME;    # объявляется в шапке модуля

  # хеш с нужными ключами настсройки системы, например: логин, пароль, поле идентификации абонента и тд.
  $SETTINGS{CONF} = \%PAYSYSTEM_CONF;

  return %SETTINGS;
}

#**********************************************************
=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) = @_;

  
}