Гость
Целевая тема:
Создать новую тему:
Автор:
Форумы / Microsoft Access [игнор отключен] [закрыт для гостей] / Печать группы отчетов, имеющих разную форму / 17 сообщений из 17, страница 1 из 1
14.01.2017, 13:04
    #39384684
blackbuster
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Печать группы отчетов, имеющих разную форму
Описание процесса:
В рамках одной рабочей смены (smena_id) составляется несколько (например 10) ведомостей (ved_id). 5 из них имеют форму отчета (tef_id) 1 , другие 5 - форму 2
Необходимо разом отправить на печать все 10 документов в соответствующих формах.
Если я правильно мыслю, то необходимо составить запрос, отбирающий соответствующие смене ведомости с указанием номеров форм, а потом попросить систему печатать ведомости из этого запроса в соответствующих формах.
С составлением запроса проблем, естественно, никаких... печать всех документов в одной форме реализуется тоже без проблем, а вот как попросить печатать разные формы - не знаю
подскажите, плз, какие-нибудь варианты
...
Рейтинг: 0 / 0
14.01.2017, 13:09
    #39384685
Лапух
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Печать группы отчетов, имеющих разную форму
blackbuster,
Почти ни чего не понял, но из того чего понял видимо нужно так
На кнопке повесить такие команды:

DoCmd.OpenReport "ИмяОтчета1"
DoCmd.OpenReport "ИмяОтчета2"
DoCmd.OpenReport "ИмяОтчета5"
DoCmd.OpenReport "ИмяОтчета7"
...
Рейтинг: 0 / 0
14.01.2017, 13:21
    #39384687
blackbuster
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Печать группы отчетов, имеющих разную форму
Лапух,
формы ведомостей могут быть разные и зависят от типа ведомостей. заранее жестко их прописать нельзя, так как ежесменно могут меняться
...
Рейтинг: 0 / 0
14.01.2017, 13:32
    #39384691
Лапух
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Печать группы отчетов, имеющих разную форму
blackbuster...так как ежесменно могут меняться...
Всегда удивляюсь и умиляюсь, что 99% вопрошающих, наивно предполагають. что им смогут объяснить на словах, без примерного примера.
у меня даже по жизни имеется типа такого девиза: -

Пух: - ТС, похоже какой то у вас дурацкий план.
ТС: - Да я знаю. Ну так вы со мной.
Пух: - Естественно. Что за вопрос?
...
Рейтинг: 0 / 0
14.01.2017, 13:40
    #39384695
ПЕНСИОНЕРКА
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Печать группы отчетов, имеющих разную форму
blackbusterформы ведомостей могут быть разные и зависят от типа ведомостей. заранее жестко их прописать нельзя, так как ежесменно могут меняться
без примера данных и шаблона отчетов невозможно что-то посоветовать
увы.........
...
Рейтинг: 0 / 0
14.01.2017, 13:48
    #39384698
blackbuster
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Печать группы отчетов, имеющих разную форму
чтоб было понятней на примере покажу.
Вот такая таблица получается по итогам смены
Код: xml
1.
2.
3.
4.
5.
6.
Ved_ID	TEF_ID	Ved_N			TEF_Name
26	1	РП-2017-01-12-1-9	Ведомость приемки труб
34	1	ОП-2017-01-12-1-12	Ведомость приемки труб
43	4	ДК-2017-01-12-1-12	Ведомость дубль-контроля
44	1	ДТ-2017-01-12-1-6	Ведомость приемки труб
56	2	НК-2017-01-12-1-2	Ведомость НК


Нужно распечатать все ведомости, но только в разном виде (формы 1, 2 и 4)
...
Рейтинг: 0 / 0
14.01.2017, 13:57
    #39384701
Лапух
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Печать группы отчетов, имеющих разную форму
[quot blackbuster]...чтоб было понятней на примере покажу...[src XML]
Хорошо, ожидайте.
Когда будет время, ( примерно через пол года, сегодня немного лень создавать созданное ), попытаюсь воссоздать вашу БД по текстовым данным и покажу как это делается.
...
Рейтинг: 0 / 0
14.01.2017, 14:04
    #39384703
blackbuster
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Печать группы отчетов, имеющих разную форму
Лапух,

Уважаемый, если вы хотите показать свое остроумие, то вам на развлекательный портал.
Если нечего сказать по делу, просьба не засорять ветку комментариями, не несущими абсолютно никакой смысловой нагрузки
Заранее благодарю
...
Рейтинг: 0 / 0
14.01.2017, 14:20
    #39384704
Лапух
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Печать группы отчетов, имеющих разную форму
blackbuster...Если нечего сказать по делу, просьба не засорять ветку комментариями, не несущими абсолютно никакой смысловой нагрузки...
И вам того же
Посмотрю как вам ответят на ваш беспримерный вопрос.
По любому выложите пример или останетесь не солоно хлебавши.
Удачи в ожидании!!!
...
Рейтинг: 0 / 0
14.01.2017, 14:32
    #39384708
ПЕНСИОНЕРКА
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Печать группы отчетов, имеющих разную форму
blackbusterвсе ведомости, но только в разном виде (формы 1, 2 и 4)
может и примеры форм печати выложите
что надо получить из таблицы
или надо сориентироваться от tef_id/tef_name и получить

