/ КОМПЬЮТЕРЫ И ПО / Языки программирования / 1С для программиста

Выпуск № 655
от 21.11.2007, 03:05

Вопрос № 109.491

Здравствуйте уважаемые эксперты! ТиС типовая. Каким образом можно сделать, чтобы в отчете Ведомость по остаткам ТМЦ (выбираю ТМЦ с детализацией Документы движения) в расшифровке открывался не просто текущий документ, но и активизирована была строка с этим ТМЦ? Да и возможно ли такое вообще?

Отправлен: 15.11.2007, 08:39 Вопрос задала: Darina (статус: Посетитель) Всего ответов: 1 Мини-форум вопроса >>> (сообщений: 1)

Отвечает: Arkadiy Karanskiy Здравствуйте, Darina! Для того, чтобы необходимая строка в табличной части документа была активизированна, служит метод АктивизироватьСтроку(НомерСтроки). Этот метод только поставит курсор на необходимую Вам строку, если Вам необходим еще и встать на нужное поле, то для этого необходимо использовать метод Активизировать("ИдентификаторПоля", 0). Данные методы помогут, если известен номер строки.

Ответ отправил: Arkadiy Karanskiy (статус: 8-ой класс) Ответ отправлен: 15.11.2007, 16:54 Оценка за ответ: 4 Комментарий оценки: Да, но АктивизироватьСтроку() - Данный метод доступен только в контексте Модуле формы документа. Номер строки я определила. Может быть можно как-то всё-таки через Активизировать(). Пробовала прописать Контекст, но ничего не получается.

Вопрос № 109.495

Доброго времени суток! 1с7.7 Документ при проведении делает движения регистра. Как узнать (программно) идентификатор регистра или регистров, измерения по которым было движение и какие ресурсы при этом изменились?

Отправлен: 15.11.2007, 09:08 Вопрос задал: Игорь К. (статус: 5-ый класс) Всего ответов: 3 Мини-форум вопроса >>> (сообщений: 0)

Отвечает: Кривых Александр Анатольевич Здравствуйте, Игорь К.! Можно перебрать записи движений регистра и по документу найти все движения. Рег.ВыбратьДвижения();

Ответ отправил: Кривых Александр Анатольевич (статус: 4-ый класс) Ответ отправлен: 15.11.2007, 09:28 Оценка за ответ: 3 Комментарий оценки: В данном случае известен документ, но неизвестны регистры которые он (документ) изменяет. По Вашему совету надо "Рег" сначала определить Рег=СоздатьОбъект("Регистр.<ИдентификаторРегистра>"). <ИдентификаторРегистра> пока неизвестен.

Отвечает: ВладИС Здравствуйте, Игорь К.! Выбираешь движения регистров по нужному документу и анализируешь, были ли ненулевые значения ресурсов. Примерно так (писал без тестирования, так что возможны опечатки): Для Номер = 1 По Метаданные.Регистр() Цикл ВидРегистра = Метаданные.Регистр(Номер).Идентификатор; Рег = СоздатьОбъект("Регистр." + ВидРегистра); ЕстьДвижения = Рег.ВыбратьДвиженияДокумента(ДатаНачала); Если ЕстьДвижения=1 Тогда Пока Рег.ПолучитьДвижение() = 1 Цикл Для Номер=1 По Метаданные.Регистр(ВидРегистра).Ресурс() Цикл ИмяРесурса = Метаданные.Регистр(ВидРегистра).Ресурс(Номер).Идентификатор; Если Рег.ПолучитьАтрибут(ИмяРесурса)<>0 Тогда Сообщить(ВидРегистра+" "+ИмяРесурса); КонецЕсли; КонецЦикла; КонецЦикла; КонецЕсли; КонецЦикла;

Ответ отправил: ВладИС (статус: 6-ой класс) Ответ отправлен: 15.11.2007, 10:30 Оценка за ответ: 5 Комментарий оценки: Точно! Пятерка за верное направление мыслей. Спасибо!!!

