ShIvADeSt Moderator Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору Тема для программирования 1С!!! Это продолжение темы, предыдущие части доступны тут ПРОГРАММЫ  1С:Предприятие 1C - 1C: Вопросы по конфигурациям ВАРЕЗНИК   1C:Предприятие 7.7 - 1С:Предприятие v.8.x - 1C Диск ИТС - 1С: Совместимо 8.х Топик 1C Ebooks ЗДЕСЬ  (обновлено 17.10.2009) - небольшая библиотечка (книги, документация, видео, утилиты) по 1С, финансам, бухучету и т.п. Все рассортировано по версиям... Для заблудившихся в трех соснах >>> FAQ по форуму RU.Board   Предыдущие темы были здесь часть 4 | часть 3 | часть 1   Как убить рекламу при обновлении отчетности | конфигурации (ИБ)? Всего записей: 3956 | Зарегистр. 29-07-2003 | Отправлено: 02:02 03-04-2009 | Исправлено: vkramnik, 12:06 23-10-2009

vkramnik Advanced Member Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору An4eus Раздел - Различные конфигурации, утилиты и обработки для 1С Файл - Сборник внешних утилит и обработок для v7.7  (10.03.09) Там, внутри, и лежит DlgCompare...   З.Ы.  Щаз, подкорректирую описание состава в свалке... Всего записей: 1855 | Зарегистр. 14-12-2005 | Отправлено: 09:39 20-04-2009

An4eus Silver Member Редактировать | Профиль | Сообщение | ICQ | Цитировать | Сообщить модератору vkramnik ок   Цитата: 3. Регистрирую изменения. Процесс облегчается тем, что я ОБЯЗАТЕЛЬНО выделяю   свои изменения в исходниках с помощью хорошо заметных комментариев, а там, где   нельзя их вставить (например, в таблицах) - регистрирую их в Excel-таблице. регистрируешь на листочке? Те же самые таблицы - пишу комменты в модуле А вообще у меня метода чуть ина: беру базу, которую нужно обновить Базу типовую старого релиза + нового... всё открываю в конфигураторе Один старый типовой релиз сравниваю с базой рабочей, другой - с обновлением А рабочу с обновлением... ---------- Век живи - век учись! Всего записей: 3768 | Зарегистр. 23-07-2007 | Отправлено: 11:04 20-04-2009

vkramnik Advanced Member Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору An4eus МЛИН !!!!! СУПЕР !!!   Как это я сам не додумался писать комменты в модуле ??? Хотя, с другой стороны, последовательная история изменений в отдельном файле (Эксел) тоже бывает полезна... Скажем, типовые изменения таблиц/бланков в определенном классе конфигураций (например, для комиссионной торговли). А по поводу типовых старых/новых, то я тоже нередко так же делаю, в два потока, когда заморочек много... Всего записей: 1855 | Зарегистр. 14-12-2005 | Отправлено: 12:19 20-04-2009

An4eus Silver Member Редактировать | Профиль | Сообщение | ICQ | Цитировать | Сообщить модератору vkramnik Цитата: отя, с другой стороны, последовательная история изменений   в отдельном файле (Эксел) тоже бывает полезна... может быть... я всё в модулях комментирую, чтоб не потерялось... А вообще когда делаю обновление, то анализирую, помимо "измененные" части, ещё типовые изменения, т.к. 1С-ка в последнее время жутко косячит... ---------- Век живи - век учись! Всего записей: 3768 | Зарегистр. 23-07-2007 | Отправлено: 12:26 20-04-2009

vkramnik Advanced Member Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору An4eus Эт-точно... Глюк на глюке... Где-то в районе 500-502 релизов напоролся на то, что при обновлении ТИПОВЫХ конф (!) 1С-ка жутко, грязно и нецензурно оборалась на наличие в обновляемой конфе некоторых счетов (!!!) И, пока их из старой конфы не удалишь, она не давала обновляться...  Хорошо, что у нас по ним проводок не было... Где-то с 503-го релиза глюк пропал... Всего записей: 1855 | Зарегистр. 14-12-2005 | Отправлено: 13:05 20-04-2009

