abap报表编程模板.doc

ABAP/4 报表编程模板 *** Report ?Z_X_XXXXX ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? * Module ? ? ? ? ? ? ? ? ? : ?Module \ SubModule ? ? ? ? ? ? ? ? ? ? ?*** Created ? ? ? ? ? ? ? ? ?: ?author ?(2003.10.09) ? ? ? ? ? ? ? ? ? ?* Modified ? ? ? ? ? ? ? ? : ?author ?(someday) ? ? ? ? ? ? ? ? ? ? ? * ?Intention ? ? ? ? ? ? ? ?: ?程序的详细说明 ? ? ? ? ? ? ? ? ? ? ? ? ?* ?请用户在ABAP/4 REPORT编程时，参考本程序提供的编程框架 ? ? ? ? ? ? ? * ? ? ? ? ? ? ? ? ? ? ? ?* ?在编码规范有出入时，以本程序为准* ?以下各事件可根据实际编程需要使用，对于需要处理的事件，可将该事* ?件后面的语句注释去掉，再编写相应的子程序代码。**INCLUDE Z_X_XXXXXTOP . ? ? ? ? ? TOP 子程序，用来声明全局变量*以下三个子程序只有在多个程序调用同一逻辑时才建议使用**INCLUDE Z_X_XXXXXO01 . ? ? ? ? ? ? ? PBO 子程序*INCLUDE Z_X_XXXXXI01 . ? ? ? ? ? ? ? PAI 子程序*INCLUDE Z_X_XXXXXF01 . ? ? ? ? ? ? ? form 子程序INITIALIZATION.* ?PERform ?INI_SELECTION_SCREEN. ? ? ? 初始化选择屏上的变量AT SELECTION-SCREEN.* ?PERform ?INI_DATA. ? ? ? ? ? ? ? ? ? 初始化全局变量START-OF-SELECTION.* ?PERform ?PRECESS_DATA. ? ? ? ? ? ? ? 主要数据处理逻辑AT LINE-SELECTION.* ?PERform ?PRECESS_LINE_SELECTED. ? ? ? 行选择时的处理AT USER-COMMAND.* ?PERform ?PRECESS_USER_COMMAND. ? ? ?* 用自定义命令按钮时的处理TOP-OF.* ?PERform ?PAGE_HEADER. ? ? ? ? ? ? ? ? 页眉END-OF.* ?PERform ?PAGE_FOOT. ? ? ? ? ? ? ? ? ? 页脚*** ? ? ?form ?PRECESS_DATA*** ???text*** ?- 爌1 ???爐ext* ?-- 爌2 ???爐ext**form PRECESS_DATA.*如果逻辑简单, 则合并若干form为一个?PERform ?SEL_DBTAB_XXXXX. ? 从透明表中取数据赋给内表?PERform ?CMP_ITAB_XXXXX. ? ? 内表中数据计算处理?PERform ?WRT_ITAB_RESULT. ? 输出内表数据ENDform. ? ? ? ? ? ? ? ? ? ? PRECESS_DATA*** ??爁orm 燬EL_DBTAB_XXXXX*** ???text*** ?- 爌1 ???爐ext* ?-- 爌2 ???爐ext**form SEL_DBTAB_XXXXX.select * into corresponding fields of itab_sales????from bsid????where bukrs = s_bukrs.??authority-check object Z:FI-00001???爄d ACTVT field 03???爄d BUKRS field itab_sales-bukrs? ? ? ?id GSBER field itab_sales-gsber. ? 权限检查if sy-subrc ne 0. ? ? ? ? ? ? ? ? ? ? ? ? ? ?权限检查未通过continue.endif.append itab_sales.clear itab_sales.endsele