Lines Matching refs:fieldR

71         my $fieldR;
79             $fieldR = new_field(1, length($F->[5]), $F->[3], $F->[4], 0, 0);
80             if ($$fieldR eq '') {
83             set_field_buffer($fieldR, 0, $F->[5]);
84             field_opts_off($fieldR, O_ACTIVE);
85             field_opts_off($fieldR, O_EDIT);
87             $fieldR = new_field($F->[1], $F->[2], $F->[3], $F->[4], 0, 0);
88             if ($$fieldR eq '') {
92                 set_field_buffer($fieldR, 0, $F->[5]);
94             set_field_back($fieldR, A_UNDERLINE);
97         push(@fieldRList, $fieldR);