Краткий текст партии

dust

Здравствуйте.
Подскажите пожалуйста, с помощью какой функции можно прочитать KZTXT (Краткий текст партии).
Спасибо.

OlegDm

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

Здравствуйте.
Подскажите пожалуйста, с помощью какой функции можно прочитать KZTXT (Краткий текст партии).
Спасибо.

Code:

data: z_kztxt(40), 
        z_head like thead,
        z_tdname like thead-tdname,
        z_lines like tline occurs 10 with header line.

 
 call function 'READ_TEXT'
          exporting client  = sy-mandt
                              id  = 'VERM'
                     language = sy-langu
                          name = z_tdname
                         object = 'CHARGE'
             archive_handle = 0
           importing header = z_head
               tables lines = z_lines.
          exception
              ....
 if sy-subrc = 0.
    read table z_lines index 1.
    z_kztxt = z_lines-tdline(40).
  endif.

* где z_tdname = <Номер материала> + <Завод> + <Партия>

dust

Огромное спасибо.
Подскажите, где можно почитать про следующую часть
...
id = 'VERM'
language = sy-langu
name = z_tdname
object = 'CHARGE'
archive_handle = 0
...
Ещё раз спасибо.

OlegDm

Об этом много раз уже говорили на форуме, вот например 1 ссылка:

http://www.sapboard.ru/forum/viewtopic ... 2+readtext

dust

Ещё раз огромное спасибо.

Гость

Видимо глупый вопрос.
Почему не идет тест (46С)

Гость

Извините всё работает - торможу.

Razum

Добрый день.
Пытаюсь вытянуть краткий текст с партии, но функция почему то не выбирает, хотя если подставить критерии выбора в таблицу(STXH) там ищет?

написал как в примере

только
не могу правильно заполнить z_tdname
писал и так concatenate '*' MSEG-MATNR '*' Mseg-charg '*' into z_tdname.
и так z_tdname = MSEG-MATNR + Mseg-charg.
чёт не находит?

Code:

data: z_kztxt(40),
        z_head like thead,
        z_tdname like thead-tdname,
        z_lines like tline occurs 10 with header line.

 call function 'READ_TEXT'
          exporting
               client  = sy-mandt
               id  = 'VERM'
               language = sy-langu
               name = z_tdname
               object = 'CHARGE'
               archive_handle = 0
           importing
               header = z_head
               tables lines = z_lines
          exceptions
              NOT_FOUND = 1
              TOO_LARGE = 2
              OTHERS    = 3.
 if sy-subrc = 0.
    read table z_lines index 1.
    z_kztxt = z_lines-tdline(40).
  endif.

Подскажите где я ошибаюсь?

OlegDm

а зачем в z_tdname впихивать звездочки - '*'? Как я уже писал выше это должно быть что-то вроде того:

Code:

concatenate mseg-matnr mseg-werks mseg-charg into z_tdname.

если партии ведутся не на уровне завода, а на уровне материала(или манданта), то завод пожалуй тоже не нужен.

Razum

если партии ведутся не на уровне завода, а на уровне материала(или манданта), то завод пожалуй тоже не нужен.[/quote]

партии ведутся на уровне материала, хотелось бы узнать способ как обойтись без указания завода ведь в таблице запись отображена так
000000000207000945(4 пробела)2606089999
с 4 пробелами (место для завода) как программно написать 4 пробела я не знаю, может вы подскажите?

Александр

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

партии ведутся на уровне материала, хотелось бы узнать способ как обойтись без указания завода ведь в таблице запись отображена так
000000000207000945(4 пробела)2606089999
с 4 пробелами (место для завода) как программно написать 4 пробела я не знаю, может вы подскажите?

Попробуйте так

Code:

clear z_tdname.
z_tdname = matnr.
z_tdname+22 = charg.

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

Краткий текст партии

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