7 de enero de 2014

Borrar todas las tablas de un QVW

El siguiente script borra todas las tablas previamente cargadas

LET Cantidad_Tablas = NoOfTables();
do while Cantidad_Tablas > 0
    
LET Nombre_Tabla = TableName(0);
    
DROP Table $(Nombre_Tabla);
    
LET Cantidad_Tablas = NoOfTables();
LOOP


NOTA
Para guardar todas las tablas de un qvw en formato qvd o txt, ver nota publicada AQUI





No hay comentarios: