Borrado de tablas vinculadas

[MaMu]

Necesito hacer un Borrado de tablas vinculadas, las cuales son:

 
id_tablaA
Acampo1
Acampo2
Acampo3
AFecha

relacionada por id_tablaA

 
id_tablaB
Bcampo1
id_tablaA
Bcampo2

Necesito borrar todos los registros de la tablaA cuyo año de fecha=2007, pero a su vez, que se eliminen de tablaB aquellos donde tablaA.id_tablaA = tablaB.id_tablaA

Estaría bien esto?

Código SQL [-]
sqlstr:='delete from tablaA where(Afecha)=2007 join tablaB where(tablaB.id_tablaA=tablaA.id_tablaA)';

Saludos

[MaMu]

SOLUCIONADO

La solucion era muy simple, lo que yo no tenia en cuenta era la forma referencial que admite la instruccion DELETE, por lo que, para el fin buscado, tenia que interpretar el borrado de un registro que se encontrase dentro de la existencia de una seleccion y sus criterios. Quedando resuelto como:

Código SQL [-]
 
delete from tablaB where exists (select * from tablaA where tablaB .id_tablaA =tablaA .id_tablaA and year(tablaA .Afecha)=2007)');

Saludos