字符串作业

DATA AONSA TYPE I VALUE 0.
  DATA AONOUT TYPE I VALUE 0.
  DATA AONRE TYPE I VALUE 0.
  DATA DI TYPE P DECIMALS 2 VALUE 2.
  DATA  DA TYPE P DECIMALS 2  VALUE 2.
TABLES: ZFF_DTPRO1.
TYPES:BEGIN OF TP.
           INCLUDE  TYPE ZFF_DTPRO1.
              TYPES  :   SAR    TYPE P DECIMALS 2,              "销售率
                 PROR  TYPE P DECIMALS 2,                          "生产率
              RER  TYPE  P DECIMALS 2,                              "研发率
             DAYPAY TYPE P DECIMALS 2,                          "每日应结工资
            END OF TP.



DATA   GT_TAB TYPE TABLE OF TP.
DATA   GS_TAB TYPE TP.

SELECT *
     FROM ZFF_DTPRO1
     INTO TABLE GT_TAB.



LOOP AT GT_TAB INTO  GS_TAB.
  IF SY-TABIX = 1.
WRITE: AT /1(121) SY-ULINE.
WRITE: AT /1(1)  SY-VLINE.
WRITE: AT  2(10)  '姓名'CENTERED.
WRITE: AT  12(1) SY-VLINE.
WRITE: AT  13(20)  'ID'CENTERED.
WRITE: AT  33(1) SY-VLINE.
WRITE: AT  34(10)  '员工编号'CENTERED.
WRITE: AT  44(1) SY-VLINE.
WRITE: AT  45(10)  '部门'CENTERED.
WRITE: AT  55(1) SY-VLINE.
WRITE: AT  56(10)  '入职日期'CENTERED.
WRITE: AT  66(1) SY-VLINE.
WRITE: AT  67(10)  '离职日期'CENTERED.
WRITE: AT  77(1) SY-VLINE.
WRITE: AT  78(10)  '当月薪酬'CENTERED.
WRITE: AT  88(1) SY-VLINE.
WRITE: AT  89(10)   '相关数量'CENTERED.
WRITE: AT  99