1 package SQL::Translator::Object::Procedure;
3 use MooseX::Types::Moose qw(HashRef Int Maybe Str);
4 use MooseX::AttributeHelpers;
5 use SQL::Translator::Types qw();
6 use SQL::Translator::Object::Schema;
7 extends 'SQL::Translator::Object';
22 metaclass => 'Collection::Hash',
24 isa => Maybe[HashRef[Int|Str]],
26 exists => 'exists_parameter',
27 keys => 'parameter_ids',
28 get => 'get_parameter',
29 set => 'set_parameter',
50 default => sub { SQL::Translator::Object::Schema->new }
54 __PACKAGE__->meta->make_immutable;