OPEN DATASET (ファイル) FOR (アクセスタイプ) IN (格納タイプ). | ||||
FOR INPUT(読み取り専用) | IN TEXT MODE(テキストモード) | |||
FOR OUTPUT(書き込み専用) | ||||
FOR APPENDING(追加) |
テキストモードでないと「行構造」を持ったファイルとして扱うことができません。 | ||||
テキストモードで開く場合には、ENCODINGオプションを指定します。 | ||||
IN TEXT MODE ENCODING DEFAULT.
| なくても命令自体は成立しますが、ENCODINGオプションを利用しない場合、暗黙的に「NON-UNICODE」オプションが採用されるため、文字化けの原因となることが多いです。 | |||
DEFAULT ⇒Unicodeシステムの場合は、UTF-8オプションを指定した場合と同じ。 ⇒Unicodeシステムでない場合は、NON-UNICODEオプションを指定した場合と同じ。 UTF-8 NON-UNICODE |
接受返回的报错消息
メッセージの受け取り:MESSAGEオプション | |||
DATA MESS_TEST TYPE STRING.
| |||
OPEN DATASET FILE_PATH
| |||
FOR INPUT
| |||
IN BINARY MODE
| |||
MESSAGE MESS_TEST.
| |||
* 受け取ったメッセージの出力
| |||
IF SY-SUBRC <> 0.
| |||
MESSAGE MESS_TEST TYPE 'E'.
| |||
ENDIF.
|
循环将服务器的文件读取到本地 | ||||
WHILE SY-SUBRC = 0.
|
DO.
| |||
READ DATASET file INTO LS_file.
|
READ DATASET file INTO LS_file.
| |||
IF SY-SUBRC = 0.
|
" 最終行まで読み込んだら処理を抜ける
| |||
APPEND LS_FILE TO LT_FILE.
|
CASE SY-SUBRC.
| |||
CLEAR LS_FILE.
|
WHEN 0.
| |||
ELSE.
|
APPEND LS_file TO LT_file.
| |||
EXIT.
|
WHEN 4.
| |||
ENDIF.
|
EXIT.
| |||
ENDWHILE.
|
ENDCASE.
| |||
ENDDO.
|
-------------------------------------------------------------------------------------------------
相关函数
ARCHIVFILE_SERVER_TO_SERVER 文件移动(原理是复制+新建,需要删除原文件)