An4eus Silver Member Редактировать | Профиль | Сообщение | ICQ | Цитировать | Сообщить модератору vkramnik с какого точно релиза? Потому, как или 501, или 502, или 503 - оказалсиь тестовые... надо посмотреть - а то интересно... ---------- Век живи - век учись! Всего записей: 3768 | Зарегистр. 23-07-2007 | Отправлено: 13:31 20-04-2009

vkramnik Advanced Member Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору An4eus щаз уже точно не скажу, потому как все проблемные базы обновил, но в 501-м релизе на двух базах точно было при обновлении на 503-ю, и еще в одной - с 502-й на 503-ю.  Это то, что я точно помню... Раньше (с 500 на 501) тоже было разок-другой, но я тогда не придал значения, да и базы были нетиповые (но изменения - НЕ в плане счетов) Всего записей: 1855 | Зарегистр. 14-12-2005 | Отправлено: 14:24 20-04-2009

egerLESHIK Advanced Member Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору Доброго времени суток, товарищи. Не могли бы Вы помочь разобраться в коде? Версия платформы 1С:Предприятие 7.7, конфигурация "ТиС" отличная от типовой или стандартной, то есть почти полностью переписана. Проблема стоит в следующем, написал я одну процедуру в обработке, но она неполностью его отрабатывает.   Проблема № 1. Есть колонка во временной таблице значений обозначенная, как "К", когда сама таблица не заполнена, а следовательно в колонке нет галочек, тогда нужно, чтобы выдавала сообщение "Не выбрано ни одного значения для экспорта в Расходную Накладную!!!" и не формировалась программно расходная накладная. Однако при выполнении процедуры эта часть кода игнорируется и формируется расходная накладная с пустыми строками в таблице.   Проблема № 2. Что-то я упустил при написании цикла. Суть состоит в том, чтобы в результате обработки значений в цикле производилось заполнение (программно) строк в таблице формы Расходная Накладная. Суть в том, что при выполнении процедуры производится анализ на предмет номенклатурного номера НомНомер из временной таблицы значений ТЗИмпЧ, затем проверяет есть ли этот номенклатурный номер в справочнике ТМЦ и вносит его программно в Расходную накладную. Остальные значения подставляются из временной таблицы значения в таблицу формы расходной накладной - коэффициент, количество, цена, сумма. Но все бы хорошо, если бы не загвоздка. Все подставляет правильно в формируемую программно расходную накладную, кроме наименования ТМЦ. А проставляет процедура в поле ТМЦ по всем позициям одно и то же наименование, взятое по первому НомНомер-у из первой позиции во временной таблице значений, очевидно упущен в цикле переход на новую строку (наименование). А где упущено и что упущено никак не могу понять. Прошу помощи разобраться. Код приводится ниже. Подробнее... Всего записей: 951 | Зарегистр. 24-03-2004 | Отправлено: 02:09 21-04-2009 | Исправлено: egerLESHIK, 02:15 21-04-2009

An4eus Silver Member Редактировать | Профиль | Сообщение | ICQ | Цитировать | Сообщить модератору al878 Цитата: подсчет тары отдельно от товара это как? ---------- Век живи - век учись! Всего записей: 3768 | Зарегистр. 23-07-2007 | Отправлено: 09:41 21-04-2009

