NCONTAIN


1 NCOntain(number,+ , match)

いずれかの match 引数の数値が number の数値に等しいと、NCONTAIN は 1 を戻します。そうでなければ、NCONTAIN は 0 を戻します。

例 1

現行レコードが 8 バイト目から始まる値 10、20、または 30 のパック 10 進数値を含んでいると、 そのレコードを印刷します。
if nco(fld(8,P),10,20,30) then print(inrec,'CHAR')

例 2

現行レコードが 10 バイト目から始まる値 11、12、または 13 のゾーン 10 進数値を含んでいると、 そのレコードを処理から除外します。
if nco(fld(10,5,Z),11,12,13) then exit 'DROP'

関連するタスク