壹佰网|ERP100 - 企业信息化知识门户

 找回密码
 注册

QQ登录

只需一步,快速开始

查看: 620|回复: 0

[FI] 功能office integration, 可以以嵌入的excel来显示报表内容

[复制链接]
发表于 2012/7/27 16:43:26 | 显示全部楼层 |阅读模式

马上注册,结交更多好友,享用更多功能,让你轻松玩转社区。如果您注册时有任何问题请联系客服QQ: 83569622  。

您需要 登录 才可以下载或查看,没有帐号?注册

x

利用report paint生成的SAP标准报表,有个功能office integration, 可以嵌入的excel来显示报表内容,我现在自己做了一个alv报表,能否把这个功能加进来?

FORM user_command USING rf_ucomm    LIKE sy-ucomm
                       rs_selfieldTYPEslis_selfield. '#EC CALLED

  DATA: L_DOCUMENT_TYPE TYPE SOI_DOCUMENT_TYPE,
        L_SUBRC         TYPE SYSUBRC.

  CASE rf_ucomm.

    WHEN 'ISET'.

       CALL FUNCTION 'G_RW_OI_CALL_SCREEN'
         EXPORTING
              i_cb_program = 'SAPFGRWE'.

       PERFORM OI_EV_PAI_USER_COMMAND IN PROGRAM (G_PROGRAM)
                            CHANGINGRF_UCOMM
                                     L_SUBRC.

        IF L_SUBRC GT 0.
*          PERFORM DESTROY_CONTROL
*                  CHANGING C_CONTAINER
*                          C_CONTROL.
          SET SCREEN 0.
          LEAVE SCREEN.
        ENDIF.

        CLEAR rf_UCOMM.

        CALL FUNCTION 'G_RW_OI_DOCUMENT_TYPE_GET'
             IMPORTING
                 E_DOCUMENT_TYPE     =L_DOCUMENT_TYPE
             EXCEPTIONS
                  NO_DOCUMENT_TYPE_SET = 1.
        IF SY-SUBRC EQ 0.
*         IFNOTC_NO_CONTROLISINITIALAND             'INS496641
*            CL_GUI_OBJECT=>WWW_ACTIVEISINITIAL.       'INS 496641
**           Switch to office control
*            CLEAR C_NO_CONTROL.
*            LEAVE LIST-PROCESSING.
*          ENDIF.
*        ELSE.
*          IF C_NO_CONTROL IS INITIAL.
**           Switch to list processing (at next PBO)
*            C_NO_CONTROL = 'X'.
*          ENDIF.
        ENDIF.
  ENDCASE.

但是会出现abapdown,  因为下面的TABLE r中没有值, 我看过标准程序,里面保存的是与report paint有关的信息,但利用alv生成的报表,没有这些信息,是不是只有report paint生成的报表,才能前如此功能(Office integration),多谢!!

下面是abapdown的一些信息:
Information on where termination occurred


The termination occurred in the ABAP program "SAPFGRWE " in
"F98_RW_OUTPUT_REPORT".
The main program was "ZALVSUBTT001 ".

The termination occurred in line 52 of the source code of the (Include)
program "FGRWEF98C_F98_RW_OUTPUT_REPORT "
of the source code of program "FGRWEF98C_F98_RW_OUTPUT_REPORT " (when calling
the editor 520).

Source code extract


000220                p_page_f       TYPE i
000230                p_page_t       TYPE i
000240                p_col_page_f   TYPE i
000250                p_col_page_t   TYPE i
000260        CHANGING p_subrc        LIKE sy-subrc.
000270
000280     DATA: l_s_out_params   TYPE grwte_s_out_params,
000290          l_s_layout       TYPE grwte_s_layout,
000300          l_t_params       TYPE grwte_t_params,
000310           l_refresh_list   TYPE c,
000320          l_msgty          TYPEsmesg-msgty,
000330          l_subrc          LIKEsy-subrc,
000340          l_count          TYPE i.
000350
000360     DATA: l_s_gcur         TYPE grwte_s_gcur,
000370           l_scroll_s_sy    TYPE syst,
000380           l_scroll_s_lcur  TYPE grwte_s_lcur.
000390
000400     FIELD-SYMBOLS: <l_sx_report>     TYPE grwte_sx_report,
000410                   <l_sx_var_report> TYPE grwte_sx_var_report.
000420
000430   *....... initializations .....................................
000440     l_s_gcur        = g_s_gcur.
000450     l_scroll_s_sy   = sy.
000460     l_scroll_s_lcur = g_s_lcur.
000470
000480     CLEAR: g_x_preof, stat-ppage, stat-rpage.
000490
000500   *....... read R .......................................................
000510     READ TABLE r INDEX p_index.
     >     IF sy-subrc <> 0. MESSAGE x214. ENDIF.
000530
000540   *....... set output parameters ........................................
000550     PERFORM f98_set_params USING    p_out_params
000560                                    p_dialog
000570                                    p_x_pageview
000580                                    r
000590                                    p_page_f


该贴已经同步到 xiaoerp的微博
您需要登录后才可以回帖 登录 | 注册

本版积分规则

QQ|Archiver|小黑屋|手机版|壹佰网 ERP100 ( 京ICP备19053597号-2 )

Copyright © 2005-2012 北京海之大网络技术有限责任公司 服务器托管由互联互通
手机:13911575376
网站技术点击发送消息给对方83569622   广告&合作 点击发送消息给对方27675401   点击发送消息给对方634043306   咨询及人才点击发送消息给对方138011526

GMT+8, 2025/11/29 03:38 , Processed in 0.021613 second(s), 18 queries , File On.

Powered by Discuz! X3.4

Copyright © 2001-2020, Tencent Cloud.

快速回复 返回顶部 返回列表