Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Базы";
Текущий архив: 2002.02.07;
Скачать: [xml.tar.bz2];

Вниз

Declare variable N integer;   Найти похожие ветки 

 
dim   (2002-01-10 10:16) [0]

Приветствую всех!
Коллеги каким образом присвоить значение об"явленной переменной в
InterBase"е. В MS SQL это проделывал при помощи select"а, т.е.
select N = value; А вот в InterBase"e как?


 
Alexandr   (2002-01-10 10:24) [1]

select
from
where
into :


 
dim   (2002-01-10 10:33) [2]

Нет не то. Я объявил переменную в теле хранимой процедуры и в зависимости от полученных данных о записи присвоить значение переменной, например:
CREATE PROCEDURE SAMPLE
*
*
)AS
DECLARE VARIABLE VALDEP INTEGER;
DECLARE VARIABLE VALPOST INTEGER;
DECLARE VARIABLE VALID INTEGER;
BEGIN
select M_ID,M_DEP,M_POST from ok_movement
where M_HUMAN=:HUMAN and M_ORDER=:VALPr and M_DATA=:VALDatPr and BIT=:VALBit
into :VALID, :VALDEP, :VALPOST;

if (:valid is null) then
select :VALDEP = 9999, :VALPOST = 9999//вот здесь и не понятно
else
select :VALDEP = 7777, :VALPOST = 7777//и вот здесь тоже


 
Romkin   (2002-01-10 10:35) [3]

или просто N = 2
Правило простое - в команде SQL, где могут быть имена полей, перед переменной ставишь ":", в остальных случаях не надо. Присваивание - через =, и ; в конце


 
Alexandr   (2002-01-10 10:44) [4]

вот так надо, видимо.
Хотя странная логика у процедуры...
Весьма странная.
CREATE PROCEDURE SAMPLE
*
*
)AS
DECLARE VARIABLE VALDEP INTEGER;
DECLARE VARIABLE VALPOST INTEGER;
DECLARE VARIABLE VALID INTEGER;
BEGIN
select M_ID,M_DEP,M_POST from ok_movement
where M_HUMAN=:HUMAN and M_ORDER=:VALPr and M_DATA=:VALDatPr and BIT=:VALBit
into :VALID, :VALDEP, :VALPOST;

if (:valid is null) then
begin
VALDEP = 9999;
VALPOST = 9999
end
else
begin
VALDEP = 7777;
VALPOST = 7777;
end;


 
dim   (2002-01-10 10:46) [5]

>Romkin.
К сожалению не прошло. Написал так:
if (:valid is null) then
:VALDEP = 9999; :VALPOST = 9999;
else
:VALDEP = 7777; :VALPOST = 7777/;
и ругается на ":" в строке 2


 
Alexandr   (2002-01-10 10:48) [6]

дорогой, сравни пожалуйста мой вариант со своим.
И почувстсвуй разницу!


 
Romkin   (2002-01-10 10:49) [7]

if (:valid is null) then
и здесь без двоеточия великолепно работает...


 
dim   (2002-01-10 10:51) [8]

>Alexandr
Согласен, пример немного корявый. Спасибо за помощь помогло.


 
Alexandr   (2002-01-10 10:51) [9]

пожалуста



Страницы: 1 вся ветка

Форум: "Базы";
Текущий архив: 2002.02.07;
Скачать: [xml.tar.bz2];

Наверх





Память: 0.46 MB
Время: 0.005 c
3-18733
ADy
2002-01-10 22:01
2002.02.07
SQL, Interbase


1-18815
AlexR_R
2002-01-22 17:53
2002.02.07
Где взять combobox c историей


1-18810
programmer1
2002-01-18 13:35
2002.02.07
Где найти описание компонентов WordAplication и проч.


1-18827
Philip
2002-01-25 00:50
2002.02.07
Не работает Debugger в делфи


3-18696
Mirage
2002-01-08 18:24
2002.02.07
Database Desktop





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский