Mira declara una variable local
Luego extraes la fecha con la fucnion extrac de la fecha.
y a dicha variable le asignas el valor que extariste.
Soluciones
1: Con un aconcion si el la varaible es un ejecutas el slq para el campo E01
Pero esta es mucho codigo
2

eclaras la variable de tipo smallint
Declare V smallint;
V := extract(day from 'now' /*o usas current_time_stamp*/)
/*puede que los nombred elas funciones estan mal escritas verificalas*/
eso te devuelve el dia;
luego haces un executeStatement de tu instruccion.
seria algo asi
excute ... 'E0'||V ...;
Lee un poco sobre exceutestatement
Ha La segunta forma solo es sosportada por firebird 1.5 de si no tienes este deberas usar la primero.