Отвечает: Владимир 007 Здравствуйте, Игорь К.! Есть метод регистра ВыбратьДвиженияДокумента, им и воспользуйтесь. Есть решение Вашего вопроса на примере процедуры сторнирования документа. Сначала заполняется список значений ресурсами регистра, потом из регистра выбираются движения этого документа и делается движение с обратным начальному движению знаком. И так по всем регистрам, которые двигает документ: Взаиморасчеты, Деньги, Остатки, Резерв, Партии и т.д. Код в приложении. Владимир. Приложение: Процедура СторноДвижений(ДокОсн, РегДвиж, НазвРег) МДРег = Метаданные.Регистр(НазвРег); спИзмерения = СоздатьОбъект("СписокЗначений"); Для Инд=1 По МДРег.Измерение() Цикл спИзмерения.ДобавитьЗначение(МДРег.Измерение(Инд).Идентификатор); КонецЦикла; спРесурсы = СоздатьОбъект("СписокЗначений"); Для Инд=1 По МДРег.Ресурс() Цикл спРесурсы.ДобавитьЗначение(МДРег.Ресурс(Инд).Идентификатор); КонецЦикла; спРеквизиты = СоздатьОбъект("СписокЗначений"); Для Инд=1 По МДРег.Реквизит() Цикл спРеквизиты.ДобавитьЗначение(МДРег.Реквизит(Инд).Идентификатор); КонецЦикла; Рег = СоздатьОбъект("Регистр."+НазвРег); Рег.ВыбратьДвиженияДокумента(ДокОсн); Пока Рег.ПолучитьДвижение()=1 Цикл // копируем измерения Для Инд=1 по спИзмерения.РазмерСписка() Цикл ИмяАтрибута = спИзмерения.ПолучитьЗначение(Инд,); ЗнАтр = Рег.ПолучитьАтрибут(ИмяАтрибута); РегДвиж.УстановитьАтрибут(ИмяАтрибута,ЗнАтр); КонецЦикла; // копируем ресурсы со "сторно" Для Инд=1 по спРесурсы.РазмерСписка() Цикл ИмяАтрибута = спРесурсы.ПолучитьЗначение(Инд,); ЗнАтр = Рег.ПолучитьАтрибут(ИмяАтрибута); РегДвиж.УстановитьАтрибут(ИмяАтрибута, - ЗнАтр); КонецЦикла; // копируем реквизиты, некоторые со "сторно" Для Инд=1 по спРеквизиты.РазмерСписка() Цикл ИмяАтрибута = спРеквизиты.ПолучитьЗначение(Инд,); ЗнАтр = Рег.ПолучитьАтрибут(ИмяАтрибута); Если Найти("СуммаСНДС_НУ,Оборот,НДСРасхода",ИмяАтрибута)>0 Тогда РегДвиж.УстановитьАтрибут(ИмяАтрибута, - ЗнАтр); Иначе РегДвиж.УстановитьАтрибут(ИмяАтрибута, ЗнАтр); КонецЕсли; КонецЦикла; // двигаем регистр Если МДРег.ТипРегистра = "Обороты" Тогда РегДвиж.ДвижениеВыполнить(); ИначеЕсли МДРег.ТипРегистра = "Остатки" Тогда Если Рег.Приход = 1 Тогда РегДвиж.ДвижениеПриходВыполнить(); Иначе РегДвиж.ДвижениеРасходВыполнить(); КонецЕсли; КонецЕсли; КонецЦикла; КонецПроцедуры // =============================== Процедура ОбработкаПроведения() Если ПроверкаШапки() = 0 Тогда глНеПроводить(Контекст); Возврат; КонецЕсли; СторноДвижений(ДокументОснование, Регистр.ВзаиморасчетыПокупателей , "ВзаиморасчетыПокупателей"); СторноДвижений(ДокументОснование, Регистр.ВзаиморасчетыПоставщиков , "ВзаиморасчетыПоставщиков"); СторноДвижений(ДокументОснование, Регистр.Деньги , "Деньги"); СторноДвижений(ДокументОснование, Регистр.ОстаткиТоваров , "ОстаткиТоваров"); СторноДвижений(ДокументОснование, Регистр.ПартииТоваров , "ПартииТоваров"); СторноДвижений(ДокументОснование, Регистр.РезервыТоваров , "РезервыТоваров"); СторноДвижений(ДокументОснование, Регистр.ВозвратыВзаиморасчетов , "ВозвратыВзаиморасчетов"); СторноДвижений(ДокументОснование, Регистр.ВозвратыПартий , "ВозвратыПартий"); КонецПроцедуры

Ответ отправил: Владимир 007 (статус: 7-ой класс) Ответ отправлен: 17.11.2007, 17:57

Вопрос № 109.506

Как определить кто из пользователей зашел в монопольном режиме?

Отправлен: 15.11.2007, 10:09 Вопрос задал: Koseor (статус: Посетитель) Всего ответов: 3 Мини-форум вопроса >>> (сообщений: 0)

