VPF::Количество символов в переменной

Akella

Дата 13.4.2006, 10:46 (ссылка)

(нет голосов)

Загрузка ...

Творец

Профиль
Группа: Модератор
Сообщений: 18485
Регистрация: 14.5.2003
Где: Корусант

Репутация: 20
Всего: 329

НУЖНО УСТРОИТЬ ПРОВЕРКУ КОЛИЧЕСТВА СИМВОЛОВ В ВЫХОДНОМ ПАРАМЕТРЕ TELS_LIST

Код


SET TERM ^ ;

CREATE PROCEDURE SP_TELS_LIST_MEDIATORS (
    ID INTEGER)
RETURNS (
    TELS_LIST VARCHAR(255))
AS
DECLARE VARIABLE TEMP VARCHAR(20) CHARACTER SET WIN1251;
begin
  /* Procedure Text */
  TELS_LIST = '';
  For select TEL FROM PHONES where ID_MEDIATOR = :ID into :TEMP do
   begin



  //НУЖНО УСТРОИТЬ ПРОВЕРКУ КОЛИЧЕСТВА СИМВОЛОВ В ВЫХОДНОМ ПАРАМЕТРЕ TELS_LIST
    if ?????(:TELS_LIST) >= 255 then exit;



    TELS_LIST = :TEMP || ';' || :TELS_LIST;
    TEMP = '';
   end
   suspend;
end^

SET TERM ; ^

GRANT EXECUTE ON PROCEDURE SP_TELS_LIST_MEDIATORS TO SYSDBA;

Alex

Дата 13.4.2006, 11:02 (ссылка)

(нет голосов)

Загрузка ...

Эксперт

Профиль
Группа: Экс. модератор
Сообщений: 4147
Регистрация: 25.3.2002
Где: Москва

Репутация: 7
Всего: 162

Код


DECLARE EXTERNAL FUNCTION STRLEN
    CSTRING(32767)
RETURNS INTEGER BY VALUE
ENTRY_POINT 'IB_UDF_strlen' MODULE_NAME 'ib_udf'

--------------------

Написать можно все - главное четко представлять, что ты хочешь получить в конце.

0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема \| Firebird, Interbase \| Следующая тема »