Заказы на доработку 1С (сервис удаленной работы)

Хранилище

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

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



> обновление УТП 1.2.1.3 - не проводятся возвраты поставщикам 2 страниц V   1 2 >          
yur Подменю пользователя
сообщение 26.06.11, 20:36
Сообщение #1

Оратор
Иконка группы
Группа: Местный
Сообщений: 322
Из: возле Умани
Спасибо сказали: 33 раз
Рейтинг: 0

Не проводяться накладні повернення поставщикові. Вискакує помилка "{Документ.ВозвратТоваровПоставщику.МодульОбъекта(3476)}: Індекс знаходиться за межами масиву"
Полскажите - в какую сторону копать.


Signature
УТП 8.2

Ardi Подменю пользователя
сообщение 26.06.11, 23:53
Сообщение #2

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

строка кода указана.
Ошибка указана.
А что именно не понятно? "Індекс знаходиться за межами масиву"?


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

yur Подменю пользователя
сообщение 27.06.11, 15:01
Сообщение #3

Оратор
Иконка группы
Группа: Местный
Сообщений: 322
Из: возле Умани
Спасибо сказали: 33 раз
Рейтинг: 0

Цитата(Ardi @ 27.06.11, 0:53) *
строка кода указана.
Ошибка указана.
А что именно не понятно? "Індекс знаходиться за межами масиву"?

ну да, вот ето и непонятно.
На какие кнопки нажмать шоп заработало?

Если СтрокаТаблицыНаценок.Количество() = 0 Тогда
    ПокупнаяЦена = Сумма;
ИначеЕсли НЕ СтрокаТаблицыНаценок[0].ПС = 0 Тогда
    СуммаНаценки = СтрокаТаблицыНаценок[0].ТН * Сумма / (СтрокаТаблицыНаценок[0].ПС);
    ПокупнаяЦена = Сумма - СуммаНаценки;
Иначе
    ПокупнаяЦена = 0;
КонецЕсли;
                    
Если Сумма - ПокупнаяЦена <> 0 Тогда
    ПокупнаяЦенаНУ = СуммаНУ;
ИначеЕсли НЕ СтрокаТаблицыНаценок[0].ПС_НУ = 0 Тогда  // НА ЭТУ СТРОЧКУ РУГАЕТСЯ
    СуммаНаценкиНУ = СтрокаТаблицыНаценок[0].ТН_НУ * СуммаНУ / (СтрокаТаблицыНаценок[0].ПС_НУ);
    ПокупнаяЦенаНУ = СуммаНУ - СуммаНаценкиНУ;
Иначе
    ПокупнаяЦенаНУ = 0;
КонецЕсли;                
                
Если     Сумма - ПокупнаяЦена <> 0
    ИЛИ  (СтруктураШапкиДокумента.ЕстьНалогНаПрибыль И (СуммаНУ - ПокупнаяЦенаНУ <> 0))Тогда
    // "уменьшим" списание партий

отак виглядить шматок модуля накладної повернення. Програма ругаїця на підкреслену строчку.

Сообщение отредактировал Batchir - 27.06.11, 15:09
Причина редактирования: Отформатировал код


Signature
УТП 8.2

Batchir Подменю пользователя
сообщение 27.06.11, 15:19
Сообщение #4

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

Вообще не понятно из кода прочему ругается, по крайней мере на первый взгляд.
Тут отладчиком глянуть надо, тогда станет всё понятно.

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

yur Подменю пользователя
сообщение 28.06.11, 17:44
Сообщение #5

Оратор
Иконка группы
Группа: Местный
Сообщений: 322
Из: возле Умани
Спасибо сказали: 33 раз
Рейтинг: 0

Все таки не подобається їй ця стрічка "ИначеЕсли НЕ СтрокаТаблицыНаценок[0].ПС_НУ = 0 Тогда"
Коли ставлю точку зупину на ній, глюк пропадає, F11- знов є.
Може викинуть її або якийсь оператор виправити?


Signature
УТП 8.2

mister-x Подменю пользователя
сообщение 28.06.11, 17:52
Сообщение #6

