ФМ F4IF_INT_TABLE_VALUE_REQUEST обрезает нули в значении.

Galych

Доброго дня, коллеги.

Я создал средство поиска с помощью ФМ F4IF_INT_TABLE_VALUE_REQUEST.
В этот ФМ передал вн.таблицу с двумя столбцами. Все бы хорошо, но есть одно но -
имееются записи вроде такой
001 Источники ден.сред-в

В итоге ФМ обрезает эти два нуля и видим следующее:
1 Источники ден.сред-в

Но как сделать чтобы ФМ не удалял эти нули?

Besa

Galych написал:

Доброго дня, коллеги.

Я создал средство поиска с помощью ФМ F4IF_INT_TABLE_VALUE_REQUEST.
В этот ФМ передал вн.таблицу с двумя столбцами. Все бы хорошо, но есть одно но -
имееются записи вроде такой
001 Источники ден.сред-в

В итоге ФМ обрезает эти два нуля и видим следующее:
1 Источники ден.сред-в

Но как сделать чтобы ФМ не удалял эти нули?

Тип данных ячейки где хранится "001" какой? числовой?

Galych

тип CHAR

Besa

Galych написал:

тип CHAR

Странно, с типом чар не должно быть такого. У вас пользовательское СП не используется, в домене подпрограмм преобразования нету?

Galych

Даже и не думал, что так может быть. Как раз поле вн.таблицы ссылается на элемент данных, в котором есть ссылка на ср-во поиска. А в нем используется ФМ, который преобразует данные.

Возможно ли каким-нибудь другим способом обойти эту проблему?

Besa

Galych написал:

Даже и не думал, что так может быть. Как раз поле вн.таблицы ссылается на элемент данных, в котором есть ссылка на ср-во поиска. А в нем используется ФМ, который преобразует данные.

Возможно ли каким-нибудь другим способом обойти эту проблему?

Есть возможность править СП или польз. СП (ФМ)?

Galych

править как раз их нельзя

Besa

Galych написал:

править как раз их нельзя

Тогда попробуем так:
Вы когда вызываете СП с помощью ФМ-а F4IF_FIELD_VALUE_REQUEST, передавайте в ФМ параметр callback_form. То есть это название подпрограммы(xxx), которая должна быть создана в Вашей программе. Перед вызовом СП, Вы попадете в xxx и там в shlp-INTDESCR-SELMEXIT будет название пользовательского СП, которое Вам срезает нули, так вот надо отчистить эту переменную, должно сработать.

Code:

FORM xxx TABLES record_tab STRUCTURE seahlpres
                       CHANGING shlp TYPE shlp_descr
                         callcontrol LIKE ddshf4ctrl.
BREAK-POINT.
ENDFORM.                    "xxx

Galych

Огромное спасибо, Besa. Таким способом получилось.

в ФМ указал подпрограмму

Code:

  CALL FUNCTION 'F4IF_INT_TABLE_VALUE_REQUEST'
    EXPORTING
      retfield    = 'ZVERSION'
      dynpprog    = sy-repid
      dynpnr      = sy-dynnr
      dynprofield = 'VERSION'
      value_org   = 'S'
      callback_program = sy-repid
      callback_form = 'CLEAR_SH'
    TABLES
      value_tab   = lt_val_version.

В этой подпрограмме очистил поле "convexit"

Code:

FORM CLEAR_SH TABLES record_tab STRUCTURE seahlpres
                       CHANGING shlp TYPE shlp_descr
                         callcontrol LIKE ddshf4ctrl.

  DATA: ls_fielddescr TYPE LINE OF ddfields.

  LOOP AT shlp-fielddescr INTO ls_fielddescr
                       WHERE convexit <> space.
    CLEAR ls_fielddescr-convexit.
    MODIFY shlp-fielddescr FROM ls_fielddescr.
  ENDLOOP.

ENDFORM.                    "clear_sh

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

ФМ F4IF_INT_TABLE_VALUE_REQUEST обрезает нули в значении.

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