Объявление данных

userID

Всем доброго времени суток! подскажите пожалуйста как можно объявить в коде инфонабора переменную "so_bwasl", чтобы она была такогоже типа как вданном примере взятом из программы:

Code:

selection-screen begin of block bl1                        "AB
                 with frame                                "AB
                 title text-bl1.                           "AB

  select-options:
                 so_bwasl for anepv-bwasl.
selection-screen end   of block bl1.                       "AB

Пономарев Артем

TYPE RANGE OF

userID

Спасибо с обявлением разобрался надо:

Code:

RANGES: so_bwasl FOR anepv-bwasl.

но возникла другая проблема есть код:

Code:

INCLUDE RAPOOL_ALV02.
*добавлена возможность выводить документы с внутренними перемещениями Вдв 3*
* Wenn BWA nicht durch Eingaben eingeschränkt default in Selection aufnehmen.
*RANGE: so_bwasl FOR anepv-bwasl.
IF so_bwasl[] is initial.
PERFORM bwasl_select TABLES r_sel_bwasl
USING 'ABG'.
ELSE.
r_sel_bwasl[] =  so_bwasl[] .
ENDIF.
CHECK anepv-bwasl in r_sel_bwasl.
INCLUDE RAQUERY4.

код выдает ошибку: "Statement is not accessible." однако если INCLUDE RAPOOL_ALV02. поставить в конец онфонабор про ошибку забывает, отчет не выполняется и валится в дамп на этапе запуска все с той же ошибкой. не знаю достаточно ли информации, если нет скажите опишу более подробно что пытаюсь сотворить.

Besa

Может поможет
Ошибка Statement is not accessible

userID

Besa написал:

Может поможет
Ошибка Statement is not accessible

к сожалению из того что там написано полезного для меня нет, то что у меня неправильно я это понимаю, вопрос как написать правильно.

Besa

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

Besa написал:

Может поможет
Ошибка Statement is not accessible

к сожалению из того что там написано полезного для меня нет, то что у меня неправильно я это понимаю, вопрос как написать правильно.

Как написать правильно что? Всю программу?
Вы понимаете, что эта ошибка, скорее всего из-за того, что структура программы неправильная, однозначного ответа нет, надо смотреть и анализировать весь код и код инклюдов тоже... имхо.
Дамп тоже покажите.

userID

Может от моих объяснений станет всем более понятно:
я на самом деле пытаюсь модифицировать стандартный SAP Query отчет TH02 Список выбытий из основного капитала (TH), построенный на инфонаборе SAPQuery_AM09. Инфонабор основан на ЛБД ADA.
Задача заставить отчет выводить строки по виду движения ОС 3* (перемещения с ОС на ОС) по аналогии с программой RAABGA_ALV01 (отчет по выбытиям) куски кода как раз взяты из него. В инфонаборе я их размещаю в секции Get узла ANEPV.

userID

Цитата:

Вы понимаете, что эта ошибка, скорее всего из-за того, что структура программы неправильная, однозначного ответа нет, надо смотреть и анализировать весь код и код инклюдов тоже... имхо.
Дамп тоже покажите.

Весь дамп или какую-то конкретную часть?

ROKO

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

Besa написал:

Может поможет
Ошибка Statement is not accessible

к сожалению из того что там написано полезного для меня нет, то что у меня неправильно я это понимаю, вопрос как написать правильно.

Нашел! Нашел!

Code:

RANGES: so_bwasl FOR tabw-bwasl.
* r_sel_bwasl  FOR anepv-bwasl.
START-OF-SELECTION.
IF so_bwasl[] IS INITIAL.
  PERFORM bwasl_select TABLES r_sel_bwasl
  USING 'ABG'.
ELSE.
  r_sel_bwasl[] =  so_bwasl[] .
ENDIF.

sy-uname

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

Может от моих объяснений станет всем более понятно:
я на самом деле пытаюсь модифицировать стандартный SAP Query отчет TH02 Список выбытий из основного капитала (TH), построенный на инфонаборе SAPQuery_AM09. Инфонабор основан на ЛБД ADA.
Задача заставить отчет выводить строки по виду движения ОС 3* (перемещения с ОС на ОС) по аналогии с программой RAABGA_ALV01 (отчет по выбытиям) куски кода как раз взяты из него. В инфонаборе я их размещаю в секции Get узла ANEPV.

Посмотрите сгенерированную программу (Запрос-другие функции - ) - тогда станет ясно где не исполняемый кусок

userID

