...
customer_t *cust;
for(cust=R->customer;cust;cust=cust->next) { // R: root of database
	if(cust->is.status==CUSTOMER_INTERESSENT) {
		customer_send_info_letter(cust);
		cust->last_info_letter_sent=time(0);
	}
}