Parent Directory | Revision Log | Patch
revision 771 by dpavlin, Fri Sep 29 19:52:17 2006 UTC | revision 772 by dpavlin, Fri Nov 3 20:40:38 2006 UTC | |
---|---|---|
# | Line 12 WebPAC::Input::MARC - support for MARC d | Line 12 WebPAC::Input::MARC - support for MARC d |
12 | ||
13 | =head1 VERSION | =head1 VERSION |
14 | ||
15 | Version 0.06 | Version 0.07 |
16 | ||
17 | =cut | =cut |
18 | ||
19 | our $VERSION = '0.06'; | our $VERSION = '0.07'; |
20 | ||
21 | ||
22 | =head1 SYNOPSIS | =head1 SYNOPSIS |
# | Line 88 sub fetch_rec { | Line 88 sub fetch_rec { |
88 | } | } |
89 | } | } |
90 | ||
91 | =head2 dump_rec | |
92 | ||
93 | Return dump of record with ID C<$mfn> from database | |
94 | ||
95 | my $rec = $self->fetch_rec( $mfn ); | |
96 | ||
97 | } | |
98 | ||
99 | =cut | |
100 | ||
101 | sub dump_rec { | |
102 | my $self = shift; | |
103 | ||
104 | my $mfn = shift; | |
105 | return $self->{_marc_db}->to_ascii($mfn); | |
106 | } | |
107 | ||
108 | =head2 size | =head2 size |
109 | ||
110 | Return number of records in database | Return number of records in database |
|
ViewVC Help | |
Powered by ViewVC 1.1.26 |