|目次|前ページ|次ページ| ─────────────────────────────────── 15.ストリングストリームの追加シーケンス --------------------------------------------------------------------- ■<<<ストリームのサイズと読み書きを行うオフセットを取得>>> --------------------------------------------------------------------- [1] シーケンス cid <== ストリングストリームのコントロールid番号 <esc>%422;600;cid;;; sp M 【応答メッセージ】がtelnetサーバから送信されて来ます --------------------------------------------------------------- [2] Cache用共通関数 cid <== ストリングストリームのコントロールid番号 D SIZEOFFSET^ZVCMSTS6 【応答メッセージ】 Rselno -> 読み書きを行うオフセット(64bit値) Rselcnt -> サイズ(64bit値) Rerr2 -> 内部エラー(処理の過程や例外発生エラー) --------------------------------------------------------------------- ■<<<他のストリームからコピーする>>> --------------------------------------------------------------------- [1] シーケンス cid <== ストリングストリームのコントロールid番号 srccid <-- 他のストリームのコントロールid番号 edit <-- を格納する領域番号(531,532,533,534) 1<->63 255文字まで edit=0 を指定すると先頭からSourceの内容をすべてコピーします count <-- 指定したバイト数 count=0以外のとき現在位置から指定したバイト数データを読み出します。 count=0 を指定すると先頭からSourceの内容をすべてコピーします <esc>%422;604;cid;edit;;srccid;; sp M 【応答メッセージ】がtelnetサーバから送信されて来ます --------------------------------------------------------------- [2] Cache用共通関数 cid <== ストリングストリームのコントロールid番号 srccid <-- 他のストリームのコントロールid番号 edit <-- を格納する領域番号(531,532,533,534) 1<->63 255文字まで edit=0 を指定すると先頭からSourceの内容をすべてコピーします count <-- 指定したバイト数 count=0以外のとき現在位置から指定したバイト数データを読み出します。 count=0 を指定すると先頭からSourceの内容をすべてコピーします D COPYFROM6^ZVCMSTS6 【応答メッセージ】 Rselno -> 読み書きを行うオフセット(64bit値) Rselcnt -> サイズ(64bit値) Rerr2 -> 内部エラー(処理の過程や例外発生エラー) ─────────────────────────────────── 【注記】以下場合はeditの指す領域の数値(Count)が0以外の場合は、 CopyFrom は Source の現在位置からデータを読み出します。 <esc>%422;504;cid;edit;;srccid;; sp M ─────────────────────────────────── 15 |目次|前ページ|次ページ|