ABAP往数据库表中增加一条记录

本文介绍了一个ABAP程序中如何创建并操作自定义表的过程。通过示例代码,演示了如何在表中增加一条记录,包括初始化数据、追加记录、修改表中数据等关键步骤。

背景:实现了一个对话框,然后增加一条记录

REPORT ZTESTJGL.

TABLES: ZTPPJING.

DATA:BEGIN OF GT_ALV OCCURS 0,
  AUFNR LIKE ZTPPJING-AUFNR ,
  END OF GT_ALV.

DATA:LT_BIAO TYPE ZTPPJING.
SELECTION-SCREEN BEGIN OF BLOCK BLK01 WITH FRAME TITLE TXT-001.
SELECT-OPTIONS:S_AUFNR FOR ZTPPJING-AUFNR.
SELECTION-SCREEN END OF BLOCK BLK01.

INITIALIZATION.
START-OF-SELECTION.
  PERFORM GET_DATA.
  PERFORM SHOW_DATA.
END-OF-SELECTION.
FORM GET_DATA .
  IF GT_ALV[] IS INITIAL.
    GT_ALV-AUFNR = '0000000001'.
    APPEND GT_ALV.
    CLEAR:GT_ALV.
  ENDIF.
  LOOP AT GT_ALV.
    MOVE-CORRESPONDING GT_ALV TO  LT_BIAO.
    MODIFY ZTPPJING FROM LT_BIAO.
    IF SY-SUBRC = 0.
      WRITE:LT_BIAO-AUFNR.
    ENDIF.
  ENDLOOP.

ENDFORM.                    " GET_DATA

FORM SHOW_DATA .

ENDFORM.                    " SHOW_DATA

总结:主要是建一个表,然后在表中增加一行数据。

评论
添加红包

请填写红包祝福语或标题

红包个数最小为10个

红包金额最低5元

当前余额3.43前往充值 >
需支付:10.00
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包
实付
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明:

1.余额是钱包充值的虚拟货币,按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载,可以购买VIP、付费专栏及课程。

余额充值