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

Часовой пояс: 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 часа


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

Сейчас этот форум просматривают: нет зарегистрированных пользователей


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

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