Opa Leonardo, desse modo funcionou,<br><br>Essa era a minha logica no primeiro post.<br> <br><br><div class="gmail_quote">Em 20 de agosto de 2012 18:31, Leonardo Ruoso <span dir="ltr"><<a href="mailto:leonardo@ruoso.com" target="_blank">leonardo@ruoso.com</a>></span> escreveu:<br>
<blockquote class="gmail_quote" style="margin:0 0 0 .8ex;border-left:1px #ccc solid;padding-left:1ex">Veja que você está chamando o método retorna_hora_do_banco de um ResultSet, que deve mapear uma tabela no DB. Eu acho que um método como retorna_hora_do_banco poderia estar no seu Model, provavelmente chamado DB :-) Eu não me lembro se há um acessor default para retornar a hora do banco, acho que não, mas meu primeiro impulso seria colocar esse método no seu Model responsável pelo acesso ao DB e chamá-lo desse Model e não de um ResultSet. <br>

<br><div class="gmail_quote">Em 20 de agosto de 2012 18:24, Jose Nilton <span dir="ltr"><<a href="mailto:jniltinho@gmail.com" target="_blank">jniltinho@gmail.com</a>></span> escreveu:<div><div class="h5"><br><blockquote class="gmail_quote" style="margin:0 0 0 .8ex;border-left:1px #ccc solid;padding-left:1ex">

<br>Fiz esse teste:<br><br>"Can't locate object method "<font face="courier new, monospace">retorna_hora_do_banco</font>" via package "DBIx::Class::ResultSet"<br><br><br>sub <font face="courier new, monospace">retorna_hora_do_banco</font> {<br>


    my ($self) = @_;<br>    <br>        return "Ola mundo";<br>    <br>}<br><br><br>Coloquei no arquivo Myapp/lib/Schema/Schema.pm<br><br><br><br><div class="gmail_quote"><div>Em 20 de agosto de 2012 17:04, Renato Santos <span dir="ltr"><<a href="mailto:renato.cron@gmail.com" target="_blank">renato.cron@gmail.com</a>></span> escreveu:<br>


</div><blockquote class="gmail_quote" style="margin:0 0 0 .8ex;border-left:1px #ccc solid;padding-left:1ex">Me confundi um pouco.... Explique o que você está querendo dizer cmo Model, afinal, o model faz parte do MVC, e não do Schema do DBIC. Embora seja con<b>fundido </b>quase sempre..<div>

<div><div>
<br></div><div>Se vc precisa de alguma funcao, por exemplo, rodar uma SQL de preguiça escrita a mão, vc pode adicionar ela no Schema, assim todos podem acessar lá:<br>

<div><br></div><div>de uma row pra um schema:<br>$row->result_source->schema</div></div><div><br></div><div>de uma <span style="background-color:rgb(221,221,221);color:rgb(0,102,153);font-family:arial,sans-serif;font-size:medium">DBIx::Class::Row</span> OU <span style="background-color:rgb(221,221,221);color:rgb(0,102,153);font-family:arial,sans-serif;font-size:medium">DBIx::Class::Resultset </span>pra um schema:</div>




<div>$OBJECT->result_source->schema</div><div><br></div><div>--------</div><div>então você pode fazer no Schema.pm algo assim:<br><br></div><div><font face="courier new, monospace"><br></font></div><div><font face="courier new, monospace">sub retorna_hora_do_banco {</font></div>




<div><font face="courier new, monospace">    </font></div><div><font face="courier new, monospace">        my $res = eval {</font></div><div><font face="courier new, monospace">            $self->storage->dbh->selectrow_hashref( "select current_time() as foo",</font></div>




<div><font face="courier new, monospace">                undef, @args );</font></div><div><font face="courier new, monospace">        };</font></div><div><font face="courier new, monospace">        do { print $@; return undef } if $@;</font></div>




<div><font face="courier new, monospace">        return $res;</font></div><div><font face="courier new, monospace">    </font></div><div><font face="courier new, monospace">}</font></div><div> </div><div>ps: nao testei a funcao, mas é basicamente isso.... mas cara.. na boa!</div>




<div><br></div><div>--------</div><div><br></div><div>outra hipotese, é vc estar falando disso:</div><div><br></div><div><a href="http://search.cpan.org/%7Ezarquon/Catalyst-Manual-5.9004/lib/Catalyst/Manual/Tutorial/04_BasicCRUD.pod#Create_a_ResultSet_Class" target="_blank">http://search.cpan.org/~zarquon/Catalyst-Manual-5.9004/lib/Catalyst/Manual/Tutorial/04_BasicCRUD.pod#Create_a_ResultSet_Class</a></div>




