Обновление динамически объявленного поля

vvp

Добрый день! У меня возникла следующая проблема: пользователь динамически задает имя таблицы и поле таблицы.

SELECTION-SCREEN BEGIN OF BLOCK T1 WITH FRAME TITLE TEXT-T01.
PARAMETERS:
TABLES LIKE DD03L-TABNAME OBLIGATORY,
FIELDS LIKE DD03L-FIELDNAME OBLIGATORY,
SELECTION-SCREEN END OF BLOCK T1.

FIELDTABLE-FIELDNAME = FIELDS. "Нужно для использования в Select при выборе значений поля
APPEND FIELDTABLE.

Далее я выбираю значения этого поля.

START-OF-SELECTION.

SELECT (FIELDTABLE) FROM (TABLES) INTO TABLE RECODING.

END-OF-SELECTION.

Впоследствии требуется изменить значения этого динамически заданного поля, где у меня и возникает загвоздка. Пробовал что-то вроде:

UPDATE (tables) set (fieldtable) = newtext where fieldtable = oldtext.

Но программа ясное дело вылетает в дамп.

Может кто подскажет как обновлять эти динамически заданные поля?

sy-uname

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

Добрый день! У меня возникла следующая проблема: пользователь динамически задает имя таблицы и поле таблицы.

SELECTION-SCREEN BEGIN OF BLOCK T1 WITH FRAME TITLE TEXT-T01.
PARAMETERS:
TABLES LIKE DD03L-TABNAME OBLIGATORY,
FIELDS LIKE DD03L-FIELDNAME OBLIGATORY,
SELECTION-SCREEN END OF BLOCK T1.

FIELDTABLE-FIELDNAME = FIELDS. "Нужно для использования в Select при выборе значений поля
APPEND FIELDTABLE.

Далее я выбираю значения этого поля.

START-OF-SELECTION.

SELECT (FIELDTABLE) FROM (TABLES) INTO TABLE RECODING.

END-OF-SELECTION.

Впоследствии требуется изменить значения этого динамически заданного поля, где у меня и возникает загвоздка. Пробовал что-то вроде:

UPDATE (tables) set (fieldtable) = newtext where fieldtable = oldtext.

Но программа ясное дело вылетает в дамп.

Может кто подскажет как обновлять эти динамически заданные поля?

А F1 у Вас не работает разве?

Попробуйте CONCATENATE 'fieldtable = ' newtext INTO set_expr. UPDATE (tables) set (set_expr) where fieldtable = oldtext.
учитывая что
Notes
Before release 6.10, SET could only be specified for static specification of the database table.

Before release 6.10, no dynamic logical expressions could be used in the WHERE condition of the statement UPDATE.

vvp

CONCATENATE тоже не получается, вылетает в такой же дамп.

lumer

Code:

Example 

Dynamic conversion of the content of an arbitrary column in an arbitrary database table of a previous currency in Euro. 

PARAMETERS: table    TYPE c LENGTH 30, 
            column   TYPE c LENGTH 30, 
            old_curr TYPE sycurr. 

DATA: set_expr  TYPE string, 
      condition TYPE string. 

CONCATENATE column ` = 'EUR'` 
            INTO set_expr. 

CONCATENATE column ` = old_curr` 
            INTO condition. 

TRY. 
    UPDATE (table) 
    SET    (set_expr) 
    WHERE  (condition). 
  CATCH cx_sy_dynamic_osql_error. 
    MESSAGE `Error in update!` TYPE 'I'. 
ENDTRY. 

Годится?

vvp

lumer, да да да, самое оно! Всем спасибо за помощь!

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

Обновление динамически объявленного поля

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