Fórum Transações Aninhadas com dbExpress #274023

Saudações amigos
Gostaria de saber se alguém já trabalhou com transações aninhadas no Delphi com dbExpress e Firebird.
Tenho uma situação onde chamo duas rotinas para gravar em duas tabelas diferentes,exemplo:
GravaTab1();
GravaTab2();
nas duas rotinas eu crio uma transação para cada uma dessa forma:
TTrans.TransactionID := Trunc(1000*(Now));
TTrans.IsolationLevel := xilREADCOMMITTED;
conexão.StartTransaction(TTrans);

Só q agora preciso chamar essas duas rotinas em determinado momento, e preciso garantir a consistência dos dados. Ai esta o ponto que preciso criar uma transação ´master´ a qual seria dado um roolback se qq uma das transações das rotinas GravaTab1() ou GravaTab2() desses algum erro.
Como posso fazer???
Abraço a todos delphianos