begin
	FOR i IN (select ID_PERGUNTA from TB_GA_PERGUNTA where id_topico = 4849) LOOP
		insert into tb_ga_tipo_resposta (ID_PERGUNTA,NM_TIPO_RESPOSTA,IC_ATIVO) values (i.ID_PERGUNTA,'OK','S');
	END LOOP;
end;