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.