sap笔记Word文档下载推荐.docx

sap笔记Word文档下载推荐.docx

《sap笔记Word文档下载推荐.docx》由会员分享，可在线阅读，更多相关《sap笔记Word文档下载推荐.docx（40页珍藏版）》请在冰豆网上搜索。

TABLE（放到哪里去） 

g_tab

WHERE 

（条件）ZZCLASS 

= 

'

1A'

.

LOOP 

AT 

g_tab 

into 

g_wrk.

WRITE 

AAA'

ENDLOOP.

输出:

AAAAAAAAAAAAAAAAAA

1.TYPES:

g_typ_test,

g_typ_test.

type 

table 

of 

ZZTEST_T.

datA 

g_wrk 

select 

from 

where 

write 

/10（28） 

sy-uline.

/10 

sy-vline.

15 

g_wrk-ZZCLASS.

20 

23 

g_wrk-ZZSTDNO.

30 

33 

g_wrk-ZZTENKOK.

37 

带表格的

1AG1A0199

1AG1A0299

1AG1A0399

1AG1A0499

1AG1A0599

1AG1A0699

3.TYPES:

10（30） 

11 

ZZCLASS'

21 

ZZSTDNO'

31 

ZZTENKOK'

39 

/10（30） 

g_wrk-ZZSTDNO.

ZZCLASSZZSTDNOZZTENKOK

4.TYPES:

gg,

line1 

CHAR10,

LINE2 

CHAR3,

LINE3 

CHAR2,

gg.

g_wrk-line1 

01'

g_wrk-line2 

AA'

APPEND 

to 

g_tab.

02'

03'

/01 

g_wrk-line1.

10 

g_wrk-line2.

01AA

02AA

03AA

5.TYPES:

CC'

MODIFY 

FROM 

01CC

02CC

03CC

6.PARAMETERS:

WW 

CHAR10=ZZTEST_T-ZZCLASS.（如果我想查1A班的成绩,输入1A就能看到1班的成绩,需在select加条件）

TYPES:

G_TAB_TYP,

ZZTENSAN 

ZZTEST_T-ZZTENSAN,

ZZTENRIK 

ZZTEST_T-ZZTENRIK,

ZZTENSHA 

ZZTEST_T-ZZTENSHA,

G_TAB_TYP.

G_WRK 

AA 

ZZ_NAME 

ZZNUMBER_T-ZZNAME.

G_AA（3） 

C.

SELECT 

ZZCLASS

ZZSTDNO

ZZTENSAN

ZZTENRIK

ZZTENSHA

G_TAB

WW.（如果想单独查看1班的成绩，需要加此条件）

40 

成绩表'

/10（65） 

SY-ULINE.

SY-VLINE.

WRITE:

18 

19 

29 

41 

ZZTENSAN'

52 

53 

ZZTENRIK'

63 

64 

ZZTENSHA'

74 

G_WRK.

SINGLE 

ZZNAME

ZZNUMBER_T

ZZ_NAME

ZZNUMBER 

G_WRK-ZZSTDNO.

CONCATENATE 

G_WRK-ZZCLASS+0

（1）

-'

G_WRK-ZZCLASS+1

（1）

G_AA.

IF 

<

>

G_WRK-ZZCLASS.

G_WRK-ZZTENKOK.

G_WRK-ZZTENSAN.

G_WRK-ZZTENRIK.

G_WRK-ZZTENSHA.

ENDIF.

7. 

G_TAB.

ZZ_NAME.

TOP-OF-PAGE.

8.REPORT 

ZZREPO51_SHY1.

BB 

CHAR3.

FLG 

C,

data 

wrk 

zztest_t.

SELECTION-SCREEN 

BLOCK 

B1 

WITH 

FRAME 

TITLE 

TEXT-001.

SELECT-OPTIONS 

FOR 

BB.

B1.

B2 

TEXT-002.

LINE 

COMMENT 

1（30） 

TEXT-003.

PARAMETERS:

EE 

RADIOBUTTON 

GROUP 

JA.

LINE.

TEXT-004.

PARAMETERS 

FF 

TEXT-005.

GG 

TEXT-006.

PARAMETERS 

HH 

b2.

text 

char100.

count 

i.

INITIALIZATION.

USER-COMMAND.

lin 

i 

VALUE 

7.

SY-UCOMM 

SAVE'

do 

TIMES.

READ 

text.

if 

text+7

（1） 

X'

text+10

（1） 

text+12

（1） 

wrk-zzclass.

wrk-ZZSTDNO 

text+18（5）.

wrk-ZZTENKOK 

text+29（3）.

wrk-ZZTENSAN 

text+40（3）.

wrk-ZZTENRIK 

text+52（3）.

wrk-ZZTENSHA 

text+63（3）.

insert 

zztest_t 

VALUES 

wrk.

* 

sy-subrc 

0.

MESSAGE 

s000（00） 

Success~~~'

LEAVE 

LIST-PROCESSING.

else.

e000（00） 

error'

endif.

+ 

1.

ENDDO.

START-OF-SELECTION.

SET 

PF-STATUS 

DD'

CORRESPONDING 

FIELDS 

SORT 

BY 

zzstdno 

ASCENDING.

INITIAL 

TO 

DESCRIBE 

LINES 

count.

*SELECT 

SY-VL