[firebase-br] Ajuda em Select

[Marcos Alarcon]

Alguem no News sabe me dizer como faço essa select que foi feita no Access 
pra funcionar no Firebird?

SELECT IIF((PRM_TIPO = 'M'),
(SELECT DISTINCT(MUS_NOME)
FROM TB_MUSICAS
WHERE MUS_CODIGO = PROG.PRM_CODDISPOSITIVO),
(SELECT DISTINCT(VIN_NOME)
FROM TB_VINHETAS
WHERE VIN_CODIGO = PROG.PRM_CODDISPOSITIVO)), *
FROM TB_PROMUSICAL AS PROG;