Ded wrote:
> Ваша правда, жентельмены... Ох...
И всё-таки ещё не утро. Вот вам :-P
Create Procedure ChumVam
Returns (Chum Int)
as
begin
For Select rdb$relation_id From rdb$relations
Where rdb$relation_name='RDB$DATABASE' and rdb$relation_id<>1
Into :Chum
Do
Suspend;
end
Всю ночь сижу, клюю носом за столом,
Но настигает поздний жидкий рассвет.
Я задыхаюсь, я с трудом ловлю воздух ртом,
Мой последний путь, другой дороги нет... (C)
--
Regards. Ded.
--~--~---------~--~----~------------~-------~--~----~
-~----------~----~----~----~------~----~------~--~---
