程序说明: User Function REUSE_ALV_GRID_DISPLAY Show Screen data.
1. 有TO-OF-PAGE , 有Title 标题,有Logo
2. 有variant ,可根据ALV Layout Variant 自定义download 文件,跟显示的alv数据一样。
3. WS_Dowload
4. Open Dataset Download
*----------------------------------------------------------------------
*ProgramID/Name:ZW_ALV_SIMPLE_01DateWritten:201XXXXXX
*Author'sName:Lilo.ZhuLastUpdate:
*ProgramTitle:
*ProjectName:XXXX
*Version:1.0
*----------------------------------------------------------------------
*Description:(ASimpleALVProgramIntroductionALVCodingPart)
*----------------------------------------------------------------------
*ChangeHistory
*----------------------------------------------------------------------
*Date|Programmer|Corr.#|Description
*201XXXXXX|Lilo.Zhu||NewCreate
*|||
*|||
*-----------------------------------------------------------------------
REPORTZW_ALV_SIMPLE_01.
*------TYPE-POOLS------
TYPE-POOLS:SLIS.
*------TABLES------
TABLES:EKKO."PurchaseDocument
*------ALVCOMPLEMENT------
*->LAYOUT
DATA:S_LAYOUTTYPESLIS_LAYOUT_ALV.
*->FIELD
DATA:IT_FIELDCATTYPESLIS_T_FIELDCAT_ALV,
S_FIELDCATTYPESLIS_FIELDCAT_ALV.
*->EVENT
DATA:IT_EVENTTYPESLIS_T_EVENT,
S_EVENTTYPESLIS_ALV_EVENT.
*->TOPOFPAGETITLEINFORMATION
DATA:IT_LIST_TOP_OF_PAGETYPESLIS_T_LISTHEADER.
*->VARINAT
DATA:G_EXIT(1)TYPEC,
G_SAVE(1)TYPECVALUE'A',
GX_VARIANTLIKEDISVARIANT,
G_VARIANTLIKEDISVARIANT.
*------FORDISPLAYVARIANTUSAGE------
DATA:BEGINOFGT_ALV_FCOCCURS100,
FLD_NAME(30)TYPEC,
COL_POSTYPEI,
ENDOFGT_ALV_FC.
DATA:G_REPIDLIKESY-REPID.
DATA:I_FCOLTYPESY-TITLEOCCURS0WITHHEADERLINE,"FIELDNAME
G_SVFILELIKERLGRAP-FILENAME,"ServerPahtFilename
G_FILENAMELIKERLGRAP-FILENAME."physicalfilenameforOPENDS
*------DEFINEINNERTABLE------
TYPES:BEGINOFTP_TAB,
EBELNLIKEEKKO-EBELN,
BUKRSLIKEEKKO-BUKRS,
ENDOFTP_TAB.
DATA:IT_TABTYPETABLEOFTP_TABWITHHEADERLINE.
SELECTION-SCREENBEGINOFBLOCKB001WITHFRAMETITLETEXT-001.
PARAMETER:P_VARLIKEDISVARIANT-VARIANT.
SELECTION-SCREENENDOFBLOCKB001.
SELECTION-SCREENBEGINOFBLOCKB2WITHFRAMETITLETEXT-002.
PARAMETERS:P_ALVRADIOBUTTONGROUPR1DEFAULT'X'USER-COMMANDC1.
PARAMETERS:RB_WSDLRADIOBUTTONGROUPR1.
PARAMETERS:P_WSFILELIKERLGRAP-FILENAME
DEFAULT'C:\DATA\SO.TXT'.
PARAMETERS:RB_OPENRADIOBUTTONGROUPR1.
PARAMETERS:P_SVPATHLIKERLGRAP-FILENAME.
PARAMETERS:P_SVFILELIKERLGRAP-FILENAME.
SELECTION-SCREENENDOFBLOCKB2.
*------INITIALIZATION------
INITIALIZATION.
G_REPID=SY-REPID.
G_VARIANT-USERNAME=SY-UNAME.
PERFORMFRM_ALV_EVENT.
PERFORMFRM_VARIANT_INIT.
GX_VARIANT=G_VARIANT.
CALLFUNCTION'REUSE_ALV_VARIANT_DEFAULT_GET'
EXPORTING
I_SAVE=G_SAVE
CHANGING
CS_VARIANT=GX_VARIANT
EXCEPTIONS
NOT_FOUND=2.
IFSY-SUBRC=0.
P_VAR=GX_VARIANT-VARIANT.
ENDIF.
*------ATSELECTION-SCREEN------
ATSELECTION-SCREENONVALUE-REQUESTFORP_VAR.
CALLFUNCTION'REUSE_ALV_VARIANT_F4'
EXPORTING
IS_VARIANT=G_VARIANT
I_SAVE=G_SAVE
IMPORTING
E_EXIT=G_EXIT
ES_VARIANT=GX_VARIANT
EXCEPTIONS
NOT_FOUND=2.
IFSY-SUBRC=2.
MESSAGEIDSY-MSGIDTYPE'S'NUMBERSY-MSGNO
WITHSY-MSGV1SY-MSGV2SY-MSGV3SY-MSGV4.
ELSE.
IFG_EXIT=SPACE.
P_VAR=GX_VARIANT-VARIANT.
ENDIF.
ENDIF.
AtSelection-ScreenOnValue-RequestForP_WSFILE.
CallFunction'KD_GET_FILENAME_ON_F4'
Exporting
Mask='*.TXT'
Static='X'
Changing
File_Name=P_WSFILE.
*------START-OF-SELECTIN------
START-OF-SELECTION.
PERFORMFRM_GET_DATA.
PERFORMFRM_ALV_VAR_FIELDCAT."VARINATFIELDCAT
PERFORMFRM_VARIANT.
PERFORMFRM_ALV_LAYOUT.
PERFORMFRM_ALV_FIELDCAT.
IFP_ALV='X'.
*PERFORMFRM_GET_DATA.
*PERFORMFRM_ALV_VAR_FIELDCAT."VARINATFIELDCAT
PERFORMFRM_ALV_SHOW.
ELSEIFRB_WSDL='X'.
G_FILENAME=P_WSFILE.
PERFORMFORMATTING_FILE.
PERFORMWS_DOWNLOAD.
ELSEIFRB_OPEN='X'.
DATA:L_SUBRCLIKESY-SUBRC.
PERFORMEXPORT_FILE_TO_SERVERCHANGINGL_SUBRC.
IFL_SUBRCNE0.
MESSAGEE999(b1)WITH'Errorinexportingfile'.
ENDIF.
ENDIF.
*&---------------------------------------------------------------------*
*&FormFRM_ALV_LAYOUT
*&---------------------------------------------------------------------*
*text
*----------------------------------------------------------------------*
*-->p1text
*<--p2text
*----------------------------------------------------------------------*
FORMFRM_ALV_LAYOUT.
S_LAYOUT-ZEBRA=<
分享到:
相关推荐
ABAP ALV总结,ALV格式,REUSE_ALV_GRID_DISPLAY_LVC函数使用
REUSE_ALV_GRID_DISPLAY超详细讲解
ALV_GRID介绍, 不错的内容 一.ALV介绍 The ALV Grid Control (ALV = SAP List Viewer)是一个显示列表的灵活的工具,它提供了基本功能的列表操作,也可以通过自定义来进行增强,因此可以允许你可以在大型的应用程序中...
FALV - Fast ALV Grid
SAP ALV GRID介绍 The ALV Grid Control (ALV = SAP List Viewer)是一个显示列表的灵活的工具,它提供了基本功能的列表操作,也可以通过自定义来进行增强,因此可以允许你可以在大型的应用程序中使用.
5.1 TOP-OF-PAGE---------------------------------35 CHAPTER 3 GENERAL PROGRAMMING 14 3.1 BAPIS-----------------------------------------------14 CHAPTER 6 OBJECT PROGRAMMING 37 3.2 DIALOG PROGRAMMING---...
转自CSDN博客 Unplugged ALV 双击
The ALV Grid Control (ALV = SAP List Viewer)是一个显示列表的灵活的工具,它提供了基本功能的列表操作,也可以通过自定义来进行增强,因此可以允许你可以在大型的应用程序中使用
给ALV GRID定义下拉菜单 给ALV GRID定义下拉菜单
alv培训资料大全 含30页的WORD文档。 有图示例,非常全面 绝对是内部培训的经典教材。
ALV总结.doc很好的ALV,学习文件.我就靠它学会了ALV操作设计.我就靠它学会了ALV操作设计.我就靠它学会了ALV操作设计.我就靠它学会了ALV操作设计.我就靠它学会了ALV操作设计.我就靠它学会了ALV操作设计.我就靠它学会了...
SAP ALV Grid资料整理(很全面)本文引自CSDN 博客, Just For Learning Only !
"第一步,ALV结构和表的声明变量 TYPE-POOLS:slis. "alv用的的表 DATA lt_fieldcat TYPE slis_t_fieldcat_alv. " 储存fieldcat的内表,(字段清单) DATA wa_fieldcat TYPE slis_fieldcat_alv. " fieldcat 的工作区 ...
教育移动互联网时代的新兴业务SNS关注与分析-Alv.ppt
整理后的alv grid参考文档
FOR EVENT DATA_CHANGED OF CL_GUI_ALV_GRID IMPORTING ER_DATA_CHANGED. METHODS: UPDATE_DELTA_TABLES IMPORTING PR_DATA_CHANGED TYPE REF TO CL_ALV_CHANGED_DATA_PROTOCOL. METHODS: GET_DELETED_...
STDF_Extractor_2.41aLV.exe 是一个可以把STDF二进制数据解析出来并导出到Excel/JMP/MiniTab格式的工具,非常小巧好用。
ABAP Code Sample for ALV Grid from Dynamically Created Internal Table
OO-ALV的定义及调用 OO-ALV示例程序 面向对象编程(Object Oriented Programming,OOP,面向对象程序设计)是一种计算机编程架构。 基本概念: 1.对象(Object)是一个现实实体的抽象。一个对象可被认为是一个...
ALV从最开始的List Viewer发展到Grid control技术,屏幕更加精美。 LIST型的ALV列表与传统WRITE输出的列表样式更为相近,只是除标准菜单栏之外,在工具栏上还有许多功能按钮。 GRID型ALV列表比较类似EXCEL的...