Отвечает: Dubrovin Здравствуйте, Koseor! ))))))))))))))))) запустить монитор пользователей и посмотреть )

Ответ отправил: Dubrovin (статус: 3-ий класс) Ответ отправлен: 15.11.2007, 10:17 Оценка за ответ: 5 Комментарий оценки: спасибо большое, так и сделаю

Отвечает: BigHard Здравствуйте, Koseor! Запустить 1с в режиме монитора, далее монитор - активные пользователи, пользователь, зашедший монопольно будет отмечен значком 1с с восклицательным знаком. --------- Чем отличается чайник от программиста: У чайника в одном килобайте 1000 байт, а у программиста в одном километре 1024 метра

Ответ отправил: BigHard (статус: Студент) Ответ отправлен: 15.11.2007, 12:01

Отвечает: Кривых Александр Анатольевич !!! Здравствуйте, Koseor! Нужно зайти в Монитор пользователей и там посмотреть кто зашёл. дублирующий ответ ----- ∙ Отредактировал: Сергей Максименко [Elric] (Профессионал) ∙ Дата редактирования: 16.11.2007, 00:36

Ответ отправил: Кривых Александр Анатольевич (статус: 4-ый класс) Ответ отправлен: 15.11.2007, 12:28

Вопрос № 109.507

Здравствуйте! Как обновить релиз Бухгалтерии 8.0 Требуется с 15.4 до 19.6

Отправлен: 15.11.2007, 10:15 Вопрос задал: Игорь Станиславович (статус: Посетитель) Всего ответов: 2 Мини-форум вопроса >>> (сообщений: 0)

Отвечает: Сысоев Дмитрий Олегович Здравствуйте, Игорь Станиславович! К сожалению только последовательным обновлением в следующем порядке. 5.7, 7.5, 10.3, 12.1, 13.6, 14.4, 15.3, 16.3, 17.3, 18.4, 19.6. Удачи. --------- Hайден неизвестный драйвер, воткните какое-нибудь устройство!

Ответ отправил: Сысоев Дмитрий Олегович (статус: 10-ый класс) Ответ отправлен: 15.11.2007, 10:41 Оценка за ответ: 5 Комментарий оценки: Спасибо!

Отвечает: Яна Здравствуйте, Игорь Станиславович! Возможны варианты: 1. Попросить об этом сотрудника поддерживающей Вас фирмы-франчайзи 2. Если конфигурация не была изменена (в обратном случае это чревато потерей изменений и данных) установить обновление, потом зайти в режиме конфигуратор, выбрать пункт меню конфигурация - поддержка - обновить конфигурацию. после чего произвести поиск подходящих обновлений, вероятно найдется только что уставленное, потом нажать обновить. Но... еще раз предупреждаю: это можно делать только в том случае, если конфигурация не была изменена. Иначе - это процесс сложный и длительный и его должен производить очень опытный программист.

Ответ отправила: Яна (статус: Студент) Ответ отправлен: 15.11.2007, 10:45 Оценка за ответ: 5

Вопрос № 109.559

Доброго всем времени, столкнулся с такой проблемой по 7.7, ранее была установленна база с УИРБ, теперь, установил клиентам все лицензионное (без компоненты), но база не открывается, соответственно требует установленной распределенки, как теперь от этой распределенки избавиться, так, как нужды в ней нет, изменились обстоятельства, а данных там прилично, и желательно продолжить работу в этой базе.

Отправлен: 15.11.2007, 15:57 Вопрос задал: Provnick (статус: Посетитель) Всего ответов: 2 Мини-форум вопроса >>> (сообщений: 0)

Отвечает: Татьяна Ласовская Здравствуйте, Provnick! Это не очень сложно - убиваете все периферийные базы, а с центральной проводите следующие действия: В первую очередь, в файле 1SSYSTEM.DBF вручную очистите 3-х символьное поле DBSIGN (содержащее код ИБ), и, в принципе, этого достаточно. Для возврата ИБ в первозданное состояние нужно дополнительно: Удалить файлы 1SDBSET.DBF, 1SDWNLDS.DBF, 1SUPDTS.DBF и соответствующие индексные файлы (.CDX) . В файле 1SSYSTEM.DBF обнулить 36-ти символьную строку DBSETUUID: 00000000-0000-0000- 0000-000000000000. Не забывайте про backup!

Ответ отправила: Татьяна Ласовская (статус: 10-ый класс) Ответ отправлен: 15.11.2007, 18:54 Оценка за ответ: 5 Комментарий оценки: Благодарю за своевременную и качественную помощь

