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

Выпуск № 508
от 30.05.2007, 01:35

Вопрос № 88.347

Здравствуйте. Подскажите, пожалуйста, каким образом можно вывести на печать на принтер из обработки печатные формы определенной группы расходных накладных, или любой группы документов

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

Отвечает: Ромашов Евгений Николаевич Здравствуйте, Дмитрий Юдин! на форме должен быть список выбранных документов, или пустой для случая всех документов, также должны быть поля для выбора периода, возможно дополнительные для указания контрагентов складов, возможно номенклатуры, согласно поставленной задачи. в обработке использовать метод открытьформу() передать список параметров, или строку где должно быть указана операция - "Печать" в процедуре приоткрытии() выбранных документов необходимо сделать проверку параметра Форма.Параметр, в соответствии если это мписок значений, или строка где указано "Печать" вызвать процедуру печать() в ней указать что печатную форму необходимо сразу напечатать а в процедуре приоткрытии() после процедуры печать() поставить СтатусВозврата(0); Возврат; форма не откроется все. по моему в стандартных конфигурациях есть обработка "ОбработкаДокументов" где это уже реализовано

Ответ отправил: Ромашов Евгений Николаевич (статус: 1-ый класс) Ответ отправлен: 24.05.2007, 08:28

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

Ответ отправил: Шахрайчук Владимир Анатольевич (статус: Практикант) Ответ отправлен: 24.05.2007, 10:52 Оценка за ответ: 4 Комментарий оценки: Я все почти так и сделал, но вышла куча нужных печатных форм, а мне надо чтобы они сразу печатались на принтер, без захода в каждую форму и нажатия кнопки печать

Отвечает: Elric Здравствуйте, Дмитрий Юдин! Дополню ответ от Шахрайчук Владимир Анатольевич в соответствии с Вашим комментарием. Чтобы они сразу печатались на принтер, без захода в каждую форму и нажатия кнопки печать нужно: 1. Строку Таб=СоздатьОбъект("Таблица") использовать только один раз, в начале обработки. Это, по сути, создание новой печатной формы, а нам столько новых не нужно, нам нужна одна. 2. Строку Таб.Показать(...) использовать тоже только один раз, в конце обработки. Но это скорее пожелание чем необходимость. Т.е. в итоге схема работы должна быть примерно такая как у меня в Приложении. Приложение: Процедура Сформировать() Таб=СоздатьОбъект("Таблица"); Таб.ИсходнаяТаблица(...); // Цикл по документам Док.ВыбратьДокументы(); Пока Док.ПолучитьДокумент()=1 Цикл Таб.ВывестиСекцию("Шапка"); Док.ВыбратьСтроки(); Пока Док.ПолучитьСтроку()=1 Цикл Таб.ВывестиСекцию("Строка"); КонецЦикла; Таб.ВывестиСекцию("Подвал"); КонецЦикла; // Конец цикла по документам Таб.Показать(); // Или Таб.Напечатать(); КонецПроцедуры --------- Мирный атом в КАЖДЫЙ дом!

Ответ отправил: Elric (статус: Специалист) Ответ отправлен: 24.05.2007, 20:10

Вопрос № 88.364