gorlanovmax Junior Member Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору egerLESHIK   Во-первых, чтобы проверить ТЗ на наличие галок, надо использовать цикл.   ТЗ.ВыбратьСтроки() ВремК=0; Пока ТЗ.ПолучитьСтроку()=1 Цикл    ВремК=ВремК+ТЗ.К; КонецЦикла; Если ВремК=0 Тогда    Предупреждение("А не пошли ли бы Вы!");    Возврат; КонецЕсли;   Во-вторых   РНК=СоздатьОбъект ("Документ.РасходнаяНакладная");   СпТТ=СоздатьОбъект ("Справочник.ТорговыеТочки");   //     спТМЦ = СоздатьОбъект ("Справочник.ТМЦ");   ЭлементСправочника = СоздатьОбъект("Справочник.ТМЦ");   // отсюда убрать  КодТМЦ=ТзИмпЧ.НомНомер;     РНК.Новый();   РНК.Фирма=Константа.БазФирма;   РНК.Статус=Перечисление.СтатусыСклада.Заказ;   РНК.ВидОтгрузки=Перечисление.ВидыОтгрузок.Доставка;   РНК.ВидОплаты=Перечисление.ВидыОплаты.Наличные;   //     РНК.КодТТ="ЦНФ000009";   РНК.Факт = 1;     РНК.БезПояса=1;   РНК.Примечание="Факт";     //     СимволРазделитель = ";";     ТЗИмпЧ.ВыбратьСтроки();   Пока ТЗИмпЧ.ПолучитьСтроку()=1 Цикл     //сюда вставить   КодТМЦ=ТзИмпЧ.НомНомер;       Если ЭлементСправочника.НайтиПоКоду(КодТМЦ, 0) = 1 Тогда      РНК.НоваяСтрока(); // Новую строку добавляем только если найден товар      РНК.ТМЦ = ЭлементСправочника.ТекущийЭлемент();      РНК.Ед = ЭлементСправочника.ЕдиницаПоУмолчанию;      РНК.Коэффициент = ("1");      РНК.КвоЗаказПокупатель=ТЗИмпЧ.Количество;      РНК.КвоЗаказ=ТЗИмпЧ.Количество;      РНК.Кво=ТЗИмпЧ.Количество;      РНК.ЦенаСНДС=ТЗИмпЧ.Цена;      РНК.ЦенаБезНДС=РНК.ЦенаСНДС-РНК.ЦенаСНДС/6;      РНК.СуммаСНДС=ТЗИмпЧ.Сумма;     Иначе      Сообщить("Товар с кодом "+КодТМЦ+" не найден!");       // зачем это непонятно, цикл и так пойдет дальше      Продолжить;     КонецЕсли;           КонецЦикла;             РНК.Записать();   Всего записей: 141 | Зарегистр. 27-06-2006 | Отправлено: 10:56 21-04-2009 | Исправлено: gorlanovmax, 10:59 21-04-2009

An4eus Silver Member Редактировать | Профиль | Сообщение | ICQ | Цитировать | Сообщить модератору egerLESHIK Цитата: Есть колонка во временной таблице значений обозначенная, как "К", когда сама таблица не заполнена, а следовательно в колонке нет галочек, тогда нужно, чтобы выдавала сообщение "Не выбрано ни одного значения для экспорта в Расходную Накладную!!!" gorlanovmax Цитата: egerLESHIK     Во-первых, чтобы проверить ТЗ на наличие галок, надо использовать цикл.   Код:  ТЗ.ВыбратьСтроки()   ВремК=0;   Пока ТЗ.ПолучитьСтроку()=1 Цикл      ВремК=ВремК+ТЗ.К;   КонецЦикла;   Если ВремК=0 Тогда      Предупреждение("А не пошли ли бы Вы!");      Возврат;   КонецЕсли; а зачем цикл-то? всё гораздо проще. Колонка К объявляем, как число. Потом проверяем сумму всех строк колонки К: Код: Если ТЗ.Итог("К")=0 Тогда      Предупреждение("А не пошли ли бы Вы!", 3);      Возврат;   КонецЕсли;     Добавлено: egerLESHIK со второй частью вопроса не могу догнать, что нужно и что не работает... ---------- Век живи - век учись! Всего записей: 3768 | Зарегистр. 23-07-2007 | Отправлено: 11:09 21-04-2009

gorlanovmax Junior Member Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору An4eus   Цитата: а зачем цикл-то? всё гораздо проще. Колонка К объявляем, как число. Потом проверяем сумму всех строк колонки К: Код:Если ТЗ.Итог("К")=0 Тогда      Предупреждение("А не пошли ли бы Вы!", 3);      Возврат;   КонецЕсли;     Можно и так.   Со второй частью, у него код товара присваивался вне цикла, соответственно у всех строк в цикле проставлялся код товара из первой строки Всего записей: 141 | Зарегистр. 27-06-2006 | Отправлено: 11:27 21-04-2009

