14.10 @@MAK_LSTS Command
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:
- List number - specifies the list number to be built. 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. This list will be automatically cleared before executing this command.
- Column heading 1 - specifies column heading line 1 to appear over this field selection column.
- Column heading 2 - specifies column heading line 2 to appear over this field selection column.
- Column heading 3 - specifies column heading line 3 to appear over this field selection column.
- Field selection method - must be either *YESNO or *SEQUENCE. This specifies the method the user can use to select the required fields. If *YESNO (the default) is chosen, then the user can select any fields by simply placing any non-blank character in the selection column. Pre-selected fields will have "Y" in the select column. If *SEQUENCE is chosen, then the user can sequence the order that the chosen fields are placed in the resulting list. This sequence number is a decimal 4,1 field. Pre-selected fields will have a sequence number incremented by 10 in the select column.
- Pre-select fields - must be either *NO, *ALL or *FORCE. This specifies whether fields are to be pre-selected in the list(s). If *NO (the default) is chosen, then none of the fields will be pre-selected. If *ALL is chosen, then all fields will be pre-selected. If *FORCE is chosen, then all fields that are in the FORCE_LSTS list will be pre-selected.
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))