|
Lines 138-148
my $id_import_batch3 = C4::ImportBatch::AddImportBatch($sample_import_batch3);
Link Here
|
| 138 |
# Test CleanBatch |
138 |
# Test CleanBatch |
| 139 |
C4::ImportBatch::CleanBatch( $id_import_batch3 ); |
139 |
C4::ImportBatch::CleanBatch( $id_import_batch3 ); |
| 140 |
my $batch3_clean = $dbh->do('SELECT * FROM import_records WHERE import_batch_id = "$id_import_batch3"'); |
140 |
my $batch3_clean = $dbh->do('SELECT * FROM import_records WHERE import_batch_id = "$id_import_batch3"'); |
| 141 |
is_deeply( $batch3_clean, "0E0", |
141 |
is( $batch3_clean, "0E0", "Batch 3 has been cleaned" ); |
| 142 |
"Batch 3 has been cleaned" ); |
|
|
| 143 |
|
142 |
|
| 144 |
# Test DeleteBatch |
143 |
# Test DeleteBatch |
| 145 |
C4::ImportBatch::DeleteBatch( $id_import_batch3 ); |
144 |
C4::ImportBatch::DeleteBatch( $id_import_batch3 ); |
| 146 |
my $batch3_results = $dbh->do('SELECT * FROM import_batches WHERE import_batch_id = "$id_import_batch3"'); |
145 |
my $batch3_results = $dbh->do('SELECT * FROM import_batches WHERE import_batch_id = "$id_import_batch3"'); |
| 147 |
is_deeply( $batch3_results, "0E0", # 0E0 == 0 |
146 |
is( $batch3_results, "0E0", "Batch 3 has been deleted"); |
| 148 |
"Batch 3 has been deleted"); |
|
|
| 149 |
- |
|
|