Mlarocca: Mlarocca moved page $ONEOF to $Oneof: Lower case change

2014-07-29T14:06:16Z

Mlarocca moved page $ONEOF to $Oneof: Lower case change

← Older revision	Revision as of 14:06, 29 July 2014
(No difference)

Alex: Automatically generated page update

2013-04-20T13:19:19Z

Automatically generated page update

New page

The $ONEOF function is a table lookup function that can replace a series of IF conditions. 
Syntax
$ONEOF('item','set',delimiter')

where:
<ul>
<li>item is an element that might be in set.</li>
</li>
<li>set is one or more items</li>
</li>
<li>delimiter is the character used to separate the set items.</li>
</li>
</ul>
Example
$ONEOF('MALE','FEMALE/MALE','/') equals 1
$ONEOF('GRAY','BLACK*WHITE*GRAY','*') equals 1

<ul>
<li>If the delimiter argument is omitted, the default delimiter value is a semicolon (;), which is used to separate items in the second argument. For example:</li>
$ONEOF('FEMALE','FEMALE;MALE') equals 1

$ONEOF code is less confusing if you explicitly specify a delimiter value and do not accept the default delimiter value, a semicolon (;). Accepting the default value can cause confusion, because the default LINEND character is also a semicolon. 
</li>
<li>If the second argument is null, or if the first argument is not an element of the second argument, 0 (false) is returned. For example:</li>
$ONEOF('BOY','FEMALE;MALE') equals 0
$ONEOF(",'FEMALE;MALE') equals 0
$ONEOF('BOY',") equals 0
</li>
<li>You can enter null values as the following examples show.</li>
$ONEOF(",';FEMALE;MALE') equals 1
$ONEOF(",'FEMALE;;MALE') equals 1
$ONEOF(",'FEMALE;MALE;') equals 1
</li>
<li>If a long string of values is used frequently, a special record containing those values can be useful. In the following example, a record is created with a field consisting of a list of departments. The list is used in the second request to locate and process records for which the department is not known.</li>
BEGIN
DECLARE %DEPT STRING LEN 50
STORE RECORD
TABLE = VALS
DEPT VALS = DEPT1/DEPT2/DEPT3/etc.
END STORE
END
.
.
.
BEGIN
FIND.RECS: FIND ALL RECORDS FOR WHICH
TABLE = VALS
END FIND
FOR EACH RECORD IN FIND.RECS
%DEPT = DEPT VALS
END FOR
PAY.RECS: FIND ALL RECORDS FOR WHICH
TYPE = PAYROLL
END FIND
FOR EACH RECORD IN PAY.RECS
IF NOT $ONEOF(DEPT,%DEPT,'/') THEN
.
.
.
</li>
</ul>
[[Category:SOUL $functions]]

$Oneof - Revision history

Mlarocca: Mlarocca moved page $ONEOF to $Oneof: Lower case change

Alex: Automatically generated page update