Here are the formulas you asked for

Crystal syntax)
Formula 1:
name: @F_BRUTO
WITH CRYSTAL SYNTAX:
if Trim(Ucase({ado.DESCRIPTION_OPERATION_TYPE})) = 'PAGAMENTO' or
Trim(Ucase({ado.DESCRIPTION_OPERATION_TYPE})) = 'PAPA-FILA' or
Trim(Ucase({ado.DESCRIPTION_OPERATION_TYPE})) = 'VIOLAÇAO' or
Trim(Ucase({ado.DESCRIPTION_OPERATION_TYPE})) = 'PASSE MAIS' or
Trim(Ucase({ado.DESCRIPTION_OPERATION_TYPE})) = 'CARTÃO SEM CONT' or
Trim(Ucase({ado.DESCRIPTION_OPERATION_TYPE})) = 'VALE PEDAGIO' or
Trim(Ucase({ado.DESCRIPTION_OPERATION_TYPE})) = 'GRANDE USUARIO' or
Trim(Ucase({ado.DESCRIPTION_OPERATION_TYPE})) = 'ISSENTO' or
Trim(Ucase({ado.DESCRIPTION_OPERATION_TYPE})) = 'BONIF 50%' or
Trim(Ucase({ado.DESCRIPTION_OPERATION_TYPE})) = 'BONIF 75%' or
Trim(Ucase({ado.DESCRIPTION_OPERATION_TYPE})) = 'BONIF 90%' or
Trim(Ucase({ado.DESCRIPTION_OPERATION_TYPE})) = 'BONIF 25%' or
Trim(Ucase({ado.DESCRIPTION_OPERATION_TYPE})) = 'BONIF. ENCANTADO' or
Trim(Ucase({ado.DESCRIPTION_OPERATION_TYPE})) = 'BONIF. VAR FARROU' then ({ado.BRUTO} - {@F_ISENTO})
else 0
*************
FORMULA 2
NAME

F_CALCULADO
WITH CRYSTAL SYNTAX:
if Trim(Ucase({ado.DESCRIPTION_OPERATION_TYPE}))='PAGAMENTO' or
Trim(Ucase({ado.DESCRIPTION_OPERATION_TYPE}))='PAPA-FILA' or
Trim(Ucase({ado.DESCRIPTION_OPERATION_TYPE}))='PASSE MAIS' or
Trim(Ucase({ado.DESCRIPTION_OPERATION_TYPE}))='VALE PEDAGIO' or
Trim(Ucase({ado.DESCRIPTION_OPERATION_TYPE}))='BONIF 50%' or
Trim(Ucase({ado.DESCRIPTION_OPERATION_TYPE}))='BONIF 75%' or
Trim(Ucase({ado.DESCRIPTION_OPERATION_TYPE}))='BONIF 90%' or
Trim(Ucase({ado.DESCRIPTION_OPERATION_TYPE}))='BONIF 25%' then {ado.TOTAL}
else 0
*********
FORMULA 3
NAME: @F_ISENTO
WITH CRYSTAL SYNTAX:
IF TRIM({ado.DESCRIPTION_OPERATION_TYPE}) = 'AMBULANCIA' OR
TRIM({ado.DESCRIPTION_OPERATION_TYPE}) = 'BOMBEIRO' OR
TRIM({ado.DESCRIPTION_OPERATION_TYPE}) = 'POLICIA RODOVIARIA' OR
TRIM({ado.DESCRIPTION_OPERATION_TYPE}) = 'POLICIA CIVIL' OR
TRIM({ado.DESCRIPTION_OPERATION_TYPE}) = 'OFICIAL - MUNICIPIO' OR
TRIM({ado.DESCRIPTION_OPERATION_TYPE}) = 'FORCAS ARMADAS' OR
TRIM({ado.DESCRIPTION_OPERATION_TYPE}) = 'POLICIA MILITAR' THEN {ado.BRUTO}
ELSE 0
*********
FORMULA 4
NAME: @F_MONEDA
WITH CRYSTAL SYNTAX:
'(' + Trim ({ado.SYMBOL}) + ') ' + Trim ({ado.NAME})
*************
FORMULA 5
NAME: @F_TEORICO
WITH CRYSTAL SYNTAX:
if Trim(Ucase({ado.DESCRIPTION_OPERATION_TYPE})) = 'CONCESSIONARIA' then {ado.BRUTO}
else 0
****************