CftClub.ru
Клуб специалистов ЦФТ-Банк 		   О проекте, Правила Клуба, FAQО проекте   Поиск по материалам КлубаПоиск    Отзывы Участников и посетителейОтзывы    Стать Участником КлубаРегистрация    ВходВход

Работа с гридом

 
Ответить на тему    Клуб специалистов ЦФТ-Банк (IBSO) -> Разработка в PL/PLUS. Оптимизация запросов Oracle
Предыдущая тема :: Следующая тема  
Автор Сообщение
hicap
Участник


Вступление в Клуб: 13.10.2010
СообщениеПн Фев 20, 2012 16:15   Работа с гридом Ответить с цитатой
Полезность: Нет оценки
подскажите как из грида забрать значения? То есть у меня на форме есть грид V_DEBT у грида есть колонка CHEK, но обратиться V_DEBT.CHEK я не могу или все токи могу хитрым способом? Наверно через VB script только?
Alexsey
Эксперт


Вступление в Клуб: 06.09.2007
СообщениеПн Фев 20, 2012 17:11   Re: Работа с гридом Ответить с цитатой
Полезность: 2
hicap пишет:
подскажите как из грида забрать значения? То есть у меня на форме есть грид V_DEBT у грида есть колонка CHEK, но обратиться V_DEBT.CHEK я не могу или все токи могу хитрым способом? Наверно через VB script только?


а что мешает обратиться

Код:
V_DEBT(<index>).CHEK


Вот пример кода для вызова редактора над записью грида

Секция проверка
Код:
...
if P_INFO = 'Edit' then
         if not V_RA_OTV_SIGN.exists(V_CTR_IDX) then
            V_CTR_IDX := nvl( V_RA_OTV_SIGN.last, 0);
         end if;
         if V_CTR_IDX > 0 then
            V_RA_OTV_SIGN_REF := V_RA_OTV_SIGN(V_CTR_IDX);
         end if;
         V_EXEC_STR := '<% PLPCALL %VAR%.V_RA_OTV_SIGN_REF.[EDIT#AUTO](%VAR%.V_ORG=>'''||this.[ACC_DT].[CLIENT_V]||''') %>';
elsif P_INFO = 'EDIT_P4P' then
         if V_RA_OTV_SIGN_REF is not null then
            V_RA_OTV_SIGN(V_CTR_IDX) := V_RA_OTV_SIGN_REF;
            Update_Grid;
         end if;
...



Клиент-скрипт
Код:
ElseIf LastControl is Edit Then
         if Form1.ScriptPlayEx(V_EXEC_STR) then
            tmpIdx = V_CTR_IDX.TEXT
            Call Form1.ScriptServerValidate(Nothing, "EDIT_P4P")
            V_CTR_IDX.TEXT = tmpIdx
            Grid1.Row = Grid1.RowByIndex(V_CTR_IDX.TEXT)
         end if   

_________________
всегда есть как минимум 2 выхода
hicap
Участник


Вступление в Клуб: 13.10.2010
СообщениеВт Фев 21, 2012 09:16   Re: Работа с гридом Ответить с цитатой
Полезность: Нет оценки
Цитата:

а что мешает обратиться

Код:
V_DEBT(<index>).CHEK


Спасибо! Не подумал о массиве.
Показать сообщения:   
Ответить на тему    Клуб специалистов ЦФТ-Банк (IBSO) -> Разработка в PL/PLUS. Оптимизация запросов Oracle Часовой пояс: GMT + 3
Страница 1 из 1

 
Перейти:  
Вы не можете начинать темы
Вы не можете отвечать на сообщения
Вы не можете редактировать свои сообщения
Вы не можете удалять свои сообщения
Вы не можете голосовать в опросах
Домен cftclub.ru не связан с ЗАО "Центр Финансовых Технологий" и ни в коей мере не нарушает авторских и иных прав
Владелец может не разделять мнения Участников и не несет ответственности за их публикации
Powered by phpBB