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

Часовой пояс: 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 часа


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

Сейчас этот форум просматривают: нет зарегистрированных пользователей


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

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