资源描述:
《sap_abap采购订单报表》由会员上传分享,免费在线阅读,更多相关内容在教育资源-天天文库。
1、*&---------------------------------------------------------------------**&ReportZMM_TEST01*&Author:杨路*&---------------------------------------------------------------------**&*&*&---------------------------------------------------------------------*REPORTZMM_TEST01.T
2、ABLES:EKKO,EKPO,EKET,MAKT.TYPE-POOLS:SLIS."类似.net引入命名空间*-----------------------------------------------------------------------**Definetypes*-----------------------------------------------------------------------*TYPES:BEGINOFTYP_LIST,BUKRSTYPEEKKO-BUKRS,EKORGTYPEEKK
3、O-EKORG,EKGRPTYPEEKKO-EKGRP,EBELNTYPEEKKO-EBELN,EBELPTYPEEKPO-EBELP,MATNRTYPEMAKT-MATNR,MAKTXTYPEMAKT-MAKTX,MENGETYPEEKPO-MENGE,MEINSTYPEEKPO-MEINS,NETPRTYPEEKPO-NETPR,WAERSTYPEEKKO-WAERS,EINDTTYPEEKET-EINDT,ENDOFTYP_LIST.*--------------------------------------------
4、---------------------------**Definedata*-----------------------------------------------------------------------*DATA:GTD_DATATYPESTANDARDTABLEOFTYP_LIST,GTH_DATATYPETYP_LIST.DATA:GTD_TITLETYPESLIS_T_LISTHEADER,GTH_TITLETYPESLIS_LISTHEADER.DATA:GTD_FIELDCATTYPESLIS_T_
5、FIELDCAT_ALV,GTH_FIELDCATTYPESLIS_FIELDCAT_ALV.DATA:GTH_LAYOUTTYPESLIS_LAYOUT_ALV.DATA:GD_SPRASTYPESPRAS.dataP_DATUMtyped.*--------------------------------------------------------------------------**selection-screen*---------------------------------------------------
6、-----------------------*SELECTION-SCREENBEGINOFBLOCKB1WITHFRAMETITLETEXT-001.SELECT-OPTIONS:S_LLIEFFOREKKO-LLIEF,S_EBELNFOREKKO-EBELN,S_MATNRFOREKPO-MATNR,S_AEDATforEKKO-AEDATOBLIGATORY.SELECTION-SCREENENDOFBLOCKB1.INITIALIZATION.P_DATUM=sy-datum.P_DATUM+6(2)='01'.P_
7、DATUM=P_DATUM.S_AEDAT-low=P_DATUM.S_AEDAT-high=sy-datum.APPENDS_AEDAT.*----------------------------------------------------------------------**START-OF-SELECTION*----------------------------------------------------------------------*START-OF-SELECTION.PERFORMSUB_GET_
8、DATA.PERFORMSUB_DISPLAY.PERFORMSUB_CLEAR.*&---------------------------------------------------------------------**&FormSUB_GET_DATA