view release on metacpan or  search on metacpan

lib/Daje/Generate/Perl/CreateSchema.pm  view on Meta::CPAN

        }

        $result->{views} = \@vie;
        return $result;
    }

    method build_view_methods($view, $column_names) {

        my $methods->{table_name} = $view->{table_name};
        $methods->{keys} = $self->_get_keys($column_names);
        $methods->{create_endpoint} = 1;
        my $method = $self->get_view_list($view->{table_name},$column_names);
        push @{$methods->{methods}}, $method ;

        return $methods;
    }

    method _get_keys($column_names) {

        my $keys->{has_companies} = 0;
        $keys->{has_users} = 0;