ABPA 对文件的存取

*------------------内部数据另存为文件------------------
*DATA: BEGIN OF MAN,
*      NAME(20) TYPE C,
*      HIGH     TYPE P DECIMALS 2,
*      WEIGHT   TYPE P DECIMALS 2,
*      END OF MAN.
*DATA: MAN1 LIKE TABLE OF MAN.
*DATA: NAME TYPE RLGRAP-FILENAME ,TYPA TYPE RLGRAP-FILETYPE.
*      MAN-NAME = '张参'.
*      MAN-HIGH = '1.68'.
*      MAN-WEIGHT = '120'.
*      INSERT MAN INTO TABLE MAN1.
*      MAN-NAME = '刘志'.
*      MAN-HIGH = '1.78'.
*      MAN-WEIGHT = '160'.
*      INSERT MAN INTO TABLE MAN1.
*
*      NAME = 'C:/TEMP/TESTA.TXT'.
*      TYPA = 'DAT'.
*
*      CALL FUNCTION 'DOWNLOAD'
*      EXPORTING
*      CODEPAGE = 'TESTA'
*      FILENAME = NAME
*      FILETYPE = TYPA
*      ITEM      = '文件测试'
*      TABLES
*      DATA_TAB = MAN1
*      EXCEPTIONS
*      INVALID_FILESIZE = 1
*      INVALID_TABLE_WIDTH = 2
*      INVALID_TYPE = 3
*      NO_BATCH = 4
*      UNKONOWN_ERROR = 5
*      GUI_REFUSE_FILETRANSFER = 6
*      OTHERS    = 7.
*------------------直接读入文件------------------
DATA: BEGIN OF MAN,
      NAME(20) TYPE C,
      HIGH     TYPE P DECIMALS 2,
      WEIGHT   TYPE P DECIMALS 2,
      END OF MAN.
DATA: MAN1 LIKE TABLE OF MAN.
*------------------直接读入文件------------------
*      CALL FUNCTION 'UPLOAD'.
*------------------不使用提示框提示直接读入文件------------------
      CALL FUNCTION 'WS_UPLOAD'
      EXPORTING
      CODEPAGE = 'TESTA'
      FILENAME = 'C:/TEMP/TESTA.TXT'
      FILETYPE = 'DAT'
      ITEM      = '读放文件'
      TABLES
      DATA_TAB = MAN1
      EXCEPTIONS
      INVALID_FILESIZE = 1
      INVALID_TABLE_WIDTH = 2
      INVALID_TYPE = 3
      NO_BATCH = 4
      UNKONOWN_ERROR = 5
      GUI_REFUSE_FILETRANSFER = 6
      OTHERS    = 7.
      LOOP AT MAN1 INTO MAN.
      WRITE: / MAN-NAME , MAN-HIGH , MAN-WEIGHT.
      ENDLOOP.

ABPA 对文件的存取相关推荐

计算机系统基础：文件的存取和存储空间管理知识笔记
1.文件的存取文件的存取实际上就是针对文件存储器上物理块的读写操作.存取方法主要有顺序存储.随机存储两种. 2.文件存储空间管理磁盘分配表:外存空闲空间管理的数据结构. 2.1 空闲空间管理方法 ...
.npy文件_Numpy库使用入门（六）文件的存取
ERNIE:BERT,你看到我的npy了吗,我记得我放在这个文件夹里的呀(」><)」 BERT:就你还有npy?我还单着呢￣へ￣ ERNIE:你想什么呢?我指的是numpy储存数据的文件的 ...
properties文件的存取,追加存取
最近在写程序的时候,需要存些临时的数据信息,但是又不想存在数据库中.所以就存在磁盘上的某个文件中.存取的格式为properties 该代码在存取properties的时候,是追加存取. import ...
VB/VBA中实现数据库与文件的存取
编程完成数据库与文件的数据相互存取 'VB/VBA中实现数据库中的文件存取 '示例数据库为ACCESS数据库,用SQL数据库的话,只需要改连接字符串 ' '********************** ...
VC中TXT文件的存取
在日常编程中我们经常需要读写TXT格式的文本文件,本人通过上网查找资料,结合自己的编程经验,给出一个简单的处理方法,写出来供大家参考,写的不对的地方希望大家批评指正. 我主要是利用了CStdioFil ...
ios开发值json数据文件的存取
将Json存进本地文件夹 NSArray *paths=NSSearchPathForDirectoriesInDomains(NSDocumentDirectory, NSUserDomainMas ...
ios开发 json数据文件的存取
将Json存进本地文件夹 NSArray *paths=NSSearchPathForDirectoriesInDomains(NSDocumentDirectory, NSUserDomainMas ...
在maven项目结构下对于Resources目录下文件的存取
在maven项目中,文件结构如下: proj---src----main ----java ----Main.java ----resources ----userFile.properties -- ...
C语言实现链表与文件的存取
作者:柠檬i,学习C时长两个月半的个人练习生第一次写文章,难免有些不足,请多多包涵. 本程序主要功能是建立链表,然后把链表数据存储到文件中,然后把文件数据存储到数组中并输出. 不多说了,放代码. 此 ...

ABPA 对文件的存取

ABPA 对文件的存取相关推荐

最新文章

热门文章