Business :: OnlinePayment :: Transfirstelink.

Business :: OnlinePayment :: Transfirstelink는 Business 용 Transfirst Elink 백엔드입니다 :: OnlinePayment
지금 다운로드

Business :: OnlinePayment :: Transfirstelink. 순위 및 요약

광고

  • Rating:
  • 특허:
  • Perl Artistic License
  • 가격:
  • FREE
  • 게시자 이름:
  • Jeff Finucane
  • 게시자 웹사이트:
  • http://search.cpan.org/~jef/Business-OnlinePayment-TransFirsteLink-0.04/TransFirsteLink.pm

Business :: OnlinePayment :: Transfirstelink. 태그


Business :: OnlinePayment :: Transfirstelink. 설명

Business :: OnlinePayment :: Transfirstelink는 Business 용 Transfirst Elink 백엔드입니다 :: OnlinePayment Business :: OnlinePayment :: Transfirstelink는 Business :: OnlinePaymentSynopsis 용 Transfirst eLink 백엔드입니다. 비즈니스 :: inellerpayment; MY $ TX = NEW Business :: OnlinePayment ( 'Transfirstelink', 'MerchantServnum'=> "8005551212",); # content () $ tx-> 콘텐츠 (type => 'cc', action => 'normal authorization', description => 'business :: inellermayment :: transfirstelink test', males => ' 49.95 ', invoice_number =>'100100 ', customer_id =>'jef ', name =>'jeff finucane ', address =>'123 anystreet ', city =>'anywhere ', state =>'ga ', zip => '30004', 이메일 => 'transfirst@weasellips.com', card_number => '41111111111111', 만료 => '12 / 09 ', cvv2 =>'123 ', order_number =>'string ',); $ tx-> 제출 (); if ($ tx-> is_success ()) {PRINT ( "카드가 처리 된", $ tx-> 권한 부여, "n", "주문 번호 :", $ tx-> order_number, "n", "cvv2 응답 : ", $ tx-> cvv2_response,"n ","avs 코드 : ", $ tx-> avs_code,"n ",); } else {my $ info = ""; $ info = "(cvv2 mismatch)"($ tx-> result_code == 114); 인쇄 ( "카드가 거부되었습니다 :", $ tx-> error_message, $ 정보, "n", "주문 번호 :", $ tx-> order_number "n",); } 요구 사항 : · Perl.


Business :: OnlinePayment :: Transfirstelink. 관련 소프트웨어

회사 소개