Заказы на доработку 1С (сервис удаленной работы)
Хранилище
База знаний
Неназначенных незавершенных заказов: 1
 Бесплатные отчеты, обработки, конфигурации, внешние компоненты для 1С Статьи, описание работы, методики по работе с 1С

Здравствуйте, гость ( Вход | Зарегистрироваться )



> СправочникСписок          
brodovskiy Подменю пользователя
сообщение 23.05.11, 23:08
Сообщение #1

Общительный
**
Группа: Пользователи
Сообщений: 23
Спасибо сказали: 0 раз
Рейтинг: 0

Доброе время суток!!!

имеется справочник:



нужно чтобы при изменении полей:
"на_постоянной_основе"
"внутреннее_совм"
"внешнее_совм"
"вакантно"

вычислялось поле "итого"


как это сделать?


Процедура СправочникСписокна_постоянной_основеПриИзменении(Элемент)
    итого=на_постоянной_основе+внутреннее_совм+внешнее_совм+вакантно;
КонецПроцедуры


этот код не работает, хотя аналогичный в форме элемента работает.




и еще вопрос: где добавить кнопку-переключатель "редактирование в диалоге/списке". не могу добавить. нет ее в списке выбора кнопок.

Заранее большое спасибо!!!

World1С Подменю пользователя
сообщение 24.05.11, 6:52
Сообщение #2

Оратор
Иконка группы
Квалифицированному 1С программисту
 Группа: Местный
Сообщений: 358
Из: г.Луганск, обл.Луганская
Спасибо сказали: 110 раз
Рейтинг: 0

Вот в этом пункте нужно установить способ редактирования


по поводу текста, вроде так должно быть: 
Процедура СправочникСписокна_постоянной_основеПриИзменении(Элемент)

ТекущаяСтрока = ЭлементыФормы.СправочникСписок.ТекущаяСтрока;    

итого=ТекущаяСтрока.на_постоянной_основе+ТекущаяСтрока.внутреннее_совм+ТекущаяСт
рока.внешнее_совм+вакантно;
КонецПроцедуры


Сообщение отредактировал World1С - 24.05.11, 7:08


Signature
В наше время люди всему знают цену, но понятия не имеют о подлинной ценности.
Оскар Уайлд

Спасибо сказали: brodovskiy,

Batchir Подменю пользователя
сообщение 24.05.11, 7:06
Сообщение #3

Живет на форуме
Иконка группы
Группа: Команда
Сообщений: 3568
Из: Киев
Спасибо сказали: 1427 раз
Рейтинг: 0

Если "Итого" просто добавленная колонка, то вычислять нужно в событии ПриПолученииДанных.
Обходите все строки оформления и для каждой рассчитываете итоговое количество, программно закидываете это количество в ячейку

Если "Итого" реквизит справочника, то в Вашем случае сначало нужно получить строку данных и в неё закидывать рассчитанное "итого"

ТекДанные = ЭлементыФормы.СправочникСписок.ТекущиеДанные;
ТекДанные.итого=ТекДанные.на_постоянной_основе+ТекДанные.внутреннее_совм+ТекДанн
ые.внешнее_совм+ТекДанные.вакантно;

Спасибо сказали: brodovskiy,

Vofka Подменю пользователя
сообщение 24.05.11, 7:10
Сообщение #4

У нас здесь своя атмосфера...
***********
Группа: Основатель
Сообщений: 13955
Из: Киев
Спасибо сказали: 4520 раз
Рейтинг: 3642.8

brodovskiy, какой курс?

Zaval Подменю пользователя
сообщение 24.05.11, 10:08
Сообщение #5

Крутой
Иконка группы
Группа: Местный
Сообщений: 1994
Из: Киева и окрестностей
Спасибо сказали: 406 раз
Рейтинг: 0

Можно узнать цель такого праздника извратов?

Vofka Подменю пользователя
сообщение 24.05.11, 10:33
Сообщение #6

У нас здесь своя атмосфера...
***********
Группа: Основатель
Сообщений: 13955
Из: Киев
Спасибо сказали: 4520 раз
Рейтинг: 3642.8

Цитата
Можно узнать цель такого праздника извратов?

Наверное курсовая или дипломная работа smile.gif

Zaval Подменю пользователя
сообщение 24.05.11, 11:06
Сообщение #7

