SSUNDR


【機能】

    カレント属性を下書き線属性に変更する・もとに戻す・参照する


【使用形式】

    CALL  SSUNDR(IFLG,IRET)


【引数説明】

    [INPUT]
        IFLG : フラグ                                          
                 1 ; 下書き線属性をカレント属性に変更する(ストア)
                 2 ; カレント属性をもとの状態に戻す(リストア)
                 3 ; 参照                                      

    [OUTPUT]                      
        IRET  : リターンフラグ                        
                  -2 ; ロジカルエラー                           
                  -1 ; パラメータエラー                         
              (IFLG=1、またはIFLG=2)                
                   0 ; 正常終了                              
                   1 ; 下書き線モードがオープンされていない  
                   2 ; 既にカレントが下書き線属性になっている
                (IFLG=1)                                
                   3 ; カレント属性がストアされていない(IFLG=1)
              (IFLG=3)                              
                   0 ; ストアされていない                        
                   1 ; ストアされている