Download as
Browse Code »

Commit 00a7f1b045ea55786e39dd83133bc756db12b3ab

Authored by Gelson
1 parent ec514ad0
Exists in master

Atualização

Showing 37 changed files with 1275 additions and 2127 deletions   Show diff stats
config.yml-dist
  Diff comments   View file @00a7f1b
... ... @@ -10,4 +10,4 @@ urbem:
10 10 birt:
11 11 port: 8080
12 12 port_ssl: 8443
13   - host:
  13 + host:
... ...
gestaoAdministrativa/fontes/PHP/framework/bancoDados/postgreSQL/PersistenteRelatorio.class.php
  Diff comments   View file @00a7f1b
... ... @@ -74,7 +74,7 @@ function PersistenteRelatorio()
74 74 * Método abstrato
75 75 * @access Public
76 76 */
77   -function geraRecordSet(&$rsRecordSet , $stOrder = "")
78   -{
79   -}
  77 +//function geraRecordSet(&$rsRecordSet , $stOrder = "")
  78 +//{
  79 +//}
80 80 }
... ...
gestaoAdministrativa/fontes/PHP/protocolo/protocolo/processos/incluiProcesso.php
  Diff comments   View file @00a7f1b
... ... @@ -32,7 +32,7 @@
32 32  
33 33 Casos de uso: uc-01.06.98
34 34  
35   - $Id: incluiProcesso.php 60298 2014-10-10 21:01:01Z arthur $
  35 + $Id: incluiProcesso.php 62399 2015-05-04 17:27:11Z jean $
