default:
ingres_errno = SMS_INGRES_ERR;
com_err(whoami, SMS_INGRES_ERR, " code %d\n", *num);
- sprintf(buf, "Ingres error %d", *num);
- send_zgram("ingres_error", buf);
+ critical_alert("SMS", "SMS server encountered INGRES ERROR %d", *num);
return (*num);
}
return (0);
status = do_retrieve(q, pqual, psort, action, actarg);
}
if (status != SMS_SUCCESS) break;
- table = q->rtable;
-## repeat replace tblstats (retrieves = tblstats.retrieves + 1)
-## where tblstats.#table = @table
} else {
status = (*v->post_rtn)(q, Argv, cl, action, actarg);
}
int child;
struct save_queue *sq_create();
+ if (!strcmp(strtrim(list_type), strtrim(member_type)) &&
+ list_id == member_id)
+ return(1);
+
/* see if client is a direct member of list */
## repeat retrieve (exists = any(m.#member_id where
## m.#list_id = @list_id and