Отвечает: Vlad Skorochod Здравствуйте, Provnick! Методом проб и ошибок пришел к выводу, что за распределенку в базе отвечают след. файлы: 1SDBSET.DBF 1SDWNLDS.DBF 1SSYSTEM.DBF 1SUPDTS.DBF Удаление этих файлов на данных не сказывается, а про рапределенку база забывает.

Ответ отправил: Vlad Skorochod (статус: 10-ый класс) Ответ отправлен: 16.11.2007, 09:48 Оценка за ответ: 5 Комментарий оценки: Благодарю, "...и опыт, сын ошибок трудных, и, гений парадоксов друг" А.С. не знал 1С, но каков прозорливец!

Вопрос № 109.565

В 1С7.7 есть команды управления стандартным диалогом вывода документа на печать типа Напечатать(), ЭкземпляровНаСтранице(), КоличествоЭкземпляров(), ПараметрыСтраницы(). Мне нужно при печати выводить документ не на принтер, а в файл. В стандартном диалоге печати есть checkbox "Вывод в файл". Вопрос: как мне при печати в 1С программно ставить туда галочку? Или вопрос: "Как мне настроить диалог печати ОС WinXP, чтобы по умолчанию (при открытии диалога) вывод шёл в файл? Спасибо.

Отправлен: 15.11.2007, 16:31 Вопрос задал: Ginar (статус: Посетитель) Всего ответов: 1 Мини-форум вопроса >>> (сообщений: 0)

Отвечает: Владимир 007 Здравствуйте, Ginar! Штатными средствами такое не предоставлено, как и управление портами принтера (см. ниже). А вот написать какой скрипт, перехватывающий окно настроек печати и "нажимающий" комбинацию клавиш Alt-Ф, можно. Только этот скрипт будет все окна параметров печати перехватывать. Другой вариант - средствами Windows в параметрах принтера на вкладке Порты установите галочку в строке "FILE: - печать в файл". Тогда всё, печатаемое на этот принтер будет записываться в файлы. Не выход, если принтер в системе один или специфика вывода в файл только для одного документа/отчета. Хотя недавно читал совет по подобному поводу - установить в системе второй драйвер этого принтера (клон) и один настроить на работу с файлами, а второй на работу с принтером. Тогда из документа/отчета в параметрах печати нужно будет установить принтер с "нужным" портов, и по идее, должно заработать. Успехов! Владимир.

Ответ отправил: Владимир 007 (статус: 7-ой класс) Ответ отправлен: 17.11.2007, 23:43 Оценка за ответ: 4 Комментарий оценки: Это мне уже предложили, я проверил - работает. Но теперь вместо одной галочки открывает три окна с вопросами, на которые опять надо нажимать. Я уже пожалился в минифоруме на это. Насчет скриптов я пока думаю. Тем не менее спасибо за дельный совет.

Вопрос № 109.569

Добрый вечер, эксперты! у меня вопросик не по программированию, но связанный непосредственно с 1С. Я уже прошла у нас в городе комплексный курс по 1С-ке, но это дало лишь азы... а больше курсов у нас нет. я нашла, на мой взгляд, интересные курсы в Москве в фирме 1С. скажите пожалуйста они действительно могут подготовить к сдаче 1С-Специалиста? или это будет очередная трата времени и они дадут мне совсем немного...

Отправлен: 15.11.2007, 16:54 Вопрос задала: Шакирова Альбина (статус: Посетитель) Всего ответов: 3 Мини-форум вопроса >>> (сообщений: 0)

Отвечает: Arkadiy Karanskiy Здравствуйте, Шакирова Альбина! Если Вы имеете неплохой опыт в программирование на платформе 1С, то эти курсы конечно Вам помогут сдать или подготовиться к сертификации. На официальном сайте компании "1С" также есть Интернет курсы, которые может быть будут Вам удобнее. Вот подходящая ссылка http://www.1c.ru/rus/partners/training/default.jsp.

Ответ отправил: Arkadiy Karanskiy (статус: 8-ой класс) Ответ отправлен: 15.11.2007, 17:12 Оценка за ответ: 5 Комментарий оценки: Не совсем удобные... их можно пройти когда готов освоить материал сам, не задавая вопросов. а они у меня возникают в большом количестве!!! так как я все-таки начинающий программист. спасибо за ссылки!

