EXEC SQL WHENEVER SQLERROR CONTINUE；
sqlglm（msg_buffer， &buffer_size， &msg_length）；
printf（"Daemon error while connecting:\n"）；
printf（"%.*s\n"， msg_length， msg_buffer）；
printf（"Daemon quitting.\n"）；
exit（1）；
}
void
sql_error（）
{
char msg_buffer[512]；
int msg_length；
int buffer_size = 512；
EXEC SQL WHENEVER SQLERROR CONTINUE；
sqlglm（msg_buffer， &buffer_size， &msg_length）；
printf（"Daemon error while executing:\n"）；
printf（"%.*s\n"， msg_length， msg_buffer）；
printf（"Daemon continuing.\n"）；
}
main（）
{
EXEC SQL WHENEVER SQLERROR DO connect_error（）；
EXEC SQL CONNECT :uid；
printf（"Daemon connected.\n"）；
EXEC SQL WHENEVER SQLERROR DO sql_error（）；
printf（"Daemon waiting...\n"）；
while （1） {
EXEC SQL EXECUTE
BEGIN
/*接收deamon發來的字符*/
:status := DBMS_PIPE.RECEIVE_MESSAGE（’daemon’）；
IF :status = 0 THEN
/*取出字符*/
DBMS_PIPE.UNPACK_MESSAGE（:command）；
END IF；
END；
END-EXEC；
IF （status == 0）
{
command.arr[command.len] = ’\0’；
/*如果是stop，該進程就退出*/
IF （!strcmp（（char *） command.arr，
