$deleteList->props = array("ID" => $newListID);
$deleteResponse = $deleteList->delete();
print_r('Delete Status: ' . ($deleteResponse->status ? 'true' : 'false') . "\n");
print 'Code: ' . $deleteResponse->code . "\n";
print 'Message: ' . $deleteResponse->message . "\n";
print 'Results Length: ' . count($deleteResponse->results) . "\n";
print 'Results: ' . "\n";
print_r($deleteResponse->results);
print "\n---------------\n";
// Retrieve List to confirm deletion
print "Retrieve List to confirm deletion \n";
$getList = new ET_List();
$getList->authStub = $myclient;
$getList->filter = array('Property' => 'ID', 'SimpleOperator' => 'equals', 'Value' => $newListID);
$getList->props = array("ID", "PartnerKey", "CreatedDate", "ModifiedDate", "Client.ID", "Client.PartnerClientKey", "ListName", "Description", "Category", "Type", "CustomerKey", "ListClassification", "AutomatedEmail.ID");
$getResponse = $getList->get();
print_r('Get Status: ' . ($getResponse->status ? 'true' : 'false') . "\n");
print 'Code: ' . $getResponse->code . "\n";
print 'Message: ' . $getResponse->message . "\n";
print_r('More Results: ' . ($getResponse->moreResults ? 'true' : 'false') . "\n");
print 'Results Length: ' . count($getResponse->results) . "\n";
print 'Results: ' . "\n";
print_r($getResponse->results);
print "\n---------------\n";
}
} catch (Exception $e) {
echo 'Caught exception: ', $e->getMessage(), "\n";
}
?>
