diff --git a/App_Code/ClsContPAQi.vb b/App_Code/ClsContPAQi.vb index 4899c1242..5b006c0b4 100644 --- a/App_Code/ClsContPAQi.vb +++ b/App_Code/ClsContPAQi.vb @@ -1253,9 +1253,9 @@ Public Class ClsContPAQi StrSQL.AppendLine(" ISNULL(PD.CveIE,0) AS CveIE,") StrSQL.AppendLine(" ISNULL(PD.CveVenta,0) AS CveVenta,") StrSQL.AppendLine(" ISNULL(PD.CveCompra,0) AS CveCompra") - StrSQL.AppendLine(" FROM MovimientosPoliza MP") - StrSQL.AppendLine(" INNER JOIN Polizas CP ON MP.IdPoliza = CP.Id") - StrSQL.AppendLine(" INNER JOIN Cuentas C ON MP.IdCuenta = C.Id") + StrSQL.AppendLine(" FROM MovimientosPoliza MP WITH(NOLOCK) ") + StrSQL.AppendLine(" INNER JOIN Polizas CP WITH(NOLOCK) ON MP.IdPoliza = CP.Id") + StrSQL.AppendLine(" INNER JOIN Cuentas C WITH(NOLOCK) ON MP.IdCuenta = C.Id") StrSQL.AppendLine(" INNER JOIN #CuentasContablesRecursivas A ON A.Id = C.Id") StrSQL.AppendLine(" LEFT JOIN [SERVIDOR].Ventas.dbo.Conta_PrePolizasDetalle PD ON MP.CvePrePolizaDetalle = PD.CvePrePolizaDetalle AND PD.Contabilizable = 1") StrSQL.AppendLine(" LEFT JOIN [SERVIDOR].Ventas.dbo.Conta_PrePolizas P ON P.CvePrePoliza = PD.CvePrePoliza") @@ -1277,12 +1277,12 @@ Public Class ClsContPAQi StrSQL.AppendLine(" ISNULL(PD.CveIE,0) AS CveIE,") StrSQL.AppendLine(" ISNULL(PD.CveVenta,0) AS CveVenta,") StrSQL.AppendLine(" ISNULL(PD.CveCompra,0) AS CveCompra") - StrSQL.AppendLine(" FROM [SERVIDOR].Ventas.dbo.Conta_PrePolizasDetalle PD") - StrSQL.AppendLine(" INNER JOIN [SERVIDOR].Ventas.dbo.Conta_PrePolizas P ON P.CvePrePoliza = PD.CvePrePoliza") - StrSQL.AppendLine(" INNER JOIN [SERVIDOR].Ventas.dbo.Vw_Clientes Cl ON Cl.CveCliente = PD.CveCliente") - StrSQL.AppendLine(" LEFT JOIN MovimientosPoliza MP ON MP.CvePrePolizaDetalle = PD.CvePrePolizaDetalle") - StrSQL.AppendLine(" LEFT JOIN Polizas CP ON MP.IdPoliza = CP.Id") - StrSQL.AppendLine(" LEFT JOIN Cuentas C ON PD.IdCtaContable = C.Id") + StrSQL.AppendLine(" FROM [SERVIDOR].Ventas.dbo.Conta_PrePolizasDetalle PD WITH(NOLOCK)") + StrSQL.AppendLine(" INNER JOIN [SERVIDOR].Ventas.dbo.Conta_PrePolizas P WITH(NOLOCK) ON P.CvePrePoliza = PD.CvePrePoliza") + StrSQL.AppendLine(" INNER JOIN [SERVIDOR].Ventas.dbo.Vw_Clientes Cl WITH(NOLOCK) ON Cl.CveCliente = PD.CveCliente") + StrSQL.AppendLine(" LEFT JOIN MovimientosPoliza MP WITH(NOLOCK) ON MP.CvePrePolizaDetalle = PD.CvePrePolizaDetalle") + StrSQL.AppendLine(" LEFT JOIN Polizas CP WITH(NOLOCK) ON MP.IdPoliza = CP.Id") + StrSQL.AppendLine(" LEFT JOIN Cuentas C WITH(NOLOCK) ON PD.IdCtaContable = C.Id") StrSQL.AppendLine(" WHERE P.CveEmpresa = @CveEmpresa AND PD.Contabilizable = 1 AND PD.CveConceptoContable IN (1, 2, 3, 11) ") StrSQL.AppendLine(" AND (ISNULL(MP.IdCuenta,-1) <> ISNULL(PD.IdCtaContable, -1) OR ISNULL(MP.Importe,0) <> ISNULL(PD.ImporteMN,0) OR ISNULL(MP.TipoMovto,0) <> ISNULL(PD.TipoMovto,0))") StrSQL.AppendLine(" AND CAST(P.Fecha AS DATE) >= @FechaI AND CAST(P.Fecha AS DATE) <= @FechaF ") @@ -1305,13 +1305,13 @@ Public Class ClsContPAQi StrSQL.AppendLine(" ISNULL(PD.CveIE,0) AS CveIE,") StrSQL.AppendLine(" ISNULL(PD.CveVenta,0) AS CveVenta,") StrSQL.AppendLine(" ISNULL(PD.CveCompra,0) AS CveCompra") - StrSQL.AppendLine(" FROM MovimientosPoliza MP") - StrSQL.AppendLine(" INNER JOIN Polizas CP ON MP.IdPoliza = CP.Id") - StrSQL.AppendLine(" INNER JOIN Cuentas C ON MP.IdCuenta = C.Id") + StrSQL.AppendLine(" FROM MovimientosPoliza MP WITH(NOLOCK)") + StrSQL.AppendLine(" INNER JOIN Polizas CP WITH(NOLOCK) ON MP.IdPoliza = CP.Id") + StrSQL.AppendLine(" INNER JOIN Cuentas C WITH(NOLOCK) ON MP.IdCuenta = C.Id") StrSQL.AppendLine(" INNER JOIN #CuentasContablesRecursivas A ON A.Id = C.Id") - StrSQL.AppendLine(" LEFT JOIN [SERVIDOR].Ventas.dbo.Conta_PrePolizasDetalle PD ON MP.CvePrePolizaDetalle = PD.CvePrePolizaDetalle AND PD.Contabilizable = 1") - StrSQL.AppendLine(" LEFT JOIN [SERVIDOR].Ventas.dbo.Conta_PrePolizas P ON P.CvePrePoliza = PD.CvePrePoliza") - StrSQL.AppendLine(" LEFT JOIN [SERVIDOR].Ventas.dbo.Comp_Proveedores Cl ON Cl.CveProveedor = PD.CveProveedor") + StrSQL.AppendLine(" LEFT JOIN [SERVIDOR].Ventas.dbo.Conta_PrePolizasDetalle PD WITH(NOLOCK) ON MP.CvePrePolizaDetalle = PD.CvePrePolizaDetalle AND PD.Contabilizable = 1") + StrSQL.AppendLine(" LEFT JOIN [SERVIDOR].Ventas.dbo.Conta_PrePolizas P WITH(NOLOCK) ON P.CvePrePoliza = PD.CvePrePoliza") + StrSQL.AppendLine(" LEFT JOIN [SERVIDOR].Ventas.dbo.Comp_Proveedores Cl WITH(NOLOCK) ON Cl.CveProveedor = PD.CveProveedor") StrSQL.AppendLine(" WHERE (ISNULL(MP.IdCuenta,-1) <> ISNULL(PD.IdCtaContable, -1) OR ISNULL(MP.Importe,0) <> ISNULL(PD.ImporteMN,0) OR ISNULL(MP.TipoMovto,0) <> ISNULL(PD.TipoMovto,0))") StrSQL.AppendLine(" AND CAST(MP.Fecha AS DATE) >= @FechaI AND CAST(MP.Fecha AS DATE) <= @FechaF") StrSQL.AppendLine(" ") @@ -1329,12 +1329,12 @@ Public Class ClsContPAQi StrSQL.AppendLine(" ISNULL(PD.CveIE,0) AS CveIE,") StrSQL.AppendLine(" ISNULL(PD.CveVenta,0) AS CveVenta,") StrSQL.AppendLine(" ISNULL(PD.CveCompra,0) AS CveCompra") - StrSQL.AppendLine(" FROM [SERVIDOR].Ventas.dbo.Conta_PrePolizasDetalle PD") - StrSQL.AppendLine(" INNER JOIN [SERVIDOR].Ventas.dbo.Conta_PrePolizas P ON P.CvePrePoliza = PD.CvePrePoliza") - StrSQL.AppendLine(" INNER JOIN [SERVIDOR].Ventas.dbo.Comp_Proveedores Cl ON Cl.CveProveedor = PD.CveProveedor") - StrSQL.AppendLine(" LEFT JOIN MovimientosPoliza MP ON MP.CvePrePolizaDetalle = PD.CvePrePolizaDetalle") - StrSQL.AppendLine(" LEFT JOIN Polizas CP ON MP.IdPoliza = CP.Id") - StrSQL.AppendLine(" LEFT JOIN Cuentas C ON PD.IdCtaContable = C.Id") + StrSQL.AppendLine(" FROM [SERVIDOR].Ventas.dbo.Conta_PrePolizasDetalle PD WITH(NOLOCK)") + StrSQL.AppendLine(" INNER JOIN [SERVIDOR].Ventas.dbo.Conta_PrePolizas P WITH(NOLOCK) ON P.CvePrePoliza = PD.CvePrePoliza") + StrSQL.AppendLine(" INNER JOIN [SERVIDOR].Ventas.dbo.Comp_Proveedores Cl WITH(NOLOCK) ON Cl.CveProveedor = PD.CveProveedor") + StrSQL.AppendLine(" LEFT JOIN MovimientosPoliza MP WITH(NOLOCK) ON MP.CvePrePolizaDetalle = PD.CvePrePolizaDetalle") + StrSQL.AppendLine(" LEFT JOIN Polizas CP WITH(NOLOCK) ON MP.IdPoliza = CP.Id") + StrSQL.AppendLine(" LEFT JOIN Cuentas C WITH(NOLOCK) ON PD.IdCtaContable = C.Id") StrSQL.AppendLine(" WHERE P.CveEmpresa = @CveEmpresa AND PD.Contabilizable = 1 AND PD.CveConceptoContable IN (5,18,17,60) ") StrSQL.AppendLine(" AND (ISNULL(MP.IdCuenta,-1) <> ISNULL(PD.IdCtaContable, -1) OR ISNULL(MP.Importe,0) <> ISNULL(PD.ImporteMN,0) OR ISNULL(MP.TipoMovto,0) <> ISNULL(PD.TipoMovto,0))") StrSQL.AppendLine(" AND CAST(P.Fecha AS DATE) >= @FechaI AND CAST(P.Fecha AS DATE) <= @FechaF") @@ -1358,14 +1358,14 @@ Public Class ClsContPAQi StrSQL.AppendLine(" ISNULL(PD.CveIE,0) AS CveIE,") StrSQL.AppendLine(" ISNULL(PD.CveVenta,0) AS CveVenta,") StrSQL.AppendLine(" ISNULL(PD.CveCompra,0) AS CveCompra") - StrSQL.AppendLine(" FROM MovimientosPoliza MP") - StrSQL.AppendLine(" INNER JOIN Polizas CP ON MP.IdPoliza = CP.Id") - StrSQL.AppendLine(" INNER JOIN Cuentas C ON MP.IdCuenta = C.Id") + StrSQL.AppendLine(" FROM MovimientosPoliza MP WITH(NOLOCK)") + StrSQL.AppendLine(" INNER JOIN Polizas CP WITH(NOLOCK) ON MP.IdPoliza = CP.Id") + StrSQL.AppendLine(" INNER JOIN Cuentas C WITH(NOLOCK) ON MP.IdCuenta = C.Id") StrSQL.AppendLine(" INNER JOIN #CuentasContablesRecursivas A ON A.Id = C.Id") - StrSQL.AppendLine(" LEFT JOIN [SERVIDOR].Ventas.dbo.Conta_PrePolizasDetalle PD ON MP.CvePrePolizaDetalle = PD.CvePrePolizaDetalle AND PD.Contabilizable = 1") - StrSQL.AppendLine(" LEFT JOIN [SERVIDOR].Ventas.dbo.Conta_PrePolizas P ON P.CvePrePoliza = PD.CvePrePoliza") - StrSQL.AppendLine(" LEFT JOIN [SERVIDOR].Ventas.dbo.Banc_IE IE ON IE.CveIE = PD.CveIE") - StrSQL.AppendLine(" LEFT JOIN [SERVIDOR].Ventas.dbo.Banc_BancosCuentas BC ON BC.CveCuenta = IE.CveCuenta") + StrSQL.AppendLine(" LEFT JOIN [SERVIDOR].Ventas.dbo.Conta_PrePolizasDetalle PD WITH(NOLOCK) ON MP.CvePrePolizaDetalle = PD.CvePrePolizaDetalle AND PD.Contabilizable = 1") + StrSQL.AppendLine(" LEFT JOIN [SERVIDOR].Ventas.dbo.Conta_PrePolizas P WITH(NOLOCK) ON P.CvePrePoliza = PD.CvePrePoliza") + StrSQL.AppendLine(" LEFT JOIN [SERVIDOR].Ventas.dbo.Banc_IE IE WITH(NOLOCK) ON IE.CveIE = PD.CveIE") + StrSQL.AppendLine(" LEFT JOIN [SERVIDOR].Ventas.dbo.Banc_BancosCuentas BC WITH(NOLOCK) ON BC.CveCuenta = IE.CveCuenta") StrSQL.AppendLine(" WHERE (ISNULL(MP.IdCuenta,-1) <> ISNULL(PD.IdCtaContable, -1) OR ISNULL(MP.Importe,0) <> ISNULL(PD.ImporteMN,0) OR ISNULL(MP.TipoMovto,0) <> ISNULL(PD.TipoMovto,0))") StrSQL.AppendLine(" AND CAST(MP.Fecha AS DATE) >= @FechaI AND CAST(MP.Fecha AS DATE) <= @FechaF") StrSQL.AppendLine(" ") @@ -1383,13 +1383,13 @@ Public Class ClsContPAQi StrSQL.AppendLine(" ISNULL(PD.CveIE,0) AS CveIE,") StrSQL.AppendLine(" ISNULL(PD.CveVenta,0) AS CveVenta,") StrSQL.AppendLine(" ISNULL(PD.CveCompra,0) AS CveCompra") - StrSQL.AppendLine(" FROM [SERVIDOR].Ventas.dbo.Conta_PrePolizasDetalle PD") - StrSQL.AppendLine(" INNER JOIN [SERVIDOR].Ventas.dbo.Conta_PrePolizas P ON P.CvePrePoliza = PD.CvePrePoliza") - StrSQL.AppendLine(" INNER JOIN [SERVIDOR].Ventas.dbo.Banc_IE IE ON IE.CveIE = PD.CveIE") - StrSQL.AppendLine(" INNER JOIN [SERVIDOR].Ventas.dbo.Banc_BancosCuentas BC ON BC.CveCuenta = IE.CveCuenta") - StrSQL.AppendLine(" LEFT JOIN MovimientosPoliza MP ON MP.CvePrePolizaDetalle = PD.CvePrePolizaDetalle") - StrSQL.AppendLine(" LEFT JOIN Polizas CP ON MP.IdPoliza = CP.Id") - StrSQL.AppendLine(" LEFT JOIN Cuentas C ON PD.IdCtaContable = C.Id") + StrSQL.AppendLine(" FROM [SERVIDOR].Ventas.dbo.Conta_PrePolizasDetalle PD WITH(NOLOCK)") + StrSQL.AppendLine(" INNER JOIN [SERVIDOR].Ventas.dbo.Conta_PrePolizas P WITH(NOLOCK) ON P.CvePrePoliza = PD.CvePrePoliza") + StrSQL.AppendLine(" INNER JOIN [SERVIDOR].Ventas.dbo.Banc_IE IE WITH(NOLOCK) ON IE.CveIE = PD.CveIE") + StrSQL.AppendLine(" INNER JOIN [SERVIDOR].Ventas.dbo.Banc_BancosCuentas BC WITH(NOLOCK) ON BC.CveCuenta = IE.CveCuenta") + StrSQL.AppendLine(" LEFT JOIN MovimientosPoliza MP WITH(NOLOCK) ON MP.CvePrePolizaDetalle = PD.CvePrePolizaDetalle") + StrSQL.AppendLine(" LEFT JOIN Polizas CP WITH(NOLOCK) ON MP.IdPoliza = CP.Id") + StrSQL.AppendLine(" LEFT JOIN Cuentas C WITH(NOLOCK) ON PD.IdCtaContable = C.Id") StrSQL.AppendLine(" WHERE P.CveEmpresa = @CveEmpresa AND PD.Contabilizable = 1 AND PD.CveConceptoContable = 30 ") StrSQL.AppendLine(" AND (ISNULL(MP.IdCuenta,-1) <> ISNULL(PD.IdCtaContable, -1) OR ISNULL(MP.Importe,0) <> ISNULL(PD.ImporteMN,0) OR ISNULL(MP.TipoMovto,0) <> ISNULL(PD.TipoMovto,0))") StrSQL.AppendLine(" AND CAST(P.Fecha AS DATE) >= @FechaI AND CAST(P.Fecha AS DATE) <= @FechaF") @@ -1413,14 +1413,14 @@ Public Class ClsContPAQi StrSQL.AppendLine(" ISNULL(PD.CveIE,0) AS CveIE,") StrSQL.AppendLine(" ISNULL(PD.CveVenta,0) AS CveVenta,") StrSQL.AppendLine(" ISNULL(PD.CveCompra,0) AS CveCompra") - StrSQL.AppendLine(" FROM MovimientosPoliza MP") - StrSQL.AppendLine(" INNER JOIN Polizas CP ON MP.IdPoliza = CP.Id") - StrSQL.AppendLine(" INNER JOIN Cuentas C ON MP.IdCuenta = C.Id") + StrSQL.AppendLine(" FROM MovimientosPoliza MP WITH(NOLOCK)") + StrSQL.AppendLine(" INNER JOIN Polizas CP WITH(NOLOCK) ON MP.IdPoliza = CP.Id") + StrSQL.AppendLine(" INNER JOIN Cuentas C WITH(NOLOCK) ON MP.IdCuenta = C.Id") StrSQL.AppendLine(" INNER JOIN #CuentasContablesRecursivas A ON A.Id = C.Id") - StrSQL.AppendLine(" LEFT JOIN [SERVIDOR].Ventas.dbo.Conta_PrePolizasDetalle PD ON MP.CvePrePolizaDetalle = PD.CvePrePolizaDetalle AND PD.Contabilizable = 1") - StrSQL.AppendLine(" LEFT JOIN [SERVIDOR].Ventas.dbo.Conta_PrePolizas P ON P.CvePrePoliza = PD.CvePrePoliza") - StrSQL.AppendLine(" LEFT JOIN [SERVIDOR].Ventas.dbo.Banc_IE IE ON IE.CveIE = PD.CveIE") - StrSQL.AppendLine(" LEFT JOIN [SERVIDOR].Ventas.dbo.Banc_BancosCuentas BC ON BC.CveCuenta = IE.CveCuenta") + StrSQL.AppendLine(" LEFT JOIN [SERVIDOR].Ventas.dbo.Conta_PrePolizasDetalle PD WITH(NOLOCK) ON MP.CvePrePolizaDetalle = PD.CvePrePolizaDetalle AND PD.Contabilizable = 1") + StrSQL.AppendLine(" LEFT JOIN [SERVIDOR].Ventas.dbo.Conta_PrePolizas P WITH(NOLOCK) ON P.CvePrePoliza = PD.CvePrePoliza") + StrSQL.AppendLine(" LEFT JOIN [SERVIDOR].Ventas.dbo.Banc_IE IE WITH(NOLOCK) ON IE.CveIE = PD.CveIE") + StrSQL.AppendLine(" LEFT JOIN [SERVIDOR].Ventas.dbo.Banc_BancosCuentas BC WITH(NOLOCK) ON BC.CveCuenta = IE.CveCuenta") StrSQL.AppendLine(" WHERE (ISNULL(MP.IdCuenta,-1) <> ISNULL(PD.IdCtaContable, -1) OR ISNULL(MP.Importe,0) <> ISNULL(PD.ImporteMN,0) OR ISNULL(MP.TipoMovto,0) <> ISNULL(PD.TipoMovto,0))") StrSQL.AppendLine(" AND CAST(MP.Fecha AS DATE) >= @FechaI AND CAST(MP.Fecha AS DATE) <= @FechaF") StrSQL.AppendLine(" ") @@ -1574,9 +1574,9 @@ Public Class ClsContPAQi StrSQL.AppendLine(" ISNULL(PD.CveIE,0) AS CveIE,") StrSQL.AppendLine(" ISNULL(PD.CveVenta,0) AS CveVenta,") StrSQL.AppendLine(" ISNULL(PD.CveCompra,0) AS CveCompra") - StrSQL.AppendLine(" FROM MovimientosPoliza MP") - StrSQL.AppendLine(" INNER JOIN Polizas CP ON MP.IdPoliza = CP.Id") - StrSQL.AppendLine(" INNER JOIN Cuentas C ON MP.IdCuenta = C.Id") + StrSQL.AppendLine(" FROM MovimientosPoliza MP WITH(NOLOCK)") + StrSQL.AppendLine(" INNER JOIN Polizas CP WITH(NOLOCK) ON MP.IdPoliza = CP.Id") + StrSQL.AppendLine(" INNER JOIN Cuentas C WITH(NOLOCK) ON MP.IdCuenta = C.Id") StrSQL.AppendLine(" INNER JOIN #CuentasContablesRecursivas A ON A.Id = C.Id") StrSQL.AppendLine(" LEFT JOIN [SERVIDOR].Ventas.dbo.Conta_PrePolizasDetalle PD ON MP.CvePrePolizaDetalle = PD.CvePrePolizaDetalle AND PD.Contabilizable = 1") StrSQL.AppendLine(" LEFT JOIN [SERVIDOR].Ventas.dbo.Conta_PrePolizas P ON P.CvePrePoliza = PD.CvePrePoliza") @@ -1626,13 +1626,13 @@ Public Class ClsContPAQi StrSQL.AppendLine(" ISNULL(PD.CveIE,0) AS CveIE,") StrSQL.AppendLine(" ISNULL(PD.CveVenta,0) AS CveVenta,") StrSQL.AppendLine(" ISNULL(PD.CveCompra,0) AS CveCompra") - StrSQL.AppendLine(" FROM MovimientosPoliza MP") - StrSQL.AppendLine(" INNER JOIN Polizas CP ON MP.IdPoliza = CP.Id") - StrSQL.AppendLine(" INNER JOIN Cuentas C ON MP.IdCuenta = C.Id") + StrSQL.AppendLine(" FROM MovimientosPoliza MP WITH(NOLOCK)") + StrSQL.AppendLine(" INNER JOIN Polizas CP WITH(NOLOCK) ON MP.IdPoliza = CP.Id") + StrSQL.AppendLine(" INNER JOIN Cuentas C WITH(NOLOCK) ON MP.IdCuenta = C.Id") StrSQL.AppendLine(" INNER JOIN #CuentasContablesRecursivas A ON A.Id = C.Id") - StrSQL.AppendLine(" LEFT JOIN [SERVIDOR].Ventas.dbo.Conta_PrePolizasDetalle PD ON MP.CvePrePolizaDetalle = PD.CvePrePolizaDetalle AND PD.Contabilizable = 1") - StrSQL.AppendLine(" LEFT JOIN [SERVIDOR].Ventas.dbo.Conta_PrePolizas P ON P.CvePrePoliza = PD.CvePrePoliza") - StrSQL.AppendLine(" LEFT JOIN [SERVIDOR].Ventas.dbo.Comp_Proveedores Cl ON Cl.CveProveedor = PD.CveProveedor") + StrSQL.AppendLine(" LEFT JOIN [SERVIDOR].Ventas.dbo.Conta_PrePolizasDetalle PD WITH(NOLOCK) ON MP.CvePrePolizaDetalle = PD.CvePrePolizaDetalle AND PD.Contabilizable = 1") + StrSQL.AppendLine(" LEFT JOIN [SERVIDOR].Ventas.dbo.Conta_PrePolizas P WITH(NOLOCK) ON P.CvePrePoliza = PD.CvePrePoliza") + StrSQL.AppendLine(" LEFT JOIN [SERVIDOR].Ventas.dbo.Comp_Proveedores Cl WITH(NOLOCK) ON Cl.CveProveedor = PD.CveProveedor") StrSQL.AppendLine(" WHERE (ISNULL(MP.IdCuenta,-1) <> ISNULL(PD.IdCtaContable, -1) OR ISNULL(MP.Importe,0) <> ISNULL(PD.ImporteMN,0) OR ISNULL(MP.TipoMovto,0) <> ISNULL(PD.TipoMovto,0))") StrSQL.AppendLine(" AND CAST(MP.Fecha AS DATE) >= @FechaI AND CAST(MP.Fecha AS DATE) <= @FechaF") StrSQL.AppendLine(" ") @@ -1650,12 +1650,12 @@ Public Class ClsContPAQi StrSQL.AppendLine(" ISNULL(PD.CveIE,0) AS CveIE,") StrSQL.AppendLine(" ISNULL(PD.CveVenta,0) AS CveVenta,") StrSQL.AppendLine(" ISNULL(PD.CveCompra,0) AS CveCompra") - StrSQL.AppendLine(" FROM [SERVIDOR].Ventas.dbo.Conta_PrePolizasDetalle PD") - StrSQL.AppendLine(" INNER JOIN [SERVIDOR].Ventas.dbo.Conta_PrePolizas P ON P.CvePrePoliza = PD.CvePrePoliza") + StrSQL.AppendLine(" FROM [SERVIDOR].Ventas.dbo.Conta_PrePolizasDetalle PD WITH(NOLOCK)") + StrSQL.AppendLine(" INNER JOIN [SERVIDOR].Ventas.dbo.Conta_PrePolizas P WITH(NOLOCK) ON P.CvePrePoliza = PD.CvePrePoliza") StrSQL.AppendLine(" INNER JOIN [SERVIDOR].Ventas.dbo.Comp_Proveedores Cl ON Cl.CveProveedor = PD.CveProveedor") - StrSQL.AppendLine(" LEFT JOIN MovimientosPoliza MP ON MP.CvePrePolizaDetalle = PD.CvePrePolizaDetalle") - StrSQL.AppendLine(" LEFT JOIN Polizas CP ON MP.IdPoliza = CP.Id") - StrSQL.AppendLine(" LEFT JOIN Cuentas C ON PD.IdCtaContable = C.Id") + StrSQL.AppendLine(" LEFT JOIN MovimientosPoliza MP WITH(NOLOCK) ON MP.CvePrePolizaDetalle = PD.CvePrePolizaDetalle") + StrSQL.AppendLine(" LEFT JOIN Polizas CP WITH(NOLOCK) ON MP.IdPoliza = CP.Id") + StrSQL.AppendLine(" LEFT JOIN Cuentas C WITH(NOLOCK) ON PD.IdCtaContable = C.Id") StrSQL.AppendLine(" WHERE P.CveEmpresa = @CveEmpresa AND PD.Contabilizable = 1 AND PD.CveConceptoContable IN (10,21) ") StrSQL.AppendLine(" AND (ISNULL(MP.IdCuenta,-1) <> ISNULL(PD.IdCtaContable, -1) OR ISNULL(MP.Importe,0) <> ISNULL(PD.ImporteMN,0) OR ISNULL(MP.TipoMovto,0) <> ISNULL(PD.TipoMovto,0))") StrSQL.AppendLine(" AND CAST(P.Fecha AS DATE) >= @FechaI AND CAST(P.Fecha AS DATE) <= @FechaF") @@ -1701,11 +1701,11 @@ Public Class ClsContPAQi StrSQL.AppendLine(" ISNULL(PD.CveIE,0) AS CveIE,") StrSQL.AppendLine(" ISNULL(PD.CveVenta,0) AS CveVenta,") StrSQL.AppendLine(" ISNULL(PD.CveCompra,0) AS CveCompra") - StrSQL.AppendLine(" FROM [SERVIDOR].Ventas.dbo.Conta_PrePolizasDetalle PD") - StrSQL.AppendLine(" INNER JOIN [SERVIDOR].Ventas.dbo.Conta_PrePolizas P ON P.CvePrePoliza = PD.CvePrePoliza") - StrSQL.AppendLine(" LEFT JOIN MovimientosPoliza MP ON MP.CvePrePolizaDetalle = PD.CvePrePolizaDetalle") - StrSQL.AppendLine(" LEFT JOIN Polizas CP ON MP.IdPoliza = CP.Id") - StrSQL.AppendLine(" LEFT JOIN Cuentas C ON PD.IdCtaContable = C.Id") + StrSQL.AppendLine(" FROM [SERVIDOR].Ventas.dbo.Conta_PrePolizasDetalle PD WITH(NOLOCK)") + StrSQL.AppendLine(" INNER JOIN [SERVIDOR].Ventas.dbo.Conta_PrePolizas P WITH(NOLOCK) ON P.CvePrePoliza = PD.CvePrePoliza") + StrSQL.AppendLine(" LEFT JOIN MovimientosPoliza MP WITH(NOLOCK) ON MP.CvePrePolizaDetalle = PD.CvePrePolizaDetalle") + StrSQL.AppendLine(" LEFT JOIN Polizas CP WITH(NOLOCK) ON MP.IdPoliza = CP.Id") + StrSQL.AppendLine(" LEFT JOIN Cuentas C WITH(NOLOCK) ON PD.IdCtaContable = C.Id") StrSQL.AppendLine(" WHERE P.CveEmpresa = @CveEmpresa AND PD.Contabilizable = 1 AND PD.CveConceptoContable = 14 ") StrSQL.AppendLine(" AND (ISNULL(MP.IdCuenta,-1) <> ISNULL(PD.IdCtaContable, -1) OR ISNULL(MP.Importe,0) <> ISNULL(PD.ImporteMN,0) OR ISNULL(MP.TipoMovto,0) <> ISNULL(PD.TipoMovto,0))") StrSQL.AppendLine(" AND CAST(P.Fecha AS DATE) >= @FechaI AND CAST(P.Fecha AS DATE) <= @FechaF") @@ -1729,9 +1729,9 @@ Public Class ClsContPAQi StrSQL.AppendLine(" ISNULL(PD.CveIE,0) AS CveIE,") StrSQL.AppendLine(" ISNULL(PD.CveVenta,0) AS CveVenta,") StrSQL.AppendLine(" ISNULL(PD.CveCompra,0) AS CveCompra") - StrSQL.AppendLine(" FROM MovimientosPoliza MP") - StrSQL.AppendLine(" INNER JOIN Polizas CP ON MP.IdPoliza = CP.Id") - StrSQL.AppendLine(" INNER JOIN Cuentas C ON MP.IdCuenta = C.Id") + StrSQL.AppendLine(" FROM MovimientosPoliza MP WITH(NOLOCK)") + StrSQL.AppendLine(" INNER JOIN Polizas CP WITH(NOLOCK) ON MP.IdPoliza = CP.Id") + StrSQL.AppendLine(" INNER JOIN Cuentas C WITH(NOLOCK) ON MP.IdCuenta = C.Id") StrSQL.AppendLine(" LEFT JOIN [SERVIDOR].Ventas.dbo.Conta_PrePolizasDetalle PD ON MP.CvePrePolizaDetalle = PD.CvePrePolizaDetalle AND PD.Contabilizable = 1") StrSQL.AppendLine(" LEFT JOIN [SERVIDOR].Ventas.dbo.Conta_PrePolizas P ON P.CvePrePoliza = PD.CvePrePoliza") StrSQL.AppendLine(" WHERE MP.IdCuenta = @CveFuncionalidad AND (ISNULL(MP.IdCuenta,-1) <> ISNULL(PD.IdCtaContable, -1) OR ISNULL(MP.Importe,0) <> ISNULL(PD.ImporteMN,0) OR ISNULL(MP.TipoMovto,0) <> ISNULL(PD.TipoMovto,0))") @@ -1751,11 +1751,11 @@ Public Class ClsContPAQi StrSQL.AppendLine(" ISNULL(PD.CveIE,0) AS CveIE,") StrSQL.AppendLine(" ISNULL(PD.CveVenta,0) AS CveVenta,") StrSQL.AppendLine(" ISNULL(PD.CveCompra,0) AS CveCompra") - StrSQL.AppendLine(" FROM [SERVIDOR].Ventas.dbo.Conta_PrePolizasDetalle PD") - StrSQL.AppendLine(" INNER JOIN [SERVIDOR].Ventas.dbo.Conta_PrePolizas P ON P.CvePrePoliza = PD.CvePrePoliza") - StrSQL.AppendLine(" LEFT JOIN MovimientosPoliza MP ON MP.CvePrePolizaDetalle = PD.CvePrePolizaDetalle") - StrSQL.AppendLine(" LEFT JOIN Polizas CP ON MP.IdPoliza = CP.Id") - StrSQL.AppendLine(" LEFT JOIN Cuentas C ON PD.IdCtaContable = C.Id") + StrSQL.AppendLine(" FROM [SERVIDOR].Ventas.dbo.Conta_PrePolizasDetalle PD WITH(NOLOCK)") + StrSQL.AppendLine(" INNER JOIN [SERVIDOR].Ventas.dbo.Conta_PrePolizas P WITH(NOLOCK) ON P.CvePrePoliza = PD.CvePrePoliza") + StrSQL.AppendLine(" LEFT JOIN MovimientosPoliza MP WITH(NOLOCK) ON MP.CvePrePolizaDetalle = PD.CvePrePolizaDetalle") + StrSQL.AppendLine(" LEFT JOIN Polizas CP WITH(NOLOCK) ON MP.IdPoliza = CP.Id") + StrSQL.AppendLine(" LEFT JOIN Cuentas C WITH(NOLOCK) ON PD.IdCtaContable = C.Id") StrSQL.AppendLine(" WHERE P.CveEmpresa = @CveEmpresa AND PD.Contabilizable = 1 AND PD.CveConceptoContable = 19 ") StrSQL.AppendLine(" AND (ISNULL(MP.IdCuenta,-1) <> ISNULL(PD.IdCtaContable, -1) OR ISNULL(MP.Importe,0) <> ISNULL(PD.ImporteMN,0) OR ISNULL(MP.TipoMovto,0) <> ISNULL(PD.TipoMovto,0))") StrSQL.AppendLine(" AND CAST(P.Fecha AS DATE) >= @FechaI AND CAST(P.Fecha AS DATE) <= @FechaF") @@ -1801,11 +1801,11 @@ Public Class ClsContPAQi StrSQL.AppendLine(" ISNULL(PD.CveIE,0) AS CveIE,") StrSQL.AppendLine(" ISNULL(PD.CveVenta,0) AS CveVenta,") StrSQL.AppendLine(" ISNULL(PD.CveCompra,0) AS CveCompra") - StrSQL.AppendLine(" FROM [SERVIDOR].Ventas.dbo.Conta_PrePolizasDetalle PD") - StrSQL.AppendLine(" INNER JOIN [SERVIDOR].Ventas.dbo.Conta_PrePolizas P ON P.CvePrePoliza = PD.CvePrePoliza") - StrSQL.AppendLine(" LEFT JOIN MovimientosPoliza MP ON MP.CvePrePolizaDetalle = PD.CvePrePolizaDetalle") - StrSQL.AppendLine(" LEFT JOIN Polizas CP ON MP.IdPoliza = CP.Id") - StrSQL.AppendLine(" LEFT JOIN Cuentas C ON PD.IdCtaContable = C.Id") + StrSQL.AppendLine(" FROM [SERVIDOR].Ventas.dbo.Conta_PrePolizasDetalle PD WITH(NOLOCK)") + StrSQL.AppendLine(" INNER JOIN [SERVIDOR].Ventas.dbo.Conta_PrePolizas P WITH(NOLOCK) ON P.CvePrePoliza = PD.CvePrePoliza") + StrSQL.AppendLine(" LEFT JOIN MovimientosPoliza MP WITH(NOLOCK) ON MP.CvePrePolizaDetalle = PD.CvePrePolizaDetalle") + StrSQL.AppendLine(" LEFT JOIN Polizas CP WITH(NOLOCK) ON MP.IdPoliza = CP.Id") + StrSQL.AppendLine(" LEFT JOIN Cuentas C WITH(NOLOCK) ON PD.IdCtaContable = C.Id") StrSQL.AppendLine(" WHERE P.CveEmpresa = @CveEmpresa AND PD.Contabilizable = 1 AND PD.CveConceptoContable = 13 ") StrSQL.AppendLine(" AND (ISNULL(MP.IdCuenta,-1) <> ISNULL(PD.IdCtaContable, -1) OR ISNULL(MP.Importe,0) <> ISNULL(PD.ImporteMN,0) OR ISNULL(MP.TipoMovto,0) <> ISNULL(PD.TipoMovto,0))") StrSQL.AppendLine(" AND CAST(P.Fecha AS DATE) >= @FechaI AND CAST(P.Fecha AS DATE) <= @FechaF") @@ -1829,11 +1829,11 @@ Public Class ClsContPAQi StrSQL.AppendLine(" ISNULL(PD.CveIE,0) AS CveIE,") StrSQL.AppendLine(" ISNULL(PD.CveVenta,0) AS CveVenta,") StrSQL.AppendLine(" ISNULL(PD.CveCompra,0) AS CveCompra") - StrSQL.AppendLine(" FROM MovimientosPoliza MP") - StrSQL.AppendLine(" INNER JOIN Polizas CP ON MP.IdPoliza = CP.Id") - StrSQL.AppendLine(" INNER JOIN Cuentas C ON MP.IdCuenta = C.Id") - StrSQL.AppendLine(" LEFT JOIN [SERVIDOR].Ventas.dbo.Conta_PrePolizasDetalle PD ON MP.CvePrePolizaDetalle = PD.CvePrePolizaDetalle AND PD.Contabilizable = 1") - StrSQL.AppendLine(" LEFT JOIN [SERVIDOR].Ventas.dbo.Conta_PrePolizas P ON P.CvePrePoliza = PD.CvePrePoliza") + StrSQL.AppendLine(" FROM MovimientosPoliza MP WITH(NOLOCK)") + StrSQL.AppendLine(" INNER JOIN Polizas CP WITH(NOLOCK) ON MP.IdPoliza = CP.Id") + StrSQL.AppendLine(" INNER JOIN Cuentas C WITH(NOLOCK) ON MP.IdCuenta = C.Id") + StrSQL.AppendLine(" LEFT JOIN [SERVIDOR].Ventas.dbo.Conta_PrePolizasDetalle PD WITH(NOLOCK) ON MP.CvePrePolizaDetalle = PD.CvePrePolizaDetalle AND PD.Contabilizable = 1") + StrSQL.AppendLine(" LEFT JOIN [SERVIDOR].Ventas.dbo.Conta_PrePolizas P WITH(NOLOCK) ON P.CvePrePoliza = PD.CvePrePoliza") StrSQL.AppendLine(" WHERE MP.IdCuenta = @CveFuncionalidad AND (ISNULL(MP.IdCuenta,-1) <> ISNULL(PD.IdCtaContable, -1) OR ISNULL(MP.Importe,0) <> ISNULL(PD.ImporteMN,0) OR ISNULL(MP.TipoMovto,0) <> ISNULL(PD.TipoMovto,0))") StrSQL.AppendLine(" AND CAST(MP.Fecha AS DATE) >= @FechaI AND CAST(MP.Fecha AS DATE) <= @FechaF") StrSQL.AppendLine(" ") @@ -1851,11 +1851,11 @@ Public Class ClsContPAQi StrSQL.AppendLine(" ISNULL(PD.CveIE,0) AS CveIE,") StrSQL.AppendLine(" ISNULL(PD.CveVenta,0) AS CveVenta,") StrSQL.AppendLine(" ISNULL(PD.CveCompra,0) AS CveCompra") - StrSQL.AppendLine(" FROM [SERVIDOR].Ventas.dbo.Conta_PrePolizasDetalle PD") - StrSQL.AppendLine(" INNER JOIN [SERVIDOR].Ventas.dbo.Conta_PrePolizas P ON P.CvePrePoliza = PD.CvePrePoliza") - StrSQL.AppendLine(" LEFT JOIN MovimientosPoliza MP ON MP.CvePrePolizaDetalle = PD.CvePrePolizaDetalle") - StrSQL.AppendLine(" LEFT JOIN Polizas CP ON MP.IdPoliza = CP.Id") - StrSQL.AppendLine(" LEFT JOIN Cuentas C ON PD.IdCtaContable = C.Id") + StrSQL.AppendLine(" FROM [SERVIDOR].Ventas.dbo.Conta_PrePolizasDetalle PD WITH(NOLOCK)") + StrSQL.AppendLine(" INNER JOIN [SERVIDOR].Ventas.dbo.Conta_PrePolizas P WITH(NOLOCK) ON P.CvePrePoliza = PD.CvePrePoliza") + StrSQL.AppendLine(" LEFT JOIN MovimientosPoliza MP WITH(NOLOCK) ON MP.CvePrePolizaDetalle = PD.CvePrePolizaDetalle") + StrSQL.AppendLine(" LEFT JOIN Polizas CP WITH(NOLOCK) ON MP.IdPoliza = CP.Id") + StrSQL.AppendLine(" LEFT JOIN Cuentas C WITH(NOLOCK) ON PD.IdCtaContable = C.Id") StrSQL.AppendLine(" WHERE P.CveEmpresa = @CveEmpresa AND PD.Contabilizable = 1 AND PD.CveConceptoContable = 61 ") StrSQL.AppendLine(" AND (ISNULL(MP.IdCuenta,-1) <> ISNULL(PD.IdCtaContable, -1) OR ISNULL(MP.Importe,0) <> ISNULL(PD.ImporteMN,0) OR ISNULL(MP.TipoMovto,0) <> ISNULL(PD.TipoMovto,0))") StrSQL.AppendLine(" AND CAST(P.Fecha AS DATE) >= @FechaI AND CAST(P.Fecha AS DATE) <= @FechaF") @@ -2025,6 +2025,8 @@ Public Class ClsContPAQi End With Try + + SqlAdapter.SelectCommand.CommandTimeout = 0 SqlAdapter.Fill(Data) Retorno = True Catch ex As Exception diff --git a/App_Code/ClsContabilidad.vb b/App_Code/ClsContabilidad.vb index 069c2aaa3..4e06e5f4e 100644 --- a/App_Code/ClsContabilidad.vb +++ b/App_Code/ClsContabilidad.vb @@ -5960,13 +5960,14 @@ Public Class ClsContabilidad End Function #Region "Globales" - Public Function GetCuentasGlobales(CveEmpresa As Integer) As Boolean + Public Function GetCuentasGlobales(CveEmpresa As Integer, Optional CveConcepto As Integer = -1) As Boolean Dim Retorno = False DataAdapter("PA_Conta_CuentasGlobalesGet") With SqlAdapter.SelectCommand.Parameters .Add("@CveEmpresa", SqlDbType.Int).Value = CveEmpresa + .Add("@CveConcepto", SqlDbType.Int).Value = CveConcepto End With Try diff --git a/Bancos/IE.aspx b/Bancos/IE.aspx index 60a92a6c8..768a9a830 100644 --- a/Bancos/IE.aspx +++ b/Bancos/IE.aspx @@ -211,7 +211,7 @@
-
+
@@ -229,7 +229,7 @@
-
+
$ diff --git a/Bancos/ProveedoresAbonar.aspx b/Bancos/ProveedoresAbonar.aspx index e766e9edc..48f92f474 100644 --- a/Bancos/ProveedoresAbonar.aspx +++ b/Bancos/ProveedoresAbonar.aspx @@ -58,7 +58,7 @@
-
+
@@ -130,12 +130,12 @@
-
+
-
+
$ diff --git a/Bancos/Transferencias.aspx b/Bancos/Transferencias.aspx index f54a0a1ee..54bfe794e 100644 --- a/Bancos/Transferencias.aspx +++ b/Bancos/Transferencias.aspx @@ -122,12 +122,12 @@ Folio - + Paguese - + Observaciones: diff --git a/Empresas/15/Formatos/Factura.rdlc b/Empresas/15/Formatos/Factura.rdlc index ec17632f6..76c1d01c9 100644 --- a/Empresas/15/Formatos/Factura.rdlc +++ b/Empresas/15/Formatos/Factura.rdlc @@ -547,12 +547,41 @@ - + Camelia, #346, Col.:Luis Encinas, + + + + + + + + + C.P. 83138 Hermosillo + + + + + + + + + @@ -562,8 +591,8 @@ Textbox4 - 1.7536in - 0.59155in + 1.76749in + 0.67352in 3.86673in 4 - - true - true - - - - - Nombre - - - - - - - - - - - - - - - 2pt - 2pt - 2pt - 2pt - - - - true - - - - - =Parameters!ClienteNombre.Value - - - - - - - - - - - - - - - 2pt - 2pt - 2pt - 2pt - - @@ -1488,7 +1433,7 @@ 0.0208cm 2.10099cm 20.06179cm - 12 + 10 = (Parameters!AplicaPagare.Value="0" OrElse Parameters!AplicaPagare.Value="") @@ -2805,70 +2750,17 @@ DsOC - 4.14415cm + 4.77915cm 0.11516cm 2.29418cm 19.97108cm - 13 + 11 - - true - - - - - RFC: - - - - =Parameters!ClienteRFC.Value - - - - - - - - - - - - - - - - - - - 2pt - 2pt - 2pt - 2pt - - @@ -3283,11 +3175,11 @@ true - 13.45121cm + 14.08621cm 0.04257cm 3.74574cm 20.109cm - 15 + 12 @@ -4339,7 +4231,7 @@ 0.26817in 5.88134in 0.34081in - 1.98129in + 1.98128in 3 @@ -4400,7 +4292,7 @@ 0.07003cm 1.01627cm 5.45089cm - 17 + 14 @@ -4855,49 +4747,13 @@ - - true - true - - - - - VERSION 3.3 - - - - - - - Textbox5 - 2.28775cm - 17.08931cm - 0.6cm - 3.06609cm - 4 - - - 2pt - 2pt - 2pt - 2pt - - true - 17.21106cm + 17.84606cm 0.00547cm - 2.97096cm + 2.25247cm 20.1554cm - 18 + 15 =Microsoft.VisualBasic.Interaction.IIF(First(Fields!SerieFolio.Value, "DataSet4") <> "", False, True) @@ -4907,6 +4763,327 @@ + + true + true + + + + + Nombre + + + + + + + + + + + + + + + #c4d79b + 2pt + 2pt + 2pt + 2pt + + + + true + + + + + =Parameters!ClienteNombre.Value + + + + + + + + + + + + + + + 2pt + 2pt + 2pt + 2pt + + + + true + true + + + + + Dirección + + + + + + + + + + + + + + + #c4d79b + 2pt + 2pt + 2pt + 2pt + + + + true + + + + + =Parameters!ClienteDireccion.Value + + + + + + + + + + + + + + + 2pt + 2pt + 2pt + 2pt + + + + true + true + + + + + Ciudad + + + + + + + + + + #c4d79b + 1.25pt + + + + + + + + #c4d79b + 2pt + 2pt + 2pt + 2pt + + + + true + + + + + =Parameters!ClienteLugar.Value + + + + + + + + + + + + + + + + + + + 2pt + 2pt + 2pt + 2pt + + + + true + + + + + RFC: + + + + =Parameters!ClienteRFC.Value + + + + + + + + + + + + + + + + + + + 2pt + 2pt + 2pt + 2pt + + 23.58967cm