Ведомость приемки труб от 12/01/2017
Ved_ID TEF_ID Ved_N 26 1 РП-2017-01-12-1-934 1 ОП-2017-01-12-1-12 44 1 ДТ-2017-01-12-1-6

Ведомость дубль-контроля
Ved_ID TEF_ID Ved_N 43

Ведомость НК
Ved_ID TEF_ID Ved_N 56
...
Рейтинг: 0 / 0
14.01.2017, 14:44
    #39384711
blackbuster
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Печать группы отчетов, имеющих разную форму
ПЕНСИОНЕРКА,

Верно
сами шаблоны сейчас не столь важны (они пустые), а суть именно такая, чтоб ведомости РП-2017-01-12-1-9, ОП-2017-01-12-1-12, ДТ-2017-01-12-1-6 выводились на печать по форме 1, ведомость ДК-2017-01-12-1-12 - по форме 4 и т.д.
...
Рейтинг: 0 / 0
14.01.2017, 15:29
    #39384724
blackbuster
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Печать группы отчетов, имеющих разную форму
можно, конечно, прописать, чтоб печатались все формы отчетов при наличии в них данных
Код: vbnet
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
14.
15.
16.
17.
18.
19.
20.
21.
22.
23.
    stDocName = "1"
    DoCmd.OpenReport stDocName, acViewPreview, , , acIcon
    If Not Reports(stDocName).HasData Then
        DoCmd.Close acReport, stDocName
    Else
        DoEvents
        DoCmd.PrintOut
        DoEvents
        DoCmd.Close acReport, stDocName, acSaveNo
        DoEvents
    End If

    stDocName = "2"
    DoCmd.OpenReport stDocName, acViewPreview, , , acIcon
    If Not Reports(stDocName).HasData Then
        DoCmd.Close acReport, stDocName
    Else
        DoEvents
        DoCmd.PrintOut
        DoEvents
        DoCmd.Close acReport, stDocName, acSaveNo
        DoEvents
    End If


и т.д...
и на каждый из отчетов повесить фильтр по TEF_ID (это работает), но это как-то кривовато и непрактично при добавлении новых форм отчетов
...
Рейтинг: 0 / 0
14.01.2017, 17:43
    #39384759
mds_world
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Печать группы отчетов, имеющих разную форму
Лапух, просьба поменьше флуда в технических топиках. Есть лесенка, пожалуйста туда. В дальнейшем Ваши посты не по теме будут удаляться. При злоупотреблении возможен бан.
...
Рейтинг: 0 / 0
14.01.2017, 17:43
    #39384760
blackbuster
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Печать группы отчетов, имеющих разную форму
вымучил-таки решение:
Результатом выполнения запроса является таблица (решил привязываться не к TEF_ID, а к TEF_N, так как к счетчику привязываться все же так себе затея):
Код: xml
1.
2.
3.
4.
5.
6.
TEF_Name				Ved_N		TEF_N
Ведомость приемки труб		ДТ-2017-01-12-1-6	1
Ведомость НК			НК-2017-01-12-1-2	2
Ведомость приемки труб		ОП-2017-01-12-1-12	1
Ведомость приемки труб		РП-2017-01-12-1-9	1
Ведомость сварки		РС-2017-01-12-1-3	5


Далее созданы отчеты Ведомость приемки труб и т.п. с фильтрами по TEF_N
ну и сам код:
Код: vbnet
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
14.
15.
Dim kolzap
kolzap = DCount("tef_name", "Z_01")
For i = 1 To kolzap
    stDocName = Nz(DLookup("tef_name", "Z_01", "tef_n= " & i), 0)
    If stDocName <> 0 Then
        DoCmd.OpenReport stDocName, acViewPreview, , , acIcon
          DoEvents
          DoCmd.PrintOut
          DoEvents
          DoCmd.Close acReport, stDocName, acSaveNo
          DoEvents
    Else
        DoCmd.Close acReport, stDocName, acSaveNo
    End If
Next
...
Рейтинг: 0 / 0
14.01.2017, 18:12
    #39384768
Лапух
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Печать группы отчетов, имеющих разную форму
mds_world...Лапух, просьба поменьше флуда в технических топиках. Есть лесенка, пожалуйста туда. В дальнейшем Ваши посты не по теме будут удаляться. При злоупотреблении возможен бан....
Михаил. извините, но на мой взгляд это не флуд, а просто констатация факта, типа - вопрос на мой взгляд сложный и без примера и проверки на нём правильности ответа не обойтись.
Вот почему я так ненавязчиво и исподволь подводил ТСа к выкладыванию примерного примера, как бы он сам до этого додумался.
Ни чего дурного не замышлял, всё только во благо вопрошающему.
Чесно Пионерское!!!
...
Рейтинг: 0 / 0
15.01.2017, 06:21
    #39384913
blackbuster
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Печать группы отчетов, имеющих разную форму
Модератор: Почищено. Совершенно ни к чему раздувать скандалы
...
Рейтинг: 0 / 0
16.01.2017, 18:53
    #39385700
PaulB
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Печать группы отчетов, имеющих разную форму
Делайте главный отчет, содержащий подчиненные отчеты. Они могут быть совершенно разные.
...
Рейтинг: 0 / 0
Форумы / Microsoft Access [игнор отключен] [закрыт для гостей] / Печать группы отчетов, имеющих разную форму / 17 сообщений из 17, страница 1 из 1
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]