Как написать функцию...

[Another Name]

Как написать C/Al функцию, возвращающую строку '####' (без кавычек), т.е. четыре решетки?
Спасибо

[OntheJump]

function ReturnSuperString : Text[4]

EXIT('####');

[randrews]

Цитата:

Сообщение от Another Name

Как написать C/Al функцию, возвращающую строку '####' (без кавычек), т.е. четыре решетки?
Спасибо

Цитата:

Сообщение от OntheJump

function ReturnSuperString : Text[4]

EXIT('####');

))))

OntheJump правильно ответил на ваш вопрос (я бы сказал досканально)

А вообще, если написать.
MESSAGE('a = ####'); , то он выдаст a = 0
MESSAGE('a = %1%1%1%1','#'); - нормальный вариант

[Another Name]

Цитата:

Сообщение от randrews

Цитата:

Сообщение от Another Name

Как написать C/Al функцию, возвращающую строку '####' (без кавычек), т.е. четыре решетки?
Спасибо

Цитата:

Сообщение от OntheJump

function ReturnSuperString : Text[4]

EXIT('####');

))))

OntheJump правильно ответил на ваш вопрос (я бы сказал досканально)

А вообще, если написать.
MESSAGE('a = ####'); , то он выдаст a = 0
MESSAGE('a = %1%1%1%1','#'); - нормальный вариант

Все равно не то. Пишу код

l_str:=myfunc;

MESSAGE(l_str);

где:

myfunc() : Text[4]
EXIT(STRSUBSTNO('%1%1%1%1','#'));

В результате выдает 0.

[Fordewind]

А не надо было скрещивать оба варианта!
Потому что вы в итоге сделали вот что:

Цитата:

Сообщение от randrews

А вообще, если написать.
MESSAGE('a = ####'); , то он выдаст a = 0

[randrews]

Цитата:

Сообщение от Another Name

Все равно не то. Пишу код

l_str:=myfunc;

MESSAGE(l_str);

где:

myfunc() : Text[4]
EXIT(STRSUBSTNO('%1%1%1%1','#'));

В результате выдает 0.

Вы по сути передаете в MESSAGE строку '####'.
MESSAGE('####') даст 0.
А надо писать MESSAGE('%1%1%1%1','#').
Думаю, по другому не получится....

Замените ваш код так:

myfunc(par : Boolean) : Text[50]
// %1 - ставить в тех местах, где решетки
IF par THEN
  EXIT('%1%1%1%1')
ELSE
EXIT('Сообщение без решеток');

И вызовите

l_str := myfunc(FALSE); // или TRUE
MESSAGE(l_str,'#');

Вы увидите, что такой вариант будет вам передавать когда надо - решетки, но, если их нет, то MESSAGE(l_str,'#'); будет вести себя как MESSAGE(l_str);