KD> execute procedure sp_exec_in_1_out_0
KD>  ((execute block returns(x integer) as begin :x=1; suspend;  end))

Ну ты и извращенец! :-)

Ответить