Текущее время: Пт, июн 27 2025, 00:32

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


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


ВНИМАНИЕ!

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



Начать новую тему Ответить на тему  [ Сообщений: 12 ] 
Автор Сообщение
 Заголовок сообщения: Раскрасска ALV grid
СообщениеДобавлено: Чт, май 05 2005, 14:17 
Гость
Добрый день или ночь.... 8)

Такая ситуяция, есть динамическая таблица
например:
Code:
d1
d2
....
dn
&STYLE&


&STYLE& - структуры:

Code:
FIELDNAME
STYLE
STYLE2
STYLE3
STYLE4
MAXLEN


Может кто знает, что надо указать чтобы покрасить ячейку в нужный цвет.

точно знаю STYLE = 0001000 разрешение редактирования ячейки 8)


Пометить тему как нерешенную
Вернуться к началу
  
 
 Заголовок сообщения:
СообщениеДобавлено: Чт, май 05 2005, 14:27 
Почетный гуру
Почетный гуру
Аватара пользователя

Зарегистрирован:
Ср, май 04 2005, 16:29
Сообщения: 687
Откуда: Нижневартовск->Москва
Пол: Мужской
Есть такой инклуд <CL_ALV_CONTROL> - оттуда можно брать константы

А вообще всё зависит от того, что и как ты хочешь красить..
Если на уровне ячеек, то я делаю так:

Code:
FORM mark_cell USING    p_fieldname
                        P_STYLE
                        p_line type outtab.

  data: l_st type lvc_t_styl.
  data: l_st_wa like line of l_st.

  l_st_wa-fieldname = p_fieldname.
  l_st_wa-style = p_style.

  insert l_st_wa into table p_line-st.


ENDFORM.                    " mark_cell


Если весь столбец, то на уровне каталога полей:


Code:
gt_fieldcat-style = ALV_STYLE_COLOR_INT_POSITIVE
                          + ALV_STYLE_FONT_BOLD.


Соответственно там константы из <CL_ALV_CONTROL>


Пометить тему как нерешенную
Вернуться к началу
 Профиль  
 
 Заголовок сообщения:   Тема решена
СообщениеДобавлено: Чт, май 05 2005, 14:37 
Гость
Т могбы скинуть инклюд CL_ALV_CONTROL на мыльник a.romakhin@mail.ru он видать в версии выше 4.6с появился. У меня его нет :(


Пометить тему как нерешенную
Вернуться к началу
  
 
 Заголовок сообщения:
СообщениеДобавлено: Чт, май 05 2005, 14:43 
Почетный гуру
Почетный гуру
Аватара пользователя

Зарегистрирован:
Ср, май 04 2005, 16:29
Сообщения: 687
Откуда: Нижневартовск->Москва
Пол: Мужской
Ты забыл про угловые скобки. Они есть в названии. Я тож на 4.6C..

Кстати, некоторые константы в объекте CL_GUI_ALV_GRID определены..

Например cl_gui_alv_grid=>mc_style_enabled - ячейка открыта на редактирование..


Пометить тему как нерешенную
Вернуться к началу
 Профиль  
 
 Заголовок сообщения:
СообщениеДобавлено: Чт, май 05 2005, 15:12 
Почетный гуру
Почетный гуру
Аватара пользователя

Зарегистрирован:
Ср, май 04 2005, 16:29
Сообщения: 687
Откуда: Нижневартовск->Москва
Пол: Мужской
На уровне каталога полей ещё можно красить вот так:

gt_fieldcat-emphasize = 'C100'.

С100 - это вроде зелёный фон.
Где-то было в хелпе описание значений для этого поля..


Последний раз редактировалось T Ср, май 18 2005, 08:58, всего редактировалось 1 раз.

Пометить тему как нерешенную
Вернуться к началу
 Профиль  
 
 Заголовок сообщения:
СообщениеДобавлено: Чт, май 05 2005, 15:17 
Менеджер
Менеджер

Зарегистрирован:
Вт, дек 07 2004, 10:39
Сообщения: 610
http://www.sapgenie.com/abap/controls/alvgrid.htm

_________________
полный SAPец


Пометить тему как нерешенную
Вернуться к началу
 Профиль  
 
 Заголовок сообщения:
СообщениеДобавлено: Чт, май 05 2005, 15:25 
Гость
REPORT ZZAMENA3.

TABLES: T001.

DATA: G_REPID LIKE SY-REPID.
G_REPID = SY-REPID.

TYPE-POOLS: SLIS.


DATA: LS_LAYOUT TYPE SLIS_LAYOUT_ALV,
LS_FIELDCAT TYPE SLIS_FIELDCAT_ALV,
LT_FIELDCAT TYPE SLIS_T_FIELDCAT_ALV WITH HEADER LINE,
L_BOXNAM TYPE SLIS_FIELDNAME VALUE 'BOX',
TK.

DATA: BEGIN OF OBRAZ OCCURS 0.
INCLUDE STRUCTURE T001.
DATA: COLORS TYPE LVC_T_SCOL,
END OF OBRAZ.

DATA: LS_CELL TYPE LVC_S_STYL.
DATA: LIN LIKE LINE OF OBRAZ.
DATA: MCOL TYPE LVC_S_SCOL.


START-OF-SELECTION.
SELECT * FROM T001 INTO CORRESPONDING FIELDS OF TABLE OBRAZ.
TK = 1.
LOOP AT OBRAZ INTO LIN.
IF TK = 1.
MCOL-FNAME = 'BUKRS'.
MCOL-COLOR-COL = CL_GUI_RESOURCES=>LIST_COL_NEGATIVE.
MCOL-NOKEYCOL = 'X'.
APPEND MCOL TO LIN-COLORS.
MCOL-FNAME = 'BUTXT'.
MCOL-COLOR-COL = CL_GUI_RESOURCES=>LIST_INTENSIFIED.
MCOL-NOKEYCOL = 'X'.
APPEND MCOL TO LIN-COLORS.
TK = 2.
ELSE.
MCOL-FNAME = 'BUTXT'.
MCOL-COLOR-COL = CL_GUI_RESOURCES=>LIST_COL_NEGATIVE.
MCOL-NOKEYCOL = 'X'.
APPEND MCOL TO LIN-COLORS.
MCOL-FNAME = 'BUKRS'.
MCOL-COLOR-COL = CL_GUI_RESOURCES=>LIST_INTENSIFIED.
MCOL-NOKEYCOL = 'X'.
APPEND MCOL TO LIN-COLORS.
TK = 1.
ENDIF.
MODIFY OBRAZ FROM LIN.
ENDLOOP.


CLEAR LS_FIELDCAT.
LS_FIELDCAT-TABNAME = 'OBRAZ'.
LS_FIELDCAT-FIELDNAME = 'BUKRS'.
LS_FIELDCAT-OUTPUTLEN = 5."длина вывода
LS_FIELDCAT-SELTEXT_L = 'БЕ'.
APPEND LS_FIELDCAT TO LT_FIELDCAT.

LS_FIELDCAT-TABNAME = 'OBRAZ'.
LS_FIELDCAT-FIELDNAME = 'BUTXT'.
LS_FIELDCAT-OUTPUTLEN = 35."длина вывода
LS_FIELDCAT-SELTEXT_L = 'Наименование БЕ'.
APPEND LS_FIELDCAT TO LT_FIELDCAT.
CLEAR LS_FIELDCAT.

LS_LAYOUT-COLTAB_FIELDNAME = 'COLORS'.

CALL FUNCTION 'REUSE_ALV_GRID_DISPLAY'
EXPORTING
I_CALLBACK_PROGRAM = SY-CPROG
IS_LAYOUT = LS_LAYOUT
IT_FIELDCAT = LT_FIELDCAT[]
TABLES
T_OUTTAB = OBRAZ.

IF SY-SUBRC <> 0.
MESSAGE ID SY-MSGID TYPE SY-MSGTY NUMBER SY-MSGNO
WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4.
ENDIF.


Пометить тему как нерешенную
Вернуться к началу
  
 
 Заголовок сообщения:
СообщениеДобавлено: Чт, май 05 2005, 15:25 
Почетный гуру
Почетный гуру
Аватара пользователя

Зарегистрирован:
Ср, май 04 2005, 16:29
Сообщения: 687
Откуда: Нижневартовск->Москва
Пол: Мужской
А ну вот по ссылке от SLASH как раз есть описание занчений для цветов:

* Char 4 and the characters is set as follows:
* Char 1 = C = This is a color property
* Char 2 = 6 = Color code (1 - 7)
* Char 3 = Intensified on/of = 1 = on
* Char 4 = Inverse display = 0 = of

Про жирность - это не из этой оперы :)


