The Perl Toolchain Summit needs more sponsors. If your company depends on Perl, please support this very important event.

NAME

  Finance::Bank::Sporo - Perl extension for B<SporoPay> of Slovenska Sporitelna.

VERSION

  0.16

SYNOPSIS

  use Finance::Bank::Sporo;

  $sporo_obj = Bank::Sporo->new($prenumber,$number);

  $sporo_obj->configure(
              amt       => $amt,
              vs        => $vs,
              ss        => $ss,
              rurl      => $rurl,
              param     => $param,
  );


  print $sporo_obj->pay_form();

DESCRIPTION

  Module for generating pay forms and links for B<SporoPay> of Slovenska
  Sporitelna (http://www.slsp.sk/).

USE

Functions ( or Methods ? )

new
        $sporo_obj  = Finance::Bank::Sporo->new($prenumber,$number);

This creates a new Finance::Bank::Sporo object using $prenumber as a "Predcisle uctu" and $number as a "Cislo uctu"

configure
        $sporo_obj->configure(
              amt       => $amt,
              vs        => $vs,
              ss        => $ss,
              rurl      => $rurl,
              param     => $param,
              image_src => '/PICS/sporopay_logo.gif',
        );

Set correct values to object. Possible parameters is: amt => Amount vs => Variable Symbol ss => Specific Symbol rurl => Redirect URL image_src => Path to image ( relative to DocumentRoot ) param => any parameter

Possible but default correct parameter is:

  action_url => SporoPayPay action URL
  default:
    https://ib.slsp.sk/epayment/epayment/epayment.xml

  image_src => Path to image ( relative to DocumentRoot )
  default:
    /PICS/sporopay_logo.gif

    
pay_form
  print $sporo_obj->pay_form();

  Return HTML FORM.
generic_pay_form
  print $sporo_obj->generic_pay_form($type);

  Return HTML FORM for payment with submit button.
  print $sporo_obj->pay_link();

  Return URL for payment.

EXAMPLES

  Look at B<SYNOPSIS>, t/*, examples/* and use the source.
  ( lookin for a volunteer for writing documentation and man pages)

AUTHOR INFORMATION

  Copyright 2000 Jan ' Kozo ' Vajda, Jan.Vajda@alert.sk. All rights
reserved.  It may be used and modified freely, but I do request that this
copyright notice remain attached to the file.  You may modify this module as
you wish, but if you redistribute a modified version, please attach a note
listing the modifications you have made.

Address bug reports and comments to: Jan.Vajda@alert.sk

CREDITS

Thanks very much to:

my wife Erika & kozliatko

for patience and love

SEE ALSO

  perl(1),Finance::Bank::TB(1).

2 POD Errors

The following errors were encountered while parsing the POD:

Around line 62:

'=item' outside of any '=over'

Around line 281:

You forgot a '=back' before '=head1'