mirror of
https://github.com/postgres/postgres.git
synced 2025-07-05 07:21:24 +03:00
From: Michael Meskes <Michael.Meskes@usa.net>
See attached file. Now accepts "exec sql whenever sqlwarning".
This commit is contained in:
@ -1,3 +1,15 @@
|
||||
exec sql include sqlca;
|
||||
|
||||
exec sql whenever sqlerror sqlprint;
|
||||
exec sql whenever sqlerror do print_and_stop();
|
||||
exec sql whenever sqlwarning do warn();
|
||||
|
||||
void print_and_stop(void)
|
||||
{
|
||||
sqlprint();
|
||||
exit(-1);
|
||||
}
|
||||
|
||||
void warn(void)
|
||||
{
|
||||
fprintf(stderr, "Warning: At least one column was truncated\n");
|
||||
}
|
||||
|
Reference in New Issue
Block a user