#! /usr/bin/env perl

# $Id: find.pm 110 2007-03-05 21:01:37Z yamada $

use warnings;
use strict;

package PS::MOPS::DET::Constants;
use Exporter;

our @ISA = qw(Exporter);
our @EXPORT = qw(
	$MOPS_DET_STATUS_NEW
	$MOPS_DET_STATUS_PENDING
	$MOPS_DET_STATUS_DONE
);

our $MOPS_DET_STATUS_NEW = 'N';
our $MOPS_DET_STATUS_PENDING = 'P';
our $MOPS_DET_STATUS_DONE = 'D';

1;

__END__

=head1 NAME

PS::MOPS::DET::Constants.pm - Exports constants.

=head1 SYNOPSIS

use PS::MOPS::DET::Constants;

=head1 DESCRIPTION

Defines some generally used constants.

=cut
