UPLOAD PC FILE

ストラクチャードモード構文

UPLOAD
READ

PC
WORK

[FILE] work-file-number [ONCE]

RECORDoperand1

[AND] [SELECT]

OFFSETn
FILLERnX

operand2

[GIVING LENGTH operand3]

[AT [END] [OF] [FILE] statement

END-ENDFILE]

statement

END-WORK

レポーティングモード構文

	`UPLOAD` `READ`	`PC` `WORK`	[`FILE`] `work-file-number` [`ONCE`]
	`RECORD` {`operand1` [`FILLERnX`]}
	[`AND`] [`SELECT`]	`OFFSETn` `FILLERnX`	`operand2`
[`GIVING LENGTH` `operand3`]
	`AT` [`END`] [`OF`] [`FILE`]	`statement` `DO` `statement` `DOEND`
`statement`
`LOOP`

このドキュメントでは、次のトピックについて説明します。

関数
構文説明
例

構文図で使用されている記号については、「構文記号」を参照してください。

関連ステートメント：CLOSE PC FILE | DOWNLOAD PC FILE | READ WORK FILE

関連機能グループ：ワークファイル／PC ファイルの制御

関数

UPLOAD PC FILEステートメントは、PC から UNIX プラットフォームにデータを転送するために使用します。

以下の項目も参照してください。

『Natural Connection』および『Entire Connection』ドキュメント
READ WORK FILE ステートメント構文の説明

構文説明

オペランド定義テーブル：

オペランド				フォーマット											オペランド参照	ダイナミック定義
`operand1`	S	A	G	A	U	N	P	I	F	B	D	T	L	C	○	○
`operand2`	S	A	G	A	U	N	P	I	F	B	D	T	L	C	○	○
`operand3`	S							I							○	○

ワークファイルタイプ ENTIRECONNECTION または TRANSFER を使用しているとき、operand2 のフォーマットを C にすることはできません。

構文要素の説明：

構文要素	説明
`work-file-number`	ワークファイル番号：使用するワークファイルの番号です。この番号は、Natural に対する定義に従って、PC のワークファイル番号の 1 つに対応している必要があります。
`operand1-2`	フィールド指定： `operand1` および `operand2` では、PC からアップロードするフィールドを指定します。データベースフィールドまたはユーザー定義変数を指定できます。
`statement`	実行するステートメント：状況に応じて、`statement` の代わりに、1 つ以上の適切なステートメントを指定する必要があります。 `UPLOAD PC FILE` 処理で I/O ステートメントを指定することはできません。
`ONCE, SELECT, GIVING LENGTH` `RECORD`	オプション： `ONCE`、`SELECT`、`GIVING LENGTH` オプションの詳細については、`READ WORK FILE` ステートメントの説明の対応する各セクションを参照してください。 PC ワークファイルには、`RECORD` オプションは使用できません。ランタイムに拒否されます。データをアップロードする場合：フィルタを定義する場合、標準のフィルタ表記の代わりにダミー変数を使用する必要があります。
`END-WORK`	UPLOAD PC FILE ステートメントの終了：ストラクチャードモードの場合、Natural の予約キーワード `END-WORK` を使用して `UPLOAD PC FILE` ステートメントを終了させる必要があります。レポーティングモードでは、Natural のステートメント `LOOP` を使用して `UPLOAD PC FILE` ステートメントを終了します。
`LOOP`

例

次のプログラムは、UPLOAD PC FILE ステートメントの使用方法を示しています。データは最初に PC からアップロードされ、その後で UNIX プラットフォームで処理されます。

** Example 'PCUPEX1': UPLOAD PC FILE                                    
**                                                                      
** NOTE: Example requires that Natural Connection is installed.         
** CAUTION: Executing this example will modify the database records!    
************************************************************************
DEFINE DATA LOCAL                                                       
01 EMPL VIEW OF EMPLOYEES                                               
   02 PERSONNEL-ID                                                      
   02 INCOME                                                            
      03 SALARY (1)                                                     
*                                                                       
01 #PID (A8)                                   /* Personnel ID on PC    
01 #NEW-INCREASE (N4)                          /* Increase for salary   
END-DEFINE                                                              
*                                                                       
UPLOAD PC FILE 7 #PID #NEW-INCREASE            /* Data upload        
*                                                                       
  FIND EMPL WITH PERSONNEL-ID = #PID           /* Data selection        
    ADD #NEW-INCREASE TO SALARY (1)            /* Data update on host   
    UPDATE         
    END TRANSACTION
    ESCAPE BOTTOM  
  END-FIND         
*                  
END-WORK           
END

プログラム PCUPEX1 の出力：

プログラムを実行するとウィンドウが開くので、そこでアップロードするデータが含まれている PC ファイルの名前を指定します。その後、データが PC からアップロードされます。