Genexus - Quitar una extensión desde la KB

Desde siempre actualizar la version de GX sobre una KB ha sido horriblemente dolorosos y aunque el proceso ha mejorado en estos 20 años nunca deja de doler y más cuando se combina con otras herramientas como el K2Btools. Agárrese compa, que si medio se descuida, sea caga en la KB… y bueno, pues me pasó.

Comienzo a actualizar una KB en Genexus 17U4 para pasarla a 17U6 pero había que actualizar también el K2Btools. Pues resulta que el webpanel designer se negó a funcionar. ¡Entonces regreso a la versión anterior y cagadal! ahora es que me aparece este error:

Pues no es que se encuentre mucha info al respecto, pero encontré alguito, lo voy a probar ahorita. Primero, ubiquemos la bas de datos de la KB. (ya saben la cosa esa que se crea con el nombre de la KB más el prefijo GX_KB_ + el nombre de la KB. Las tablas involucradas son:

Entity
EntityType
EntityVersion
EntityVersion
EntityVersionComposition
ModelCrossReference
ModelCrossReference
ModelEntityHistory
ModelEntityOutput
ModelEntityProperty
ModelEntityToTable
ModelEntityVersion

¿Ok, y ahora que hacemos con ellas? Pues primero ubiquemos en [Entity], el GUID

Select * FROM [GX_KB_DaraduTallas].[dbo].[Entity]
  Where [EntityGuid] = '78b3fa0e-174c-4b2b-8716-718167a428b5'

Luego Ubicamos el Nombre con que se graba en la base de datos

Select * FROM [GX_KB_DaraduTallas].[dbo].[EntityType]
Where [EntityTypeId] = 54

¡Bien! el nombre es DesingSystem, entonces ahora comenzamos a ejecutar este script:

delete from Entity where
 EntityTypeId = 
(select EntityTypeId from EntityType where EntityTypeName = 'DesignSystem')

 delete from EntityVersion where EntityTypeId = 
(select EntityTypeId from EntityType where EntityTypeName = 'DesignSystem') 

delete from EntityVersionComposition where ComponentEntityTypeId = 
(select EntityTypeId from EntityType where EntityTypeName = 'DesignSystem') 

delete from EntityVersionComposition where CompoundEntityTypeId = 
(select EntityTypeId from EntityType where EntityTypeName = 'DesignSystem') 

delete from ModelCrossReference where FromEntityTypeId = 
(select EntityTypeId from EntityType where EntityTypeName = 'DesignSystem') 

delete from ModelCrossReference where ToEntityTypeId = 
(select EntityTypeId from EntityType where EntityTypeName = 'DesignSystem') 

delete from ModelEntityHistory where EntityTypeId = 
(select EntityTypeId from EntityType where EntityTypeName = 'DesignSystem') 

delete from ModelEntityOutput where EntityTypeId = 
(select EntityTypeId from EntityType where EntityTypeName = 'DesignSystem') 

delete from ModelEntityProperty where EntityTypeId = 
(select EntityTypeId from EntityType where EntityTypeName = 'DesignSystem') 

delete from ModelEntityToTable where EntityTypeId = 
(select EntityTypeId from EntityType where EntityTypeName = 'DesignSystem') 

delete from ModelEntityVersion where EntityTypeId = 
(select EntityTypeId from EntityType where EntityTypeName = 'DesignSystem')

delete from EntityType where EntityTypeName = 'DesignSystem'

Ahh… pues ya se ejecutó… vamos a ver si quitamos el error del inicio…. En mi caso ¡Funcionó! Bueno, seguiré con probando la KB, si encuentro otro clavo les aviso…