Получить бинарник PDF

Orgazm

Коллеги, как можно получить бинарник пдф формуляра после вызова непосредственно фмника этого формуляра?

ArmAnn

Посмотрите программы FP_PDF_TEST_* - там где то было

Orgazm

В тестовых ничего путного не нашел.
Зато нашел вот такое

Code:

  CALL FUNCTION ls_function
    EXPORTING
      /1BCDWB/DOCPARAMS = fp_docparams
      form_data         = gs_content
    IMPORTING
      /1BCDWB/FORMOUTPUT = fp_formoutput
    EXCEPTIONS
      usage_error       = 1
      system_error      = 2
      internal_error    = 3.

lv_pdf_binary = fp_formoutput-pdf.

Однако наткнулся на небольшую проблему:
Похоже что ФМник сам делает и JOB_OPEN и JOB_CLOSE, потому что я не могу запустить соответствующие ФМники чтоб самому создать open и close. Как мне сделать параметры запуска типа preview, no_dialog итд ?

weise

Обычно вызов ФМ обрамляют JOB_OPEN и JOB_CLOSE вручную, сам ФМ не должен делать этого.
Какая ошибка возникает?

Orgazm

weise написал(а):

Обычно вызов ФМ обрамляют JOB_OPEN и JOB_CLOSE вручную, сам ФМ не должен делать этого.
Какая ошибка возникает?

вылетает exception usage_error = 1

какая сейчас ситуация: фмник, который осуществляет печать - job_open -> вызов фм формуляра -> job_close.
Если проверять фмник через тест - он отваливается в вызове фм формуляра, с ошибкой что job уже open. Если убрать job_open и close, фм отлично работает

Этот фм вызывается в другой транзакции, и там ситуация прямо противоположная. С ручными job_open и close работает, без них как в тесте фм - нет. Мистика.

weise

Упс, нужно использовать FP_JOB_OPEN и FP_JOB_CLOSE. Вы их используете?

Orgazm

weise написал(а):

Упс, нужно использовать FP_JOB_OPEN и FP_JOB_CLOSE. Вы их используете?

да, про них и речь

broker.chelny

У нас работает следующим образом:

Code:

ie_outputparams-nodialog = abap_true.
ie_outputparams-dest = 'PDF'. "(принтер с postscript)
ie_outputparams-getpdf   = abap_true.

Сначала 'FP_JOB_OPEN', потом ФМ формуляра, далее 'FP_JOB_CLOSE'.

weise

Должно работать, только что проверил. Приведите может код.

Orgazm

weise написал(а):

Должно работать, только что проверил. Приведите может код.

Code:

FORM open_form_pdf USING lv_dest lv_pdf_requested.


  fp_outputparams-pdftagged = 'X'.



  IF lv_pdf_requested = 'X'.
      fp_outputparams-getpdf = 'X'.
      fp_outputparams-nodialog   = 'X'.
      fp_outputparams-dest = 'ZPDF_PRT'.
  ELSEIF
      fp_outputparams-getpdf = ''.
      fp_outputparams-dest       = lv_dest.
    IF lv_dest IS INITIAL.
      fp_outputparams-nodialog   = ''.
      ELSEIF
      fp_outputparams-nodialog   = 'X'.
         ENDIF.
    ENDIF.
  "fp_outputparams-getxml = 'X'.




  CLEAR fp_outputparams-noprint.
  fp_outputparams-device     = 'PRINTER'.
  fp_outputparams-preview    = 'X'.
  fp_outputparams-reqnew     = 'X'.
  fp_outputparams-reqimm     = 'X'.
  "fp_outputparams-dest       = lv_dest.


"BREAK-POINT.

  CALL FUNCTION 'FP_JOB_OPEN'
    CHANGING
      ie_outputparams = fp_outputparams
    EXCEPTIONS
      cancel          = 1
      usage_error     = 2
      system_error    = 3
      internal_error  = 4
      OTHERS          = 5.
  IF sy-subrc <> 0.
    MESSAGE ID sy-msgid TYPE sy-msgty NUMBER sy-msgno
            WITH sy-msgv1 sy-msgv2 sy-msgv3 sy-msgv4.
  ENDIF.


ENDFORM.

Code:

FORM make_form CHANGING lv_pdf_binary TYPE xstring.

  DATA: p_tnapr_sform TYPE na_fname VALUE 'Z_J_3R_M2_CONTEXT_1'. "'ZBOX_PRINT_LABEL',


  CALL FUNCTION 'FP_FUNCTION_MODULE_NAME'
    EXPORTING
      i_name     = p_tnapr_sform
    IMPORTING
      e_funcname = ls_function.

  IF sy-langu = 'R'.
    fp_docparams-langu = 'R'.
    fp_docparams-country = 'RU'.
  ENDIF.

* Формирование данных формуляра

*BREAK-POINT.

  CALL FUNCTION ls_function
    EXPORTING
      /1BCDWB/DOCPARAMS = fp_docparams
      form_data         = gs_content
    IMPORTING
      /1BCDWB/FORMOUTPUT = fp_formoutput
    EXCEPTIONS
      usage_error       = 1
      system_error      = 2
      internal_error    = 3.

lv_pdf_binary = fp_formoutput-pdf.

ENDFORM.

Code:

FORM close_job.

  CALL FUNCTION 'FP_JOB_CLOSE'
    EXCEPTIONS
      usage_error    = 1
      system_error   = 2
      internal_error = 3
      OTHERS         = 4.
  IF sy-subrc <> 0.
    MESSAGE ID sy-msgid TYPE sy-msgty NUMBER sy-msgno
            WITH sy-msgv1 sy-msgv2 sy-msgv3 sy-msgv4.
  ENDIF.

ENDFORM.

weise

А если не заполнять "fp_outputparams-device = 'PRINTER'."?

Orgazm

То же самое

batusai

Orgazm написал:

То же самое

ФМ CONVERT_OTF.

А вообще все лучше на sdn.sap.com искать - там все есть и много реальных спецов.

weise

А без бинарника - печать и предпросмотр работают? Интерфейс формуляра соответвует gs_content?

Orgazm

Я же говорю - если тестировать сам фм печати - то он не работает с job_open и job_close, без них - все отлично.
А если тестировать этот фм вставленный в другую транзакцию, то он работает только с job_open и job_close.

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

Получить бинарник PDF

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