ABAP Code for Adobe Form Preview

最新推荐文章于 2024-05-16 16:29:40 发布

原创最新推荐文章于 2024-05-16 16:29:40 发布 · 1.8k 阅读

3 ·

CC 4.0 BY-SA版权

SAP Adobe Form 专栏收录该内容

5 篇文章

订阅专栏

本文提供了一个用于测试Adobe Form的简单代码实例，详细介绍了如何设置输出参数，包括设备、对话框、预览、连接类型等，并通过调用不同函数模块执行打开、操作和关闭任务。

Below is a simple code for test Adobe Form:

  fp_outputparams-device   = 'PRINTER'.
  fp_outputparams-nodialog = 'X'.
  fp_outputparams-preview  = 'X'.
  fp_outputparams-CONNECTION  = 'ADS'.
  fp_outputparams-ADSTRLEVEL  = '00'.
  fp_outputparams-BUMODE      = '-'.
  fp_outputparams-DATASET     = 'PBFORM'.
  fp_outputparams-DEST  = 'LP01'.

  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.
    WRITE /  'Error in FP_JOB_OPEN'.
  ENDIF.


  CALL FUNCTION 'FP_FUNCTION_MODULE_NAME'           
    EXPORTING
      i_name     = p_fpname
    IMPORTING
      e_funcname = fm_name.

  CALL FUNCTION fm_name
    EXPORTING
      /1bcdwb/docparams = fp_docparams
      iwa_header        = lwa_header
      it_item	        = lt_item
      iv_tc_flag        = space
    EXCEPTIONS
      usage_error       = 1
      system_error      = 2
      internal_error    = 3.
  IF sy-subrc <> 0.
    WRITE: /  'Error in', fm_name.
  ENDIF.

  CALL FUNCTION 'FP_JOB_CLOSE'
    EXCEPTIONS
      usage_error           = 1
      system_error          = 2
      internal_error        = 3
      OTHERS               = 4.
  IF sy-subrc <> 0.
    WRITE /  'Error in FP_JOB_CLOSE'.
  ENDIF.