Constructor Call BRF+ Function

method constructor.
data: ls_rule_check type zafw_rule_check,
lo_factory  type ref to if_fdt_factory,
lo_query    type ref to if_fdt_query,
lt_obj_ids  type if_fdt_types=>ts_object_id,
lv_appl_id  type if_fdt_types=>id.

ao_proto = io_proto.
if ao_proto is initial.
create object ao_proto.
endif.
av_fieldname = iv_fieldname.
select single * from zafw_rule_check into ls_rule_check
where fieldname = iv_fieldname.

* Factory für Applikation besorgen
lo_factory = cl_fdt_factory=>get_instance(  ).
* ID der Applikation besorgen
lo_query = lo_factory->get_query( iv_object_type = if_fdt_constants=>gc_object_type_application ).
lo_query->get_ids( exporting iv_name = ls_rule_check–brf_application importing ets_object_id = lt_obj_ids ).
if lines( lt_obj_ids ) = 1.
read table lt_obj_ids into lv_appl_id index 1.
endif.
* Factory für Function
lo_factory = cl_fdt_factory=>get_instance( iv_application_id = lv_appl_id  ).
lo_query = lo_factory->get_query( iv_object_type = if_fdt_constants=>gc_object_type_function ).
lo_query->get_ids( exporting iv_name = ls_rule_check–brf_function importing ets_object_id = lt_obj_ids ).
if lines( lt_obj_ids ) = 1.
read table lt_obj_ids into av_function index 1.
ao_function = lo_factory->get_function( av_function ).
endif.
endmethod.