Commit e421d7b3e3fc13897c1aefd28a27c193ffb31010

Authored by daniel@ruoso.com
1 parent 1e97b1b1
Exists in master

Adiciona o SQL::Translator nas dependencias

Corrige bugs no ETL

git-svn-id: http://svn.softwarepublico.gov.br/svn/sistemadeatendimento/sistema/trunk@11 63db2ce5-8a6c-0410-abb9-a418dd412890
@@ -14,6 +14,7 @@ Fila-Servico: @@ -14,6 +14,7 @@ Fila-Servico:
14 Sub::Name 14 Sub::Name
15 XML::Compile::SOAP 15 XML::Compile::SOAP
16 XML::CompileX::Transport::SOAPXMPP 16 XML::CompileX::Transport::SOAPXMPP
  17 + SQL::Translator
17 18
18 Fila-Web: 19 Fila-Web:
19 20
@@ -51,6 +52,7 @@ Fila-Agendamento: @@ -51,6 +52,7 @@ Fila-Agendamento:
51 DBIx::Class 52 DBIx::Class
52 DBIx::Class::Schema 53 DBIx::Class::Schema
53 Business::BR::Ids 54 Business::BR::Ids
  55 + SQL::Translator
54 56
55 Fila-ETL: 57 Fila-ETL:
56 58
@@ -59,6 +61,7 @@ Fila-ETL: @@ -59,6 +61,7 @@ Fila-ETL:
59 DBIx::Class 61 DBIx::Class
60 DBIx::Class::Schema 62 DBIx::Class::Schema
61 DateTime::Format::Pg 63 DateTime::Format::Pg
  64 + SQL::Translator
62 65
63 Fila-Opiniometro: 66 Fila-Opiniometro:
64 67
Fila-ETL/lib/Fila/ETL/Controller/Atendimento.pm
@@ -434,7 +434,7 @@ GROUP BY @@ -434,7 +434,7 @@ GROUP BY
434 } 434 }
435 my $categoria = $cat_cache->{$id_categoria}; 435 my $categoria = $cat_cache->{$id_categoria};
436 436
437 - $c->model('DB::FQuantidadeEstados')->create 437 + $c->model('DB::FNoShow')->create
438 ({ id_local => $dlocal, 438 ({ id_local => $dlocal,
439 id_categoria => $categoria, 439 id_categoria => $categoria,
440 data => $data, 440 data => $data,
Fila-ETL/lib/Fila/ETL/DB/DPerguntaAvaliacao.pm
@@ -37,7 +37,7 @@ __PACKAGE__->add_columns @@ -37,7 +37,7 @@ __PACKAGE__->add_columns
37 ); 37 );
38 38
39 __PACKAGE__->set_primary_key('id_pergunta'); 39 __PACKAGE__->set_primary_key('id_pergunta');
40 -__PACKAGE__->resultset_class('Fila::ETL::DB::DAtendente::RS'); 40 +__PACKAGE__->resultset_class('Fila::ETL::DB::DPerguntaAvaliacao::RS');
41 41
42 package Fila::ETL::DB::DPerguntaAvaliacao::RS; 42 package Fila::ETL::DB::DPerguntaAvaliacao::RS;
43 use base 'DBIx::Class::ResultSet'; 43 use base 'DBIx::Class::ResultSet';
Fila-ETL/lib/Fila/ETL/DB/DRespostaAvaliacao.pm
@@ -36,7 +36,7 @@ __PACKAGE__->add_columns @@ -36,7 +36,7 @@ __PACKAGE__->add_columns
36 ); 36 );
37 37
38 __PACKAGE__->set_primary_key('id_resposta'); 38 __PACKAGE__->set_primary_key('id_resposta');
39 -__PACKAGE__->resultset_class('Fila::ETL::DB::DAtendente::RS'); 39 +__PACKAGE__->resultset_class('Fila::ETL::DB::DRespostaAvaliacao::RS');
40 40
41 package Fila::ETL::DB::DRespostaAvaliacao::RS; 41 package Fila::ETL::DB::DRespostaAvaliacao::RS;
42 use base 'DBIx::Class::ResultSet'; 42 use base 'DBIx::Class::ResultSet';
@@ -160,7 +160,7 @@ @@ -160,7 +160,7 @@
160 <Hierarchy hasAll="true" primaryKey="id_resposta" primaryKeyTable="d_resposta_avaliacao"> 160 <Hierarchy hasAll="true" primaryKey="id_resposta" primaryKeyTable="d_resposta_avaliacao">
161 <Table name="d_resposta_avaliacao" schema="public" /> 161 <Table name="d_resposta_avaliacao" schema="public" />
162 <Level 162 <Level
163 - name="RespostaAvaliacao" table="d_resposta_avaliacao" column="texto" type="String" 163 + name="RespostaAvaliacao" table="d_resposta_avaliacao" column="valor" type="String"
164 uniqueMembers="false" levelType="Regular" hideMemberIf="Never" caption="resposta" /> 164 uniqueMembers="false" levelType="Regular" hideMemberIf="Never" caption="resposta" />
165 </Hierarchy> 165 </Hierarchy>
166 </Dimension> 166 </Dimension>