AdminADS/SIG
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

Correciones de Empresa 120 Promotora Inmobiliaria

Browse Source
This commit is contained in:
janeth arvizu
2019-12-02 14:08:09 -07:00
parent 385c0c92a3
commit b156b2f579
5 changed files with 61 additions and 40 deletions
Download Patch File Download Diff File Expand all files Collapse all files

6
AC/RepCambiosSituacionFinanciera.aspx
View File

@@ -51,7 +51,11 @@
<div class="col-md-1" style="text-align: right; font-size: 14px;"><span>Ejercicio:</span></div>
<div class="col-md-2 text-size-12">
<asp:DropDownList Font-Size="14px" runat="server" ID="DdlEjercicio" Width="100%">
<asp:ListItem Text="2015" Value="2015" Selected="True" />
<asp:ListItem Text="2019" Value="2019" Selected="True" />
<asp:ListItem Text="2018" Value="2018" />
<asp:ListItem Text="2017" Value="2017" />
<asp:ListItem Text="2016" Value="2016" />
<asp:ListItem Text="2015" Value="2015" />
<asp:ListItem Text="2014" Value="2014" />
</asp:DropDownList>
</div>

5
AC/RepFlujoEfectivo.aspx.vb
View File

@@ -84,9 +84,14 @@ Partial Class AC_RepFlujoEfectivo
'OBTENEMOS TOTALES NETOS DE OPERACIONES PARA INSERTAR DIRECTO
If DtDatos IsNot Nothing Then
If UsuarioActual.CveEmpresa.Contiene(120) Then
TotalActual = DtDatos.FiltraParametros("Codigo = '040000000000000000'").Rows(0)("ImporteActual").ToString.ToDouble - DtDatos.FiltraParametros("Codigo = '050000000000000000'").Rows(0)("ImporteActual").ToString.ToDouble
TotalAnterior = DtDatos.FiltraParametros("Codigo = '040000000000000000'").Rows(0)("ImporteAnterior").ToString.ToDouble - DtDatos.FiltraParametros("Codigo = '050000000000000000'").Rows(0)("ImporteAnterior").ToString.ToDouble
Else
TotalActual = DtDatos.FiltraParametros("Codigo = '000040000000000000'").Rows(0)("ImporteActual").ToString.ToDouble - DtDatos.FiltraParametros("Codigo = '000050000000000000'").Rows(0)("ImporteActual").ToString.ToDouble
TotalAnterior = DtDatos.FiltraParametros("Codigo = '000040000000000000'").Rows(0)("ImporteAnterior").ToString.ToDouble - DtDatos.FiltraParametros("Codigo = '000050000000000000'").Rows(0)("ImporteAnterior").ToString.ToDouble
End If
End If
CargaGrid()

77
AC/Reportes/RepSituacionFinanciera.rdlc
View File

