The @@MAK_LSTS command is used to make a list(s) from fields selected by the user. The list being built will be automatically cleared before executing this command.
The user will be presented with a field selection list (constructed from other nominated lists) from which all required fields may be selected. The method of both selection and pre-selection of fields is determined by the INTO_LSTS parameter. If the FORCE_LSTS parameter is used, then all fields in this list must be selected by the user.
Required
@@MAK_LSTS ---- FROM_LSTS ----- nn --------------------------->
| |
-- 5 max --
-----------------------------------------------------------------
Optional
>--- FORCE_LSTS ---- nn --------------------------->
>--- INTO_LSTS -- nn -- col hdg 1 -- col hdg 2 ---->
| |
| |
|-- col hdg 3 -- *YESNO -- *NO ---->
| *SEQUENCE *ALL |
| *FORCE |
--------- 2 max -------------------
>--- HELPIDS ---- HELP panel identifiers ----------|
| |
-------- 10 max -----------
Parameters
FROM_LSTS
Specifies the list numbers from which the list of fields for selection will be built. These list numbers should have been previously built by the @@RTV_FLDS or @@MAK_LSTS commands. This number may be a 1 or 2 character numeric or a 2 character index name. If it is an index name, then the current index value will be substituted in this command. Refer to the @@SET_IDX, @@INC_IDX, @@DEC_IDX, @@CMP_IDX commands for setting and using indexes.
FORCE_LSTS
Specifies a list number (previously built by the @@RTV_FLDS or @@MAK_LSTS commands) which contains all fields to be selected by the user. This number may be a 1 or 2 character numeric or a 2 character index name. If it is an index name, then the current index value will be substituted in this command. Refer to the @@SET_IDX, @@INC_IDX, @@DEC_IDX, @@CMP_IDX commands for setting and using indexes.
INTO_LSTS
Specifies the lists to be made from the selected fields. This parameter consists of these parts:
HELPIDS
Specifies up to 10 HELP panel identifiers for this application template. These will be displayed as full page screen of HELP when the user presses the HELP function key.
Examples
The following examples apply to the @@MAK_LSTS command.
Example 1: Ask the user to select fields that cannot be updated in the primary file. Fields can be selected by any non-blank character.
@@MAK_LSTS FROM_LSTS(2) INTO_LSTS((5 'Fields that' 'Cannot be'
'Updated' *YESNO *NO)) HELPIDS(HELP010 HELP020)
Example 2: Ask the user to select fields that are to be displayed on the data entry panel, forcing the keys of the file to be selected. The fields can be ordered using a sequence number, and all fields are pre-selected.
@@MAK_LSTS FROM_LSTS(1) FORCE_LSTS(3) INTO_LSTS((4 'Fields to'
'Appear on' 'Add Panel' *SEQUENCE *ALL))