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

-- option strict on

Browse Source
This commit is contained in:
rrene
2023-08-23 00:03:35 -07:00
parent a9e785216f
commit 407256f079
13 changed files with 66 additions and 77 deletions
Download Patch File Download Diff File Expand all files Collapse all files

6
Acarreos/ContratosAcarreos.aspx.vb
View File

@@ -34,13 +34,13 @@ Partial Class Acarreos_ContratosAcarreos
Dim GvRow As GridViewRow = DirectCast(DirectCast(sender, LinkButton).NamingContainer, GridViewRow)
HdnID.Value = GvRow.DataKey("CveAcarreoProyecto")
UpDatos.Update()
If Not ObjAcar.RemoveAcarreosMaterialVolumen(HdnID.Value) Then
If Not ObjAcar.RemoveAcarreosMaterialVolumen(HdnID.Value.ToEntero) Then
ErrorClasif = True
End If
If Not ObjAcar.RemoveAcarreosTarifas(HdnID.Value) Then
If Not ObjAcar.RemoveAcarreosTarifas(HdnID.Value.ToEntero) Then
ErrorClasif = True
End If
If Not ObjAcar.RemoveAcarreosProyectos(HdnID.Value) Then
If Not ObjAcar.RemoveAcarreosProyectos(HdnID.Value.ToEntero) Then
ErrorClasif = True
End If