source: publico/ILSAPL/branches/2.3/skins/sk_sapl/cadastros/materia/materia_salvar_proc.dtml @ 4610

Última Alteração nesse arquivo desde 4610 foi 4610, incluída por claudiomorale, 10 anos atrás

correção - mensagem inclusão materia a partir da proposicao

File size: 8.9 KB
Linha 
1<dtml-comment>
2*********************************************************************
3*   Função: Salvar os dados da matéria vindos do formulário,        *
4*        seja em UPDATE dos dados ou na INCLUSÃO de uma nova ma-    *
5*        téria.                                                     *
6*   Argumentos: [hdn_cod_materia: int]. Argumento opcional          *
7*        que determina se esse método vai salvar ou atualizar os    *
8*        dados da matéria.                                          *
9*   Retorno: Mensagem de sucesso ou erro.                           *
10*   Michael Onishi, Rommel Carvalho e Danilo Custódio em 09-04-2001.*
11*********************************************************************
12</dtml-comment>
13
14<dtml-call expr="REQUEST.set('temProposicao',hdn_cod_proposicao!='')">
15<dtml-call expr="REQUEST.set('cod_proposicao',hdn_cod_proposicao!='')">
16
17<!-- Adicionado para debug -->
18<!-- dtml-var expr="REQUEST" -->
19<!-- dtml-call expr="REQUEST.set('erro', 1)" -->
20<!-- Adicionado para debug -->
21
22<dtml-in expr="zsql.materia_obter_zsql(ncod_materia = hdn_cod_materia,
23                                       tip_id_basica=lst_tip_id_basica,
24                                       num_ident_basica = hdn_num_ident_basica,
25                                       ano_ident_basica = txt_ano_ident_basica)">
26  <dtml-call expr="REQUEST.set('erro', 1)">
27  <dtml-let mensagem="'Matéria identificada por Tipo, Número e Ano já existe no cadastro. Não foi possível salvá-la.'">
28    <dtml-var mensagem_emitir>
29  </dtml-let>
30</dtml-in>
31
32<dtml-if radTipTxtIntegral>
33  <dtml-if expr="radTipTxtIntegral=='Prop'">
34    <dtml-in expr="zsql.proposicao_obter_zsql(cod_proposicao=hdn_cod_proposicao)">
35      <dtml-if expr="tip_mat_ou_doc!=_.int(lst_tip_id_basica)">
36        <dtml-call expr="REQUEST.set('erro', 1)">
37        <dtml-let mensagem="'O tipo da matéria não é compatível com o tipo de proposição do texto integral. Corrija um dos campos e tente novamente.'">
38          <dtml-var mensagem_emitir>
39        </dtml-let>
40      </dtml-if>
41    </dtml-in>
42  </dtml-if>
43</dtml-if>
44
45<dtml-if hdn_cod_materia>
46  <dtml-call expr="REQUEST.set('metodo', zsql.materia_atualizar_zsql)">
47<dtml-else>
48  <dtml-call expr="REQUEST.set('metodo', zsql.materia_incluir_zsql)">
49</dtml-if>
50
51<dtml-unless erro>
52  <dtml-unless rad_tip_apresentacao>
53    <dtml-call expr="REQUEST.set('rad_tip_apresentacao', '')">
54  </dtml-unless>
55
56  <dtml-unless rad_ind_polemica>
57    <dtml-call expr="REQUEST.set('rad_ind_polemica', '')">
58  </dtml-unless>
59
60  <dtml-unless rad_ind_complementar>
61    <dtml-call expr="REQUEST.set('rad_ind_complementar', '')">
62  </dtml-unless>
63
64  <dtml-try>
65    <dtml-call expr="metodo(
66        cod_materia              = hdn_cod_materia,
67        tip_id_basica            = lst_tip_id_basica,
68        num_ident_basica         = hdn_num_ident_basica,
69        ano_ident_basica         = txt_ano_ident_basica,
70        dat_apresentacao         = pysc.data_converter_pysc(data=txt_dat_apresentacao),
71        tip_apresentacao         = rad_tip_apresentacao,
72        dat_publicacao           = pysc.data_converter_pysc(data=txt_dat_publicacao),
73        tip_origem_externa       = lst_tip_origem_externa,
74        num_origem_externa       = txt_num_origem_externa,
75        ano_origem_externa       = txt_ano_origem_externa,
76        dat_origem_externa       = pysc.data_converter_pysc(data=txt_dat_origem_externa),
77        cod_local_origem_externa = lst_cod_local_origem_externa,
78        nom_apelido              = txt_nom_apelido,
79        num_dias_prazo           = txt_num_dias_prazo,
80        dat_fim_prazo            = pysc.data_converter_pysc(data=txt_dat_fim_prazo),
81        ind_tramitacao           = rad_ind_tramitacao,
82        ind_polemica             = rad_ind_polemica,
83        des_objeto               = txt_des_objeto,
84        ind_complementar         = rad_ind_complementar,
85        cod_regime_tramitacao    = lst_cod_regime_tramitacao,
86        txt_ementa               = txa_txt_ementa,
87        txt_indexacao            = txa_txt_indexacao,
88        txt_observacao           = txa_txt_observacao)">
89  <dtml-except>
90    <dtml-let mensagem="'Houve um erro no banco de dados.'">
91      <dtml-var mensagem_emitir>
92    </dtml-let>
93  <dtml-else>
94    <dtml-if expr="hdn_url[-1:]=='='">
95        <dtml-in expr="zsql.materia_incluida_codigo_obter_zsql()">
96          <dtml-call expr="REQUEST.set('hdn_url', hdn_url + cod_materia)">
97          <dtml-call expr="REQUEST.set('codigo', cod_materia)">
98        </dtml-in>
99        <dtml-if temProposicao>
100          <dtml-in expr="zsql.proposicao_obter_zsql(cod_proposicao=hdn_cod_proposicao)">
101            <dtml-try>
102                <dtml-call expr="zsql.autoria_incluir_zsql(cod_autor          = cod_autor,
103                                                           cod_materia        = codigo,
104                                                           ind_primeiro_autor = 1)">
105                <dtml-call expr="REQUEST.set('erro_autor', 0)">
106            <dtml-except>
107                <dtml-call expr="REQUEST.set('erro_autor', 1)">
108            </dtml-try>
109          </dtml-in>
110        </dtml-if>
111    </dtml-if>
112
113    <dtml-call expr="REQUEST.set('erro', 0)">
114
115    <dtml-comment> Salva o arquivo do texto integral. Ciciliati. </dtml-comment>
116    <dtml-call expr="REQUEST.set('existe_arquivo', 0)">
117    <dtml-if radTipTxtIntegral>
118      <dtml-if hdn_cod_materia>
119        <dtml-call expr="REQUEST.set('id_documento', _.str(hdn_cod_materia)+'_texto_integral')">
120        <dtml-if expr="_.hasattr(sapl_documentos.materia,id_documento)">
121          <dtml-let documento="_.getattr(sapl_documentos.materia,id_documento) ">
122            <dtml-call expr="REQUEST.set('existe_arquivo', 1)">
123            <dtml-try>
124              <dtml-if expr="radTipTxtIntegral=='Prop'">
125                <dtml-let ok="pysc.proposicao_salvar_como_texto_integral_materia_pysc(hdn_cod_proposicao,hdn_cod_materia,1)">
126                  <dtml-if ok>
127                    <dtml-call expr="zsql.proposicao_registrar_recebimento_zsql(cod_proposicao = hdn_cod_proposicao,
128                                                                                dat_recebimento = pysc.data_atual_iso_pysc(),
129                                                                                cod_mat_ou_doc = _.int(hdn_cod_materia))">
130                    <dtml-call expr="pysc.proposicao_numeracao_pysc(cod_proposicao)">
131                  <dtml-else>
132                    <dtml-call expr="REQUEST.set('erro', 1)">
133                       <dtml-let mensagem="'Ocorreu erro ao salvar texto integral'+hdn_cod_materia">
134                         <dtml-var mensagem_emitir>
135                       </dtml-let>
136                  </dtml-if>
137                </dtml-let>
138              <dtml-else>
139                <dtml-call "documento.manage_upload(file=file_nom_arquivo)">
140              </dtml-if>
141            <dtml-except>
142              <dtml-call expr="REQUEST.set('erro', 1)">
143              <dtml-let mensagem="'Ocorreu erro ao tentar salvar texto integral'+hdn_cod_materia">
144                 <dtml-var mensagem_emitir>
145              </dtml-let>
146            </dtml-try>
147          </dtml-let>
148        </dtml-if>
149      <dtml-else>
150        <dtml-in expr="zsql.materia_incluida_codigo_obter_zsql()">
151          <dtml-call expr="REQUEST.set('id_documento', _.str(cod_materia)+'_texto_integral')">
152          <dtml-call expr="REQUEST.set('hdn_cod_materia', cod_materia)">
153        </dtml-in>
154      </dtml-if>
155
156      <dtml-if expr="not existe_arquivo">
157        <dtml-try>
158          <dtml-if expr="radTipTxtIntegral=='Prop'">
159            <dtml-let ok="pysc.proposicao_salvar_como_texto_integral_materia_pysc(hdn_cod_proposicao,hdn_cod_materia,0)">
160              <dtml-if ok>
161                <dtml-call expr="zsql.proposicao_registrar_recebimento_zsql(cod_proposicao = hdn_cod_proposicao,
162                                                                            dat_recebimento = pysc.data_atual_iso_pysc(),
163                                                                            cod_mat_ou_doc = _.int(hdn_cod_materia))">
164                <dtml-call expr="pysc.proposicao_numeracao_pysc(cod_proposicao)">
165              <dtml-else>
166                <dtml-call expr="REQUEST.set('erro', 1)">
167              </dtml-if>
168            </dtml-let>
169          <dtml-else>
170            <dtml-call expr="sapl_documentos.materia.manage_addFile(id_documento, file=file_nom_arquivo)">
171          </dtml-if>
172        <dtml-except>
173          <dtml-call expr="REQUEST.set('erro', 1)">
174          <dtml-let mensagem="'Não foi possível salvar o Texto Integral da Matéria: Tipo de matéria não identificado'">
175                  <dtml-var mensagem_emitir>
176          </dtml-let>
177        </dtml-try>
178      </dtml-if>
179    </dtml-if>
180
181
182        <dtml-if erro_autor>
183          <dtml-let mensagem="'Matéria salva com sucesso!Mas não foi possível salvar os dados da autoria. Faça inclusão manualmente.'">
184                <dtml-var mensagem_emitir>
185          </dtml-let>
186        <dtml-else>
187          <dtml-let mensagem="'Matéria salva com sucesso!'" sucesso="1" url="hdn_url" >
188            <dtml-var mensagem_emitir>
189          </dtml-let>
190        </dtml-if>     
191  </dtml-try>
192</dtml-unless>
Note: Veja TracBrowser para ajuda no uso do navegador do trac.
 

The contents and data of this website are published under license:
Creative Commons 4.0 Brasil - Atribuir Fonte - Compartilhar Igual.