$TITULO Relatorio Idade por Faixa
$ENTRADA Faixa Inicial..................<N-02-D1>
$ENTRADA Faixa Final....................<N-02-D2>
$FILTROF SITUACAO= 0
$INDICEF NOME
$CABEC
$CABEC [E                                    ]  [D       ] [P   ]
$CABEC
$CABEC Codigo   Nome                                        Idade
$CORPO@[{INT((DATE()-FUNCIO->NASCIMENTO)/365)},=XID]
$CORPO$SE01 XID>=D1.AND.XID<=D2
$CORPO [F1   ]  [F3                                     ] [XID]@[1,+XTOT]
$CORPO$FIMSE01
$TOTAL
$TOTAL TOTAL FUNCIONARIOS IDADE ENTRE [D1]E [D2]ANOS:[XTOT,-XTOT]