Крутой
Иконка группы
Группа: Местный
Сообщений: 1994
Из: Киева и окрестностей
Спасибо сказали: 406 раз
Рейтинг: 0

Цитата(Vofka @ 24.05.11, 11:33) *
Наверное курсовая или дипломная работа smile.gif


Как бы соискателю за такое комп на голову не нахлобучили...

brodovskiy Подменю пользователя
сообщение 25.05.11, 16:01
Сообщение #8

Общительный
**
Группа: Пользователи
Сообщений: 23
Спасибо сказали: 0 раз
Рейтинг: 0

Цитата(Vofka @ 24.05.11, 7:10) *
brodovskiy, какой курс?


5 курс. Диплом.

Batchir, большое спасибо. получилось у меня следующее :


Процедура СправочникСписокна_постоянной_основеПриИзменении(Элемент)
    ТекДанные = ЭлементыФормы.СправочникСписок.ТекущиеДанные;
    ТекДанные.итого=ТекДанные.на_постоянной_основе+ТекДанные.внутреннее_совм+Те
кДанные.внешнее_совм+ТекДанные.вакантно;
КонецПроцедуры

Процедура СправочникСписоквнутреннее_совмПриИзменении(Элемент)
    ТекДанные = ЭлементыФормы.СправочникСписок.ТекущиеДанные;
    ТекДанные.итого=ТекДанные.на_постоянной_основе+ТекДанные.внутреннее_совм+Те
кДанные.внешнее_совм+ТекДанные.вакантно;
КонецПроцедуры

Процедура СправочникСписоквнешнее_совмПриИзменении(Элемент)
    ТекДанные = ЭлементыФормы.СправочникСписок.ТекущиеДанные;
    ТекДанные.итого=ТекДанные.на_постоянной_основе+ТекДанные.внутреннее_совм+Те
кДанные.внешнее_совм+ТекДанные.вакантно;
КонецПроцедуры

Процедура СправочникСписокВакантноПриИзменении(Элемент)
    ТекДанные = ЭлементыФормы.СправочникСписок.ТекущиеДанные;
    ТекДанные.итого=ТекДанные.на_постоянной_основе+ТекДанные.внутреннее_совм+Те
кДанные.внешнее_совм+ТекДанные.вакантно;
КонецПроцедуры

logist Подменю пользователя
сообщение 25.05.11, 16:02
Сообщение #9

Про1С-ник
Иконка группы
Квалифицированный бухгалтерГений телепатии и социального моделированияЗа заслуги на форуме в 2010 годуМодератору Про1С (за заслуги в 2011 году)
 Группа: Местный
Сообщений: 9564
Из: Kharkiv, UA
Спасибо сказали: 2536 раз
Рейтинг: 0

А что мешало сделать только одну процедуру? (понимаю что это не кошерно по мнению 1С, но все же)


Signature
Личные бесплатные консультации не даю, для этого есть форум!

Спасибо сказали: brodovskiy,

brodovskiy Подменю пользователя
сообщение 25.05.11, 16:19
Сообщение #10

Общительный
**
Группа: Пользователи
Сообщений: 23
Спасибо сказали: 0 раз
Рейтинг: 0

World1С, вам тоже большое спасибо.

остается вопрос:

как добавить кнопку-переключатель "редактирование в диалоге/списке" на форму списка. не могу добавить. нет ее в списке выбора кнопок.


World1С, мне необходимо обоими способами редактировать.

Цитата(logist @ 25.05.11, 16:02) *
А что мешало сделать только одну процедуру? (понимаю что это не кошерно по мнению 1С, но все же)



так проще и нагляднее.

Загляните, пожалуйста, вот сюда http://pro1c.org.ua/index.php?showtopic=36...amp;#entry24175.
вы мне там ответили, но я вас немного не понял.

logist Подменю пользователя
сообщение 25.05.11, 16:28
Сообщение #11

Про1С-ник
Иконка группы
Квалифицированный бухгалтерГений телепатии и социального моделированияЗа заслуги на форуме в 2010 годуМодератору Про1С (за заслуги в 2011 году)
 Группа: Местный
Сообщений: 9564
Из: Kharkiv, UA
Спасибо сказали: 2536 раз
Рейтинг: 0

Цитата(brodovskiy @ 25.05.11, 16:19) *
так проще и нагляднее.

