Negócios :: OnlinePayment :: Transfirstelink

Business :: OnlinePayment :: Transfirstelink é um trasfirst Elink Backend para Business :: OnlinePayment
Baixe Agora

Negócios :: OnlinePayment :: Transfirstelink Classificação e resumo

Propaganda

  • Rating:
  • Licença:
  • Perl Artistic License
  • Preço:
  • FREE
  • Nome do editor:
  • Jeff Finucane
  • Site do editor:
  • http://search.cpan.org/~jef/Business-OnlinePayment-TransFirsteLink-0.04/TransFirsteLink.pm

Negócios :: OnlinePayment :: Transfirstelink Tag


Negócios :: OnlinePayment :: Transfirstelink Descrição

Negócios :: OnlinePayment :: Transfirstelink é um trasfirst Elink Backend para Business :: OnlinePayment Negócios :: OnlinePayment :: Transfirstelink é um trasfirst Elink Backend para Business :: OnlinePaymentsynopsis Use Business :: OnlineSeyment; Meu $ TX = Novo Negócio :: OnlinePayment ('Transfirstelink', 'MerchantCustservnum' => "8005551212",); # Consulte a documentação do módulo para obter detalhes sobre conteúdo () $ tx-> Conteúdo (tipo => 'cc', ação => 'AUTORIZAÇÃO NORMAL', descrição => 'Business :: OnlinePayment :: Transfirstelink teste', quantidade => ' 49.95 ', Invoice_number =>' 100100 ', Customer_id =>' jef ', nome =>' jeff finucane ', endereço =>' 123 Anystreet ', cidade =>' qualquer lugar ', estado =>' ga ', zip => '30004', e-mail => 'transfirst@weasellips.com', card_number => '41111111111111111', expiração => '12 / 09 ', cvv2 =>' 123 ', order_number =>' string ',); $ tx-> enviar (); if ($ tx-> is_success ()) {print ("cartão processado com sucesso:", $ TX-> AUTORIZAÇÃO, "N", "Número do pedido:", $ TX-> Order_number, "N", "N", "N", "N" ", $ tx-> cvv2_response," n "," código AVS: ", $ tx-> avs_code," n ",); } else {my $ info = ""; $ info = "(incompatibilidade cvv2)" se ($ tx-> result_code == 114); Imprimir ("Cartão foi rejeitado:", $ tx-> error_message, $ Info, "N", "Número do pedido:", $ tx-> Order_number, "n",); } Requisitos: · Perl.


Negócios :: OnlinePayment :: Transfirstelink Software Relacionado