set verify off
define ccia='';

accept ccia prompt 'Compania? '

delete gen_periodo_rango
  where cod_cia='&ccia';

delete gen_periodo
  where cod_cia='&ccia';

delete gen_impuesto
  where cod_cia='&ccia';

delete gen_parametro
  where cod_cia='&ccia';


delete con_consec_asie
  where cod_cia='&ccia';

delete gen_oficina
  where cod_cia='&ccia';

delete inv_bodega
  where cod_cia='&ccia';

delete inv_consec_movtos
  where cod_cia='&ccia';

delete inv_concepmovto
  where cod_cia='&ccia';

delete inv_parametro
  where cod_cia='&ccia';

delete con_cuenta
  where cod_cia='&ccia';

delete con_clase_cta
  where cod_cia='&ccia';

delete con_parametro
  where cod_cia='&ccia';

delete gen_clie_agente
  where cod_cia='&ccia';

delete gen_funciones
  where cod_cia='&ccia';

delete gen_tipo_agente
  where cod_cia='&ccia';

delete gen_agente
  where cod_cia='&ccia';

delete gen_cliente
  where cod_cia='&ccia';

delete gen_sucursal
  where cod_cia='&ccia';

delete seg_grant
  where cod_cia='&ccia';

delete gen_compania
  where cod_cia='&ccia';
