Negócio :: Gestpaycrypt. Business :: GESTPayCrypt é uma interface Perl para o gestpay do sistema de pagamento on-line italiano.
Baixe Agora

Negócio :: Gestpaycrypt. Classificação e resumo

Negócio :: Gestpaycrypt. Tag

conectados Módulo Perl. Interface Gestpay. pagamento online GestPay

Negócio :: Gestpaycrypt. Descrição

Negócio :: GESTPayCrypt é uma interface Perl para o sistema de pagamento on-line italiano Gestpay. Negócios :: GESTPayCrypt é uma interface Perl para o sistema de pagamento on-line italiano GESTPAY.SYNOPSIS # # Solicitar # use negócios :: gestpaycrypt; Meu $ OBJ = NEW NEGÓCIO :: GESTPAYCRYPT; $ OBJ-> SetShoplogin ($ Shoplogin); $ obj-> Setcurrency ($ moeda); $ obj-> Setamount (valor $); $ Obj-> SetShoptransactionID ($ ShopTransationID); $ obj-> SetLanguage ($ idioma); $ obj-> criptografar (); if ($ obj-> getErrorCode ()) {imprimir 'erro:', $ obj-> geterrorcode (), '', $ objcrypt-> geterrordescription (); } else {meu $ a = $ obj-> getshoplogin (); meu $ b = $ obj-> getencryptedstring (); Imprimir QQ ~ ~; } # # Resposta # use negócios :: gestpaycrypt; Meu $ OBJ = NEW NEGÓCIO :: GESTPAYCRYPT; $ OBJ-> SetShoplogin ($ Shoplogin); $ Obj-> SetencryPtedString ($ B); $ obj-> descriptografar (); if ($ objcrypt-> getErrorCode ()) {Imprimir 'erro:', $ obj-> geterrcode (), '', $ objcrypt-> geterrordescription (); } else {Imprimir 'ShopLogin:', $ obj-> getshoplogin (), "N"; Imprimir 'moeda:', $ obj-> getcurrency (), "n"; Imprimir 'quantidade:', $ obj-> getAmount (), "n"; Imprimir 'ShopTransactionID:', $ obj-> getshoptransactionid (), "n"; Imprimir 'Nome do Comprar:', $ Obj-> GetBuyername (), "N"; Imprimir 'Buyeremail:', $ Obj-> GetBuyeremail (), "N"; Imprimir 'TransactionResult:', $ Obj-> GetTransactionResult (), "N"; Imprimir 'Autorização:', $ Obj-> GetAuthorizationCode (), "N"; Imprimir 'BankTransactionID:', $ obj-> getbanktransactionID (), "N"; Imprimir 'errorCode:', $ obj-> geterrorcode (), "n"; Imprimir 'errordescription:', $ obj-> geterrordescription (), "n"; Imprimir 'Alertcode:', $ obj-> getalertcode (), "n"; Imprimir 'AlertDescription:', $ Obj-> GetalertDescription (), "N"; Imprimir 'CustomInfo:', $ obj-> getCustominfo (), "n"; } Requisitos: · Perl.

Negócio :: Gestpaycrypt. Software Relacionado