На главную Наши проекты:
Журнал   ·   Discuz!ML   ·   Wiki   ·   DRKB   ·   Помощь проекту
ПРАВИЛА FAQ Помощь Участники Календарь Избранное RSS
msm.ru
! Правила раздела:

  • Перед тем, как задать вопрос, желательно почитать документацию и воспользоваться поиском.
  • Когда задаёте вопрос, то обязательно указывайте платформу (7.7, 8.0, 8.1, 8.2, etc), причем желательно в заголовке. Если речь идёт о типовой конфигурации, то указывайте её название и релиз. Текущие версии можно посмотреть здесь.
  • Ещё раз напоминаем о необходимости соблюдать не только правила, но и законы. Уважайте авторские права.

Высказать своё мнение о модераторах раздела можно здесь: evGenius
Страницы: (2) 1 [2]  все  ( Перейти к последнему сообщению )  
> Заполнение табличной части документа , 1С 8.2, управляемый интерфейс
    Цитата Rust @
    chychelko, выгрузи конфигурацию и прикрепи к сообщению. Без конфигурации будем воду в ступе толочь.
    Если файл слишком большой - залей на какую нить файлопомойку и прикрепи ссылку

    Конфигурация, которая прикреплена парой сообщений раньше подходит, только в ней нужно переключить с обычного на управляемое приложение, а так данных достаточно.
      Цитата chychelko @
      Конфигурация, которая прикреплена парой сообщений раньше подходит

      Ошибка в вашей конфигурации, или в конфигурации которую прикрепил Muxa_I? Если в вашей, то нужна именно ваша.
        Цитата Rust @
        Цитата chychelko @
        Конфигурация, которая прикреплена парой сообщений раньше подходит

        Ошибка в вашей конфигурации, или в конфигурации которую прикрепил Muxa_I? Если в вашей, то нужна именно ваша.

        Ошибка в том, что код написан под обычное приложение, а мне нужна реализация этого кода в управляемом приложении.
          реализация в моей конфигурации :)

          ExpandedWrap disabled
            &НаКлиенте
            Процедура ТабличнаяЧасть1ЛицоПриИзменении(Элемент)
                ТекущиеДанные = Элементы.ТабличнаяЧасть1.ТекущиеДанные;
                ФЛ = ТекущиеДанные.Лицо;
                Тел = ВопросКСерверу(ФЛ);
                ТекущиеДанные.Телефон = Тел;
            КонецПроцедуры
             
            &наСервере
            Функция ВопросКСерверу(ФЛ)
                Тел = ФЛ.Телефон;
                Возврат Тел;
            КонецФункции

          Проверил. Работает.
          в управляемом приложении
          Сообщение отредактировано: Muxa_I -
            Цитата Muxa_I @
            реализация в моей конфигурации :)

            ExpandedWrap disabled
              &НаКлиенте
              Процедура ТабличнаяЧасть1ЛицоПриИзменении(Элемент)
                  ТекущиеДанные = Элементы.ТабличнаяЧасть1.ТекущиеДанные;
                  ФЛ = ТекущиеДанные.Лицо;
                  Тел = ВопросКСерверу(ФЛ);
                  ТекущиеДанные.Телефон = Тел;
              КонецПроцедуры
               
              &наСервере
              Функция ВопросКСерверу(ФЛ)
                  Тел = ФЛ.Телефон;
                  Возврат Тел;
              КонецФункции

            Проверил. Работает.
            в управляемом приложении

            :victory: *танцует* =* Спасибо огромное )))))))) то что надо!!!!

            Добавлено
            Цитата chychelko @
            Добавлено
            Параллельно возник еще один вопрос, может кто знает.
            Мне надо что бы объект "ВремяНачала" был равен какому-то определенному времени.
            Как я понимаю это можно реализовать примерно следующем образом:

            ВремяНачала ='00010101140101';

            Проблема в том что он мне на значение "ВремяНачала" передает 0001.01.01.00.00.00 (время по нулям)

            Если же я беру любую переменную и прописываю ей такой код, то он мне выдает верное значение (0001.01.01.14.01.01)

            ВремяНачала: тип-Дата, состав даты-Время.

            Может я что-то не так делаю :crazy:

            Вчера параллельно возник еще один вопрос, может вы и на него ответ знаете :blush:
              Цитата
              Параллельно возник еще один вопрос, может кто знает.
              Мне надо что бы объект "ВремяНачала" был равен какому-то определенному времени.
              Как я понимаю это можно реализовать примерно следующем образом:

              ВремяНачала ='00010101140101';

              Проблема в том что он мне на значение "ВремяНачала" передает 0001.01.01.00.00.00 (время по нулям)

              Если же я беру любую переменную и прописываю ей такой код, то он мне выдает верное значение (0001.01.01.14.01.01)

              ВремяНачала: тип-Дата, состав даты-Время

              И снова мало информации. :whistle:
              Для чего нужОн сей объект, и неможно ли обойтись переменной?
                Цитата Muxa_I @
                Цитата
                Параллельно возник еще один вопрос, может кто знает.
                Мне надо что бы объект "ВремяНачала" был равен какому-то определенному времени.
                Как я понимаю это можно реализовать примерно следующем образом:

                ВремяНачала ='00010101140101';

                Проблема в том что он мне на значение "ВремяНачала" передает 0001.01.01.00.00.00 (время по нулям)

                Если же я беру любую переменную и прописываю ей такой код, то он мне выдает верное значение (0001.01.01.14.01.01)

                ВремяНачала: тип-Дата, состав даты-Время

                И снова мало информации. :whistle:
                Для чего нужОн сей объект, и неможно ли обойтись переменной?

                Мне надо что бы при создании нового документа, табличная часть документа автоматически заполнялась 3 строчками:
                типо время начала работы и время окончания
                у меня код выглядит примерно следующим образом:
                ExpandedWrap disabled
                  &НаКлиенте
                  Процедура ПриОткрытии(Отказ)
                      Дата = '00010101140101'; // если брать обычную переменную то ее значение такое какое и должно быть (14:01:01)
                      НоваяСтрока = Объект.ВремяРаботы.Добавить();
                      НоваяСтрока.ВремяНачала ='00010101100000';     // а в реквизит ВремяНачала и ВремяОкончания он время обнуляет (00:00:00)
                          НоваяСтрока.ВремяОкончания ='00010101130000';
                      //...и т.д.
                          
                  КонецПроцедуры
                  Скопировал Ваш код.
                  Подправил в "свою" конфигурацию (заменил
                  ExpandedWrap disabled
                    НоваяСтрока = Объект.ВремяРаботы.Добавить();

                  на
                  ExpandedWrap disabled
                    НоваяСтрока = Объект.ТабличнаяЧасть1.Добавить();
                  )
                  Запустил. результат на скриншоте в приложении

                  Прикреплённый файлПрикреплённый файл______.PNG (77,29 Кбайт, скачиваний: 610)
                    Цитата Muxa_I @
                    Скопировал Ваш код.
                    Подправил в "свою" конфигурацию (заменил
                    ExpandedWrap disabled
                      НоваяСтрока = Объект.ВремяРаботы.Добавить();

                    на
                    ExpandedWrap disabled
                      НоваяСтрока = Объект.ТабличнаяЧасть1.Добавить();
                    )
                    Запустил. результат на скриншоте в приложении

                    Прикреплённый файлПрикреплённый файл______.PNG (77,29 Кбайт, скачиваний: 610)

                    Я уже ни чего в этой жизни не понимаю (((( вчера не работало, сегодня тот же код заработал :wall:
                    Спасибо большое за помощь!!!
                      Рад был помочь ;)
                        Чувствую в ближайшее время мне еще ни раз понадобится твоя помощь :blush:
                        0 пользователей читают эту тему (0 гостей и 0 скрытых пользователей)
                        0 пользователей:


                        Рейтинг@Mail.ru
                        [ Script execution time: 0,0474 ]   [ 19 queries used ]   [ Generated: 28.03.24, 12:32 GMT ]