1. Virtual significa que esse método pode ser modificado TBASS = Classe Procedimento alerta; 2. Substitua modifique o método da classe pai com o mesmo nome Tchild1 = Classe (TBASS) Alerta de Substituição;
