SAP ----アドビフォームの概要

ステップ

1：T-コード：SFP新しいインタフェース、変数とデータ表示するページの良い定義

2：T-コード：SFP新しいフォーム、インタフェースを確立するステップと関連します

3：レイアウト設計、レベル制御（階層）内のフォーム、オブジェクトのプロパティ、例えば、結合値としてパレットできる---->物体 - >に配置された内部結合。

    なお、デフォルトの管理ページの表示テキストを変更する方法を、以下のチェックボックスをオンにします。

call_adobe_form

  CALLの FUNCTION  ' FP_JOB_OPEN ' 
    CHANGING 
      ie_outputparamsは = fp_outputparams
     例外が
      キャンセル           = 1 
      USAGE_ERROR      = 2 
      SYSTEM_ERROR     = 3 
      INTERNAL_ERROR   = 4 
      OTHERS           = 5 。
  IF SY-SUBRC <> 0 。
  ENDIF。
  TRY.

      CALL FUNCTION 'FP_FUNCTION_MODULE_NAME'
        EXPORTING
          i_name     = form_name
        IMPORTING
          e_funcname = fm_name.
    CATCH cx_root INTO gv_w_cx_root.
      lv_mesg = gv_w_cx_root->get_text( ).
      MESSAGE lv_mesg TYPE 'E'.
  ENDTRY.
  CALL FUNCTION fm_name
    EXPORTING
      /1bcdwb/docparams  = fp_docparams
      zvbdka             = vbdka
      item               = it_items[]
      ship_to            = wa_ship_to
      sold_to            = wa_sold_to
      zuser              = usr03
      za_projnm          = g_za_projnm
      za_win_date        = g_za_win_date
      z_disc_tot         = v_disc_tot
**<<V08.00
      z_charges          = v_charges
**>>V08.00
      z_sum1             = v_sum1
      z_tax_rate         = tax_rate
      z_total_tax        = total_tax
      z_total            = v_total
      z_co_addr          = wa_salesorg
      z_country          = wa_country
      z_testdoc          = l_testdoc
      za_cust_nm         = gv_za_cust_nm           " V03.00
      za_cntrtno         = gv_za_cntrtno           " V03.00
      ztext01            = lw_ztext                " V05.00
      footer_obj         = lv_footerobjname        " V05.00
      footer_obj1        = lv_footerobjname1      " V06.00
      lang               = p_lan                   " V05.00
    IMPORTING
      /1bcdwb/formoutput = fp_form_output
    EXCEPTIONS
      usage_error
      =1
      system_error
      =2
      internal_error
      =3.
  IF sy-subrc <> 0.
*  <error handling>
    MESSAGE ID 'ZV_SAP1' TYPE 'E' NUMBER 999 WITH
       'Adobe function errored out; RC='(251) sy-subrc  ##TEXT_POOL.
  ENDIF.

  CALL FUNCTION 'FP_JOB_CLOSE'
    IMPORTING
      e_result       = fp_result
    EXCEPTIONS
      usage_error    = 1
      system_error   = 2
      internal_error = 3
      OTHERS         = 4.
  IF sy-subrc = 0.
    IF  nast-nacha = '7' OR ( nast-nacha = '5' AND nast-anzal = '0' )
                          OR p_mail = 'X'.
      PERFORM external_send_email.
    ELSEIF nast-nacha = 1 .
      retcode = 0.
    ENDIF.
  ELSE.
    MESSAGE ID 'ZV_SAP1' TYPE 'E' NUMBER 999 WITH
               'Job (spool) close failed; RC='(250) sy-subrc  ##TEXT_POOL.
  ENDIF.