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

Вниз

Помогите с ХП   Найти похожие ветки [Firebird 1.5]

 
Koala ©   (2004-09-05 15:59) [0]

Есть процедура

CREATE PROCEDURE PR_SELECT_FIXING (
   IN_TYPE VARCHAR(10) CHARACTER SET WIN1251)
RETURNS (
   OUT_ID_AVTO INTEGER,
   OUT_GOS_NUM VARCHAR(15) CHARACTER SET WIN1251,
   OUT_MARKA_AVTO VARCHAR(30) CHARACTER SET WIN1251,
   OUT_ID_DRIVER INTEGER,
   OUT_FIO_DRIVER VARCHAR(25) CHARACTER SET WIN1251,
   OUT_CERTIFICATE VARCHAR(15) CHARACTER SET WIN1251,
   OUT_CUSTOMER VARCHAR(50) CHARACTER SET WIN1251,
   OUT_DATE_EDIT TIMESTAMP,
   OUT_USER_EDIT VARCHAR(32) CHARACTER SET WIN1251)
AS
begin
 /* Procedure Text */
for SELECT TBL_REF_AVTO.ID_AVTO, TBL_REF_AVTO.GOS_NUM,
      TBL_REF_AVTO.MARKA_AVTO,  TBL_REF_AVTO.TYPE_CAR,
      TBL_REF_DRIVERS.ID_DRIVER, TBL_REF_DRIVERS.FIO_DRIVER,
      TBL_REF_DRIVERS.CERTIFICATE, TBL_REF_FIXINGCAR.CUSTOMER,
      TBL_REF_FIXINGCAR.DATE_EDIT, TBL_REF_FIXINGCAR.USER_EDIT
FROM TBL_REF_DRIVERS
INNER JOIN TBL_REF_FIXINGCAR ON
          (TBL_REF_DRIVERS.ID_DRIVER = TBL_REF_FIXINGCAR.ID_DRIVER)
INNER JOIN TBL_REF_AVTO ON
          (TBL_REF_FIXINGCAR.ID_AVTO = TBL_REF_AVTO.ID_AVTO)
if (:IN_TYPE = "Passenger") then
where (TYPE_CAR = 1)
if (:IN_TYPE = "Freight") then
where (TYPE_CAR = 0)


 into
 OUT_ID_AVTO, OUT_GOS_NUM, OUT_MARKA_AVTO,
 OUT_ID_DRIVER, OUT_FIO_DRIVER, OUT_CERTIFICATE,
 OUT_CUSTOMER, OUT_DATE_EDIT, OUT_USER_EDIT
 do suspend;
end

На If ругается....
Нужна поцедура выборки если вводится IN_TYPE = "Passenger" то выборка по легковым, IN_TYPE = "Freight" - грузовым, а IN_TYPE = "" то все и легковые и грузовые
Как сделать????


 
Koala ©   (2004-09-05 16:43) [1]

Вопрос снят, сам разобрался....



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

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

Наверх




Память: 0.44 MB
Время: 0.039 c
4-1093424519
Manfred7
2004-08-25 13:01
2004.10.03
Хук на клавиатуру клавиша Win


1-1095162356
Луарвик
2004-09-14 15:45
2004.10.03
TForm1.BitBtn1MouseDown(Sender: TObject...


1-1095154474
webpauk
2004-09-14 13:34
2004.10.03
Parent


14-1095151477
Dmitriy O.
2004-09-14 12:44
2004.10.03
Лысина - это полянка, вытоптанная мыслями.


3-1094428996
O l e g
2004-09-06 04:03
2004.10.03
База растет как на дрожах!





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
Английский Французский Немецкий Итальянский Португальский Русский Испанский