Creation of Multiple Variables of same type at runtime

Question

Hi,
I have a requirement in which I need to create multiple variables at run time . The variables should be TRPE REF TO CL_GENIOS_VARIABLE. The number of variables required will be determined at run time based on the number of materials in a Bill of material. We are using these variables for some calculations as GENIOS is a SAP given code to solve linear equations.
Please help me on this. If some one can let me know how I can create field symbols dynamically with different name that will also help.

Answer 1

*       CLASS lcl_genios DEFINITION
CLASS lcl_genios DEFINITION.
   PUBLIC SECTION.
     METHODS : constructor.
     METHODS : create_model
                IMPORTING
                  i_name TYPE genios_name,
               create_variable
                  IMPORTING
                    i_type TYPE genios_variabletype DEFAULT if_genios_model_c=>gc_var_continuous
                    i_lowerbound TYPE genios_float DEFAULT 0
                    i_upperbound TYPE genios_float OPTIONAL
                    i_name TYPE genios_name.
   PRIVATE SECTION.
     DATA : lo_enviroment TYPE REF TO cl_genios_environment,
            lo_model TYPE REF TO cl_genios_model,
            lo_variable TYPE REF TO cl_genios_variable.
ENDCLASS.                    "lcl_genios DEFINITION
*       CLASS lcl_genios IMPLEMENTATION
CLASS lcl_genios IMPLEMENTATION.
   METHOD constructor.
     lo_enviroment ?= cl_genios_environment=>get_environment( ).
   ENDMETHOD.                    "constructor
   METHOD create_model.
     lo_model = lo_enviroment->create_model( 'DUMMY' ).
   ENDMETHOD.                    "create_model
   METHOD create_variable.
     lo_variable = lo_model->create_variable( iv_type       = i_type
                                              iv_lowerbound = i_lowerbound
                                              iv_upperbound = i_upperbound
                                              iv_name       = i_name       ).
   ENDMETHOD.                    "create_variable
ENDCLASS.                    "lcl_genios IMPLEMENTATION
DATA : lo_genios TYPE REF TO lcl_genios.
START-OF-SELECTION.
   CREATE OBJECT lo_genios.
   lo_genios->create_model( 'DUMMY' ).
   lo_genios->create_variable( i_lowerbound = 1
                               i_upperbound = 255
                               i_name = 'DUMMY' ).
You can create genios_variable like this.
and change this :
TYPES : Begin of lst_genios, 
                   genios TYPE REF TO cl_genios_variable, 
                End of lst_genios. 
like this :
TYPES : Begin of lst_genios, 
                   genios TYPE REF TO lcl_genios, 
                End of lst_genios. 
or you can create your table as Kartik example.