Financier_
New member
- Регистрация
- 20 Авг 2014
- Сообщения
- 68
- Реакции
- 0
Сейчас попробую
1С:Предприятие для Украины (общие вопросы-ответы, обсуждения)
- Автор темы admin
- Дата начала
- Статус
Financier_
New member
- Регистрация
- 20 Авг 2014
- Сообщения
- 68
- Реакции
- 0
Да, так как Вы пишите, документы прячутся под договор. Но это не то, что мне нужно.
Потому, что когда я открою весь 631 (т.е. по всем контрагентам) счет, и уберу галочку в настройках оборотки "документы расчетов с контрагентами" она свернет всех контрагентов под Договор. А мне нужно, открыть 631 счет и видеть по какому контрагенту ведется учет по договору, а по какому в разрезе счетов.
Возможно ли это как-то сделать (настроить)?
По счету 6442 так получается. Я открываю счет по всем контрагентам и сразу вижу, по ком учет в разрезе договоров, а у кого в разрезе счетов. И сразу могу просчитать правильно ли программа проводки по не полученному НДСу сформировала.
Такое же мне надо и по 631 сделать. Но как....то ли я где-то галочку какую-то не поставила, то ли Вы меня не поняли.
У Вас недостаточно прав для просмотра ссылок.
Войдите или зарегистрируйтесь.
Последнее редактирование:
Доброй ночи!
Подскажите пожалуйста как правильно программно обратится.
В карточке ТМЦ есть таблица (Идентификатор - СПИСОКЦЕН(для заполнения цен)).Нужно одним махом заполнить цены.
Пишу
Тов = СоздатьОбъект("Справочник.ТМЦ");
Тов.ВыбратьЭлементы();
Пока Тов.ПолучитьЭлемент()=1 Цикл
*********
Тов.СписокЦен.УдалитьСтроки(); - ругается Поле агрегатного объекта не обнаружено (СписокЦен)
Что не так???как обратится к этой таблице?
Подскажите пожалуйста как правильно программно обратится.
В карточке ТМЦ есть таблица (Идентификатор - СПИСОКЦЕН(для заполнения цен)).Нужно одним махом заполнить цены.
Пишу
Тов = СоздатьОбъект("Справочник.ТМЦ");
Тов.ВыбратьЭлементы();
Пока Тов.ПолучитьЭлемент()=1 Цикл
*********
Тов.СписокЦен.УдалитьСтроки(); - ругается Поле агрегатного объекта не обнаружено (СписокЦен)
Что не так???как обратится к этой таблице?
Ничего не понятно. Какая платформа (7.7 или 8.2)? Какая конфигурация? Пишите заполнить цены, а в обработке удаляются строки. Если я что то понял - то справочник цен скорее всего подчиненный и к нему нужно делать выборку через родителя.
DUH
Member
- Регистрация
- 7 Фев 2013
- Сообщения
- 540
- Реакции
- 0
?
Для начала:
1. Какая конфигурация?
2. Тов.СписокЦен.УдалитьСтроки(); - это удаление строк Табличной части или Таблицы Значений СписокЦен;
3. Это не форум по программированию!
Для начала:
1. Какая конфигурация?
2. Тов.СписокЦен.УдалитьСтроки(); - это удаление строк Табличной части или Таблицы Значений СписокЦен;
3. Это не форум по программированию!
sergefox1952
New member
- Регистрация
- 6 Фев 2013
- Сообщения
- 14
- Реакции
- 0
В Отладчике поставь точку останова на строчке Тов.СписокЦен.УдалитьСтроки();.
После остановкт в отладчике выдели Тов. Вычислить выражение. Посмотри его свойства.
После остановкт в отладчике выдели Тов. Вычислить выражение. Посмотри его свойства.
Cobra
Member
- Регистрация
- 30 Ноя 2011
- Сообщения
- 702
- Реакции
- 0
Судя по коду, это 7.7 и скорее всего ПУБ или Комплексная.
Вы немного путаете возможности платформ 7.7 и 8.х.
СписокЦен - всего лишь таблица значений на форме элемента справочника ТМЦ и никакого отношения к объекту справочника не имеет.
Если этот код в модуле этой формы, то нужно писать СписокЦен.УдалитьСтроки()
Сорри - 1с 7,7.Производство
Тов = СоздатьОбъект("Справочник.ТМЦ");
Тов.ВыбратьЭлементы();
Пока Тов.ПолучитьЭлемент()=1 Цикл
Если Тов.ЭтоГруппа() = 1 Тогда
Продолжить;
КонецЕсли;
ЦеныТовара = СоздатьОбъект("Справочник.Цены");
ЦеныТовара.ИспользоватьДату(Константа.ДатаНачалаРаботы);
ЦеныТовара.ИспользоватьВладельца(тов.ТекущийЭлемент());
КатегорииЦен = СоздатьОбъект("Справочник.КатегорииЦен");
КатегорииЦен.ВыбратьЭлементы();
Пока КатегорииЦен.ПолучитьЭлемент()=1 Цикл
Если КатегорииЦен.ПометкаУдаления()=1 Тогда
Продолжить;
КонецЕсли;
Если ЦеныТовара.НайтиПоРеквизиту("КатегорияЦены",КатегорииЦен.ТекущийЭлемент(),0)=0 Тогда
ЦеныТовара.Новый();
Иначе
Если ЦеныТовара.ПометкаУдаления()=1 Тогда
глКомментарий("Цена "+ЦеныТовара.КатегорияЦены+ " помечена на удаление и не будет заполнена.",2);
Продолжить;
КонецЕсли;
КонецЕсли;
ЦеныТовара.Наименование = КатегорииЦен.Наименование;
ЦеныТовара.Валюта = Гривня;
ЦеныТовара.Единица = Тов.ЕдиницаПоУмолчанию;
ЦеныТовара.КатегорияЦены = КатегорииЦен.ТекущийЭлемент();
ЦеныТовара.Наценка = КатегорииЦен.ТорговаяНаценка;
ЦеныТовара.Записать();
КонецЦикла;
// очищаем все строки
Тов.СписокЦен.УдалитьСтроки();
Почему ругается на меня на этой строке??????
Тов = СоздатьОбъект("Справочник.ТМЦ");
Тов.ВыбратьЭлементы();
Пока Тов.ПолучитьЭлемент()=1 Цикл
Если Тов.ЭтоГруппа() = 1 Тогда
Продолжить;
КонецЕсли;
ЦеныТовара = СоздатьОбъект("Справочник.Цены");
ЦеныТовара.ИспользоватьДату(Константа.ДатаНачалаРаботы);
ЦеныТовара.ИспользоватьВладельца(тов.ТекущийЭлемент());
КатегорииЦен = СоздатьОбъект("Справочник.КатегорииЦен");
КатегорииЦен.ВыбратьЭлементы();
Пока КатегорииЦен.ПолучитьЭлемент()=1 Цикл
Если КатегорииЦен.ПометкаУдаления()=1 Тогда
Продолжить;
КонецЕсли;
Если ЦеныТовара.НайтиПоРеквизиту("КатегорияЦены",КатегорииЦен.ТекущийЭлемент(),0)=0 Тогда
ЦеныТовара.Новый();
Иначе
Если ЦеныТовара.ПометкаУдаления()=1 Тогда
глКомментарий("Цена "+ЦеныТовара.КатегорияЦены+ " помечена на удаление и не будет заполнена.",2);
Продолжить;
КонецЕсли;
КонецЕсли;
ЦеныТовара.Наименование = КатегорииЦен.Наименование;
ЦеныТовара.Валюта = Гривня;
ЦеныТовара.Единица = Тов.ЕдиницаПоУмолчанию;
ЦеныТовара.КатегорияЦены = КатегорииЦен.ТекущийЭлемент();
ЦеныТовара.Наценка = КатегорииЦен.ТорговаяНаценка;
ЦеныТовара.Записать();
КонецЦикла;
// очищаем все строки
Тов.СписокЦен.УдалитьСтроки();
Почему ругается на меня на этой строке??????
Теперь ругается "Переменная не определена (СписокЦен)"
СписокЦен это не реквизит Спр.ТМЦ,а просто таблица в карточке товара,в которой отоборажаются цены товара
Последнее редактирование:
1. Оставь в покое СписокЦен. Вообще. Забудь за него. Он нужен только для более удобного отображения (!!!) того, что неходится в справочнике "Цены"
Пример на бытовом уровне. Перед зеркалом стоит кот. Ты тряпкой пытаешься стереть изображение кота в зеркале и удивляешься, что ничего не выходит.
Тебе кота надо убрать, а не зеркало тереть.
2. Что ты хочешь сделать этим самым "УдалитьСтроки()" ? Удалить все цены по товару? Так и работай с переменной ЦеныТовара (которая, собственно, и определена, как Справочник.Цены).
Последнее редактирование:
Отличный пример с котом!!!!Я хочу сначала Удалить все цены по товару,а потом их снова заполнить
..., а цикл ЦеныТовара надо вставить в цикл перебора товаров:
Тов = СоздатьОбъект("Справочник.ТМЦ");
Тов.ВыбратьЭлементы();
Пока Тов.ПолучитьЭлемент()=1 Цикл
Если Тов.ЭтоГруппа() = 1 Тогда
Продолжить;
Иначе
<<< вот сюда вставить цикл ЦеныТовара>>
КонецЕсли;
Друзья, после восстановления 1С 7.7 из архива (Бухгалтерия базовая) все суммы прописью пишутся по-русски и в рублях (при том, что сами формы документов украинские) - как украинизировать их обратно?
Надо найти файл uahukr.spl и скопировать в папку с базой
B
bagrin_1958
Guest
а что должен быть?
- Статус