|
Lines 37-42
my $barcodes = $cgi->param('barcodes') || q{};
Link Here
|
| 37 |
|
37 |
|
| 38 |
my $itype = $cgi->param('itype'); |
38 |
my $itype = $cgi->param('itype'); |
| 39 |
my $ccode = $cgi->param('ccode'); |
39 |
my $ccode = $cgi->param('ccode'); |
|
|
40 |
my $homebranch = $cgi->param('homebranch'); |
| 40 |
my $holdingbranch = $cgi->param('holdingbranch'); |
41 |
my $holdingbranch = $cgi->param('holdingbranch'); |
| 41 |
my $location = $cgi->param('location'); |
42 |
my $location = $cgi->param('location'); |
| 42 |
my $staff_note = $cgi->param('staff_note'); |
43 |
my $staff_note = $cgi->param('staff_note'); |
|
Lines 44-49
my $public_note = $cgi->param('public_note');
Link Here
|
| 44 |
|
45 |
|
| 45 |
my $itype_enabled = scalar $cgi->param('itype_enabled') ? 1 : 0; |
46 |
my $itype_enabled = scalar $cgi->param('itype_enabled') ? 1 : 0; |
| 46 |
my $ccode_enabled = scalar $cgi->param('ccode_enabled') ? 1 : 0; |
47 |
my $ccode_enabled = scalar $cgi->param('ccode_enabled') ? 1 : 0; |
|
|
48 |
my $homebranch_enabled = scalar $cgi->param('homebranch_enabled') ? 1 : 0; |
| 47 |
my $holdingbranch_enabled = scalar $cgi->param('holdingbranch_enabled') ? 1 : 0; |
49 |
my $holdingbranch_enabled = scalar $cgi->param('holdingbranch_enabled') ? 1 : 0; |
| 48 |
my $location_enabled = scalar $cgi->param('location_enabled') ? 1 : 0; |
50 |
my $location_enabled = scalar $cgi->param('location_enabled') ? 1 : 0; |
| 49 |
|
51 |
|
|
Lines 87-96
if ( $course_id && $course ) {
Link Here
|
| 87 |
itype => $itype, |
89 |
itype => $itype, |
| 88 |
ccode => $ccode, |
90 |
ccode => $ccode, |
| 89 |
holdingbranch => $holdingbranch, |
91 |
holdingbranch => $holdingbranch, |
|
|
92 |
homebranch => $homebranch, |
| 90 |
location => $location, |
93 |
location => $location, |
| 91 |
itype_enabled => $itype_enabled, |
94 |
itype_enabled => $itype_enabled, |
| 92 |
ccode_enabled => $ccode_enabled, |
95 |
ccode_enabled => $ccode_enabled, |
| 93 |
holdingbranch_enabled => $holdingbranch_enabled, |
96 |
holdingbranch_enabled => $holdingbranch_enabled, |
|
|
97 |
homebranch_enabled => $homebranch_enabled, |
| 94 |
location_enabled => $location_enabled, |
98 |
location_enabled => $location_enabled, |
| 95 |
); |
99 |
); |
| 96 |
|
100 |
|