|
Lines 160-166
SKIP: {
Link Here
|
| 160 |
my $id = $input->get_attribute('id'); |
160 |
my $id = $input->get_attribute('id'); |
| 161 |
next unless $id =~ m|^tag_952_subfield|; |
161 |
next unless $id =~ m|^tag_952_subfield|; |
| 162 |
|
162 |
|
| 163 |
$input->send_keys('t_value_bib'.$biblionumber); |
163 |
my $v; |
|
|
164 |
|
| 165 |
# FIXME This is based on default values |
| 166 |
if ( $id =~ m|^tag_952_subfield_g| # price |
| 167 |
or $id =~ m|^tag_952_subfield_v| ) # replacementprice |
| 168 |
{ |
| 169 |
$v = '42'; # It's a price |
| 170 |
} |
| 171 |
elsif ( |
| 172 |
$id =~ m|^tag_952_subfield_f| #tag_952_subfield_g |
| 173 |
) { |
| 174 |
# It's a varchar(10) |
| 175 |
$v = 't_value_x'; |
| 176 |
} |
| 177 |
else { |
| 178 |
$v = 't_value_bib' . $biblionumber; |
| 179 |
} |
| 180 |
$input->send_keys( $v ); |
| 164 |
} |
181 |
} |
| 165 |
|
182 |
|
| 166 |
$driver->find_element('//input[@name="add_submit"]')->click; |
183 |
$driver->find_element('//input[@name="add_submit"]')->click; |
| 167 |
- |
|
|