ABAP动态生成代码上传TXT数据

开发技术：
1.文本文件上载技术
2.动态程序代码生成技术
3.ABAP动态程序执行技术
4.TXT文本文件对应用Table字段编辑技术
 
注意事项：
文件文件编辑过程中时间日期格式为 20060201 120000 表示 2006.02.01 12：00：00
文本文件中不能包含除字符，数字之外的其他特殊符号。假如Table中对应的字段数据为空时，在编辑数据时也对应该列为空。
 
程序代码：如下
*&------------------------------------------------------------------*
*& Report  Z_CBO_ABAP_TXT
*&
*&------------------------------------------------------------------*
* 程序说明  Table数据Upload 程序 只能导入TXT
* 模块:版本
* 参考文档
* 应用顾问
* 程序开发  Z-HANS
* 开发日期  2011-02-24
*&------------------------------------------------------------------*
*&更改记录
*&日期          更改人     模块:版本    功能说明书
*&
*&
*&------------------------------------------------------------------*
REPORT Z_CBO_ABAP.

TABLES : dd03l,dd02t.
*-------------------------------------------------------------------*
*    内表
*-------------------------------------------------------------------*
DATA: BEGIN OF tab OCCURS 10,
        fcode(4),
      END OF tab.
DATA : BEGIN OF itab OCCURS 0,
        chk(1) TYPE c,                     " check box
        tabname    LIKE dd03l-tabname,     " Table name
        fieldname  LIKE dd03l-fieldname,   " Feld Name
        position   LIKE dd03l-position,    " Table
        keyflag    LIKE dd03l-keyflag,     " Primary Key
        datatype   LIKE dd03l-datatype,    " Data Type
        intlen     LIKE dd03l-leng,
       END OF itab.
DATA itab1 LIKE itab OCCURS 0 WITH HEADER LINE.
DATA : BEGIN OF uptab OCCURS 0,
*        text(72) TYPE c,