путем научного метода тыка, я понимаю, что проблема кроется в INCLUDE RAPOOL_ALV02. этот инклюд состоит полностью из FORM bwasl_select. но видимо конструктивно его нельзя здесь располагать. в программе RAABGA_ALV01 он расположен в самом конце. может можно этот инклюд расположить в каком-то другом месте инфонабора. Пробовал в Get late но его perform там не видит.

ROKO

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

путем научного метода тыка, я понимаю, что проблема кроется в INCLUDE RAPOOL_ALV02. этот инклюд состоит полностью из FORM bwasl_select. но видимо конструктивно его нельзя здесь располагать. в программе RAABGA_ALV01 он расположен в самом конце. может можно этот инклюд расположить в каком-то другом месте инфонабора. Пробовал в Get late но его perform там не видит.

Тык вы START-OF-SELECTION вставили ?

userID

ROKO написал:

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

путем научного метода тыка, я понимаю, что проблема кроется в INCLUDE RAPOOL_ALV02. этот инклюд состоит полностью из FORM bwasl_select. но видимо конструктивно его нельзя здесь располагать. в программе RAABGA_ALV01 он расположен в самом конце. может можно этот инклюд расположить в каком-то другом месте инфонабора. Пробовал в Get late но его perform там не видит.

Тык вы START-OF-SELECTION вставили ?

конечно, но результат тотже

Code:

INCLUDE RAQUERY4.
*добавлена возможность выводить документы с внутренними перемещениями Вдв 3*
* Wenn BWA nicht durch Eingaben eingeschränkt default in Selection
* aufnehmen.
*: so_bwasl TYPE TABLE OF anepv.
*
*RANGES: so_bwasl FOR tabw-bwasl.
* r_sel_bwasl  FOR anepv-bwasl.
START-OF-SELECTION.
IF so_bwasl[] IS INITIAL.
PERFORM bwasl_select TABLES r_sel_bwasl
USING 'ABG'.
ELSE.
r_sel_bwasl[] =  so_bwasl[] .
ENDIF.
INCLUDE RAPOOL_ALV02.

ROKO

Вот эта прога у меня компилируется без проблем.

Code:

*&---------------------------------------------------------------------*
*& Report  ZTEST11                                                     *
*&                                                                     *
*&---------------------------------------------------------------------*
*&                                                                     *
*&                                                                     *
*&---------------------------------------------------------------------*

REPORT  ztest11.
TABLES anepv.
TABLES: anlh.
TABLES: tabw, tabwg, tabwt.

* Arbeitsversion Tabelle TABW.
DATA: BEGIN OF xabw OCCURS 200,
        bwasl  LIKE tabw-bwasl,
        bwagrp LIKE tabw-bwagrp,
      END OF xabw.

* Arbeitsversion Tabelle TABWG.
DATA: BEGIN OF xabwg OCCURS 100,
        bwagrp LIKE tabwg-bwagrp,
        pergrp LIKE tabwg-pergrp,
      END OF xabwg.

* Arbeitsversion Tabelle TABWT.
DATA: BEGIN OF xabwt OCCURS 200,
        bwasl  LIKE tabwt-bwasl,
        bwatxt LIKE tabwt-bwatxt,
      END OF xabwt.

* Merkleiste fuer ANLAV.
DATA: BEGIN OF hlp_anlav.
        INCLUDE STRUCTURE anlav.
DATA: END OF hlp_anlav.

* Merkleiste fuer ANLB
DATA: BEGIN OF hlp_anlb.
        INCLUDE STRUCTURE anlb.
DATA: END OF hlp_anlb.

RANGES: r_sel_bwasl FOR tabw-bwasl.

* Sortierwertfeld Gesamtabgang
DATA: sort_anbtr TYPE p.
INCLUDE rapool_alv02.
*добавлена возможность выводить документы с внутренними перемещениями Вдв 3*
* Wenn BWA nicht durch Eingaben eingeschr#nkt default in Selection aufnehmen.
RANGES: so_bwasl FOR tabw-bwasl.
* r_sel_bwasl  FOR anepv-bwasl.
START-OF-SELECTION.
IF so_bwasl[] IS INITIAL.
  PERFORM bwasl_select TABLES r_sel_bwasl
  USING 'ABG'.
ELSE.
  r_sel_bwasl[] =  so_bwasl[] .
ENDIF.
CHECK anepv-bwasl IN r_sel_bwasl.

Rokhay

Разберитесь, где у вас начинается и где заканчивается start-of-selection.
Обратите внимание на инклюд RAQUERY4. Он не содержит в себе подпрограмм, т.е должен располагаться внутри события, или подпрограммы.
И наоборот, RAPOOL_ALV02 начинается с объявления подпрограммы, т.е в главной программе после этого инклюда не должно быть никакого кода, относящегося к событию.

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

Объявление данных

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