($title_img_alt)

こちらからの投稿は、先頭に表示されているコメントへの返信になります。
RE:AS400でFTP GTEで文字欠落 AS400こまったさん さん [ 1月23日(木) 22時22分 ]
IKDさんご教授ありがとうございます。
WRKLNKでCCSIDを943に変更したところ"ABCテスト"と表示されること確認出来ました。

"ABCテスト"と確認できたので
CPYFRMIMPF FROMSTMF('/FTPDTA/FTPAS.CSV') TOFILE(QS36F/M01184P) MBROPT(*REPLACE) RCDDLM(*CRLF) FROMRCD(1) ERRRCDOPT(*REPLACE) RPLNULLVAL(*FLDDFT)
とコピーコマンドを実行したところ
6464 レコードがメンバー M01184P にコピーされました 
エラーのために,コピー・コマンドが終了した。
とエラーが出ました。
WRKLNKで件数を確認したところ受信データが6469件ありました。

今回の最終目標としては、
CLプログラム内で自動でPCからデータ取得しAS400のファイルにコピーしたいのです。
当方でカタカナ等を含まないデータは、下記のロジックで問題なく出来ました。
FTP ? ? ? ?RMTSYS(&IPA) ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ?
CPYFRMIMPF FROMSTMF('/FTPDTA/FTPAS.CSV') + ? ? ? ? ? ? 
? ? ? ? ? ? ?TOFILE(&LIBN/&ASFL) MBROPT(*REPLACE) + ? ? ? 
? ? ? ? ? ? ?FROMCCSID(943) RCDDLM(*CRLF) FROMRCD(1) + 
? ? ? ? ? ? ?ERRRCDOPT(*REPLACE) RPLNULLVAL(*FLDDFT) ? ? ?

FTPコマンドは、下記の様になります。
ログインID ?パスワード
CD /
TYPE C 943
NAMEFMT 1
GET CSVFILE.CSV /FTPDATA/FTPAS.CSV (REPLACE
QUIT ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ?

GET時にCCSIDを943に変更してみてもコピーコマンドでエラーが出ます。
今日1日色々トライしましたが全てダメでした。

ネットで色々検索しましたがPCからAS400に送るパターンは、あるのですが
AS400からPCへ取りに行くパターンが見つかりません。
私が行おうとしていること無理なのでしょうか?

お名前

パスワード

メールアドレス

タイトル

ホームページ

アドレス

項目