...
Иконка группы
Модератору Про1С (за заслуги в 2011 году)
Группа: Местный
Сообщений: 3477
Из: Тернопіль
Спасибо сказали: 1417 раз
Рейтинг: 0

Цитата
Не проводяться накладні повернення поставщикові. Вискакує помилка "{Документ.ВозвратТоваровПоставщику.МодульОбъекта(3476)}: Індекс знаходиться за межами масиву"
Полскажите - в какую сторону копать.
Цитата
отак виглядить шматок модуля накладної повернення. Програма ругаїця на підкреслену строчку.
пишіть або на укр.мові або на рос., а не обома одразу

yur Подменю пользователя
сообщение 28.06.11, 18:40
Сообщение #7

Оратор
Иконка группы
Группа: Местный
Сообщений: 322
Из: возле Умани
Спасибо сказали: 33 раз
Рейтинг: 0

не завжди виходить на одній мові спілкуватися, де потрібно перекласти на російську - покажіть, я перекладу.

до речі, модулі накладної повернення в Демо і ОновленіОсновніКонфігурації - різні.


Signature
УТП 8.2

yur Подменю пользователя
сообщение 28.06.11, 21:09
Сообщение #8

Оратор
Иконка группы
Группа: Местный
Сообщений: 322
Из: возле Умани
Спасибо сказали: 33 раз
Рейтинг: 0

