シ ス テ ム に よ る リ モ ー ト パ ッ チ 処 理 に つ い て

PANAFACOM U‑II00

シ ス テ ム に よ る リ モ ー ト パ ッ チ 処 理 に つ い て

在有曹奮

情 報 処 理 セ ン タ ー 阪 上 直 美 ・ 野 崎 剛 一 本センターで稼動している小型計算機

システム

システム) は，大型計算機

と直結され， リモートパッチ利用が可能である。

乙の

システムは，オフライン処理では「アナログデータ処理」用の計算機であり，アナロ グデータをディジタル値に変換し，

のディスクへ保存する乙とができる。しかし，

シ ステムはディスク容量の制限や計算速度の問題等，処理能力

限界があり，多種多様のデータ処理 は困難である。

そ乙で，

上

てディジタル変換したデータをディスクへ保存し，そのファイルを大型機へ

データ」として送信する事により， リモートパッチジョプとして，大型機の上での計 算，データ処理が可能になる。

以下，

システムでのリモートパッチシステムの利用について説明する。

o  F ACOM M‑180IIAD

へのリモートパッチジョブ利用について

一 一 一 一 一

システム利用について 1 .  

システム運用手順

PFU

本体

ライター

， 

OS/UDS 

リアルタイムシステーム

IR]E

システムオープン (システムよりメッセージ) 事

: .

  P FU

本体の

を ，

セッ トし，

， 

の』振 にキーを上げる

<@9= // ^RB B @) 

RB R]E2  OPEN  01/01 

lh

シ ョ ン の 開 設 . . .  

^ふ

(システムよりメッセーの張

]ER0271  LOGGING ON  START RRDROO.  RRDO  START RWTROO. RPRO  // 

MN ]OBNAMES， T 

]DE3261  MONITOR COMMAND ACCEPTED  RO GROUP=L， DEST=CENTRAL 

]DE3981  REQUESTED DATA SET(ffi  SUCCESSFULLY  ROUTED  ]D]0391  RD1  RDR WAITING FOR WORK 

]D]8681  PR1  WTR WAITING FOR WORK

， 

]DE4411  NO NOTICES  IN  SYS10  BRODCAST 

SYSIN  / SYSOUT 

デ ー タ 送 受 信

セ ッ シ ョ ン の 開 設 (システムよりのメッセーの

••

c@り/

， 

]D]165I  //  LOGOFF 

]D]0391  RD1  RDR WAITING FOR WORK  ]D]161I  Ru1  READER CLCSED 

R]E

ク ロ ー ズ

⁼ 

RB R]E2  CLOSE 

TYP

ライター

OFF 

OFF) 

PFU

本体

OFF 

PFU

本 体 .

→， 

キー上げる

事 システムよりのメッセージ ζ l

亙査直

というメッセージは無視してよい。

2.  SYS IN

データ送信について

SYSIN

データ送信には，カードリーダより送信の場合，フロッピーディスクより送信の場合，

ディスクより送信の場合の

通りの方法がある。

2 .   1  カードリーダより送信

車 ジョブ制御文についての注意

M‑180

I 1

用

ジョプ制御文のカードデックの 先頭に「￥

終わりに「￥

を付けて カードリーダにセッ卜する。

セッシヨン開設の操作が終わると，自動的にカー ドを読む

。 出力結果をセンターのラインプリンタ用紙に出力する場合には，ジョブカードの次 に

.その次に

カードを挿入する。

。 プログラム又はデータが

のファイル上に作成されている場合は.

I 1

用の

カードの次に「￥

カード」を挿入する。

例・

のファイル名

r.原始プログラムが作成されている場合

//FORT.SYSIN DD * 

￥

• PFU

のファイル名

r.データが作成され，そのデータを機番

で

する時

文字の時)

/ / GO.  FTl 0 F 0 0 1 DD  * 

^{(カタプロ}

^{以外の時)}

￥

L

→ バ イ ナ リ デ サ の 時

にする

2.2. 

フロッピーディスクより送信

2. 1

で述べた一連のジョブ制御文を，フロッピー上

作成しておく(￥

￥

は除く) セッション開設後1[.フロッピーをセットし，次のコマンドを入力する。

@ト//

I .  

@ト//RB S.

ファイル名

CED 

@)... 

(フロッヒ河川上のフ州略: ABC の時

伝言説=/ /RB S.  ABC) 

2 . 3   ディスクより送信

レコード

バイトのファイル上へ.

の一連のジョブ制御 文を作成しておく(￥

￥

除く)

セッション開設後，次のコマンドを入力する。

e

