Текущее время: Вт, июл 22 2025, 03:16

Часовой пояс: UTC + 3 часа


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


ВНИМАНИЕ!

Вопросы по SAP Query и Quick View - сюда



Начать новую тему Ответить на тему  [ Сообщений: 2 ] 
Автор Сообщение
 Заголовок сообщения: Не создается интерактивный список
СообщениеДобавлено: Чт, янв 31 2013, 19:32 
Ассистент
Ассистент

Зарегистрирован:
Вс, дек 09 2012, 16:41
Сообщения: 37
Добрый день!
Потихоньку осваиваю ABAP, для себя делая простенькие программы и экспериментируя на них.

Есть код:

CONSTANTS actvt_display TYPE activ_auth VALUE '03'.
PARAMETERS pa_con TYPE sbook-connid.

* workarea for SELECT
DATA wa_sbook TYPE sbook.

TABLES sdyn_book.

DATA ok_code LIKE sy-ucomm.

INITIALIZATION.

SET TITLEBAR 'LIST0'.


START-OF-SELECTION.

*SET PF-STATUS 'LIST'.
*SET TITLEBAR 'LIST'.



SELECT carrid connid fldate bookid
FROM sbook
INTO CORRESPONDING FIELDS OF wa_sbook
WHERE connid = pa_con.

* AUTHORITY-CHECK OBJECT 's_carrid'
* ID 'CARRID' FIELD wa_sbook-carrid
* ID 'ACTVT' FIELD actvt_display.


IF sy-subrc = 0.

WRITE: / wa_sbook-carrid COLOR COL_KEY,
wa_sbook-connid,
wa_sbook-fldate COLOR COL_KEY,
wa_sbook-bookid COLOR COL_KEY.
HIDE: wa_sbook-carrid,
wa_sbook-connid,
wa_sbook-fldate,
wa_sbook-bookid.

ENDIF.
ENDSELECT.


CLEAR wa_sbook.

AT LINE-SELECTION.

SELECT SINGLE * FROM sbook INTO wa_sbook
WHERE carrid = wa_sbook-carrid AND connid = wa_sbook-connid AND fldate = wa_sbook-fldate AND bookid = wa_sbook-bookid.

IF sy-subrc = 0.

MOVE-CORRESPONDING wa_sbook TO sdyn_book.
CALL SCREEN 100.

ENDIF.

module STATUS_0100 output.

SET PF-STATUS 'DYNPRO'.
SET TITLEBAR 'DYNPRO'.

endmodule.
*&---------------------------------------------------------------------*
*& Module CLEAR_OK_CODE OUTPUT
*&---------------------------------------------------------------------*
* text
*----------------------------------------------------------------------*
MODULE clear_ok_code OUTPUT.
CLEAR ok_code.
ENDMODULE. " CLEAR_OK_CODE OUTPUT
*&---------------------------------------------------------------------*
*& Module USER_COMMAND_0100 INPUT
*&---------------------------------------------------------------------*
* text
*----------------------------------------------------------------------*
MODULE user_command_0100 INPUT.
CASE ok_code.
WHEN 'back'.
SET SCREEN 0.
WHEN 'save'.
MOVE-CORRESPONDING sdyn_book TO wa_sbook.
MESSAGE i060(bc400).
SET SCREEN 0.
ENDCASE.

ENDMODULE.


Эта просто тренировочная программа, где пользователю предлагается выбрать для просмотра определенную инфу (поле параметерс), на экран типа лист выводятся какие-то данные (соответствующие полю параметерс), щелкнув по определенной строке списка мы переходим на диалоговый экран.

Так вот. При закомменченной строке определения статуса экрана ( выделено жирным курсивом), программа работает как надо. При назначении экрану соответствующего статуса при двойном клике по нужной строке программа не откликается ( не создает интерактивный список). Тип статуса: диалоговое окно. Я так понимаю, что дело в статусе экрана, но не могу разобраться: в чем именно? У кого какие идеи?

Спасибо!


Принять этот ответ
Вернуться к началу
 Профиль Отправить email  
 
 Заголовок сообщения: Re: Не создается интерактивный список
СообщениеДобавлено: Пт, фев 01 2013, 23:39 
Младший специалист
Младший специалист
Аватара пользователя

Зарегистрирован:
Чт, окт 08 2009, 05:37
Сообщения: 70
Пол: Мужской
В GUI-статусе LIST создайте функциональный код PICK и присвойте его функциональной клавише F2.
см. справку к AT LINE-SELECTION


Принять этот ответ
Вернуться к началу
 Профиль Отправить email  
 
Показать сообщения за:  Поле сортировки  
Начать новую тему Ответить на тему  [ Сообщений: 2 ] 

Часовой пояс: UTC + 3 часа


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

Сейчас этот форум просматривают: Yandex [Bot]


Вы не можете начинать темы
Вы не можете отвечать на сообщения
Вы не можете редактировать свои сообщения
Вы не можете удалять свои сообщения
Вы не можете добавлять вложения

Найти:
Перейти:  
cron
Powered by phpBB © 2000, 2002, 2005, 2007 phpBB Group
Русская поддержка phpBB