Page History
[ 
|../../index.htm#lansa/make_file_operationl.htm]
現在地:
| Anchor | ||||
|---|---|---|---|---|
|
注意: 9.1 組み込み関数の規則 &<a href="ladtgub1_0016.htm"&>利用オプション&</a&>利用オプション
ファイルおよび関連する論理ファイルとI/Oモジュールを作成または再作成するジョブを投入します。
この BIF は、9は、9.2 開発環境のみで使用される組み込み関数で使用される特殊 開発環境のみで使用される組み込み関数で使用される特殊 BIF です。
引数 for Visual LANSA
...
LANSA/ADの引数
詳細については、『LANSA/AD ユーザーガイド』の「&<a href="../../../lansa010/content/lansa/ugub_30018.htm"&>ファイル定義を実行可能にするジョブを投入する&</a&>」に掲載のこの定義からファイルを作成／再作成する画面を参照してください。ファイル定義を実行可能にするジョブを投入する」に掲載のこの定義からファイルを作成／再作成する画面を参照してください。
番号 | タイプ | 必須/任意 | 記述 | 最小長 | 最大長 | 最小小数桁数 | 最大小数桁数 |
1 | A | 必須 | ファイル名 | 1 | 10 |
|
|
2 | A | 必須 | ライブラリ名 | 1 | 10 |
|
|
3 | A | 任意 | ファイルがすでに作成済みの場合の再作成オプション | 1 | 3 |
|
|
4 | A | 任意 | バッチ・ジョブの名前 | 1 | 10 |
|
|
5 | A | 任意 | ジョブ記述の名前 | 1 | 21 |
|
|
6 | A | 任意 | ジョブ待ち行列の名前 | 1 | 21 |
|
|
7 | A | 任意 | 出力待ち行列の名前 | 1 | 21 |
|
|
8 | A | 任意 | ファイルとI/Oモジュールのソース・リストを作成する | 1 | 1 |
|
|
9 | A | 任意 | 関連I/Oモジュールで10進データ・エラーを無視する | 1 | 1 |
|
|
10 | A | 任意 | 関連I/Oモジュールでデバッグ・データ・オプションを解除する | 1 | 1 |
|
|
11 | A | 任意 | 呼び出すユーザー・プログラム。デフォルト：ブランク | 1 | 21 |
|
|
12 | A | 任意 | $$ ファイルを削除する | 1 | 1 |
|
|
...
例
ユーザーが独自バージョンの「ファイルの作成/再作成」機能を使用して、ファイルおよび関連する論理ビューとI/Oモジュールのコンパイルを管理する場合は、次のように行います。
FUNCTION OPTIONS(*DIRECT) ********** Define arguments and lists DEFINE FIELD(#FILNAM) TYPE(*CHAR) LENGTH(010) DEFINE FIELD(#LIBNAM) TYPE(*CHAR) LENGTH(010) DEFINE FIELD(#RETCOD) TYPE(*CHAR) LENGTH(002) BEGIN_LOOP ********** Request File and library name REQUEST FIELDS((#FILNAM)(#LIBNAM)) USE BUILTIN(START_FILE_EDIT) WITH_ARGS(#FILNAM #LIBNAM LAN 'SALES RESULTS' NORMAL) TO_GET(#RETCOD) USE BUILTIN(END_FILE_EDIT) WITH_ARGS(Y) TO_GET(#RETCOD) ********** Execute Built-In Function - MAKE_FILE_OPERATIONL USE BUILTIN(MAKE_FILE_OPERATIONL) WITH_ARGS(#FILNAM #LIBNAM) TO_GET(#RETCOD) ********** Check if submission was successful IF COND('#RETCOD *EQ ''OK''') MESSAGE MSGTXT('Create/recreate of file submitted successful') CHANGE FIELD(#FILNAM) TO(*BLANK) ELSE MESSAGE MSGTXT('Create/recreate submit failed with errors, refer to additional messages') ENDIF END_LOOP
[ |../../index.htm#lansa/make_file_operationl.htm]