36 36  
37 37 */
38 38  
... ... @@ -157,6 +157,7 @@ switch ($controle) {
157 157  
158 158 # Insere o processo no banco de dados e exibe mensagens
159 159 $processos = new processosLegado;
  160 +
160 161 $boProcessoIncluido = $processos->incluiProcesso($codProcesso,$_REQUEST["vinculo"],$codClassificacao,$codAssunto,$numCgm,$_REQUEST["numMatricula"],
161 162 $_REQUEST['numInscricao'],$_REQUEST["observacoes"],$_REQUEST["resumo"],$refAnterior,$processosAnexos,
162 163 Sessao::read('numCgm'),$codOrgao,$codUnidade,$codDpto,$codSetor,
... ...
gestaoAdministrativa/fontes/PHP/protocolo/protocolo/processos/interfaceProcessos.class.php
  Diff comments   View file @00a7f1b
... ... @@ -32,7 +32,7 @@
32 32  
33 33 * Casos de uso: uc-01.06.98
34 34  
35   - $Id: interfaceProcessos.class.php 62345 2015-04-27 18:46:06Z jean $
  35 + $Id: interfaceProcessos.class.php 62399 2015-05-04 17:27:11Z jean $
36 36 */
37 37  
38 38 include_once '../../../../../../gestaoAdministrativa/fontes/PHP/pacotes/FrameworkHTML.inc.php';
... ... @@ -594,6 +594,13 @@ function formIncluiProcesso($dadosForm="",$action="",$controle=0)
594 594 mensagem += '@A combo Assunto é obrigatória';
595 595 erro = true;
596 596 }
  597 +
  598 + campo = jq('#inCodOrganogramaClassificacao').val();
  599 +
  600 + if (campo=='0.00.00' || campo=='') {
  601 + mensagem += '@A combo Classificação de Encaminhamento de Processo é obrigatória';
  602 + erro = true;
  603 + }
597 604  
598 605 if (erro) {
599 606 jq('#botaoOk').attr('disabled','disabled');
... ...
gestaoAdministrativa/fontes/RPT/protocolo/report/design/arquivaProcessoDefinitivo.rptdesign
  Diff comments   View file @00a7f1b
1 1 <?xml version="1.0" encoding="UTF-8"?>
2   -<report xmlns="http://www.eclipse.org/birt/2005/design" version="3.2.23" id="1">
3   - <property name="comments">Copyright (c) 2007 &lt;&lt;Your Company Name here>></property>
4   - <property name="createdBy">Eclipse BIRT Designer Version 4.4.0.v201405191524 Build &lt;4.4.0.v20140606-1451></property>
  2 +<report xmlns="http://www.eclipse.org/birt/2005/design" version="3.2.20" id="1">
  3 + <property name="createdBy">Eclipse BIRT Designer Version 2.5.0.v20090603 Build &lt;2.5.0.v20090617-0630></property>
5 4 <property name="units">in</property>
  5 + <property name="comments">Copyright (c) 2007 &lt;&lt;Your Company Name here>></property>
6 6 <text-property name="displayName">Template Urbem Retrato</text-property>
7 7 <property name="layoutPreference">auto layout</property>
8 8 <list-property name="libraries">
... ... @@ -15,9 +15,9 @@
15 15 <scalar-parameter name="term_user" id="6666">
16 16 <property name="valueType">static</property>
17 17 <property name="dataType">string</property>
18   - <property name="distinct">true</property>
19 18 <property name="paramType">simple</property>
20 19 <property name="controlType">text-box</property>
  20 + <property name="distinct">true</property>
21 21 <structure name="format">
22 22 <property name="category">Unformatted</property>
23 23 </structure>
... ... @@ -27,9 +27,9 @@
27 27 <property name="valueType">static</property>
28 28 <property name="isRequired">false</property>
29 29 <property name="dataType">string</property>
30   - <property name="distinct">true</property>
31 30 <property name="paramType">simple</property>
32 31 <property name="controlType">text-box</property>
  32 + <property name="distinct">true</property>
33 33 <structure name="format">
34 34 <property name="category">Unformatted</property>
35 35 </structure>
... ... @@ -39,9 +39,9 @@
39 39 <property name="valueType">static</property>
40 40 <property name="isRequired">false</property>
41 41 <property name="dataType">string</property>
42   - <property name="distinct">true</property>
43 42 <property name="paramType">simple</property>
44 43 <property name="controlType">text-box</property>
  44 + <property name="distinct">true</property>
45 45 <structure name="format">
46 46 <property name="category">Unformatted</property>
47 47 </structure>
... ... @@ -51,12 +51,12 @@
51 51 <property name="valueType">static</property>
52 52 <property name="isRequired">false</property>
53 53 <property name="dataType">string</property>
54   - <property name="distinct">true</property>
55 54 <simple-property-list name="defaultValue">
56 55 <value type="constant">org.postgresql.Driver</value>
57 56 </simple-property-list>
58 57 <property name="paramType">simple</property>
59 58 <property name="controlType">text-box</property>
  59 + <property name="distinct">true</property>
60 60 <structure name="format">
61 61 <property name="category">Unformatted</property>
62 62 </structure>
... ... @@ -66,12 +66,12 @@
66 66 <property name="valueType">static</property>
67 67 <property name="isRequired">false</property>
68 68 <property name="dataType">string</property>
69   - <property name="distinct">true</property>
70 69 <simple-property-list name="defaultValue">
71 70 <value type="constant">jdbc:postgresql://172.16.30.4:5432/ga_mariana_1809_1910_1</value>
72 71 </simple-property-list>
73 72 <property name="paramType">simple</property>
74 73 <property name="controlType">text-box</property>
  74 + <property name="distinct">true</property>
75 75 <structure name="format">
76 76 <property name="category">Unformatted</property>
77 77 </structure>
... ... @@ -81,12 +81,12 @@
81 81 <property name="valueType">static</property>
82 82 <property name="isRequired">false</property>
83 83 <property name="dataType">string</property>
84   - <property name="distinct">true</property>
85 84 <simple-property-list name="defaultValue">
86 85 <value type="constant">sw.suporte</value>
87 86 </simple-property-list>
88 87 <property name="paramType">simple</property>
89 88 <property name="controlType">text-box</property>
  89 + <property name="distinct">true</property>
90 90 <structure name="format">
91 91 <property name="category">Unformatted</property>
92 92 </structure>
... ... @@ -96,12 +96,12 @@
96 96 <property name="valueType">static</property>
97 97 <property name="isRequired">false</property>
98 98 <property name="dataType">string</property>
99   - <property name="distinct">true</property>
100 99 <simple-property-list name="defaultValue">
101 100 <value type="constant">suporte</value>
102 101 </simple-property-list>
103 102 <property name="paramType">simple</property>
104 103 <property name="controlType">text-box</property>
  104 + <property name="distinct">true</property>
105 105 <structure name="format">
106 106 <property name="category">Unformatted</property>
107 107 </structure>
... ... @@ -110,9 +110,9 @@
110 110 <property name="valueType">static</property>
111 111 <property name="isRequired">false</property>
112 112 <property name="dataType">integer</property>
113   - <property name="distinct">true</property>
114 113 <property name="paramType">simple</property>
115 114 <property name="controlType">text-box</property>
  115 + <property name="distinct">true</property>
116 116 <structure name="format">
117 117 <property name="category">Unformatted</property>
118 118 </structure>
... ... @@ -121,10 +121,10 @@
121 121 <property name="valueType">static</property>
122 122 <property name="isRequired">false</property>
123 123 <property name="dataType">string</property>
124   - <property name="distinct">true</property>
125 124 <property name="paramType">simple</property>
126 125 <property name="concealValue">false</property>
127 126 <property name="controlType">text-box</property>
  127 + <property name="distinct">true</property>
128 128 <structure name="format">
129 129 <property name="category">Unformatted</property>
130 130 </structure>
... ... @@ -133,10 +133,10 @@
133 133 <property name="valueType">static</property>
134 134 <property name="isRequired">false</property>
135 135 <property name="dataType">string</property>
136   - <property name="distinct">true</property>
137 136 <property name="paramType">simple</property>
138 137 <property name="concealValue">false</property>
139 138 <property name="controlType">text-box</property>
  139 + <property name="distinct">true</property>
140 140 <structure name="format">
141 141 <property name="category">Unformatted</property>
142 142 </structure>
... ... @@ -145,9 +145,9 @@
145 145 <property name="valueType">static</property>
146 146 <property name="isRequired">false</property>
147 147 <property name="dataType">string</property>
148   - <property name="distinct">true</property>
149 148 <property name="paramType">simple</property>
150 149 <property name="controlType">text-box</property>
  150 + <property name="distinct">true</property>
151 151 <structure name="format">
152 152 <property name="category">Unformatted</property>
153 153 </structure>
... ... @@ -156,9 +156,9 @@
156 156 <property name="valueType">static</property>
157 157 <property name="isRequired">false</property>
158 158 <property name="dataType">string</property>
159   - <property name="distinct">true</property>
160 159 <property name="paramType">simple</property>
161 160 <property name="controlType">text-box</property>
  161 + <property name="distinct">true</property>
162 162 <structure name="format">
163 163 <property name="category">Unformatted</property>
164 164 </structure>
... ... @@ -167,10 +167,10 @@
167 167 <property name="valueType">static</property>
168 168 <property name="isRequired">false</property>
169 169 <property name="dataType">string</property>
170   - <property name="distinct">true</property>
171 170 <property name="paramType">simple</property>
172 171 <property name="concealValue">false</property>
173 172 <property name="controlType">text-box</property>
  173 + <property name="distinct">true</property>
174 174 <structure name="format">
175 175 <property name="category">Unformatted</property>
176 176 </structure>
... ... @@ -179,9 +179,9 @@
179 179 <property name="valueType">static</property>
180 180 <property name="isRequired">false</property>
181 181 <property name="dataType">string</property>
182   - <property name="distinct">true</property>
183 182 <property name="paramType">simple</property>
184 183 <property name="controlType">text-box</property>
  184 + <property name="distinct">true</property>
185 185 <structure name="format">
186 186 <property name="category">Unformatted</property>
187 187 </structure>
... ... @@ -190,23 +190,22 @@
190 190 <property name="valueType">static</property>
191 191 <property name="isRequired">false</property>
192 192 <property name="dataType">string</property>
193   - <property name="distinct">true</property>
194 193 <simple-property-list name="defaultValue">
195 194 <value type="constant"></value>
196 195 </simple-property-list>
197 196 <property name="paramType">simple</property>
198 197 <property name="controlType">text-box</property>
  198 + <property name="distinct">true</property>
199 199 <structure name="format">
200 200 <property name="category">Unformatted</property>
201 201 </structure>
202 202 </scalar-parameter>
203   - <scalar-parameter name="pEntidadePrincipal" id="6669">
  203 + <scalar-parameter name="pEntidadePrincipal" id="6668">
204 204 <property name="valueType">static</property>
205 205 <property name="dataType">string</property>
206   - <property name="distinct">true</property>
207   - <list-property name="selectionList"/>
208 206 <property name="paramType">simple</property>
209 207 <property name="controlType">text-box</property>
  208 + <property name="distinct">true</property>
210 209 <structure name="format">
211 210 <property name="category">Unformatted</property>
212 211 </structure>
... ... @@ -519,9 +518,8 @@ params[&#39;query&#39;] = this.queryText; ]]&gt;&lt;/method&gt;
519 518 </structure>
520 519 <structure>
521 520 <property name="name">valor</property>
522   - <expression name="expression" type="javascript">params["pEntidadePrincipal"] + ", " + params["pDataHoje"]</expression>
  521 + <expression name="expression">params["pEntidadePrincipal"] + ", " + params["pDataHoje"]</expression>
523 522 <property name="dataType">string</property>
524   - <property name="allowExport">true</property>
525 523 </structure>
526 524 <structure>
527 525 <property name="name">endereco</property>
... ... @@ -833,12 +831,14 @@ params[&#39;query&#39;] = this.queryText; ]]&gt;&lt;/method&gt;
833 831 <cell id="1776">
834 832 <property name="colSpan">3</property>
835 833 <property name="rowSpan">1</property>
836   - <text-data id="6670">
  834 + <data id="1678">
837 835 <property name="fontWeight">bold</property>
  836 + <property name="paddingTop">1pt</property>
  837 + <property name="paddingLeft">1pt</property>
  838 + <property name="paddingRight">10pt</property>
838 839 <property name="textAlign">center</property>
839   - <expression name="valueExpr">params["pEntidadePrincipal"] + ", " + params["pDataHoje"]</expression>
840   - <property name="contentType">html</property>
841   - </text-data>
  840 + <property name="resultSetColumn">valor</property>
  841 + </data>
842 842 </cell>
843 843 </row>
844 844 <row id="1897">
... ...
gestaoAdministrativa/fontes/RPT/protocolo/report/design/reciboProcesso.rptdesign
  Diff comments   View file @00a7f1b
1 1 <?xml version="1.0" encoding="UTF-8"?>
2   -<report xmlns="http://www.eclipse.org/birt/2005/design" version="3.2.23" id="1">
  2 +<report xmlns="http://www.eclipse.org/birt/2005/design" version="3.2.20" id="1">
  3 + <property name="createdBy">Eclipse BIRT Designer Version 2.5.0.v20090603 Build &lt;2.5.0.v20090617-0630></property>
  4 + <property name="units">in</property>
3 5 <property name="comments">Copyright (c) 2007 &lt;&lt;Your Company Name here>></property>
4   - <property name="createdBy">Eclipse BIRT Designer Version 4.4.0.v201405191524 Build &lt;4.4.0.v20140606-1451></property>
5 6 <list-property name="propertyBindings">
6 7 <structure>
7 8 <property name="name">queryText</property>
... ... @@ -20,7 +21,6 @@
20 21 <property name="id">1181</property>
21 22 </structure>
22 23 </list-property>
23   - <property name="units">in</property>
24 24 <text-property name="displayName">Template Urbem Retrato</text-property>
25 25 <property name="layoutPreference">auto layout</property>
26 26 <list-property name="libraries">
... ... @@ -33,9 +33,9 @@
33 33 <scalar-parameter name="term_user" id="6666">
34 34 <property name="valueType">static</property>
35 35 <property name="dataType">string</property>
36   - <property name="distinct">true</property>
37 36 <property name="paramType">simple</property>
38 37 <property name="controlType">text-box</property>
  38 + <property name="distinct">true</property>
39 39 <structure name="format">
40 40 <property name="category">Unformatted</property>
41 41 </structure>
... ... @@ -45,9 +45,9 @@
45 45 <property name="valueType">static</property>
46 46 <property name="isRequired">false</property>
47 47 <property name="dataType">string</property>
48   - <property name="distinct">true</property>
49 48 <property name="paramType">simple</property>
50 49 <property name="controlType">text-box</property>
  50 + <property name="distinct">true</property>
51 51 <structure name="format">
52 52 <property name="category">Unformatted</property>
53 53 </structure>
... ... @@ -57,9 +57,9 @@
57 57 <property name="valueType">static</property>
58 58 <property name="isRequired">false</property>
59 59 <property name="dataType">string</property>
60   - <property name="distinct">true</property>
61 60 <property name="paramType">simple</property>
62 61 <property name="controlType">text-box</property>
  62 + <property name="distinct">true</property>
63 63 <structure name="format">
64 64 <property name="category">Unformatted</property>
65 65 </structure>
... ... @@ -69,12 +69,12 @@
69 69 <property name="valueType">static</property>
70 70 <property name="isRequired">false</property>
71 71 <property name="dataType">string</property>
72   - <property name="distinct">true</property>
73 72 <simple-property-list name="defaultValue">
74 73 <value type="constant">org.postgresql.Driver</value>
75 74 </simple-property-list>
76 75 <property name="paramType">simple</property>
77 76 <property name="controlType">text-box</property>
  77 + <property name="distinct">true</property>
78 78 <structure name="format">
79 79 <property name="category">Unformatted</property>
80 80 </structure>
... ... @@ -84,12 +84,12 @@
84 84 <property name="valueType">static</property>
85 85 <property name="isRequired">false</property>
86 86 <property name="dataType">string</property>
87   - <property name="distinct">true</property>
88 87 <simple-property-list name="defaultValue">
89 88 <value type="constant">jdbc:postgresql://[ip]:5432/[database]</value>
90 89 </simple-property-list>
91 90 <property name="paramType">simple</property>
92 91 <property name="controlType">text-box</property>
  92 + <property name="distinct">true</property>
93 93 <structure name="format">
94 94 <property name="category">Unformatted</property>
95 95 </structure>
... ... @@ -99,12 +99,12 @@
99 99 <property name="valueType">static</property>
100 100 <property name="isRequired">false</property>
101 101 <property name="dataType">string</property>
102   - <property name="distinct">true</property>
103 102 <simple-property-list name="defaultValue">
104 103 <value type="constant">[usuario]</value>
105 104 </simple-property-list>
106 105 <property name="paramType">simple</property>
107 106 <property name="controlType">text-box</property>
  107 + <property name="distinct">true</property>
108 108 <structure name="format">
109 109 <property name="category">Unformatted</property>
110 110 </structure>
... ... @@ -114,12 +114,12 @@
114 114 <property name="valueType">static</property>
115 115 <property name="isRequired">false</property>
116 116 <property name="dataType">string</property>
117   - <property name="distinct">true</property>
118 117 <simple-property-list name="defaultValue">
119 118 <value type="constant">[usuario]</value>
120 119 </simple-property-list>
121 120 <property name="paramType">simple</property>
122 121 <property name="controlType">text-box</property>
  122 + <property name="distinct">true</property>
123 123 <structure name="format">
124 124 <property name="category">Unformatted</property>
125 125 </structure>
... ... @@ -128,9 +128,9 @@
128 128 <property name="valueType">static</property>
129 129 <property name="isRequired">false</property>
130 130 <property name="dataType">integer</property>
131   - <property name="distinct">true</property>
132 131 <property name="paramType">simple</property>
133 132 <property name="controlType">text-box</property>
  133 + <property name="distinct">true</property>
134 134 <structure name="format">
135 135 <property name="category">Unformatted</property>
136 136 </structure>
... ... @@ -139,10 +139,10 @@
139 139 <property name="valueType">static</property>
140 140 <property name="isRequired">false</property>
141 141 <property name="dataType">string</property>
142   - <property name="distinct">true</property>
143 142 <property name="paramType">simple</property>
144 143 <property name="concealValue">false</property>
145 144 <property name="controlType">text-box</property>
  145 + <property name="distinct">true</property>
146 146 <structure name="format">
147 147 <property name="category">Unformatted</property>
148 148 </structure>
... ... @@ -151,9 +151,9 @@
151 151 <property name="valueType">static</property>
152 152 <property name="isRequired">false</property>
153 153 <property name="dataType">string</property>
154   - <property name="distinct">true</property>
155 154 <property name="paramType">simple</property>
156 155 <property name="controlType">text-box</property>
  156 + <property name="distinct">true</property>
157 157 <structure name="format">
158 158 <property name="category">Unformatted</property>
159 159 </structure>
... ... @@ -162,10 +162,10 @@
162 162 <property name="valueType">static</property>
163 163 <property name="isRequired">false</property>
164 164 <property name="dataType">string</property>
165   - <property name="distinct">true</property>
166 165 <property name="paramType">simple</property>
167 166 <property name="concealValue">false</property>
168 167 <property name="controlType">text-box</property>
  168 + <property name="distinct">true</property>
169 169 <structure name="format">
170 170 <property name="category">Unformatted</property>
171 171 </structure>
... ... @@ -174,10 +174,10 @@
174 174 <property name="valueType">static</property>
175 175 <property name="isRequired">false</property>
176 176 <property name="dataType">string</property>
177   - <property name="distinct">true</property>
178 177 <property name="paramType">simple</property>
179 178 <property name="concealValue">false</property>
180 179 <property name="controlType">text-box</property>
  180 + <property name="distinct">true</property>
181 181 <structure name="format">
182 182 <property name="category">Unformatted</property>
183 183 </structure>
... ... @@ -186,9 +186,9 @@
186 186 <property name="valueType">static</property>
187 187 <property name="isRequired">false</property>
188 188 <property name="dataType">string</property>
189   - <property name="distinct">true</property>
190 189 <property name="paramType">simple</property>
191 190 <property name="controlType">text-box</property>
  191 + <property name="distinct">true</property>
192 192 <structure name="format">
193 193 <property name="category">Unformatted</property>
194 194 </structure>
... ... @@ -197,9 +197,9 @@
197 197 <property name="valueType">static</property>
198 198 <property name="isRequired">false</property>
199 199 <property name="dataType">string</property>
200   - <property name="distinct">true</property>
201 200 <property name="paramType">simple</property>
202 201 <property name="controlType">text-box</property>
  202 + <property name="distinct">true</property>
203 203 <structure name="format">
204 204 <property name="category">Unformatted</property>
205 205 </structure>
... ... @@ -208,9 +208,9 @@
208 208 <property name="valueType">static</property>
209 209 <property name="isRequired">false</property>
210 210 <property name="dataType">string</property>
211   - <property name="distinct">true</property>
212 211 <property name="paramType">simple</property>
213 212 <property name="controlType">text-box</property>
  213 + <property name="distinct">true</property>
214 214 <structure name="format">
215 215 <property name="category">Unformatted</property>
216 216 </structure>
... ... @@ -219,9 +219,9 @@
219 219 <property name="valueType">static</property>
220 220 <property name="isRequired">false</property>
221 221 <property name="dataType">string</property>
222   - <property name="distinct">true</property>
223 222 <property name="paramType">simple</property>
224 223 <property name="controlType">text-box</property>
  224 + <property name="distinct">true</property>
225 225 <structure name="format">
226 226 <property name="category">Unformatted</property>
227 227 </structure>
... ... @@ -233,10 +233,9 @@
233 233 <scalar-parameter name="pEntidadePrincipal" id="6686">
234 234 <property name="valueType">static</property>
235 235 <property name="dataType">string</property>
236   - <property name="distinct">true</property>
237   - <list-property name="selectionList"/>
238 236 <property name="paramType">simple</property>
239 237 <property name="controlType">text-box</property>
  238 + <property name="distinct">true</property>
240 239 <structure name="format">
241 240 <property name="category">Unformatted</property>
242 241 </structure>
... ... @@ -1395,7 +1394,7 @@ INNER JOIN sw_municipio
1395 1394 </structure>
1396 1395 <structure>
1397 1396 <property name="name">Column Binding</property>
1398   - <text-property name="displayName">cod_situacao</text-property>
  1397 + <property name="displayName">cod_situacao</property>
1399 1398 <expression name="expression">dataSetRow["cod_situacao"]</expression>
1400 1399 <property name="dataType">any</property>
1401 1400 </structure>
... ... @@ -1490,8 +1489,8 @@ INNER JOIN sw_municipio
1490 1489 </list-property>
1491 1490 <property name="pageBreakInterval">50</property>
1492 1491 <column id="1227">
1493   - <property name="textAlign">right</property>
1494 1492 <property name="width">1.6145833333in</property>
  1493 + <property name="textAlign">right</property>
1495 1494 </column>
1496 1495 <column id="1228">
1497 1496 <property name="width">0.3229166667in</property>
... ... @@ -2154,7 +2153,7 @@ INNER JOIN sw_municipio
2154 2153 </structure>
2155 2154 <structure>
2156 2155 <property name="name">valor</property>
2157   - <expression name="expression">dataSetRow["valor"]+', '</expression>
  2156 + <expression name="expression">params["pEntidadePrincipal"] + ', '</expression>
2158 2157 <property name="dataType">string</property>
2159 2158 </structure>
2160 2159 </list-property>
... ... @@ -2166,15 +2165,14 @@ INNER JOIN sw_municipio
2166 2165 <detail>
2167 2166 <row id="1618">
2168 2167 <cell id="1619">
2169   - <data id="6687">
  2168 + <data id="6688">
2170 2169 <property name="fontWeight">bold</property>
2171 2170 <property name="textAlign">right</property>
2172 2171 <list-property name="boundDataColumns">
2173 2172 <structure>
2174 2173 <property name="name">pEntidadePrincipal</property>
2175   - <expression name="expression" type="javascript">params["pEntidadePrincipal"] + ', '</expression>
  2174 + <expression name="expression">params["pEntidadePrincipal"].value + ', '</expression>
2176 2175 <property name="dataType">string</property>
2177   - <property name="allowExport">true</property>
2178 2176 </structure>
2179 2177 </list-property>
2180 2178 <property name="resultSetColumn">pEntidadePrincipal</property>
... ... @@ -2203,42 +2201,270 @@ INNER JOIN sw_municipio
2203 2201 <property name="marginTop">0pt</property>
2204 2202 <property name="paddingTop">1pt</property>
2205 2203 </label>
2206   - <grid name="assinaturas" id="6667" extends="urbem_221.assinaturas">
2207   - <overridden-values>
2208   - <ref-entry baseId="1215" id="1215"/>
2209   - <ref-entry baseId="1150" id="1150"/>
2210   - <ref-entry baseId="1151" id="6668"/>
2211   - <ref-entry baseId="1152" id="6669"/>
2212   - <ref-entry baseId="1218" id="1218"/>
2213   - <ref-entry baseId="1179" id="1179"/>
2214   - <ref-entry baseId="1213" id="6670"/>
2215   - <ref-entry baseId="1180" id="1180"/>
2216   - <ref-entry baseId="1183" name="NewTable2" id="1183"/>
2217   - <ref-entry baseId="1186" id="1186"/>
2218   - <ref-entry baseId="1187" id="6671"/>
2219   - <ref-entry baseId="1188" name="NewData122" id="6672"/>
2220   - <ref-entry baseId="1189" name="NewData132" id="6673"/>
2221   - <ref-entry baseId="1192" id="6674"/>
2222   - <ref-entry baseId="1216" id="1216"/>
2223   - <ref-entry baseId="1153" id="1153"/>
2224   - <ref-entry baseId="1214" id="6675"/>
2225   - <ref-entry baseId="1154" id="1154"/>
2226   - <ref-entry baseId="1157" name="NewTable" id="1157"/>
2227   - <ref-entry baseId="1160" id="1160"/>
2228   - <ref-entry baseId="1161" id="1161"/>
2229   - <ref-entry baseId="1167" name="NewData12" id="1167"/>
2230   - <ref-entry baseId="1168" name="NewData13" id="1168"/>
2231   - <ref-entry baseId="1164" id="1164"/>
2232   - <ref-entry baseId="1155" id="1155"/>
2233   - <ref-entry baseId="1156" id="1156"/>
2234   - <ref-entry baseId="1169" name="NewTable1" id="1169"/>
2235   - <ref-entry baseId="1172" id="1172"/>
2236   - <ref-entry baseId="1173" id="1173"/>
2237   - <ref-entry baseId="1174" name="NewData121" id="1174"/>
2238   - <ref-entry baseId="1175" name="NewData131" id="1175"/>
2239   - <ref-entry baseId="1178" id="1178"/>
2240   - <ref-entry baseId="1217" id="1217"/>
2241   - </overridden-values>
  2204 + <grid id="6789">
  2205 + <list-property name="visibility">
  2206 + <structure>
  2207 + <property name="format">all</property>
  2208 + <expression name="valueExpr">params["numero_assinatura"] == 0</expression>
  2209 + </structure>
  2210 + </list-property>
  2211 + <column id="6790">
  2212 + <property name="width">20%</property>
  2213 + </column>
  2214 + <column id="6806">
  2215 + <property name="width">25%</property>
  2216 + <property name="textAlign">center</property>
  2217 + </column>
  2218 + <column id="6791">
  2219 + <property name="width">10%</property>
  2220 + <property name="textAlign">center</property>
  2221 + </column>
  2222 + <column id="6792">
  2223 + <property name="width">25%</property>
  2224 + <property name="textAlign">center</property>
  2225 + </column>
  2226 + <column id="6793">
  2227 + <property name="width">20%</property>
  2228 + </column>
  2229 + <row id="6794">
  2230 + <cell id="6795"/>
  2231 + <cell id="6804">
  2232 + <property name="colSpan">3</property>
  2233 + <property name="rowSpan">1</property>
  2234 + <table name="NewTable21" id="6819">
  2235 + <property name="marginTop">0pt</property>
  2236 + <property name="width">100%</property>
  2237 + <property name="dataSet">urbem_221.assinaturas</property>
  2238 + <list-property name="visibility">
  2239 + <structure>
  2240 + <property name="format">all</property>
  2241 + <expression name="valueExpr">params["numero_assinatura"] > 1 || params["numero_assinatura"] == "" || params["numero_assinatura"] == ""</expression>
  2242 + </structure>
  2243 + </list-property>
  2244 + <list-property name="boundDataColumns">
  2245 + <structure>
  2246 + <property name="name">exercicio</property>
  2247 + <expression name="expression">dataSetRow["exercicio"]</expression>
  2248 + <property name="dataType">string</property>
  2249 + </structure>
  2250 + <structure>
  2251 + <property name="name">cod_entidade</property>
  2252 + <expression name="expression">dataSetRow["cod_entidade"]</expression>
  2253 + <property name="dataType">integer</property>
  2254 + </structure>
  2255 + <structure>
  2256 + <property name="name">numcgm</property>
  2257 + <expression name="expression">dataSetRow["numcgm"]</expression>
  2258 + <property name="dataType">integer</property>
  2259 + </structure>
  2260 + <structure>
  2261 + <property name="name">cargo</property>
  2262 + <expression name="expression">dataSetRow["cargo"]</expression>
  2263 + <property name="dataType">string</property>
  2264 + </structure>
  2265 + <structure>
  2266 + <property name="name">timestamp</property>
  2267 + <expression name="expression">dataSetRow["timestamp"]</expression>
  2268 + <property name="dataType">date-time</property>
  2269 + </structure>
  2270 + <structure>
  2271 + <property name="name">nom_cgm</property>
  2272 + <expression name="expression">dataSetRow["nom_cgm"]</expression>
  2273 + <property name="dataType">string</property>
  2274 + </structure>
  2275 + </list-property>
  2276 + <property name="pageBreakInterval">50</property>
  2277 + <column id="6824"/>
  2278 + <detail>
  2279 + <row id="6820">
  2280 + <list-property name="visibility">
  2281 + <structure>
  2282 + <property name="format">all</property>
  2283 + <expression name="valueExpr">(row.__rownum%2==1)</expression>
  2284 + </structure>
  2285 + </list-property>
  2286 + <cell id="6821">
  2287 + <property name="borderTopColor">#000000</property>
  2288 + <property name="borderTopStyle">solid</property>
  2289 + <property name="borderTopWidth">1px</property>
  2290 + <property name="paddingTop">1pt</property>
  2291 + <property name="paddingBottom">40pt</property>
  2292 + <data name="NewData1221" id="6822">
  2293 + <property name="fontFamily">serif</property>
  2294 + <property name="fontSize">medium</property>
  2295 + <property name="textAlign">center</property>
  2296 + <property name="resultSetColumn">nom_cgm</property>
  2297 + </data>
  2298 + <data name="NewData1321" id="6823">
  2299 + <property name="fontFamily">serif</property>
  2300 + <property name="fontSize">medium</property>
  2301 + <property name="textAlign">center</property>
  2302 + <property name="resultSetColumn">cargo</property>
  2303 + </data>
  2304 + </cell>
  2305 + </row>
  2306 + </detail>
  2307 + </table>
  2308 + </cell>
  2309 + <cell id="6798"/>
  2310 + </row>
  2311 + <row id="6799">
  2312 + <cell id="6800">
  2313 + <property name="colSpan">2</property>
  2314 + <property name="rowSpan">1</property>
  2315 + <table name="NewTable3" id="6807">
  2316 + <property name="width">100%</property>
  2317 + <property name="dataSet">urbem_221.assinaturas</property>
  2318 + <list-property name="visibility">
  2319 + <structure>
  2320 + <property name="format">all</property>
  2321 + <expression name="valueExpr">params["numero_assinatura"] &lt; 2 || params["numero_assinatura"] == "" || params["numero_assinatura"] == ""</expression>
  2322 + </structure>
  2323 + </list-property>
  2324 + <list-property name="boundDataColumns">
  2325 + <structure>
  2326 + <property name="name">exercicio</property>
  2327 + <expression name="expression">dataSetRow["exercicio"]</expression>
  2328 + <property name="dataType">string</property>
  2329 + </structure>
  2330 + <structure>
  2331 + <property name="name">cod_entidade</property>
  2332 + <expression name="expression">dataSetRow["cod_entidade"]</expression>
  2333 + <property name="dataType">integer</property>
  2334 + </structure>
  2335 + <structure>
  2336 + <property name="name">numcgm</property>
  2337 + <expression name="expression">dataSetRow["numcgm"]</expression>
  2338 + <property name="dataType">integer</property>
  2339 + </structure>
  2340 + <structure>
  2341 + <property name="name">cargo</property>
  2342 + <expression name="expression">dataSetRow["cargo"]</expression>
  2343 + <property name="dataType">string</property>
  2344 + </structure>
  2345 + <structure>
  2346 + <property name="name">timestamp</property>
  2347 + <expression name="expression">dataSetRow["timestamp"]</expression>
  2348 + <property name="dataType">date-time</property>
  2349 + </structure>
  2350 + <structure>
  2351 + <property name="name">nom_cgm</property>
  2352 + <expression name="expression">dataSetRow["nom_cgm"]</expression>
  2353 + <property name="dataType">string</property>
  2354 + </structure>
  2355 + </list-property>
  2356 + <property name="pageBreakInterval">50</property>
  2357 + <column id="6812"/>
  2358 + <detail>
  2359 + <row id="6808">
  2360 + <list-property name="visibility">
  2361 + <structure>
  2362 + <property name="format">all</property>
  2363 + <expression name="valueExpr">(row.__rownum%2==1)</expression>
  2364 + </structure>
  2365 + </list-property>
  2366 + <cell id="6809">
  2367 + <property name="borderTopColor">#000000</property>
  2368 + <property name="borderTopStyle">solid</property>
  2369 + <property name="borderTopWidth">1px</property>
  2370 + <property name="paddingTop">1pt</property>
  2371 + <property name="paddingBottom">40pt</property>
  2372 + <data name="NewData123" id="6810">
  2373 + <property name="fontFamily">serif</property>
  2374 + <property name="fontSize">medium</property>
  2375 + <property name="textAlign">center</property>
  2376 + <property name="resultSetColumn">nom_cgm</property>
  2377 + </data>
  2378 + <data name="NewData133" id="6811">
  2379 + <property name="fontFamily">serif</property>
  2380 + <property name="fontSize">medium</property>
  2381 + <property name="textAlign">center</property>
  2382 + <property name="resultSetColumn">cargo</property>
  2383 + </data>
  2384 + </cell>
  2385 + </row>
  2386 + </detail>
  2387 + </table>
  2388 + </cell>
  2389 + <cell id="6801"/>
  2390 + <cell id="6802">
  2391 + <property name="colSpan">2</property>
  2392 + <property name="rowSpan">1</property>
  2393 + <table name="NewTable11" id="6813">
  2394 + <property name="width">100%</property>
  2395 + <property name="dataSet">urbem_221.assinaturas</property>
  2396 + <list-property name="visibility">
  2397 + <structure>
  2398 + <property name="format">all</property>
  2399 + <expression name="valueExpr">params["numero_assinatura"] &lt; 2 || params["numero_assinatura"] == "" || params["numero_assinatura"] == ""</expression>
  2400 + </structure>
  2401 + </list-property>
  2402 + <list-property name="boundDataColumns">
  2403 + <structure>
  2404 + <property name="name">exercicio</property>
  2405 + <expression name="expression">dataSetRow["exercicio"]</expression>
  2406 + <property name="dataType">string</property>
  2407 + </structure>
  2408 + <structure>
  2409 + <property name="name">cod_entidade</property>
  2410 + <expression name="expression">dataSetRow["cod_entidade"]</expression>
  2411 + <property name="dataType">integer</property>
  2412 + </structure>
  2413 + <structure>
  2414 + <property name="name">numcgm</property>
  2415 + <expression name="expression">dataSetRow["numcgm"]</expression>
  2416 + <property name="dataType">integer</property>
  2417 + </structure>
  2418 + <structure>
  2419 + <property name="name">cargo</property>
  2420 + <expression name="expression">dataSetRow["cargo"]</expression>
  2421 + <property name="dataType">string</property>
  2422 + </structure>
  2423 + <structure>
  2424 + <property name="name">timestamp</property>
  2425 + <expression name="expression">dataSetRow["timestamp"]</expression>
  2426 + <property name="dataType">date-time</property>
  2427 + </structure>
  2428 + <structure>
  2429 + <property name="name">nom_cgm</property>
  2430 + <expression name="expression">dataSetRow["nom_cgm"]</expression>
  2431 + <property name="dataType">string</property>
  2432 + </structure>
  2433 + </list-property>
  2434 + <property name="pageBreakInterval">50</property>
  2435 + <column id="6818"/>
  2436 + <detail>
  2437 + <row id="6814">
  2438 + <list-property name="visibility">
  2439 + <structure>
  2440 + <property name="format">all</property>
  2441 + <expression name="valueExpr">(row.__rownum%2==0)</expression>
  2442 + </structure>
  2443 + </list-property>
  2444 + <cell id="6815">
  2445 + <property name="borderTopColor">#000000</property>
  2446 + <property name="borderTopStyle">solid</property>
  2447 + <property name="borderTopWidth">1px</property>
  2448 + <property name="paddingTop">1pt</property>
  2449 + <property name="paddingBottom">40pt</property>
  2450 + <data name="NewData1211" id="6816">
  2451 + <property name="fontFamily">serif</property>
  2452 + <property name="fontSize">medium</property>
  2453 + <property name="textAlign">center</property>
  2454 + <property name="resultSetColumn">nom_cgm</property>
  2455 + </data>
  2456 + <data name="NewData1311" id="6817">
  2457 + <property name="fontFamily">serif</property>
  2458 + <property name="fontSize">medium</property>
  2459 + <property name="textAlign">center</property>
  2460 + <property name="resultSetColumn">cargo</property>
  2461 + </data>
  2462 + </cell>
  2463 + </row>
  2464 + </detail>
  2465 + </table>
  2466 + </cell>
  2467 + </row>
2242 2468 </grid>
2243 2469 </body>
2244 2470 </report>
... ...
gestaoFinanceira/fontes/PHP/contabilidade/instancias/lancamentoContabil/FLAberturaRestosAPagar.php
  Diff comments   View file @00a7f1b
... ... @@ -33,7 +33,7 @@
33 33  
34 34 * @ignore
35 35  
36   - $Id: FLAberturaRestosAPagar.php 59612 2014-09-02 12:00:51Z gelson $
  36 + $Id: FLAberturaRestosAPagar.php 62406 2015-05-05 14:43:16Z franver $
37 37  
38 38 $Revision: $
39 39 $Name$
... ... @@ -73,17 +73,17 @@ $obHdnCtrl-&gt;setName ( &quot;stCtrl&quot; );
73 73 $obHdnCtrl->setValue( $stCtrl );
74 74  
75 75 $obRConfiguracao = new RConfiguracaoConfiguracao;
76   -$obRConfiguracao->setParametro('virada_GF');
  76 +$obRConfiguracao->setParametro('abertura_RP');
77 77 $obRConfiguracao->setExercicio( Sessao::getExercicio());
78   -$obRConfiguracao->setCodModulo( 10 );
79   -$obRConfiguracao->consultar();
  78 +$obRConfiguracao->setCodModulo( 9 );
  79 +$obRConfiguracao->consultar($boTransacao);
80 80  
81 81 $obHdnEval = new HiddenEval;
82 82 $obHdnEval->setName ( "stEval" );
83 83 $obHdnEval->setValue ( $stEval );
84 84  
85 85 if ( $obRConfiguracao->getValor() == 'T' ) {
86   - $stObs = "Este processo já foi executado! Se deseja prosseguir faça a Anulação de Restos à pagar primeiro!";
  86 + $stObs = "Este processo já foi executado! Se deseja prosseguir faça a Anulação de Restos à pagar primeiro!";
87 87 } else {
88 88 $stObs = "Este processo é lento devido aos cálculos de restos a pagar.<BR>Recomenda-se que o mesmo seja executado após o término do expediente.";
89 89 }
... ... @@ -102,7 +102,7 @@ $obFormulario-&gt;addHidden( $obHdnAcao );
102 102 $obFormulario->addHidden( $obHdnCtrl );
103 103 $obFormulario->addTitulo( "Restos a Pagar Abertura do Exercício." );
104 104 $obFormulario->addComponente($obLblObs);
105   -$obBtnOk = new Ok();
  105 +$obBtnOk = new Ok(true);
106 106 if ( $obRConfiguracao->getValor() != 'T') {
107 107 $obFormulario->defineBarra( array($obBtnOk) );
108 108 }
... ...
gestaoFinanceira/fontes/PHP/contabilidade/instancias/lancamentoContabil/FLCancelarAberturaRestosAPagar.php
  Diff comments   View file @00a7f1b
... ... @@ -35,7 +35,7 @@
35 35  
36 36 * @ignore
37 37  
38   - $Id: FLCancelarAberturaRestosAPagar.php 59612 2014-09-02 12:00:51Z gelson $
  38 + $Id: FLCancelarAberturaRestosAPagar.php 62406 2015-05-05 14:43:16Z franver $
39 39  
40 40 * Casos de uso:
41 41 */
... ... @@ -77,7 +77,17 @@ $obHdnEval = new HiddenEval;
77 77 $obHdnEval->setName ( "stEval" );
78 78 $obHdnEval->setValue ( $stEval );
79 79  
80   -$stObs = "Este processo é lento devido aos cálculos de restos a pagar.<BR>Recomenda-se que o mesmo seja executado após o término do expediente.";
  80 +$obRConfiguracao = new RConfiguracaoConfiguracao;
  81 +$obRConfiguracao->setParametro('abertura_RP');
  82 +$obRConfiguracao->setExercicio( Sessao::getExercicio());
  83 +$obRConfiguracao->setCodModulo( 9 );
  84 +$obRConfiguracao->consultar($boTransacao);
  85 +
  86 +if ( $obRConfiguracao->getValor() == 'T' ) {
  87 + $stObs = "Este processo é lento devido aos cálculos de restos a pagar.<BR>Recomenda-se que o mesmo seja executado após o término do expediente.";
  88 +} else {
  89 + $stObs = "Este processo já foi executado! Se deseja prosseguir faça a Abertura de Restos à pagar primeiro!";
  90 +}
81 91  
82 92 $obLblObs = new Label;
83 93 $obLblObs->setValue ( $stObs );
... ... @@ -95,9 +105,9 @@ $obFormulario-&gt;addTitulo( &quot;Cancelar Abertura de Restos a Pagar do Exercício.&quot;
95 105 $obFormulario->addComponente($obLblObs );
96 106 $obBtnOk = new Ok();
97 107 $obBtnOk ->obEvento->setOnClick('BloqueiaFrames(true,false); Salvar();' );
98   -
99   -$obFormulario->defineBarra( array($obBtnOk) );
100   -
  108 +if ( $obRConfiguracao->getValor() == 'T' ) {
  109 + $obFormulario->defineBarra( array($obBtnOk) );
  110 +}
101 111 $obFormulario->show();
102 112  
103 113 include_once '../../../../../../gestaoAdministrativa/fontes/PHP/framework/include/rodape.inc.php';
... ...
gestaoFinanceira/fontes/PHP/contabilidade/instancias/lancamentoContabil/PRAberturaRestosAPagar.php
  Diff comments   View file @00a7f1b
... ... @@ -32,7 +32,7 @@
32 32  
33 33 * @ignore
34 34  
35   - $Id: PRAberturaRestosAPagar.php 59612 2014-09-02 12:00:51Z gelson $
  35 + $Id: PRAberturaRestosAPagar.php 62406 2015-05-05 14:43:16Z franver $
36 36  
37 37 $Revision: 30668 $
38 38 $Name$
... ... @@ -41,14 +41,6 @@
41 41  
42 42 * Casos de uso: uc-02.02.31
43 43 */
44   -
45   -/*
46   -$Log$
47   -Revision 1.2 2006/07/05 20:50:57 cleisson
48   -Adicionada tag Log aos arquivos
49   -
50   -*/
51   -
52 44 include_once '../../../../../../gestaoAdministrativa/fontes/PHP/pacotes/FrameworkHTML.inc.php';
53 45 include_once '../../../../../../gestaoAdministrativa/fontes/PHP/framework/include/cabecalho.inc.php';
54 46 include_once ( CAM_GA_ADM_NEGOCIO."RConfiguracaoConfiguracao.class.php" );
... ... @@ -73,7 +65,16 @@ switch ($stAcao) {
73 65 case "incluir":
74 66  
75 67 $obFContabilidadeAberturaRestosAPagar->setDado("stExercicio", Sessao::getExercicio());
76   - $obErro = $obFContabilidadeAberturaRestosAPagar->gerarRestosAbertura($rsRecordSet, "");
  68 + $obErro = $obFContabilidadeAberturaRestosAPagar->gerarRestosAbertura($rsRecordSet, $boTransacao);
  69 + if (!$obErro->ocorreu()) {
  70 + $obRConfiguracao = new RConfiguracaoConfiguracao;
  71 + $obRConfiguracao->setParametro('abertura_RP');
  72 + $obRConfiguracao->setExercicio( Sessao::getExercicio());
  73 + $obRConfiguracao->setCodModulo( 9 );
  74 + $obRConfiguracao->setValor( 'T' );
  75 + $obErro = $obRConfiguracao->alterar($boTransacao);
  76 + }
  77 +
77 78 if ( !$obErro->ocorreu() ) {
78 79 SistemaLegado::alertaAviso($pgFilt."?stAcao=incluir","Geração de Abertura do Exercício - Restos a Pagar realizado.","pagar","aviso", Sessao::getId(), "../");
79 80 } else {
... ... @@ -81,4 +82,5 @@ switch ($stAcao) {
81 82 }
82 83 break;
83 84 }
  85 +SistemaLegado::LiberaFrames(true, false);
84 86 ?>
... ...
gestaoFinanceira/fontes/PHP/contabilidade/instancias/lancamentoContabil/PRCancelarAberturaRestosAPagar.php
  Diff comments   View file @00a7f1b
... ... @@ -35,7 +35,7 @@
35 35  
36 36 * @ignore
37 37  
38   - $Id: PRCancelarAberturaRestosAPagar.php 59612 2014-09-02 12:00:51Z gelson $
  38 + $Id: PRCancelarAberturaRestosAPagar.php 62406 2015-05-05 14:43:16Z franver $
39 39  
40 40 * Casos de uso:
41 41 */
... ... @@ -43,6 +43,7 @@
43 43 include_once '../../../../../../gestaoAdministrativa/fontes/PHP/pacotes/FrameworkHTML.inc.php';
44 44 include_once '../../../../../../gestaoAdministrativa/fontes/PHP/framework/include/cabecalho.inc.php';
45 45 include_once ( CAM_GF_CONT_NEGOCIO."RContabilidadeCancelarAberturaRestosAPagar.class.php" );
  46 +include_once ( CAM_GA_ADM_NEGOCIO."RConfiguracaoConfiguracao.class.php" );
46 47  
47 48 //Define o nome dos arquivos PHP
48 49 $stPrograma = "CancelarAberturaRestosAPagar";
... ... @@ -110,7 +111,15 @@ switch ($stAcao) {
110 111 }
111 112 #FIM DA CADEIA
112 113 }
113   - $obTransacao->fechaTransacao( $boFlagTransacao, $boTransacao, $obErro, $obRContabilidadeCancelarAberturaRestosAPagar->obTContabilidadeLote );
  114 + if (!$obErro->ocorreu()) {
  115 + $obRConfiguracao = new RConfiguracaoConfiguracao;
  116 + $obRConfiguracao->setParametro('abertura_RP');
  117 + $obRConfiguracao->setExercicio( Sessao::getExercicio());
  118 + $obRConfiguracao->setCodModulo( 9 );
  119 + $obRConfiguracao->setValor( 'F' );
  120 + $obErro = $obRConfiguracao->alterar($boTransacao);
  121 + }
  122 + $obTransacao->fechaTransacao( $boFlagTransacao, $boTransacao, $obErro, $obRContabilidadeCancelarAberturaRestosAPagar->obTContabilidadeLote );
114 123 }
115 124  
116 125 if (!$obErro->ocorreu()) {
... ...
gestaoFinanceira/fontes/PHP/orcamento/classes/mapeamento/TOrcamentoReceita.class.php
  Diff comments   View file @00a7f1b
... ... @@ -27,7 +27,7 @@
27 27 * @author Analista: Jorge B. Ribarr
28 28 * @author Desenvolvedor: Marcelo B. Paulino
29 29  
30   - $Id: TOrcamentoReceita.class.php 62365 2015-04-28 19:43:51Z carlos.silva $
  30 + $Id: TOrcamentoReceita.class.php 62404 2015-05-04 20:44:10Z arthur $
31 31  
32 32 * Casos de uso: uc-02.01.06, uc-02.04.04, uc-02.01.34, uc-02.04.03
33 33 */
... ... @@ -1034,349 +1034,6 @@ function montaRecuperaReceitaConfiguracaoLancamento()
1034 1034 return $stSql;
1035 1035 }
1036 1036  
1037   -function recuperaReceitaExportacao10(&$rsRecordSet, $boTransacao = "")
1038   -{
1039   - $obErro = new Erro;
1040   - $obConexao = new Conexao;
1041   - $rsRecordSet = new RecordSet;
1042   - $stSql = $this->montaRecuperaReceitaExportacao10();
1043   - $this->setDebug( $stSql);
1044   - $obErro = $obConexao->executaSQL( $rsRecordSet, $stSql, $boTransacao );
1045   -
1046   - return $obErro;
1047   -}
1048   -
1049   -function montaRecuperaReceitaExportacao10()
1050   -{
1051   - $stSql = "
1052   -
1053   - SELECT tipo_registro
1054   - , cod_receita_final AS cod_receita
1055   - , cod_orgao
1056   - , deducao_receita
1057   - , identificador_deducao
1058   - , CASE WHEN SUBSTR(natureza_receita::text, 1, 1) = '9'
1059   - THEN SUBSTR(natureza_receita::text, 2, 8)::integer
1060   - ELSE natureza_receita
1061   - END AS natureza_receita
1062   - , remove_acentos(especificacao) as especificacao
1063   - , CASE WHEN SUBSTR(cod_receita_final::VARCHAR, 1, 1) = '9'
1064   - THEN REPLACE(REPLACE(sum(tabela.vl_previsto)::VARCHAR,'.',','),'-','')
1065   - ELSE REPLACE(sum(tabela.vl_previsto)::VARCHAR,'.',',')
1066   - END AS vl_previsto
1067   - FROM (
1068   - SELECT 10::integer AS tipo_registro
1069   - , CASE WHEN SUBSTR(conta_receita.cod_estrutural, 1, 1) = '9'
1070   - THEN SUBSTR(REPLACE(conta_receita.cod_estrutural, '.', ''), 1, 9)::integer
1071   - ELSE CASE WHEN SUBSTR(REPLACE(conta_receita.cod_estrutural, '.', ''), 1, 8)::INTEGER = 17240101
1072   - OR SUBSTR(REPLACE(conta_receita.cod_estrutural, '.', ''), 1, 8)::INTEGER = 17240102
1073   - OR SUBSTR(REPLACE(conta_receita.cod_estrutural, '.', ''), 1, 8)::INTEGER = 17219903
1074   - THEN RPAD(SUBSTR(REPLACE(conta_receita.cod_estrutural, '.', ''), 1, 6), 8, '0')::INTEGER
1075   - WHEN SUBSTR(REPLACE(conta_receita.cod_estrutural, '.', ''), 1, 8)::INTEGER = 24210100
1076   - THEN '24210101'
1077   - WHEN SUBSTR(REPLACE(conta_receita.cod_estrutural, '.', ''), 1, 8)::INTEGER = 19319902
1078   - THEN '19319900'
1079   - ELSE SUBSTR(REPLACE(conta_receita.cod_estrutural, '.', ''), 1, 8)::INTEGER
1080   - END
1081   - END AS cod_receita_final
1082   - , configuracao_entidade.valor AS cod_orgao
1083   - , rec.masc_recurso_red AS recurso
1084   - , CASE WHEN SUBSTR(conta_receita.cod_estrutural, 1, 1) = '9'
1085   - THEN 1
1086   - ELSE 2
1087   - END AS deducao_receita
1088   - , valores_identificadores.cod_identificador::integer AS identificador_deducao
1089   - , CASE WHEN SUBSTR(conta_receita.cod_estrutural, 1, 1) = '9'
1090   - THEN SUBSTR(REPLACE(conta_receita.cod_estrutural, '.', ''), 1, 9)::integer
1091   - ELSE CASE WHEN SUBSTR(REPLACE(conta_receita.cod_estrutural, '.', ''), 1, 8)::INTEGER = 17240101
1092   - OR SUBSTR(REPLACE(conta_receita.cod_estrutural, '.', ''), 1, 8)::INTEGER = 17240102
1093   - OR SUBSTR(REPLACE(conta_receita.cod_estrutural, '.', ''), 1, 8)::INTEGER = 17219903
1094   - THEN RPAD(SUBSTR(REPLACE(conta_receita.cod_estrutural, '.', ''), 1, 6), 8, '0')::INTEGER
1095   - WHEN SUBSTR(REPLACE(conta_receita.cod_estrutural, '.', ''), 1, 8)::INTEGER = 24210100
1096   - THEN '24210101'
1097   - WHEN SUBSTR(REPLACE(conta_receita.cod_estrutural, '.', ''), 1, 8)::INTEGER = 19319902
1098   - THEN '19319900'
1099   - ELSE SUBSTR(REPLACE(conta_receita.cod_estrutural, '.', ''), 1, 8)::INTEGER
1100   - END
1101   - END AS natureza_receita
1102   - , CASE WHEN SUBSTR(conta_receita.cod_estrutural, 1, 1) = '9'
1103   - THEN (SELECT TRIM(o_cr.descricao)
1104   - FROM orcamento.conta_receita AS o_cr
1105   - WHERE o_cr.exercicio ='".Sessao::getExercicio()."'
1106   - AND RPAD(SUBSTR(REPLACE(conta_receita.cod_estrutural, '.', ''), 1, 9),15,'0') = REPLACE(o_cr.cod_estrutural,'.',''))
1107   - ELSE (SELECT TRIM(descricao)
1108   - FROM orcamento.conta_receita AS o_cr
1109   - WHERE o_cr.exercicio ='".Sessao::getExercicio()."'
1110   - AND RPAD(SUBSTR(REPLACE(conta_receita.cod_estrutural, '.', ''), 1, 8),14,'0') = REPLACE(o_cr.cod_estrutural,'.',''))
1111   - END AS especificacao
1112   - , CASE WHEN SUBSTR(conta_receita.cod_estrutural, 1, 1) = '9'
1113   - THEN detalhamento_receitas.arrecadado_periodo
1114   - ELSE ABS(detalhamento_receitas.arrecadado_periodo)
1115   - END AS vl_previsto
1116   - FROM orcamento.receita
1117   -
1118   - LEFT JOIN orcamento.recurso('".Sessao::getExercicio()."') as rec
1119   - ON rec.cod_recurso = receita.cod_recurso
1120   - AND rec.exercicio = receita.exercicio
1121   -
1122   - JOIN orcamento.conta_receita
1123   - ON conta_receita.cod_conta = receita.cod_conta
1124   - AND conta_receita.exercicio = receita.exercicio
1125   -
1126   - JOIN administracao.configuracao_entidade
1127   - ON configuracao_entidade.cod_entidade = receita.cod_entidade
1128   - AND configuracao_entidade.exercicio = receita.exercicio
1129   -
1130   - JOIN tcemg.fn_detalhamento_receitas('".Sessao::getExercicio()."','','".$this->getDado('dt_inicial')."','".$this->getDado('dt_final')."','".$this->getDado('entidades')."','','','','','','','')
1131   - AS detalhamento_receitas (
1132   - cod_estrutural varchar,
1133   - receita integer,
1134   - recurso varchar,
1135   - descricao varchar,
1136   - valor_previsto numeric,
1137   - arrecadado_periodo numeric,
1138   - arrecadado_ano numeric,
1139   - diferenca numeric
1140   - ) ON detalhamento_receitas.cod_estrutural = conta_receita.cod_estrutural
1141   - AND SUBSTR(detalhamento_receitas.cod_estrutural, 1, 1) != '9'
1142   -
1143   - LEFT JOIN tcemg.receita_indentificadores_peculiar_receita
1144   - ON receita_indentificadores_peculiar_receita.exercicio = receita.exercicio
1145   - AND receita_indentificadores_peculiar_receita.cod_receita = receita.cod_receita
1146   -
1147   - LEFT JOIN tcemg.valores_identificadores
1148   - ON valores_identificadores.cod_identificador = receita_indentificadores_peculiar_receita.cod_identificador
1149   -
1150   - WHERE receita.exercicio = '".Sessao::getExercicio()."'
1151   - AND receita.cod_entidade IN (".$this->getDado('entidades').")
1152   - AND configuracao_entidade.cod_modulo = 55
1153   - AND configuracao_entidade.parametro = 'tcemg_codigo_orgao_entidade_sicom'
1154   - --AND receita.vl_original <> 0.00
1155   - AND conta_receita.cod_conta NOT IN (384) -- Retirado esta conta devido a erro de cadastro do wallace, sendo cadastrada duas vezes.
1156   -
1157   - GROUP BY cod_receita_final
1158   - , conta_receita.cod_estrutural
1159   - , conta_receita.descricao
1160   - , cod_orgao
1161   - , identificador_deducao
1162   - , detalhamento_receitas.arrecadado_periodo
1163   - , rec.masc_recurso_red
1164   - UNION
1165   -
1166   - SELECT
1167   - 10::integer AS tipo_registro
1168   - , SUBSTR(REPLACE(conta_receita.cod_estrutural, '.', ''), 1, 9)::integer AS cod_receita_final
1169   - , LPAD(configuracao_entidade.valor::VARCHAR,2,'0') AS cod_orgao
1170   - , rec.masc_recurso_red AS recurso
1171   - , CASE WHEN SUBSTR(conta_receita.cod_estrutural, 1, 1) = '9'
1172   - THEN 1
1173   - ELSE 2
1174   - END AS deducao_receita
1175   - , valores_identificadores.cod_identificador AS indentificador_deducao
1176   - , SUBSTR(REPLACE(conta_receita.cod_estrutural, '.', ''), 1, 9)::integer AS natureza_receita
1177   - , TRIM(conta_receita.descricao) AS especificacao
1178   - , SUM(arrecadacao_receita_dedutora.vl_deducao) AS vl_previsto
1179   -
1180   - FROM orcamento.receita
1181   -
1182   - LEFT JOIN orcamento.recurso('".Sessao::getExercicio()."') as rec
1183   - ON rec.cod_recurso = receita.cod_recurso
1184   - AND rec.exercicio = receita.exercicio
1185   -
1186   - JOIN tesouraria.arrecadacao_receita_dedutora
1187   - ON arrecadacao_receita_dedutora.cod_receita_dedutora=receita.cod_receita
1188   - AND arrecadacao_receita_dedutora.exercicio=receita.exercicio
1189   - AND arrecadacao_receita_dedutora.timestamp_arrecadacao::date BETWEEN TO_DATE( '".$this->getDado('dt_inicial')."', 'dd/mm/yyyy' ) AND TO_DATE( '".$this->getDado('dt_final')."', 'dd/mm/yyyy' )
1190   -
1191   - JOIN administracao.configuracao_entidade
1192   - ON configuracao_entidade.cod_entidade = receita.cod_entidade
1193   - AND configuracao_entidade.exercicio = receita.exercicio
1194   -
1195   - JOIN orcamento.conta_receita
1196   - ON conta_receita.cod_conta = receita.cod_conta
1197   - AND conta_receita.exercicio = receita.exercicio
1198   -
1199   - LEFT JOIN tcemg.receita_indentificadores_peculiar_receita
1200   - ON receita_indentificadores_peculiar_receita.exercicio = receita.exercicio
1201   - AND receita_indentificadores_peculiar_receita.cod_receita = receita.cod_receita
1202   -
1203   - LEFT JOIN tcemg.valores_identificadores
1204   - ON valores_identificadores.cod_identificador = receita_indentificadores_peculiar_receita.cod_identificador
1205   -
1206   - WHERE receita.exercicio = '".Sessao::getExercicio()."'
1207   - AND receita.cod_entidade IN (".$this->getDado('entidades').")
1208   - AND configuracao_entidade.cod_modulo = 55
1209   - AND configuracao_entidade.parametro = 'tcemg_tipo_orgao_entidade_sicom'
1210   -
1211   - GROUP BY receita.cod_receita
1212   - , receita.exercicio
1213   - , cod_orgao
1214   - , conta_receita.cod_estrutural
1215   - , conta_receita.descricao
1216   - , indentificador_deducao
1217   - , natureza_receita
1218   - , especificacao
1219   - , rec.masc_recurso_red
1220   - ) AS tabela
1221   - WHERE tabela.vl_previsto<>0.00
1222   - GROUP BY tipo_registro, cod_orgao, deducao_receita, identificador_deducao, natureza_receita, cod_receita, especificacao
1223   - ORDER BY tabela.natureza_receita
1224   - ";
1225   -
1226   - return $stSql;
1227   -}
1228   -
1229   -function recuperaReceitaExportacao11(&$rsRecordSet, $boTransacao = "")
1230   -{
1231   - $obErro = new Erro;
1232   - $obConexao = new Conexao;
1233   - $rsRecordSet = new RecordSet;
1234   - $stSql = $this->montaRecuperaReceitaExportacao11();
1235   - $this->setDebug( $stSql);
1236   - $obErro = $obConexao->executaSQL( $rsRecordSet, $stSql, $boTransacao );
1237   -
1238   - return $obErro;
1239   -}
1240   -
1241   -function montaRecuperaReceitaExportacao11()
1242   -{
1243   - $stSql = "
1244   -
1245   - SELECT tipo_registro
1246   - , cod_receita
1247   - , cod_font_recursos
1248   - , REPLACE(REPLACE(sum(vl_arrecadado_fonte)::VARCHAR,'.',','),'-','') AS vl_arrecadado_fonte
1249   -
1250   - FROM(
1251   -
1252   - SELECT 11 AS tipo_registro
1253   - , CASE WHEN SUBSTR(conta_receita.cod_estrutural, 1, 1) = '9'
1254   - THEN SUBSTR(REPLACE(conta_receita.cod_estrutural, '.', ''), 1, 9)::integer
1255   - ELSE CASE WHEN SUBSTR(REPLACE(conta_receita.cod_estrutural, '.', ''), 1, 8)::INTEGER = 17240101
1256   - OR SUBSTR(REPLACE(conta_receita.cod_estrutural, '.', ''), 1, 8)::INTEGER = 17240102
1257   - OR SUBSTR(REPLACE(conta_receita.cod_estrutural, '.', ''), 1, 8)::INTEGER = 17219903
1258   - THEN RPAD(SUBSTR(REPLACE(conta_receita.cod_estrutural, '.', ''), 1, 6), 8, '0')::INTEGER
1259   - WHEN SUBSTR(REPLACE(conta_receita.cod_estrutural, '.', ''), 1, 8)::INTEGER = 24210100
1260   - THEN '24210101'
1261   - WHEN SUBSTR(REPLACE(conta_receita.cod_estrutural, '.', ''), 1, 8)::INTEGER = 19319902
1262   - THEN '19319900'
1263   - ELSE SUBSTR(REPLACE(conta_receita.cod_estrutural, '.', ''), 1, 8)::INTEGER
1264   - END
1265   - END AS cod_receita
1266   - , receita.cod_recurso::integer AS cod_font_recursos
1267   - , detalhamento_receitas.arrecadado_periodo AS vl_arrecadado_fonte
1268   -
1269   - FROM orcamento.receita
1270   -
1271   - JOIN orcamento.conta_receita
1272   - ON conta_receita.cod_conta = receita.cod_conta
1273   - AND conta_receita.exercicio = receita.exercicio
1274   -
1275   - JOIN (SELECT cod_estrutural
1276   - , receita
1277   - , recurso
1278   - , descricao
1279   - , sum(detalhamento.arrecadado_periodo) as arrecadado_periodo
1280   -
1281   - FROM
1282   - (
1283   - SELECT * FROM tcemg.fn_detalhamento_receitas('".Sessao::getExercicio()."','','".$this->getDado('dt_inicial')."','".$this->getDado('dt_final')."','".$this->getDado('entidades')."','','','','','','','')
1284   - AS detalhamento_receitas
1285   - (
1286   - cod_estrutural varchar,
1287   - receita integer,
1288   - recurso varchar,
1289   - descricao varchar,
1290   - valor_previsto numeric,
1291   - arrecadado_periodo numeric,
1292   - arrecadado_ano numeric,
1293   - diferenca numeric
1294   - )
1295   - WHERE SUBSTR(cod_estrutural, 1, 1) != '9'
1296   -
1297   - UNION
1298   -
1299   - SELECT conta_receita.cod_estrutural::varchar AS cod_estrutural
1300   - , receita.cod_receita AS receita
1301   - , rec.masc_recurso_red AS recurso
1302   - , TRIM(conta_receita.descricao)::varchar AS descricao
1303   - , 0.00::numeric AS valor_previsto
1304   - , SUM(arrecadacao_receita_dedutora.vl_deducao)::numeric AS arrecadado_periodo
1305   - , 0.00::numeric AS arrecadado_ano
1306   - , 0.00::numeric AS diferenca
1307   -
1308   - FROM orcamento.receita
1309   -
1310   - LEFT JOIN orcamento.recurso('".Sessao::getExercicio()."') as rec
1311   - ON rec.cod_recurso = receita.cod_recurso
1312   - AND rec.exercicio = receita.exercicio
1313   -
1314   - JOIN tesouraria.arrecadacao_receita_dedutora
1315   - ON arrecadacao_receita_dedutora.cod_receita_dedutora=receita.cod_receita
1316   - AND arrecadacao_receita_dedutora.exercicio=receita.exercicio
1317   - AND arrecadacao_receita_dedutora.timestamp_arrecadacao::date BETWEEN TO_DATE( '".$this->getDado('dt_inicial')."', 'dd/mm/yyyy' ) AND TO_DATE( '".$this->getDado('dt_final')."', 'dd/mm/yyyy' )
1318   -
1319   - JOIN administracao.configuracao_entidade
1320   - ON configuracao_entidade.cod_entidade = receita.cod_entidade
1321   - AND configuracao_entidade.exercicio = receita.exercicio
1322   -
1323   - JOIN orcamento.conta_receita
1324   - ON conta_receita.cod_conta = receita.cod_conta
1325   - AND conta_receita.exercicio = receita.exercicio
1326   -
1327   -
1328   - LEFT JOIN tcemg.receita_indentificadores_peculiar_receita
1329   - ON receita_indentificadores_peculiar_receita.exercicio = receita.exercicio
1330   - AND receita_indentificadores_peculiar_receita.cod_receita = receita.cod_receita
1331   -
1332   - LEFT JOIN tcemg.valores_identificadores
1333   - ON valores_identificadores.cod_identificador = receita_indentificadores_peculiar_receita.cod_identificador
1334   -
1335   - WHERE receita.exercicio = '".Sessao::getExercicio()."'
1336   - AND receita.cod_entidade IN (".$this->getDado('entidades').")
1337   - AND configuracao_entidade.cod_modulo = 55
1338   - AND configuracao_entidade.parametro = 'tcemg_tipo_orgao_entidade_sicom'
1339   -
1340   - GROUP BY receita.cod_receita
1341   - , receita.exercicio
1342   - , cod_estrutural
1343   - , conta_receita.descricao
1344   - , rec.masc_recurso_red
1345   - )
1346   - AS detalhamento
1347   - GROUP BY cod_estrutural
1348   - , receita
1349   - , recurso
1350   - , descricao
1351   - )
1352   - AS detalhamento_receitas
1353   - ON detalhamento_receitas.cod_estrutural = conta_receita.cod_estrutural
1354   -
1355   - WHERE receita.exercicio = '".Sessao::getExercicio()."'
1356   - AND receita.cod_entidade IN (".$this->getDado('entidades').")
1357   - --AND receita.vl_original <> 0.00
1358   - AND detalhamento_receitas.arrecadado_periodo <> 0.00
1359   -
1360   - GROUP BY receita.cod_receita
1361   - , receita.cod_recurso
1362   - , conta_receita.cod_estrutural
1363   - , detalhamento_receitas.arrecadado_periodo
1364   -
1365   - ORDER BY tipo_registro
1366   - , cod_receita
1367   - , cod_font_recursos
1368   -
1369   - ) AS tabela
1370   -
1371   - GROUP BY tipo_registro
1372   - , cod_receita
1373   - , cod_font_recursos
1374   -
1375   - ORDER BY tipo_registro, cod_receita, cod_font_recursos ";
1376   -
1377   - return $stSql;
1378   -}
1379   -
1380 1037 function recuperaReceitaExportacaoPlanejamento10(&$rsRecordSet, $boTransacao = "")
1381 1038 {
1382 1039 $obErro = new Erro;
... ... @@ -1692,882 +1349,6 @@ if ( Sessao::getExercicio() == &#39;2014&#39; ) {
1692 1349 return $stSql;
1693 1350 }
1694 1351  
1695   -function recuperaCorrecoesReceitas10(&$rsRecordSet, $boTransacao = "")
1696   -{
1697   - $obErro = new Erro;
1698   - $obConexao = new Conexao;
1699   - $rsRecordSet = new RecordSet;
1700   - $stSql = $this->montaRecuperaCorrecoesReceitas10();
1701   - $this->setDebug( $stSql);
1702   - $obErro = $obConexao->executaSQL( $rsRecordSet, $stSql, $boTransacao );
1703   -
1704   - return $obErro;
1705   -}
1706   -
1707   -function montaRecuperaCorrecoesReceitas10()
1708   -{
1709   - $stSql = "
1710   - SELECT
1711   - tipo_registro
1712   - , cod_correcao
1713   - , cod_orgao
1714   - , deducao_receita
1715   - , indentificador_deducao_reduzida
1716   - , natureza_receita_reduzida
1717   - , especificacao_reduzida
1718   - , identificador_acrescida
1719   - , natureza_receita_acrescida
1720   - , especificacao_acrescida
1721   - , SUM(vl_reduzido_acrescido) AS vl_reduzido_acrescido
1722   - , cod_receita
1723   - FROM (
1724   - SELECT
1725   - 10 AS tipo_registro
1726   - , receita.cod_receita
1727   - , receita.exercicio||SUBSTR(REPLACE(conta_receita.cod_estrutural, '.', ''), 1, 8) AS cod_correcao
1728   - , LPAD(configuracao_entidade.valor::VARCHAR,2,'0') AS cod_orgao
1729   - , CASE WHEN SUBSTR(conta_receita.cod_estrutural, 1, 1) = '9' THEN
1730   - 1
1731   - ELSE
1732   - 2
1733   - END AS deducao_receita
1734   - , valores_identificadores.cod_identificador AS indentificador_deducao_reduzida
1735   - , CASE WHEN SUBSTR(REPLACE(conta_receita.cod_estrutural, '.', ''), 1, 8) = '17240101'
1736   - THEN RPAD(SUBSTR(REPLACE(conta_receita.cod_estrutural, '.', ''), 1, 6), 8, '0')::INTEGER
1737   - ELSE SUBSTR(REPLACE(conta_receita.cod_estrutural, '.', ''), 1, 8)::INTEGER
1738   - END AS natureza_receita_reduzida
1739   - , TRIM(conta_receita.descricao) AS especificacao_reduzida
1740   - , '' AS identificador_acrescida
1741   - , '' AS natureza_receita_acrescida
1742   - , '' AS especificacao_acrescida
1743   - , SUM(arrecadacao_receita.vl_arrecadacao) AS vl_reduzido_acrescido
1744   -
1745   - FROM orcamento.receita
1746   -
1747   - JOIN tesouraria.arrecadacao_receita
1748   - ON arrecadacao_receita.cod_receita=receita.cod_receita
1749   - AND arrecadacao_receita.exercicio=receita.exercicio
1750   - AND arrecadacao_receita.timestamp_arrecadacao::date BETWEEN TO_DATE( '01/".$this->getDado('mes')."/".$this->getDado('exercicio')."', 'dd/mm/yyyy' ) AND last_day(TO_DATE('".$this->getDado('exercicio')."' || '-' || '".$this->getDado('mes')."' || '-' || '01','yyyy-mm-dd'))
1751   -
1752   - JOIN tesouraria.arrecadacao
1753   - ON arrecadacao.cod_arrecadacao=arrecadacao_receita.cod_arrecadacao
1754   - AND arrecadacao.exercicio=arrecadacao_receita.exercicio
1755   - AND arrecadacao.timestamp_arrecadacao=arrecadacao_receita.timestamp_arrecadacao
1756   - AND arrecadacao.devolucao=true
1757   -
1758   - JOIN administracao.configuracao_entidade
1759   - ON configuracao_entidade.cod_entidade = receita.cod_entidade
1760   - AND configuracao_entidade.exercicio = receita.exercicio
1761   -
1762   - JOIN orcamento.conta_receita
1763   - ON conta_receita.cod_conta = receita.cod_conta
1764   - AND conta_receita.exercicio = receita.exercicio
1765   -
1766   - LEFT JOIN tcemg.receita_indentificadores_peculiar_receita
1767   - ON receita_indentificadores_peculiar_receita.exercicio = receita.exercicio
1768   - AND receita_indentificadores_peculiar_receita.cod_receita = receita.cod_receita
1769   -
1770   - LEFT JOIN tcemg.valores_identificadores
1771   - ON valores_identificadores.cod_identificador = receita_indentificadores_peculiar_receita.cod_identificador
1772   -
1773   - WHERE receita.exercicio = '". $this->getDado('exercicio')."'
1774   - AND receita.cod_entidade IN (".$this->getDado('entidades').")
1775   - AND configuracao_entidade.cod_modulo = 55
1776   - AND configuracao_entidade.parametro = 'tcemg_tipo_orgao_entidade_sicom'
1777   -
1778   - GROUP BY receita.cod_receita
1779   - , receita.exercicio
1780   - , cod_orgao
1781   - , conta_receita.cod_estrutural
1782   - , conta_receita.descricao
1783   - , indentificador_deducao_reduzida
1784   - , natureza_receita_reduzida
1785   - , especificacao_reduzida
1786   - , identificador_acrescida
1787   - , natureza_receita_acrescida
1788   - , especificacao_acrescida
1789   -
1790   - UNION
1791   -
1792   - SELECT
1793   - 10 AS tipo_registro
1794   - , receita.cod_receita
1795   - , receita.exercicio||SUBSTR(REPLACE(conta_receita.cod_estrutural, '.', ''), 1, 8) AS cod_correcao
1796   - , LPAD(configuracao_entidade.valor::VARCHAR,2,'0') AS cod_orgao
1797   - , CASE WHEN SUBSTR(conta_receita.cod_estrutural, 1, 1) = '9' THEN
1798   - 1
1799   - ELSE
1800   - 2
1801   - END AS deducao_receita
1802   - , valores_identificadores.cod_identificador AS indentificador_deducao_reduzida
1803   - , CASE WHEN SUBSTR(REPLACE(conta_receita.cod_estrutural, '.', ''), 1, 8) = '17240101'
1804   - THEN RPAD(SUBSTR(REPLACE(conta_receita.cod_estrutural, '.', ''), 1, 6), 8, '0')::INTEGER
1805   - ELSE SUBSTR(REPLACE(conta_receita.cod_estrutural, '.', ''), 1, 8)::INTEGER
1806   - END AS natureza_receita_reduzida
1807   - , TRIM(conta_receita.descricao) AS especificacao_reduzida
1808   - , '' AS identificador_acrescida
1809   - , '' AS natureza_receita_acrescida
1810   - , '' AS especificacao_acrescida
1811   - , SUM(arrecadacao_estornada_receita.vl_estornado) AS vl_reduzido_acrescido
1812   -
1813   - FROM orcamento.receita
1814   -
1815   - JOIN tesouraria.arrecadacao_receita
1816   - ON arrecadacao_receita.cod_receita=receita.cod_receita
1817   - AND arrecadacao_receita.exercicio=receita.exercicio
1818   -
1819   - JOIN tesouraria.arrecadacao_estornada_receita
1820   - ON arrecadacao_estornada_receita.cod_arrecadacao=arrecadacao_receita.cod_arrecadacao
1821   - AND arrecadacao_estornada_receita.cod_receita=arrecadacao_receita.cod_receita
1822   - AND arrecadacao_estornada_receita.exercicio=arrecadacao_receita.exercicio
1823   - AND arrecadacao_estornada_receita.timestamp_arrecadacao=arrecadacao_receita.timestamp_arrecadacao
1824   - AND arrecadacao_estornada_receita.timestamp_estornada::date BETWEEN TO_DATE( '01/".$this->getDado('mes')."/".$this->getDado('exercicio')."', 'dd/mm/yyyy' ) AND last_day(TO_DATE('".$this->getDado('exercicio')."' || '-' || '".$this->getDado('mes')."' || '-' || '01','yyyy-mm-dd'))
1825   -
1826   - JOIN administracao.configuracao_entidade
1827   - ON configuracao_entidade.cod_entidade = receita.cod_entidade
1828   - AND configuracao_entidade.exercicio = receita.exercicio
1829   -
1830   - JOIN orcamento.conta_receita
1831   - ON conta_receita.cod_conta = receita.cod_conta
1832   - AND conta_receita.exercicio = receita.exercicio
1833   -
1834   - LEFT JOIN tcemg.receita_indentificadores_peculiar_receita
1835   - ON receita_indentificadores_peculiar_receita.exercicio = receita.exercicio
1836   - AND receita_indentificadores_peculiar_receita.cod_receita = receita.cod_receita
1837   -
1838   - LEFT JOIN tcemg.valores_identificadores
1839   - ON valores_identificadores.cod_identificador = receita_indentificadores_peculiar_receita.cod_identificador
1840   -
1841   - WHERE receita.exercicio = '". $this->getDado('exercicio')."'
1842   - AND receita.cod_entidade IN (".$this->getDado('entidades').")
1843   - AND configuracao_entidade.cod_modulo = 55
1844   - AND configuracao_entidade.parametro = 'tcemg_tipo_orgao_entidade_sicom'
1845   -
1846   - GROUP BY receita.cod_receita
1847   - , receita.exercicio
1848   - , cod_orgao
1849   - , conta_receita.cod_estrutural
1850   - , conta_receita.descricao
1851   - , indentificador_deducao_reduzida
1852   - , natureza_receita_reduzida
1853   - , especificacao_reduzida
1854   - , identificador_acrescida
1855   - , natureza_receita_acrescida
1856   - , especificacao_acrescida
1857   -
1858   - UNION
1859   -
1860   - SELECT
1861   - 10 AS tipo_registro
1862   - , receita.cod_receita
1863   - , receita.exercicio||SUBSTR(REPLACE(conta_receita.cod_estrutural, '.', ''), 1, 9) AS cod_correcao
1864   - , LPAD(configuracao_entidade.valor::VARCHAR,2,'0') AS cod_orgao
1865   - , CASE WHEN SUBSTR(conta_receita.cod_estrutural, 1, 1) = '9' THEN
1866   - 1
1867   - ELSE
1868   - 2
1869   - END AS deducao_receita
1870   - , valores_identificadores.cod_identificador AS indentificador_deducao_reduzida
1871   - , CASE WHEN SUBSTR(REPLACE(conta_receita.cod_estrutural, '.', ''), 1, 8) = '17240101'
1872   - THEN RPAD(SUBSTR(REPLACE(conta_receita.cod_estrutural, '.', ''), 1, 6), 8, '0')::INTEGER
1873   - ELSE SUBSTR(REPLACE(conta_receita.cod_estrutural, '.', ''), 1, 8)::INTEGER
1874   - END AS natureza_receita_reduzida
1875   - , TRIM(conta_receita.descricao) AS especificacao_reduzida
1876   - , '' AS identificador_acrescida
1877   - , '' AS natureza_receita_acrescida
1878   - , '' AS especificacao_acrescida
1879   - , SUM(redutora.vl_deducao) AS vl_reduzido_acrescido
1880   -
1881   - FROM orcamento.receita
1882   -
1883   - JOIN (SELECT tabela.cod_receita_dedutora
1884   - , tabela.exercicio
1885   - , SUM(tabela.vl_arrecadacao) AS vl_deducao
1886   - FROM(
1887   - SELECT arrecadacao_receita.cod_arrecadacao
1888   - , arrecadacao_receita.cod_receita AS cod_receita_dedutora
1889   - , arrecadacao_receita.exercicio
1890   - , arrecadacao_receita.vl_arrecadacao
1891   - FROM tesouraria.arrecadacao_receita
1892   - JOIN tesouraria.arrecadacao
1893   - ON arrecadacao.cod_arrecadacao=arrecadacao_receita.cod_arrecadacao
1894   - AND arrecadacao.exercicio=arrecadacao_receita.exercicio
1895   - AND arrecadacao.timestamp_arrecadacao=arrecadacao_receita.timestamp_arrecadacao
1896   - AND arrecadacao.devolucao=false
1897   - WHERE arrecadacao_receita.timestamp_arrecadacao::date BETWEEN TO_DATE( '01/".$this->getDado('mes')."/".$this->getDado('exercicio')."', 'dd/mm/yyyy' ) AND last_day(TO_DATE('".$this->getDado('exercicio')."' || '-' || '".$this->getDado('mes')."' || '-' || '01','yyyy-mm-dd'))
1898   -
1899   - UNION
1900   -
1901   - SELECT arrecadacao_receita_dedutora_estornada.cod_arrecadacao
1902   - , arrecadacao_receita_dedutora_estornada.cod_receita_dedutora
1903   - , arrecadacao_receita_dedutora_estornada.exercicio
1904   - , arrecadacao_receita_dedutora_estornada.vl_estornado AS vl_arrecadacao
1905   - FROM tesouraria.arrecadacao_receita_dedutora_estornada
1906   - WHERE arrecadacao_receita_dedutora_estornada.timestamp_dedutora_estornada::date BETWEEN TO_DATE( '01/".$this->getDado('mes')."/".$this->getDado('exercicio')."', 'dd/mm/yyyy' ) AND last_day(TO_DATE('".$this->getDado('exercicio')."' || '-' || '".$this->getDado('mes')."' || '-' || '01','yyyy-mm-dd'))
1907   - ) AS tabela
1908   - GROUP BY tabela.cod_receita_dedutora
1909   - , tabela.exercicio
1910   - , tabela.vl_arrecadacao
1911   - ) AS redutora
1912   - ON redutora.cod_receita_dedutora=receita.cod_receita
1913   - AND redutora.exercicio=receita.exercicio
1914   -
1915   - JOIN administracao.configuracao_entidade
1916   - ON configuracao_entidade.cod_entidade = receita.cod_entidade
1917   - AND configuracao_entidade.exercicio = receita.exercicio
1918   -
1919   - JOIN orcamento.conta_receita
1920   - ON conta_receita.cod_conta = receita.cod_conta
1921   - AND conta_receita.exercicio = receita.exercicio
1922   - AND SUBSTR(conta_receita.cod_estrutural, 1, 1) = '9'
1923   -
1924   - LEFT JOIN tcemg.receita_indentificadores_peculiar_receita
1925   - ON receita_indentificadores_peculiar_receita.exercicio = receita.exercicio
1926   - AND receita_indentificadores_peculiar_receita.cod_receita = receita.cod_receita
1927   -
1928   - LEFT JOIN tcemg.valores_identificadores
1929   - ON valores_identificadores.cod_identificador = receita_indentificadores_peculiar_receita.cod_identificador
1930   -
1931   - WHERE receita.exercicio = '". $this->getDado('exercicio')."'
1932   - AND receita.cod_entidade IN (".$this->getDado('entidades').")
1933   - AND configuracao_entidade.cod_modulo = 55
1934   - AND configuracao_entidade.parametro = 'tcemg_tipo_orgao_entidade_sicom'
1935   -
1936   - GROUP BY receita.cod_receita
1937   - , receita.exercicio
1938   - , cod_orgao
1939   - , conta_receita.cod_estrutural
1940   - , conta_receita.descricao
1941   - , indentificador_deducao_reduzida
1942   - , natureza_receita_reduzida
1943   - , especificacao_reduzida
1944   - , identificador_acrescida
1945   - , natureza_receita_acrescida
1946   - , especificacao_acrescida
1947   -
1948   - ) AS consulta
1949   - GROUP BY
1950   - tipo_registro
1951   - , cod_receita
1952   - , cod_correcao
1953   - , cod_orgao
1954   - , deducao_receita
1955   - , indentificador_deducao_reduzida
1956   - , natureza_receita_reduzida
1957   - , especificacao_reduzida
1958   - , identificador_acrescida
1959   - , natureza_receita_acrescida
1960   - , especificacao_acrescida
1961   -
1962   - ORDER BY consulta.cod_receita
1963   -
1964   - ";
1965   -
1966   - return $stSql;
1967   -}
1968   -
1969   -function recuperaCorrecoesReceitas11(&$rsRecordSet, $boTransacao = "")
1970   -{
1971   - $obErro = new Erro;
1972   - $obConexao = new Conexao;
1973   - $rsRecordSet = new RecordSet;
1974   - $stSql = $this->montaRecuperaCorrecoesReceitas11();
1975   - $this->setDebug( $stSql);
1976   - $obErro = $obConexao->executaSQL( $rsRecordSet, $stSql, $boTransacao );
1977   -
1978   - return $obErro;
1979   -}
1980   -
1981   -function montaRecuperaCorrecoesReceitas11()
1982   -{
1983   - $stSql = "
1984   - SELECT
1985   - tipo_registro
1986   - , cod_correcao
1987   - , cod_fonte_reduzida
1988   - , SUM(vl_reduzido_acrescido) AS vl_reduzido_fonte
1989   - , cod_receita
1990   - FROM (
1991   - SELECT 11 AS tipo_registro
1992   - , receita.cod_receita
1993   - , receita.exercicio||SUBSTR(REPLACE(conta_receita.cod_estrutural, '.', ''), 1, 8) AS cod_correcao
1994   - , receita.cod_recurso AS cod_fonte_reduzida
1995   - , SUM(valor_lancamento.vl_lancamento) AS vl_reduzido_acrescido
1996   -
1997   - FROM contabilidade.lancamento_receita
1998   -
1999   - JOIN contabilidade.lancamento
2000   - ON lancamento.exercicio=lancamento_receita.exercicio
2001   - AND lancamento.cod_entidade=lancamento_receita.cod_entidade
2002   - AND lancamento.tipo=lancamento_receita.tipo
2003   - AND lancamento.cod_lote=lancamento_receita.cod_lote
2004   - AND lancamento.sequencia=lancamento_receita.sequencia
2005   -
2006   - JOIN contabilidade.lote
2007   - ON lancamento.exercicio=lote.exercicio
2008   - AND lancamento.cod_entidade=lote.cod_entidade
2009   - AND lancamento.tipo=lote.tipo
2010   - AND lancamento.cod_lote=lote.cod_lote
2011   -
2012   - JOIN contabilidade.valor_lancamento
2013   - ON lancamento.exercicio=valor_lancamento.exercicio
2014   - AND lancamento.cod_entidade=valor_lancamento.cod_entidade
2015   - AND lancamento.tipo=valor_lancamento.tipo
2016   - AND lancamento.cod_lote=valor_lancamento.cod_lote
2017   - AND lancamento.sequencia=valor_lancamento.sequencia
2018   - AND valor_lancamento.tipo_valor='D'
2019   -
2020   - JOIN orcamento.receita
2021   - ON receita.cod_receita=lancamento_receita.cod_receita
2022   - AND receita.exercicio=lancamento_receita.exercicio
2023   -
2024   - JOIN orcamento.conta_receita
2025   - ON receita.cod_conta=conta_receita.cod_conta
2026   - AND receita.exercicio=conta_receita.exercicio
2027   - AND SUBSTR(conta_receita.cod_estrutural, 1, 1) != '9'
2028   -
2029   - LEFT JOIN orcamento.recurso('". $this->getDado('exercicio')."') as rec
2030   - ON rec.cod_recurso=receita.cod_recurso
2031   - AND rec.exercicio=receita.exercicio
2032   -
2033   - WHERE estorno=true
2034   - AND lote.dt_lote BETWEEN TO_DATE( '01/".$this->getDado('mes')."/".$this->getDado('exercicio')."', 'dd/mm/yyyy' ) AND last_day(TO_DATE('".$this->getDado('exercicio')."' || '-' || '".$this->getDado('mes')."' || '-' || '01','yyyy-mm-dd'))
2035   - AND receita.cod_entidade IN (".$this->getDado('entidades').")
2036   -
2037   - GROUP BY tipo_registro
2038   -
2039   - , receita.cod_receita
2040   - , receita.exercicio
2041   - , conta_receita.cod_estrutural
2042   - , receita.cod_recurso
2043   -
2044   - UNION
2045   -
2046   - SELECT
2047   - 11 AS tipo_registro
2048   - , receita.cod_receita
2049   - , receita.exercicio||SUBSTR(REPLACE(conta_receita.cod_estrutural, '.', ''), 1, 9) AS cod_correcao
2050   - , receita.cod_recurso AS cod_fonte_reduzida
2051   - , SUM(redutora.vl_deducao) AS vl_reduzido_acrescido
2052   -
2053   - FROM orcamento.receita
2054   -
2055   - JOIN (SELECT tabela.cod_receita_dedutora
2056   - , tabela.exercicio
2057   - , SUM(tabela.vl_arrecadacao) AS vl_deducao
2058   - FROM(
2059   - SELECT arrecadacao_receita.cod_arrecadacao
2060   - , arrecadacao_receita.cod_receita AS cod_receita_dedutora
2061   - , arrecadacao_receita.exercicio
2062   - , arrecadacao_receita.vl_arrecadacao
2063   - FROM tesouraria.arrecadacao_receita
2064   - JOIN tesouraria.arrecadacao
2065   - ON arrecadacao.cod_arrecadacao=arrecadacao_receita.cod_arrecadacao
2066   - AND arrecadacao.exercicio=arrecadacao_receita.exercicio
2067   - AND arrecadacao.timestamp_arrecadacao=arrecadacao_receita.timestamp_arrecadacao
2068   - AND arrecadacao.devolucao=false
2069   - WHERE arrecadacao_receita.timestamp_arrecadacao::date BETWEEN TO_DATE( '01/".$this->getDado('mes')."/".$this->getDado('exercicio')."', 'dd/mm/yyyy' ) AND last_day(TO_DATE('".$this->getDado('exercicio')."' || '-' || '".$this->getDado('mes')."' || '-' || '01','yyyy-mm-dd'))
2070   -
2071   - UNION
2072   -
2073   - SELECT arrecadacao_receita_dedutora_estornada.cod_arrecadacao
2074   - , arrecadacao_receita_dedutora_estornada.cod_receita_dedutora
2075   - , arrecadacao_receita_dedutora_estornada.exercicio
2076   - , arrecadacao_receita_dedutora_estornada.vl_estornado AS vl_arrecadacao
2077   - FROM tesouraria.arrecadacao_receita_dedutora_estornada
2078   - WHERE arrecadacao_receita_dedutora_estornada.timestamp_dedutora_estornada::date BETWEEN TO_DATE( '01/".$this->getDado('mes')."/".$this->getDado('exercicio')."', 'dd/mm/yyyy' ) AND last_day(TO_DATE('".$this->getDado('exercicio')."' || '-' || '".$this->getDado('mes')."' || '-' || '01','yyyy-mm-dd'))
2079   - ) AS tabela
2080   - GROUP BY tabela.cod_receita_dedutora
2081   - , tabela.exercicio
2082   - , tabela.vl_arrecadacao
2083   - ) AS redutora
2084   - ON redutora.cod_receita_dedutora=receita.cod_receita
2085   - AND redutora.exercicio=receita.exercicio
2086   -
2087   - JOIN administracao.configuracao_entidade
2088   - ON configuracao_entidade.cod_entidade = receita.cod_entidade
2089   - AND configuracao_entidade.exercicio = receita.exercicio
2090   -
2091   - JOIN orcamento.conta_receita
2092   - ON conta_receita.cod_conta = receita.cod_conta
2093   - AND conta_receita.exercicio = receita.exercicio
2094   - AND SUBSTR(conta_receita.cod_estrutural, 1, 1) = '9'
2095   -
2096   - LEFT JOIN tcemg.receita_indentificadores_peculiar_receita
2097   - ON receita_indentificadores_peculiar_receita.exercicio = receita.exercicio
2098   - AND receita_indentificadores_peculiar_receita.cod_receita = receita.cod_receita
2099   -
2100   - LEFT JOIN tcemg.valores_identificadores
2101   - ON valores_identificadores.cod_identificador = receita_indentificadores_peculiar_receita.cod_identificador
2102   -
2103   - WHERE receita.exercicio = '". $this->getDado('exercicio')."'
2104   - AND receita.cod_entidade IN (".$this->getDado('entidades').")
2105   - AND configuracao_entidade.cod_modulo = 55
2106   - AND configuracao_entidade.parametro = 'tcemg_tipo_orgao_entidade_sicom'
2107   -
2108   - GROUP BY receita.cod_receita
2109   - , receita.exercicio
2110   - , conta_receita.cod_estrutural
2111   -
2112   - ) AS consulta
2113   - GROUP BY
2114   - tipo_registro
2115   - , cod_receita
2116   - , cod_correcao
2117   - , cod_fonte_reduzida
2118   -
2119   - ORDER BY consulta.cod_receita
2120   - ";
2121   - return $stSql;
2122   -}
2123   -
2124   -function recuperaCorrecoesReceitas12(&$rsRecordSet, $boTransacao = "")
2125   -{
2126   - $obErro = new Erro;
2127   - $obConexao = new Conexao;
2128   - $rsRecordSet = new RecordSet;
2129   - $stSql = $this->montaRecuperaCorrecoesReceitas12();
2130   - $this->setDebug( $stSql);
2131   - $obErro = $obConexao->executaSQL( $rsRecordSet, $stSql, $boTransacao );
2132   -
2133   - return $obErro;
2134   -}
2135   -
2136   -function montaRecuperaCorrecoesReceitas12()
2137   -{
2138   - $stSql = "
2139   - SELECT 12 AS tipo_registro
2140   - , receita.cod_receita||''||receita.cod_recurso||receita.cod_entidade||receita.exercicio AS cod_correcao
2141   - , 0 AS cod_fonte_acrescida
2142   - , 0 AS vl_acrescido_fonte
2143   - FROM orcamento.receita
2144   - JOIN orcamento.previsao_receita
2145   - ON previsao_receita.cod_receita = receita.cod_receita
2146   - AND previsao_receita.exercicio = receita.exercicio
2147   - WHERE receita.exercicio = '".Sessao::getExercicio()."'
2148   - AND receita.cod_entidade IN (".$this->getDado('entidades').")
2149   - GROUP BY receita.cod_receita
2150   - , receita.cod_recurso
2151   - , receita.cod_entidade
2152   - , receita.exercicio
2153   - ";
2154   -
2155   - return $stSql;
2156   -}
2157   -
2158   -function recuperaCorrecoesReceitas20(&$rsRecordSet, $boTransacao = "")
2159   -{
2160   - $obErro = new Erro;
2161   - $obConexao = new Conexao;
2162   - $rsRecordSet = new RecordSet;
2163   - $stSql = $this->montaRecuperaCorrecoesReceitas20();
2164   - $this->setDebug( $stSql);
2165   - $obErro = $obConexao->executaSQL( $rsRecordSet, $stSql, $boTransacao );
2166   -
2167   - return $obErro;
2168   -}
2169   -
2170   -function montaRecuperaCorrecoesReceitas20()
2171   -{
2172   - $stSql = "
2173   - SELECT
2174   - tipo_registro
2175   - , '20'||cod_correcao AS cod_estorno
2176   - , cod_orgao
2177   - , deducao_receita
2178   - , indentificador_deducao_reduzida AS identificador_deducao
2179   - , natureza_receita_reduzida AS natureza_receita_estornada
2180   - ,( SELECT sem_acentos(descricao) as descricao
2181   - FROM orcamento.conta_receita
2182   - WHERE REPLACE(conta_receita.cod_estrutural, '.', '')::TEXT = RPAD(natureza_receita_reduzida::TEXT, 14, '0')::TEXT
2183   - AND exercicio = '".$this->getDado('exercicio')."'
2184   - ) AS especificacao_estornada
2185   - , SUM(vl_reduzido_acrescido) AS vl_estornado
2186   - , cod_correcao
2187   -
2188   - FROM (
2189   - SELECT
2190   - 20 AS tipo_registro
2191   - , receita.cod_receita
2192   - , LPAD(configuracao_entidade.valor::VARCHAR,2,'0') AS cod_orgao
2193   - , CASE WHEN SUBSTR(conta_receita.cod_estrutural, 1, 1) = '9' THEN
2194   - 1
2195   - ELSE
2196   - 2
2197   - END AS deducao_receita
2198   - , valores_identificadores.cod_identificador AS indentificador_deducao_reduzida
2199   - , CASE WHEN SUBSTR(REPLACE(conta_receita.cod_estrutural, '.', ''), 1, 8) = '17240101'
2200   - THEN RPAD(SUBSTR(REPLACE(conta_receita.cod_estrutural, '.', ''), 1, 6), 8, '0')::INTEGER
2201   - ELSE SUBSTR(REPLACE(conta_receita.cod_estrutural, '.', ''), 1, 8)::INTEGER
2202   - END AS natureza_receita_reduzida
2203   - , SUM(arrecadacao_receita.vl_arrecadacao) AS vl_reduzido_acrescido
2204   - , CASE WHEN SUBSTR(REPLACE(conta_receita.cod_estrutural, '.', ''), 1, 8) = '17240101'
2205   - THEN receita.exercicio||RPAD(SUBSTR(REPLACE(conta_receita.cod_estrutural, '.', ''), 1, 6), 8, '0')::INTEGER
2206   - ELSE receita.exercicio||SUBSTR(REPLACE(conta_receita.cod_estrutural, '.', ''), 1, 8)::INTEGER
2207   - END AS cod_correcao
2208   -
2209   - FROM orcamento.receita
2210   -
2211   - JOIN tesouraria.arrecadacao_receita
2212   - ON arrecadacao_receita.cod_receita=receita.cod_receita
2213   - AND arrecadacao_receita.exercicio=receita.exercicio
2214   - AND arrecadacao_receita.timestamp_arrecadacao::date BETWEEN TO_DATE( '01/".$this->getDado('mes')."/".$this->getDado('exercicio')."', 'dd/mm/yyyy' ) AND last_day(TO_DATE('".$this->getDado('exercicio')."' || '-' || '".$this->getDado('mes')."' || '-' || '01','yyyy-mm-dd'))
2215   -
2216   - JOIN tesouraria.arrecadacao
2217   - ON arrecadacao.cod_arrecadacao=arrecadacao_receita.cod_arrecadacao
2218   - AND arrecadacao.exercicio=arrecadacao_receita.exercicio
2219   - AND arrecadacao.timestamp_arrecadacao=arrecadacao_receita.timestamp_arrecadacao
2220   - AND arrecadacao.devolucao=true
2221   -
2222   - JOIN administracao.configuracao_entidade
2223   - ON configuracao_entidade.cod_entidade = receita.cod_entidade
2224   - AND configuracao_entidade.exercicio = receita.exercicio
2225   -
2226   - JOIN orcamento.conta_receita
2227   - ON conta_receita.cod_conta = receita.cod_conta
2228   - AND conta_receita.exercicio = receita.exercicio
2229   -
2230   - LEFT JOIN tcemg.receita_indentificadores_peculiar_receita
2231   - ON receita_indentificadores_peculiar_receita.exercicio = receita.exercicio
2232   - AND receita_indentificadores_peculiar_receita.cod_receita = receita.cod_receita
2233   -
2234   - LEFT JOIN tcemg.valores_identificadores
2235   - ON valores_identificadores.cod_identificador = receita_indentificadores_peculiar_receita.cod_identificador
2236   -
2237   - WHERE receita.exercicio = '". $this->getDado('exercicio')."'
2238   - AND receita.cod_entidade IN (".$this->getDado('entidades').")
2239   - AND configuracao_entidade.cod_modulo = 55
2240   - AND configuracao_entidade.parametro = 'tcemg_tipo_orgao_entidade_sicom'
2241   -
2242   - GROUP BY receita.cod_receita
2243   - , receita.exercicio
2244   - , cod_orgao
2245   - , deducao_receita
2246   - , indentificador_deducao_reduzida
2247   - , natureza_receita_reduzida
2248   - , cod_correcao
2249   -
2250   - UNION
2251   -
2252   - SELECT
2253   - 20 AS tipo_registro
2254   - , receita.cod_receita
2255   - , LPAD(configuracao_entidade.valor::VARCHAR,2,'0') AS cod_orgao
2256   - , CASE WHEN SUBSTR(conta_receita.cod_estrutural, 1, 1) = '9' THEN
2257   - 1
2258   - ELSE
2259   - 2
2260   - END AS deducao_receita
2261   - , valores_identificadores.cod_identificador AS indentificador_deducao_reduzida
2262   - , CASE WHEN SUBSTR(REPLACE(conta_receita.cod_estrutural, '.', ''), 1, 8) = '17240101'
2263   - THEN RPAD(SUBSTR(REPLACE(conta_receita.cod_estrutural, '.', ''), 1, 6), 8, '0')::INTEGER
2264   - ELSE SUBSTR(REPLACE(conta_receita.cod_estrutural, '.', ''), 1, 8)::INTEGER
2265   - END AS natureza_receita_reduzida
2266   - , SUM(arrecadacao_estornada_receita.vl_estornado) AS vl_reduzido_acrescido
2267   - , CASE WHEN SUBSTR(REPLACE(conta_receita.cod_estrutural, '.', ''), 1, 8) = '17240101'
2268   - THEN receita.exercicio||RPAD(SUBSTR(REPLACE(conta_receita.cod_estrutural, '.', ''), 1, 6), 8, '0')::INTEGER
2269   - ELSE receita.exercicio||SUBSTR(REPLACE(conta_receita.cod_estrutural, '.', ''), 1, 8)::INTEGER
2270   - END AS cod_correcao
2271   -
2272   - FROM orcamento.receita
2273   -
2274   - JOIN tesouraria.arrecadacao_receita
2275   - ON arrecadacao_receita.cod_receita=receita.cod_receita
2276   - AND arrecadacao_receita.exercicio=receita.exercicio
2277   -
2278   - JOIN tesouraria.arrecadacao_estornada_receita
2279   - ON arrecadacao_estornada_receita.cod_arrecadacao=arrecadacao_receita.cod_arrecadacao
2280   - AND arrecadacao_estornada_receita.cod_receita=arrecadacao_receita.cod_receita
2281   - AND arrecadacao_estornada_receita.exercicio=arrecadacao_receita.exercicio
2282   - AND arrecadacao_estornada_receita.timestamp_arrecadacao=arrecadacao_receita.timestamp_arrecadacao
2283   - AND arrecadacao_estornada_receita.timestamp_estornada::date BETWEEN TO_DATE( '01/".$this->getDado('mes')."/".$this->getDado('exercicio')."', 'dd/mm/yyyy' ) AND last_day(TO_DATE('".$this->getDado('exercicio')."' || '-' || '".$this->getDado('mes')."' || '-' || '01','yyyy-mm-dd'))
2284   -
2285   - JOIN administracao.configuracao_entidade
2286   - ON configuracao_entidade.cod_entidade = receita.cod_entidade
2287   - AND configuracao_entidade.exercicio = receita.exercicio
2288   -
2289   - JOIN orcamento.conta_receita
2290   - ON conta_receita.cod_conta = receita.cod_conta
2291   - AND conta_receita.exercicio = receita.exercicio
2292   - AND SUBSTR(conta_receita.cod_estrutural, 1, 1) != '9'
2293   -
2294   - LEFT JOIN tcemg.receita_indentificadores_peculiar_receita
2295   - ON receita_indentificadores_peculiar_receita.exercicio = receita.exercicio
2296   - AND receita_indentificadores_peculiar_receita.cod_receita = receita.cod_receita
2297   -
2298   - LEFT JOIN tcemg.valores_identificadores
2299   - ON valores_identificadores.cod_identificador = receita_indentificadores_peculiar_receita.cod_identificador
2300   -
2301   - WHERE receita.exercicio = '". $this->getDado('exercicio')."'
2302   - AND receita.cod_entidade IN (".$this->getDado('entidades').")
2303   - AND configuracao_entidade.cod_modulo = 55
2304   - AND configuracao_entidade.parametro = 'tcemg_tipo_orgao_entidade_sicom'
2305   - --and receita.vl_original > 0
2306   -
2307   - GROUP BY receita.cod_receita
2308   - , receita.exercicio
2309   - , cod_orgao
2310   - , deducao_receita
2311   - , indentificador_deducao_reduzida
2312   - , natureza_receita_reduzida
2313   - , cod_correcao
2314   -
2315   - UNION
2316   -
2317   - SELECT
2318   - 20 AS tipo_registro
2319   - , receita.cod_receita
2320   - , LPAD(configuracao_entidade.valor::VARCHAR,2,'0') AS cod_orgao
2321   - , CASE WHEN SUBSTR(conta_receita.cod_estrutural, 1, 1) = '9' THEN
2322   - 1
2323   - ELSE
2324   - 2
2325   - END AS deducao_receita
2326   - , valores_identificadores.cod_identificador AS indentificador_deducao_reduzida
2327   - , SUBSTR(REPLACE(conta_receita.cod_estrutural, '.', ''), 2, 9)::INTEGER AS natureza_receita_reduzida
2328   - , SUM(redutora.vl_deducao) AS vl_reduzido_acrescido
2329   - , receita.exercicio||SUBSTR(REPLACE(conta_receita.cod_estrutural, '.', ''), 1, 9) AS cod_correcao
2330   -
2331   - FROM orcamento.receita
2332   -
2333   - JOIN (SELECT tabela.cod_receita_dedutora
2334   - , tabela.exercicio
2335   - , SUM(tabela.vl_arrecadacao) AS vl_deducao
2336   - FROM(
2337   - SELECT arrecadacao_receita.cod_arrecadacao
2338   - , arrecadacao_receita.cod_receita AS cod_receita_dedutora
2339   - , arrecadacao_receita.exercicio
2340   - , arrecadacao_receita.vl_arrecadacao
2341   - FROM tesouraria.arrecadacao_receita
2342   - JOIN tesouraria.arrecadacao
2343   - ON arrecadacao.cod_arrecadacao=arrecadacao_receita.cod_arrecadacao
2344   - AND arrecadacao.exercicio=arrecadacao_receita.exercicio
2345   - AND arrecadacao.timestamp_arrecadacao=arrecadacao_receita.timestamp_arrecadacao
2346   - AND arrecadacao.devolucao=false
2347   - WHERE arrecadacao_receita.timestamp_arrecadacao::date BETWEEN TO_DATE( '01/".$this->getDado('mes')."/".$this->getDado('exercicio')."', 'dd/mm/yyyy' ) AND last_day(TO_DATE('".$this->getDado('exercicio')."' || '-' || '".$this->getDado('mes')."' || '-' || '01','yyyy-mm-dd'))
2348   -
2349   - UNION
2350   -
2351   - SELECT arrecadacao_receita_dedutora_estornada.cod_arrecadacao
2352   - , arrecadacao_receita_dedutora_estornada.cod_receita_dedutora
2353   - , arrecadacao_receita_dedutora_estornada.exercicio
2354   - , arrecadacao_receita_dedutora_estornada.vl_estornado AS vl_arrecadacao
2355   - FROM tesouraria.arrecadacao_receita_dedutora_estornada
2356   - WHERE arrecadacao_receita_dedutora_estornada.timestamp_dedutora_estornada::date BETWEEN TO_DATE( '01/".$this->getDado('mes')."/".$this->getDado('exercicio')."', 'dd/mm/yyyy' ) AND last_day(TO_DATE('".$this->getDado('exercicio')."' || '-' || '".$this->getDado('mes')."' || '-' || '01','yyyy-mm-dd'))
2357   - ) AS tabela
2358   - GROUP BY tabela.cod_receita_dedutora
2359   - , tabela.exercicio
2360   - , tabela.vl_arrecadacao
2361   - ) AS redutora
2362   - ON redutora.cod_receita_dedutora=receita.cod_receita
2363   - AND redutora.exercicio=receita.exercicio
2364   -
2365   - JOIN administracao.configuracao_entidade
2366   - ON configuracao_entidade.cod_entidade = receita.cod_entidade
2367   - AND configuracao_entidade.exercicio = receita.exercicio
2368   -
2369   - JOIN orcamento.conta_receita
2370   - ON conta_receita.cod_conta = receita.cod_conta
2371   - AND conta_receita.exercicio = receita.exercicio
2372   - AND SUBSTR(conta_receita.cod_estrutural, 1, 1) = '9'
2373   -
2374   - LEFT JOIN tcemg.receita_indentificadores_peculiar_receita
2375   - ON receita_indentificadores_peculiar_receita.exercicio = receita.exercicio
2376   - AND receita_indentificadores_peculiar_receita.cod_receita = receita.cod_receita
2377   -
2378   - LEFT JOIN tcemg.valores_identificadores
2379   - ON valores_identificadores.cod_identificador = receita_indentificadores_peculiar_receita.cod_identificador
2380   -
2381   - WHERE receita.exercicio = '". $this->getDado('exercicio')."'
2382   - AND receita.cod_entidade IN (".$this->getDado('entidades').")
2383   - AND configuracao_entidade.cod_modulo = 55
2384   - AND configuracao_entidade.parametro = 'tcemg_tipo_orgao_entidade_sicom'
2385   -
2386   - GROUP BY tipo_registro
2387   - , receita.cod_receita
2388   - , cod_orgao
2389   - , deducao_receita
2390   - , indentificador_deducao_reduzida
2391   - , natureza_receita_reduzida
2392   - , cod_correcao
2393   - ) AS consulta
2394   -GROUP BY
2395   - tipo_registro
2396   - , cod_orgao
2397   - , deducao_receita
2398   - , indentificador_deducao_reduzida
2399   - , natureza_receita_reduzida
2400   - , especificacao_estornada
2401   - , cod_correcao
2402   -
2403   - ORDER BY consulta.natureza_receita_reduzida ";
2404   -
2405   - return $stSql;
2406   -}
2407   -
2408   -function recuperaCorrecoesReceitas21(&$rsRecordSet, $boTransacao = "")
2409   -{
2410   - $obErro = new Erro;
2411   - $obConexao = new Conexao;
2412   - $rsRecordSet = new RecordSet;
2413   - $stSql = $this->montaRecuperaCorrecoesReceitas21();
2414   - $this->setDebug( $stSql);
2415   - $obErro = $obConexao->executaSQL( $rsRecordSet, $stSql, $boTransacao );
2416   -
2417   - return $obErro;
2418   -}
2419   -
2420   -function montaRecuperaCorrecoesReceitas21()
2421   -{
2422   - $stSql = "
2423   - SELECT
2424   - tipo_registro
2425   - , '20'||cod_correcao AS cod_estorno
2426   - , SUM(vl_reduzido_acrescido) AS vl_estornado_fonte
2427   - , cod_receita
2428   - , cod_fonte_reduzida AS cod_fonte_estornada
2429   - , cod_correcao
2430   - FROM (
2431   - SELECT 21 AS tipo_registro
2432   - , receita.cod_receita
2433   - , receita.cod_recurso AS cod_fonte_reduzida
2434   - , SUM(valor_lancamento.vl_lancamento) AS vl_reduzido_acrescido
2435   - , CASE WHEN SUBSTR(REPLACE(conta_receita.cod_estrutural, '.', ''), 1, 8) = '17240101'
2436   - THEN receita.exercicio||RPAD(SUBSTR(REPLACE(conta_receita.cod_estrutural, '.', ''), 1, 6), 8, '0')::INTEGER
2437   - ELSE receita.exercicio||SUBSTR(REPLACE(conta_receita.cod_estrutural, '.', ''), 1, 8)::INTEGER
2438   - END AS cod_correcao
2439   -
2440   -
2441   - FROM contabilidade.lancamento_receita
2442   -
2443   - JOIN contabilidade.lancamento
2444   - ON lancamento.exercicio = lancamento_receita.exercicio
2445   - AND lancamento.cod_entidade = lancamento_receita.cod_entidade
2446   - AND lancamento.tipo = lancamento_receita.tipo
2447   - AND lancamento.cod_lote = lancamento_receita.cod_lote
2448   - AND lancamento.sequencia = lancamento_receita.sequencia
2449   -
2450   - JOIN contabilidade.lote
2451   - ON lancamento.exercicio = lote.exercicio
2452   - AND lancamento.cod_entidade = lote.cod_entidade
2453   - AND lancamento.tipo = lote.tipo
2454   - AND lancamento.cod_lote = lote.cod_lote
2455   -
2456   - JOIN contabilidade.valor_lancamento
2457   - ON lancamento.exercicio = valor_lancamento.exercicio
2458   - AND lancamento.cod_entidade = valor_lancamento.cod_entidade
2459   - AND lancamento.tipo = valor_lancamento.tipo
2460   - AND lancamento.cod_lote = valor_lancamento.cod_lote
2461   - AND lancamento.sequencia = valor_lancamento.sequencia
2462   - AND valor_lancamento.tipo_valor = 'D'
2463   -
2464   - JOIN orcamento.receita
2465   - ON receita.cod_receita=lancamento_receita.cod_receita
2466   - AND receita.exercicio=lancamento_receita.exercicio
2467   -
2468   - JOIN orcamento.conta_receita
2469   - ON receita.cod_conta = conta_receita.cod_conta
2470   - AND receita.exercicio = conta_receita.exercicio
2471   - AND SUBSTR(conta_receita.cod_estrutural, 1, 1) != '9'
2472   -
2473   - LEFT JOIN orcamento.recurso('". $this->getDado('exercicio')."') as rec
2474   - ON rec.cod_recurso = receita.cod_recurso
2475   - AND rec.exercicio = receita.exercicio
2476   -
2477   - WHERE estorno = true
2478   - AND lote.dt_lote BETWEEN TO_DATE( '01/".$this->getDado('mes')."/".$this->getDado('exercicio')."', 'dd/mm/yyyy' ) AND last_day(TO_DATE('".$this->getDado('exercicio')."' || '-' || '".$this->getDado('mes')."' || '-' || '01','yyyy-mm-dd'))
2479   - AND receita.cod_entidade IN (".$this->getDado('entidades').")
2480   -
2481   - GROUP BY tipo_registro
2482   - , receita.cod_receita
2483   - , receita.exercicio
2484   - , conta_receita.cod_estrutural
2485   - , receita.cod_recurso
2486   - , cod_correcao
2487   -
2488   - UNION
2489   -
2490   - SELECT
2491   - 21 AS tipo_registro
2492   - , receita.cod_receita
2493   - , receita.cod_recurso AS cod_fonte_reduzida
2494   - , SUM(redutora.vl_deducao) AS vl_reduzido_acrescido
2495   - , receita.exercicio||SUBSTR(REPLACE(conta_receita.cod_estrutural, '.', ''), 1, 9) AS cod_correcao
2496   -
2497   - FROM orcamento.receita
2498   -
2499   - JOIN (SELECT tabela.cod_receita_dedutora
2500   - , tabela.exercicio
2501   - , SUM(tabela.vl_arrecadacao) AS vl_deducao
2502   - FROM(
2503   - SELECT arrecadacao_receita.cod_arrecadacao
2504   - , arrecadacao_receita.cod_receita AS cod_receita_dedutora
2505   - , arrecadacao_receita.exercicio
2506   - , arrecadacao_receita.vl_arrecadacao
2507   - FROM tesouraria.arrecadacao_receita
2508   - JOIN tesouraria.arrecadacao
2509   - ON arrecadacao.cod_arrecadacao=arrecadacao_receita.cod_arrecadacao
2510   - AND arrecadacao.exercicio=arrecadacao_receita.exercicio
2511   - AND arrecadacao.timestamp_arrecadacao=arrecadacao_receita.timestamp_arrecadacao
2512   - AND arrecadacao.devolucao=false
2513   - WHERE arrecadacao_receita.timestamp_arrecadacao::date BETWEEN TO_DATE( '01/".$this->getDado('mes')."/".$this->getDado('exercicio')."', 'dd/mm/yyyy' ) AND last_day(TO_DATE('".$this->getDado('exercicio')."' || '-' || '".$this->getDado('mes')."' || '-' || '01','yyyy-mm-dd'))
2514   -
2515   - UNION
2516   -
2517   - SELECT arrecadacao_receita_dedutora_estornada.cod_arrecadacao
2518   - , arrecadacao_receita_dedutora_estornada.cod_receita_dedutora
2519   - , arrecadacao_receita_dedutora_estornada.exercicio
2520   - , arrecadacao_receita_dedutora_estornada.vl_estornado AS vl_arrecadacao
2521   - FROM tesouraria.arrecadacao_receita_dedutora_estornada
2522   - WHERE arrecadacao_receita_dedutora_estornada.timestamp_dedutora_estornada::date BETWEEN TO_DATE( '01/".$this->getDado('mes')."/".$this->getDado('exercicio')."', 'dd/mm/yyyy' ) AND last_day(TO_DATE('".$this->getDado('exercicio')."' || '-' || '".$this->getDado('mes')."' || '-' || '01','yyyy-mm-dd'))
2523   - ) AS tabela
2524   - GROUP BY tabela.cod_receita_dedutora
2525   - , tabela.exercicio
2526   - , tabela.vl_arrecadacao
2527   - ) AS redutora
2528   - ON redutora.cod_receita_dedutora=receita.cod_receita
2529   - AND redutora.exercicio=receita.exercicio
2530   -
2531   - JOIN administracao.configuracao_entidade
2532   - ON configuracao_entidade.cod_entidade = receita.cod_entidade
2533   - AND configuracao_entidade.exercicio = receita.exercicio
2534   -
2535   - JOIN orcamento.conta_receita
2536   - ON conta_receita.cod_conta = receita.cod_conta
2537   - AND conta_receita.exercicio = receita.exercicio
2538   - AND SUBSTR(conta_receita.cod_estrutural, 1, 1) = '9'
2539   -
2540   - LEFT JOIN tcemg.receita_indentificadores_peculiar_receita
2541   - ON receita_indentificadores_peculiar_receita.exercicio = receita.exercicio
2542   - AND receita_indentificadores_peculiar_receita.cod_receita = receita.cod_receita
2543   -
2544   - LEFT JOIN tcemg.valores_identificadores
2545   - ON valores_identificadores.cod_identificador = receita_indentificadores_peculiar_receita.cod_identificador
2546   -
2547   - WHERE receita.exercicio = '". $this->getDado('exercicio')."'
2548   - AND receita.cod_entidade IN (".$this->getDado('entidades').")
2549   - AND configuracao_entidade.cod_modulo = 55
2550   - AND configuracao_entidade.parametro = 'tcemg_tipo_orgao_entidade_sicom'
2551   -
2552   - GROUP BY receita.cod_receita
2553   - , receita.exercicio
2554   - , conta_receita.cod_estrutural
2555   -
2556   - ) AS consulta
2557   - GROUP BY
2558   - tipo_registro
2559   - , cod_receita
2560   - , cod_correcao
2561   - , cod_fonte_reduzida
2562   -
2563   -
2564   - ORDER BY consulta.cod_receita
2565   - ";
2566   -
2567   - return $stSql;
2568   -}
2569   -
2570   -
2571 1352 function recuperaLancamentosCreditosReceber(&$rsRecordSet, $boTransacao = "")
2572 1353 {
2573 1354 $obErro = new Erro;
... ...
gestaoFinanceira/fontes/PHP/orcamento/instancias/alteracaoOrcamento/FMManterTransferencia.php
  Diff comments   View file @00a7f1b
... ... @@ -32,32 +32,15 @@
32 32  
33 33 * @ignore
34 34  
35   - $Revision: 30813 $
36   - $Name$
37   - $Author: melo $
38   - $Date: 2007-05-21 16:04:19 -0300 (Seg, 21 Mai 2007) $
  35 + $Id: FMManterTransferencia.php 62400 2015-05-04 17:30:31Z michel $
39 36  
40 37 * Casos de uso: uc-02.01.07
41 38 */
42 39  
43   -/*
44   -$Log$
45   -Revision 1.8 2007/05/21 18:55:10 melo
46   -Bug #9229#
47   -
48   -Revision 1.7 2006/07/24 20:19:42 andre.almeida
49   -Bug #6408#
50   -
51   -Revision 1.6 2006/07/05 20:42:23 cleisson
52   -Adicionada tag Log aos arquivos
53   -
54   -*/
55   -
56 40 include_once '../../../../../../gestaoAdministrativa/fontes/PHP/pacotes/FrameworkHTML.inc.php';
57 41 include_once( CAM_GF_INCLUDE."validaGF.inc.php");
58 42 include_once '../../../../../../gestaoAdministrativa/fontes/PHP/framework/include/cabecalho.inc.php';
59 43 include_once(CAM_GF_ORC_NEGOCIO."ROrcamentoSuplementacao.class.php");
60   -//include_once("../../../classes/componentes/Link.class.php");
61 44  
62 45 $stPrograma = "ManterTransferencia";
63 46 $pgFilt = "FL".$stPrograma.".php";
... ... @@ -109,8 +92,6 @@ if ($rsUltimoMesEncerrado-&gt;getCampo(&#39;mes&#39;) &gt;= $mesAtual AND $boUtilizarEncerrame
109 92  
110 93 Sessao::remove('arRedutoras');
111 94 Sessao::remove('arSuplementada');
112   - //sessao->transf3['arRedutoras'] = array();
113   - //sessao->transf3['arSuplementada'] = array ();
114 95  
115 96 $obHdnAcao = new Hidden;
116 97 $obHdnAcao->setName( "stAcao" );
... ... @@ -220,7 +201,7 @@ if ($rsUltimoMesEncerrado-&gt;getCampo(&#39;mes&#39;) &gt;= $mesAtual AND $boUtilizarEncerrame
220 201 $obBscDespesaReducao->obCampoCod->setAlign ("left");
221 202 $obBscDespesaReducao->obCampoCod->obEvento->setOnBlur("buscaDado('buscaDespesaReducao');");
222 203 if ($stAcao == 'Remaneja') {
223   - $obBscDespesaReducao->setFuncaoBusca("abrePopUp('".CAM_GF_ORC_POPUPS."despesa/LSDespesa.php','frm','inCodDotacaoReducao','stNomDotacaoRedutora','alteracaoOrcamento&inCodEntidade='+document.frm.inCodEntidade.value + '&stMascClassificacaoDespesa=3.1','".Sessao::getId()."','800','550');");
  204 + $obBscDespesaReducao->setFuncaoBusca("abrePopUp('".CAM_GF_ORC_POPUPS."despesa/LSDespesa.php','frm','inCodDotacaoReducao','stNomDotacaoRedutora','alteracaoOrcamento&inCodEntidade='+document.frm.inCodEntidade.value + '&stMascClassificacaoDespesa=3.1&stAcao=Remaneja','".Sessao::getId()."','800','550');");
224 205 } else {
225 206 $obBscDespesaReducao->setFuncaoBusca("abrePopUp('".CAM_GF_ORC_POPUPS."despesa/LSDespesa.php','frm','inCodDotacaoReducao','stNomDotacaoRedutora','alteracaoOrcamento&inCodEntidade='+document.frm.inCodEntidade.value,'".Sessao::getId()."','800','550');");
226 207 }
... ... @@ -265,8 +246,12 @@ if ($rsUltimoMesEncerrado-&gt;getCampo(&#39;mes&#39;) &gt;= $mesAtual AND $boUtilizarEncerrame
265 246 $obBscDespesaSuplementada->obCampoCod->setValue ( $inCodDotacaoOrcamentaria );
266 247 $obBscDespesaSuplementada->obCampoCod->setAlign ("left");
267 248 $obBscDespesaSuplementada->obCampoCod->obEvento->setOnBlur("buscaDado('buscaDespesaSuplementada');");
268   - $obBscDespesaSuplementada->setFuncaoBusca("abrePopUp('".CAM_GF_ORC_POPUPS."despesa/LSDespesa.php','frm','inCodDotacaoSuplementada','stNomDotacaoSuplementada','alteracaoOrcamento&inCodEntidade='+document.frm.inCodEntidade.value,'".Sessao::getId()."','800','550');");
269   -
  249 + if ($stAcao == 'Remaneja') {
  250 + $obBscDespesaSuplementada->setFuncaoBusca("abrePopUp('".CAM_GF_ORC_POPUPS."despesa/LSDespesa.php','frm','inCodDotacaoSuplementada','stNomDotacaoSuplementada','alteracaoOrcamento&stAcao=Remaneja&inCodEntidade='+document.frm.inCodEntidade.value,'".Sessao::getId()."','800','550');");
  251 + } else {
  252 + $obBscDespesaSuplementada->setFuncaoBusca("abrePopUp('".CAM_GF_ORC_POPUPS."despesa/LSDespesa.php','frm','inCodDotacaoSuplementada','stNomDotacaoSuplementada','alteracaoOrcamento&inCodEntidade='+document.frm.inCodEntidade.value,'".Sessao::getId()."','800','550');");
  253 + }
  254 +
270 255 // Define Objeto Numeric para Total
271 256 $obTxtTotalSuplementada = new Numerico;
272 257 $obTxtTotalSuplementada->setName ( "nuVlDotacaoSuplementada" );
... ...
gestaoFinanceira/fontes/PHP/orcamento/instancias/alteracaoOrcamento/OCManterTransferencia.php
  Diff comments   View file @00a7f1b
... ... @@ -32,10 +32,7 @@
32 32  
33 33 * @ignore
34 34  
35   - $Revision: 30813 $
36   - $Name$
37   - $Author: cleisson $
38   - $Date: 2006-07-05 17:51:50 -0300 (Qua, 05 Jul 2006) $
  35 + $Id: OCManterTransferencia.php 62400 2015-05-04 17:30:31Z michel $
39 36  
40 37 * Casos de uso: uc-02.01.07
41 38 */
... ... @@ -401,10 +398,13 @@ switch ($stCtrl) {
401 398 }
402 399 }
403 400 Sessao::write('arSuplementada',$arTEMP);
404   - //sessao->transf3['arSuplementada'] = $arTEMP;
  401 +
405 402 montaListaSuplementada( $arTEMP, $nuVlTotal );
406 403 break;
407 404 case 'buscaDespesaReducao':
  405 + $boErro = false;
  406 + $stMsg = '';
  407 +
408 408 if (($_REQUEST["inCodDotacaoReducao"] != "") && ($_REQUEST['inCodEntidade'] != "")) {
409 409 $obRegra->addDespesaReducao();
410 410 $obRegra->roUltimoDespesaReducao->setCodDespesa( $_REQUEST["inCodDotacaoReducao"] );
... ... @@ -417,20 +417,30 @@ switch ($stCtrl) {
417 417 $stNomDespesa = $rsDespesa->getCampo( "descricao" );
418 418  
419 419 if (!$stNomDespesa) {
420   - $js = 'f.inCodDotacaoReducao.value = "";';
421   - $js .= 'f.inCodDotacaoReducao.focus();';
422   - $js .= 'd.getElementById("stNomDotacaoRedutora").innerHTML = "&nbsp;";';
423   - $js .= "alertaAviso('@Valor inválido. (".$_REQUEST["inCodDotacaoReducao"].")','form','erro','".Sessao::getId()."');";
  420 + $boErro = true;
  421 + $stMsg .= "@Valor inválido. (".$_REQUEST["inCodDotacaoReducao"].")";
424 422 } else {
425 423 $js = 'd.getElementById("stNomDotacaoRedutora").innerHTML = "'.$stNomDespesa.'";';
426 424 }
427 425 } else {
428   - $js = 'd.getElementById("stNomDotacaoRedutora").innerHTML = "&nbsp;";';
  426 + $boErro = true;
  427 + if($_REQUEST['inCodEntidade'] == "")
  428 + $stMsg .= "@Selecione a Entidade para buscar a Dotação Orçamentária Redutora.";
  429 + }
  430 +
  431 + if ($boErro) {
  432 + $js = 'f.inCodDotacaoReducao.value = "";';
  433 + $js .= 'd.getElementById("stNomDotacaoRedutora").innerHTML = "&nbsp;";';
  434 + if($stMsg!='')
  435 + $js .= "alertaAviso('".$stMsg."','form','erro','".Sessao::getId()."');";
429 436 }
430 437 SistemaLegado::executaFrameOculto($js);
431 438 break;
432 439  
433 440 case 'buscaDespesaSuplementada':
  441 + $boErro = false;
  442 + $stMsg = '';
  443 +
434 444 if (($_REQUEST["inCodDotacaoSuplementada"] != "") && ($_REQUEST['inCodEntidade'] != "")) {
435 445 $obRegra->addDespesaSuplementada();
436 446 $obRegra->roUltimoDespesaSuplementada->setCodDespesa( $_REQUEST["inCodDotacaoSuplementada"] );
... ... @@ -443,23 +453,29 @@ switch ($stCtrl) {
443 453 $stNomDespesa = $rsDespesa->getCampo( "descricao" );
444 454  
445 455 if (!$stNomDespesa) {
446   - $js = 'f.inCodDotacaoSuplementada.value = "";';
447   - $js .= 'f.inCodDotacaoSuplementada.focus();';
448   - $js .= 'd.getElementById("stNomDotacaoSuplementada").innerHTML = "&nbsp;";';
449   - $js .= "alertaAviso('@Valor inválido. (".$_REQUEST["inCodDotacaoSuplementada"].")','form','erro','".Sessao::getId()."');";
  456 + $boErro = true;
  457 + $stMsg .= "@Valor inválido. (".$_REQUEST["inCodDotacaoSuplementada"].")";
450 458 } else {
451 459 $js = 'd.getElementById("stNomDotacaoSuplementada").innerHTML = "'.$stNomDespesa.'";';
452 460 }
453 461 } else {
454   - $js = 'd.getElementById("stNomDotacaoSuplementada").innerHTML = "&nbsp;";';
  462 + $boErro = true;
  463 + if($_REQUEST['inCodEntidade'] == "")
  464 + $stMsg .= "@Selecione a Entidade para buscar a Dotação Orçamentária Suplementada.";
455 465 }
  466 +
  467 + if ($boErro) {
  468 + $js = 'f.inCodDotacaoSuplementada.value = "";';
  469 + $js .= 'd.getElementById("stNomDotacaoSuplementada").innerHTML = "&nbsp;";';
  470 + if($stMsg!='')
  471 + $js .= "alertaAviso('".$stMsg."','form','erro','".Sessao::getId()."');";
  472 + }
  473 +
456 474 SistemaLegado::executaFrameOculto($js);
457 475 break;
458 476 case 'limparListas':
459 477 Sessao::remove('arSuplementada');
460 478 Sessao::remove('arRedutoras');
461   - //sessao->transf3['arSuplementada'] = array();
462   - //sessao->transf3['arRedutoras'] = array();
463 479 break;
464 480  
465 481 case 'buscaNorma':
... ...
gestaoFinanceira/fontes/PHP/orcamento/instancias/alteracaoOrcamento/PRManterTransferencia.php
  Diff comments   View file @00a7f1b
... ... @@ -32,21 +32,11 @@
32 32  
33 33 * @ignore
34 34  
35   - $Revision: 30813 $
36   - $Name$
37   - $Author: cleisson $
38   - $Date: 2006-07-05 17:51:50 -0300 (Qua, 05 Jul 2006) $
  35 + $Id: PRManterTransferencia.php 62400 2015-05-04 17:30:31Z michel $
39 36  
40 37 * Casos de uso: uc-02.01.07
41 38 */
42 39  
43   -/*
44   -$Log$
45   -Revision 1.4 2006/07/05 20:42:23 cleisson
46   -Adicionada tag Log aos arquivos
47   -
48   -*/
49   -
50 40 include '../../../../../../gestaoAdministrativa/fontes/PHP/pacotes/FrameworkHTML.inc.php';
51 41 include_once '../../../../../../gestaoAdministrativa/fontes/PHP/framework/include/cabecalho.inc.php';
52 42 include( CAM_GF_ORC_NEGOCIO."ROrcamentoSuplementacao.class.php" );
... ... @@ -131,6 +121,9 @@ switch ($stAcao) {
131 121 SistemaLegado::exibeAviso(urlencode($obErro->getDescricao()),"n_incluir","erro");
132 122 }
133 123 }
  124 + else {
  125 + SistemaLegado::exibeAviso(urlencode($obErro->getDescricao()),"n_incluir","erro");
  126 + }
134 127 break;
135 128 }
136 129 ?>
... ...
gestaoFinanceira/fontes/PHP/orcamento/popups/despesa/LSDespesa.php
  Diff comments   View file @00a7f1b
... ... @@ -30,7 +30,7 @@
30 30 * @author Desenvolvedor: Marcelo Boezzio Paulino
31 31 * @ignore
32 32  
33   - $Id: LSDespesa.php 61756 2015-03-02 16:03:30Z michel $
  33 + $Id: LSDespesa.php 62398 2015-05-04 17:23:58Z michel $
34 34  
35 35 $Revision: 31725 $
36 36 $Name$
... ... @@ -117,14 +117,17 @@ $stMascClassificacaoDespesa = isset($_REQUEST[&#39;stMascClassificacaoDespesa&#39;]) ? $
117 117 $stLink = '';
118 118 //Monta sessae com os valores do filtro
119 119 $arFiltro = Sessao::read('filtroPopUp');
120   -if ( is_array($arFiltro) ) {
121   - $_REQUEST = $arFiltro;
122   -} else {
123   - foreach ($_REQUEST as $key => $valor) {
124   - $arFiltro[$key] = $valor;
  120 +
  121 +if($_REQUEST['pg']&&$_REQUEST['pos']){
  122 + if ( is_array($arFiltro) ) {
  123 + $_REQUEST = $arFiltro;
125 124 }
126   - Sessao::write('filtroPopUp',$arFiltro);
127 125 }
  126 +
  127 +foreach ($_REQUEST as $key => $valor) {
  128 + $arFiltro[$key] = $valor;
  129 +}
  130 +Sessao::write('filtroPopUp',$arFiltro);
128 131  
129 132 if ( isset($_REQUEST["campoNom"]) ) {
130 133 $stLink .= '&campoNom='.$_REQUEST['campoNom'];
... ... @@ -198,7 +201,9 @@ if ($stTipoBusca == &#39;autorizacaoEmpenho&#39;) {
198 201 } elseif ($stTipoBusca == 'alteracaoOrcamento') {
199 202 $obROrcamentoDespesa->setExercicio( Sessao::getExercicio() );
200 203 $obROrcamentoDespesa->obROrcamentoEntidade->setCodigoEntidade( $inCodEntidade );
201   - $obROrcamentoDespesa->listarDespesaCredEspecial( $rsLista , "ORDER BY cod_despesa");
  204 + if( $stAcao == 'Remaneja' )
  205 + $obROrcamentoDespesa->obROrcamentoClassificacaoDespesa->setMascClassificacao('3.1');
  206 + $obROrcamentoDespesa->listarDespesa( $rsLista );
202 207 } else {
203 208 $obROrcamentoDespesa->setCodDespesa( $inCodDespesa );
204 209 $obROrcamentoDespesa->setDescricao( $stDescricao );
... ...
gestaoFinanceira/fontes/PHP/tesouraria/instancias/pagamentos/OCManterPagamentoExtra.php
  Diff comments   View file @00a7f1b
... ... @@ -269,7 +269,7 @@ function montaBoletim($inCodEntidade, $inCodBoletim = &#39;&#39;)
269 269 $obISelectBoletim = new ISelectBoletim;
270 270 $obISelectBoletim->obBoletim->obROrcamentoEntidade->setCodigoEntidade( $inCodEntidade );
271 271 $obISelectBoletim->obBoletim->setExercicio( Sessao::getExercicio() );
272   - $obISelectBoletim->obEvento->setOnChange ( "montaParametrosGET('alteraBoletim');");
  272 + $obISelectBoletim->obEvento->setOnChange ( "buscaDado('alteraBoletim');");
273 273 $obISelectBoletim->setNull ( false );
274 274  
275 275 $obFormulario = new Formulario;
... ... @@ -287,14 +287,13 @@ function montaBoletim($inCodEntidade, $inCodBoletim = &#39;&#39;)
287 287 $ISaldoCaixa = new ISaldoCaixa();
288 288 $ISaldoCaixa->inCodEntidade = $_REQUEST['inCodEntidade'];
289 289 $stJs .= $ISaldoCaixa->montaSaldo();
290   -
  290 +
291 291 if ($inCodBoletim) {
292 292 $stJs .= "if(d.getElementById('inCodBoletim')) \n
293 293 d.getElementById('inCodBoletim').value = '".$inCodBoletim."';\n
294 294 ";
295 295 }
296 296 }
297   -
298 297 return $stJs;
299 298 }
300 299  
... ... @@ -465,6 +464,7 @@ function montaDescricaoTipoPagamento($inTIpoPagamento)
465 464  
466 465 return $stJs;
467 466 }
  467 +
468 468 switch ($_REQUEST['stCtrl']) {
469 469 case 'limparCampos':
470 470 $stJs = limparCampos();
... ... @@ -479,12 +479,12 @@ case &#39;alteraBoletim&#39;:
479 479  
480 480 if ( !$obErro->ocorreu() && $rsBoletimAberto->getNumLinhas() == 1 ) {
481 481 $stJs .= "f.inCodBoletim.value = '" . $rsBoletimAberto->getCampo( 'cod_boletim' ) . "';\r\n";
482   - $stJs .= "jQuery('#stDtBoletim').val('" . $rsBoletimAberto->getCampo( 'dt_boletim' ) . "');\r\n";
483   - //SistemaLegado::executaFrameOculto( "LiberaFrames(true,false);".$stJs );
  482 + $stJs .= "jQuery('#stDtBoletim').val('" . $rsBoletimAberto->getCampo( 'dt_boletim' ) . "');\r\n";
  483 + SistemaLegado::executaFrameOculto( "LiberaFrames(true,false);".$stJs );
484 484 } else {
485 485 $stJs .= "f.inCodBoletim.value = '';\r\n";
486 486 $stJs .= "jQuery('#stDtBoletim').val('');\r\n";
487   - //SistemaLegado::executaFrameOculto( "LiberaFrames(true,false);".$stJs );
  487 + SistemaLegado::executaFrameOculto( "LiberaFrames(true,false);".$stJs );
488 488 }
489 489 //exit;
490 490  
... ...
gestaoFinanceira/fontes/PHP/tesouraria/instancias/pagamentos/PRManterPagamento.php
  Diff comments   View file @00a7f1b
... ... @@ -32,7 +32,7 @@
32 32  
33 33 * @ignore
34 34  
35   - * $Id: PRManterPagamento.php 62349 2015-04-28 13:34:07Z diogo.zarpelon $
  35 + * $Id: PRManterPagamento.php 62401 2015-05-04 17:36:47Z lisiane $
36 36  
37 37 * Casos de uso: uc-02.04.05
38 38 */
... ... @@ -80,7 +80,7 @@ if ($boUtilizarEncerramentoMes == &#39;true&#39; AND $rsUltimoMesEncerrado-&gt;getCampo(&#39;me
80 80 $obRTesourariaBoletim = new RTesourariaBoletim();
81 81 $obRTesourariaBoletim->setExercicio ( Sessao::getExercicio() );
82 82 $obRTesourariaBoletim->setCodBoletim ( $inCodBoletim );
83   -$obRTesourariaBoletim->setDataBoletim( $stDtBoletim );
  83 +$obRTesourariaBoletim->setDataBoletim( $stDtBoletim );
84 84 $obRTesourariaBoletim->obROrcamentoEntidade->setCodigoEntidade ( $_POST['inCodEntidade'] );
85 85 $obRTesourariaBoletim->obRTesourariaUsuarioTerminal->obRCGM->setNumCGM( Sessao::read('numCgm') );
86 86 $obRTesourariaBoletim->obRTesourariaUsuarioTerminal->setTimestampUsuario( $_POST['stTimestampUsuario'] );
... ... @@ -93,7 +93,6 @@ $obRTesourariaConfiguracao-&gt;setExercicio( Sessao::getExercicio() );
93 93 $obRTesourariaConfiguracao->consultarTesouraria($boTransacao);
94 94  
95 95 #$boTransacao = isset($boTransacao) ? $boTransacao : "";
96   -
97 96 switch ($stAcao) {
98 97 case 'incluir':
99 98  
... ... @@ -375,6 +374,8 @@ switch ($stAcao) {
375 374 }
376 375  
377 376 break;
  377 +///////////////////////////////////////////////////////////////////////////////
  378 +
378 379  
379 380 case 'alterar':
380 381 if ( $stDtBoletim == date( 'd/m/Y' ) ) {
... ... @@ -458,8 +459,11 @@ switch ($stAcao) {
458 459 $obErro->setDescricao("O valor a estornar deve ser maior que 0,00.");
459 460 }
460 461 }
  462 +
461 463 if (!$obErro->ocorreu()) {
462   - $obErro = $obRTesourariaBoletim->roUltimoPagamento->estornar( $boTransacao );
  464 + Sessao::setTrataExcecao ( true );
  465 + $obErro = $obRTesourariaBoletim->roUltimoPagamento->estornar( $boTransacao );
  466 + Sessao::encerraExcecao();
463 467 }
464 468  
465 469 $boRetencao = $obRTesourariaBoletim->roUltimoPagamento->obREmpenhoPagamentoLiquidacao->obREmpenhoOrdemPagamento->getRetencao();
... ...
gestaoFinanceira/fontes/PLPGSQL/contabilidade/aberturaRestosPagar.plsql
  Diff comments   View file @00a7f1b
... ... @@ -29,7 +29,7 @@
29 29  
30 30 * @package URBEM
31 31  
32   - * $Id: aberturaRestosPagar.plsql 59612 2014-09-02 12:00:51Z gelson $
  32 + * $Id: aberturaRestosPagar.plsql 62406 2015-05-05 14:43:16Z franver $
33 33 */
34 34  
35 35 CREATE OR REPLACE FUNCTION contabilidade.fn_abertura_restos_pagar(varchar) RETURNS VARCHAR AS $$
... ... @@ -166,7 +166,7 @@ CREATE TEMPORARY TABLE tmp_valores AS
166 166 WHERE cod_estrutural like ''5.3.2.1%''
167 167 AND plano_conta.exercicio= entidade.exercicio)::VARCHAR) as cod_estrutural_debito
168 168  
169   - , contabilidade.fn_saldo_conta_analitica_entidade(entidade.exercicio,(SELECT plano_analitica.cod_plano
  169 + , contabilidade.fn_saldo_inicial_conta_analitica_entidade_rp(entidade.exercicio,(SELECT plano_analitica.cod_plano
170 170 FROM contabilidade.plano_conta
171 171 INNER JOIN contabilidade.plano_analitica
172 172 ON plano_analitica.exercicio = plano_conta.exercicio
... ... @@ -177,7 +177,7 @@ CREATE TEMPORARY TABLE tmp_valores AS
177 177 FROM orcamento.entidade
178 178 WHERE entidade.exercicio = ''' || stExercicio || '''
179 179 AND entidade.cod_entidade IN ('|| stCodEntidade ||')
180   - AND contabilidade.fn_saldo_conta_analitica_entidade(entidade.exercicio,(SELECT plano_analitica.cod_plano
  180 + AND contabilidade.fn_saldo_inicial_conta_analitica_entidade_rp(entidade.exercicio,(SELECT plano_analitica.cod_plano
181 181 FROM contabilidade.plano_conta
182 182 INNER JOIN contabilidade.plano_analitica
183 183 ON plano_analitica.exercicio = plano_conta.exercicio
... ... @@ -194,7 +194,7 @@ CREATE TEMPORARY TABLE tmp_valores AS
194 194 INNER JOIN contabilidade.plano_analitica
195 195 ON plano_analitica.exercicio = plano_conta.exercicio
196 196 AND plano_analitica.cod_conta= plano_conta.cod_conta
197   - WHERE cod_estrutural like ''6.3.2.7%''
  197 + WHERE cod_estrutural like ''6.3.2.1%''
198 198 AND plano_conta.exercicio= entidade.exercicio
199 199 )::VARCHAR) as cod_estrutural_credito
200 200  
... ... @@ -203,10 +203,10 @@ CREATE TEMPORARY TABLE tmp_valores AS
203 203 INNER JOIN contabilidade.plano_analitica
204 204 ON plano_analitica.exercicio = plano_conta.exercicio
205 205 AND plano_analitica.cod_conta= plano_conta.cod_conta
206   - WHERE cod_estrutural like ''6.3.2.1%''
  206 + WHERE cod_estrutural like ''6.3.2.7%''
207 207 AND plano_conta.exercicio= entidade.exercicio)::VARCHAR) as cod_estrutural_debito
208 208  
209   - , contabilidade.fn_saldo_conta_analitica_entidade(entidade.exercicio,(SELECT plano_analitica.cod_plano
  209 + , contabilidade.fn_saldo_inicial_conta_analitica_entidade_rp(entidade.exercicio,(SELECT plano_analitica.cod_plano
210 210 FROM contabilidade.plano_conta
211 211 INNER JOIN contabilidade.plano_analitica
212 212 ON plano_analitica.exercicio = plano_conta.exercicio
... ... @@ -217,7 +217,7 @@ CREATE TEMPORARY TABLE tmp_valores AS
217 217 FROM orcamento.entidade
218 218 WHERE entidade.exercicio = ''' || stExercicio || '''
219 219 AND entidade.cod_entidade IN ('|| stCodEntidade ||')
220   - AND contabilidade.fn_saldo_conta_analitica_entidade(entidade.exercicio,(SELECT plano_analitica.cod_plano
  220 + AND contabilidade.fn_saldo_inicial_conta_analitica_entidade_rp(entidade.exercicio,(SELECT plano_analitica.cod_plano
221 221 FROM contabilidade.plano_conta
222 222 INNER JOIN contabilidade.plano_analitica
223 223 ON plano_analitica.exercicio = plano_conta.exercicio
... ... @@ -249,7 +249,7 @@ CREATE TEMPORARY TABLE tmp_valores AS
249 249 WHERE cod_estrutural like ''5.3.1.1%''
250 250 AND plano_conta.exercicio= entidade.exercicio)::VARCHAR) as cod_estrutural_debito
251 251  
252   - , contabilidade.fn_saldo_conta_analitica_entidade(entidade.exercicio,(SELECT plano_analitica.cod_plano
  252 + , contabilidade.fn_saldo_inicial_conta_analitica_entidade_rp(entidade.exercicio,(SELECT plano_analitica.cod_plano
253 253 FROM contabilidade.plano_conta
254 254 INNER JOIN contabilidade.plano_analitica
255 255 ON plano_analitica.exercicio = plano_conta.exercicio
... ... @@ -260,7 +260,7 @@ CREATE TEMPORARY TABLE tmp_valores AS
260 260 FROM orcamento.entidade
261 261 WHERE entidade.exercicio = ''' || stExercicio || '''
262 262 AND entidade.cod_entidade IN ('|| stCodEntidade ||')
263   - AND contabilidade.fn_saldo_conta_analitica_entidade(entidade.exercicio,(SELECT plano_analitica.cod_plano
  263 + AND contabilidade.fn_saldo_inicial_conta_analitica_entidade_rp(entidade.exercicio,(SELECT plano_analitica.cod_plano
264 264 FROM contabilidade.plano_conta
265 265 INNER JOIN contabilidade.plano_analitica
266 266 ON plano_analitica.exercicio = plano_conta.exercicio
... ... @@ -285,10 +285,10 @@ CREATE TEMPORARY TABLE tmp_valores AS
285 285 INNER JOIN contabilidade.plano_analitica
286 286 ON plano_analitica.exercicio = plano_conta.exercicio
287 287 AND plano_analitica.cod_conta= plano_conta.cod_conta
288   - WHERE cod_estrutural like ''6.3.1.1%''
  288 + WHERE cod_estrutural like ''6.3.1.7.1%''
289 289 AND plano_conta.exercicio= entidade.exercicio)::VARCHAR) as cod_estrutural_debito
290 290  
291   - , contabilidade.fn_saldo_conta_analitica_entidade(entidade.exercicio,(SELECT plano_analitica.cod_plano
  291 + , contabilidade.fn_saldo_inicial_conta_analitica_entidade_rp(entidade.exercicio,(SELECT plano_analitica.cod_plano
292 292 FROM contabilidade.plano_conta
293 293 INNER JOIN contabilidade.plano_analitica
294 294 ON plano_analitica.exercicio = plano_conta.exercicio
... ... @@ -299,7 +299,7 @@ CREATE TEMPORARY TABLE tmp_valores AS
299 299 FROM orcamento.entidade
300 300 WHERE entidade.exercicio = ''' || stExercicio || '''
301 301 AND entidade.cod_entidade IN ('|| stCodEntidade ||')
302   - AND contabilidade.fn_saldo_conta_analitica_entidade(entidade.exercicio,(SELECT plano_analitica.cod_plano
  302 + AND contabilidade.fn_saldo_inicial_conta_analitica_entidade_rp(entidade.exercicio,(SELECT plano_analitica.cod_plano
303 303 FROM contabilidade.plano_conta
304 304 INNER JOIN contabilidade.plano_analitica
305 305 ON plano_analitica.exercicio = plano_conta.exercicio
... ... @@ -346,8 +346,8 @@ UNION ALL
346 346 GROUP BY tmp_valores.exercicio, tmp_valores.cod_entidade , cod_estrutural_credito, cod_estrutural_debito
347 347  
348 348 UNION ALL
349   - SELECT exercicio
350   - ,cod_entidade
  349 + SELECT conta_contabil_rp_np.exercicio
  350 + , conta_contabil_rp_np.cod_entidade
351 351 , buscaCodigoEstrutural(conta_contabil_rp_np.exercicio,(SELECT plano_analitica.cod_plano
352 352 FROM contabilidade.plano_conta
353 353 INNER JOIN contabilidade.plano_analitica
... ... @@ -360,18 +360,21 @@ UNION ALL
360 360 , buscaCodigoEstrutural(conta_contabil_rp_np.exercicio,(SELECT plano_analitica.cod_plano
361 361 FROM contabilidade.plano_analitica
362 362 WHERE plano_analitica.cod_conta = conta_contabil_rp_np.cod_conta
363   - AND plano_analitica.natureza_saldo = ''D''
  363 + AND plano_analitica.natureza_saldo = pa.natureza_saldo
364 364 AND plano_analitica.exercicio= conta_contabil_rp_np.exercicio)::VARCHAR) as cod_estrutural_debito
365 365  
366   - , contabilidade.fn_saldo_conta_analitica_entidade(conta_contabil_rp_np.exercicio,(SELECT plano_analitica.cod_plano
  366 + , contabilidade.fn_saldo_inicial_conta_analitica_entidade_rp(conta_contabil_rp_np.exercicio,(SELECT plano_analitica.cod_plano
367 367 FROM contabilidade.plano_analitica
368 368 WHERE plano_analitica.cod_conta = conta_contabil_rp_np.cod_conta
369   - AND plano_analitica.natureza_saldo = ''D''
  369 + AND plano_analitica.natureza_saldo = pa.natureza_saldo
370 370 AND plano_analitica.exercicio= conta_contabil_rp_np.exercicio), conta_contabil_rp_np.cod_entidade) AS valor
371 371 , CAST(''Não Processados nos Exercicios Anteriores.'' AS VARCHAR) AS complemento
372 372 FROM contabilidade.conta_contabil_rp_np
373   - WHERE exercicio = ''' || stExercicio || '''
374   - AND cod_entidade IN ('|| stCodEntidade ||')
  373 + INNER JOIN contabilidade.plano_analitica AS pa
  374 + ON pa.cod_conta = conta_contabil_rp_np.cod_conta
  375 + ANd pa.exercicio = conta_contabil_rp_np.exercicio
  376 + WHERE conta_contabil_rp_np.exercicio = ''' || stExercicio || '''
  377 + AND conta_contabil_rp_np.cod_entidade IN ('|| stCodEntidade ||')
375 378  
376 379 UNION ALL
377 380 ------------------------------------------------------------------------------------------------------------
... ...
gestaoFinanceira/fontes/PLPGSQL/contabilidade/relatorioInsuficiencia.plsql
  Diff comments   View file @00a7f1b
... ... @@ -54,10 +54,16 @@ BEGIN
54 54 stSql := '
55 55 CREATE TEMPORARY TABLE tmp_recursos_processados_exercicios_anteriores AS
56 56  
57   - SELECT busca_recurso.cod_recurso
  57 + SELECT CASE WHEN restos_pre_empenho.recurso IS NOT NULL
  58 + THEN restos_pre_empenho.recurso
  59 + ELSE busca_recurso.cod_recurso
  60 + END AS cod_recurso
58 61 , liquidado.cod_empenho
59 62 , liquidado.cod_entidade
60   - , busca_recurso.nom_recurso
  63 + , CASE WHEN restos_pre_empenho.recurso IS NOT NULL
  64 + THEN recurso_restos.nom_recurso
  65 + ELSE busca_recurso.nom_recurso
  66 + END AS nom_recurso
61 67 , sw_cgm.nom_cgm as nom_entidade
62 68  
63 69 , CASE WHEN restos_pre_empenho.cod_estrutural IS NOT NULL
... ... @@ -241,11 +247,16 @@ BEGIN
241 247 LEFT JOIN empenho.restos_pre_empenho
242 248 ON restos_pre_empenho.exercicio = liquidado.exercicio
243 249 AND restos_pre_empenho.cod_pre_empenho = liquidado.cod_pre_empenho
  250 + LEFT JOIN orcamento.recurso AS recurso_restos
  251 + ON restos_pre_empenho.recurso = recurso_restos.cod_recurso
  252 + AND restos_pre_empenho.exercicio = liquidado.exercicio
244 253  
245 254 GROUP BY busca_recurso.cod_recurso
  255 + , restos_pre_empenho.recurso
246 256 , liquidado.cod_empenho
247 257 , liquidado.cod_entidade
248 258 , busca_recurso.nom_recurso
  259 + , recurso_restos.nom_recurso
249 260 , sw_cgm.nom_cgm
250 261 , restos_pre_empenho.cod_estrutural
251 262 , conta_despesa.cod_estrutural
... ... @@ -263,10 +274,16 @@ BEGIN
263 274 stSql := '
264 275 CREATE TEMPORARY TABLE tmp_recursos_processados_exercicio_anterior AS
265 276  
266   - SELECT busca_recurso.cod_recurso
  277 + SELECT CASE WHEN restos_pre_empenho.recurso IS NOT NULL
  278 + THEN restos_pre_empenho.recurso
  279 + ELSE busca_recurso.cod_recurso
  280 + END AS cod_recurso
267 281 , liquidado.cod_empenho
268 282 , liquidado.cod_entidade
269   - , busca_recurso.nom_recurso
  283 + , CASE WHEN restos_pre_empenho.recurso IS NOT NULL
  284 + THEN recurso_restos.nom_recurso
  285 + ELSE busca_recurso.nom_recurso
  286 + END AS nom_recurso
270 287 , sw_cgm.nom_cgm as nom_entidade
271 288  
272 289 , CASE WHEN restos_pre_empenho.cod_estrutural IS NOT NULL
... ... @@ -448,11 +465,16 @@ BEGIN
448 465 LEFT JOIN empenho.restos_pre_empenho
449 466 ON restos_pre_empenho.exercicio = liquidado.exercicio
450 467 AND restos_pre_empenho.cod_pre_empenho = liquidado.cod_pre_empenho
  468 + LEFT JOIN orcamento.recurso AS recurso_restos
  469 + ON restos_pre_empenho.recurso = recurso_restos.cod_recurso
  470 + AND restos_pre_empenho.exercicio = liquidado.exercicio
451 471  
452 472 GROUP BY busca_recurso.cod_recurso
  473 + , restos_pre_empenho.recurso
453 474 , liquidado.cod_empenho
454 475 , liquidado.cod_entidade
455 476 , busca_recurso.nom_recurso
  477 + , recurso_restos.nom_recurso
456 478 , sw_cgm.nom_cgm
457 479 , restos_pre_empenho.cod_estrutural
458 480 , conta_despesa.cod_estrutural
... ... @@ -466,10 +488,16 @@ BEGIN
466 488 StSql := '
467 489 CREATE TEMPORARY TABLE tmp_recursos_nao_processados_exercicios_anteriores AS
468 490  
469   - SELECT busca_recurso.cod_recurso
  491 + SELECT CASE WHEN restos_pre_empenho.recurso IS NOT NULL
  492 + THEN restos_pre_empenho.recurso
  493 + ELSE busca_recurso.cod_recurso
  494 + END AS cod_recurso
470 495 , empenhado.cod_empenho
471 496 , empenhado.cod_entidade
472   - , busca_recurso.nom_recurso
  497 + , CASE WHEN restos_pre_empenho.recurso IS NOT NULL
  498 + THEN recurso_restos.nom_recurso
  499 + ELSE busca_recurso.nom_recurso
  500 + END AS nom_recurso
473 501 , sw_cgm.nom_cgm as nom_entidade
474 502  
475 503 , CASE WHEN restos_pre_empenho.cod_estrutural IS NOT NULL
... ... @@ -627,9 +655,14 @@ BEGIN
627 655 LEFT JOIN empenho.restos_pre_empenho
628 656 ON restos_pre_empenho.exercicio = empenhado.exercicio
629 657 AND restos_pre_empenho.cod_pre_empenho = empenhado.cod_pre_empenho
  658 + LEFT JOIN orcamento.recurso AS recurso_restos
  659 + ON restos_pre_empenho.recurso = recurso_restos.cod_recurso
  660 + AND restos_pre_empenho.exercicio = empenhado.exercicio
630 661  
631 662 GROUP BY busca_recurso.cod_recurso
  663 + , restos_pre_empenho.recurso
632 664 , busca_recurso.nom_recurso
  665 + , recurso_restos.nom_recurso
633 666 , sw_cgm.nom_cgm
634 667 , restos_pre_empenho.cod_estrutural
635 668 , conta_despesa.cod_estrutural
... ... @@ -645,10 +678,16 @@ BEGIN
645 678 StSql := '
646 679 CREATE TEMPORARY TABLE tmp_recursos_nao_processados_exercicio_anterior AS
647 680  
648   - SELECT busca_recurso.cod_recurso
  681 + SELECT CASE WHEN restos_pre_empenho.recurso IS NOT NULL
  682 + THEN restos_pre_empenho.recurso
  683 + ELSE busca_recurso.cod_recurso
  684 + END AS cod_recurso
649 685 , empenhado.cod_empenho
650 686 , empenhado.cod_entidade
651   - , busca_recurso.nom_recurso
  687 + , CASE WHEN restos_pre_empenho.recurso IS NOT NULL
  688 + THEN recurso_restos.nom_recurso
  689 + ELSE busca_recurso.nom_recurso
  690 + END AS nom_recurso
652 691 , sw_cgm.nom_cgm as nom_entidade
653 692  
654 693 , CASE WHEN restos_pre_empenho.cod_estrutural IS NOT NULL
... ... @@ -804,9 +843,14 @@ BEGIN
804 843 LEFT JOIN empenho.restos_pre_empenho
805 844 ON restos_pre_empenho.exercicio = empenhado.exercicio
806 845 AND restos_pre_empenho.cod_pre_empenho = empenhado.cod_pre_empenho
  846 + LEFT JOIN orcamento.recurso AS recurso_restos
  847 + ON restos_pre_empenho.recurso = recurso_restos.cod_recurso
  848 + AND restos_pre_empenho.exercicio = empenhado.exercicio
807 849  
808 850 GROUP BY busca_recurso.cod_recurso
  851 + , restos_pre_empenho.recurso
809 852 , busca_recurso.nom_recurso
  853 + , recurso_restos.nom_recurso
810 854 , sw_cgm.nom_cgm
811 855 , restos_pre_empenho.cod_estrutural
812 856 , conta_despesa.cod_estrutural
... ...
gestaoFinanceira/fontes/PLPGSQL/contabilidade/saldoContaAnaliticaEntidade.plsql
  Diff comments   View file @00a7f1b
... ... @@ -41,13 +41,12 @@ Bug #8125#
41 41  
42 42 */
43 43  
44   -CREATE OR REPLACE FUNCTION contabilidade.fn_saldo_conta_analitica_entidade(VARCHAR,INTEGER,INTEGER) RETURNS NUMERIC AS '
45   -
  44 +CREATE OR REPLACE FUNCTION contabilidade.fn_saldo_conta_analitica_entidade(VARCHAR,INTEGER,INTEGER) RETURNS NUMERIC AS $$
46 45 DECLARE
47 46 stExercicio ALIAS FOR $1;
48 47 inCodPlano ALIAS FOR $2;
49 48 inCodEntidade ALIAS FOR $3;
50   - stSql VARCHAR := '''';
  49 + stSql VARCHAR := '';
51 50 nuVlDebito NUMERIC := 0.00;
52 51 nuVlCredito NUMERIC := 0.00;
53 52 reRecord RECORD;
... ... @@ -103,4 +102,4 @@ BEGIN
103 102 RETURN nuVlDebito + nuVlCredito;
104 103  
105 104 END;
106   -'LANGUAGE 'plpgsql';
  105 +$$ LANGUAGE 'plpgsql';
... ...
gestaoFinanceira/fontes/PLPGSQL/orcamento/orcamentoSuplementacoesTransferencia.plsql
  Diff comments   View file @00a7f1b
... ... @@ -20,6 +20,15 @@
20 20 * *
21 21 **********************************************************************************
22 22 */
  23 +/*
  24 +* Script de função PLPGSQL
  25 +*
  26 +* URBEM Soluções de Gestão Pública Ltda
  27 +* www.urbem.cnm.org.br
  28 +*
  29 +* $Id: orcamentoSuplementacoesTransferencia.plsql 62400 2015-05-04 17:30:31Z michel $
  30 +*/
  31 +
23 32 CREATE OR REPLACE FUNCTION orcamentosuplementacoestransferencia (character varying, numeric, character varying, integer, character varying, integer, integer) RETURNS INTEGER AS $$
24 33 DECLARE
25 34 EXERCICIO ALIAS FOR $1;
... ... @@ -32,6 +41,12 @@ DECLARE
32 41  
33 42 SEQUENCIA INTEGER;
34 43 BEGIN
  44 + IF EXERCICIO::integer > 2013 THEN
  45 + SEQUENCIA := FAZERLANCAMENTO( '622110000' , '522190109' , CODHISTORICO , EXERCICIO , VALOR , COMPLEMENTO , CODLOTE , TIPOLOTE , CODENTIDADE );
  46 + SEQUENCIA := FAZERLANCAMENTO( '522120100' , '622110000' , CODHISTORICO , EXERCICIO , VALOR , COMPLEMENTO , CODLOTE , TIPOLOTE , CODENTIDADE );
  47 + SEQUENCIA := FAZERLANCAMENTO( '522130300' , '522139900' , CODHISTORICO , EXERCICIO , VALOR , COMPLEMENTO , CODLOTE , TIPOLOTE , CODENTIDADE );
  48 + END IF;
  49 +
35 50 IF EXERCICIO::integer > 2012 THEN
36 51 SEQUENCIA := FAZERLANCAMENTO( '522190101' , '622110000' , CODHISTORICO , EXERCICIO , VALOR , COMPLEMENTO , CODLOTE , TIPOLOTE , CODENTIDADE );
37 52 SEQUENCIA := FAZERLANCAMENTO( '522120100' , '522190109' , CODHISTORICO , EXERCICIO , VALOR , COMPLEMENTO , CODLOTE , TIPOLOTE , CODENTIDADE );
... ...
gestaoFinanceira/fontes/PLPGSQL/tesouraria/conciliacaoMovimentacaoCorrente.plsql
  Diff comments   View file @00a7f1b
... ... @@ -154,9 +154,13 @@ BEGIN
154 154 ,coalesce( lpad(lc.mes::text,2,''0''), '''') as mes
155 155 ,lc.exercicio_conciliacao
156 156 FROM
  157 +
157 158 tesouraria.boletim as BOLETIM,
158 159 tesouraria.pagamento as P,
159   - contabilidade.pagamento as cp
  160 + contabilidade.pagamento as cp
  161 +
  162 +
  163 +
160 164 LEFT JOIN tesouraria.conciliacao_lancamento_contabil as lc
161 165 on( cp.cod_lote = lc.cod_lote
162 166 AND cp.tipo = lc.tipo
... ... @@ -238,159 +242,170 @@ BEGIN
238 242 AND to_char(P.timestamp,''yyyy'')::integer BETWEEN '''||stExercicio||'''::integer-1 AND '''||stExercicio||'''::integer
239 243 AND lo.dt_lote = to_date(to_char(P.timestamp,''yyyy-mm-dd''),''yyyy-mm-dd'')
240 244  
241   - UNION
242   -
243   -
244   - SELECT
245   - cp.cod_lote,
246   - BOLETIM.dt_boletim as dt_lancamento,
247   - TO_DATE(conciliacao.dt_extrato::VARCHAR,''yyyy-mm-dd'') AS dt_conciliacao,
248   - boletim.exercicio,
249   - p.cod_plano,
250   - cast(
251   - CASE WHEN TRIM(substring(ENLPA.observacao,1,60)) = '''' THEN
252   - CASE WHEN (ENL.exercicio_empenho < P.exercicio_boletim) THEN
253   - ''Estorno de Pagamento de RP n° '' || ENL.cod_empenho || ''/'' || ENL.exercicio_empenho
254   - ELSE ''Estorno de Pagamento de Empenho n° '' || ENL.cod_empenho || ''/'' || ENL.exercicio_empenho
255   - END
256   - ELSE
257   - CASE WHEN (ENL.exercicio_empenho < P.exercicio_boletim) THEN
258   - ''Estorno de Pagamento de RP n° '' || ENL.cod_empenho || ''/'' || ENL.exercicio_empenho
259   - ELSE ''Estorno de Pagamento de Empenho n° '' || ENL.cod_empenho || ''/'' || ENL.exercicio_empenho
260   - END
261   - END as varchar)
262   - || CASE WHEN (cheque_emissao_ordem_pagamento.num_cheque IS NOT NULL) THEN
263   - '' CH '' || cheque_emissao_ordem_pagamento.num_cheque
264   - END
265   - as descricao,
266   - replace(trim(substring(coalesce(ENLPA.observacao,''''),1,60)),'''','''') as observacao,
267   - enlpa.vl_anulado as vl_lancamento,
268   - cast( ''C'' as varchar ) as tipo_valor,
269   - cp.tipo,
270   - cp.sequencia,
271   - boletim.cod_entidade,
272   - CASE
273   - WHEN lc.cod_plano is not null
274   - THEN ''true''
275   - ELSE ''''
276   - END as conciliar,
277   - ''A'' as tipo_movimentacao,
278   - 0 as cod_arrecadacao,
279   - 0 as cod_receita,
280   - ttp.cod_bordero,
281   - CAST('''' as text ) as timestamp_arrecadacao,
282   - CAST('''' as text ) as timestamp_estornada,
283   - CAST('''' as text ) as tipo_arrecadacao
284   - ,coalesce( lpad(lc.mes::text,2,''0''), '''') as mes
285   - ,lc.exercicio_conciliacao
286   - FROM
287   - tesouraria.boletim as BOLETIM,
288   - tesouraria.pagamento_estornado as PE,
289   - tesouraria.pagamento as P,
290   - contabilidade.pagamento as cp
291   - JOIN contabilidade.pagamento_estorno as cpe
292   - on( cp.cod_lote = cpe.cod_lote
293   - AND cp.tipo = cpe.tipo
294   - AND cp.sequencia = cpe.sequencia
295   - AND cp.exercicio = cpe.exercicio
296   - AND cp.cod_entidade = cpe.cod_entidade
297   - AND cp.timestamp = cpe.timestamp
298   - AND cp.cod_nota = cpe.cod_nota
299   - AND cp.exercicio_liquidacao = cpe.exercicio_liquidacao
300   - )
301   - LEFT JOIN tesouraria.conciliacao_lancamento_contabil as lc
302   - on( cp.cod_lote = lc.cod_lote
303   - AND cp.tipo = lc.tipo
304   - AND cp.sequencia = lc.sequencia
305   - AND cp.exercicio = lc.exercicio
306   - AND cp.cod_entidade = lc.cod_entidade
307   - AND lc.tipo_valor = ''C''
308   - )
309   - LEFT JOIN tesouraria.conciliacao
310   - ON lc.cod_plano = conciliacao.cod_plano
311   - AND lc.exercicio_conciliacao = conciliacao.exercicio
312   - AND lc.mes = conciliacao.mes
313   -
314   - JOIN contabilidade.lancamento_empenho as LE
315   - ON ( le.cod_entidade = cp.cod_entidade
316   - AND le.tipo = cp.tipo
317   - AND le.sequencia = cp.sequencia
318   - AND le.exercicio = cp.exercicio
319   - AND le.cod_lote = cp.cod_lote
320   - AND le.estorno = ''true''
321   - )
322   - JOIN contabilidade.lote as lo
323   - ON ( le.cod_lote = lo.cod_lote
324   - AND le.cod_entidade = lo.cod_entidade
325   - AND le.tipo = lo.tipo
326   - AND le.exercicio = lo.exercicio
327   - ),
328   - empenho.pagamento_liquidacao as EPL
329   - LEFT JOIN tesouraria.cheque_emissao_ordem_pagamento
330   - ON cheque_emissao_ordem_pagamento.cod_ordem = EPL.cod_ordem
331   - AND cheque_emissao_ordem_pagamento.exercicio = EPL.exercicio
332   - AND cheque_emissao_ordem_pagamento.cod_entidade = EPL.cod_entidade
333   - AND cheque_emissao_ordem_pagamento.timestamp_emissao = ( SELECT MAX(timestamp_emissao)
334   - FROM tesouraria.cheque_emissao_ordem_pagamento
335   - WHERE cod_ordem = EPL.cod_ordem
336   - AND exercicio = EPL.exercicio
337   - AND cod_entidade = EPL.cod_entidade ),
338   - empenho.pagamento_liquidacao_nota_liquidacao_paga as EPLNLP
339   - LEFT JOIN tesouraria.transacoes_pagamento as TTP
340   - ON ( ttp.cod_ordem = EPLNLP.cod_ordem
341   - AND ttp.cod_entidade = EPLNLP.cod_entidade
342   - AND ttp.exercicio = EPLNLP.exercicio
343   - ),
344   - empenho.nota_liquidacao_paga as ENLP,
345   - empenho.nota_liquidacao_paga_anulada as ENLPA,
346   - empenho.nota_liquidacao as ENL
347   - WHERE
348   - BOLETIM.cod_boletim = PE.cod_boletim
349   - AND BOLETIM.exercicio = PE.exercicio_boletim
350   - AND BOLETIM.cod_entidade = PE.cod_entidade
  245 + UNION
  246 +
  247 +
  248 +
  249 +
  250 +
  251 +
  252 +
  253 + SELECT
  254 + conciliacao_pagamento.cod_lote
  255 + , boletim.dt_boletim as dt_lancamento
  256 + , TO_DATE(conciliacao.dt_extrato::VARCHAR,''yyyy-mm-dd'') AS dt_conciliacao
  257 + , boletim.exercicio
  258 + , pagamento.cod_plano
  259 + , CAST(
  260 + CASE WHEN TRIM(substring(nota_liquidacao_paga_anulada.observacao,1,60)) = '''' THEN
  261 + CASE WHEN (nota_liquidacao.exercicio_empenho < pagamento.exercicio_boletim) THEN
  262 + ''Estorno de Pagamento de RP n° '' || nota_liquidacao.cod_empenho || ''/'' || nota_liquidacao.exercicio_empenho
  263 + ELSE ''Estorno de Pagamento de Empenho n° '' || nota_liquidacao.cod_empenho || ''/'' || nota_liquidacao.exercicio_empenho
  264 + END
  265 + ELSE
  266 + CASE WHEN (nota_liquidacao.exercicio_empenho < pagamento.exercicio_boletim) THEN
  267 + ''Estorno de Pagamento de RP n° '' || nota_liquidacao.cod_empenho || ''/'' || nota_liquidacao.exercicio_empenho
  268 + ELSE ''Estorno de Pagamento de Empenho n° '' || nota_liquidacao.cod_empenho || ''/'' || nota_liquidacao.exercicio_empenho
  269 + END
  270 + END as varchar)
  271 + || CASE WHEN (cheque_emissao_ordem_pagamento.num_cheque IS NOT NULL) THEN
  272 + '' CH '' || cheque_emissao_ordem_pagamento.num_cheque
  273 + END
  274 + AS descricao
  275 + , replace(trim(substring(coalesce(nota_liquidacao_paga_anulada.observacao,''''),1,60)),'''','''') AS observacao
  276 + , nota_liquidacao_paga_anulada.vl_anulado AS vl_lancamento
  277 + , cast( ''C'' as varchar ) AS tipo_valor
  278 + , conciliacao_pagamento.tipo
  279 + , conciliacao_pagamento.sequencia
  280 + , boletim.cod_entidade
  281 + , CASE
  282 + WHEN conciliacao_lancamento_contabil.cod_plano is not null
  283 + THEN ''true''
  284 + ELSE ''''
  285 + END as conciliar
  286 + , ''A'' as tipo_movimentacao
  287 + , 0 AS cod_arrecadacao
  288 + , 0 AS cod_receita
  289 + , transacoes_pagamento.cod_bordero
  290 + , CAST('''' as text ) AS timestamp_arrecadacao
  291 + , CAST('''' as text ) AS timestamp_estornada
  292 + , CAST('''' as text ) AS tipo_arrecadacao
  293 + , coalesce( lpad(conciliacao_lancamento_contabil.mes::text,2,''0''), '''') AS mes
  294 + , conciliacao_lancamento_contabil.exercicio_conciliacao
  295 +
  296 + FROM tesouraria.boletim
  297 +
  298 + INNER JOIN tesouraria.pagamento_estornado
  299 + ON boletim.cod_boletim = pagamento_estornado.cod_boletim
  300 + AND boletim.exercicio = pagamento_estornado.exercicio_boletim
  301 + AND boletim.cod_entidade = pagamento_estornado.cod_entidade
  302 +
  303 + INNER JOIN tesouraria.pagamento
  304 + ON pagamento_estornado.cod_nota = pagamento.cod_nota
  305 + AND pagamento_estornado.exercicio = pagamento.exercicio
  306 + AND pagamento_estornado.cod_entidade = pagamento.cod_entidade
  307 + AND pagamento_estornado.timestamp = pagamento.timestamp
351 308  
352   - AND PE.cod_nota = P.cod_nota
353   - AND PE.exercicio = P.exercicio
354   - AND PE.cod_entidade = P.cod_entidade
355   - AND PE.timestamp = P.timestamp
  309 + , contabilidade.pagamento AS conciliacao_pagamento
  310 +
  311 + INNER JOIN contabilidade.pagamento_estorno
  312 + ON conciliacao_pagamento.cod_lote = pagamento_estorno.cod_lote
  313 + AND conciliacao_pagamento.tipo = pagamento_estorno.tipo
  314 + AND conciliacao_pagamento.sequencia = pagamento_estorno.sequencia
  315 + AND conciliacao_pagamento.exercicio = pagamento_estorno.exercicio
  316 + AND conciliacao_pagamento.cod_entidade = pagamento_estorno.cod_entidade
  317 + AND conciliacao_pagamento.timestamp = pagamento_estorno.timestamp
  318 + AND conciliacao_pagamento.cod_nota = pagamento_estorno.cod_nota
  319 + AND conciliacao_pagamento.exercicio_liquidacao = pagamento_estorno.exercicio_liquidacao
  320 +
  321 + LEFT JOIN tesouraria.conciliacao_lancamento_contabil
  322 + ON conciliacao_pagamento.cod_lote = conciliacao_lancamento_contabil.cod_lote
  323 + AND conciliacao_pagamento.tipo = conciliacao_lancamento_contabil.tipo
  324 + AND conciliacao_pagamento.sequencia = conciliacao_lancamento_contabil.sequencia
  325 + AND conciliacao_pagamento.exercicio = conciliacao_lancamento_contabil.exercicio
  326 + AND conciliacao_pagamento.cod_entidade = conciliacao_lancamento_contabil.cod_entidade
  327 + AND conciliacao_lancamento_contabil.tipo_valor = ''C''
  328 +
  329 + LEFT JOIN tesouraria.conciliacao
  330 + ON conciliacao_lancamento_contabil.cod_plano = conciliacao.cod_plano
  331 + AND conciliacao_lancamento_contabil.exercicio_conciliacao = conciliacao.exercicio
  332 + AND conciliacao_lancamento_contabil.mes = conciliacao.mes
  333 +
  334 + INNER JOIN contabilidade.lancamento_empenho
  335 + ON lancamento_empenho.cod_entidade = conciliacao_pagamento.cod_entidade
  336 + AND lancamento_empenho.tipo = conciliacao_pagamento.tipo
  337 + AND lancamento_empenho.sequencia = conciliacao_pagamento.sequencia
  338 + AND lancamento_empenho.exercicio = conciliacao_pagamento.exercicio
  339 + AND lancamento_empenho.cod_lote = conciliacao_pagamento.cod_lote
  340 + AND lancamento_empenho.estorno = ''true''
  341 +
  342 + INNER JOIN contabilidade.lote
  343 + ON lancamento_empenho.cod_lote = lote.cod_lote
  344 + AND lancamento_empenho.cod_entidade = lote.cod_entidade
  345 + AND lancamento_empenho.tipo = lote.tipo
  346 + AND lancamento_empenho.exercicio = lote.exercicio
  347 +
  348 + , empenho.pagamento_liquidacao
  349 +
  350 + LEFT JOIN ( SELECT MAX(timestamp_emissao), num_cheque, cod_ordem, exercicio, cod_entidade
  351 + FROM tesouraria.cheque_emissao_ordem_pagamento
  352 + GROUP BY num_cheque, cod_ordem, exercicio, cod_entidade
  353 + ) AS cheque_emissao_ordem_pagamento
  354 + ON cheque_emissao_ordem_pagamento.cod_ordem = pagamento_liquidacao.cod_ordem
  355 + AND cheque_emissao_ordem_pagamento.exercicio = pagamento_liquidacao.exercicio
  356 + AND cheque_emissao_ordem_pagamento.cod_entidade = pagamento_liquidacao.cod_entidade
  357 +
  358 + , empenho.pagamento_liquidacao_nota_liquidacao_paga
  359 +
  360 + LEFT JOIN tesouraria.transacoes_pagamento
  361 + ON transacoes_pagamento.cod_ordem = pagamento_liquidacao_nota_liquidacao_paga.cod_ordem
  362 + AND transacoes_pagamento.cod_entidade = pagamento_liquidacao_nota_liquidacao_paga.cod_entidade
  363 + AND transacoes_pagamento.exercicio = pagamento_liquidacao_nota_liquidacao_paga.exercicio
356 364  
357   - AND PE.cod_nota = ENLPA.cod_nota
358   - AND PE.exercicio = ENLPA.exercicio
359   - AND PE.cod_entidade = ENLPA.cod_entidade
360   - AND PE.timestamp_anulado = ENLPA.timestamp_anulada
361   - AND PE.timestamp = ENLPA.timestamp
  365 + , empenho.nota_liquidacao_paga
  366 + , empenho.nota_liquidacao_paga_anulada
  367 + , empenho.nota_liquidacao
  368 +
  369 + WHERE
  370 + pagamento_estornado.cod_nota = nota_liquidacao_paga_anulada.cod_nota
  371 + AND pagamento_estornado.exercicio = nota_liquidacao_paga_anulada.exercicio
  372 + AND pagamento_estornado.cod_entidade = nota_liquidacao_paga_anulada.cod_entidade
  373 + AND pagamento_estornado.timestamp_anulado = nota_liquidacao_paga_anulada.timestamp_anulada
  374 + AND pagamento_estornado.timestamp = nota_liquidacao_paga_anulada.timestamp
362 375  
363   - AND ENLPA.exercicio = CPE.exercicio_liquidacao
364   - AND ENLPA.cod_nota = CPE.cod_nota
365   - AND ENLPA.cod_entidade = CPE.cod_entidade
366   - AND ENLPA.timestamp = CPE.timestamp
367   - AND ENLPA.timestamp_anulada = CPE.timestamp_anulada
  376 + AND nota_liquidacao_paga_anulada.exercicio = pagamento_estorno.exercicio_liquidacao
  377 + AND nota_liquidacao_paga_anulada.cod_nota = pagamento_estorno.cod_nota
  378 + AND nota_liquidacao_paga_anulada.cod_entidade = pagamento_estorno.cod_entidade
  379 + AND nota_liquidacao_paga_anulada.timestamp = pagamento_estorno.timestamp
  380 + AND nota_liquidacao_paga_anulada.timestamp_anulada = pagamento_estorno.timestamp_anulada
368 381  
369   - AND ENLPA.cod_nota = ENLP.cod_nota
370   - AND ENLPA.exercicio = ENLP.exercicio
371   - AND ENLPA.cod_entidade = ENLP.cod_entidade
372   - AND ENLPA.timestamp = ENLP.timestamp
  382 + AND nota_liquidacao_paga_anulada.cod_nota = nota_liquidacao_paga.cod_nota
  383 + AND nota_liquidacao_paga_anulada.exercicio = nota_liquidacao_paga.exercicio
  384 + AND nota_liquidacao_paga_anulada.cod_entidade = nota_liquidacao_paga.cod_entidade
  385 + AND nota_liquidacao_paga_anulada.timestamp = nota_liquidacao_paga.timestamp
373 386  
374   - AND ENLP.cod_nota = ENL.cod_nota
375   - AND ENLP.exercicio = ENL.exercicio
376   - AND ENLP.cod_entidade = ENL.cod_entidade
  387 + AND nota_liquidacao_paga.cod_nota = nota_liquidacao.cod_nota
  388 + AND nota_liquidacao_paga.exercicio = nota_liquidacao.exercicio
  389 + AND nota_liquidacao_paga.cod_entidade = nota_liquidacao.cod_entidade
377 390  
378   - AND EPL.cod_ordem = EPLNLP.cod_ordem
379   - AND EPL.exercicio = EPLNLP.exercicio
380   - AND EPL.cod_entidade = EPLNLP.cod_entidade
381   - AND EPL.exercicio_liquidacao = EPLNLP.exercicio_liquidacao
382   - AND EPL.cod_nota = EPLNLP.cod_nota
  391 + AND pagamento_liquidacao.cod_ordem = pagamento_liquidacao_nota_liquidacao_paga.cod_ordem
  392 + AND pagamento_liquidacao.exercicio = pagamento_liquidacao_nota_liquidacao_paga.exercicio
  393 + AND pagamento_liquidacao.cod_entidade = pagamento_liquidacao_nota_liquidacao_paga.cod_entidade
  394 + AND pagamento_liquidacao.exercicio_liquidacao = pagamento_liquidacao_nota_liquidacao_paga.exercicio_liquidacao
  395 + AND pagamento_liquidacao.cod_nota = pagamento_liquidacao_nota_liquidacao_paga.cod_nota
383 396  
384   - AND EPLNLP.exercicio_liquidacao = ENLP.exercicio
385   - AND EPLNLP.cod_nota = ENLP.cod_nota
386   - AND EPLNLP.cod_entidade = ENLP.cod_entidade
387   - AND EPLNLP.timestamp = ENLP.timestamp
  397 + AND pagamento_liquidacao_nota_liquidacao_paga.exercicio_liquidacao = nota_liquidacao_paga.exercicio
  398 + AND pagamento_liquidacao_nota_liquidacao_paga.cod_nota = nota_liquidacao_paga.cod_nota
  399 + AND pagamento_liquidacao_nota_liquidacao_paga.cod_entidade = nota_liquidacao_paga.cod_entidade
  400 + AND pagamento_liquidacao_nota_liquidacao_paga.timestamp = nota_liquidacao_paga.timestamp
388 401  
389   - AND p.cod_plano = '||inCodPlano||'
390   - AND pe.cod_entidade in ( '||stCodEntidade||' )
391   - AND to_char(PE.timestamp_anulado,''yyyy'')::integer BETWEEN '''||stExercicio||'''::integer-1 AND '''||stExercicio||'''::integer
392   - AND TO_CHAR(BOLETIM.dt_boletim,''mm'') = TO_CHAR(TO_DATE( '''||stDtFinal||'''::VARCHAR, ''dd/mm/yyyy'' ),''mm'')
393   - AND lo.dt_lote = to_date(to_char(PE.timestamp_anulado,''yyyy-mm-dd''),''yyyy-mm-dd'')
  402 + AND pagamento.cod_plano = '||inCodPlano||'
  403 + AND pagamento_estornado.cod_entidade in ( '||stCodEntidade||' )
  404 + AND to_char(pagamento_estornado.timestamp_anulado,''yyyy'')::INTEGER BETWEEN '''||stExercicio||'''::integer-1 AND '''||stExercicio||'''::integer
  405 + AND TO_CHAR(BOLETIM.dt_boletim,''mm'') = TO_CHAR(TO_DATE( '''||stDtFinal||'''::VARCHAR, ''dd/mm/yyyy'' ),''mm'')
  406 + AND lote.dt_lote = to_date(to_char(pagamento_estornado.timestamp_anulado,''yyyy-mm-dd''),''yyyy-mm-dd'')
  407 +
  408 +
394 409  
395 410 UNION
396 411  
... ... @@ -1061,6 +1076,8 @@ BEGIN
1061 1076 AND TO_CHAR(BOLETIM.dt_boletim,''mm'') < TO_CHAR(TO_DATE( '''||stDtFinal||'''::VARCHAR, ''dd/mm/yyyy''),''mm'')
1062 1077 ) as tbl
1063 1078 ';
  1079 +
  1080 + --RAISE NOTICE '%', stSql || stFiltro;
1064 1081  
1065 1082 IF(stFiltro != '')THEN
1066 1083 stSql := stSql || stFiltro;
... ...
gestaoPatrimonial/fontes/PHP/licitacao/classes/componentes/IMontaNumeroLicitacaoMultiploEntidadeUsuario.class.php
  Diff comments   View file @00a7f1b
... ... @@ -78,6 +78,7 @@ class IMontaNumeroLicitacaoMultiploEntidadeUsuario extends Objeto
78 78  
79 79 $this->obExercicio = new Exercicio();
80 80 $this->obExercicio->setName( 'stExercicioLicitacao' );
  81 + $this->obExercicio->setId( 'stExercicioLicitacao' );
81 82 $this->obExercicio->setNull( true );
82 83  
83 84 $this->obISelectMultiploEntidadeUsuario = new ISelectMultiploEntidadeUsuario();
... ... @@ -88,6 +89,7 @@ class IMontaNumeroLicitacaoMultiploEntidadeUsuario extends Objeto
88 89  
89 90 $this->obTxtLicitacao = new TextBox();
90 91 $this->obTxtLicitacao->setName ( 'inCodLicitacao' );
  92 + $this->obTxtLicitacao->setId ( 'inCodLicitacao' );
91 93 $this->obTxtLicitacao->setRotulo ( 'Licitação' );
92 94 $this->obTxtLicitacao->setTitle ( 'Selecione a Licitação.' );
93 95  
... ...
gestaoPatrimonial/fontes/PHP/licitacao/classes/mapeamento/TLicitacaoLicitacao.class.php
  Diff comments   View file @00a7f1b
... ... @@ -32,7 +32,7 @@
32 32  
33 33 * Casos de uso: uc-03.05.15
34 34  
35   - $Id: TLicitacaoLicitacao.class.php 62279 2015-04-16 18:38:45Z arthur $
  35 + $Id: TLicitacaoLicitacao.class.php 62370 2015-04-29 15:01:13Z jean $
36 36  
37 37 */
38 38  
... ... @@ -80,6 +80,7 @@ function TLicitacaoLicitacao()
80 80 $this->AddCampo('num_orgao' ,'integer' ,true ,'' ,false,false);
81 81 $this->AddCampo('num_unidade' ,'integer' ,true ,'' ,false,false);
82 82 $this->AddCampo('cod_regime' ,'integer' ,false ,'' ,false,false);
  83 + $this->AddCampo('tipo_chamada_publica','integer' ,false ,'' ,false,true);
83 84 }
84 85  
85 86 function proximoCodigoLicitacao(&$inCodLicitacao , $boTransacao = "")
... ...
gestaoPatrimonial/fontes/PHP/licitacao/instancias/processoLicitatorio/FLManterProcessoLicitatorio.php
  Diff comments   View file @00a7f1b
... ... @@ -68,6 +68,8 @@ $pgOcul = &quot;OC&quot;.$stPrograma.&quot;.php&quot;;
68 68 $pgJs = "JS".$stPrograma.".js";
69 69  
70 70 //include ($pgJs);
  71 +$jsOnload = '';
  72 +
71 73  
72 74 //Define a função do arquivo, ex: incluir, excluir, alterar, consultar, etc
73 75 $stAcao = $request->get('stAcao');
... ... @@ -132,6 +134,7 @@ $obFormulario-&gt;setAjuda (&quot;UC-03.05.15&quot;);
132 134 $obFormulario->addHidden ( $obHdnAcao );
133 135 $obFormulario->addHidden ( $obHdnCtrl );
134 136 $obMontaLicitacao->geraFormulario( $obFormulario );
  137 +$obMontaLicitacao->obExercicio->setReadOnly(true);
135 138 $obFormulario->addComponente ( $obHomologada);
136 139 $obFormulario->addComponente ( $obPopUpProcesso );
137 140 $obFormulario->addComponente ( $obPopUpMapa );
... ... @@ -144,4 +147,6 @@ $obFormulario-&gt;addComponente ( $obPopUpObjeto );
144 147 $obFormulario->OK();
145 148 $obFormulario->show();
146 149  
  150 +//$jsOnload .="jq('#stExercicioLicitacao').attr('readonly',true);";
  151 +
147 152 include_once '../../../../../../gestaoAdministrativa/fontes/PHP/framework/include/rodape.inc.php';
... ...
gestaoPatrimonial/fontes/PHP/licitacao/instancias/processoLicitatorio/FMManterProcessoLicitatorio.php
  Diff comments   View file @00a7f1b
... ... @@ -30,7 +30,7 @@
30 30 * @author Analista: Cleisson da Silva Barboza
31 31 * @author Desenvolvedor: Fernando Zank Correa Evangelista
32 32  
33   - $Id: FMManterProcessoLicitatorio.php 62228 2015-04-10 13:01:15Z evandro $
  33 + $Id: FMManterProcessoLicitatorio.php 62402 2015-05-04 20:19:28Z jean $
34 34  
35 35 * Casos de uso : uc-03.04.15
36 36 */
... ... @@ -282,6 +282,7 @@ if ($stAcao == &#39;incluir&#39;) {
282 282 $obISelectModalidadeLicitacao->setCampoDesc ("[cod_modalidade] - [descricao]" );
283 283 $obISelectModalidadeLicitacao->preencheCombo ($rsRecordSet );
284 284 $obISelectModalidadeLicitacao->setNull ( false );
  285 + $obISelectModalidadeLicitacao->obEvento->setOnChange ("ajaxJavaScript('".$pgOcul."?".Sessao::getId()."&inCodModalidade='+this.value,'recuperaRegistroModalidade');");
285 286 }
286 287  
287 288 if(!$boEdital) {
... ... @@ -419,7 +420,6 @@ if ($stAcao != &quot;incluir&quot;) {
419 420 $obLblLicitacao->setRotulo('Código da Licitação');
420 421 $obLblLicitacao->setValue($_REQUEST['inCodLicitacao']);
421 422  
422   -
423 423 if ( $compraJulgamento ) {
424 424 $obLblProcessoAdm = new Label();
425 425 $obLblProcessoAdm->setRotulo('Processo Administrativo');
... ... @@ -534,6 +534,9 @@ if ($stAcao != &quot;incluir&quot;) {
534 534 $obSpnItens = new Span;
535 535 $obSpnItens->setId( 'spnItens' );
536 536  
  537 +$obSpnRegistroModalidade = new Span;
  538 +$obSpnRegistroModalidade->setId('spnRegistroModalidade');
  539 +
537 540 //define o formulário
538 541 $obFormulario = new Formulario;
539 542 $obFormulario->addForm ( $obForm );
... ... @@ -587,9 +590,11 @@ if ($stAcao != &#39;anular&#39; ) {
587 590 if ($stAcao == 'incluir') {
588 591 $obFormulario->addComponente( $obISelectModalidadeLicitacao );
589 592 } else {
590   - $obFormulario->addComponente( $obLblModalidade );
  593 + $obFormulario->addComponente( $obLblModalidade );
591 594 }
592   -
  595 +
  596 + $obFormulario->addSpan ( $obSpnRegistroModalidade );
  597 +
593 598 if($compraJulgamento){
594 599 $obFormulario->addComponente ( $obLblCriterioJulg );
595 600 }else{
... ...
gestaoPatrimonial/fontes/PHP/licitacao/instancias/processoLicitatorio/FMManterProcessoLicitatorioConsulta.php
  Diff comments   View file @00a7f1b
... ... @@ -199,6 +199,26 @@ $obLblModalidade = new Label;
199 199 $obLblModalidade->setRotulo('Modalidade');
200 200 $obLblModalidade->setValue($_REQUEST['stModalidade']);
201 201  
  202 +include_once(TLIC."TLicitacaoTipoChamadaPublica.class.php");
  203 +$obTLicitacaoTipoChamadaPublica = new TLicitacaoTipoChamadaPublica;
  204 +$obTLicitacaoTipoChamadaPublica->setDado('cod_tipo',$rsLicitacao->getCampo("tipo_chamada_publica"));
  205 +$obTLicitacaoTipoChamadaPublica->recuperaPorChave($rsTipoChamadaPublica);
  206 +
  207 +# Define o Label de Tipo de Chamada Pública
  208 +$obLblChamadaPublica = new Label;
  209 +
  210 +if ($rsLicitacao->getCampo('cod_modalidade') == 8 || $rsLicitacao->getCampo('cod_modalidade') == 9) {
  211 + $obLblChamadaPublica->setRotulo('Chamada Pública');
  212 + if ($rsTipoChamadaPublica->getCampo("cod_tipo") != 0) {
  213 + $obLblChamadaPublica->setValue("Sim");
  214 + } else {
  215 + $obLblChamadaPublica->setValue("Não");
  216 + }
  217 +} else {
  218 + $obLblChamadaPublica->setRotulo('Tipo de Chamada Pública');
  219 + $obLblChamadaPublica->setValue($rsTipoChamadaPublica->getCampo("cod_tipo")." - ".$rsTipoChamadaPublica->getCampo("descricao"));
  220 +}
  221 +
202 222 # Define o Label para tipo de Cotação
203 223 $obLblTipoCotacao = new Label;
204 224 $obLblTipoCotacao->setName ( 'txtTipoCotacao' );
... ... @@ -336,6 +356,14 @@ $obFormulario-&gt;addComponente ( $obLblDtLicitacao );
336 356 $obFormulario->addComponente ( $obLblValorReferencia);
337 357 $obFormulario->addComponente ( $obLblTipoCotacao );
338 358 $obFormulario->addComponente ( $obLblModalidade );
  359 +
  360 +if ($rsLicitacao->getCampo('cod_modalidade') == 8 ||
  361 + $rsLicitacao->getCampo('cod_modalidade') == 9 ||
  362 + $rsLicitacao->getCampo('cod_modalidade') == 10
  363 + ) {
  364 + $obFormulario->addComponente ( $obLblChamadaPublica );
  365 +}
  366 +
339 367 $obFormulario->addComponente ( $obILblCriterioJulgamento);
340 368 $obFormulario->addComponente ( $obILblTipoObjeto);
341 369 $obFormulario->addComponente ( $obLblObjeto );
... ...
gestaoPatrimonial/fontes/PHP/licitacao/instancias/processoLicitatorio/OCManterProcessoLicitatorio.php
  Diff comments   View file @00a7f1b
... ... @@ -31,7 +31,7 @@
31 31  
32 32 * Casos de uso: uc-03.05.15
33 33  
34   - $Id: OCManterProcessoLicitatorio.php 62334 2015-04-24 17:34:31Z michel $
  34 + $Id: OCManterProcessoLicitatorio.php 62402 2015-05-04 20:19:28Z jean $
35 35  
36 36 */
37 37  
... ... @@ -1235,6 +1235,114 @@ switch ($stCtrl) {
1235 1235 $dtLicitacao = SistemaLegado::dataToBr(substr($rsLicitacao->getCampo("timestamp"),0,10));
1236 1236  
1237 1237 $stJs .= "f.stDtLicitacao.value='".$dtLicitacao."';";
  1238 +
  1239 + include_once(TLIC."TLicitacaoTipoChamadaPublica.class.php");
  1240 + $obLicitacaoTipoChamadaPublica = new TLicitacaoTipoChamadaPublica;
  1241 + $obLicitacaoTipoChamadaPublica->setDado('cod_tipo',$rsLicitacao->getCampo("tipo_chamada_publica"));
  1242 + $obLicitacaoTipoChamadaPublica->recuperaPorChave($rsTipoChamadaPublica);
  1243 +
  1244 + switch ($_REQUEST['inCodModalidade']) {
  1245 + case 3:
  1246 + case 6:
  1247 + case 7:
  1248 + $obRadioRegistroPrecosSim = new Radio;
  1249 + $obRadioRegistroPrecosSim->setRotulo ('Registro de Preços');
  1250 + $obRadioRegistroPrecosSim->setLabel ('Sim');
  1251 + $obRadioRegistroPrecosSim->setName ('boRegistroModalidade');
  1252 + $obRadioRegistroPrecosSim->setId ('boRegistroModalidade');
  1253 + $obRadioRegistroPrecosSim->setTitle ('Informe se existe registros de preços.');
  1254 + $obRadioRegistroPrecosSim->setValue ('Sim');
  1255 + $obRadioRegistroPrecosSim->setNull (false);
  1256 + $obRadioRegistroPrecosSim->setChecked (false);
  1257 +
  1258 + $obRadioRegistroPrecosNao = new Radio;
  1259 + $obRadioRegistroPrecosNao->setLabel ('Não');
  1260 + $obRadioRegistroPrecosNao->setTitle ('Informe se existe registros de preços.');
  1261 + $obRadioRegistroPrecosNao->setName ('boRegistroModalidade');
  1262 + $obRadioRegistroPrecosNao->setId ('boRegistroModalidade');
  1263 + $obRadioRegistroPrecosNao->setValue (0);
  1264 + $obRadioRegistroPrecosNao->setNull (false);
  1265 + $obRadioRegistroPrecosNao->setChecked (true);
  1266 +
  1267 + if ($rsTipoChamadaPublica->getCampo('cod_tipo') != 0) {
  1268 + $obRadioRegistroPrecosSim->setChecked (true);
  1269 + $obRadioRegistroPrecosNao->setChecked (false);
  1270 + }
  1271 +
  1272 + $obFormulario = new Formulario();
  1273 + $obFormulario->agrupaComponentes(array($obRadioRegistroPrecosSim,$obRadioRegistroPrecosNao));
  1274 + $obFormulario->montaInnerHTML();
  1275 + $stHTML = $obFormulario->getHTML();
  1276 + $stJs .= "d.getElementById('spnRegistroModalidade').innerHTML = '".$stHTML."';\n";
  1277 + break;
  1278 + case 8:
  1279 + case 9:
  1280 + $obRadioChamadaPublicaSim = new Radio;
  1281 + $obRadioChamadaPublicaSim->setRotulo ('Chamada Pública');
  1282 + $obRadioChamadaPublicaSim->setLabel ('Sim');
  1283 + $obRadioChamadaPublicaSim->setName ('boChamadaPublica');
  1284 + $obRadioChamadaPublicaSim->setId ('boChamadaPublica');
  1285 + $obRadioChamadaPublicaSim->setTitle ('Informe se existe chamada pública.');
  1286 + $obRadioChamadaPublicaSim->setValue ('Sim');
  1287 + $obRadioChamadaPublicaSim->setNull (false);
  1288 + $obRadioChamadaPublicaSim->setChecked (false);
  1289 +
  1290 + $obRadioChamadaPublicaNao = new Radio;
  1291 + $obRadioChamadaPublicaNao->setLabel ('Não');
  1292 + $obRadioChamadaPublicaNao->setTitle ('Informe se existe chamada pública.');
  1293 + $obRadioChamadaPublicaNao->setName ('boChamadaPublica');
  1294 + $obRadioChamadaPublicaNao->setId ('boChamadaPublica');
  1295 + $obRadioChamadaPublicaNao->setValue (0);
  1296 + $obRadioChamadaPublicaNao->setNull (false);
  1297 + $obRadioChamadaPublicaNao->setChecked (true);
  1298 +
  1299 + if ($rsTipoChamadaPublica->getCampo('cod_tipo') != 0) {
  1300 + $obRadioChamadaPublicaSim->setChecked (true);
  1301 + $obRadioChamadaPublicaNao->setChecked (false);
  1302 + }
  1303 +
  1304 + $obFormulario = new Formulario();
  1305 + $obFormulario->agrupaComponentes(array($obRadioChamadaPublicaSim,$obRadioChamadaPublicaNao));
  1306 + $obFormulario->montaInnerHTML();
  1307 + $stHTML = $obFormulario->getHTML();
  1308 + $stJs .= "d.getElementById('spnRegistroModalidade').innerHTML = '".$stHTML."';\n";
  1309 + break;
  1310 + case 10:
  1311 + $obRadioChamadaPublicaDispensa = new Radio;
  1312 + $obRadioChamadaPublicaDispensa->setRotulo ('Tipo de Chamada Pública');
  1313 + $obRadioChamadaPublicaDispensa->setLabel ('Dispensa por Chamada Pública');
  1314 + $obRadioChamadaPublicaDispensa->setName ('boRegistroModalidade');
  1315 + $obRadioChamadaPublicaDispensa->setId ('boRegistroModalidade');
  1316 + $obRadioChamadaPublicaDispensa->setTitle ('Informe se é por dispensa.');
  1317 + $obRadioChamadaPublicaDispensa->setValue (1);
  1318 + $obRadioChamadaPublicaDispensa->setNull (false);
  1319 +
  1320 + $obRadioChamadaPublicaInexigibilidade = new Radio;
  1321 + $obRadioChamadaPublicaInexigibilidade->setLabel ('Inexigibilidade por Chamada Pública');
  1322 + $obRadioChamadaPublicaInexigibilidade->setTitle ('Informe se é por inexigibilidade.');
  1323 + $obRadioChamadaPublicaInexigibilidade->setName ('boRegistroModalidade');
  1324 + $obRadioChamadaPublicaInexigibilidade->setId ('boRegistroModalidade');
  1325 + $obRadioChamadaPublicaInexigibilidade->setValue (2);
  1326 + $obRadioChamadaPublicaInexigibilidade->setNull (false);
  1327 +
  1328 + if ($rsTipoChamadaPublica->getCampo('cod_tipo') != 0) {
  1329 + if ($rsTipoChamadaPublica->getCampo('cod_tipo') == 1) {
  1330 + $obRadioChamadaPublicaDispensa->setChecked(true);
  1331 + } else {
  1332 + $obRadioChamadaPublicaInexigibilidade->setChecked(true);
  1333 + }
  1334 + }
  1335 +
  1336 + $obFormulario = new Formulario();
  1337 + $obFormulario->agrupaComponentes(array($obRadioChamadaPublicaDispensa,$obRadioChamadaPublicaInexigibilidade));
  1338 + $obFormulario->montaInnerHTML();
  1339 + $stHTML = $obFormulario->getHTML();
  1340 + $stJs .= "d.getElementById('boRegistroModalidade').innerHTML = '".$stHTML."';\n";
  1341 + break;
  1342 + default:
  1343 + $stJs .= "d.getElementById('boRegistroModalidade').innerHTML = '';\n";
  1344 + break;
  1345 + }
1238 1346 }
1239 1347  
1240 1348 include_once(TLIC."TLicitacaoMembroAdicional.class.php");
... ... @@ -1510,6 +1618,94 @@ case &#39;validaDtLicitacao&#39;:
1510 1618 }
1511 1619  
1512 1620 break;
  1621 +
  1622 + case 'recuperaRegistroModalidade':
  1623 + switch ($_REQUEST['inCodModalidade']) {
  1624 + case 3:
  1625 + case 6:
  1626 + case 7:
  1627 + $obRadioRegistroPrecosSim = new Radio;
  1628 + $obRadioRegistroPrecosSim->setRotulo ('Registro de Preços');
  1629 + $obRadioRegistroPrecosSim->setLabel ('Sim');
  1630 + $obRadioRegistroPrecosSim->setName ('boRegistroModalidade');
  1631 + $obRadioRegistroPrecosSim->setId ('boRegistroModalidade');
  1632 + $obRadioRegistroPrecosSim->setTitle ('Informe se existe registros de preços.');
  1633 + $obRadioRegistroPrecosSim->setValue ('Sim');
  1634 + $obRadioRegistroPrecosSim->setNull (false);
  1635 + $obRadioRegistroPrecosSim->setChecked (false);
  1636 +
  1637 + $obRadioRegistroPrecosNao = new Radio;
  1638 + $obRadioRegistroPrecosNao->setLabel ('Não');
  1639 + $obRadioRegistroPrecosNao->setTitle ('Informe se existe registros de preços.');
  1640 + $obRadioRegistroPrecosNao->setName ('boRegistroModalidade');
  1641 + $obRadioRegistroPrecosNao->setId ('boRegistroModalidade');
  1642 + $obRadioRegistroPrecosNao->setValue (0);
  1643 + $obRadioRegistroPrecosNao->setNull (false);
  1644 + $obRadioRegistroPrecosNao->setChecked (true);
  1645 +
  1646 + $obFormulario = new Formulario();
  1647 + $obFormulario->agrupaComponentes(array($obRadioRegistroPrecosSim,$obRadioRegistroPrecosNao));
  1648 + $obFormulario->montaInnerHTML();
  1649 + $stHTML = $obFormulario->getHTML();
  1650 + $stJs .= "d.getElementById('spnRegistroModalidade').innerHTML = '".$stHTML."';\n";
  1651 + break;
  1652 + case 8:
  1653 + case 9:
  1654 + $obRadioChamadaPublicaSim = new Radio;
  1655 + $obRadioChamadaPublicaSim->setRotulo ('Chamada Pública');
  1656 + $obRadioChamadaPublicaSim->setLabel ('Sim');
  1657 + $obRadioChamadaPublicaSim->setName ('boRegistroModalidade');
  1658 + $obRadioChamadaPublicaSim->setId ('boRegistroModalidade');
  1659 + $obRadioChamadaPublicaSim->setTitle ('Informe se existe chamada pública.');
  1660 + $obRadioChamadaPublicaSim->setValue ('Sim');
  1661 + $obRadioChamadaPublicaSim->setNull (false);
  1662 + $obRadioChamadaPublicaSim->setChecked (false);
  1663 +
  1664 + $obRadioChamadaPublicaNao = new Radio;
  1665 + $obRadioChamadaPublicaNao->setLabel ('Não');
  1666 + $obRadioChamadaPublicaNao->setTitle ('Informe se existe chamada pública.');
  1667 + $obRadioChamadaPublicaNao->setName ('boRegistroModalidade');
  1668 + $obRadioChamadaPublicaNao->setId ('boRegistroModalidade');
  1669 + $obRadioChamadaPublicaNao->setValue (0);
  1670 + $obRadioChamadaPublicaNao->setNull (false);
  1671 + $obRadioChamadaPublicaNao->setChecked (true);
  1672 +
  1673 + $obFormulario = new Formulario();
  1674 + $obFormulario->agrupaComponentes(array($obRadioChamadaPublicaSim,$obRadioChamadaPublicaNao));
  1675 + $obFormulario->montaInnerHTML();
  1676 + $stHTML = $obFormulario->getHTML();
  1677 + $stJs .= "d.getElementById('spnRegistroModalidade').innerHTML = '".$stHTML."';\n";
  1678 + break;
  1679 + case 10:
  1680 + $obRadioChamadaPublicaDispensa = new Radio;
  1681 + $obRadioChamadaPublicaDispensa->setRotulo ('Tipo de Chamada Pública');
  1682 + $obRadioChamadaPublicaDispensa->setLabel ('Dispensa por Chamada Pública');
  1683 + $obRadioChamadaPublicaDispensa->setName ('boRegistroModalidade');
  1684 + $obRadioChamadaPublicaDispensa->setId ('boRegistroModalidade');
  1685 + $obRadioChamadaPublicaDispensa->setTitle ('Informe se é por dispensa.');
  1686 + $obRadioChamadaPublicaDispensa->setValue (1);
  1687 + $obRadioChamadaPublicaDispensa->setNull (false);
  1688 +
  1689 + $obRadioChamadaPublicaInexigibilidade = new Radio;
  1690 + $obRadioChamadaPublicaInexigibilidade->setLabel ('Inexigibilidade por Chamada Pública');
  1691 + $obRadioChamadaPublicaInexigibilidade->setTitle ('Informe se é por inexigibilidade.');
  1692 + $obRadioChamadaPublicaInexigibilidade->setName ('boRegistroModalidade');
  1693 + $obRadioChamadaPublicaInexigibilidade->setId ('boRegistroModalidade');
  1694 + $obRadioChamadaPublicaInexigibilidade->setValue (2);
  1695 + $obRadioChamadaPublicaInexigibilidade->setNull (false);
  1696 +
  1697 + $obFormulario = new Formulario();
  1698 + $obFormulario->agrupaComponentes(array($obRadioChamadaPublicaDispensa,$obRadioChamadaPublicaInexigibilidade));
  1699 + $obFormulario->montaInnerHTML();
  1700 + $stHTML = $obFormulario->getHTML();
  1701 + $stJs .= "d.getElementById('spnRegistroModalidade').innerHTML = '".$stHTML."';\n";
  1702 + break;
  1703 + default:
  1704 + $stJs .= "d.getElementById('spnRegistroModalidade').innerHTML = '';\n";
  1705 + break;
  1706 + }
  1707 +
  1708 + break;
1513 1709  
1514 1710 case 'alterarMembroAdicional':
1515 1711 $arMembro = Sessao::read('arMembro');
... ...
gestaoPatrimonial/fontes/PHP/licitacao/instancias/processoLicitatorio/PRManterProcessoLicitatorio.php
  Diff comments   View file @00a7f1b
1   -<?php
  1 + <?php
2 2 /*
3 3 **********************************************************************************
4 4 * *
... ... @@ -34,7 +34,7 @@
34 34  
35 35 * Casos de uso: uc-03.05.15
36 36  
37   - $Id: PRManterProcessoLicitatorio.php 62228 2015-04-10 13:01:15Z evandro $
  37 + $Id: PRManterProcessoLicitatorio.php 62403 2015-05-04 20:42:51Z jean $
38 38  
39 39 */
40 40  
... ... @@ -173,6 +173,30 @@ switch ($stAcao) {
173 173 $obTLicitacaoLicitacao->setDado('cod_objeto' , $_REQUEST['stObjeto'] );
174 174 $obTLicitacaoLicitacao->setDado('cod_criterio' , $_REQUEST['inCodCriterio'] );
175 175 $obTLicitacaoLicitacao->setDado('cod_tipo_licitacao' , $_REQUEST['inCodTipoCotacao'] );
  176 +
  177 + if ($_REQUEST['boRegistroModalidade'] == '' || (!isset($_REQUEST['boRegistroModalidade']))) {
  178 + $registroModalidade = 0;
  179 + } else {
  180 + $registroModalidade = $_REQUEST['boRegistroModalidade'];
  181 + }
  182 +
  183 + if (($_REQUEST['inCodModalidade'] == 3 ||
  184 + $_REQUEST['inCodModalidade'] == 6 ||
  185 + $_REQUEST['inCodModalidade'] == 7
  186 + ) && $registroModalidade == 'Sim') {
  187 + $obTLicitacaoLicitacao->setDado('registro_precos' , 't' );
  188 + } else {
  189 + $obTLicitacaoLicitacao->setDado('registro_precos' , 'f' );
  190 + }
  191 +
  192 + if ($_REQUEST['inCodModalidade'] == 8 && $registroModalidade == 'Sim') {
  193 + $obTLicitacaoLicitacao->setDado('tipo_chamada_publica' , 1 );
  194 + } elseif ($_REQUEST['inCodModalidade'] == 9 && $chamadaPublica == 'Sim') {
  195 + $obTLicitacaoLicitacao->setDado('tipo_chamada_publica' , 2 );
  196 + } else {
  197 + $obTLicitacaoLicitacao->setDado('tipo_chamada_publica' , $chamadaPublica );
  198 + }
  199 +
176 200 $obTLicitacaoLicitacao->setDado('cod_mapa' , $arMapa[0] );
177 201 $obTLicitacaoLicitacao->setDado('exercicio_mapa' , "".$arMapa[1]."" );
178 202 $obTLicitacaoLicitacao->setDado('cod_processo' , $arProcesso[0] );
... ... @@ -475,6 +499,30 @@ switch ($stAcao) {
475 499 $obTLicitacaoLicitacao->setDado('num_orgao' , $arStUnidadeOrcamentaria[0]);
476 500 $obTLicitacaoLicitacao->setDado('num_unidade', $arStUnidadeOrcamentaria[1]);
477 501 $obTLicitacaoLicitacao->setDado('cod_regime',$_REQUEST['inCodRegime'] != '' ? $_REQUEST['inCodRegime'] : 'null');
  502 +
  503 + if ($_REQUEST['boRegistroModalidade'] == '' || (!isset($_REQUEST['boRegistroModalidade']))) {
  504 + $registroModalidade = 0;
  505 + } else {
  506 + $registroModalidade = $_REQUEST['boRegistroModalidade'];
  507 + }
  508 +
  509 + if (($_REQUEST['inCodModalidade'] == 3 ||
  510 + $_REQUEST['inCodModalidade'] == 6 ||
  511 + $_REQUEST['inCodModalidade'] == 7
  512 + ) && $registroModalidade == 'Sim') {
  513 + $obTLicitacaoLicitacao->setDado('registro_precos' , 't' );
  514 + } else {
  515 + $obTLicitacaoLicitacao->setDado('registro_precos' , 'f' );
  516 + }
  517 +
  518 + if ($_REQUEST['inCodModalidade'] == 8 && $registroModalidade == 'Sim') {
  519 + $obTLicitacaoLicitacao->setDado('tipo_chamada_publica' , 1 );
  520 + } elseif ($_REQUEST['inCodModalidade'] == 9 && $chamadaPublica == 'Sim') {
  521 + $obTLicitacaoLicitacao->setDado('tipo_chamada_publica' , 2 );
  522 + } else {
  523 + $obTLicitacaoLicitacao->setDado('tipo_chamada_publica' , $chamadaPublica );
  524 + }
  525 +
478 526 $obTLicitacaoLicitacao->alteracao();
479 527  
480 528 $obTMapaModalidade = new TComprasMapaModalidade();
... ...
gestaoPrestacaoContas/fontes/PHP/TCEMG/classes/mapeamento/TTCEMGRelatorioRazaoDespesa.class.php
  Diff comments   View file @00a7f1b
... ... @@ -33,7 +33,7 @@
33 33 * @package URBEM
34 34 * @subpackage Mapeamento
35 35 *
36   - * $Id: TTCEMGRelatorioRazaoDespesa.class.php 62317 2015-04-22 16:28:06Z michel $
  36 + * $Id: TTCEMGRelatorioRazaoDespesa.class.php 62411 2015-05-05 19:01:22Z lisiane $
37 37 *
38 38 * $Name: $
39 39 * $Date: $
... ... @@ -73,353 +73,42 @@ class TTCEMGRelatorioRazaoDespesa extends Persistente
73 73 }
74 74  
75 75 public function montaRecuperaDadosConsultaPrincipal() {
76   - $stSql = "CREATE TEMPORARY TABLE tmp_liquidado_razaodespesa AS (
77   - SELECT nota_liquidacao.cod_entidade,
78   - nota_liquidacao.cod_empenho,
79   - nota_liquidacao.exercicio_empenho,
80   - SUM(nota_liquidacao_item.vl_total) - SUM(coalesce(nota_liquidacao_item_anulado.vl_anulado, 0.00)) AS vl_total
81   -
82   - FROM empenho.nota_liquidacao
83   -
84   - INNER JOIN empenho.nota_liquidacao_item
85   - ON nota_liquidacao_item.exercicio = nota_liquidacao.exercicio
86   - AND nota_liquidacao_item.cod_entidade = nota_liquidacao.cod_entidade
87   - AND nota_liquidacao_item.cod_nota = nota_liquidacao.cod_nota
88   -
89   - LEFT JOIN empenho.nota_liquidacao_item_anulado
90   - ON nota_liquidacao_item_anulado.exercicio = nota_liquidacao_item.exercicio
91   - AND nota_liquidacao_item_anulado.cod_nota = nota_liquidacao_item.cod_nota
92   - AND nota_liquidacao_item_anulado.cod_entidade = nota_liquidacao_item.cod_entidade
93   - AND nota_liquidacao_item_anulado.num_item = nota_liquidacao_item.num_item
94   - AND nota_liquidacao_item_anulado.cod_pre_empenho = nota_liquidacao_item.cod_pre_empenho
95   - AND nota_liquidacao_item_anulado.exercicio_item = nota_liquidacao_item.exercicio_item
96   -
97   - WHERE nota_liquidacao_item.exercicio_item = '".$this->getDado('exercicio')."'
98   - AND to_date( to_char(nota_liquidacao.dt_liquidacao, 'dd/mm/yyyy'), 'dd/mm/yyyy') BETWEEN to_date('".$this->getDado('dt_inicial')."','dd/mm/yyyy') AND to_date('".$this->getDado('dt_final')."','dd/mm/yyyy')
99   -
100   - GROUP BY nota_liquidacao.cod_entidade,
101   - nota_liquidacao.cod_empenho,
102   - nota_liquidacao.exercicio_empenho
103   - );
104   -
105   - SELECT entidade,
106   - empenho,
107   - exercicio,
108   - cgm,
109   - cgm||' - '||nom_cgm AS credor,
110   - dt_empenho,
111   - valor,
112   - valor_liquidado,
113   - valor_pago,
114   - descricao,
115   - cod_recurso,
116   - recurso,
117   - cod_estrutural||' - '||descricao_despesa AS despesa,
118   - dotacao,
119   - dt_pagamento,
120   - num_banco||' / '||num_agencia||' / '||num_conta_corrente AS banco,
121   - cod_recurso_banco,
122   - num_documento
123   -
124   - FROM (
125   - SELECT empenho.cod_entidade AS entidade,
126   - empenho.cod_empenho AS empenho,
127   - empenho.exercicio AS exercicio,
128   - pre_empenho.cgm_beneficiario AS cgm,
129   - sw_cgm.nom_cgm,
130   - cast( pre_empenho.descricao AS varchar ) AS descricao,
131   - sw_cgm.nom_cgm AS nome_conta,
132   - to_char(empenho.dt_empenho,'dd/mm/yyyy') AS dt_empenho,
133   -
134   - sum(coalesce(empenho.vl_total, 0.00)) - sum(coalesce(empenho.vl_anulado, 0.00)) AS valor,
135   - coalesce(pago.vl_total, 0.00) - coalesce(pago.vl_anulado, 0.00) AS valor_pago,
136   -
137   - ( SELECT vl_total
138   - FROM tmp_liquidado_razaodespesa tlr
139   - WHERE tlr.cod_entidade = empenho.cod_entidade
140   - AND tlr.exercicio_empenho = empenho.exercicio
141   - AND tlr.cod_empenho = empenho.cod_empenho) AS valor_liquidado,
142   -
143   - ped_d_cd.cod_recurso,
144   - ped_d_cd.nom_recurso AS recurso,
145   - ped_d_cd.cod_estrutural AS cod_estrutural,
146   - ped_d_cd.descricao AS descricao_despesa,
147   - ped_d_cd.dotacao,
148   - to_char(pago.timestamp,'dd/mm/yyyy') AS dt_pagamento,
149   - banco.num_banco,
150   - agencia.num_agencia,
151   - conta_corrente.num_conta_corrente,
152   - plano_recurso.cod_recurso AS cod_recurso_banco,
153   - pago.num_documento
154   - FROM
155   - (
156   - SELECT
157   - empenho.cod_entidade
158   - , empenho.cod_empenho
159   - , empenho.exercicio
160   - , empenho.dt_empenho
161   - , empenho.cod_categoria
162   - , item_pre_empenho.vl_total
163   - , item_pre_empenho.cod_pre_empenho
164   - , item_pre_empenho.num_item
165   - , sum(empenho_anulado_item.vl_anulado) AS vl_anulado
166   -
167   - FROM empenho.empenho
168   -
169   - INNER JOIN empenho.item_pre_empenho
170   - ON empenho.exercicio = item_pre_empenho.exercicio
171   - AND empenho.cod_pre_empenho = item_pre_empenho.cod_pre_empenho
172   -
173   - LEFT JOIN empenho.empenho_anulado
174   - ON empenho_anulado.exercicio = empenho.exercicio
175   - AND empenho_anulado.cod_entidade = empenho.cod_entidade
176   - AND empenho_anulado.cod_empenho = empenho.cod_empenho
177   - AND to_date( to_char(empenho_anulado.timestamp, 'dd/mm/yyyy'), 'dd/mm/yyyy') BETWEEN to_date('".$this->getDado('dt_inicial')."','dd/mm/yyyy') AND to_date('".$this->getDado('dt_final')."','dd/mm/yyyy')
178   -
179   - LEFT JOIN empenho.empenho_anulado_item
180   - ON empenho_anulado_item.exercicio = empenho_anulado.exercicio
181   - AND empenho_anulado_item.cod_entidade = empenho_anulado.cod_entidade
182   - AND empenho_anulado_item.cod_empenho = empenho_anulado.cod_empenho
183   - AND empenho_anulado_item.timestamp = empenho_anulado.timestamp
184   - AND empenho_anulado_item.exercicio = empenho.exercicio
185   - AND empenho_anulado_item.cod_pre_empenho = item_pre_empenho.cod_pre_empenho
186   - AND empenho_anulado_item.num_item = item_pre_empenho.num_item
187   -
188   - WHERE to_date(to_char(empenho.dt_empenho, 'dd/mm/yyyy'), 'dd/mm/yyyy') BETWEEN to_date('".$this->getDado('dt_inicial')."','dd/mm/yyyy') AND to_date('".$this->getDado('dt_final')."','dd/mm/yyyy')
189   -
190   - GROUP BY empenho.cod_entidade
191   - , empenho.cod_empenho
192   - , empenho.exercicio
193   - , empenho.dt_empenho
194   - , empenho.cod_categoria
195   - , item_pre_empenho.vl_total
196   - , item_pre_empenho.cod_pre_empenho
197   - , item_pre_empenho.num_item
198   - ) AS empenho
199   -
200   - INNER JOIN empenho.pre_empenho
201   - ON empenho.exercicio = pre_empenho.exercicio
202   - AND empenho.cod_pre_empenho = pre_empenho.cod_pre_empenho
203   -
204   - INNER JOIN empenho.historico
205   - ON historico.cod_historico = pre_empenho.cod_historico
206   - AND historico.exercicio = pre_empenho.exercicio
207   -
208   - INNER JOIN sw_cgm
209   - ON sw_cgm.numcgm = pre_empenho.cgm_beneficiario
210   -
211   - LEFT JOIN ( SELECT nota_liquidacao.cod_entidade,
212   - nota_liquidacao.cod_empenho,
213   - nota_liquidacao.exercicio,
214   - nota_liquidacao.exercicio_empenho,
215   - nota_liquidacao_paga.timestamp,
216   - nota_liquidacao_conta_pagadora.cod_plano,
217   - pagamento_tipo_documento.num_documento,
218   - sum(nota_liquidacao_paga.vl_pago) as vl_total,
219   - sum(nota_liquidacao_paga_anulada.vl_anulado) as vl_anulado
220   -
221   - FROM empenho.nota_liquidacao
222   -
223   - INNER JOIN empenho.nota_liquidacao_paga
224   - ON nota_liquidacao_paga.exercicio = nota_liquidacao.exercicio
225   - AND nota_liquidacao_paga.cod_entidade = nota_liquidacao.cod_entidade
226   - AND nota_liquidacao_paga.cod_nota = nota_liquidacao.cod_nota
227   -
228   - LEFT JOIN empenho.nota_liquidacao_paga_anulada
229   - ON nota_liquidacao_paga_anulada.exercicio = nota_liquidacao_paga.exercicio
230   - AND nota_liquidacao_paga_anulada.cod_entidade = nota_liquidacao_paga.cod_entidade
231   - AND nota_liquidacao_paga_anulada.cod_nota = nota_liquidacao_paga.cod_nota
232   - AND nota_liquidacao_paga_anulada.timestamp = nota_liquidacao_paga.timestamp
233   -
234   - INNER JOIN empenho.pagamento_liquidacao_nota_liquidacao_paga
235   - ON pagamento_liquidacao_nota_liquidacao_paga.cod_entidade = nota_liquidacao_paga.cod_entidade
236   - AND pagamento_liquidacao_nota_liquidacao_paga.cod_nota = nota_liquidacao_paga.cod_nota
237   - AND pagamento_liquidacao_nota_liquidacao_paga.exercicio_liquidacao = nota_liquidacao_paga.exercicio
238   - AND pagamento_liquidacao_nota_liquidacao_paga.timestamp = nota_liquidacao_paga.timestamp
239   -
240   - INNER JOIN empenho.nota_liquidacao_conta_pagadora
241   - ON nota_liquidacao_conta_pagadora.cod_entidade = nota_liquidacao_paga.cod_entidade
242   - AND nota_liquidacao_conta_pagadora.cod_nota = nota_liquidacao_paga.cod_nota
243   - AND nota_liquidacao_conta_pagadora.exercicio_liquidacao = nota_liquidacao_paga.exercicio
244   - AND nota_liquidacao_conta_pagadora.timestamp = nota_liquidacao_paga.timestamp
245   -
246   - LEFT JOIN tcemg.pagamento_tipo_documento
247   - ON pagamento_tipo_documento.exercicio = nota_liquidacao_paga.exercicio
248   - AND pagamento_tipo_documento.cod_nota = nota_liquidacao_paga.cod_nota
249   - AND pagamento_tipo_documento.cod_entidade = nota_liquidacao_paga.cod_entidade
250   - AND pagamento_tipo_documento.timestamp = nota_liquidacao_paga.timestamp
251   -
252   - WHERE to_date(to_char(nota_liquidacao_paga.timestamp, 'dd/mm/yyyy'), 'dd/mm/yyyy') BETWEEN to_date('".$this->getDado('dt_inicial')."','dd/mm/yyyy') AND to_date('".$this->getDado('dt_final')."','dd/mm/yyyy')
253   -
254   - GROUP BY nota_liquidacao.cod_entidade,
255   - nota_liquidacao.cod_empenho,
256   - nota_liquidacao.exercicio,
257   - nota_liquidacao.exercicio_empenho,
258   - nota_liquidacao_paga.timestamp,
259   - pagamento_tipo_documento.num_documento,
260   - nota_liquidacao_conta_pagadora.cod_plano
261   - ) AS pago
262   -
263   - ON pago.exercicio_empenho = empenho.exercicio
264   - AND pago.cod_entidade = empenho.cod_entidade
265   - AND pago.cod_empenho = empenho.cod_empenho
266   -
267   - LEFT JOIN contabilidade.plano_analitica
268   - ON plano_analitica.exercicio = pago.exercicio
269   - AND plano_analitica.cod_plano = pago.cod_plano
270   -
271   - LEFT JOIN contabilidade.plano_recurso
272   - ON plano_recurso.exercicio = plano_analitica.exercicio
273   - AND plano_recurso.cod_plano = plano_analitica.cod_plano
274   -
275   - LEFT JOIN contabilidade.plano_banco
276   - ON plano_banco.exercicio = plano_analitica.exercicio
277   - AND plano_banco.cod_plano = plano_analitica.cod_plano
278   -
279   - LEFT JOIN monetario.conta_corrente
280   - ON conta_corrente.cod_banco = plano_banco.cod_banco
281   - AND conta_corrente.cod_agencia = plano_banco.cod_agencia
282   - AND conta_corrente.cod_conta_corrente = plano_banco.cod_conta_corrente
283   -
284   - LEFT JOIN monetario.agencia
285   - ON agencia.cod_banco = conta_corrente.cod_banco
286   - AND agencia.cod_agencia = conta_corrente.cod_agencia
287   -
288   - LEFT JOIN monetario.banco
289   - ON banco.cod_banco = conta_corrente.cod_banco
290   -
291   - LEFT JOIN (
292   - SELECT
293   - pre_empenho_despesa.exercicio,
294   - pre_empenho_despesa.cod_pre_empenho,
295   - despesa.num_orgao,
296   - despesa.num_unidade,
297   - despesa.cod_funcao,
298   - despesa.cod_subfuncao,
299   - programa.num_programa,
300   - despesa.num_pao,
301   - LPAD(despesa.num_orgao::VARCHAR, 2, '0')||'.'||LPAD(despesa.num_unidade::VARCHAR, 2, '0')||'.'||despesa.cod_funcao||'.'||despesa.cod_subfuncao||'.'||programa.num_programa||'.'||LPAD(despesa.num_pao::VARCHAR, 4, '0')||'.'||REPLACE(conta_despesa.cod_estrutural, '.', '') AS dotacao,
302   - despesa.cod_recurso,
303   - despesa.cod_despesa,
304   - recurso.nom_recurso,
305   - despesa.cod_conta,
306   - conta_despesa.cod_estrutural,
307   - conta_despesa.descricao,
308   - recurso.masc_recurso_red,
309   - recurso.cod_detalhamento,
310   - ppa.acao.num_acao
311   -
312   - FROM empenho.pre_empenho_despesa
313   -
314   - INNER JOIN orcamento.despesa
315   - ON pre_empenho_despesa.cod_despesa = despesa.cod_despesa
316   - AND pre_empenho_despesa.exercicio = despesa.exercicio
317   -
318   - INNER JOIN orcamento.recurso('".$this->getDado('exercicio')."') AS recurso
319   - ON recurso.cod_recurso = despesa.cod_recurso
320   - AND recurso.exercicio = despesa.exercicio
321   -
322   - INNER JOIN orcamento.programa_ppa_programa
323   - ON programa_ppa_programa.cod_programa = despesa.cod_programa
324   - AND programa_ppa_programa.exercicio = despesa.exercicio
325   -
326   - INNER JOIN ppa.programa
327   - ON ppa.programa.cod_programa = programa_ppa_programa.cod_programa_ppa
328   -
329   - INNER JOIN orcamento.pao_ppa_acao
330   - ON pao_ppa_acao.num_pao = despesa.num_pao
331   - AND pao_ppa_acao.exercicio = despesa.exercicio
332   -
333   - INNER JOIN ppa.acao
334   - ON ppa.acao.cod_acao = pao_ppa_acao.cod_acao
335   -
336   - INNER JOIN orcamento.conta_despesa
337   - ON pre_empenho_despesa.cod_conta = conta_despesa.cod_conta
338   - AND pre_empenho_despesa.exercicio = conta_despesa.exercicio
339   -
340   - WHERE pre_empenho_despesa.exercicio = '".$this->getDado('exercicio')."'
341   - ) AS ped_d_cd
342   -
343   - ON pre_empenho.exercicio = ped_d_cd.exercicio
344   - AND pre_empenho.cod_pre_empenho = ped_d_cd.cod_pre_empenho
345   -
346   - WHERE empenho.exercicio = '".$this->getDado('exercicio')."'
347   - AND empenho.cod_entidade IN (".$this->getDado('entidade').") ";
348   -
349   -
350   - switch($this->getDado('tipo_relatorio')) {
351   - case 'fundeb_60':
352   - $stSql .= " AND ped_d_cd.cod_recurso = 118";
353   - break;
354   -
355   - case 'fundeb_40':
356   - $stSql .= " AND ped_d_cd.cod_recurso = 119";
357   - break;
358   -
359   - case 'ensino_fundamental':
360   - $stSql .= " AND ped_d_cd.cod_subfuncao = 361";
361   - break;
362   -
363   - case 'gasto_25':
364   - $stSql .= " AND ped_d_cd.cod_recurso = 101";
365   - break;
366   -
367   - case 'saude':
368   - $stSql .= " AND ped_d_cd.cod_recurso = 102";
369   - break;
370   -
371   - case 'diversos':
372   - $stSql .= " AND ped_d_cd.cod_recurso = 100";
373   - break;
374   - //falta educacao_extra_orcamentario e restos_pagar
375   - }
376   -
377   - if($this->getDado('num_orgao') != '') {
378   - $stSql .= " AND ped_d_cd.num_orgao = ".$this->getDado('num_orgao');
379   - }
380   -
381   - if($this->getDado('num_unidade') != '') {
382   - $stSql .= " AND ped_d_cd.num_unidade = ".$this->getDado('num_unidade');
383   - }
384   -
385   - if($this->getDado('num_pao') != '') {
386   - $stSql .= " AND ped_d_cd.num_pao = ".$this->getDado('num_pao');
387   - }
388   -
389   - $stSql.= " GROUP BY empenho.dt_empenho,
390   - empenho.cod_pre_empenho,
391   - empenho.cod_entidade,
392   - empenho.cod_empenho,
393   - empenho.exercicio,
394   - pre_empenho.cgm_beneficiario,
395   - sw_cgm.nom_cgm,
396   - pre_empenho.descricao,
397   - ped_d_cd.cod_estrutural,
398   - ped_d_cd.cod_recurso,
399   - ped_d_cd.nom_recurso,
400   - ped_d_cd.descricao,
401   - ped_d_cd.dotacao,
402   - pago.vl_total,
403   - pago.vl_anulado,
404   - pago.timestamp,
405   - banco.num_banco,
406   - agencia.num_agencia,
407   - conta_corrente.num_conta_corrente,
408   - plano_recurso.cod_recurso,
409   - pago.num_documento
410   - ) AS tbl
411   -
412   - WHERE valor <> '0.00'
413   -
414   - ORDER BY cod_estrutural,
415   - empenho,
416   - dt_empenho,
417   - dt_pagamento ;
418   - ";
419   -
420   - //SistemaLegado::mostravar($stSql);
421   - //die;
422   -
  76 + $stSql = " SELECT DISTINCT *
  77 + FROM tcemg.razao_despesa('".$this->getDado('exercicio')."',
  78 + '".$this->getDado('dt_inicial')."',
  79 + '".$this->getDado('dt_final')."',
  80 + '".$this->getDado('entidade')."',
  81 + '".$this->getDado('num_orgao')."',
  82 + '".$this->getDado('num_unidade')."',
  83 + '".$this->getDado('num_pao')."',
  84 + '".$this->getDado('cod_recurso')."',
  85 + 'data'
  86 + ) as retorno( entidade integer,
  87 + empenho integer,
  88 + exercicio char(4),
  89 + cgm integer,
  90 + credor text,
  91 + dt_empenho text,
  92 + valor numeric,
  93 + valor_pago numeric,
  94 + valor_liquidado numeric,
  95 + descricao varchar,
  96 + cod_recurso integer,
  97 + recurso varchar,
  98 + despesa text,
  99 + dotacao text,
  100 + dt_pagamento text,
  101 + banco varchar,
  102 + cod_recurso_banco integer,
  103 + num_documento varchar,
  104 + cod_nota integer,
  105 + vl_total_pago numeric,
  106 + vl_total_pago_anulado numeric,
  107 + vl_total_empenhado numeric,
  108 + vl_total_empenhado_anulado numeric,
  109 + vl_total_liquidado numeric,
  110 + vl_total_liquidado_anulado numeric
  111 + ) ";
423 112 return $stSql;
424 113 }
425 114 public function recuperaDadosConsultaEmpenhoLiquidadoPago(&$rsRecordSet, $stCondicao = "" , $stOrdem = "" , $boTransacao = "")
... ...
gestaoPrestacaoContas/fontes/PHP/TCEMG/instancias/relatorios/FLRelatorioRazaoDespesa.php
  Diff comments   View file @00a7f1b
... ... @@ -28,7 +28,7 @@
28 28 * Data de Criação : 06/08/2004
29 29 * @author Desenvolvedor: Cassiano de Vasconcellos Ferreira
30 30 * @ignore
31   - * $Id: FLRelatorioRazaoDespesa.php 62308 2015-04-20 19:41:57Z evandro $
  31 + * $Id: FLRelatorioRazaoDespesa.php 62411 2015-05-05 19:01:22Z lisiane $
32 32 * Casos de uso: uc-02.01.22
33 33 */
34 34  
... ... @@ -242,7 +242,6 @@ $obCmbRecursos-&gt;setCampoId2 (&#39;cod_recurso&#39;);
242 242 $obCmbRecursos->setCampoDesc2 ('[cod_recurso] - [nom_recurso]');
243 243 $obCmbRecursos->SetRecord2 ( $rsRecordsetRecursos );
244 244  
245   -
246 245 //Define objeto span para componentes de filtro
247 246 $obSpan = new Span;
248 247 $obSpan->setId( "spnFormularioFiltro" );
... ... @@ -251,25 +250,14 @@ $obFormularioFiltro = new Formulario;
251 250 $obFormularioFiltro->addComponenteComposto($obTxtOrgao , $obCmbOrgao );
252 251 $obFormularioFiltro->addComponenteComposto($obTxtUnidade, $obCmbUnidade);
253 252 $obFormularioFiltro->addComponenteComposto($obTxtPao , $obCmbPao );
  253 +
254 254 $obFormularioFiltro->montaInnerHTML();
255 255 $stHtml = $obFormularioFiltro->getHTML();
256 256  
257   -$obFormularioFiltroRecurso = new Formulario;
258   -$obFormularioFiltroRecurso->addComponente($obCmbRecursos);
259   -$obFormularioFiltroRecurso->montaInnerHTML();
260   -$stHtmlRecurso = $obFormularioFiltroRecurso->getHTML();
261   -
262 257 $jsOnLoad = "
263 258 function salvar() {
264 259 selecionaTodosSelect(document.frm.inCodEntidade);
265   -
266   - if( jQuery('#stTipoRelatorio').val() == 'educacao_despesa_extra_orcamentaria'
267   - || jQuery('#stTipoRelatorio').val() == 'educacao_receita_extra_orcamentaria'
268   - || jQuery('#stTipoRelatorio').val() == 'restos_pagar' ){
269   -
270   - selecionaTodosSelect(document.frm.inCodRecurso);
271   - }
272   -
  260 + selecionaTodosSelect(document.frm.inCodRecurso);
273 261 document.frm.submit();
274 262 }
275 263  
... ... @@ -300,14 +288,15 @@ $jsOnLoad = &quot;
300 288 ";
301 289  
302 290 $obFormulario = new Formulario;
303   -$obFormulario->setAjuda ('UC-02.01.22');
304   -$obFormulario->addForm ($obForm);
305   -$obFormulario->addHidden ($obHdnCaminho);
  291 +$obFormulario->setAjuda ('UC-02.01.22' );
  292 +$obFormulario->addForm ($obForm );
  293 +$obFormulario->addHidden ($obHdnCaminho );
306 294 $obFormulario->addTitulo ("Dados para Filtro");
307   -$obFormulario->addComponente($obCmbEntidades);
308   -$obFormulario->addComponente($obPeriodicidade);
  295 +$obFormulario->addComponente($obCmbEntidades );
  296 +$obFormulario->addComponente($obPeriodicidade );
309 297 $obFormulario->addComponente($obCmbTipoRelatorio);
310   -$obFormulario->addSpan($obSpan);
  298 +$obFormulario->addSpan ($obSpan );
  299 +$obFormulario->addComponente($obCmbRecursos );
311 300  
312 301 // BOTÕES DE AÇÃO DO FORMULÁRIO (OK/LIMPAR)
313 302 $obBtnOk = new Ok();
... ...
gestaoPrestacaoContas/fontes/PHP/TCMGO/classes/mapeamento/TTGODSI.class.php
  Diff comments   View file @00a7f1b
... ... @@ -47,8 +47,10 @@ class TTGODSI extends Persistente
47 47 , licitacao.num_unidade AS cod_unidade
48 48 , sw_processo.cod_processo AS num_processo
49 49 , sw_processo.ano_exercicio AS ano_exercicio_processo
50   - , CASE WHEN modalidade.cod_modalidade = 8 THEN 1
51   - WHEN modalidade.cod_modalidade = 9 THEN 2
  50 + , CASE WHEN modalidade.cod_modalidade = 8 AND licitacao.tipo_chamada_publica = 0 THEN 1
  51 + WHEN modalidade.cod_modalidade = 9 AND licitacao.tipo_chamada_publica = 0 THEN 2
  52 + WHEN (modalidade.cod_modalidade = 9 OR modalidade.cod_modalidade = 10) AND licitacao.tipo_chamada_publica = 2 THEN 3
  53 + WHEN (modalidade.cod_modalidade = 9 OR modalidade.cod_modalidade = 10) AND licitacao.tipo_chamada_publica = 1 THEN 4
52 54 END AS tipo_processo
53 55 , TO_CHAR(licitacao.timestamp,'dd/mm/yyyy') AS dt_abertura
54 56 , CASE WHEN tipo_objeto.cod_tipo_objeto = 1 THEN 2
... ... @@ -166,9 +168,11 @@ class TTGODSI extends Persistente
166 168 , licitacao.num_unidade AS cod_unidade
167 169 , sw_processo.cod_processo AS num_processo
168 170 , sw_processo.ano_exercicio AS ano_exercicio_processo
169   - , CASE WHEN modalidade.cod_modalidade = 8 THEN 1
170   - WHEN modalidade.cod_modalidade = 9 THEN 2
171   - END AS tipo_processo
  171 + , CASE WHEN modalidade.cod_modalidade = 8 AND licitacao.tipo_chamada_publica = 0 THEN 1
  172 + WHEN modalidade.cod_modalidade = 9 AND licitacao.tipo_chamada_publica = 0 THEN 2
  173 + WHEN (modalidade.cod_modalidade = 9 OR modalidade.cod_modalidade = 10) AND licitacao.tipo_chamada_publica = 2 THEN 3
  174 + WHEN (modalidade.cod_modalidade = 9 OR modalidade.cod_modalidade = 10) AND licitacao.tipo_chamada_publica = 1 THEN 4
  175 + END AS tipo_processo
172 176 , 1 AS tipo_resp
173 177 , responsavel_dispensa.cpf AS num_cpf_responsavel
174 178 , responsavel_dispensa.nom_cgm AS nome_responsavel
... ... @@ -268,9 +272,11 @@ class TTGODSI extends Persistente
268 272 , licitacao.num_unidade AS cod_unidade
269 273 , sw_processo.cod_processo AS num_processo
270 274 , sw_processo.ano_exercicio AS ano_exercicio_processo
271   - , CASE WHEN modalidade.cod_modalidade = 8 THEN 1
272   - WHEN modalidade.cod_modalidade = 9 THEN 2
273   - END AS tipo_processo
  275 + , CASE WHEN modalidade.cod_modalidade = 8 AND licitacao.tipo_chamada_publica = 0 THEN 1
  276 + WHEN modalidade.cod_modalidade = 9 AND licitacao.tipo_chamada_publica = 0 THEN 2
  277 + WHEN (modalidade.cod_modalidade = 9 OR modalidade.cod_modalidade = 10) AND licitacao.tipo_chamada_publica = 2 THEN 3
  278 + WHEN (modalidade.cod_modalidade = 9 OR modalidade.cod_modalidade = 10) AND licitacao.tipo_chamada_publica = 1 THEN 4
  279 + END AS tipo_processo
274 280 , 2 AS tipo_resp
275 281 , responsavel_dispensa.cpf AS num_cpf_responsavel
276 282 , responsavel_dispensa.nom_cgm AS nome_responsavel
... ... @@ -370,9 +376,11 @@ class TTGODSI extends Persistente
370 376 , licitacao.num_unidade AS cod_unidade
371 377 , sw_processo.cod_processo AS num_processo
372 378 , sw_processo.ano_exercicio AS ano_exercicio_processo
373   - , CASE WHEN modalidade.cod_modalidade = 8 THEN 1
374   - WHEN modalidade.cod_modalidade = 9 THEN 2
375   - END AS tipo_processo
  379 + , CASE WHEN modalidade.cod_modalidade = 8 AND licitacao.tipo_chamada_publica = 0 THEN 1
  380 + WHEN modalidade.cod_modalidade = 9 AND licitacao.tipo_chamada_publica = 0 THEN 2
  381 + WHEN (modalidade.cod_modalidade = 9 OR modalidade.cod_modalidade = 10) AND licitacao.tipo_chamada_publica = 2 THEN 3
  382 + WHEN (modalidade.cod_modalidade = 9 OR modalidade.cod_modalidade = 10) AND licitacao.tipo_chamada_publica = 1 THEN 4
  383 + END AS tipo_processo
376 384 , 3 AS tipo_resp
377 385 , responsavel_dispensa.cpf AS num_cpf_responsavel
378 386 , responsavel_dispensa.nom_cgm AS nome_responsavel
... ... @@ -472,9 +480,11 @@ class TTGODSI extends Persistente
472 480 , licitacao.num_unidade AS cod_unidade
473 481 , sw_processo.cod_processo AS num_processo
474 482 , sw_processo.ano_exercicio AS ano_exercicio_processo
475   - , CASE WHEN modalidade.cod_modalidade = 8 THEN 1
476   - WHEN modalidade.cod_modalidade = 9 THEN 2
477   - END AS tipo_processo
  483 + , CASE WHEN modalidade.cod_modalidade = 8 AND licitacao.tipo_chamada_publica = 0 THEN 1
  484 + WHEN modalidade.cod_modalidade = 9 AND licitacao.tipo_chamada_publica = 0 THEN 2
  485 + WHEN (modalidade.cod_modalidade = 9 OR modalidade.cod_modalidade = 10) AND licitacao.tipo_chamada_publica = 2 THEN 3
  486 + WHEN (modalidade.cod_modalidade = 9 OR modalidade.cod_modalidade = 10) AND licitacao.tipo_chamada_publica = 1 THEN 4
  487 + END AS tipo_processo
478 488 , 4 AS tipo_resp
479 489 , responsavel_dispensa.cpf AS num_cpf_responsavel
480 490 , responsavel_dispensa.nom_cgm AS nome_responsavel
... ... @@ -574,9 +584,11 @@ class TTGODSI extends Persistente
574 584 , licitacao.num_unidade AS cod_unidade
575 585 , sw_processo.cod_processo AS num_processo
576 586 , sw_processo.ano_exercicio AS ano_exercicio_processo
577   - , CASE WHEN modalidade.cod_modalidade = 8 THEN 1
578   - WHEN modalidade.cod_modalidade = 9 THEN 2
579   - END AS tipo_processo
  587 + , CASE WHEN modalidade.cod_modalidade = 8 AND licitacao.tipo_chamada_publica = 0 THEN 1
  588 + WHEN modalidade.cod_modalidade = 9 AND licitacao.tipo_chamada_publica = 0 THEN 2
  589 + WHEN (modalidade.cod_modalidade = 9 OR modalidade.cod_modalidade = 10) AND licitacao.tipo_chamada_publica = 2 THEN 3
  590 + WHEN (modalidade.cod_modalidade = 9 OR modalidade.cod_modalidade = 10) AND licitacao.tipo_chamada_publica = 1 THEN 4
  591 + END AS tipo_processo
580 592 , 5 AS tipo_resp
581 593 , responsavel_dispensa.cpf AS num_cpf_responsavel
582 594 , responsavel_dispensa.nom_cgm AS nome_responsavel
... ... @@ -676,9 +688,11 @@ class TTGODSI extends Persistente
676 688 , licitacao.num_unidade AS cod_unidade
677 689 , sw_processo.cod_processo AS num_processo
678 690 , sw_processo.ano_exercicio AS ano_exercicio_processo
679   - , CASE WHEN modalidade.cod_modalidade = 8 THEN 1
680   - WHEN modalidade.cod_modalidade = 9 THEN 2
681   - END AS tipo_processo
  691 + , CASE WHEN modalidade.cod_modalidade = 8 AND licitacao.tipo_chamada_publica = 0 THEN 1
  692 + WHEN modalidade.cod_modalidade = 9 AND licitacao.tipo_chamada_publica = 0 THEN 2
  693 + WHEN (modalidade.cod_modalidade = 9 OR modalidade.cod_modalidade = 10) AND licitacao.tipo_chamada_publica = 2 THEN 3
  694 + WHEN (modalidade.cod_modalidade = 9 OR modalidade.cod_modalidade = 10) AND licitacao.tipo_chamada_publica = 1 THEN 4
  695 + END AS tipo_processo
682 696 , 6 AS tipo_resp
683 697 , responsavel_dispensa.cpf AS num_cpf_responsavel
684 698 , responsavel_dispensa.nom_cgm AS nome_responsavel
... ... @@ -778,9 +792,11 @@ class TTGODSI extends Persistente
778 792 , licitacao.num_unidade AS cod_unidade
779 793 , sw_processo.cod_processo AS num_processo
780 794 , sw_processo.ano_exercicio AS ano_exercicio_processo
781   - , CASE WHEN modalidade.cod_modalidade = 8 THEN 1
782   - WHEN modalidade.cod_modalidade = 9 THEN 2
783   - END AS tipo_processo
  795 + , CASE WHEN modalidade.cod_modalidade = 8 AND licitacao.tipo_chamada_publica = 0 THEN 1
  796 + WHEN modalidade.cod_modalidade = 9 AND licitacao.tipo_chamada_publica = 0 THEN 2
  797 + WHEN (modalidade.cod_modalidade = 9 OR modalidade.cod_modalidade = 10) AND licitacao.tipo_chamada_publica = 2 THEN 3
  798 + WHEN (modalidade.cod_modalidade = 9 OR modalidade.cod_modalidade = 10) AND licitacao.tipo_chamada_publica = 1 THEN 4
  799 + END AS tipo_processo
784 800 , 7 AS tipo_resp
785 801 , responsavel_dispensa.cpf AS num_cpf_responsavel
786 802 , responsavel_dispensa.nom_cgm AS nome_responsavel
... ... @@ -891,8 +907,10 @@ class TTGODSI extends Persistente
891 907 , licitacao.num_unidade AS cod_unidade
892 908 , sw_processo.cod_processo AS num_processo
893 909 , sw_processo.ano_exercicio AS ano_exercicio_processo
894   - , CASE WHEN modalidade.cod_modalidade = 8 THEN 1
895   - WHEN modalidade.cod_modalidade = 9 THEN 2
  910 + , CASE WHEN modalidade.cod_modalidade = 8 AND licitacao.tipo_chamada_publica = 0 THEN 1
  911 + WHEN modalidade.cod_modalidade = 9 AND licitacao.tipo_chamada_publica = 0 THEN 2
  912 + WHEN (modalidade.cod_modalidade = 9 OR modalidade.cod_modalidade = 10) AND licitacao.tipo_chamada_publica = 2 THEN 3
  913 + WHEN (modalidade.cod_modalidade = 9 OR modalidade.cod_modalidade = 10) AND licitacao.tipo_chamada_publica = 1 THEN 4
896 914 END AS tipo_processo
897 915 , mapa_item.lote AS num_lote
898 916 , mapa_item.cod_item AS num_item
... ... @@ -991,9 +1009,11 @@ class TTGODSI extends Persistente
991 1009 , licitacao.num_unidade AS cod_unidade
992 1010 , sw_processo.cod_processo AS num_processo
993 1011 , sw_processo.ano_exercicio AS ano_exercicio_processo
994   - , CASE WHEN modalidade.cod_modalidade = 8 THEN 1
995   - WHEN modalidade.cod_modalidade = 9 THEN 2
996   - END AS tipo_processo
  1012 + , CASE WHEN modalidade.cod_modalidade = 8 AND licitacao.tipo_chamada_publica = 0 THEN 1
  1013 + WHEN modalidade.cod_modalidade = 9 AND licitacao.tipo_chamada_publica = 0 THEN 2
  1014 + WHEN (modalidade.cod_modalidade = 9 OR modalidade.cod_modalidade = 10) AND licitacao.tipo_chamada_publica = 2 THEN 3
  1015 + WHEN (modalidade.cod_modalidade = 9 OR modalidade.cod_modalidade = 10) AND licitacao.tipo_chamada_publica = 1 THEN 4
  1016 + END AS tipo_processo
997 1017 , despesa.cod_funcao AS cod_funcao
998 1018 , despesa.cod_subfuncao AS cod_subfuncao
999 1019 , despesa.cod_programa AS cod_programa
... ... @@ -1125,9 +1145,11 @@ class TTGODSI extends Persistente
1125 1145 , licitacao.num_unidade AS cod_unidade
1126 1146 , sw_processo.cod_processo AS num_processo
1127 1147 , sw_processo.ano_exercicio AS ano_exercicio_processo
1128   - , CASE WHEN modalidade.cod_modalidade = 8 THEN 1
1129   - WHEN modalidade.cod_modalidade = 9 THEN 2
1130   - END AS tipo_processo
  1148 + , CASE WHEN modalidade.cod_modalidade = 8 AND licitacao.tipo_chamada_publica = 0 THEN 1
  1149 + WHEN modalidade.cod_modalidade = 9 AND licitacao.tipo_chamada_publica = 0 THEN 2
  1150 + WHEN (modalidade.cod_modalidade = 9 OR modalidade.cod_modalidade = 10) AND licitacao.tipo_chamada_publica = 2 THEN 3
  1151 + WHEN (modalidade.cod_modalidade = 9 OR modalidade.cod_modalidade = 10) AND licitacao.tipo_chamada_publica = 1 THEN 4
  1152 + END AS tipo_processo
1131 1153 , documento_pessoa.tipo_documento AS tipo_documento
1132 1154 , documento_pessoa.num_documento AS num_documento
1133 1155 , mapa_item.lote AS num_lote
... ... @@ -1282,9 +1304,11 @@ class TTGODSI extends Persistente
1282 1304 , licitacao.num_unidade AS cod_unidade
1283 1305 , sw_processo.cod_processo AS num_processo
1284 1306 , sw_processo.ano_exercicio AS ano_exercicio_processo
1285   - , CASE WHEN modalidade.cod_modalidade = 8 THEN 1
1286   - WHEN modalidade.cod_modalidade = 9 THEN 2
1287   - END AS tipo_processo
  1307 + , CASE WHEN modalidade.cod_modalidade = 8 AND licitacao.tipo_chamada_publica = 0 THEN 1
  1308 + WHEN modalidade.cod_modalidade = 9 AND licitacao.tipo_chamada_publica = 0 THEN 2
  1309 + WHEN (modalidade.cod_modalidade = 9 OR modalidade.cod_modalidade = 10) AND licitacao.tipo_chamada_publica = 2 THEN 3
  1310 + WHEN (modalidade.cod_modalidade = 9 OR modalidade.cod_modalidade = 10) AND licitacao.tipo_chamada_publica = 1 THEN 4
  1311 + END AS tipo_processo
1288 1312 , documento_pessoa.tipo_documento AS tipo_documento
1289 1313 , documento_pessoa.num_documento AS num_documento
1290 1314 , TO_CHAR (participante_certificacao.dt_registro, 'dd/mm/yyyy') AS dt_credenciamento
... ...
gestaoPrestacaoContas/fontes/PLPGSQL/TCEMG/receitaPrev.plsql
  Diff comments   View file @00a7f1b
... ... @@ -53,26 +53,25 @@ BEGIN
53 53  
54 54 stSql :='CREATE TEMPORARY TABLE tmp_balancete_receita AS
55 55 (
56   - SELECT
57   - cod_estrutural
58   - ,ABS(valor_previsto) as valor_previsto
59   - ,ABS(arrecadado_periodo) as arrecadado_periodo
  56 + SELECT cod_estrutural
  57 + , ABS(valor_previsto) as valor_previsto
  58 + , ABS(arrecadado_periodo) as arrecadado_periodo
60 59 FROM orcamento.fn_balancete_receita('''||stExercicio||''','''','''||dtInicial||''','''||dtFinal||''','''||stCodEntidades||'''
61 60 ,'''','''','''','''','''','''','''')
62   - as retorno(
63   - cod_estrutural varchar,
64   - receita integer,
65   - recurso varchar,
66   - descricao varchar,
67   - valor_previsto numeric,
68   - arrecadado_periodo numeric,
69   - arrecadado_ano numeric,
70   - diferenca numeric
  61 + AS retorno(
  62 + cod_estrutural VARCHAR,
  63 + receita INTEGER,
  64 + recurso VARCHAR,
  65 + descricao VARCHAR,
  66 + valor_previsto NUMERIC,
  67 + arrecadado_periodo NUMERIC,
  68 + arrecadado_ano NUMERIC,
  69 + diferenca NUMERIC
71 70 )
72 71 ORDER BY cod_estrutural
73 72 )
74 73 ';
75   - EXECUTE stSql;
  74 + EXECUTE stSql;
76 75  
77 76 stSql :='
78 77 SELECT
... ... @@ -80,43 +79,43 @@ BEGIN
80 79 FROM (
81 80 SELECT
82 81 ''01''::VARCHAR AS cod_tipo
83   - ,( SELECT COALESCE(SUM(valor_previsto),0)::VARCHAR as valor FROM tmp_balancete_receita WHERE cod_estrutural LIKE ''1.2.1.0.29.01.00.00.00%'' ) AS contrib_pat
84   - ,( SELECT COALESCE(SUM(valor_previsto),0)::VARCHAR as valor FROM tmp_balancete_receita WHERE cod_estrutural LIKE ''1.2.1.0.29.07%'' ) AS contrib_serv_ativo
85   - ,( SELECT COALESCE(SUM(valor_previsto),0)::VARCHAR as valor FROM tmp_balancete_receita WHERE cod_estrutural LIKE ''1.2.1.0.29.09%'' ) AS contrib_serv_inat_pens
86   - ,( SELECT COALESCE(SUM(valor_previsto),0)::VARCHAR as valor FROM tmp_balancete_receita WHERE cod_estrutural LIKE ''1.3%'' ) AS rec_patrimoniais
87   - ,( SELECT COALESCE(SUM(valor_previsto),0)::VARCHAR as valor FROM tmp_balancete_receita WHERE cod_estrutural LIKE ''2.2%'' ) AS alienacao_bens
88   - ,( SELECT COALESCE(SUM(valor_previsto),0)::VARCHAR as valor FROM tmp_balancete_receita WHERE cod_estrutural LIKE ''2.5%'' ) AS outras_rec_cap
89   - ,( SELECT COALESCE(SUM(valor_previsto),0)::VARCHAR as valor FROM tmp_balancete_receita WHERE cod_estrutural LIKE ''1.2.1.0.99.00.10.00.00%'' ) AS comp_prev
90   - ,( SELECT COALESCE(SUM(valor_previsto),0)::VARCHAR as valor FROM tmp_balancete_receita WHERE cod_estrutural LIKE ''1.9.9.0.99%'' ) AS outras_rec
91   - ,( SELECT COALESCE(SUM(valor_previsto),0)::VARCHAR as valor FROM tmp_balancete_receita WHERE cod_estrutural LIKE ''9.%'' ) AS deducoes_receita
  82 + ,( SELECT COALESCE(SUM(valor_previsto),0)::VARCHAR AS valor FROM tmp_balancete_receita WHERE cod_estrutural LIKE ''1.2.1.0.29.01.00.00.00'' ) AS contrib_pat
  83 + ,( SELECT COALESCE(SUM(valor_previsto),0)::VARCHAR AS valor FROM tmp_balancete_receita WHERE cod_estrutural LIKE ''1.2.1.0.29.07%'' ) AS contrib_serv_ativo
  84 + ,( SELECT COALESCE(SUM(valor_previsto),0)::VARCHAR AS valor FROM tmp_balancete_receita WHERE cod_estrutural LIKE ''1.2.1.0.29.09%'' ) AS contrib_serv_inat_pens
  85 + ,( SELECT COALESCE(SUM(valor_previsto),0)::VARCHAR AS valor FROM tmp_balancete_receita WHERE cod_estrutural LIKE ''1.3.0.0.00.00.00.00.00'' ) AS rec_patrimoniais
  86 + ,( SELECT COALESCE(SUM(valor_previsto),0)::VARCHAR AS valor FROM tmp_balancete_receita WHERE cod_estrutural LIKE ''2.2%'' ) AS alienacao_bens
  87 + ,( SELECT COALESCE(SUM(valor_previsto),0)::VARCHAR AS valor FROM tmp_balancete_receita WHERE cod_estrutural LIKE ''2.5%'' ) AS outras_rec_cap
  88 + ,( SELECT COALESCE(SUM(valor_previsto),0)::VARCHAR AS valor FROM tmp_balancete_receita WHERE cod_estrutural LIKE ''1.2.1.0.99.00.10.00.00'' ) AS comp_prev
  89 + ,( SELECT COALESCE(SUM(valor_previsto),0)::VARCHAR AS valor FROM tmp_balancete_receita WHERE cod_estrutural LIKE ''1.9.9.0.99%'' ) AS outras_rec
  90 + ,( SELECT COALESCE(SUM(valor_previsto),0)::VARCHAR AS valor FROM tmp_balancete_receita WHERE cod_estrutural LIKE ''9.0.0.0.0.00.00.00.00.00'') AS deducoes_receita
92 91  
93 92 UNION
94 93  
95 94 SELECT
96 95 ''02''::VARCHAR AS cod_tipo
97   - ,( SELECT COALESCE(SUM(valor_previsto),0)::VARCHAR as valor FROM tmp_balancete_receita WHERE cod_estrutural LIKE ''1.2.1.0.29.01.00.00.00%'' ) AS contrib_pat
98   - ,( SELECT COALESCE(SUM(valor_previsto),0)::VARCHAR as valor FROM tmp_balancete_receita WHERE cod_estrutural LIKE ''1.2.1.0.29.07%'' ) AS contrib_serv_ativo
99   - ,( SELECT COALESCE(SUM(valor_previsto),0)::VARCHAR as valor FROM tmp_balancete_receita WHERE cod_estrutural LIKE ''1.2.1.0.29.09%'' ) AS contrib_serv_inat_pens
100   - ,( SELECT COALESCE(SUM(valor_previsto),0)::VARCHAR as valor FROM tmp_balancete_receita WHERE cod_estrutural LIKE ''1.3%'' ) AS rec_patrimoniais
101   - ,( SELECT COALESCE(SUM(valor_previsto),0)::VARCHAR as valor FROM tmp_balancete_receita WHERE cod_estrutural LIKE ''2.2%'' ) AS alienacao_bens
102   - ,( SELECT COALESCE(SUM(valor_previsto),0)::VARCHAR as valor FROM tmp_balancete_receita WHERE cod_estrutural LIKE ''2.5%'' ) AS outras_rec_cap
103   - ,( SELECT COALESCE(SUM(valor_previsto),0)::VARCHAR as valor FROM tmp_balancete_receita WHERE cod_estrutural LIKE ''1.2.1.0.99.00.10.00.00%'' ) AS comp_prev
104   - ,( SELECT COALESCE(SUM(valor_previsto),0)::VARCHAR as valor FROM tmp_balancete_receita WHERE cod_estrutural LIKE ''1.9.9.0.99%'' ) AS outras_rec
105   - ,( SELECT COALESCE(SUM(valor_previsto),0)::VARCHAR as valor FROM tmp_balancete_receita WHERE cod_estrutural LIKE ''9.%'' ) AS deducoes_receita
  96 + ,( SELECT COALESCE(SUM(valor_previsto),0)::VARCHAR AS valor FROM tmp_balancete_receita WHERE cod_estrutural LIKE ''1.2.1.0.29.01.00.00.00'' ) AS contrib_pat
  97 + ,( SELECT COALESCE(SUM(valor_previsto),0)::VARCHAR AS valor FROM tmp_balancete_receita WHERE cod_estrutural LIKE ''1.2.1.0.29.07%'' ) AS contrib_serv_ativo
  98 + ,( SELECT COALESCE(SUM(valor_previsto),0)::VARCHAR AS valor FROM tmp_balancete_receita WHERE cod_estrutural LIKE ''1.2.1.0.29.09%'' ) AS contrib_serv_inat_pens
  99 + ,( SELECT COALESCE(SUM(valor_previsto),0)::VARCHAR AS valor FROM tmp_balancete_receita WHERE cod_estrutural LIKE ''1.3.0.0.00.00.00.00.00'' ) AS rec_patrimoniais
  100 + ,( SELECT COALESCE(SUM(valor_previsto),0)::VARCHAR AS valor FROM tmp_balancete_receita WHERE cod_estrutural LIKE ''2.2%'' ) AS alienacao_bens
  101 + ,( SELECT COALESCE(SUM(valor_previsto),0)::VARCHAR AS valor FROM tmp_balancete_receita WHERE cod_estrutural LIKE ''2.5%'' ) AS outras_rec_cap
  102 + ,( SELECT COALESCE(SUM(valor_previsto),0)::VARCHAR AS valor FROM tmp_balancete_receita WHERE cod_estrutural LIKE ''1.2.1.0.99.00.10.00.00'' ) AS comp_prev
  103 + ,( SELECT COALESCE(SUM(valor_previsto),0)::VARCHAR AS valor FROM tmp_balancete_receita WHERE cod_estrutural LIKE ''1.9.9.0.99%'' ) AS outras_rec
  104 + ,( SELECT COALESCE(SUM(valor_previsto),0)::VARCHAR AS valor FROM tmp_balancete_receita WHERE cod_estrutural LIKE ''9.0.0.0.0.00.00.00.00.00'') AS deducoes_receita
106 105  
107 106 UNION
108 107  
109 108 SELECT
110 109 ''04''::VARCHAR AS cod_tipo
111   - ,( SELECT COALESCE(SUM(arrecadado_periodo),0)::VARCHAR as valor FROM tmp_balancete_receita WHERE cod_estrutural LIKE ''1.2.1.0.29.01.00.00.00%'' ) AS contrib_pat
112   - ,( SELECT COALESCE(SUM(arrecadado_periodo),0)::VARCHAR as valor FROM tmp_balancete_receita WHERE cod_estrutural LIKE ''1.2.1.0.29.07%'' ) AS contrib_serv_ativo
113   - ,( SELECT COALESCE(SUM(arrecadado_periodo),0)::VARCHAR as valor FROM tmp_balancete_receita WHERE cod_estrutural LIKE ''1.2.1.0.29.09%'' ) AS contrib_serv_inat_pens
114   - ,( SELECT COALESCE(SUM(arrecadado_periodo),0)::VARCHAR as valor FROM tmp_balancete_receita WHERE cod_estrutural LIKE ''1.3%'' ) AS rec_patrimoniais
115   - ,( SELECT COALESCE(SUM(arrecadado_periodo),0)::VARCHAR as valor FROM tmp_balancete_receita WHERE cod_estrutural LIKE ''2.2%'' ) AS alienacao_bens
116   - ,( SELECT COALESCE(SUM(arrecadado_periodo),0)::VARCHAR as valor FROM tmp_balancete_receita WHERE cod_estrutural LIKE ''2.5%'' ) AS outras_rec_cap
117   - ,( SELECT COALESCE(SUM(arrecadado_periodo),0)::VARCHAR as valor FROM tmp_balancete_receita WHERE cod_estrutural LIKE ''1.2.1.0.99.00.10.00.00%'' ) AS comp_prev
118   - ,( SELECT COALESCE(SUM(arrecadado_periodo),0)::VARCHAR as valor FROM tmp_balancete_receita WHERE cod_estrutural LIKE ''1.9.9.0.99%'' ) AS outras_rec
119   - ,( SELECT COALESCE(SUM(arrecadado_periodo),0)::VARCHAR as valor FROM tmp_balancete_receita WHERE cod_estrutural LIKE ''9.%'' ) AS deducoes_receita
  110 + ,( SELECT COALESCE(SUM(arrecadado_periodo),0)::VARCHAR AS valor FROM tmp_balancete_receita WHERE cod_estrutural LIKE ''1.2.1.0.29.01.00.00.00'' ) AS contrib_pat
  111 + ,( SELECT COALESCE(SUM(arrecadado_periodo),0)::VARCHAR AS valor FROM tmp_balancete_receita WHERE cod_estrutural LIKE ''1.2.1.0.29.07%'' ) AS contrib_serv_ativo
  112 + ,( SELECT COALESCE(SUM(arrecadado_periodo),0)::VARCHAR AS valor FROM tmp_balancete_receita WHERE cod_estrutural LIKE ''1.2.1.0.29.09%'' ) AS contrib_serv_inat_pens
  113 + ,( SELECT COALESCE(SUM(arrecadado_periodo),0)::VARCHAR AS valor FROM tmp_balancete_receita WHERE cod_estrutural LIKE ''1.3.0.0.00.00.00.00.00'' ) AS rec_patrimoniais
  114 + ,( SELECT COALESCE(SUM(arrecadado_periodo),0)::VARCHAR AS valor FROM tmp_balancete_receita WHERE cod_estrutural LIKE ''2.2%'' ) AS alienacao_bens
  115 + ,( SELECT COALESCE(SUM(arrecadado_periodo),0)::VARCHAR AS valor FROM tmp_balancete_receita WHERE cod_estrutural LIKE ''2.5%'' ) AS outras_rec_cap
  116 + ,( SELECT COALESCE(SUM(arrecadado_periodo),0)::VARCHAR AS valor FROM tmp_balancete_receita WHERE cod_estrutural LIKE ''1.2.1.0.99.00.10.00.00'' ) AS comp_prev
  117 + ,( SELECT COALESCE(SUM(arrecadado_periodo),0)::VARCHAR AS valor FROM tmp_balancete_receita WHERE cod_estrutural LIKE ''1.9.9.0.99%'' ) AS outras_rec
  118 + ,( SELECT COALESCE(SUM(arrecadado_periodo),0)::VARCHAR AS valor FROM tmp_balancete_receita WHERE cod_estrutural LIKE ''9.0.0.0.0.00.00.00.00.00'') AS deducoes_receita
120 119  
121 120 ) AS retorno
122 121 ';
... ... @@ -130,4 +129,4 @@ BEGIN
130 129  
131 130 RETURN;
132 131 END;
133 132 -$$ language 'plpgsql';
  133 +$$ language 'plpgsql';
134 134 \ No newline at end of file
... ...
gestaoPrestacaoContas/fontes/RPT/TCEMG/MPDF/LHTCEMGRelatorioRazaoDespesa.php
  Diff comments   View file @00a7f1b
... ... @@ -66,19 +66,28 @@
66 66 </p>
67 67  
68 68 <?php
69   - $totalGeralEmpenhado += $totalEmpenhado;
70   - $totalGeralLiquidado += $totalLiquidado;
71   - $totalGeralPago += $totalPago;
  69 + $totalGeralEmpenhado = $registro['vl_total_empenhado'];
  70 + $totalGeralLiquidado = $registro['vl_total_liquidado'];
  71 + $totalGeralPago = $registro['vl_total_pago'];
  72 + $totalGeralEmpenhadoAnulado = $registro['vl_total_empenhado_anulado'];
  73 + $totalGeralLiquidadoAnulado = $registro['vl_total_liquidado_anulado'];
  74 + $totalGeralPagoAnulado = $registro['vl_total_pago_anulado'];
72 75  
73 76 $totalEmpenhado = 0;
74 77 $totalLiquidado = 0;
75 78 $totalPago = 0;
  79 + /* $totalGeralEmpenhadoAnulado = 0;
  80 + $totalGeralLiquidadoAnulado = 0;
  81 + $totalGeralPagoAnulado = 0;*/
76 82 endforeach;
77 83 ?>
78 84  
79 85 <p>
80 86 <h5>Total Geral</h5>
81   - Empenhado: <?= number_format($totalGeralEmpenhado, '2', ',', '.') ?> <br />
82   - Liquidado: <?= number_format($totalGeralLiquidado, '2', ',', '.') ?> <br />
83   - Pago: <?= number_format($totalGeralPago, '2', ',', '.') ?>
  87 + Empenhado: <?= number_format($totalGeralEmpenhado, '2', ',', '.') ?> <br />
  88 + Empenhado Anulado: <?= number_format($totalGeralEmpenhadoAnulado, '2', ',', '.') ?> <br />
  89 + Liquidado: <?= number_format($totalGeralLiquidado, '2', ',', '.') ?> <br />
  90 + Liquidado Anulado: <?= number_format($totalGeralLiquidadoAnulado, '2', ',', '.') ?> <br />
  91 + Pago: <?= number_format($totalGeralPago, '2', ',', '.') ?> <br />
  92 + Pago Anulado: <?= number_format($totalGeralPagoAnulado, '2', ',', '.') ?>
84 93 </p>
85 94 \ No newline at end of file
... ...
gestaoRH/fontes/PHP/IMA/instancias/configuracao/FMManterConfiguracaoSEFIP.php
  Diff comments   View file @00a7f1b
... ... @@ -56,7 +56,13 @@ $obRFolhaPagamentoFolhaSituacao = new RFolhaPagamentoFolhaSituacao(new RFolhaPag
56 56 $jsOnload = "executaFuncaoAjax('preencherForm');";
57 57  
58 58 //Define a função do arquivo, ex: incluir, excluir, alterar, consultar, etc
59   -$stAcao = $_GET['stAcao'] ? $_GET['stAcao'] : $_POST['stAcao'];
  59 +//$stAcao = $_REQUEST['stAcao'] ? $_REQUEST['stAcao'] : Sessao::read('acao');
  60 +
  61 +if (Sessao::read('NOVAacao') != "") {
  62 + $stAcao = Sessao::read('NOVAacao');
  63 +} else {
  64 + $stAcao = $_REQUEST['stAcao'];
  65 +}
60 66  
61 67 $obTAdministracaoConfiguracao = new TAdministracaoConfiguracao();
62 68 $obTAdministracaoConfiguracao->setDado("cod_modulo",40);
... ... @@ -301,9 +307,9 @@ $stComplementoValida .= &quot; erro = true;\n&quot;;
301 307 $stComplementoValida .= " mensagem += '@Campo E-mail do Contato inválido!()';\n";
302 308 $stComplementoValida .= " }\n";
303 309 $stComplementoValida .= "}\n";
304   -$stComplementoValida .= "if (erro == false) {\n";
305   -$stComplementoValida .= " BloqueiaFrames(true,false);\n";
306   -$stComplementoValida .= " parent.frames[2].document.body.scrollTop=0; }\n";
  310 +//$stComplementoValida .= "if (erro == false) {\n";
  311 +//$stComplementoValida .= " BloqueiaFrames(true,false);\n";
  312 +//$stComplementoValida .= " parent.frames[2].document.body.scrollTop=0; }\n";
307 313  
308 314 $obFormulario->obJavaScript->setComplementoValida($stComplementoValida);
309 315  
... ...
gestaoRH/fontes/PHP/IMA/instancias/configuracao/OCManterConfiguracaoSEFIP.php
  Diff comments   View file @00a7f1b
... ... @@ -138,48 +138,53 @@ function preencherForm()
138 138  
139 139 function submeter()
140 140 {
  141 + //SistemaLegado::BloqueiaFrames(true,false);
  142 +
141 143 $obErro = new Erro();
142   - switch ($_GET["inTipoInscricao"]) {
  144 +
  145 + switch ($_REQUEST["inTipoInscricao"]) {
143 146 case 1:
144   - if ($_GET["inCGM"] == "") {
145   - $obErro->setDescricao("Campo CGM inválido!()");;
  147 + if ($_REQUEST["inCGM"] == "") {
  148 + $obErro->setDescricao("Campo CGM inválido!");
146 149 } else {
147 150 include_once(CAM_GA_CGM_MAPEAMENTO."TCGMPessoaJuridica.class.php");
148 151 $obTCGMPessoaJuridica = new TCGMPessoaJuridica();
149   -
150 152 $obTCGMPessoaJuridica->setDado("numcgm",$_GET["inCGM"]);
151 153 $obTCGMPessoaJuridica->recuperaPorChave($rsCgm);
  154 +
152 155 if ( $rsCgm->getCampo("cnpj") == "" ) {
153 156 $obErro->setDescricao("O CGM ".$_GET["inCGM"]." não possui um cnpj cadastrado!");
154 157 }
155 158 }
156   - break;
  159 + break;
  160 +
157 161 case 2:
158   - if ($_GET["inCGM"] == "") {
159   - $obErro->setDescricao("Campo CEI inválido!()");
  162 + if ($_REQUEST["inCGM"] == "") {
  163 + $obErro->setDescricao("Campo CEI inválido!");
160 164 }
161   - break;
  165 + break;
  166 +
162 167 case 3:
163   - if ($_GET["inCGM"] == "") {
164   - $obErro->setDescricao("Campo CGM inválido!()");;
  168 + if ($_REQUEST["inCGM"] == "") {
  169 + $obErro->setDescricao("Campo CGM inválido!");
165 170 } else {
166 171 include_once(CAM_GA_CGM_MAPEAMENTO."TCGMPessoaFisica.class.php");
167 172 $obTCGMPessoaFisica = new TCGMPessoaFisica();
168   -
169 173 $obTCGMPessoaFisica->setDado("numcgm",$_GET["inCGM"]);
170 174 $obTCGMPessoaFisica->recuperaPorChave($rsCgm);
  175 +
171 176 if ( $rsCgm->getCampo("cpf") == "" ) {
172 177 $obErro->setDescricao("O CGM ".$_GET["inCGM"]." não possui um cpf cadastrado!");
173 178 }
174 179 }
175   - break;
  180 + break;
176 181 }
  182 +
177 183 if ( !$obErro->ocorreu() ) {
178   - $stJs .= "parent.frames[2].Salvar();\n";
  184 + $stJs .= "BloqueiaFrames(true,false);\nparent.frames[2].Salvar();\n";
179 185 } else {
180 186 $stJs .= "alertaAviso('".$obErro->getDescricao()."','form','erro','".Sessao::getId()."');\n";
181 187 }
182   -
183 188 return $stJs;
184 189 }
185 190  
... ...
gestaoRH/fontes/PHP/IMA/instancias/configuracao/PRManterConfiguracaoSEFIP.php
  Diff comments   View file @00a7f1b
... ... @@ -51,76 +51,101 @@ $pgJS = &quot;JS&quot;.$stPrograma.&quot;.js&quot;;
51 51  
52 52 $stAcao = $_POST["stAcao"] ? $_POST["stAcao"] : $_GET["stAcao"];
53 53  
  54 +Sessao::setTrataExcecao(true);
  55 +Sessao::getTransacao()->setMapeamento($obTAdministracaoConfiguracao);
  56 +
  57 +$obErro = new Erro();
  58 +
54 59 switch ($stAcao) {
  60 +
55 61 case "configurar":
56   - Sessao::setTrataExcecao(true);
57 62 $inCodModulo = 40;
58   - $obTAdministracaoConfiguracao = new TAdministracaoConfiguracao();
59   - $obTIMACategoriaSefip = new TIMACategoriaSefip();
60   - $obTAdministracaoConfiguracao->setDado( "cod_modulo", $inCodModulo );
61   - $obTAdministracaoConfiguracao->setDado( "exercicio" , Sessao::getExercicio() );
62   - $obTAdministracaoConfiguracao->setDado( "parametro" , "cnae_fiscal".Sessao::getEntidade() );
63   - $obTAdministracaoConfiguracao->setDado( "valor" , $_POST["HdninCodCnae"] );
64   - $obTAdministracaoConfiguracao->alteracao();
65   -
66   - $obTAdministracaoConfiguracao->setDado( "parametro" , "centralizacao".Sessao::getEntidade() );
67   - $obTAdministracaoConfiguracao->setDado( "valor" , $_POST["inCodCentralizacao"] );
68   - $obTAdministracaoConfiguracao->alteracao();
69   -
70   - $obTAdministracaoConfiguracao->setDado( "parametro" , "codigo_outras_entidades_sefip".Sessao::getEntidade() );
71   - $obTAdministracaoConfiguracao->setDado( "valor" , $_POST["inCodigoOutrasEntidades"] );
72   - $obTAdministracaoConfiguracao->alteracao();
73   -
74   - $obTAdministracaoConfiguracao->setDado( "parametro" , "fpas".Sessao::getEntidade() );
75   - $obTAdministracaoConfiguracao->setDado( "valor" , $_POST["inCodFPAS"] );
76   - $obTAdministracaoConfiguracao->alteracao();
77   -
78   - $obTAdministracaoConfiguracao->setDado( "parametro" , "gps".Sessao::getEntidade() );
79   - $obTAdministracaoConfiguracao->setDado( "valor" , $_POST["inCodPagamentoGPS"] );
80   - $obTAdministracaoConfiguracao->alteracao();
81   -
82   - $obTAdministracaoConfiguracao->setDado( "parametro" , "tipo_inscricao".Sessao::getEntidade() );
83   - $obTAdministracaoConfiguracao->setDado( "valor" , $_POST["inTipoInscricao"] );
84   - $obTAdministracaoConfiguracao->alteracao();
85   -
86   - $obTAdministracaoConfiguracao->setDado( "parametro" , "inscricao_fornecedor".Sessao::getEntidade() );
87   - $obTAdministracaoConfiguracao->setDado( "valor" , $_POST["inCGM"] );
88   - $obTAdministracaoConfiguracao->alteracao();
89   -
90   - $obTAdministracaoConfiguracao->setDado( "parametro" , "nome_pessoa_contato_sefip".Sessao::getEntidade() );
91   - $obTAdministracaoConfiguracao->setDado( "valor" , $_POST["stPessoaContato"] );
92   - $obTAdministracaoConfiguracao->alteracao();
93   -
94   - $obTAdministracaoConfiguracao->setDado( "parametro" , "telefone_pessoa_contato_sefip".Sessao::getEntidade() );
95   - $obTAdministracaoConfiguracao->setDado( "valor" , $_POST["stTelefoneContato"] );
96   - $obTAdministracaoConfiguracao->alteracao();
97   -
98   - $obTAdministracaoConfiguracao->setDado( "parametro" , "DDD_pessoa_contato_sefip".Sessao::getEntidade() );
99   - $obTAdministracaoConfiguracao->setDado( "valor" , $_POST["stDDDContato"] );
100   - $obTAdministracaoConfiguracao->alteracao();
101   -
102   - $obTAdministracaoConfiguracao->setDado( "parametro" , "mail_pessoa_contato_sefip".Sessao::getEntidade() );
103   - $obTAdministracaoConfiguracao->setDado( "valor" , $_POST["stEmailContato"] );
104   - $obTAdministracaoConfiguracao->alteracao();
105   -
106   - $obTIMACategoriaSefip->excluirTodos();
107   -
108   - if(count(Sessao::read("arModalidades")) == 0) {
109   - Sessao::encerraExcecao();
110   - SistemaLegado::alertaAviso($pgForm,"É necessário inserir ao menos 1 (uma) Modalidades de Recolhimento!","incluir","aviso", Sessao::getId(), "../");
111   - break;
112   - }
113   -
114   - foreach (Sessao::read("arModalidades") as $inIndex=>$arModalidade) {
115   - $obTIMACategoriaSefip->setDado("cod_modalidade",$arModalidade["inCodModalidadeRecolhimento"]);
116   - foreach ($arModalidade["categorias"] as $inCodCategoria) {
117   - $obTIMACategoriaSefip->setDado("cod_categoria",$inCodCategoria);
118   - $obTIMACategoriaSefip->inclusao();
  63 +
  64 + if (count(Sessao::read("arModalidades")) == 0) {
  65 + Sessao::write('NOVAacao',$stAcao);
  66 + SistemaLegado::alertaAviso($pgForm,"É necessário inserir ao menos 1 (uma) Modalidades de Recolhimento!","n_incluir","erro", Sessao::getId(), "../");
  67 + } else {
  68 + $obTAdministracaoConfiguracao = new TAdministracaoConfiguracao();
  69 + $obTIMACategoriaSefip = new TIMACategoriaSefip();
  70 +
  71 + $obTAdministracaoConfiguracao->setDado( "cod_modulo", $inCodModulo );
  72 + $obTAdministracaoConfiguracao->setDado( "exercicio" , Sessao::getExercicio() );
  73 + $obTAdministracaoConfiguracao->setDado( "parametro" , "cnae_fiscal".Sessao::getEntidade() );
  74 + $obTAdministracaoConfiguracao->setDado( "valor" , $_POST["HdninCodCnae"] );
  75 + $obTAdministracaoConfiguracao->alteracao($boTransacao);
  76 +
  77 + $obTAdministracaoConfiguracao->setDado( "parametro" , "centralizacao".Sessao::getEntidade() );
  78 + $obTAdministracaoConfiguracao->setDado( "valor" , $_POST["inCodCentralizacao"] );
  79 + $obTAdministracaoConfiguracao->alteracao($boTransacao);
  80 +
  81 + $obTAdministracaoConfiguracao->setDado( "parametro" , "codigo_outras_entidades_sefip".Sessao::getEntidade() );
  82 + $obTAdministracaoConfiguracao->setDado( "valor" , $_POST["inCodigoOutrasEntidades"] );
  83 + $obTAdministracaoConfiguracao->alteracao($boTransacao);
  84 +
  85 + $obTAdministracaoConfiguracao->setDado( "parametro" , "fpas".Sessao::getEntidade() );
  86 + $obTAdministracaoConfiguracao->setDado( "valor" , $_POST["inCodFPAS"] );
  87 + $obTAdministracaoConfiguracao->alteracao($boTransacao);
  88 +
  89 + $obTAdministracaoConfiguracao->setDado( "parametro" , "gps".Sessao::getEntidade() );
  90 + $obTAdministracaoConfiguracao->setDado( "valor" , $_POST["inCodPagamentoGPS"] );
  91 + $obTAdministracaoConfiguracao->alteracao($boTransacao);
  92 +
  93 + $obTAdministracaoConfiguracao->setDado( "parametro" , "tipo_inscricao".Sessao::getEntidade() );
  94 + $obTAdministracaoConfiguracao->setDado( "valor" , $_POST["inTipoInscricao"] );
  95 + $obTAdministracaoConfiguracao->alteracao($boTransacao);
  96 +
  97 + $obTAdministracaoConfiguracao->setDado( "parametro" , "inscricao_fornecedor".Sessao::getEntidade() );
  98 + $obTAdministracaoConfiguracao->setDado( "valor" , $_POST["inCGM"] );
  99 + $obTAdministracaoConfiguracao->alteracao($boTransacao);
  100 +
  101 + $obTAdministracaoConfiguracao->setDado( "parametro" , "nome_pessoa_contato_sefip".Sessao::getEntidade() );
  102 + $obTAdministracaoConfiguracao->setDado( "valor" , $_POST["stPessoaContato"] );
  103 + $obTAdministracaoConfiguracao->alteracao($boTransacao);
  104 +
  105 + $obTAdministracaoConfiguracao->setDado( "parametro" , "telefone_pessoa_contato_sefip".Sessao::getEntidade() );
  106 + $obTAdministracaoConfiguracao->setDado( "valor" , $_POST["stTelefoneContato"] );
  107 + $obTAdministracaoConfiguracao->alteracao($boTransacao);
  108 +
  109 + $obTAdministracaoConfiguracao->setDado( "parametro" , "DDD_pessoa_contato_sefip".Sessao::getEntidade() );
  110 + $obTAdministracaoConfiguracao->setDado( "valor" , $_POST["stDDDContato"] );
  111 + $obTAdministracaoConfiguracao->alteracao($boTransacao);
  112 +
  113 + $obTAdministracaoConfiguracao->setDado( "parametro" , "mail_pessoa_contato_sefip".Sessao::getEntidade() );
  114 + $obTAdministracaoConfiguracao->setDado( "valor" , $_POST["stEmailContato"] );
  115 + $obTAdministracaoConfiguracao->alteracao($boTransacao);
  116 +
  117 + $obErro = $obTIMACategoriaSefip->excluirTodos($boTransacao);
  118 +
  119 + if (!$obErro->ocorreu()) {
  120 + foreach (Sessao::read("arModalidades") as $inIndex=>$arModalidade) {
  121 + $obTIMACategoriaSefip->setDado("cod_modalidade",$arModalidade["inCodModalidadeRecolhimento"]);
  122 +
  123 + foreach ($arModalidade["categorias"] as $inCodCategoria) {
  124 + $obTIMACategoriaSefip->setDado("cod_categoria",$inCodCategoria);
  125 + $obErro = $obTIMACategoriaSefip->inclusao($boTransacao);
  126 +
  127 + if ($obErro->ocorreu()) {
  128 + break;
  129 + }
  130 + }
  131 + }
119 132 }
120   - }
121 133  
122   - Sessao::encerraExcecao();
123   - SistemaLegado::alertaAviso($pgForm,"Configuração da SEFIP concluída com sucesso!","incluir","aviso", Sessao::getId(), "../");
  134 + if (!$obErro->ocorreu()) {
  135 + $stMsg = "Configuração da SEFIP concluída com sucesso!";
  136 +
  137 + Sessao::write('NOVAacao',$stAcao);
  138 +
  139 + SistemaLegado::alertaAviso($pgForm.'?'.Sessao::getId()."&stAcao=".$stAcao, $stMsg."",$stAcao,"aviso", Sessao::getId(), "../");
  140 + } else {
  141 + SistemaLegado::exibeAviso(urlencode($obErro->getDescricao()), 'form', 'erro', Sessao::getId(), '../');
  142 + }
  143 + }
124 144 break;
125 145 }
  146 +
  147 +Sessao::encerraExcecao();
  148 +
  149 +SistemaLegado::LiberaFrames(true,true);
  150 +
126 151 include_once '../../../../../../gestaoAdministrativa/fontes/PHP/framework/include/rodape.inc.php';
... ...