@@ -216,7 +216,7 @@
</Paragraphs>
<rd:DefaultName>ImporteAnterior</rd:DefaultName>
<Visibility>
<Hidden>=IIf(Parameters!CveEmpresa.Value = 48,False,True)</Hidden>
<Hidden>=IIf(Parameters!CveEmpresa.Value = 48 Or Parameters!CveEmpresa.Value = 120,False,True)</Hidden>
</Visibility>
<Style>
<Border>
@@ -324,7 +324,7 @@
</Paragraphs>
<rd:DefaultName>ImporteAnterior1</rd:DefaultName>
<Visibility>
<Hidden>=IIf(Parameters!CveEmpresa.Value = 48,False,True)</Hidden>
<Hidden>=IIf(Parameters!CveEmpresa.Value = 48 Or Parameters!CveEmpresa.Value = 120,False,True)</Hidden>
</Visibility>
<Style>
<Border>
@@ -383,10 +383,10 @@
</FilterValues>
</Filter>
<Filter>
<FilterExpression>=Fields!CtaMayor.Value</FilterExpression>
<FilterExpression>=Fields!Nombre.Value</FilterExpression>
<Operator>NotEqual</Operator>
<FilterValues>
<FilterValue DataType="Integer">3</FilterValue>
<FilterValue>ACTIVO CIRCULANTE</FilterValue>
</FilterValues>
</Filter>
</Filters>
@@ -547,7 +547,7 @@
</Paragraphs>
<rd:DefaultName>ImporteAnterior</rd:DefaultName>
<Visibility>
<Hidden>=IIf(Parameters!CveEmpresa.Value = 48,False,True)</Hidden>
<Hidden>=IIf(Parameters!CveEmpresa.Value = 48 Or Parameters!CveEmpresa.Value = 120,False,True)</Hidden>
</Visibility>
<Style>
<Border>
@@ -656,7 +656,7 @@
</Paragraphs>
<rd:DefaultName>Textbox12</rd:DefaultName>
<Visibility>
<Hidden>=IIf(Parameters!CveEmpresa.Value = 48,False,True)</Hidden>
<Hidden>=IIf(Parameters!CveEmpresa.Value = 48 Or Parameters!CveEmpresa.Value = 120,False,True)</Hidden>
</Visibility>
<Style>
<Border>
@@ -712,10 +712,10 @@
</FilterValues>
</Filter>
<Filter>
<FilterExpression>=Fields!CtaMayor.Value</FilterExpression>
<FilterExpression>=Fields!Nombre.Value</FilterExpression>
<Operator>NotEqual</Operator>
<FilterValues>
<FilterValue DataType="Integer">3</FilterValue>
<FilterValue>ACTIVO NO CIRCULANTE</FilterValue>
</FilterValues>
</Filter>
</Filters>
@@ -880,7 +880,7 @@
</Paragraphs>
<rd:DefaultName>ImporteAnterior</rd:DefaultName>
<Visibility>
<Hidden>=IIf(Parameters!CveEmpresa.Value = 48,False,True)</Hidden>
<Hidden>=IIf(Parameters!CveEmpresa.Value = 48 Or Parameters!CveEmpresa.Value = 120,False,True)</Hidden>
</Visibility>
<Style>
<Border>
@@ -989,7 +989,7 @@
</Paragraphs>
<rd:DefaultName>Textbox12</rd:DefaultName>
<Visibility>
<Hidden>=IIf(Parameters!CveEmpresa.Value = 48,False,True)</Hidden>
<Hidden>=IIf(Parameters!CveEmpresa.Value = 48 Or Parameters!CveEmpresa.Value = 120,False,True)</Hidden>
</Visibility>
<Style>
<Border>
@@ -1038,10 +1038,10 @@
</FilterValues>
</Filter>
<Filter>
<FilterExpression>=Fields!CtaMayor.Value</FilterExpression>
<FilterExpression>=Fields!Nombre.Value</FilterExpression>
<Operator>NotEqual</Operator>
<FilterValues>
<FilterValue DataType="Integer">3</FilterValue>
<FilterValue>PASIVO CIRCULANTE</FilterValue>
</FilterValues>
</Filter>
<Filter>
@@ -1210,7 +1210,7 @@
</Paragraphs>
<rd:DefaultName>ImporteAnterior</rd:DefaultName>
<Visibility>
<Hidden>=IIf(Parameters!CveEmpresa.Value = 48,False,True)</Hidden>
<Hidden>=IIf(Parameters!CveEmpresa.Value = 48 Or Parameters!CveEmpresa.Value = 120,False,True)</Hidden>
</Visibility>
<Style>
<Border>
@@ -1316,7 +1316,7 @@
</Paragraphs>
<rd:DefaultName>Textbox12</rd:DefaultName>
<Visibility>
<Hidden>=IIf(Parameters!CveEmpresa.Value = 48,False,True)</Hidden>
<Hidden>=IIf(Parameters!CveEmpresa.Value = 48 Or Parameters!CveEmpresa.Value = 120,False,True)</Hidden>
</Visibility>
<Style>
<Border>
@@ -1365,10 +1365,10 @@
</FilterValues>
</Filter>
<Filter>
<FilterExpression>=Fields!CtaMayor.Value</FilterExpression>
<FilterExpression>=Fields!Nombre.Value</FilterExpression>
<Operator>NotEqual</Operator>
<FilterValues>
<FilterValue DataType="Integer">3</FilterValue>
<FilterValue>PASIVO NO CIRCULANTE</FilterValue>
</FilterValues>
</Filter>
<Filter>
@@ -1607,7 +1607,7 @@
</Paragraphs>
<rd:DefaultName>ImporteAnterior</rd:DefaultName>
<Visibility>
<Hidden>=IIf(Parameters!CveEmpresa.Value = 48,False,True)</Hidden>
<Hidden>=IIf(Parameters!CveEmpresa.Value = 48 Or Parameters!CveEmpresa.Value = 120,False,True)</Hidden>
</Visibility>
<Style>
<Border>
@@ -1715,7 +1715,7 @@
</Paragraphs>
<rd:DefaultName>Textbox12</rd:DefaultName>
<Visibility>
<Hidden>=IIf(Parameters!CveEmpresa.Value = 48,False,True)</Hidden>
<Hidden>=IIf(Parameters!CveEmpresa.Value = 48 Or Parameters!CveEmpresa.Value = 120,False,True)</Hidden>
</Visibility>
<Style>
<Border>
@@ -1764,10 +1764,17 @@
</FilterValues>
</Filter>
<Filter>
<FilterExpression>=Fields!CtaMayor.Value</FilterExpression>
<FilterExpression>=Fields!Nombre.Value</FilterExpression>
<Operator>NotEqual</Operator>
<FilterValues>
<FilterValue DataType="Integer">3</FilterValue>
<FilterValue>PATRIMONIO GENERADO</FilterValue>
</FilterValues>
</Filter>
<Filter>
<FilterExpression>=Fields!Nombre.Value</FilterExpression>
<Operator>NotEqual</Operator>
<FilterValues>
<FilterValue>PATRIMONIO CONTRIBUIDO</FilterValue>
</FilterValues>
</Filter>
</Filters>
@@ -1842,7 +1849,7 @@
<Top>11.31317cm</Top>
<Left>0.27027cm</Left>
<Height>0.6cm</Height>
<Width>4.81646cm</Width>
<Width>4.34021cm</Width>
<ZIndex>8</ZIndex>
<Style>
<Border>
@@ -1877,12 +1884,12 @@
</Paragraphs>
<rd:DefaultName>Textbox45</rd:DefaultName>
<Top>11.31317cm</Top>
<Left>8.22172cm</Left>
<Left>7.53381cm</Left>
<Height>0.6cm</Height>
<Width>2.55292cm</Width>
<Width>2.72931cm</Width>
<ZIndex>9</ZIndex>
<Visibility>
<Hidden>=IIf(Parameters!CveEmpresa.Value = 48,False,True)</Hidden>
<Hidden>=IIf(Parameters!CveEmpresa.Value = 48 Or Parameters!CveEmpresa.Value = 120,False,True)</Hidden>
</Visibility>
<Style>
<Border>
@@ -1917,7 +1924,7 @@
</Paragraphs>
<rd:DefaultName>Textbox45</rd:DefaultName>
<Top>11.31317cm</Top>
<Left>5.26312cm</Left>
<Left>4.5752cm</Left>
<Height>0.6cm</Height>
<Width>2.95861cm</Width>
<ZIndex>10</ZIndex>
@@ -1996,7 +2003,7 @@
<Width>2.56738cm</Width>
<ZIndex>12</ZIndex>
<Visibility>
<Hidden>=IIf(Parameters!CveEmpresa.Value = 48,False,True)</Hidden>
<Hidden>=IIf(Parameters!CveEmpresa.Value = 48 Or Parameters!CveEmpresa.Value = 120,False,True)</Hidden>
</Visibility>
<Style>
<Border>
@@ -2068,9 +2075,9 @@
</Paragraphs>
<rd:DefaultName>Textbox45</rd:DefaultName>
<Top>11.31317cm</Top>
<Left>10.77464cm</Left>
<Left>10.26312cm</Left>
<Height>0.6cm</Height>
<Width>4.55974cm</Width>
<Width>4.61265cm</Width>
<ZIndex>14</ZIndex>
<Style>
<Border>
@@ -2105,12 +2112,12 @@
</Paragraphs>
<rd:DefaultName>Textbox45</rd:DefaultName>
<Top>11.31317cm</Top>
<Left>17.82243cm</Left>
<Left>17.64604cm</Left>
<Height>0.6cm</Height>
<Width>2.51584cm</Width>
<Width>2.69223cm</Width>
<ZIndex>15</ZIndex>
<Visibility>
<Hidden>=IIf(Parameters!CveEmpresa.Value = 48,False,True)</Hidden>
<Hidden>=IIf(Parameters!CveEmpresa.Value = 48 Or Parameters!CveEmpresa.Value = 120,False,True)</Hidden>
</Visibility>
<Style>
<Border>
@@ -2145,9 +2152,9 @@
</Paragraphs>
<rd:DefaultName>Textbox45</rd:DefaultName>
<Top>11.31317cm</Top>
<Left>15.33438cm</Left>
<Left>14.87577cm</Left>
<Height>0.6cm</Height>
<Width>2.48805cm</Width>
<Width>2.77027cm</Width>
<ZIndex>16</ZIndex>
<Style>
<Border>
@@ -2224,7 +2231,7 @@
<Width>2.60266cm</Width>
<ZIndex>18</ZIndex>
<Visibility>
<Hidden>=IIf(Parameters!CveEmpresa.Value = 48,False,True)</Hidden>
<Hidden>=IIf(Parameters!CveEmpresa.Value = 48 Or Parameters!CveEmpresa.Value = 120,False,True)</Hidden>
</Visibility>
<Style>
<Border>
@@ -2744,7 +2751,7 @@
<Width>10.70896cm</Width>
<ZIndex>25</ZIndex>
<Visibility>
<Hidden>=IIf(Parameters!CveEmpresa.Value = 48,True,False)</Hidden>
<Hidden>=IIf(Parameters!CveEmpresa.Value = 48 Or Parameters!CveEmpresa.Value = 120,True,False)</Hidden>
</Visibility>
<Style>
<Border>