Пометить тему как нерешенную
Вернуться к началу
 Профиль  
 
 Заголовок сообщения:
СообщениеДобавлено: Чт, май 05 2005, 15:36 
Почетный гуру
Почетный гуру
Аватара пользователя

Зарегистрирован:
Ср, май 04 2005, 16:29
Сообщения: 687
Откуда: Нижневартовск->Москва
Пол: Мужской
ВН написал(а):
CLEAR LS_FIELDCAT.
LS_FIELDCAT-TABNAME = 'OBRAZ'.
LS_FIELDCAT-FIELDNAME = 'BUKRS'.
LS_FIELDCAT-OUTPUTLEN = 5."длина вывода
LS_FIELDCAT-SELTEXT_L = 'БЕ'.
APPEND LS_FIELDCAT TO LT_FIELDCAT.

LS_FIELDCAT-TABNAME = 'OBRAZ'.
LS_FIELDCAT-FIELDNAME = 'BUTXT'.
LS_FIELDCAT-OUTPUTLEN = 35."длина вывода
LS_FIELDCAT-SELTEXT_L = 'Наименование БЕ'.
APPEND LS_FIELDCAT TO LT_FIELDCAT.
CLEAR LS_FIELDCAT.


IMHO, плохому учите :? .. Пример, разумеется не об этом, но всё-таки каталог полей лучше брать из словаря

CALL FUNCTION 'LVC_FIELDCATALOG_MERGE'/'REUSE_ALV_FIELDCATALOG_MERGE'
для T001


Пометить тему как нерешенную
Вернуться к началу
 Профиль  
 
 Заголовок сообщения:
СообщениеДобавлено: Чт, май 05 2005, 15:43 
Гость
вы правы, я так и делаю
Но в данном случае - именно показать, как можно
формировать каталог и раскрашивать ячейки


Пометить тему как нерешенную
Вернуться к началу
  
 
 Заголовок сообщения:
СообщениеДобавлено: Чт, май 05 2005, 15:44 
Почетный гуру
Почетный гуру
Аватара пользователя

Зарегистрирован:
Ср, май 04 2005, 16:29
Сообщения: 687
Откуда: Нижневартовск->Москва
Пол: Мужской
ВН написал(а):
вы правы, я так и делаю
Но в данном случае - именно показать, как можно
формировать каталог и раскрашивать ячейки


Тогда звиняйте :D


Пометить тему как нерешенную
Вернуться к началу
 Профиль  
 
 Заголовок сообщения:
СообщениеДобавлено: Чт, май 05 2005, 16:12 
Гость
Вай, всё получилось, всем спасибо


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

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


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

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


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

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