-- si es moneda en pesos, limpiar el campo ImporteME

This commit is contained in:
2025-05-02 07:02:10 -07:00
parent 15479007ee
commit 9030a3230f

View File

@@ -2278,6 +2278,7 @@ Public Class ClsContPAQi
StrSQL.AppendLine(" @NumMovto INT,")
StrSQL.AppendLine(" @IdDiario INT,")
StrSQL.AppendLine(" @SegNegMovtos INT,")
StrSQL.AppendLine(" @IdMoneda INT,")
StrSQL.AppendLine(" @Fecha DATETIME,")
StrSQL.AppendLine(" @IDEjercicio INT,")
StrSQL.AppendLine(" @TimeStamp NVARCHAR (200);")
@@ -2288,10 +2289,11 @@ Public Class ClsContPAQi
StrSQL.AppendLine(" SET @Fecha = @FechaMov;")
StrSQL.AppendLine(" SET @IdDiario = 0;")
StrSQL.AppendLine(" SELECT @Ejercicio = P.Ejercicio, @Periodo = P.Periodo, @TipoPol = TipoPol, @Folio = P.Folio FROM Polizas P WHERE Id = @IdPoliza;")
StrSQL.AppendLine(" SELECT @SegNegMovtos = SegNegMovtos FROM Cuentas C WHERE Id = @IdCuenta;")
StrSQL.AppendLine(" SELECT @SegNegMovtos = SegNegMovtos, @IdMoneda = IdMoneda FROM Cuentas C WHERE Id = @IdCuenta;")
StrSQL.AppendLine("")
StrSQL.AppendLine(" BEGIN TRY")
StrSQL.AppendLine(" ")
StrSQL.AppendLine(" IF (@IdMoneda = 1) SET @ImporteME = 0; ")
''DESCOMENTAR PARA CIERRE PERIODO
'StrSQL.AppendLine("DECLARE")