5
Contabilidad2/RepFlujoEfectivo.aspx.vb
View File

@@ -83,9 +83,14 @@ Partial Class AC2_RepFlujoEfectivo
'OBTENEMOS TOTALES NETOS DE OPERACIONES PARA INSERTAR DIRECTO
If DtDatos IsNot Nothing Then
If UsuarioActual.CveEmpresa.Contiene(120) Then
TotalActual = DtDatos.FiltraParametros("Codigo = '040000000000000000'").Rows(0)("ImporteActual").ToString.ToDouble - DtDatos.FiltraParametros("Codigo = '050000000000000000'").Rows(0)("ImporteActual").ToString.ToDouble
TotalAnterior = DtDatos.FiltraParametros("Codigo = '040000000000000000'").Rows(0)("ImporteAnterior").ToString.ToDouble - DtDatos.FiltraParametros("Codigo = '050000000000000000'").Rows(0)("ImporteAnterior").ToString.ToDouble
Else
TotalActual = DtDatos.FiltraParametros("Codigo = '000040000000000000'").Rows(0)("ImporteActual").ToString.ToDouble - DtDatos.FiltraParametros("Codigo = '000050000000000000'").Rows(0)("ImporteActual").ToString.ToDouble
TotalAnterior = DtDatos.FiltraParametros("Codigo = '000040000000000000'").Rows(0)("ImporteAnterior").ToString.ToDouble - DtDatos.FiltraParametros("Codigo = '000050000000000000'").Rows(0)("ImporteAnterior").ToString.ToDouble
End If
End If
CargaGrid()

BIN
Empresas/Grales/Formatos/LibroDiario.rpt
View File

Binary file not shown.