バージョン 4.2.5	検索   索引   目次   |   PDF ブック   |   ホーム   上へ   戻る   次へ

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

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

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

• 機能

• 構文説明

• DDM：COMMAND

• 例

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

関連機能グループ：「プログラムおよびルーチンの呼び出し」

機能

Natural ユーティリティ SYSNCP で作成したコマンドプロセッサは、PROCESS COMMAND ステートメントを使用して Natural プログラムから呼び出すことができます。

Natural コマンドプロセッサの作成方法の詳細については、『SYSNCP ユーティリティ』ドキュメントを参照してください。

注意:
PROCESS COMMAND ステートメント内の単語 "COMMAND" は実際のビュー名です。 使用されるビューの名前は必ずしも "COMMAND" である必要はありませんが、同じ名前の DDM が存在するため、"COMMAND" を使用することをお勧めします。 DEFINE DATA ステートメント（例えば、COMMAND VIEW OF COMMAND）内でこの DDM を参照する必要があります。

セキュリティに関する考慮事項

Natural Security では、コマンドプロセッサで定義された特定のキーワードや機能の使用を制限できます。 特定のユーザーまたはユーザーグループに対して、キーワードや機能の使用を許可／禁止できます。 詳細については、『Natural Security』ドキュメントを参照してください。

構文説明

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

構文要素の説明：

キーワードの HELP

このオプションは、アルファベット順にソートされたキーワードまたは同義語を IKN 付きで返します。

フィールド RESULT-FIELD (1:n) は、指定したリストを返します。

例：

Command Line 1:    K*X     Returns all synonyms of all keyword types.

Command Line 1:    K123S   Returns all keywords of type 1, 2 and 3 including synonyms.

同義語の HELP

指定された IKN に対して、このオプションは元のキーワードとすべての同義語を返します。

フィールド RESULT-FIELD (1) は、元のキーワードを返します。 フィールド RESULT-FIELD (2:n) は、このキーワードに関連する同義語を返します。

例：

Command Line 1:    S
Command Line 2:    1003

Result-Field 1:    Edit
Result-Field 2:    Maintain
Result-Field 3:    Modify

グローバル機能の HELP

このオプションは、すべてのグローバル機能のリストを返します。

フィールド RESULT-FIELD (1:n) は、指定したリストを返します。

例：

Command Line 1:    G
Command Line 2:    ADD

Result-Field 1:    ADD CUSTOMER
Result-Field 2:    ADD FILE
Result-Field 3:    ADD USER

ローカル機能の HELP

このオプションは、指定したロケーションのすべてのローカル機能のリストを返します。

フィールド RESULT-FIELD (1:n) は、指定したリストを返します。

IKN の HELP

指定された内部キーワード番号（IKN）に対して、このオプションは元のキーワードを返します。

フィールド RESULT-FIELD (1) は、キーワードを返します。

例：

Command Line 1:    IKN
Command Line 2:    0000002002

Result-Field 1:    CUSTOMER

IFN の HELP

指定された内部機能番号（IFN）に対して、このオプションは機能のキーワードを返します。

フィールド RESULT-FIELD(1) は、機能を返します。オプション S を使用した場合、機能は RESULT-FIELD (1:3) に返されます。

例：

Command Line 1:    IFN
Command Line 2:    0001048578

Result-Field 1:    DISPLAY INVOICE

全般的な情報の TEXT

全般的な情報については、COMMAND-LINE (*)、つまりすべてのコマンド行を空白にする必要があります。 RESULT-FIELD の最大 9 個のフィールドに次の情報が返されます。

キーワード情報の TEXT

キーワード情報については、COMMAND-LINE (1) には対応するキーワードが含まれている必要があります。COMMAND-LINE (2) にはオプションでキーワードタイプ（1、2、3、または P）を含めることができます。COMMAND-LINE (3:6) は空にする必要があります。

機能情報の TEXT

機能情報については、COMMAND-LINE (1:3) には目的のロケーションを指定するキーワードが含まれている必要があります。 COMMAND-LINE (4:6) には目的の機能を指定するキーワードが含まれている必要があります。 例えば、グローバルコマンド ADD USER に関する情報を返す場合、コマンド行 1、2、3、6 が空白であり、コマンド行 4 には ADD、コマンド行 5 には USER がそれぞれ含まれている必要があります。

GET オプション

GET オプションは、内部コマンドプロセッサ情報や現在のコマンドプロセッサ設定をダイナミックに割り当てられたバッファ NCPWORK から読み取るために使用します。 次のフィールドが使用されます。

