);
}
-=head3 GetSubscriptionFrequencies
+
+=head1 NAME
+
+C4::Serials::Frequency - Serials Frequency module
+
+=head1 FUNCTIONS
+
+=head2 GetSubscriptionFrequencies
=over 4
return @$results;
}
-=head3 GetSubscriptionFrequency
+=head2 GetSubscriptionFrequency
=over 4
return $sth->fetchrow_hashref;
}
-=head3 AddSubscriptionFrequency
+=head2 AddSubscriptionFrequency
=over 4
return $rv;
}
-=head3 ModSubscriptionFrequency
+=head2 ModSubscriptionFrequency
=over 4
return $sth->execute(@values, $frequency->{'id'});
}
-=head3 DelSubscriptionFrequency
+=head2 DelSubscriptionFrequency
=over 4
$sth->execute($frequencyid);
}
-=head3 GetSubscriptionsWithFrequency
+=head2 GetSubscriptionsWithFrequency
my @subs = GetSubscriptionsWithFrequency($frequencyid);
);
}
-=head3 GetSubscriptionNumberpatterns
-=over 4
+=head1 NAME
+
+C4::Serials::Numberpattern - Serials numbering pattern module
+
+=head1 FUNCTIONS
+
+=head2 GetSubscriptionNumberpatterns
@results = GetSubscriptionNumberpatterns;
this function get all subscription number patterns entered in table
-=back
-
=cut
sub GetSubscriptionNumberpatterns {
return @$results;
}
-=head3 GetSubscriptionNumberpattern
-
-=over 4
+=head2 GetSubscriptionNumberpattern
$result = GetSubscriptionNumberpattern($numberpatternid);
this function get the data of the subscription numberpatterns which id is $numberpatternid
-=back
-
=cut
sub GetSubscriptionNumberpattern {
return $sth->fetchrow_hashref;
}
-=head3 GetSubscriptionNumberpatternByName
-
-=over 4
+=head2 GetSubscriptionNumberpatternByName
$result = GetSubscriptionNumberpatternByName($name);
this function get the data of the subscription numberpatterns which name is $name
-=back
-
=cut
sub GetSubscriptionNumberpatternByName {
return $sth->fetchrow_hashref;
}
-=head3 AddSubscriptionNumberpattern
+=head2 AddSubscriptionNumberpattern
=over 4
return $rv;
}
-=head3 ModSubscriptionNumberpattern
+=head2 ModSubscriptionNumberpattern
=over 4
return $sth->execute(@values, $numberpattern->{'id'});
}
-=head3 DelSubscriptionNumberpattern
+=head2 DelSubscriptionNumberpattern
=over 4
$sth->execute($numberpatternid);
}
-=head3 GetSubscriptionsWithNumberpattern
+=head2 GetSubscriptionsWithNumberpattern
my @subs = GetSubscriptionsWithNumberpattern($numberpatternid);