($title_img_alt)

こちらからの投稿は、先頭に表示されているコメントへの返信になります。
RE:SCS制御コード 技術職員 さん [ 8月8日(火) 19時6分 ]
私の環境では下記の記述で*DS4の罫線要素を消せましたので、
ご参考にご利用ください。
また、他の方法がありましたら教えていただけると助かります。

--------
★DDS側 ソース(DSPSIZ(27 132 *DS4 24 80 *DS3) の定義を前提)

A*- UNLIND( *DS4 画面のラインを消す為に一度画面切替状態でクリアする )
A          R UNLIND                    FRCDTA
A*- UNLINE( GRDRCD で記載されたライン情報を削除する )
A          R UNLINE                    GRDRCD
A                                      GRDCLR
A          R LINE                      GRDRCD
A                                      GRDATR((*COLOR BLU) (*LINTYP SLD))
A                                      GRDLIN((*POS (*DS4 25 1 132) +
A                                                   (*DS3 22 1 80)) +
A                                             (*TYPE LOWER))

--------
★RPG側 ソース
/FREE
    WRITE LINE;
      ? 処理 ?
    WRITE UNLINE; 
    WRITE UNLIND; 
    RETURN;               
/END-FREE 

お名前

パスワード

メールアドレス

タイトル

ホームページ

アドレス

項目