程序代码: REPORT ZTEST_ZNT13 . DATA: G_CONTAINER TYPE REF TO CL_GUI_CUSTOM_CONTAINER, G_VIEWER TYPE REF TO I_OI_DOCUMENT_VIEWER. PARAMETERS: P_URL TYPE CHAR200 OBLIGATORY. CALL SCREEN 100. *&---------------------------------------------------------------------* *& Module STATUS_1000 OUTPUT *&---------------------------------------------------------------------* * text *----------------------------------------------------------------------* MODULE STATUS_1000 OUTPUT. SET PF-STATUS '0100'. SET TITLEBAR '010'. IF G_CONTAINER IS INITIAL. * 创建控件容器 CREATE OBJECT G_CONTAINER EXPORTING CONTAINER_NAME = 'CONTAINER'. * 指定文档浏览器接口 CALL METHOD C_OI_CONTAINER_CONTROL_CREATOR=>GET_DOCUMENT_VIEWER IMPORTING VIEWER = G_VIEWER. * 初始化文档浏览器 CALL METHOD G_VIEWER->INIT_VIEWER EXPO