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

Serie lote en poliza virtual

Browse Source
This commit is contained in:
Jonathan Alexis Perez Morales
2020-01-10 11:10:47 -07:00
parent 61c38ed6d1
commit f6ba786786
1 changed files with 7 additions and 5 deletions
Download Patch File Download Diff File Expand all files Collapse all files

12
Ventas/Ventas.aspx.vb
View File

@@ -18244,9 +18244,11 @@ Partial Class Ventas
Exit Sub Exit Sub
End If End If
If String.IsNullOrEmpty(Vigencia.EsCancelable) Then If String.IsNullOrEmpty(Vigencia.EsCancelable) Then
Alert("No se pudo encontrar el estatus de la factura en el SAT.", TipoMensaje.MsgAdvertencia) If Not String.IsNullOrEmpty(FolioFiscal) Then
Exit Sub Alert("No se pudo encontrar el estatus de la factura en el SAT.", TipoMensaje.MsgAdvertencia)
'sb.Append("<b>No encontrado</b> <br/>") Exit Sub
End If
sb.Append("<b>No encontrado</b> <br/>")
Else Else
sb.AppendFormat("<b>{0}</b> <br/>", Vigencia.EsCancelable) sb.AppendFormat("<b>{0}</b> <br/>", Vigencia.EsCancelable)
End If End If
@@ -23859,8 +23861,8 @@ Partial Class Ventas
obj.sale_id = String.Format("{0}{1}{2}", ObjFactura.Serie, ObjFactura.Folio, ObjFactura.CveVenta) obj.sale_id = String.Format("{0}{1}{2}", ObjFactura.Serie, ObjFactura.Folio, ObjFactura.CveVenta)
'DATOS DEL PRODUCTO 'DATOS DEL PRODUCTO
obj.product_code = Row("Code17").ToString() obj.product_code = Row("IdProductoPolizaVirtual").ToString()
obj.product_unique_code = "" 'se indique el código único de la batería. obj.product_unique_code = Row("SerieLote").ToString() 'se indique el código único de la batería. (SERIE LOTE)
obj.product_sale_type = "01 " 'VENTA obj.product_sale_type = "01 " 'VENTA
Dim FechaUsado As DateTime = Row("FechaAjuste").ToString().ToDateTime() Dim FechaUsado As DateTime = Row("FechaAjuste").ToString().ToDateTime()