[Info-ingres] Was I wrong to expect this to work?

[Roy Hann]

* create sequence genno as integer;
* create procedure next_vno result row (integer) 
* as declare vno integer not null;
* begin
*  select genno.nextval * 10 + generate_digit('LUHN_A',genno.currval) into :vno;
*  return row (:vno);
* end
* \g
Executing . . .

continue
* select * from next_vno() \g
Executing . . .

E_LQ003A Cannot start up 'select' query.
    Unexpected initial protocol response.

Roy