Using Credits with an AutoBill

$abill = new AutoBill();
 
// autobill id for an existing subscription
 
$abill->setMerchantAutoBillId('SBCR312345');
 
// We want to grant 2 days of credit
$time = new TimeInterval();
$time->setType('Day');
$time->setAmount(2);
 
$cr = new Credit();
$cr->setTimeIntervals(array($time));
 
// Now make the SOAP API call to grant credit to the autobill
$response = $abill->grantCredit($cr);
 
if ($response[’returnCode’] == 200) {
 
// Credit successfully granted to the autobill
 
$updatedABill = $response['data']->autobill;
 
print "Current entitlements are valid till: ";
print $updatedABill->getEndDate() . "\n";
}
else {
// Error while granting credit to the account
print $response['returnString'] . "\n";
}

$abill = new AutoBill();
 
// autobill id for customer's existing subscription to a game
 
$abill->setMerchantAutoBillId('STARWARS-239181');
 
$tok = new Token();
 
// specify the id of an existing token type.
// the autobill has a payment method defined in terms of this
// token type. Also the billing plan used by the autobill 
// specifies a price in terms of this token type.
 
$tok->setMerchantTokenId('STARWARS_POINTS');
 
$tokAmt = new TokenAmount();
$tokAmt->setToken($tok);
$tokAmt->setAmount(100); // customer lost 100 points in the game
 
$cr = new Credit();
$cr->setTokenAmounts(array($tokAmt));
 
// Now make the SOAP API call to deduct points from customer's
// subscription
 
$response = $abill->revokeCredit($cr);
 
if ($response[’returnCode’] == 200) {
 
// Credit successfully revoked from the autobill
 
$updatedAbill = $response->['data']->autobill;
$availableCredits = $updatedAbill->getCredit();
$availableTokens = $availableCredits->getTokenAmounts();
 
print "Available points to subscription: \n";
foreach($availableTokens as $tkAmt) {
print "Token type: " . $tkAmt->getMerchantTokenId() . " ";
print "Amount: " . $tkAmt->getAmount() . "\n";
}
}
else {
// Error while revoking credit from the autobill
print $response['returnString'] . "\n";
}

$abill = new AutoBill(); 
 
// autobill id for an existing customer whose
// credit history you wish to retrieve
 
$abill->setMerchantAccountId('jdoe101');
 
$page = 0; // paging begins at 0
$pageSize = 5; // five records 
$startTime = '2010-01-01T22:34:32.265Z'; 
$endTime = '2010-01-30T22:34:32.265Z'; 
 
do { 
$ret = 
$abill->fetchCreditHistory($startTime, $endTime $page, $pageSize); 
$count = 0; 
if ($ret[’returnCode’] == 200) { 
$fetchedLogs = $ret['creditEventLogs']; 
$count = sizeof($fetchedLogs); 
foreach ($fetchedLogs as $log) { 
$credit = $log->getCredit();
$ts = $log->getTimeStamp();
$eventType = $log->getType();
// process retrieved credit event log
// details here.
} 
$page++; 
} 
} while ($count > 0);