ストリーム・ファイルの CCSID を変更するには？

Ftp などで無変換で IFS へアップロードするとストリーム・ファイルの CCSID は
無条件に 819 となる。
しかし「 22. CCSID 819 は日本語ではない」で示したように CCSID: 819 では
ストリーム・ファイルに含まれている日本語は WRKLNK で参照しても正しく
表示することはできない。
これを CCSID: 943 に変更すると正しく漢字も表示されるのだが、どのようにすれば
ストリーム・ファイルの CCSID を変更することができるのだろうか?
データ・ベースの CCSID は簡単には変更することはできないがストリーム・ファイルの
CCSID は比較的簡単に変更することができる。
ここでその方法について紹介する。

まず WRKLNK コマンドで目的とするディレクトリーを次のように開く。

                           オブジェクト・リンクの処理            
                                                                
 ディレクトリー . . :   /PCSFT5                                 
                                                                
 オプションを入力して，実行キーを押してください。               
   9= 権限の処理   10= 移動   13= 属性の変更 ...                
                                                              
 OPT   ｵﾌﾞｼﾞｪｸﾄ･ﾘﾝｸ           ﾀｲﾌﾟ      属性         テキスト   
       SHOHIN.TTO             STMF                              
       SHOHIN2.FDF            STMF                              
       SHOHIN2.TTO            STMF                              
       SIREMT.FDF             STMF                              
       SIREMT.TTO             STMF                              
       SIREMT.TTX             STMF                              
       SIREMT.XLS             STMF                              
       TEST.FDF               STMF                              
       TEST.TTO               STMF

解説

変更したいストリーム・ファイルに対して「 13 = 属性の変更」を
打鍵して実行キーを押す。

                               属性変更  (CHGATR)                             
                                                                              
 選択項目を入力して，実行キーを押してください。                               
                                                                              
 オブジェクト  . . . . . . . . . > '/PCSFT5/SHOHIN.TTO'                       
 属性  . . . . . . . . . . . . .   *CCSID        *READONLY, *HIDDEN...        
 新しい値  . . . . . . . . . . .   943           1-65533, *YES, *NO, *RESET...
 ﾃﾞｨﾚｸﾄﾘｰ の ｻﾌﾞﾂﾘｰ  . . . . . .   *NONE         *NONE, *ALL                  
 シンボリック・リンク  . . . . .   *NO           *NO, *YES

解説

属性 : *CCSID と新しい値 : 943 を指定して実行キーを押すと
このストリーム・ファイルの CCSID を変更することができる。