<div><br><div class="gmail_quote">2012/8/20 Jose Nilton <span dir="ltr"><<a href="mailto:jniltinho@gmail.com" target="_blank">jniltinho@gmail.com</a>></span><br><blockquote class="gmail_quote" style="margin:0 0 0 .8ex;border-left:1px #ccc solid;padding-left:1ex">


<div><div>

<br>Outra coisa, como eu faço para criar um query SQL no Model, e como faço para criar outras funções SQL no Model que possa ser acessada do Controller.<br><br>Desculpe essas perguntas bobas, coisa de iniciante no Catalyst<br>





<br><br><div class="gmail_quote">Em 20 de agosto de 2012 16:51, Jose Nilton <span dir="ltr"><<a href="mailto:jniltinho@gmail.com" target="_blank">jniltinho@gmail.com</a>></span> escreveu:<div><div><br><blockquote class="gmail_quote" style="margin:0 0 0 .8ex;border-left:1px #ccc solid;padding-left:1ex">





Boa tarde a todos,<br><br>Gostaria de saber como eu faço para listar só alguns campos da tabela:<br><br>Exemplo:<br><br>Banco: agencia<br>Tabelas: users<br>Campos: id, login, email, password, adm, active, create.<br><br>




Não quero selecionar todos os campos, quero id, login, email, active.<br>

<br>Obrigado<span><font color="#888888"><br clear="all"></font></span><br></blockquote></div></div></div><div><div><br clear="all"><br>-- <br>.................................................................<br>

  "Com Deus todas as coisas são possíveis"<br>

</div></div><br></div></div><div>=begin disclaimer<br>
   Sao Paulo Perl Mongers: <a href="http://sao-paulo.pm.org/" target="_blank">http://sao-paulo.pm.org/</a><br>
 SaoPaulo-pm mailing list: <a href="mailto:SaoPaulo-pm@pm.org" target="_blank">SaoPaulo-pm@pm.org</a><br>
 L<<a href="http://mail.pm.org/mailman/listinfo/saopaulo-pm" target="_blank">http://mail.pm.org/mailman/listinfo/saopaulo-pm</a>><br>
=end disclaimer<br>
<br></div></blockquote></div><br><br clear="all"><div><div><br></div>-- <br><div><span style="color:rgb(51,51,51);font-size:x-small">Saravá,</span></div><div><span style="color:rgb(51,51,51);font-size:x-small">Renato CRON</span></div>




<div><div style="text-align:right"><font color="#333333" size="1"><a href="http://www.renatocron.com/blog/" target="_blank">http://www.renatocron.com/blog/</a></font></div></div><div style="text-align:right"><font color="#333333" size="1"><a href="http://twitter.com/#%21/renato_cron" target="_blank">@renato_cron</a></font></div>




<br>
</div></div>
<br>=begin disclaimer<br>
   Sao Paulo Perl Mongers: <a href="http://sao-paulo.pm.org/" target="_blank">http://sao-paulo.pm.org/</a><br>
 SaoPaulo-pm mailing list: <a href="mailto:SaoPaulo-pm@pm.org" target="_blank">SaoPaulo-pm@pm.org</a><br>
 L<<a href="http://mail.pm.org/mailman/listinfo/saopaulo-pm" target="_blank">http://mail.pm.org/mailman/listinfo/saopaulo-pm</a>><br>
=end disclaimer<br>
<br></div></div></blockquote></div><div><div><br><br clear="all"><br>-- <br>.................................................................<br>  "Com Deus todas as coisas são possíveis"<br>

</div></div><br>=begin disclaimer<br>
   Sao Paulo Perl Mongers: <a href="http://sao-paulo.pm.org/" target="_blank">http://sao-paulo.pm.org/</a><br>
 SaoPaulo-pm mailing list: <a href="mailto:SaoPaulo-pm@pm.org" target="_blank">SaoPaulo-pm@pm.org</a><br>
 L<<a href="http://mail.pm.org/mailman/listinfo/saopaulo-pm" target="_blank">http://mail.pm.org/mailman/listinfo/saopaulo-pm</a>><br>
=end disclaimer<br>
<br></blockquote></div></div></div><br>
<br>=begin disclaimer<br>
   Sao Paulo Perl Mongers: <a href="http://sao-paulo.pm.org/" target="_blank">http://sao-paulo.pm.org/</a><br>
 SaoPaulo-pm mailing list: <a href="mailto:SaoPaulo-pm@pm.org">SaoPaulo-pm@pm.org</a><br>
 L<<a href="http://mail.pm.org/mailman/listinfo/saopaulo-pm" target="_blank">http://mail.pm.org/mailman/listinfo/saopaulo-pm</a>><br>
=end disclaimer<br>
<br></blockquote></div><br><br clear="all"><br>-- <br>.................................................................<br>  "Com Deus todas as coisas são possíveis"<br>