ABAP 学习笔记一


Abap 的主要工作。

一。 报表的开发。

二。单据的打印。

三。数据的开发

 

*&---------------------------------------------------------------------*
*& Report  YLWY001
*&
*&---------------------------------------------------------------------*
*&
*&
*&---------------------------------------------------------------------*

REPORT  YLWY001.
*WRITE MY 003 PROGAM.
*data wa like spfli.

*WRITE:    10 MAN,40 CONNECT, 60 COUNTRY CODE,80 START CITY,100 START PORT.
*          uline.
*          Select * into wa from spfli.

*WRITE:  / WA-Carrid under MAN,
*          WA-Connid under CONNECT,
*          WA-Countryfr under COUNTRY CODE,
*          WA-cityfrom UNDER START CITY,
*          WA-airpfrom UNDER START PORT.
*          endselect.
*      data mytb_spfli type table of spfli with  header line.
*      select * into table mytb_spfli from spfli package size 5.
*       *loop at mytb_spfli.
*       *write: / mytb_spfli-carrid, mytb_spfli-cityfrom,mytb_spfli-airpfrom.
*       *endloop.
*       *uline.
*       *endselect.


*       *data:begin of arcd,
*       *      carrid type spfli-carrid,
*       *      connid type spfli-connid,
*       * end of arcd.
*       * data arcd1 like arcd.
*      * select spfli~carrid spfli~connid into arcd1 from spfli
*       * inner join sflight on spfli~carrid = sflight~carrid up to 10 rows.
*       * write : / arcd1-carrid,arcd1-connid.
*       * endselect.


Tables spfli.
skip .
uline at /(106).
format color col_heading.
write :  / sy-vline,(15) man,sy-vline,(15) connect,sy-vline, (15) code,sy-vline, (15) start,
          sy-vline,(30) start port,sy-vline.
          uline at /(106).
 format color off.
    select * from spfli.
    write: / sy-vline,(15) spfli-carrid,sy-vline,(15) spfli-connid,sy-vline,(15) spfli-countryfr,
    sy-vline,(15) spfli-cityfrom,sy-vline,(30) spfli-airpfrom,sy-vline.
    uline at /(106).
    endselect.

 

  write *5.
  write /.
  start-of-selection.
  write please click.
  format hotspot on color 6 inverse on.
  write hot.
  format hotspot off color off.
  at line-selection.
  write welcome.