Подскажите как программно можно указать 4 пробела?

Razum

Добрый день.
Подскажите как программно можно указать 4( и более) пробела?
Необходимо между материалом и партией вставить 4 пробела, там должен указываться завод.

Pokusannoe_Zubilo

а чем не устраивает так?

Code:

DATA l_str(35).

CLEAR l_str.
l_str       = l_matnr(18).
l_str+23 = l_batch.

в l_str с 19, по 22 символы и есть пробелы.

lynx_oemk

варинтов много думаю есть и более остроумные, но вот что на ум пришло сходу:

1)

Code:

data: str type string.
shift str right by 4 places.
concatenate matnr charg into result separated by str.

2)

Code:

data: 
begin of struc,
  matnr type matnr,
  werks type werks,
  charg type charg_d,
end of struc.

*  заполняем struc

result = struc.

3)

Code:

result = charg.
shift result right by 4 places.
concatenate matnr result into result.

Konstantin Anikeev

lynx_oemk написал(а):

варинтов много думаю есть и более остроумные, но вот что на ум пришло сходу:

1)
data: str type string.
shift str right by 4 places.
concatenate matnr charg into result separated by str.

2)
data:
begin of struc,
matnr type matnr,
werks type werks,
charg type charg_d,
end of struc.

* заполняем struc

result = struc.

3)
result = charg.
shift result right by 4 places.
concatenate matnr result into result.

Берите второй...

lynx_oemk

Pokusannoe_Zubilo написал:

а чем не устраивает так?

Тут главный вопрос в том, что товарищ вопрос плохо задал )))
надо конкретизировать, в каком формате это должно быть в аутпут или во внутреннем.

Если во внутреннем, то конечно пододет твой вариант (или даже красивее будет мой №2, ибо он более универсален (можно расширить структуру и не вычислять смещение для кажд. поля)

Razum

lynx_oemk написал(а):

варинтов много думаю есть и более остроумные, но вот что на ум пришло сходу:

1)
data: str type string.
shift str right by 4 places.
concatenate matnr charg into result separated by str.
....

Спасибо, взял первый метод и всё заработало
concatenate mseg-matnr mseg-charg into z_tdname separated by str.

Большое всем спасибо!Я ИДИЁТ, УБЕЙТЕ МИНЯ КТО-НИБУДЬ!

Pokusannoe_Zubilo

lynx_oemk написал(а):

Pokusannoe_Zubilo написал:

а чем не устраивает так?

Тут главный вопрос в том, что товарищ вопрос плохо задал )))
надо конкретизировать, в каком формате это должно быть в аутпут или во внутреннем.

Если во внутреннем, то конечно пододет твой вариант (или даже красивее будет мой №2, ибо он более универсален (можно расширить структуру и не вычислять смещение для кажд. поля)

согласен, правильно поставленный вопрос это половина ответа

Сергей Королев

Razum написал(а):

Спасибо, взял первый метод и всё заработало
concatenate mseg-matnr mseg-charg into z_tdname separated by str.

Большое всем спасибо!Я ИДИЁТ, УБЕЙТЕ МИНЯ КТО-НИБУДЬ!

Не надо брать первый! В общем, понятно, что скорее всего вы работаете с внтуренним представлением, в этом случае, если у вас номер материала не цифровой, то concatenate обрежет хвостовые пробелы и это приведет к ошибке.
Второй вариант предпочтительнее.

DKiyanov

В Unicode системе второй вариант не прокатит.

Konstantin Anikeev

А вот и нифига подобного... В Solution Manager 7.0, SRM 4.0 прокатил... Обе юникодовские... Вы же в итоге все равно с CHAR работаете... А сколько за ним байт стоит, это уже сама система решит...

Jelena

Вообще-то вульгарное

Code:

CONCATENATE ... INTO ... SEPARATED BY ' '.

тоже работает.

Сергей Королев

DKiyanov написал:

В Unicode системе второй вариант не прокатит.

Прокатит, если все поля в структуре символьные (в том числе и N).

Правила форума

Подскажите как программно можно указать 4 пробела?

Кто сейчас на конференции