In this session, you will define processing rules for a map field.
To define processing rules
In the Code field of the Edit
Map menu, enter an E
and, in the
Name field, enter MAP001
.
The map editing screen appears in split-screen mode and map MAP001 is displayed in the editing area.
Enter the field command .P
as shown
below:
Ob _ Ob D CLS ATT DEL CLS ATT DEL . . T D Blnk T I ? . . A D _ A I ) . . A N ¬ M D & . . M I : O D + . . O I ( . . 001 --010---+----+----+---030---+----+----+---050---+----+----+---070---+---- ******************************************************************************* (XXXXXXXX PERSONNEL INFORMATION (XXXXXXXX PLEASE ENTER NAME:.PXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX PLEASE ENTER CITY::XXXXXXXXXXXXXXXXXXXX Enter-PF1---PF2---PF3---PF4---PF5---PF6---PF7---PF8---PF9---PF10--PF11--PF12--- Help Mset Exit Test Edit -- - + Full < > Let |
Press ENTER.
The processing rule editor for the field in which the command was entered appears:
Variables used in current map Mod #001(A40) #002(A20) Rule ________________________________ Field #001 > > + Rank 0 S L 1 Struct Mode ALL ....+....10...+....+....+....30...+....+....+....50...+....+....+....70. 0010 0020 0030 0040 0050 0060 0070 0080 0090 0100 0110 0120 0130 0140 0150 0160 0170 0180 Enter-PF1---PF2---PF3---PF4---PF5---PF6---PF7---PF8---PF9---PF10--PF11--PF12--- Help Mset Exit Test -- - + Full Sc= Let |
Type in the following processing rule:
Rule ________________________________ Field #001 > > + Rank 0 S L 1 Struct Mode ALL ....+....10...+....+....+....30...+....+....+....50...+....+....+....70. 0010 * 0020 IF & = ' ' REINPUT 'PLEASE TYPE IN A NAME' 0030 MARK *& 0040 END-IF 0050 * 0060 0070 0080 0090 0100 0110 0120 0130 0140 0150 0160 0170 0180 Enter-PF1---PF2---PF3---PF4---PF5---PF6---PF7---PF8---PF9---PF10--PF11--PF12--- Help Mset Exit Test -- - + Full Sc= Let |
The ampersand (&) in the processing rule will be dynamically substituted by the name of the field to which the processing rule is attached.
Press ENTER and then PF3.
The map editing screen appears.
Press PF4 to test the map.
The test screen appears.
Press ENTER to test the processing rule.
The processing rule is executed and the text entered in the rule appears:
******************************************************************************* 07-12-14 PERSONNEL INFORMATION 16:04:15 PLEASE ENTER NAME: ________________________________________ PLEASE ENTER CITY: ____________________ ******************************************************************************* PLEASE TYPE IN A NAME |
Note:
The text PLEASE TYPE IN A NAME
may not necessarily
appear at the bottom of the screen (as shown above) but on another line,
depending on the position of the message line as set by the Natural
administrator.
In the first position of the input field next to PLEASE ENTER
NAME:
, enter any character and press ENTER.
The test is terminated and the map editing screen appears.
Enter the field command .P
in the same
position as before and press ENTER.
The processing rule for rank (priority) 0 of the field where the command was entered is displayed again.
Enter the command P=5
as shown below:
Rule ________________________________ Field #001 > P=5 > + Rank 0 S 5 L 1 Struct Mode ALL ....+....10...+....+....+....30...+....+....+....50...+....+....+....70. 0010 * 0020 IF & = ' ' REINPUT 'PLEASE TYPE IN A NAME' 0030 MARK *& 0040 END-IF 0050 * 0060 0070 0080 0090 0100 0110 0120 0130 0140 0150 0160 0170 0180 Enter-PF1---PF2---PF3---PF4---PF5---PF6---PF7---PF8---PF9---PF10--PF11--PF12--- Help Mset Exit Test -- - + Full Sc= Let |
Press ENTER.
The processing rule which was previously assigned to rank 0 is now assigned to rank 5 (processing rules are processed in ascending order of rank, starting with rank 0).
Enter the command P0
as shown below:
Rule ________________________________ Field #001 > P0 > + Rank 5 S 5 L 1 Struct Mode ALL ....+....10...+....+....+....30...+....+....+....50...+....+....+....70.. 0010 * 0020 IF & = ' ' REINPUT 'PLEASE TYPE IN A NAME' 0030 MARK *& 0040 END-IF 0050 * 0060 0070 0080 0090 0100 0110 0120 0130 0140 0150 0160 0170 0180 Enter-PF1---PF2---PF3---PF4---PF5---PF6---PF7---PF8---PF9---PF10--PF11--PF12--- Help Mset Exit Test -- - + Full Sc= Let |
Press ENTER.
An empty processing rule editor screen is displayed, because there is no longer any processing rule assigned to rank 0.
Rule ________________________________ Field #001 > > + Rank 0 S L 1 Struct Mode ALL ....+....10...+....+....+....30...+....+....+....50...+....+....+....70. 0010 0020 0030 0040 0050 0060 0070 0080 0090 0100 0110 0120 0130 0140 0150 0160 0170 0180 Enter-PF1---PF2---PF3---PF4---PF5---PF6---PF7---PF8---PF9---PF10--PF11--PF12--- Help Mset Exit Test -- - + Full Sc= Let |
Type in the following processing rule:
Rule ________________________________ Field #001 > > + Rank 0 S 0 L 1 Struct Mode ALL ....+....10...+....+....+....30...+....+....+....50...+....+....+....70.. 0010 * 0020 IF & = MASK ('.') STOP 0030 END-IF 0040 * 0050 0060 0070 0080 0090 0100 0110 0120 0130 0140 0150 0160 0170 0180 Enter-PF1---PF2---PF3---PF4---PF5---PF6---PF7---PF8---PF9---PF10--PF11--PF12--- Help Mset Exit Test -- - + Full Sc= Let |
Press ENTER and then PF3.
The map editing screen appears.
You can now proceed with Naming Fields and Saving/Cataloging a Map.