In the previous blog we discuss how to generate QRCode to enable it be scanned via mobile phone.
In that solution, the QRCode is generated and stored in a PDF file via ABAP webdynpro framework, we only provide the form template. In fact it is quite easy to adapt the solution to generate the PDF by ourselves, so that the QRCode could be used more flexibly in many other scenario for example as an attachment of email.
Note: it is still necessary to create a form interface and form template as described in the blog.
The report source code is below:
PARAMETERS: content TYPE string.
DATA:
ls_outputparams TYPE sfpoutputparams,
ls_docparams TYPE sfpdocparams,
ls_pdf_file TYPE fpformoutput,
ls_post TYPE crmd_soc_post,
lv_fm_name TYPE rs38l_fnam.
ls_outputparams-noprint = 'X'.
ls_outputparams-nopributt = 'X'.
ls_outputparams-noarchive = 'X'.
ls_outputparams-nodialog = 'X'.
ls_outputparams-preview = 'X'.
ls_outputparams-getpdf = 'X'.
CALL FUNCTION 'FP_JOB_OPEN'
CHANGING
ie_outputparams = ls_outputparams
EXCEPTIONS
cancel = 1
usage_error = 2
system_error = 3
internal_error = 4
OTHERS = 5.
CHECK sy-subrc = 0.
TRY.
CALL FUNCTION 'FP_FUNCTION_MODULE_NAME'
EXPORTING
i_name = 'ZPF_QRCODE' " put your own form template name here
IMPORTING
e_funcname = lv_fm_name.
CATCH cx_fp_api_repository
cx_fp_api_usage
cx_fp_api_internal.
RETURN.
ENDTRY.
ls_docparams-langu = 'E'.
ls_docparams-country = 'US'.
CALL FUNCTION lv_fm_name
EXPORTING
/1bcdwb/docparams = ls_docparams
qrcode_input = content
IMPORTING
/1bcdwb/formoutput = ls_pdf_file
EXCEPTIONS
usage_error = 1
system_error = 2
internal_error = 3
OTHERS = 4.
CHECK sy-subrc = 0.
CALL FUNCTION 'FP_JOB_CLOSE'
EXCEPTIONS
usage_error = 1
system_error = 2
internal_error = 3
OTHERS = 4.
execute the report, the PDF binary is stored in ls_pdf_file-pdf.
It could be scanned by the QRCode scanner installed in my mobile phone:
要获取更多Jerry的原创文章,请关注公众号"汪子熙":