Для Каждого Партия Из Строка.СписанныеПартииБУ Цикл
                    
                СтруктураОтбора = Новый Структура;
                СтруктураОтбора.Вставить("Номенклатура",Строка.Номенклатура);
                СтруктураОтбора.Вставить("Склад",        Строка.Склад);
                СтруктураОтбора.Вставить("НоменклатурнаяПозиция", Партия.НоменклатурнаяПозиция);
                СтруктураОтбора.Вставить("Партия",        Партия.Партия);
                СтруктураОтбора.Вставить("НалоговоеНазначение", Строка.НалоговоеНазначение);
                    
                СтрокаТаблицыНаценок = ТаблицаНаценок.НайтиСтроки(СтруктураОтбора);
                    
                Сумма = Партия.СуммаСписания;
                СуммаНУ = Партия.СуммаСписанияНУ;
                    
                Если СтрокаТаблицыНаценок.Количество() = 0 Тогда
                    ПокупнаяЦена = Сумма;
                ИначеЕсли НЕ СтрокаТаблицыНаценок[0].ПС = 0 Тогда
                    СуммаНаценки = СтрокаТаблицыНаценок[0].ТН * Сумма / (СтрокаТаблицыНаценок[0].ПС);
                    ПокупнаяЦена = Сумма - СуммаНаценки;
                Иначе
                    ПокупнаяЦена = 0;
                КонецЕсли;
                    
                Если Сумма - ПокупнаяЦена <> 0 Тогда
                    ПокупнаяЦенаНУ = СуммаНУ;
                ИначеЕсли НЕ СтрокаТаблицыНаценок[0].ПС_НУ = 0 Тогда
                    СуммаНаценкиНУ = СтрокаТаблицыНаценок[0].ТН_НУ * СуммаНУ / (СтрокаТаблицыНаценок[0].ПС_НУ);
                    ПокупнаяЦенаНУ = СуммаНУ - СуммаНаценкиНУ;
                Иначе
                    ПокупнаяЦенаНУ = 0;
                КонецЕсли;                
                
                Если     Сумма - ПокупнаяЦена <> 0
                    ИЛИ  (СтруктураШапкиДокумента.ЕстьНалогНаПрибыль И (СуммаНУ - ПокупнаяЦенаНУ <> 0))Тогда
                        
                    // "уменьшим" списание партий
                    Проводка = ПроводкиБУ.Добавить();
                    Проводка.Период      = Дата;
                    Проводка.Организация = Организация;
                    Проводка.Содержание  = "Торговая наценка";
                        
                    Проводка.СчетДт      = ПолучательСчетНаценки;
                    Проводка.СчетКт      = Строка.СчетУчетаБУ;
                        
                    ОбщегоНазначения.УстановитьСубконто(Проводка.СчетДт, Проводка.СубконтоДт, 1, Строка.КорСубконтоСписанияБУ1);
                    ОбщегоНазначения.УстановитьСубконто(Проводка.СчетДт, Проводка.СубконтоДт, 2, Строка.КорСубконтоСписанияБУ2);
                    ОбщегоНазначения.УстановитьСубконто(Проводка.СчетДт, Проводка.СубконтоДт, 3, Строка.КорСубконтоСписанияБУ3);
                
                    ОбщегоНазначения.УстановитьСубконто(Проводка.СчетКт, Проводка.СубконтоКт, "Номенклатура",  Строка.Номенклатура);
                    ОбщегоНазначения.УстановитьСубконто(Проводка.СчетКт, Проводка.СубконтоКт, "НоменклатурныеПозиции",  Партия.НоменклатурнаяПозиция);
                    ОбщегоНазначения.УстановитьСубконто(Проводка.СчетКт, Проводка.СубконтоКт, "Склады",  Строка.Склад);
                    ОбщегоНазначения.УстановитьСубконто(Проводка.СчетКт, Проводка.СубконтоКт, "Партии",  Партия.Партия);
                    Проводка.Сумма       = ПокупнаяЦена - Сумма;
                        
                    Если Проводка.СчетДт.Валютный Тогда
                        Проводка.ВалютаДт = СтруктураШапкиДокумента.ВалютаВзаиморасчетов;
                        Проводка.ВалютнаяСуммаДт = ?(Строка.СуммаБезНДСВал = 0, Проводка.Сумма, Проводка.Сумма * Строка.СуммаБезНДСВал / Строка.СуммаБезНДСРегл);
                    КонецЕсли;
                    
                    Проводка.НалоговоеНазначениеКт = Строка.НалоговоеНазначение;
                    Если   СтруктураШапкиДокумента.ЕстьНалогНаПрибыль
                         И Строка.НалоговоеНазначение <> Справочники.НалоговыеНазначенияАктивовИЗатрат.НДС_НеоблагаемаяНеХозДеятельность Тогда
                        Проводка.СуммаНУКт       = ПокупнаяЦенаНУ - СуммаНУ;
                    КонецЕсли;
                        
                    // отразим списание наценки
                    Проводка = ПроводкиБУ.Добавить();
                    Проводка.Период      = Дата;
                    Проводка.Организация = Организация;
                    Проводка.Содержание  = "Торговая наценка";
                        
                    Проводка.СчетДт      = СчетНаценки;
                    Проводка.СчетКт      = Строка.СчетУчетаБУ;
                        
                    ОбщегоНазначения.УстановитьСубконто(Проводка.СчетДт, Проводка.СубконтоДт, "Номенклатура",  Строка.Номенклатура);
                    ОбщегоНазначения.УстановитьСубконто(Проводка.СчетДт, Проводка.СубконтоДт, "НоменклатурныеПозиции",  Партия.НоменклатурнаяПозиция);
                    ОбщегоНазначения.УстановитьСубконто(Проводка.СчетДт, Проводка.СубконтоДт, "Склады",  Строка.Склад);
                    ОбщегоНазначения.УстановитьСубконто(Проводка.СчетДт, Проводка.СубконтоДт, "Партии",  Партия.Партия);
                
                    ОбщегоНазначения.УстановитьСубконто(Проводка.СчетКт, Проводка.СубконтоКт, "Номенклатура",  Строка.Номенклатура);
                    ОбщегоНазначения.УстановитьСубконто(Проводка.СчетКт, Проводка.СубконтоКт, "НоменклатурныеПозиции",  Партия.НоменклатурнаяПозиция);
                    ОбщегоНазначения.УстановитьСубконто(Проводка.СчетКт, Проводка.СубконтоКт, "Склады",  Строка.Склад);
                    ОбщегоНазначения.УстановитьСубконто(Проводка.СчетКт, Проводка.СубконтоКт, "Партии",  Партия.Партия);
                    Проводка.Сумма                     = -(ПокупнаяЦена - Сумма);
                    
                    Проводка.НалоговоеНазначениеДт = Строка.НалоговоеНазначение;
                    Проводка.НалоговоеНазначениеКт = Строка.НалоговоеНазначение;
                    Если   СтруктураШапкиДокумента.ЕстьНалогНаПрибыль
                         И Строка.НалоговоеНазначение <> Справочники.НалоговыеНазначенияАктивовИЗатрат.НДС_НеоблагаемаяНеХозДеятельность Тогда
                        Проводка.СуммаНУДт       = ПокупнаяЦенаНУ - СуммаНУ;
                        Проводка.СуммаНУКт       = ПокупнаяЦенаНУ - СуммаНУ;
                    КонецЕсли;
                    
                    Партия.СуммаСписания = ПокупнаяЦена;
                    Партия.СуммаСписанияНУ = ПокупнаяЦенаНУ;
                        
                КонецЕсли;