Отвечает: Sim_tm Здравствуйте, Шакирова Альбина! Для начала надо определиться нужен ли вам специалист. Курсы конечно помогут подготовиться, но на специалисте есть такой нюанс, что решать надо все очень быстро (4 часа на экзамен). А быстрота приходит именно со стажем, а не сразу после курсов, имхо. И еще нюанс, я конечно могу ошибаться, но помойму для сдачи специалиста у вас уже должен быть сертификат профессионала по платформе. Удачи.

Ответ отправил: Sim_tm (статус: 4-ый класс) Ответ отправлен: 17.11.2007, 13:20 Оценка за ответ: 5 Комментарий оценки: "сегодня не нужен и завтра не нужен, а вот после завтра как знать..." извините за цитаты ... дело в том что это сейчас у меня свой бизнес, работа и т.д. а вот что ждет меня завтра не известно, специалист откроет передо мной ЛЮБЫЕ двери. да и у нас сейчас чтобы устроиться на хорошую работу необходимо иметь сертификаты.

Отвечает: Сергей Максименко [Elric] Здравствуйте, Шакирова Альбина! Отвечая на Ваш комментарий. Если у Вас вопросы возникают в больших количествах, задавайте их нашим экспертам, постараемся ответить максимально доступно :) Дело в том, что очень многое действительно приходит с опытом. Как минимум, повышается эффективность решений. Вы так и не сказали, есть ли у Вас опыт -- без него никакие курсы к "Специалисту" не подготовят. Могу сразу подсказать с чего можно начать -- возьмите тестовые задания, попробуйте их решить (можете засекать сразу время, можете нет) и если в процессе будут возникать вопросы, задавайте их в рассылку всем экспертам. Главное, получите на выходе коныигурации, соответствующие ВСЕМ требованиям задания, без компромиссов. Наши эксперты же помогут Вам и оценить, насколько правильное решение Вы выбрали. примеры тестовых заданий (с требованиями к качеству исполнения и теоретическими вопросами, ответы на которые Вы должны знать) выложены здесь: http://www.1c.ru/rus/partners/training/questions.htm --------- В творчестве рождается истина

Ответ отправил: Сергей Максименко [Elric] (статус: Профессионал) Украина, Киев Тел.: +38(095)2873210 Организация: "МАКСЕР" - продажа и внедрение "1С:Предприятие" Адрес: г. Киев WWW: "1С:Предприятие" - продажа, внедрение, сопровождение ---- Ответ отправлен: 19.11.2007, 14:37

Вопрос № 109.596

Эксперты, посоветуйте пожалуйста. Была напрочь удалена база 1С(7.7), файлы были востановлены прогой UndeletePlus, но база отказывается загружаться, хотя размеры файлов такие же. Конфигуратор тоже не открывается, чтобы провести хоть какую то диагностику базы.

Отправлен: 15.11.2007, 19:07 Вопрос задал: Dudich (статус: Посетитель) Всего ответов: 2 Мини-форум вопроса >>> (сообщений: 2)

Отвечает: Besker® Здравствуйте, Dudich! Если у вас нет сохраненных резервных копий (на будущее это обязательно надо делать один раз в день), то если у Вас типовая конфигурация (ТиС, бухгалтерия, ЗиК), то попробуйте скопировать в Вашу восстановленную базу файлы *.md и *.dd, и сделайте тестирование базы, предварительно ручками удалив индексные файлы cdx, --------- Жизнь - игра, а настоящая игра - МАНИЯ.

Ответ отправил: Besker® (статус: Студент) Ответ отправлен: 15.11.2007, 21:56

Отвечает: BigHard Здравствуйте, Dudich! К сожалению, можете даже не пытаться восстановить удаленые файлы (любыми программами) - это бесполезно. Я сам пробовал, перебрал кучу программ, другие пробовали, все без толку. Отвечаю только для того, чтобы вы бросили бесполезные попытки, а восстанавливали базу из резервной копии или вручную, увы но это так... :( --------- Чем отличается чайник от программиста: У чайника в одном килобайте 1000 байт, а у программиста в одном километре 1024 метра

Ответ отправил: BigHard (статус: Студент) Ответ отправлен: 16.11.2007, 07:15

© 2001-2007, Портал RusFAQ.ru, Россия, Москва. Авторское право: ООО "Мастер-Эксперт Про" Техподдержка портала, тел.: +7 (926) 535-23-31 Хостинг: "Московский хостер" Поддержка: "Московский дизайнер" Авторские права | Реклама на портале Версия системы: 4.62.2 от 20.11.2007
RusFAQ.ru | MosHoster.ru | MosDesigner.ru | RusIRC.ru Kalashnikoff.ru | RadioLeader.ru | RusFUCK.ru