Разработка на 1С-Битрикс
Получаем список пользователей и заказ пользователя
Сначала нужно получить список всех пользователей и определитть есть ли у пользователя хотя бы один заказ. Если ни одного заказа нет, удаляем пользователя.
CModule::IncludeModule('sale');
global $USER;
$rsUsers = CUser::GetList(
($by = "ID"),
($order = "desc"),
false
);
while ($arUser = $rsUsers->Fetch()) {
$dbOrders = CSaleOrder::GetList(
false,
array(
'USER_ID' => $arUser['ID']
),
false,
array (
'nTopCount' => '1'
)
);
while ($arOrder = $dbOrders->Fetch()){
$userHasOrder = $arOrder['ID'];
}
if (!$userHasOrder) {
CUser::Delete($arUser['ID']);
}
unset($userHasOrder);
}
Внимание! Проверки на группу пользователя нет, удалятся все пользователи (включая администраторов- кроме пользователя ID=1) если у них нет заказов. Что бы исключить определенные группы, воспользуйтесь заметкой ORM UserTable в 1С-Битрикс.
Или перейдите к комментариям - там есть вариант для удаления из определенной группы пользователей.
- CModule::IncludeModule('sale'); - подключили модуль sale
- С помощью CUser::GetList получили список всех пользователей
- Внутри цикла перебора пользователей использовали CSaleOrder::GetList, что бы получить список заказов пользователя (фильтр 'USER_ID' => $arUser['ID']).
- Достачтоно знать хотя бы об одном заказе, что бы скрипт отрабатал быстрее, поэтому используем ограничение выборки nTopCount => '1'
- Если у пользователя есть заказ, в переменную $userHasOrder передаем ID заказа (не обязательно, можно просто создать эту переменную $userHasOrder = true)
- Если переменная $userHasOrder не существует, значит у пользователя нет заказов, удаляем пользователя методом CUser::Delete
- Удаляем переменную $userHasOrder с помощью unset, что бы не передалась дальше по циклу перебора пользователей.
Таким образом, после отработки скрипта, на сайте осталось всего 5 000 пользователей вместо 360 000 мертвых душ.