вот интересующий кусок модуля. В демоконфигурации такого нет вообще, потому она работает, а этот релиз - нет. Если вырезать условие на котором останавливается программа на ошибке, то вылазит необходимость определения "покупной цены", хочу как то добить ее.
СтрокаТаблицыНаценок[0].ПС_НУ
СтрокаТаблицыНаценок[0].ТН_НУ

вот эти переменные выпадают из массива. Может что то в настройках?

Сообщение отредактировал yur - 29.06.11, 5:09


Signature
УТП 8.2

Ardi Подменю пользователя
сообщение 29.06.11, 0:46
Сообщение #9

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

Цитата(yur @ 28.06.11, 19:40) *
до речі, модулі накладної повернення в Демо і ОновленіОсновніКонфігурації - різні.


yur faceoff.gif


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

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

Оратор
Иконка группы
Группа: Местный
Сообщений: 322
Из: возле Умани
Спасибо сказали: 33 раз
Рейтинг: 0

рука закрывает смеющееся лицо? Ну извините если рассмешил, для меня это Америка.
Подскажите хоть как программист непрограмисту - в злополучной строчке операторы правильно написаны? Или искать в настройках бухгалтерии?


Signature
УТП 8.2

Vofka Подменю пользователя
сообщение 29.06.11, 11:49
Сообщение #11

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

Цитата
рука закрывает смеющееся лицо?

Та не, это лицо плачущее, причём не от смеха.

Причина понятна - в таблице СтрокаТаблицыНаценок - ничего нет, хотя по мнению писателя кода что-то должно быть полюбому! Что должно быть и почему нет - нужно разбираться, причём значение даже может иметь данные в базе.

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

yur Подменю пользователя
сообщение 29.06.11, 14:44
Сообщение #12

Оратор
Иконка группы
Группа: Местный
Сообщений: 322
Из: возле Умани
Спасибо сказали: 33 раз
Рейтинг: 0

Цитата(Vofka @ 29.06.11, 12:49) *
Причина понятна - в таблице СтрокаТаблицыНаценок - ничего нет, хотя по мнению писателя кода что-то должно быть полюбому! Что должно быть и почему нет - нужно разбираться, причём значение даже может иметь данные в базе.

а как выбросить эту проверку из алгоритма?


Signature
УТП 8.2

Vofka Подменю пользователя
сообщение 29.06.11, 15:19
Сообщение #13

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

Цитата
а как выбросить эту проверку из алгоритма?

А вы уверены, что это потом вам боком не вылезет? Если уверены, тогда попробуйте заменить этот блок:

Если Сумма - ПокупнаяЦена <> 0 Тогда
    ПокупнаяЦенаНУ = СуммаНУ;
ИначеЕсли НЕ СтрокаТаблицыНаценок[0].ПС_НУ = 0 Тогда  // НА ЭТУ СТРОЧКУ РУГАЕТСЯ
    СуммаНаценкиНУ = СтрокаТаблицыНаценок[0].ТН_НУ * СуммаНУ / (СтрокаТаблицыНаценок[0].ПС_НУ);
    ПокупнаяЦенаНУ = СуммаНУ - СуммаНаценкиНУ;
Иначе
    ПокупнаяЦенаНУ = 0;
КонецЕсли;


на такой:

Попытка
Если Сумма - ПокупнаяЦена <> 0 Тогда
    ПокупнаяЦенаНУ = СуммаНУ;
