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

Kardex correción numero de parte cuando se llega desde link, OC mostrar liga de impreison al actualizar oc

Browse Source
This commit is contained in:
rakcsle
2025-01-09 09:10:12 -07:00
parent 325f70e0ff
commit 37e3dd63bd
3 changed files with 46 additions and 6 deletions
Download Patch File Download Diff File Expand all files Collapse all files

8
OC/OC.aspx.vb
View File

@@ -3527,9 +3527,14 @@ Partial Class OC_OC
'Alert(String.Format("La {0} se guardó correctamente", TipoLargo), TipoMensaje.MsgInformacion)
'Edicion
Dim ImprimirOC As String = ""
Dim Msg As New StringBuilder
ImprimirOC = String.Format("<br/> <a Class=""Texto"" target='_blank' href=""/Compras/PopUpVerFactura.aspx?P={0}"">Imprimir Orden de Compra</a> ", Encripta(String.Format("OP=OC&CVEOC={0}", CveOrdenCompra)))
Dim Liga1 As String = $"document.location.href=""/OC/OC.aspx?Tipo={TipoOC}"""
Dim Liga2 As String = $"document.location.href=""/OC/RepOC.aspx"""
Alert(String.Format("La {0} se guardó correctamente", TipoLargo), TipoMensaje.MsgDosBotones, Liga1, TextoConfirmacion:="Seguir Registrando", TextoSegundoBoton:="Ir al Reporte", JSBtn2:=Liga2)
Alert(String.Format("La {0} se guardó correctamente. {1}", TipoLargo, ImprimirOC), TipoMensaje.MsgDosBotones, Liga1, TextoConfirmacion:="Seguir Registrando", TextoSegundoBoton:="Ir al Reporte", JSBtn2:=Liga2)
Else
Dim ImprimirOC As String = ""
@@ -3562,6 +3567,7 @@ Partial Class OC_OC
If Conta IsNot Nothing Then Conta.RollBack()
Alert(MsgError, TipoMensaje.MsgError)
End If
End If