Assign

Long

Code:

FUNCTION zf1.
*"----------------------------------------------------------------------
*"*"Local Interface:
*"----------------------------------------------------------------------
  DATA:
         BEGIN OF xxx OCCURS 0
           , f1(10) TYPE c
           , f2(20) TYPE c
        ,END OF xxx
        .
  xxx-f1 = sy-uname.
  xxx-f2 = sy-uzeit.
  APPEND xxx.
  CALL FUNCTION 'ZF2'
    .
ENDFUNCTION.


FUNCTION zf2.
*"----------------------------------------------------------------------
*"*"Local Interface:
*"----------------------------------------------------------------------
  FIELD-SYMBOLS:
                 <fs_any> TYPE ANY
                .
  DATA: lv_path TYPE string value '(?????)XXX[]'
             .

    ASSIGN (lv_path) TO <fs_any>.

ENDFUNCTION.

Господа, что нужно поставить вместо "?????" чтобы assign отработал. Пробовал очень много вариантов, и все никак. Может принципиально нельзя из одного ФМ подцепить перменную из другого ФМ?

Aval

Что бы данная конструкция работала, внутр. таблица должна быть объявлена в главной программе, например инклуд LXXXXTOP.
Если ФМы в разных функ.группах, то во втрой функции надо использовать:
DATA: lv_path(30) TYPE С value '(имя глав.програм. ФМ1)XXX[]'.
Если в одной группе, то достаточно:
DATA: lv_path(30) TYPE С value 'XXX[]'.

sy-uname

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

Господа, что нужно поставить вместо "?????" чтобы assign отработал. Пробовал очень много вариантов, и все никак. Может принципиально нельзя из одного ФМ подцепить перменную из другого ФМ?

Принципиально нельзя __никакие__ __локальные__ переменные цеплять таким образом.

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

Assign

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