Overwrite:=True)'2行目から開始GYO =2'最終行まで繰り返すDoUntilGYO >GYOMAX'レコードを出力(REC編集処理より受け取る)TS.WriteLine FP_EDIT_FixLngRec(GYO)'改行(CrLf)付き'TS.Write FP_EDIT_FixLngRec(GYO) ' 改行(CrLf)なし'行を加算GYO = GYO +1Loop'指定ファイルをCLOSETS.CloseSetTS =...