|
Lines 42-56
BEGIN {
Link Here
|
| 42 |
); |
42 |
); |
| 43 |
} |
43 |
} |
| 44 |
|
44 |
|
| 45 |
=head3 GetSubscriptionNumberpatterns |
|
|
| 46 |
|
45 |
|
| 47 |
=over 4 |
46 |
=head1 NAME |
|
|
47 |
|
| 48 |
C4::Serials::Numberpattern - Serials numbering pattern module |
| 49 |
|
| 50 |
=head1 FUNCTIONS |
| 51 |
|
| 52 |
=head2 GetSubscriptionNumberpatterns |
| 48 |
|
53 |
|
| 49 |
@results = GetSubscriptionNumberpatterns; |
54 |
@results = GetSubscriptionNumberpatterns; |
| 50 |
this function get all subscription number patterns entered in table |
55 |
this function get all subscription number patterns entered in table |
| 51 |
|
56 |
|
| 52 |
=back |
|
|
| 53 |
|
| 54 |
=cut |
57 |
=cut |
| 55 |
|
58 |
|
| 56 |
sub GetSubscriptionNumberpatterns { |
59 |
sub GetSubscriptionNumberpatterns { |
|
Lines 67-81
sub GetSubscriptionNumberpatterns {
Link Here
|
| 67 |
return @$results; |
70 |
return @$results; |
| 68 |
} |
71 |
} |
| 69 |
|
72 |
|
| 70 |
=head3 GetSubscriptionNumberpattern |
73 |
=head2 GetSubscriptionNumberpattern |
| 71 |
|
|
|
| 72 |
=over 4 |
| 73 |
|
74 |
|
| 74 |
$result = GetSubscriptionNumberpattern($numberpatternid); |
75 |
$result = GetSubscriptionNumberpattern($numberpatternid); |
| 75 |
this function get the data of the subscription numberpatterns which id is $numberpatternid |
76 |
this function get the data of the subscription numberpatterns which id is $numberpatternid |
| 76 |
|
77 |
|
| 77 |
=back |
|
|
| 78 |
|
| 79 |
=cut |
78 |
=cut |
| 80 |
|
79 |
|
| 81 |
sub GetSubscriptionNumberpattern { |
80 |
sub GetSubscriptionNumberpattern { |
|
Lines 92-106
sub GetSubscriptionNumberpattern {
Link Here
|
| 92 |
return $sth->fetchrow_hashref; |
91 |
return $sth->fetchrow_hashref; |
| 93 |
} |
92 |
} |
| 94 |
|
93 |
|
| 95 |
=head3 GetSubscriptionNumberpatternByName |
94 |
=head2 GetSubscriptionNumberpatternByName |
| 96 |
|
|
|
| 97 |
=over 4 |
| 98 |
|
95 |
|
| 99 |
$result = GetSubscriptionNumberpatternByName($name); |
96 |
$result = GetSubscriptionNumberpatternByName($name); |
| 100 |
this function get the data of the subscription numberpatterns which name is $name |
97 |
this function get the data of the subscription numberpatterns which name is $name |
| 101 |
|
98 |
|
| 102 |
=back |
|
|
| 103 |
|
| 104 |
=cut |
99 |
=cut |
| 105 |
|
100 |
|
| 106 |
sub GetSubscriptionNumberpatternByName { |
101 |
sub GetSubscriptionNumberpatternByName { |
|
Lines 117-123
sub GetSubscriptionNumberpatternByName {
Link Here
|
| 117 |
return $sth->fetchrow_hashref; |
112 |
return $sth->fetchrow_hashref; |
| 118 |
} |
113 |
} |
| 119 |
|
114 |
|
| 120 |
=head3 AddSubscriptionNumberpattern |
115 |
=head2 AddSubscriptionNumberpattern |
| 121 |
|
116 |
|
| 122 |
=over 4 |
117 |
=over 4 |
| 123 |
|
118 |
|
|
Lines 172-178
sub AddSubscriptionNumberpattern {
Link Here
|
| 172 |
return $rv; |
167 |
return $rv; |
| 173 |
} |
168 |
} |
| 174 |
|
169 |
|
| 175 |
=head3 ModSubscriptionNumberpattern |
170 |
=head2 ModSubscriptionNumberpattern |
| 176 |
|
171 |
|
| 177 |
=over 4 |
172 |
=over 4 |
| 178 |
|
173 |
|
|
Lines 230-236
sub ModSubscriptionNumberpattern {
Link Here
|
| 230 |
return $sth->execute(@values, $numberpattern->{'id'}); |
225 |
return $sth->execute(@values, $numberpattern->{'id'}); |
| 231 |
} |
226 |
} |
| 232 |
|
227 |
|
| 233 |
=head3 DelSubscriptionNumberpattern |
228 |
=head2 DelSubscriptionNumberpattern |
| 234 |
|
229 |
|
| 235 |
=over 4 |
230 |
=over 4 |
| 236 |
|
231 |
|
|
Lines 254-260
sub DelSubscriptionNumberpattern {
Link Here
|
| 254 |
$sth->execute($numberpatternid); |
249 |
$sth->execute($numberpatternid); |
| 255 |
} |
250 |
} |
| 256 |
|
251 |
|
| 257 |
=head3 GetSubscriptionsWithNumberpattern |
252 |
=head2 GetSubscriptionsWithNumberpattern |
| 258 |
|
253 |
|
| 259 |
my @subs = GetSubscriptionsWithNumberpattern($numberpatternid); |
254 |
my @subs = GetSubscriptionsWithNumberpattern($numberpatternid); |
| 260 |
|
255 |
|
| 261 |
- |
|
|