目前在学ABAP 语言,看到一个SELECT 语句(http://www.itpub.net/thread-772982-1-1.html),我进行了扩展,如下面所示,红字部分为我完善部分
*&---------------------------------------------------------------------*
*& ReportYAXXX
*
*&
*
*&---------------------------------------------------------------------*
*&
*
*&
*
*&---------------------------------------------------------------------*
REPORTYAXXX.
TABLES :MSEG,T024W,MKPF,LFM1,EKPO,EKKO .
DATA : P_EBELN LIKE MSEG-EBELN,
P_BUDAT LIKE MKPF-BUDAT,
P_BLDAT LIKE MKPF-BLDAT,
P_LIFNR LIKE MSEG-LIFNR .
DATA : BEGIN OF wa,
LFBNR LIKE MSEG-LFBNR,
LFPOS LIKE MSEG-LFPOS,
LIFNR LIKE MSEG-LIFNR,
EBELN LIKE MSEG-EBELN,
MENGE LIKE MSEG-MENGE,
GRUND LIKE MSEG-GRUND,
MBLNR LIKE MSEG-MBLNR,
EBELP LIKE MSEG-EBELP,
BWART LIKE MSEG-BWART,
ERFMG LIKE MSEG-ERFMG,
WAERS LIKE MSEG-WAERS,
SOBKZ LIKE MSEG-SOBKZ,
MJAHR LIKE MSEG-MJAHR,
ZEILE LIKE MSEG-ZEILE,
MATNR LIKE MSEG-MATNR,
MEINS LIKE MSEG-MEINS,
ERFME LIKE MSEG-ERFME,
KOSTL LIKE MSEG-KOSTL,
KOKRS LIKE MSEG-KOKRS,
EKORG LIKE T024W-EKORG,
BUDAT LIKE MKPF-BUDAT,
BLDAT LIKE MKPF-BLDAT,
EKGRP LIKE LFM1-EKGRP,
TXZ01 LIKE EKPO-TXZ01,
ADRNR LIKE EKKO-ADRNR,
END OF WA.
DATA IT_PRINT_001 LIKE TABLE OF WA .
SELECT-OPTIONSP_EBELN1 FOR MSEG-EBELN.
SELECT-OPTIONS P_BUDAT1FOR MKPF-BUDAT.
SELECT-OPTIONS P_BLDAT1 FOR MKPF-BLDAT.
SELECT-OPTIONS P_LIFNR1 FOR MSEG-LIFNR.
SELECT A~WERKS
A~LFBNR
A~LFPOS
A~LIFNR
A~EBELN
A~MENGE
A~GRUND
A~MBLNR
A~EBELP
A~BWART
A~ERFMG
A~GRUND
A~WAERS A~SOBKZ
A~MJAHR
A~ZEILE A~MATNR
A~MEINS "库存单位
A~ERFME "订购单位
A~KOSTL
A~KOKRS
B~EKORG
C~BUDAT
C~BLDAT
D~EKGRP
F~TXZ01
G~ADRNR "地址号码
INTO CORRESPONDING FIELDS OF TABLE IT_PRINT_001
FROM MSEG AS A
JOIN T024W AS B
ON A~WERKS = B~WERKS
JOIN MKPF AS C
ON A~MBLNR = C~MBLNR
AND A~MJAHR = C~MJAHR
JOIN LFM1 AS D
ON A~LIFNR = D~LIFNR
AND B~EKORG = D~EKORG
JOIN EKPO AS F
ON A~EBELN = F~EBELN
AND A~EBELP = F~EBELP
JOIN EKKO AS G
ON A~EBELN = G~EBELN
WHEREG~BSART = 'NO'
AND B~EKORG = '9000'
AND A~LIFNR IN P_LIFNR"供应商代码
AND A~EBELN IN P_EBELN
AND C~BUDAT IN P_BUDAT "日期
AND C~BLDAT IN P_BLDAT .
ENDSELECT
目前有两个问题
1.系统报错,如下
2. 个人感觉还应该有IF 判断语句 读取 SELECT--OPTION 里面的参数,从而进行输出,请入如何扩展
|