Текущее время: Вс, июл 27 2025, 02:32

Часовой пояс: UTC + 3 часа


Правила форума


ВНИМАНИЕ!

Вопросы по SAP Query и Quick View - сюда



Начать новую тему Ответить на тему  [ Сообщений: 7 ] 
Автор Сообщение
 Заголовок сообщения: Как отправить в спул list screen.
СообщениеДобавлено: Вт, авг 09 2011, 07:40 
Младший специалист
Младший специалист

Зарегистрирован:
Сб, май 14 2005, 09:55
Сообщения: 73
Пол: Мужской
Добрый день всем. Не могу решить простенькую задачу, необходимо отправить в спул то, что выведено на экран write'ми.
Т.е. именно после того как данные выведены на экран. Например нужно что-то вроде этого:
Code:
REPORT  ZZZPRINT                                .
  DATA:
    pripar LIKE pri_params,
    l_arc_params LIKE arc_params,
    val,
    val2.


WRITE 'Hello word!'.

CALL FUNCTION 'GET_PRINT_PARAMETERS'
      EXPORTING
        mode           = 'CURRENT'
        no_dialog      = 'X'
        user           = sy-uname
      IMPORTING
        out_parameters = pripar
      EXCEPTIONS
        OTHERS         = 1.
  pripar-prnew = 'X'.
  pripar-primm = ''.

      CALL FUNCTION 'GET_PRINT_PARAMETERS'
       EXPORTING
**         ARCHIVE_ID                     = C_CHAR_UNKNOWN
**         ARCHIVE_INFO                   = C_CHAR_UNKNOWN
**         ARCHIVE_MODE                   = C_CHAR_UNKNOWN
**         ARCHIVE_TEXT                   = C_CHAR_UNKNOWN
**         AR_OBJECT                      = C_CHAR_UNKNOWN
**         ARCHIVE_REPORT                 = C_CHAR_UNKNOWN
**         AUTHORITY                      = C_CHAR_UNKNOWN
           copies                         = '1'
**         COVER_PAGE                     = C_CHAR_UNKNOWN
**         DATA_SET                       = C_CHAR_UNKNOWN
**         DEPARTMENT                     = C_CHAR_UNKNOWN
           DESTINATION                    = pripar-pdest
**         EXPIRATION                     = C_NUM1_UNKNOWN
           immediately                    = ''
**         IN_ARCHIVE_PARAMETERS          = ' '
           in_parameters                  = pripar
**         LAYOUT                         = C_CHAR_UNKNOWN
**         LINE_COUNT                     = C_INT_UNKNOWN
**         LINE_SIZE                      = C_INT_UNKNOWN
**         LIST_NAME                      = C_CHAR_UNKNOWN
**         LIST_TEXT                      = C_CHAR_UNKNOWN
**         MODE                           = ' '
**         NEW_LIST_ID                    = C_CHAR_UNKNOWN
**         PROTECT_LIST                   = C_CHAR_UNKNOWN
           no_dialog                      = ''
**         RECEIVER                       = C_CHAR_UNKNOWN
**         RELEASE                        = C_CHAR_UNKNOWN
           REPORT                         = sy-cprog
**         SAP_COVER_PAGE                 = C_CHAR_UNKNOWN
**         HOST_COVER_PAGE                = C_CHAR_UNKNOWN
**         PRIORITY                       = C_NUM1_UNKNOWN
**         SAP_OBJECT                     = C_CHAR_UNKNOWN
**         TYPE                           = C_CHAR_UNKNOWN
           USER                           = SY-UNAME
**         USE_OLD_LAYOUT                 = ' '
**         UC_DISPLAY_MODE                = C_CHAR_UNKNOWN
**         DRAFT                          = C_CHAR_UNKNOWN
*           abap_list                      = 'X'
**         USE_ARCHIVENAME_DEF            = ' '
**         DEFAULT_SPOOL_SIZE             = C_CHAR_UNKNOWN
**         PO_FAX_STORE                   = ' '
**         NO_FRAMES                      = C_CHAR_UNKNOWN
       IMPORTING
*         OUT_ARCHIVE_PARAMETERS         =
         out_parameters                 = pripar
         valid                          = val
         VALID_FOR_SPOOL_CREATION       = val2
       EXCEPTIONS
         archive_info_not_found         = 1
         invalid_print_params           = 2
         invalid_archive_params         = 3
         OTHERS                         = 4
            .


