SAP Adobe Form 教程五 圖片

前文：

SAP Adobe Form 教程一 簡單示例

SAP Adobe Form 教程二 表

SAP Adobe Form 教程三 日期，時間，floating field

SAP Adobe Form 教程四 動態隱藏和顯示欄位

原文標題：SAP Adobe Interactive Form Tutorial. Part V. Images, Graphics and Logo in Adobe Forms

本文鏈接：https://www.cnblogs.com/hhelibeb/p/15512978.html

前提：需要通過SE78上傳圖片，

上傳完成后，請檢查確認圖片已經在系統中存在，

創建interface，

事務代碼SFP，

 在interface中添加一個IV_LOGO引數，型別為XSTRING,

創建form，

拖放引數IV_LOGO到Context，

在Context的YRAM_ADOBE_FORM5右擊，并且選擇create->graphic.

下一步很重要：把Graphic type從Graphic Reference改為Graphic content，

輸入欄位名IV_LOGO，選擇MIME TYPE為‘IMAGE/BMP’.

保存，并前往Layout的Data View標簽頁，拖放Graphic到layout，

可以根據需要拉伸或壓縮圖片，可能需要洗掉圖片標題，即默認影像欄位文本，

出于演示目的，我在圖片下方添加了另一個文本元素，

檢查、保存和激活，

帶有圖形和表單界面的Layout已經完成， 注意到了嗎，我們的Layout中有兩個元素，圖片欄位和圖形內容， 相當于變數名和實際內容，

呼叫adobe form的驅動程式，

  1 *&---------------------------------------------------------------------*
  2 *======================================================================*
  3 * YRAM_ADOBE_FORM_PROGRAM5 *
  4 *======================================================================*
  5 * Project : SAP Adobe Forms Tutorial *
  6 * Author : Ramanjula Naidu DARURU (www.SAPYard.com) *
  7 * Description : Printing a logo in the adobe form *
  8 *======================================================================*
  9 REPORT yram_adobe_form_program5.
 10 
 11 *======================================================================*
 12 * Selection Screen
 13 *======================================================================*
 14 PARAMETERS : p_logo TYPE rstxt-tdname.
 15 *======================================================================*
 16 * Data Objects
 17 *======================================================================*
 18 
 19 DATA: gv_fm_name TYPE rs38l_fnam, " FM Name
 20 gs_fp_docparams TYPE sfpdocparams,
 21 gs_fp_outputparams TYPE sfpoutputparams,
 22 gv_name TYPE tdobname,
 23 gv_logo TYPE xstring ,
 24 gv_bmp TYPE xstring.
 25 *======================================================================*
 26 * Constants
 27 *======================================================================*
 28 CONSTANTS : gc_btype TYPE tdbtype VALUE 'BCOL',
 29 gc_id TYPE tdidgr VALUE 'BMAP',
 30 gc_object TYPE tdobjectgr VALUE 'GRAPHICS',
 31 gv_form_name TYPE fpname VALUE 'YRAM_ADOBE_FORM5'.
 32 
 33 *======================================================================*
 34 * START of Calling the Form
 35 *======================================================================*
 36 *&---------------------------------------------------------------------*
 37 **&&~~ Form Processing: Call Form - Open
 38 *
 39 CALL FUNCTION 'FP_JOB_OPEN'
 40 CHANGING
 41 ie_outputparams = gs_fp_outputparams
 42 EXCEPTIONS
 43 cancel = 1
 44 usage_error = 2
 45 system_error = 3
 46 internal_error = 4
 47 OTHERS = 5.
 48 IF sy-subrc <> 0.
 49 " Suitable Error Handling
 50 ENDIF.
 51 *&---------------------------------------------------------------------*
 52 **&&~~ Get the Function module name based on Form Name
 53 *
 54 CALL FUNCTION 'FP_FUNCTION_MODULE_NAME'
 55 EXPORTING
 56 i_name = gv_form_name
 57 IMPORTING
 58 e_funcname = gv_fm_name.
 59 IF sy-subrc <> 0.
 60 " Suitable Error Handling
 61 ENDIF.
 62 
 63 *  Passing the logo name
 64 gv_name = p_logo.
 65 
 66 *  Get the image/logo graphic information
 67 CALL METHOD cl_ssf_xsf_utilities=>get_bds_graphic_as_bmp
 68 EXPORTING
 69 p_object = gc_object " GRAPHICS
 70 p_name = gv_name " Name of the Logo
 71 p_id = gc_id " BMAP
 72 p_btype = gc_btype " BCOL for color, 'BMON' for Black & White
 73 RECEIVING
 74 p_bmp = gv_bmp
 75 EXCEPTIONS
 76 not_found = 1
 77 internal_error = 2
 78 OTHERS = 3.
 79 
 80 gv_logo = gv_bmp.
 81 
 82 *&---------------------------------------------------------------------*
 83 **&&~~ Take the FM name by execuing the form - by using Pattern-
 84 **&&~~ call that FM and replace the FM Name by gv_fm_name
 85 **&&~~ Call the Generated FM
 86 CALL FUNCTION gv_fm_name
 87 EXPORTING
 88 /1bcdwb/docparams = gs_fp_docparams
 89 * iv_name = p_name
 90 * iv_flag = p_flag
 91 iv_logo = gv_logo
 92 EXCEPTIONS
 93 usage_error = 1
 94 system_error = 2
 95 internal_error = 3
 96 OTHERS = 4.
 97 IF sy-subrc <> 0.
 98 * Implement suitable error handling here
 99 ENDIF.
100 *&---------------------------------------------------------------------*
101 
102 *&---------------------------------------------------------------------*
103 *&---- Close the spool job
104 CALL FUNCTION 'FP_JOB_CLOSE'
105 EXCEPTIONS
106 usage_error = 1
107 system_error = 2
108 internal_error = 3
109 OTHERS = 4.
110 IF sy-subrc <> 0.
111 * <error handling>
112 ENDIF.

參考閱讀：如何上載PNG圖片到SAP系統內

標籤：其他

上一篇：SAP RETAIL 事務代碼RWBE查詢界面上的Plant Group

下一篇：如何通過Scrollintoview()查看組的第一個元素？