Добрый День Уважаемые!Странные вещи какие-то творятся с 1С.Вот например восстановил я базу - "бухгалтерия сетевая 487 релиз" - из резервной копии(backup делается программой "Резервные копии для 1С") скопировал я её на прежнее место, открыл общий доступ к папке с базой(и всем её вложенным файлам) для всех и т.д.Пытаюсь войти с другого компа(Windows XP SP2) - на долю секунды мелькает желтая заставка 1С и все...в базу войти не возможно!Хотя на том компе(так же Windows XP SP2) где она установлена(пока служит как бы сервером) в неё легко можно войти.Более того с юзерского компьютера теперь нельзя войти даже в прежнюю базу(котора была до бэкапа) - хотя до восстановления все было ОК! А лечится все это просто откатом системы.Но что интересно наблюдение за системой ведется только за системным разделом С - а базы расположен на отличном разделе от системного.Не знаю из-за чего такое творится, но подобная ситуация повторялась и с другим пользователем - он так же не мо г войти в базу, а другие(!!!)легко входили - так-же решилось откатом системы!С этой так-же базой появляется ещё одна странность - перед сдачей годового баланса пользователь чистил базу - на момент сдачи при анализе счета 60.1 по субконто не было красного, но после сбоя. который произошел в конце апреля по дебету многих субконто стало красным, хотя при анализе счета 60 по субконто - все нормально!И такие проблемы происходят только с одной базой - хотя у нас в фирме не одна рабочая база 1С.Может дело с системой, в реестре?Не знаю получу ли я ответ(может кто сталкивался с подобной ситуацией), но больше обращаться мне некому - надеюсь на вашу помощь!Буду очень благодарен любым идеям по поводу данной проблемы и способов её решения. P.S.Тестирование и исправление ИБ делал.На вирусы проверял.Папку с базой переименовывал, галочку у атрибута свойств папки "только чтение" снимал - не помогло!

Отправлен: 24.05.2007, 10:42 Вопрос задал: Alex81 (статус: 1-ый класс) Всего ответов: 3 Мини-форум вопроса >>> (сообщений: 1)

Отвечает: DERL.KG Здравствуйте, Alex81! Кроме доступа, есть еще вкладка Разрешения (Безопасность) в свойствах папки, может там забыли добавить пользователей с полным доступом...

Ответ отправил: DERL.KG (статус: 2-ой класс) Ответ отправлен: 24.05.2007, 10:51 Оценка за ответ: 2 Комментарий оценки: Ну я уж не такой ламер!Это я сделал - установил полный доступ для всех, а так же в меню "Дополнительно" поставил галочку "Заменить разрешения для всех дочерних объектов заданными здесь разрешениями, применимых к дочерним объектам."

Отвечает: Igor_L Здравствуйте, Alex81! Возможны следующие варианты: 1. Надо проверить имена пользователей как в тех базах, которые открываются, так и в сбойной базе - они должны быть идентичные и не меньше 3-х символов. Хотя бы на время проверки базы. 2. Удалите в сбойной базе файлы 1Cv7.CFG - из-за него бывают сбои и медленная скорость при работе пользователей. 3. Все-таки еще раз проверьте реквизит "чтение" для папки с базой и для системной папки 1С (в каталог C:Program Files1cv77). 4. И, возможно, самый важный вариант - ограничьте пользователей на доступ к этой базе и каталогу в целом и поработайте с ней самостоятельно некоторое время - возможно дело и не в 1С... Архивные копии в ближайшее время делайте стандартными средствами 1С Конфигуратора

Ответ отправил: Igor_L (статус: 1-ый класс) Ответ отправлен: 24.05.2007, 12:18 Оценка за ответ: 5 Комментарий оценки: Спасибо!Будем пробовать!

Отвечает: Ovr1970 Здравствуйте, Alex81! Подобный эффект, без выдачи ошибки, свидетельствует о отсутствии у пользователя прав на запись в папку БД и (или) папку, которая назначена ему как папка пользователя. Рекомендую проверить права на шару и на саму папку.

Ответ отправил: Ovr1970 (статус: Практикант) Ответ отправлен: 25.05.2007, 10:27 Оценка за ответ: 3 Комментарий оценки: Я конечно понимаю, что такое поведение "свидетельствует о отсутствии у пользователя прав на запись в папку БД".Повторяю - я установил полный доступ для всех, а так же в меню "Дополнительно" поставил галочку "Заменить разрешения для всех дочерних объектов заданными здесь разрешениями, применимых к дочерним объектам".Притом, вот скажем до какого-то момента база работает нормально, а потом вдруг(по неизвестной мне пока причине)начинает вести себя подобным образом!Но, что ещё более интересно, хотя для папки с базой установлен полный доступ всем, но войти в неё не может только один из юзеров, остальные входят без проблем! Как такое можно объяснить?

