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 |
- |
|
|