9.165 PUT_NUM_AREA
注意: 9.1 組み込み関数の規則 &<a href="bifcat2_06.htm"&>利用オプション&</a&>
数値を数値データ・エリアに挿入します。
引数
番号 |
タイプ |
必須/任意 |
記述 |
最小長 |
最大長 |
最小小数桁数 |
最大小数桁数 |
1 |
N |
必須 |
挿入する値 |
1 |
15 |
0 |
0 |
2 |
A |
必須 |
データ・エリア名 |
1 |
10 |
|
|
3 |
A |
任意 |
ライブラリ名 |
1 |
10 |
|
|
4 |
A |
任意 |
データ・エリアのロック解除 |
1 |
1 |
|
|
戻り値
戻り値はありません。
例
ジョブのライブラリ・リストを通じて検索されるNEXTBATCHという名前のデータ・エリアから、バッチ番号#BATCHを取得します。
バッチ番号の値を加算して、その加算した値をデータ・エリアに戻します。
ロック・オプションとアンロック・オプションを使用して、複数のジョブに同じバッチ番号が割り当てられないようにします。
USE BUILTIN(GET_NUM_AREA) WITH_ARGS(NEXTBATCH '''*LIBL''' 'Y') TO_GET(#BATCH) CHANGE FIELD(#BATCH) TO('#BATCH + 1') USE BUILTIN(PUT_NUM_AREA) WITH_ARGS(#BATCH NEXTBATCH '''*LIBL''' 'Y')