@9^{=//RB  S}

^{，ファイル名}

^{町上のファイル名}

の 日 頃 拐 事 /

， 

2 .   4  ディスクよりデータの転送について

EBCDIC

文字，バイナリデータ転送が可能であり，

のディスク上のファイ

ぬ

レコードの大 きさ

バイトのファイルに格納されているデータの転送が可能である。

但し，データの転送は

レコード

バイトの

形式の形で行なわれるので，ディスク上のデー タを

レコード朗ノイイトの形に加工し，

データとする。8cレ

イ卜の形にする時

上のファ イルの

レコード長が加の倍数でない時，残りに空白が挿入される時があるので，なるべく，

PFU

のファイルの

レコードのレコード長は(

以下の

の整数倍)バイトにする。

EBCDIC

文字の場合，

二 で

する形式は，

上のファイルにデータを 出力したのと同じ変換形式でよいが，バイナリデータの転送時，

上では

変換で

しなければならない。

又 ，

では

語 =

バイト故，注意されたい。

3.  SYSOUT

データの受信について

データについて

FACOM M

ー

より送信される

データは，次の二通りがある。

(1)  SYSOUT=A 

…ラインプリンタイメージ

…カードノマンチイメージ

(1)のラインプリンタイメージの出力は，一般的 l ζ ，

プログラムでの

，  ~J である。 1 レコードの第 1 桁自には，書式制御コードが強制的に入る o

(2)

のカードイメージの出力は，

プログラムでの

，ー」であり，

文

以外の時)

である。

レコー

ド 即 バ イ ト の 出 力 で あ り レ コ ー ド 内 に 書 式 制 御 コ ー ド は 入 ら ず ， 出 力 結 果 そ の も の が

レ コード内に入る。

とれらの

データの受信は，セッション開設後，次の通りの各装置に割り当てられ ている。

(1)  SYSOUT = A 

(プリント装置

l)フロッピーディスク(装置名)

(パンチ装置

l ) ディスク ( 

乙れらを変更するには r o コマンドj で行う。

(REQ) = / / RB 0

，装置名，

℃ と

_a.=."~~どNLJ

PU1  ¥よヱタ〆

(例)

⑩ = 川B0

， 

， 

雪 ) ( 必 ず

通り行う)

@ り

皇宣豊呈

i

車

の出力結果(システムメッセージも)について，自動的にセンターのライ ンプリンタ装置に出力したい時は，制御文の中で次の様I ζ 行うむ

/ / Annnn 01  JOB Fnnnn， ‑

( J

カード)

//* MAIL 

//木

3.2  SYSOUT

データの受け取りについて ー リ モ ー ト ス テ ー シ ョ ン で の 受 け 取 り ー リモート端末での結果の取り出し

6

， 

ジョブ番号

^， 

、ジョブ名

CLASS = T …PR 1 

(プリンタイメージの受取り)

CLASS = U …PU 1 

(パンチイメージの受取り)

FACOM M‑180IIAD 

(ホスト計算機)より

ファイル(データセット毎に送ら れてくる)が送られてくると，下記のような出力制御情報問合せメヴセージが出力される。

メッセージ

? 0 RB SYSOUT  1 NF FDO 0 

(出力装置

の時)

ファイル名， レコード長，プロック化係数を応答する事により，

ファイルの受信が 開始される。

応答 @>=川

ファイ

レコード長， フ

ロ

ク化定数

フロッピーディスクで受取る場合は，必ず，ブロック化定数は

1 

にしないといけない。

例

。

ー

上のデータセット(1レコード剖バイト)→

のディスクへ 転送する。(パンチイメージの出力)

￥

//A000401  JOB FOu04， ‑

/ / ネ

//i

^く

ネ

INTEGER*2  IS  D IMENS 1 ON  1 S 

< B O l  

}システムメッセージ

WRITE (6

，  ‑)の出力はセンター

装置へ

READ 00， 1， END 

= 9 ( } )  

亙亙E

1 FORMAT 

( 剖

l )

WR 1 TE (7， 

1) 

関

END 

(M‑180llAD

上 の デ ー タ セ ッ ト 名 )

↓ 

IIGO. FTI0FOOl  DD DSN=Fnnrm. 

~.FORT ，

1/ GO. FTO 7 FO 01  DD SYSOUT = P 

￥

処理終了後

PFU

端末にて結果の取り出し

@ 診 ⁼

^芯

ジョプ番号，

? 0 RB SYSOUT  INF.  DDOO 

… シ ス テ ム よ り の メ ッ セ ー ジ

@9l=/ / 

^{R  0} 

￨ 

し→ブロック化定数

PFU

の

レコード

バ イ ト の フ ァ イ ル 名

。

の デ ィ ス ク →

ー

の 転 送 ( パ イ ナ リ ー デ ー タ の 転 送 )

PFU 

M‑180llAD 

l レ コ ー ド 朗 バ イ ト 以 上

