Tandem ENFORM 058057, Reference Manual, Page: 105 / 312

LIST Statements
Statements
4–34
058057 Tandem Computers Incorporated
an IF / THEN / ELSE expression. Enclose IF/THEN/ELSE expressions in
parentheses.
LIST ...,
(IF inventory GT 0 THEN inventory ELSE ZERO);
a user variable. Define the user variable with a DECLARE statement. The variable
should be either initialized with a SET statement or assigned a value with
assignment syntax. If the variable value is neither initialized nor assigned, the
default value is zero. A user variable cannot be assigned the values of a subscript
range.
DECLARE new-var;
SET new-var TO 3;
LIST ... ,
new-var;
a system variable clause.
LIST ... ,
@LINENO AS I5;
a user aggregate or predefined aggregate.
LIST ...,
COUNT (branchnum OVER regnum);
a field or user table with a subscript range.
LIST ... ,
months [ 1:6 ];
a parameter name. Parameters that have not been declared with an alphanumeric
internal format must be enclosed in parentheses. Parameters declared with an
alphanumeric internal format must not be enclosed within parentheses.
PARAM num;
...
LIST ...,
(num);
ENFORM allows you to specify a group name as a target-item within a LIST
statement; however, ENFORM might not display the fields within the group in the
manner you expect. To understand the way that ENFORM displays group elements,
you must first understand what a group is. A group is defined in DDL as any field
whose level number (03, 04, 05, ...) is less than that of the next field. For example,
consider the following DDL record description:
RECORD test.
FILE IS "$mkt.sample.test" key-sequenced.
02 account-num.
05 type PIC 9(4).
05 num TYPE BINARY 16.
02 custnum PIC 9(4).
end