Принять этот ответ
Вернуться к началу
 Профиль  
 
 Заголовок сообщения: Re: Как отправить в спул list screen.
СообщениеДобавлено: Вт, авг 09 2011, 07:49 
Менеджер
Менеджер
Аватара пользователя

Зарегистрирован:
Ср, июн 13 2007, 16:36
Сообщения: 585
Откуда: Belarus
Пол: Мужской
После оного кода добавить что-то типа:
Code:
SUBMIT ZZZPRINT TO SAP-SPOOL
WITHOUT SPOOL DYNPRO
SPOOL   PARAMETERS PRIPAR
ARCHIVE PARAMETERS ARCPAR
AND RETURN.

предварительно покурив справку по SUBMIT.


Принять этот ответ
Вернуться к началу
 Профиль  
 
 Заголовок сообщения: Re: Как отправить в спул list screen.
СообщениеДобавлено: Вт, авг 09 2011, 08:21 
Младший специалист
Младший специалист

Зарегистрирован:
Сб, май 14 2005, 09:55
Сообщения: 73
Пол: Мужской
Так получается бесконечный цикл вызова программы самой себя.


Принять этот ответ
Вернуться к началу
 Профиль  
 
 Заголовок сообщения: Re: Как отправить в спул list screen.
СообщениеДобавлено: Вт, авг 09 2011, 08:29 
Менеджер
Менеджер
Аватара пользователя

Зарегистрирован:
Ср, июн 13 2007, 16:36
Сообщения: 585
Откуда: Belarus
Пол: Мужской
Мои пардон.
Обернуть это всё в
Code:
IF SY-PRNEW IS INITIAL.
* Тут вышеописанный код
ENDIF.


Принять этот ответ
Вернуться к началу
 Профиль  
 
 Заголовок сообщения: Re: Как отправить в спул list screen.
СообщениеДобавлено: Вт, авг 09 2011, 08:41 
Младший специалист
Младший специалист

Зарегистрирован:
Сб, май 14 2005, 09:55
Сообщения: 73
Пол: Мужской
Спасибо. Но все не то. :( Мне нужно отправить в спул без сабмита.
Т.к. программа, из которой я собираюсь отправлять в спул выводит принт-лист далеко не сразу после селекционного экрана, а только после кучи действий с интерфейсом. Программа саповская, не Z*.
Мож еще будут какие идеи? Пыталься через FM "PRINT_REPORT" - не получилось.


Принять этот ответ
Вернуться к началу
 Профиль  
 
 Заголовок сообщения: Re: Как отправить в спул list screen.
СообщениеДобавлено: Вт, авг 09 2011, 12:09 
Гуру-эксперт
Гуру-эксперт
Аватара пользователя

Зарегистрирован:
Чт, ноя 11 2004, 16:25
Сообщения: 3109
Пол: Мужской
Без сабмита, можно модулями отправить ГФ BTCH Фоновая обработка.

А в чем задача? Почему именно спул? Если нужно просто где хранить результат вывода отчета врайтами, то можно посмотреть в сторону "Список->сохранить/отправить" там есть интересные вещи.


Принять этот ответ
Вернуться к началу
 Профиль  
 
 Заголовок сообщения: Re: Как отправить в спул list screen.
СообщениеДобавлено: Вт, авг 09 2011, 12:18 
Младший специалист
Младший специалист

Зарегистрирован:
Сб, май 14 2005, 09:55
Сообщения: 73
Пол: Мужской
В спул, потому что из спула можно создать PDF. А PDF можно уже хоть локально сохранить, хоть к мылe приаттачить. Задача дать пользователю возможность результаты отчета сохранить в удобном виде на локальной машине. Ни один формат в Список->сохранить не сохраняет в читабельном виде. Боле менее приближенным к оригиналу получается только при сохранеии в HTML.


Принять этот ответ
Вернуться к началу
 Профиль  
 
Показать сообщения за:  Поле сортировки  
Начать новую тему Ответить на тему  [ Сообщений: 7 ] 

Часовой пояс: UTC + 3 часа


Кто сейчас на конференции

Сейчас этот форум просматривают: Yandex [Bot]


Вы не можете начинать темы
Вы не можете отвечать на сообщения
Вы не можете редактировать свои сообщения
Вы не можете удалять свои сообщения
Вы не можете добавлять вложения

Найти:
Перейти:  
cron
Powered by phpBB © 2000, 2002, 2005, 2007 phpBB Group
Русская поддержка phpBB