バイナリデータ (卸バイト F 形式) 入力となる (1語

バイト なので

で宣言

で

仮

の デ ィ ス ク の フ ァ イ ル 名 :

I/ An nnn~

11

水

1/

ネ

11  EXEC FORTCLG  /IFORT. SYSIN DD 

ネ

[ I m m 2 N (

必)

(11. 

在荷扉膏

//GO. FTI1F001

ネ

￥FLE DDOO.  B

// 

事

のファイル上のデータを

へ転送する場合

PFU

のファイ

レの大きさの制限は最大

レコード

バイトまでのファイルである。

(注)

のファイルヘデータを出力する場合，書式なし

文で出力すると，最初の

バイトにそのレコードの属性情報が出力されるので，なるだけ

文 で宣言し，直接出力文を使用して，出力するのがよい。

。 アナログデータ処理結果のデータ転送について

﹁

S 1

9白

N 

A 

︑ ︐

F 

U  ノ

Dl  

︐

︑

1‑̲ーーー ‑・圃ーーーーー ‑ーーーー̲̲  . J  

④ 

FACOM M‑180 II  AD 

① 

コマンドにて，アナログデータを

のファイル

へ書 き出す。但し.

は.

レコード

バイト.

レコード故.

へデータを送信する為に)レコード

バイト.

レコードのファイル(ファイル名:

KAKOF ILE)

に書き出す。

その時.

の第

レコード自にファイルコメント，サンプリングタイム，サン プリングチャネ

レ数，サンプリングデータ数を書く。

@ 

ファイ

レ名

を

ー

へ送信する。

(例) : 

のデータを機番

で

し出力する 制御文

側からの)

￥

// An

/ / ネ

L センター

装置へ出力の場合 //本

J 

/ /  EXEC FORTCLG  / /FORT.  SYS 1N  DD * 

1NTEGER*2  1  D1MENS10N 1 (40) 

1 00  READ 

( I  

GO TO 100  1  FORMAT (40A2)  10  FORMAT

( I H. 

END 

//GO. FTllF001  DD 

本

￥

B

￥

④  アナログデータ処理プログラム(プログラム名

を

にて実行

での制御文

させ，

変換処理をする。

日 々

:@‑‑ー(FAC0MM‑180HAm‑‑1 

¥ミ?、

(ファイル名

文 力 出 し 1 正 l

市 番

H M l v

︑  

I12Jレ

h v E   T L   7 1 2  

の 凹

町 川 同 P ' U

と

' ' ' ' ' a E ‑ ‑ t

・ ・

︑

PFU

のファイル

の第

レコード 自に，ファイルコメント，サンプリングタイム，

サンプリングチャネル数，サンプリングデータ数 が書き出されているので，それらを読み込み，

第

レ コ ー ド 目 か ら レ コ ー ド

バイト，

レコード数

のファイル(ファイル

を作成 し ，

変換処理の入力とする。

(pmM_DATAFILE)‑〉_‑‑

_一一￨

と同じ形 / 

』 ー ー 一 一 一 一 ー ー ー 一 一 一 ̲J

ジョブ制御文

￥SOF 

/  /  An

//米

//* MSGDEST=CENTRAL 

官有曹宮

1 1  

//  LOADDS' 

F0004. 

FT30FOOl

ネ

￥

//GO. 

FTI0FOOl 

DISP= (NEW.  CATLG) • SPACE=~

DCB= (URECL =2048.  BLKSIZE= 2048. 

RECFM=F) 

//GO. 

FTIIFOOl 

DCB= (RECFM= VS.LRECL=2056. BLKSIZE=2060) 

￥SOF 

4 

その{也

PFU

の 紙 テ ー プ 入 力 →

ー

の デ ー タ セ ッ ト へ 格 納 .

コード)

PFU 

亡 コ

^コード)

A  ム

グ ノ ‑ フ

ロ

中 小 プ

ー

I

PFU 

@回

RJE

処理

↓ 干

//* MAIL 

FACOM  M‑180llAD 

白 )

//:本 MSGEST= CENTRAL会

//  EXEC  PSCOPY 

//SYSUT2  DD DSN=Fnnnn.ん FORT.

//  DISP= (NEW. CATLG) • UNIT草 PUB.

//  SPACE= (TRK.  (20.  10) • RLSE). 

//  DCB= (LRECL=80.  RECFM=FB. 

//  BLKSIZE= 1200)  //SYSUTI  DD 

* 

￥

￥

i

くプログラム A

﹁￨怜￨J

E

プ

口 む F 込 で き

ん 章 一 日

ょ に

を ) プ 一 部 番 ム テ 機 ラ 紙 ( グ

書

後

コード故，

コード使用 の場合 ，

又 は // 

を起動される。

000002  DIMENS 10N  1 S (40)  000003  DATA  1SP/2H  /  000004  DO 10  1=

  ， 1

， 

， 

9 Q )  

  ， 1

( I

め

000009  GO TO 90  000010  101  CENTINUE 

000011  WR 1 TE (8 6

， 

000017  END  // ]OB 

// A S  C 2 

/ P ARA UN 1 T = 4 

/END  / /EBREG 

/厄

参考文献

PANAFACOM OS/UDS  R]E2 

説 明 書

PANAFACOM OS/UDS  FORTRAN D 

説 明 書