《SAP_ABAP学习实例讲解part3.docx》由会员分享,可在线阅读,更多相关《SAP_ABAP学习实例讲解part3.docx(53页珍藏版)》请在优知文库上搜索。
1、第八章A1.V控件的使用A1.V(SAP1.istViewer)控件是SAP业务中景常用的控件之一,本章先用一个简单的例子介貂用A1.V控件显示数据,再以实例方式介绍A1.Y的强大功能,例如程序可以直接使用.本章主要内容有:O离单的A1.V控件实例;O自定义输出字段的A1.Y控件实例:)在屏摹上建立A1.Y控件;O自定义A1.V控件的工具条按钮:O处理A1.V控件双击事件:O通过A1.V控仲编辑内表和数据库更斫;OA1.VTree的使用。8.1 简单的A1.V控件实例以航班表Cty(NX12C1.tTF1.AtTiBeIDomzcJUtivU019XbceIIn即ceWfTJICXSCOrvw
2、x11UMKPWT11un11P0三PWKTOKTOB011uxrRTrcvwKEVYCXmYCwC3AVFTAMCISCOTOKYORUIKrcRTrvjrvInRTWKfwjkfurt11uk11rtBEF1.IVrFirwKCTwMJrFPAjrcncoMEVTOMCBAIKToTKVTOKIai1.Tunc11三三11FTTOKYOMItt0AUISVTUMt11SA三11FTrAin*sjjtFpaicijcowoarvjmFTOKTOIEIfTUW汴AwmTKVTOMtWP1.:reJBJWTMEVTUW11*JFTOT6J01S:217:“?1.247:24Z1.OS12:SS1
3、5:4013:3S7:247247:“613S:2512:05I1.1.1.S7:247:U7:351:0$HOS7:247SSz.sn$ie6U212:0011:450000IOj35:0019:01:20IO1.360019:35:0017:U:0010:00:0013:30:002O25OO10:10:00IB:30:0013:30:0010:30:000?!IO1.OO12:31:202305:0000:39:0019US:OO08:10:0010:43:2023:06:4009:30:0020:37:0018:25:0017:33:001S40i0011:34:0007:45x001
4、5:05:0011:33:00081.IS1.OO01:02:0013:30:00e.iM%】x60Wc.1.6,K23.6U2S72z.sn9.1.9AW6K26K26.U2.s1.X.K8-1.8.2自定义输出字段的A1.V控件实例cm2)REPORTYTEST27.*A1.Y使用到的类库TYPE-PoO1.S:S1.IS.* -列描述DATAIAA1.VFIE1.DTYPES1.ISFIE1.DCATA1.V.* 列描述内表,列清单DATAWA_A1.V_FIE1.DCATTYPES1.ISTFIEI.DCT1.V.碇义内展DATAWASPF1.I1.IKETAB1.EOFSPF1.IW
5、ITHHEADER1.INE.* 内表就值SE1.ECT*INTOTAB1.EWA_SPF1.IFROMSPF1.I.*定义第一到第四个字段=,CARRID.=航线承运人.WAA1.VFIE1.DCAT.WA_A1.V_FIE1.D-CO1._POS=iA_A1.Y_FIE1.D-EIE1.DNAMEWA_A1.V_FIE1.D-SE1.TEXTMAPPENDWAA1.VFIE1.DTOWA_A1.V_FIE1.D-CO1._POS=2.IA_A1.V_FIE1.D-nE1.DNAME=,CONNID.RAA1.VFIE1.D-SE1.TEXTM=航班连接.APPENDIAA1.VFIE1.D
6、TOWAA1.VFIE1.DCAT.WA_A1.V_FIE1.D-CO1.POS=3.WA_A1.V_FIE1.D-FIEI.DNAME=CITYROM.IAA1.VFIE1.D-SE1.TEXTM=起飞城市.APPENDWA_A1.VFIE1.DTOWA_A1.VFIEI.DCAT.IA_A1.V_FIE1.D-COI._POS=4.HAA1.VFIE1.D-FIE1.DNAME=,CITYTO,.IA_A1.V_FIEU-SE1.TEXT_M=目标城市.APPENDRR-A1.VFIE1.DTOWAA1.VFIEI.DCAT.*调用A1.Y显示表单数据CA1.1.FUNCTIONREUSE
7、_A1.V_1.1STDISP1.AYEXPORTING今I_INTERFACE_CIIECK-*IBYPASSINGBUFFER=1.BUFreMenyE=*1.CRU上AChPRoGRAM-*I.CA1.1.BACKJ1.STATUS.SET;*ICA1.1.BACKUSERCOMMAND-*1.structiikename=IS_YOUT=IT_FIE1.DCAT=WA_A1.V_FIE1.DCATITEXC1.UDING=*IT_SPECIA1._GR(MJPS=*IT_SORT=IT_EI1.TER三IS-SE1.HIDE=1.defaii1.t=,x,*1.SAYE-.IS-VAR
8、IANT三ITEVENTS=*I1.EYENT_EXIT=IS_PRINT=拿IS_REPREP_ID三ISCREENSTARTCO1.UMN=O1.SCREEN_STAK1.1.INE=O1.SCREEN_ENDg1.UMN=O今1.SCREEt1.ENDJ1.INE=OIMIjORTINGE_EXIT_CAISED_BY_CA1.1.ER=ES_EXIT工AUSED_BYUSER=TAB1.ESTOUTTAB=WASPF1.IEXCEPT1.SiS*PRoGRAMERROROTHERSIFSY-SUBRCO0.MESSAGEIDSY-MSGIDTYPESY-MSGTYNUMBERSY-MS
9、GNO*WITHSY-MSGV1.SY-MSGV2SY-MSGV3SY-MSGV4.ExD1.F.输出结果如图8-2所示。1.XtFdt3tS1.1.)0DIMaaO0QQ11CJ3同YTEsT27口e&v冬Qi等mBH.m柘ImffIIAAAAAAABAFAZAZAZAZBABAD1.D1.D1.J1.J1.1.H1.H1.H1.H1.H1.H1.HMETYORKSAIFRAKCIHETYORKF1.m1.FURTFR5KFUR7RCCRCOTCeTOECtrT三tPi14金(TZnG)Ei)ttte)In1.1.It1.”,)tavrr*4.tCO)U1.p(DUe)(900。Qt%)於心
10、/CU0JS114FIBUeAttrtUtes4n*A1.V上A1.V右XCanCeIjS8-38.3.2 定义逻辑流逻辑流程序:* 逻辑流* PBO显示屏臬前的处理PROCESSBEFOREOUTPUT.MODU1.ESTATUS_O100.* PRI用户粕入后防处理PROCESSAFTERINPUT.MODU1.EUSER_COMMA他0100.主程序:REPORTYTEST28.* 功能码返回值DATA:OK_CODETYPESY-UCOMM.SAVE-OKTYPESY-UCOMM.* 定义内表,变量需要传递,不加HEADER1.INEDATA牝SPF1.1.TYPETAB1.EOFSP
11、F1.I.* 内表赋值SE1.ECT*INTOTAB1.EWA-SPHJEROMSPF1.I.*A1.VDTA是屏臬100中定义控制控件的名称DATA:WACONTAINERTYPESCRFNAMEVA1.UEA1.VDATA,A1.JGRIDTYPEREFTOC1.GU1.A1.V_GR1.D.ffA_OJSTOM.CONTAINERTYPEREETOC1.GUICUSTOMCONTAINER. 直接调点窗口CA1.1.SCREEN100.& &Modu1.eSTATUSJnoOOUTPUTtextMODU1.ESTATUSO100OUTPUT.SETPF-STAT1.S,STATUS. 如果交口还没有创立A1.V对象则创立它IFWA_CUSTOM,CONTAINERISINITIA1.CREATEOBJECTWA_CUSTOMCONTAINEREXPORTI