Вопрос № 88.383

Здравствуйте. Хочу научиться программировать на 1С. Подскажите, что мне нужно для этого (какое программное обеспечение)? На сайте 1С (http://www.1c.ru) скачал прайс. Там много разных вариантов. И есть для обучения за 540 руб. (№ 4601546033680 1С:Предприятие 8.0. Версия для обучения программированию) Стоит ли покупать саму систему? Дороговато что-то... Спасибо P.S. через email удобнее emfw2@yandex.ru

Отправлен: 24.05.2007, 12:41 Вопрос задал: Антон (статус: Посетитель) Всего ответов: 2 Мини-форум вопроса >>> (сообщений: 1)

Отвечает: Бертыш Андрей Владимирович Здравствуйте, Антон! Версия для обучения это обычная версия предприятия с урезанными возможностями. Ответ на вопрос стоит ли покупать (или красть) решает каждый сам для себя На мой взгляд покупать стоит Я себе в свое время купил более дорогую версию за 99$ Для изучения вам следует определится что вы хотите изучать 8.0 или уходящую 7.7 По 7.7 для обучения есть неплохой ресурс www.firststeps.ru По 8.0 я бы порекомендовал вам пройти курсы стоимость курсов можно узнать на сайте 1С --------- Каждый мнит себя стратегом видя бой со стороны

Ответ отправил: Бертыш Андрей Владимирович (статус: 2-ой класс) Ответ отправлен: 24.05.2007, 12:55

Отвечает: Igor_L Здравствуйте, Антон! Для начала программирования в 1С вы должны уже быть знакомы с программированием как с таковым, и желательно с VB или Delphi. Исходя из того, что вы выбрали для программирования 1С 80 рекомендую заполучить ЕСИС 8.0.14 (клубный вариант) - единая справочная информационная система - в ней очень много информации именно по 8 платформе. Из форумов посоветую - forum.mista.ru и http://itland.ru/forum/ А покупать в любом случае стоит, но для начала неплохо пройти обучение на курсах и параллельно попрактиковаться или на версии для обучения, или у кого-то из своих знакомых, у которых уже стоит 1С. Вложеные средства в образование окупаются всегда.

Ответ отправил: Igor_L (статус: 1-ый класс) Ответ отправлен: 24.05.2007, 13:40

Вопрос № 88.388

Здравствуйте уважаемые эксперты. Подскажите пожалуйста, в чём дело? В окне номенклатура при создании новой строки выходит ошибка следующего содержания: Ит.Выполнить запрос (Константа.Дата регистрации,Рабочая дата(),Счет по коду("29.10')); {Справочник.Номенклатура.Форма.Модуль(53));За данный период бухгалтерские итоги не расчитаны! P.S.Прошу прощения что вопрос не по теме. Заранее спасибо!

Отправлен: 24.05.2007, 12:54 Вопрос задал: Vlasglass (статус: Посетитель) Всего ответов: 3 Мини-форум вопроса >>> (сообщений: 2)

Отвечает: Краюшкин Игорь Валерьевич Здравствуйте, Vlasglass! Вам необходимо расчитать итоги на текущий период. Операции -> Управление бухгалтерскими итогами -> Расчитать итоги

Ответ отправил: Краюшкин Игорь Валерьевич (статус: 8-ой класс) Ответ отправлен: 24.05.2007, 12:59 Оценка за ответ: 5

Отвечает: Нестеров Д. В. Здравствуйте, Vlasglass! Вам нужно войти в монопольном решими и пункте ОперацииУправление бухгалтерскими итогами установить расчет по текущий квартал, на данный момент 3 квартал 2007 года

Ответ отправил: Нестеров Д. В. (статус: 1-ый класс) Ответ отправлен: 24.05.2007, 13:00 Оценка за ответ: 5

Отвечает: Чрнавин Е. А. Здравствуйте, Vlasglass! Это значит, что вам необходимо расчитать итоги. Рабочая дата() должна входить в расчитанный квартал. Расчитать итоги можно так Операции >> Управление бухгалтерсками итогами. Программа должна быть запущена в монопольном режиме. Рабочую дату можно посмотреть в Операции >> Параметры. Вкладка Общие.

Ответ отправил: Чрнавин Е. А. (статус: 1-ый класс) Ответ отправлен: 24.05.2007, 14:16 Оценка за ответ: 5

Вопрос № 88.425

Уважаемые эксперты! 1с 8.0. Не могли бы Вы помочь мне при работе с XML. Мне надо перекачать справочник у одного пользователя другому со всеми данными. Я копирую просто справочник, а затем пишу обработку перекачки данных методом XML. Вот пример: Путь=СокрЛП(ЭлементыФормы.ПутьФайла.Значение)+"Doc.xml"; ЗаписьXML=Новый ЗаписьXML(); ЗаписьXML.ОткрытьФайл(Путь); ЗаписьXML.ЗаписатьОбъявлениеXML(); ЗаписьXML.ЗаписатьНачалоЭлемента("Корневой"); ЗаписьXML.ЗаписатьАтрибут "Справочник","ПромежуточныеГрузы"); ВыборкаГрузов=Справочники.ПромежуточныеГрузы.Выбрать(); Пока ВыборкаГрузов.Следующий() Цикл ЗаписьXML.ЗаписатьНачалоЭлемента("Элемент"); ЗаписьXML.ЗаписатьАтрибут("Код",Строка(ВыборкаГрузов.Код)); ЗаписьXML.ЗаписатьТекст(ВыборкаГрузов.Наименование); ЗаписьXML.ЗаписатьКонецЭлемента(); КонецЦикла; ЗаписьXML.ЗаписатьКонецЭлемента(); ЗаписьXML.Закрыть(); С простым справочником все проходит, но вот если у справочника есть владелец или родитель , я не знаю как это записать. А так я считываю и записываю: ЧтениеXML=Новый ЧтениеXML(); ЧтениеXML.ОткрытьФайл(Путь); Пока ЧтениеXML.Прочитать() Цикл Если ЧтениеXML.ТипУзла=ТипУзлаXML.НачалоЭлемента Тогда Если ЧтениеXML.Имя="Корневой" Тогда Продолжить; КонецЕсли; ПИмя=ЧтениеXML.Имя; Пока ЧтениеXML.ПрочитатьАтрибут() Цикл АИмя=ЧтениеXML.Имя; АЗначение=ЧтениеXML.Значение; НовыйЭлемент=Справочники.ПромежуточныеГрузы.СоздатьЭлемент(); СтрокаИсполнения="НовыйЭлемент."+Аимя+"="+АЗначение; Выполнить(СтрокаИсполнения); КонецЦикла; ИначеЕсли ЧтениеXML.ТипУзла=ТипУзлаXML.Текст Тогда НовыйЭлемент.Наименование=ЧтениеXML.Значение; ИначеЕсли ЧтениеXML.ТипУзла=ТипУзлаXML.КонецЭлемента Тогда НовыйЭлемент.Записать(); КонецЕсли; КонецЦикла; ЧтениеXML.Закрыть(); ПОмогите если можете. С уважением.

Отправлен: 24.05.2007, 18:03 Вопрос задал: Ковальская, Виктория (статус: Посетитель) Всего ответов: 1 Мини-форум вопроса >>> (сообщений: 0)

Отвечает: Махнев Даниил Анатольевич Здравствуйте, Ковальская, Виктория! Попробуйте использовать XML сериализацию с использованием сложных типов... К сожалению сходу найти пример не смог... Но пишите в личку или на мыло из аккаунта я постараюсь помочь... --------- Windows работает ?! Читайте внимательно инструкцию...

Ответ отправил: Махнев Даниил Анатольевич (статус: 3-ий класс) Ответ отправлен: 24.05.2007, 21:37

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