!          FMS Form Description Application Aid 
!                     Version V2.4
 
FORM NAME='APPL$INDEX$MENU'
    AREA_TO_CLEAR=7:23
    WIDTH=80
    BACKGROUND=CURRENT
    ;


TEXT (7,5) 'lqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqq'
    &'qqqqqqqqqqk'
    CHARACTER_SET=RULE
    ;
TEXT (8,5) 'x'
    CHARACTER_SET=RULE
    ;
TEXT (8,33) ' Index Menu '
    BOLD 
    ;
TEXT (8,75) 'x'
    CHARACTER_SET=RULE
    ;
TEXT (9,5) 'x'
    CHARACTER_SET=RULE
    ;
TEXT (9,75) 'x'
    CHARACTER_SET=RULE
    ;
TEXT (10,5) 'x'
    CHARACTER_SET=RULE
    ;
TEXT (10,9) ' ALL '
    BOLD 
    ;
TEXT (10,15) 'Select all'
    ;
TEXT (10,75) 'x'
    CHARACTER_SET=RULE
    ;
TEXT (11,5) 'x'
    CHARACTER_SET=RULE
    ;
TEXT (11,9) ' CAS '
    BOLD 
    ;
TEXT (11,15) 'Cancel all'
    ;
TEXT (11,75) 'x'
    CHARACTER_SET=RULE
    ;
TEXT (12,5) 'x'
    CHARACTER_SET=RULE
    ;
TEXT (12,75) 'x'
    CHARACTER_SET=RULE
    ;
TEXT (13,5) 'x'
    CHARACTER_SET=RULE
    ;
TEXT (13,9) ' C '
    BOLD 
    ;
TEXT (13,15) 'Create'
    ;
TEXT (13,75) 'x'
    CHARACTER_SET=RULE
    ;
TEXT (14,5) 'x'
    CHARACTER_SET=RULE
    ;
TEXT (14,9) ' E '
    BOLD 
    ;
TEXT (14,15) 'Edit'
    ;
TEXT (14,39) ' XE '
    BOLD 
    ;
TEXT (14,44) 'Multiple edit'
    ;
TEXT (14,75) 'x'
    CHARACTER_SET=RULE
    ;
TEXT (15,5) 'x'
    CHARACTER_SET=RULE
    ;
TEXT (15,9) ' D '
    BOLD 
    ;
TEXT (15,15) 'Delete'
    ;
TEXT (15,39) ' XD '
    BOLD 
    ;
TEXT (15,44) 'Multiple delete'
    ;
TEXT (15,75) 'x'
    CHARACTER_SET=RULE
    ;
TEXT (16,5) 'x'
    CHARACTER_SET=RULE
    ;
TEXT (16,9) ' P '
    BOLD 
    ;
TEXT (16,15) 'Print'
    ;
TEXT (16,40) 'XP '
    BOLD 
    ;
TEXT (16,44) 'Multiple print'
    ;
TEXT (16,75) 'x'
    CHARACTER_SET=RULE
    ;
TEXT (17,5) 'x'
    CHARACTER_SET=RULE
    ;
TEXT (17,9) ' R '
    BOLD 
    ;
TEXT (17,15) 'Read'
    ;
TEXT (17,39) ' XR '
    BOLD 
    ;
TEXT (17,44) 'Multiple read'
    ;
TEXT (17,75) 'x'
    CHARACTER_SET=RULE
    ;
TEXT (18,5) 'x'
    CHARACTER_SET=RULE
    ;
TEXT (18,75) 'x'
    CHARACTER_SET=RULE
    ;
TEXT (19,5) 'x'
    CHARACTER_SET=RULE
    ;
TEXT (19,75) 'x'
    CHARACTER_SET=RULE
    ;
TEXT (20,5) 'x'
    CHARACTER_SET=RULE
    ;
TEXT (20,75) 'x'
    CHARACTER_SET=RULE
    ;
TEXT (21,5) 'x'
    CHARACTER_SET=RULE
    ;
TEXT (21,10) 'Enter option and press RETURN'
    ;
TEXT (21,75) 'x'
    CHARACTER_SET=RULE
    ;
TEXT (22,5) 'x'
    CHARACTER_SET=RULE
    ;
TEXT (22,75) 'x'
    CHARACTER_SET=RULE
    ;
TEXT (23,5) 'mqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqq'
    &'qqqqqqqqqqj'
    CHARACTER_SET=RULE
    ;

ATTRIBUTE_DEFAULTS FIELD
    CLEAR_CHARACTER=' '
    NOAUTOTAB BLANK_FILL NOBLINKING NOBOLD NOREVERSE
    NOUNDERLINE NODISPLAY_ONLY ECHO NOFIXED_DECIMAL
    LEFT_JUSTIFIED NOSUPERVISOR_ONLY NOSUPPRESS NOUPPERCASE
    ;

FIELD NAME='CHOICE'  (19,10)
    PICTURE=64'X'
    ;

NAMED_DATA INDEX=1 NAME='.TYPE'
    DATA='ARG /OVERLAY/POST="GET OA$MENU_REMAINDER=CHOICE"' ;
NAMED_DATA INDEX=2 NAME='CHOICE'
    DATA='/HARD=OA$_NI_HRD_INDEX_MENU_OPTNS' ;
 
END_OF_FORM NAME='APPL$INDEX$MENU' ;