|
Lines 580-592
for my $new_budget ( @new_budgets ) {
Link Here
|
| 580 |
|
580 |
|
| 581 |
# Test SetOwnerToFundHierarchy |
581 |
# Test SetOwnerToFundHierarchy |
| 582 |
|
582 |
|
| 583 |
my $categorycode = 'S'; |
583 |
my $patron_category = $builder->build({ source => 'Category' }); |
| 584 |
my $branchcode = $library->{branchcode}; |
584 |
my $branchcode = $library->{branchcode}; |
| 585 |
my $john_doe = C4::Members::AddMember( |
585 |
my $john_doe = C4::Members::AddMember( |
| 586 |
cardnumber => '123456', |
586 |
cardnumber => '123456', |
| 587 |
firstname => 'John', |
587 |
firstname => 'John', |
| 588 |
surname => 'Doe', |
588 |
surname => 'Doe', |
| 589 |
categorycode => $categorycode, |
589 |
categorycode => $patron_category->{categorycode}, |
| 590 |
branchcode => $branchcode, |
590 |
branchcode => $branchcode, |
| 591 |
dateofbirth => '', |
591 |
dateofbirth => '', |
| 592 |
dateexpiry => '9999-12-31', |
592 |
dateexpiry => '9999-12-31', |
|
Lines 611-617
my $jane_doe = C4::Members::AddMember(
Link Here
|
| 611 |
cardnumber => '789012', |
611 |
cardnumber => '789012', |
| 612 |
firstname => 'Jane', |
612 |
firstname => 'Jane', |
| 613 |
surname => 'Doe', |
613 |
surname => 'Doe', |
| 614 |
categorycode => $categorycode, |
614 |
categorycode => $patron_category->{categorycode}, |
| 615 |
branchcode => $branchcode, |
615 |
branchcode => $branchcode, |
| 616 |
dateofbirth => '', |
616 |
dateofbirth => '', |
| 617 |
dateexpiry => '9999-12-31', |
617 |
dateexpiry => '9999-12-31', |
| 618 |
- |
|
|