An4eus Silver Member Редактировать | Профиль | Сообщение | ICQ | Цитировать | Сообщить модератору gorlanovmax я саму суть не могу понять... ---------- Век живи - век учись! Всего записей: 3768 | Зарегистр. 23-07-2007 | Отправлено: 11:33 21-04-2009

gorlanovmax Junior Member Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору An4eus   Суть очень проста. Он из таблицы значений заполняет табличную часть документа Расходная Накладная. И ошибся с расположением оператора Всего записей: 141 | Зарегистр. 27-06-2006 | Отправлено: 11:36 21-04-2009

An4eus Silver Member Редактировать | Профиль | Сообщение | ICQ | Цитировать | Сообщить модератору gorlanovmax ну теперь увидел две ошибки... хотя не понятна реализация с ЭлементСправочника ...   egerLESHIK напиши полную структуру ТЗ ---------- Век живи - век учись! Всего записей: 3768 | Зарегистр. 23-07-2007 | Отправлено: 11:49 21-04-2009 | Исправлено: An4eus, 12:07 21-04-2009

gorlanovmax Junior Member Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору An4eus   Так структура это не ко мне а к egerLESHIK, он автор этого безобразия   Всего записей: 141 | Зарегистр. 27-06-2006 | Отправлено: 11:57 21-04-2009

An4eus Silver Member Редактировать | Профиль | Сообщение | ICQ | Цитировать | Сообщить модератору gorlanovmax ошибся - поправился.. ---------- Век живи - век учись! Всего записей: 3768 | Зарегистр. 23-07-2007 | Отправлено: 12:08 21-04-2009

egerLESHIK Advanced Member Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору Вот так "Век живи-век учись!"     Цитата: Суть очень проста. Он из таблицы значений заполняет табличную часть документа Расходная Накладная. И ошибся с расположением оператора Да это действительно так.   А вот все же с проверкой на наличие или отсутствие галочек в колонке "К" - непонятка. 1. Когда ставлю код:   Цитата:  ТЗ.ВыбратьСтроки()   ВремК=0;   Пока ТЗ.ПолучитьСтроку()=1 Цикл      ВремК=ВремК+ТЗ.К;   КонецЦикла;   Если ВремК=0 Тогда      Предупреждение("А не пошли ли бы Вы!");      Возврат;   КонецЕсли; то формируется расходная накладная с пустыми строками.   2. Когда ставлю код: Цитата: Если ТЗ.Итог("К")=0 Тогда      Предупреждение("А не пошли ли бы Вы!", 3);      Возврат;   КонецЕсли; то формирует расходную накладную с заполнением отмеченных и неотмеченных строк. А мне нужны только отмеченные.         Добавлено: Цитата: напиши полную структуру ТЗ Что конкретно написать? Всего записей: 951 | Зарегистр. 24-03-2004 | Отправлено: 12:36 21-04-2009

Страницы: 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 61 62 63 64 65 66 67 68 69 70 71 72 73 74 75 76 77 78 79 80 81 82 83 84 85 86 87 88 89 90 91 92 93 94 95 96 97 98 99 100 101

Компьютерный форум Ru.Board » Компьютеры » Прикладное программирование » 1C Программирование и поддержка

ShIvADeSt (30-10-2009 09:51): http://forum.ru-board.com/topic.cgi?forum=33&topic=10715

Переход по форумам  Закладки   » Компьютеры Цифровое изображение Программы Microsoft Windows UNIX Другие OS Hardware В помощь сисадмину Прикладное программирование Игры Форумные игры   » Интернет Web-программирование В помощь вебмастеру Графика Хостинг Зацените-ка!   » Тематические Ikonboard v.2 Ikonboard v.3 Invision Board Другие форумы PHP-Nuke и другие порталы Мобила   » Общие Спорт Флейм Темы по региональным встречам Музыка и Кино Юмор Литература и Живопись   » Ru.Board Новости Помощь по форуму   » Андеграунд eBookz Варезник Раздачи и акции Мобильный варезник Андеграунд Игры и фильмы   » Специальные Тестирование