Correcion Rep Contatos Calendario, CatAF ajuestes, AF esatatus duplciados en ddl, cat AFG impresion con imagen

Transportes/RepContratosCalendario.aspx.vb

@@ -677,12 +677,13 @@ Partial Class RepContratosCalendario
 
         If TieneError Then
             ObjContratos.RollBack()
-            Alert("Se presento un error al Actualizar el contrato.")
+            Alert("Se Presento un Error al Actualizar el Contrato.", TipoMensaje.MsgError)
         Else
             ObjContratos.Commit()
             RegistraScript("$('#ModalActualizar').modal('hide');")
             Alert("Contrato Actualizado Correctamente.")
         End If
+
         ObjContratos.Dispose()
         objGenerales.Dispose()
         ObjVentas.Dispose()