Вопрос № 144023: Нагрянула налоговая проверка, а налоговые накладные на конечного потребителя оказались не напечатанными за пару лет. Возможна ли такая обработка, когда задается временный интервал, и печатаются все проведенные накладные с заданного журнала? Я бух...
Вопрос № 144.023
Нагрянула налоговая проверка, а налоговые накладные на конечного потребителя оказались не напечатанными за пару лет. Возможна ли такая обработка, когда задается временный интервал, и печатаются все проведенные накладные с заданного журнала? Я бухгалтер, и только начинающий программист. И искать мне что-то в этом направлении или надо садиться и всем отделом дружно печатать накладные. Бухгалтерский учет для Украины, версия программы 1С 7,7
Отправлен: 15.09.2008, 20:23
Вопрос задал: Garbar (статус: Посетитель)
Всего ответов: 1 Мини-форум вопроса >>> (сообщений: 1)
Отвечает: kaban
Здравствуйте, Garbar! Перед тем как задать вопрос, пожалуйста, пользуйтесь поиском. Нашел похожий Вопрос № 88347. От себя добавлю, что Если в базе хранятся данные за "задается временный интервал", то думаю ничего сложного нет. Пример обработки в приложении, копайте в этом направлении (Как в бухгалтерии для Украины не знаю).
Код:
Вопрос № 88347 Рассылка: / КОМПЬЮТЕРЫ И ПО / Языки программирования / 1С для программиста
Здравствуйте. Подскажите, пожалуйста, каким образом можно вывести на печать на принтер из обработки печатные формы определенной группы расходных накладных, или любой группы документов
Отправил: Дата отправки: 24.05.2007, 06:19 Поступило ответов: 3 Состояние: Ушёл в рассылку
Ответ № 1
от Ромашов Евгений Николаевич, 7-ой класс Здравствуйте, Дмитрий Юдин!
на форме должен быть список выбранных документов, или пустой для случая всех документов, также должны быть поля для выбора периода, возможно дополнительные для указания контрагентов складов, возможно номенклатуры, согласно поставленной задачи.
в обработке использовать метод открытьформу() передать список параметров, или строку где должно быть указана операция - "Печать" в процедуре приоткрытии() выбранных документов
необходимо сделать проверку параметра Форма.Параметр, в соответствии если это мписок значений, или строка где указано "Печать" вызвать процедуру печать() в ней указать что печатную форму необходимо сразу напечатать а в процедуре приоткрытии() после процедуры печать() поставить СтатусВозврата(0); Возврат; форма не откроется все. по моему в стандартных конфигурациях есть обработка "ОбработкаДокументов" где это уже реализовано О
тветил: Ромашов Евгений Николаевич, 7-ой класс Дата отправки: 24.05.2007, 07:28
Ответ № 2 от Шахрайчук Владимир Анатольевич, Практикант Здравствуйте, Дмитрий Юдин! Можно сделать, как советует Ромашов, а можно (если список печатаемых документов не слишком велик) печатать их прямо из обработки. Достоинства этого метода: 1. На одном листе уместится несколько документов 2. Печатную форму можно сделать отличную от печатной формы документа Недостатки 1. Печатная форма получится отличной от печатной
формы документа 2. Трудоемко.
Таб=СоздатьОбъект("Таблица") Таб.ИсходнаяТаблица("Таблица") Док=СоздатьОбъект("Документ"); Док.ВыбратьДокументы(НачДата,КонДата); Пока Док.ПолучитьДокумент()=1 Цикл Если Док.Проведен()=0 Тогда продолжить;КонецЕсли; Если Док.Вид()="ЧекИнкассатора" Тогда Касса=Док.Склад; Сумма=Док.Сумма; Кассир=Док.Кассир; Таб.ВывестиСекцию("ЧекИнкассатора"); Инач
еЕсли Док.Вид()="Списание" Тогда Таб. ВывестиСекцию("ШапкаСписание"); Док.ВыбратьСтроки(); Пока Док.ПолучитьСтроку()=1 Цикл Таб.ВывестиСекцию("СтрокаСписание"); Можно сделать еще кардинальнее - Все списания по одному складу за месяц вывести в одной печатной форме: Сверху шапка, посредине строки всех документов за месяц, с указанием ТМЦ, счета, даты и причины списания, снизу члены комиссии Ответил: Шахрайчук Владимир Анатольевич, Практикант Дата отправки: 24.05.2007,
09:52
Ответ № 3 от Сергей Максименко [Elric], Профессионал Здравствуйте, Дмитрий Юдин! Дополню ответ от Шахрайчук Владимир Анатольевич в соответствии с Вашим комментарием. Чтобы они сразу печатались на принтер, без захода в каждую форму и нажатия кнопки печать нужно: 1. Строку Таб=СоздатьОбъект("Таблица") использовать только один раз, в начале обработки. Это, по сути, создание новой печатной формы, а нам столько новых не нужно, нам
нужна одна. 2. Строку Таб.Показать(...) использовать тоже только один раз, в конце обработки. Но это скорее пожелание чем необходимость. Т.е. в итоге схема работы должна быть примерно такая как у меня в Приложении. Ответил: Сергей Максименко [Elric], Профессионал Дата отправки: 24.05.2007, 19:10
Добавлен текст вопроса № 88347. Т.к. 1)ВАЖНО! Учитывая то обстоятельство, что просмотр вопроса и ответов к нему является для посетителей платным, а также тот факт, что незарегистрированные пользователи (коими в большей части являются подписчики рассылок, например, с Subscribe), не могут просматривать мини-форумы вопросов, необходимо помимо ссылок на ответы в аналогичном вопросе, заданном ранее, также дополнительно копировать текст этого ответа в Приложение к своему ответу, либо цитировать часть ответа
с указанием автора. 2)Код в приложении взят из ответа №3, без указания авторства.
--------
∙ Отредактировал: Зенченко Константин Николаевич, Профессор
∙ Дата редактирования: 16.09.2008, 10:51 (время московское)
Приложение:
Ответ отправил: kaban (статус: 1-ый класс)
Ответ отправлен: 16.09.2008, 09:50
