FiveTech Support Forums

FiveWin / Harbour / xBase community
Board index FiveWin for Harbour/xHarbour VPOS
Posts: 130
Joined: Sat Oct 08, 2005 09:38 PM
VPOS
Posted: Thu Jun 24, 2010 05:30 PM
Is it possible to implement the .net code below in fwh

Thanks in advance,
Birol Betoncu

Code (fw): Select all Collapse
cc5payment mycc5pay = new cc5payment();

mycc5pay.host = "hostname"; 
mycc5pay.name = "name";
mycc5pay.password = "password";
mycc5pay.clientid = "clientId"; 

mycc5pay.orderresult=0;

mycc5pay.cardnumber = "CCNumber";
mycc5pay.cv2 = "CCVNumber";

mycc5pay.expmonth = "01";
mycc5pay.expyear = "06";

mycc5pay.taksit = "3";
mycc5pay.subtotal = "1.43"; 
mycc5pay.currency = "949";
mycc5pay.chargetype = "Auth";

mycc5pay.bname = "Sender name"; 
mycc5pay.baddr1 = "Sender Address";
mycc5pay.baddr2 = "senderEMail"; 

result = mycc5pay.processorder();
error =mycc5pay.errmsg;
oid = mycc5pay.oid;
approved = mycc5pay.appr;

if(result == "1")
{ 
if(!approved.Equals("Approved"))
{ 
return ;
} 
}
else
{
return;
}
Birol Betoncu
birol.betoncu@gmail.com
Using Harbour, FWH 19.05, BCC7

Continue the discussion