Может нагляднее (непонятно кому), но точно не проще. Уж куда лучше было бы так:
Процедура ПересчитатьИтоги()
    ТекДанные = ЭлементыФормы.СправочникСписок.ТекущиеДанные;
    ТекДанные.итого=ТекДанные.на_постоянной_основе+ТекДанные.внутреннее_совм+Те
кДанные.внешнее_совм+ТекДанные.вакантно;
КонецПроцедуры

Процедура СправочникСписокна_постоянной_основеПриИзменении(Элемент)
       Процедура ПересчитатьИтоги();
КонецПроцедуры

Процедура СправочникСписоквнутреннее_совмПриИзменении(Элемент)
       Процедура ПересчитатьИтоги();
КонецПроцедуры

Процедура СправочникСписоквнешнее_совмПриИзменении(Элемент)
       Процедура ПересчитатьИтоги();
КонецПроцедуры

Процедура СправочникСписокВакантноПриИзменении(Элемент)
       Процедура ПересчитатьИтоги();
КонецПроцедуры


Signature
Личные бесплатные консультации не даю, для этого есть форум!

Спасибо сказали: brodovskiy,

Ardi Подменю пользователя
сообщение 25.05.11, 16:39
Сообщение #12

Живет на форуме
***********
Гений телепатии и социального моделирования
 Группа: Пользователи
Сообщений: 4121
Из: Киев
Спасибо сказали: 957 раз
Рейтинг: 0

Цитата(brodovskiy @ 25.05.11, 17:19) *
остается вопрос:

как добавить кнопку-переключатель "редактирование в диалоге/списке" на форму списка. не могу добавить. нет ее в списке выбора кнопок.

Код кнопки
Процедура ДействияФормыпппп(Кнопка)
    Если элементыформы.СправочникСписок.СпособРедактирования=СпособРедактированияСписка.В
Диалоге Тогда
        элементыформы.СправочникСписок.СпособРедактирования=СпособРедактированияСпи
ска.ВСписке
    Иначе 
        элементыформы.СправочникСписок.СпособРедактирования=СпособРедактированияСпи
ска.ВДиалоге
    КонецЕсли; 
КонецПроцедуры


Signature
Услуги 1С программиста 8.2, 7.7 (Плохо, дорого, очередь). Киев.

Спасибо сказали: brodovskiy,

brodovskiy Подменю пользователя
сообщение 25.05.11, 17:01
Сообщение #13

Общительный
**
Группа: Пользователи
Сообщений: 23
Спасибо сказали: 0 раз
Рейтинг: 0

Ardi, спасибо, все работает smile.gif

brodovskiy Подменю пользователя
сообщение 25.05.11, 20:53
Сообщение #14

Общительный
**
Группа: Пользователи
Сообщений: 23
Спасибо сказали: 0 раз
Рейтинг: 0

Цитата(logist @ 25.05.11, 16:28) *
Может нагляднее (непонятно кому), но точно не проще. Уж куда лучше было бы так:
Процедура ПересчитатьИтоги()
    ТекДанные = ЭлементыФормы.СправочникСписок.ТекущиеДанные;
    ТекДанные.итого=ТекДанные.на_постоянной_основе+ТекДанные.внутреннее_совм+Те
кДанные.внешнее_совм+ТекДанные.вакантно;
КонецПроцедуры

Процедура СправочникСписокна_постоянной_основеПриИзменении(Элемент)
       Процедура ПересчитатьИтоги();
КонецПроцедуры


Согласен. так и сделал. только немного исправил(много объявлений процедуры):

Процедура СправочникСписокна_постоянной_основеПриИзменении(Элемент)
        ПересчитатьИтоги();
КонецПроцедуры

Не нашли ответа на свой вопрос?
Зарегистрируйтесь и задайте новый вопрос.

 

Ответить Новая тема
1 чел. читают эту тему (гостей: 1, скрытых пользователей: 0)
Пользователей: 0

 

RSS Текстовая версия Сейчас: 28.04.24, 1:44
Форум IP.Board © 2024  IPS, Inc.
1С Предприятие 8.3, 1С Предприятие 8.2, 1С Предприятие 8.1, 1С Предприятие 8.0, 1С Предприятие 7.7, Литература 1С, Общие вопросы по администрированию 1С, Методическая поддержка 1С - всё в одном месте: на Украинском 1С форуме!