-- cambios en prepolizasdetalle
This commit is contained in:
@@ -448,7 +448,6 @@ Partial Class Contabilidad_FisImpuestos
|
||||
Dim Concepto As String = TxtConcepto.Text.ToUpper.Trim
|
||||
Dim CveConcepto As Integer = gvRow.DataKey("CveConcepto").ToEntero
|
||||
|
||||
Dim IdCtaContable As Integer = gvRow.DataKey("IDCuenta").ToEntero
|
||||
Dim CveSubProtyecto As Integer = If(gvRow.DataKey("CveSubProyecto").ToEntero = 0, -1, gvRow.DataKey("CveSubProyecto").ToEntero)
|
||||
Dim CveProveedor As Integer = gvRow.DataKey("CveProveedor").ToEntero
|
||||
Dim TipoMovimientoString As String = gvRow.DataKey("TipoMovto")
|
||||
@@ -462,7 +461,7 @@ Partial Class Contabilidad_FisImpuestos
|
||||
End If
|
||||
|
||||
If Importe > 0 Then
|
||||
If objConta.AddPrePolizasDetalle(CvePrepoliza, TipoMovto, Importe, TxtFolio.Text.Trim.ToUpper, CveConcepto, Concepto, Now, IdCtaContable, -1, CveProveedor:=CveProveedor, CveSubProyecto:=CveSubProtyecto) Then
|
||||
If objConta.AddPrePolizasDetalle(CvePrepoliza, TipoMovto, Importe, Importe, CveConcepto, TxtFolio.Text.Trim.ToUpper, Concepto, CveProveedor:=CveProveedor, CveSubProyecto:=CveSubProtyecto) Then
|
||||
ContadorOrdern = ContadorOrdern + 1
|
||||
ErrorProceso = False
|
||||
Else
|
||||
|
||||
Reference in New Issue
Block a user