ИначеЕсли НЕ СтрокаТаблицыНаценок[0].ПС_НУ = 0 Тогда  // НА ЭТУ СТРОЧКУ РУГАЕТСЯ
    СуммаНаценкиНУ = СтрокаТаблицыНаценок[0].ТН_НУ * СуммаНУ / (СтрокаТаблицыНаценок[0].ПС_НУ);
    ПокупнаяЦенаНУ = СуммаНУ - СуммаНаценкиНУ;
Иначе
    ПокупнаяЦенаНУ = 0;
КонецЕсли;
Исключение
СуммаНаценкиНУ = 0;
ПокупнаяЦенаНУ = 0;
КонецПопытки;

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

yur Подменю пользователя
сообщение 29.06.11, 18:07
Сообщение #14

Оратор
Иконка группы
Группа: Местный
Сообщений: 322
Из: возле Умани
Спасибо сказали: 33 раз
Рейтинг: 0

Цитата(Vofka @ 29.06.11, 16:19) *
попробуйте

Работает! Проверю еще правильность движений и отпишусь.
-------------------------------------------------------------------------
Цитата
Не заполнен счет расходов при возврате поставщику в регистре сведений "Счета учета (прочие)"!
Сформированы проводки в корреспонденции со счетом 00!

ставлю счет учета расчета 631,
счет доходов 719
счет расходов 949.
Что то в налоговом учете не пляшет. Оно то может в обновлении все пофиксят, но когда оно будет..
----------------------------------------------------------------------------
да, точно, в налоговом учете нет движений

Сообщение отредактировал yur - 29.06.11, 18:27


Signature
УТП 8.2

yur Подменю пользователя
сообщение 12.07.11, 21:18
Сообщение #15

Оратор
Иконка группы
Группа: Местный
Сообщений: 322
Из: возле Умани
Спасибо сказали: 33 раз
Рейтинг: 0

Сильно актуально!
Сделал почти весь учет, остались только проблемы с "возвратами" и регламентными.
Никто ручками не доделывал недоработки последнего обновления? Может поделитесь ? 64000000.gif


Signature
УТП 8.2

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

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

Цитата(yur @ 12.07.11, 22:18) *
Никто ручками не доделывал недоработки последнего обновления? Может поделитесь ? 64000000.gif

В ближайшее время должно выйти очередное обновление. До сдачи отчета по прибыли почти месяц, я думаю пока не стоит "ручками" дергаться...


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

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

yur Подменю пользователя
сообщение 27.07.11, 15:59
Сообщение #17

Оратор
Иконка группы
Группа: Местный
Сообщений: 322
Из: возле Умани
Спасибо сказали: 33 раз
Рейтинг: 0

Обновився на 1.2.2.3
Повернення проводяться.
Підкажіть - який ставити рахунок витрат.
Логічно мабуть поставити 285 - торгову націнку ?
Чогось ставить ознаку "нехоз.деятельность"

Сообщение отредактировал yur - 27.07.11, 16:02


Signature
УТП 8.2

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

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

Цитата(yur @ 27.07.11, 16:59) *
Логічно мабуть поставити 285 - торгову націнку ?

Ні, не логічно. Вас просять вказати рахунок ВИТРАТ, при чому тут націнка???


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

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

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

Оратор
Иконка группы
Группа: Местный
Сообщений: 322
Из: возле Умани
Спасибо сказали: 33 раз
Рейтинг: 0

тоді 702 - дохід від реалізації ?
(думав що повернення повинне зробити зворотні рухи від приходу, а там якраз рухи на товар і націнку)

Сообщение отредактировал yur - 27.07.11, 16:10


Signature
УТП 8.2

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

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

Может по русски будет понятнее - Вас просят указать счет ЗАТРАТ, а счета затрат у нас какие?


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

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


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

 

RSS Текстовая версия Сейчас: 06.05.24, 1:33
1С Предприятие 8.3, 1С Предприятие 8.2, 1С Предприятие 8.1, 1С Предприятие 8.0, 1С Предприятие 7.7, Литература 1С, Общие вопросы по администрированию 1С, Методическая поддержка 1С - всё в одном месте: на Украинском 1С форуме!