From 3f3cb2dc7e4f8fb4915229bf23465d689eb70915 Mon Sep 17 00:00:00 2001 From: Jason Stephenson Date: Sat, 30 Aug 2014 16:29:46 -0400 Subject: [PATCH] Add NCIP::Item::Id module. Signed-off-by: Jason Stephenson --- lib/NCIP/Item/Id.pm | 60 +++++++++++++++++++++++++++++++++++++++++++++ 1 file changed, 60 insertions(+) create mode 100644 lib/NCIP/Item/Id.pm diff --git a/lib/NCIP/Item/Id.pm b/lib/NCIP/Item/Id.pm new file mode 100644 index 0000000..6874216 --- /dev/null +++ b/lib/NCIP/Item/Id.pm @@ -0,0 +1,60 @@ +# --------------------------------------------------------------- +# Copyright © 2014 Jason J.A. Stephenson +# +# This file is part of NCIPServer. +# +# NCIPServer is free software; you can redistribute it and/or modify +# it under the terms of the GNU General Public License as published by +# the Free Software Foundation; either version 2 of the License, or +# (at your option) any later version. +# +# NCIPServer is distributed in the hope that it will be useful, but +# WITHOUT ANY WARRANTY; without even the implied warranty of +# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU +# General Public License for more details. +# +# You should have received a copy of the GNU General Public License +# along with NCIPServer. If not, see . +# --------------------------------------------------------------- +package NCIP::Item::Id; + +use parent qw(Class::Accessor); + +=head1 NAME + +Id - As defined in Z39.83-1-2012 + +=head1 SYNOPSIS + + + +=head1 DESCRIPTION + + +=head1 FIELDS + +=head2 AgencyId + +Optional text string to identify the agency that assigned the +identifier to the item. + +=head2 ItemIdentifierType + +Optional text string to indicate the type of identifier value, i.e. a +barcode or database ID. + +=head2 ItemIdentifierValue + +Required text string to represent the value of the item identifier. + +=cut + +NCIP::Item::Id->mk_accessors( + qw( + AgencyId + ItemIdentifierType + ItemIdentiferValue + ) +); + +1; -- 2.43.2