CveSubProyecto Concepto 25

2021-09-22 09:50:23 -07:00
parent 5c27907bc2
commit 92f213c14f
1 changed files with 1 additions and 0 deletions
--- a/Compras/Compras.aspx.vb
+++ b/Compras/Compras.aspx.vb
@@ -6093,6 +6093,7 @@ Partial Class Compras_Compras

                                                        Case 25 'IEPS X Acreditar
                                                            If Not DdlTipoComprobante.SelectedValue.Contiene("Ant") Then
+                                                                CveSubProyectoInsertar = CveSubProyecto
                                                                importeMovimiento = ImporteIEPSxAcreditar
                                                                importeMN = Math.Round(importeMovimiento, 2) * tipoCambioActual * Multiplicador
                                                                If tipoCambioActual > 1 Then Concepto += $" TC{tipoCambioActual} ${importeMovimiento.FormatoNumero(2)}"