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

-- activación de impresión etiqueta lote/cad SMS

Browse Source
This commit is contained in:
rrene
2023-11-14 11:33:35 -07:00
parent 2ac8b1c424
commit 232f3955a6
2 changed files with 6 additions and 3 deletions
Download Patch File Download Diff File Expand all files Collapse all files

5
Compras/PopUpVerFactura.aspx.vb
View File

@@ -6607,7 +6607,10 @@ Partial Class PopUpVerFactura
params.Add(New ReportParameter("PS", PS)) params.Add(New ReportParameter("PS", PS))
params.Add(New ReportParameter("Lote", Lote)) params.Add(New ReportParameter("Lote", Lote))
params.Add(New ReportParameter("FechaCad", FechaCaducidad.ToString("dd/MM/yyyy"))) params.Add(New ReportParameter("FechaCad", FechaCaducidad.ToString("dd/MM/yyyy")))
Return StreamPDF("Empresas/Grales/Formatos/EtiquetaDeRecepcion.rdlc", New DataTable, params) Dim tRuta As String = String.Format("{0}Formatos/EtiquetaDeRecepcion.rdlc", UsuarioActual.Empresa.Ruta)
If Not IO.File.Exists(tRuta) Then tRuta = "Empresas/Grales/Formatos/EtiquetaDeRecepcion.rdlc"
Return StreamPDF(tRuta, New DataTable, params)
End Function End Function
#End Region #End Region

4
Inventarios/RecepcionAlmacen.aspx.vb
View File

@@ -3666,7 +3666,7 @@ Partial Class Inventarios_RecepcionAlmacen
MandaCorreoOCVendedores(CveCompraSurtir, CveMovimiento) MandaCorreoOCVendedores(CveCompraSurtir, CveMovimiento)
Dim Msg As New StringBuilder Dim Msg As New StringBuilder
Dim link As String = String.Format("<a href=""/Inventarios/EntradasSalidas.aspx?CveMovimiento={0}"" target=""_blank"">{1}</a>", CveMovimiento, InvFolio) Dim link As String = String.Format("<a href=""/Inventarios/EntradasSalidas.aspx?CveMovimiento={0}"" target=""_blank"" class='Texto'>{1}</a>", CveMovimiento, InvFolio)
'SI LO SOLO GENERO EL MOVIMIENTO DE ENTRADA O SALIDA 'SI LO SOLO GENERO EL MOVIMIENTO DE ENTRADA O SALIDA
If CveMovimiento > 0 AndAlso CveMovimientoSalidaTraspaso <= 0 Then If CveMovimiento > 0 AndAlso CveMovimientoSalidaTraspaso <= 0 Then
Msg.AppendFormat("Movimiento Registrado: Folio: <b>{0}</b>", link) Msg.AppendFormat("Movimiento Registrado: Folio: <b>{0}</b>", link)
@@ -3674,7 +3674,7 @@ Partial Class Inventarios_RecepcionAlmacen
If MensajeOC.Length > 0 Then If MensajeOC.Length > 0 Then
Msg.AppendFormat("<br/>La Orden de Compra se dividió en los siguientes productos:<br/>{0}", MensajeOC) Msg.AppendFormat("<br/>La Orden de Compra se dividió en los siguientes productos:<br/>{0}", MensajeOC)
End If End If
If UsuarioActual.CveEmpresa.Contiene(1, 119) Then If UsuarioActual.CveEmpresa.Contiene(1, 119, 186) Then
Msg.AppendFormat("<br/><a class=""Texto"" target='_blank' href=""/Compras/PopUpVerFactura.aspx?P={0}"">Imprimir Etiqueta Individual</a> ", Encripta(String.Format("OP=Etiqueta&CveMovimiento={0}&Modalidad={1}", CveMovimiento, "Individual"))) Msg.AppendFormat("<br/><a class=""Texto"" target='_blank' href=""/Compras/PopUpVerFactura.aspx?P={0}"">Imprimir Etiqueta Individual</a> ", Encripta(String.Format("OP=Etiqueta&CveMovimiento={0}&Modalidad={1}", CveMovimiento, "Individual")))
'Msg.AppendFormat("<br/><a class=""Texto"" target='_blank' href=""/Compras/PopUpVerFactura.aspx?P={0}"">Imprimir Etiqueta Por Caja</a> ", Encripta(String.Format("OP=Etiqueta&CveMovimiento={0}&Modalidad={1}", CveMovimiento, "Caja"))) 'Msg.AppendFormat("<br/><a class=""Texto"" target='_blank' href=""/Compras/PopUpVerFactura.aspx?P={0}"">Imprimir Etiqueta Por Caja</a> ", Encripta(String.Format("OP=Etiqueta&CveMovimiento={0}&Modalidad={1}", CveMovimiento, "Caja")))