GETSET-FIELD-NAME に有効な値のリストについては、下記を参照してください。

SET オプション

SET オプションは、バッファ NCPWORK の内部コマンドプロセッサ設定を変更するために使用します。

GETSET-FIELD-NAME の設定可能値：

^*G = GET オプションで使用できます。

^*S = SET オプションで使用できます。

USING 節

フィールドの内容（プロセッサ名やコマンド行など）を USING 節に指定します。

USING 節では、コマンドプロセッサに送信するフィールドを指定します。

GIVING 節

注意:
この節はレポーティングモードでのみ使用できます。

GIVING 節では、各オプションの処理結果として、コマンドプロセッサによって埋められるフィールドを指定します。

注意:
GIVING 節はストラクチャードモードでは利用できません。DEFINE DATA ステートメントに指定されたすべてのフィールドで構成される暗黙的な GIVING 節が存在するためです。通常、これらのフィールドはレポーティングモードの GIVING 節で参照されます。 つまり、ストラクチャードモードでは、上記の表の "必須" でマークされたフィールドはすべて DEFINE DATA ステートメントで定義する必要があります。

DDM：COMMAND

データ定義モジュール（DDM）COMMAND は、PROCESS COMMAND ステートメントと組み合わせて使用するために特別に作成されたものです。

DB:    1 File:    1 - COMMAND                          Default Sequence: ?
  
  TYL  DB  NAME                             F LENG  S D   REMARKS
  ---  --  -------------------------------- - ----  - -  ------------------------
    1  AA  PROCESSOR-NAME                   A    8  N D DE    USING
  M 1  AB  COMMAND-LINE                     A   80  N D MU/DE USING
    1  AF  GETSET-FIELD-NAME                A   32  N D DE    USING
    1  BA  NATURAL-ERROR                    N  4.0  N         GIVING
    1  BB  RETURN-CODE                      A    4  N         GIVING
  M 1  BC  RESULT-FIELD                     A   80  N   MU    GIVING
    1  BD  GETSET-FIELD-VALUE               A   32  N D       USING; GIVING
  ***** DDM OUTPUT TERMINATED ******

注意:
コンパイルエラーやランタイムエラーを回避するため、使用前に DDM COMMAND という名前の DDM がタイプ C（SYSDDM メニューの DDM Type フィールド）でカタログされていることを確認してください。 DDM を再カタログする場合、SYSDDM ユーティリティの DBID/FNR 指定は無視されます。

DDM COMMAND のフィールドは次のとおりです。

例

• 例 1 - PROCESS COMMAND ACTION CLOSE

• 例 - PROCESS COMMAND ACTION EXEC2

例 1 - PROCESS COMMAND ACTION CLOSE

/* EXAM-CLS - Example for PROCESS COMMAND ACTION CLOSE (Structured Mode)
/***********************************************************************   
DEFINE DATA LOCAL
  01 COMMAND VIEW OF COMMAND
END-DEFINE
/*
PROCESS COMMAND ACTION CLOSE
/*
DEFINE WINDOW CLS
INPUT WINDOW = 'CLS'
  'NCPWORK has just been released.'
/*
END

例 - PROCESS COMMAND ACTION EXEC2

/* EXAM-EXS - Example for PROCESS COMMAND ACTION EXEC (Structured Mode)
/**********************************************************************   
DEFINE DATA LOCAL
  01 COMMAND VIEW OF COMMAND
     02 PROCESSOR-NAME
     02 COMMAND-LINE (1)
     02 NATURAL-ERROR
     02 RETURN-CODE
     02 RESULT-FIELD (1)
  01 MSG (A65) INIT <'Please enter a command.'>
END-DEFINE
/*
REPEAT
  INPUT (AD=MIT' ' IP=OFF) WITH TEXT MSG
    'Example for PROCESS COMMAND ACTION EXEC (Structured Mode)' (I)
  / 'Command ==>' COMMAND-LINE (1) (AL=64)
  /*******
 PROCESS COMMAND ACTION EXEC
    USING
      PROCESSOR-NAME = 'DEMO'
      COMMAND-LINE (1) = COMMAND-LINE (1)
  /*******
  COMPRESS 'NATURAL-ERROR =' NATURAL-ERROR TO MSG
END-REPEAT
END

注意:
他のプログラム例については、SYSNCP ライブラリを参照してください。 これらのプログラムはすべて EXAM で始まります。

www.softwareag.com

Copyright © Software AG 1979-2009. All rights reserved.

検索   索引   目次   |   PDF ブック   |   ホーム   上へ   戻る   次へ