From b4c7362b3e0645addf500564d6de449da293ebf2 Mon Sep 17 00:00:00 2001 From: CI Date: Wed, 4 Dec 2024 12:59:46 +0000 Subject: [PATCH] update base --- .../zcl_abapgit_apack_migration.clas.abap | 16 +- src/apack/zcl_abapgit_apack_reader.clas.abap | 6 +- src/apack/zcl_abapgit_apack_writer.clas.abap | 2 +- ...abapgit_apack_writer.clas.testclasses.abap | 18 +- .../zcl_abapgit_background.clas.abap | 4 +- .../zcl_abapgit_background_push_au.clas.abap | 4 +- .../zcl_abapgit_background_push_fi.clas.abap | 2 +- src/cts/zcl_abapgit_cts_api.clas.abap | 27 +- src/cts/zcl_abapgit_transport.clas.abap | 2 +- .../zcl_abapgit_transport_2_branch.clas.abap | 4 +- src/cts/zcl_abapgit_transport_mass.clas.abap | 2 +- ...it_transport_objects.clas.testclasses.abap | 4 +- ..._abapgit_data_config.clas.testclasses.abap | 6 +- ...it_data_deserializer.clas.testclasses.abap | 10 +- src/data/zcl_abapgit_data_factory.clas.abap | 8 +- ...pgit_data_serializer.clas.testclasses.abap | 4 +- ...apgit_data_supporter.clas.testclasses.abap | 4 +- ...t_abap_language_vers.clas.testclasses.abap | 12 +- src/env/zcl_abapgit_environment.clas.abap | 18 +- ..._abapgit_environment.clas.testclasses.abap | 2 +- src/env/zcl_abapgit_feature.clas.abap | 8 +- .../zcl_abapgit_feature.clas.testclasses.abap | 2 +- src/env/zcl_abapgit_settings.clas.abap | 4 +- src/env/zcl_abapgit_user_record.clas.abap | 2 +- src/exits/zcl_abapgit_exit.clas.abap | 6 +- .../v2/zcl_abapgit_gitv2_porcelain.clas.abap | 2 +- ...bapgit_git_add_patch.clas.testclasses.abap | 2 +- src/git/zcl_abapgit_git_commit.clas.abap | 9 +- src/git/zcl_abapgit_git_factory.clas.abap | 4 +- src/git/zcl_abapgit_git_pack.clas.abap | 2 +- ...zcl_abapgit_git_pack.clas.testclasses.abap | 2 +- src/git/zcl_abapgit_git_transport.clas.abap | 2 +- ...cl_abapgit_git_utils.clas.testclasses.abap | 2 +- src/git/zlib/zcl_abapgit_zlib.clas.abap | 12 +- ...abapgit_zlib_convert.clas.testclasses.abap | 2 +- ...abapgit_zlib_huffman.clas.testclasses.abap | 4 +- ..._abapgit_zlib_stream.clas.testclasses.abap | 2 +- .../zcl_abapgit_git_url.clas.testclasses.abap | 2 +- .../zcl_abapgit_pr_enumerator.clas.abap | 6 +- src/http/zcl_abapgit_http.clas.abap | 14 +- src/http/zcl_abapgit_http_agent.clas.abap | 6 +- ...cl_abapgit_http_agent.clas.locals_imp.abap | 8 +- .../zcl_abapgit_code_inspector.clas.abap | 8 +- .../zcl_abapgit_where_used_tools.clas.abap | 2 +- src/json/zcl_abapgit_ajson.clas.abap | 52 ++- .../zcl_abapgit_ajson.clas.locals_imp.abap | 25 +- .../zcl_abapgit_ajson.clas.testclasses.abap | 336 ++++++++---------- .../zcl_abapgit_ajson_filter_lib.clas.abap | 10 +- ...pgit_ajson_filter_lib.clas.locals_imp.abap | 19 +- src/json/zcl_abapgit_ajson_mapping.clas.abap | 20 +- ...abapgit_ajson_mapping.clas.locals_imp.abap | 14 +- .../zcl_abapgit_ajson_utilities.clas.abap | 15 +- ...pgit_ajson_utilities.clas.testclasses.abap | 24 +- src/json/zcx_abapgit_ajson_error.clas.abap | 2 +- ...abapgit_aff_registry.clas.testclasses.abap | 2 +- .../aff/zcl_abapgit_json_handler.clas.abap | 2 +- ..._abapgit_json_handler.clas.locals_imp.abap | 8 +- .../aff/zcl_abapgit_json_path.clas.abap | 2 +- ...zcl_abapgit_json_path.clas.locals_imp.abap | 22 +- ...cl_abapgit_json_path.clas.testclasses.abap | 8 +- .../zcl_abapgit_object_common_aff.clas.abap | 2 +- ...it_object_common_aff.clas.testclasses.abap | 4 +- ...abapgit_dependencies.clas.testclasses.abap | 2 +- .../zcl_abapgit_file_deserialize.clas.abap | 2 +- ...git_file_deserialize.clas.testclasses.abap | 6 +- .../core/zcl_abapgit_filename_logic.clas.abap | 16 +- ...apgit_filename_logic.clas.testclasses.abap | 4 +- .../core/zcl_abapgit_folder_logic.clas.abap | 2 +- ...abapgit_folder_logic.clas.testclasses.abap | 2 +- .../core/zcl_abapgit_item_graph.clas.abap | 12 +- ...l_abapgit_item_graph.clas.testclasses.abap | 4 +- .../zcl_abapgit_objects_activation.clas.abap | 36 +- ...t_objects_activation.clas.testclasses.abap | 2 +- ...bapgit_objects_check.clas.testclasses.abap | 2 +- .../core/zcl_abapgit_objects_files.clas.abap | 12 +- .../core/zcl_abapgit_serialize.clas.abap | 19 +- ...cl_abapgit_serialize.clas.testclasses.abap | 28 +- .../zcl_abapgit_ecatt_data_upload.clas.abap | 4 +- .../ecatt/zcl_abapgit_ecatt_helper.clas.abap | 2 +- .../zcl_abapgit_object_enho_hook.clas.abap | 4 +- .../jump/zcl_abapgit_adt_link.clas.abap | 4 +- .../jump/zcl_abapgit_gui_jumper.clas.abap | 15 +- src/objects/oo/zcl_abapgit_oo_base.clas.abap | 2 +- src/objects/oo/zcl_abapgit_oo_class.clas.abap | 4 +- .../oo/zcl_abapgit_oo_factory.clas.abap | 8 +- .../oo/zcl_abapgit_oo_interface.clas.abap | 4 +- ...bapgit_oo_serializer.clas.testclasses.abap | 2 +- .../rules/zcl_abapgit_field_rules.clas.abap | 2 +- ..._abapgit_field_rules.clas.testclasses.abap | 2 +- .../sap/zcl_abapgit_function_module.clas.abap | 4 +- .../sap/zcl_abapgit_sap_namespace.clas.abap | 8 +- .../sap/zcl_abapgit_sap_package.clas.abap | 8 +- .../tabl/zcl_abapgit_object_tabl.clas.abap | 26 +- .../zcl_abapgit_object_tabl_compar.clas.abap | 15 +- ...pgit_object_tabl_ddl.clas.testclasses.abap | 4 +- .../texts/zcl_abapgit_i18n_params.clas.abap | 16 +- .../texts/zcl_abapgit_longtexts.clas.abap | 4 +- ...cl_abapgit_longtexts.clas.testclasses.abap | 2 +- .../texts/zcl_abapgit_lxe_texts.clas.abap | 9 +- .../texts/zcl_abapgit_po_file.clas.abap | 4 +- .../zcl_abapgit_po_file.clas.testclasses.abap | 14 +- .../zcl_abapgit_properties_file.clas.abap | 2 +- ...pgit_properties_file.clas.testclasses.abap | 2 +- src/objects/zcl_abapgit_object_acid.clas.abap | 4 +- src/objects/zcl_abapgit_object_aqbg.clas.abap | 6 +- src/objects/zcl_abapgit_object_aqqu.clas.abap | 6 +- src/objects/zcl_abapgit_object_aqsg.clas.abap | 6 +- src/objects/zcl_abapgit_object_asfc.clas.abap | 4 +- src/objects/zcl_abapgit_object_auth.clas.abap | 8 +- src/objects/zcl_abapgit_object_avar.clas.abap | 4 +- src/objects/zcl_abapgit_object_avas.clas.abap | 9 +- src/objects/zcl_abapgit_object_char.clas.abap | 12 +- src/objects/zcl_abapgit_object_chdo.clas.abap | 30 +- src/objects/zcl_abapgit_object_cmod.clas.abap | 24 +- src/objects/zcl_abapgit_object_cus0.clas.abap | 4 +- src/objects/zcl_abapgit_object_cus1.clas.abap | 7 +- src/objects/zcl_abapgit_object_cus2.clas.abap | 4 +- src/objects/zcl_abapgit_object_ddls.clas.abap | 17 +- src/objects/zcl_abapgit_object_devc.clas.abap | 14 +- src/objects/zcl_abapgit_object_dial.clas.abap | 13 +- src/objects/zcl_abapgit_object_doct.clas.abap | 9 +- src/objects/zcl_abapgit_object_docv.clas.abap | 4 +- src/objects/zcl_abapgit_object_doma.clas.abap | 30 +- src/objects/zcl_abapgit_object_dsys.clas.abap | 8 +- src/objects/zcl_abapgit_object_dtel.clas.abap | 14 +- src/objects/zcl_abapgit_object_ecat.clas.abap | 4 +- src/objects/zcl_abapgit_object_ecsd.clas.abap | 4 +- src/objects/zcl_abapgit_object_ecsp.clas.abap | 4 +- src/objects/zcl_abapgit_object_ectc.clas.abap | 4 +- src/objects/zcl_abapgit_object_ectd.clas.abap | 4 +- src/objects/zcl_abapgit_object_ecvo.clas.abap | 4 +- src/objects/zcl_abapgit_object_enho.clas.abap | 22 +- src/objects/zcl_abapgit_object_enhs.clas.abap | 4 +- src/objects/zcl_abapgit_object_enqu.clas.abap | 14 +- src/objects/zcl_abapgit_object_fdt0.clas.abap | 21 +- src/objects/zcl_abapgit_object_form.clas.abap | 11 +- src/objects/zcl_abapgit_object_fugr.clas.abap | 34 +- src/objects/zcl_abapgit_object_g4ba.clas.abap | 6 +- src/objects/zcl_abapgit_object_g4bs.clas.abap | 6 +- src/objects/zcl_abapgit_object_idoc.clas.abap | 11 +- src/objects/zcl_abapgit_object_iext.clas.abap | 7 +- src/objects/zcl_abapgit_object_intf.clas.abap | 4 +- ...l_abapgit_object_intf.clas.locals_imp.abap | 12 +- ..._abapgit_object_intf.clas.testclasses.abap | 12 +- src/objects/zcl_abapgit_object_iobj.clas.abap | 12 +- src/objects/zcl_abapgit_object_iwmo.clas.abap | 6 +- src/objects/zcl_abapgit_object_iwom.clas.abap | 6 +- src/objects/zcl_abapgit_object_iwpr.clas.abap | 6 +- src/objects/zcl_abapgit_object_iwsg.clas.abap | 6 +- src/objects/zcl_abapgit_object_iwsv.clas.abap | 6 +- src/objects/zcl_abapgit_object_iwvb.clas.abap | 6 +- src/objects/zcl_abapgit_object_msag.clas.abap | 34 +- src/objects/zcl_abapgit_object_nrob.clas.abap | 20 +- src/objects/zcl_abapgit_object_nspc.clas.abap | 24 +- src/objects/zcl_abapgit_object_oa2p.clas.abap | 9 +- src/objects/zcl_abapgit_object_odso.clas.abap | 14 +- src/objects/zcl_abapgit_object_otgr.clas.abap | 6 +- src/objects/zcl_abapgit_object_para.clas.abap | 4 +- ...l_abapgit_object_pdts.clas.locals_imp.abap | 4 +- ..._abapgit_object_pdts.clas.testclasses.abap | 4 +- .../zcl_abapgit_object_pdxx_super.clas.abap | 4 +- ...it_object_pdxx_super.clas.testclasses.abap | 8 +- src/objects/zcl_abapgit_object_pers.clas.abap | 9 +- src/objects/zcl_abapgit_object_pinf.clas.abap | 10 +- src/objects/zcl_abapgit_object_prog.clas.abap | 4 +- src/objects/zcl_abapgit_object_scp1.clas.abap | 4 +- src/objects/zcl_abapgit_object_scvi.clas.abap | 4 +- src/objects/zcl_abapgit_object_sfpf.clas.abap | 9 +- src/objects/zcl_abapgit_object_sfpi.clas.abap | 4 +- src/objects/zcl_abapgit_object_shi3.clas.abap | 49 +-- src/objects/zcl_abapgit_object_shi5.clas.abap | 12 +- src/objects/zcl_abapgit_object_shlp.clas.abap | 26 +- src/objects/zcl_abapgit_object_shma.clas.abap | 9 +- src/objects/zcl_abapgit_object_sicf.clas.abap | 24 +- src/objects/zcl_abapgit_object_smim.clas.abap | 9 +- src/objects/zcl_abapgit_object_sobj.clas.abap | 10 +- src/objects/zcl_abapgit_object_splo.clas.abap | 4 +- src/objects/zcl_abapgit_object_sppf.clas.abap | 4 +- src/objects/zcl_abapgit_object_sprx.clas.abap | 4 +- src/objects/zcl_abapgit_object_sqsc.clas.abap | 8 +- src/objects/zcl_abapgit_object_srvb.clas.abap | 4 +- src/objects/zcl_abapgit_object_srvd.clas.abap | 4 +- src/objects/zcl_abapgit_object_ssfo.clas.abap | 20 +- src/objects/zcl_abapgit_object_ssst.clas.abap | 31 +- src/objects/zcl_abapgit_object_styl.clas.abap | 4 +- src/objects/zcl_abapgit_object_sucu.clas.abap | 4 +- src/objects/zcl_abapgit_object_susc.clas.abap | 4 +- src/objects/zcl_abapgit_object_sush.clas.abap | 4 +- src/objects/zcl_abapgit_object_suso.clas.abap | 34 +- src/objects/zcl_abapgit_object_sxci.clas.abap | 8 +- src/objects/zcl_abapgit_object_sxsd.clas.abap | 4 +- src/objects/zcl_abapgit_object_tobj.clas.abap | 11 +- src/objects/zcl_abapgit_object_tran.clas.abap | 34 +- ..._abapgit_object_tran.clas.testclasses.abap | 4 +- src/objects/zcl_abapgit_object_ttyp.clas.abap | 4 +- src/objects/zcl_abapgit_object_udmo.clas.abap | 28 +- src/objects/zcl_abapgit_object_ueno.clas.abap | 6 +- src/objects/zcl_abapgit_object_vcls.clas.abap | 35 +- src/objects/zcl_abapgit_object_view.clas.abap | 33 +- src/objects/zcl_abapgit_object_wapa.clas.abap | 9 +- src/objects/zcl_abapgit_object_wdca.clas.abap | 26 +- src/objects/zcl_abapgit_object_wdcc.clas.abap | 23 +- src/objects/zcl_abapgit_object_wdya.clas.abap | 6 +- src/objects/zcl_abapgit_object_wdyn.clas.abap | 61 ++-- src/objects/zcl_abapgit_object_webi.clas.abap | 2 +- src/objects/zcl_abapgit_object_xinx.clas.abap | 4 +- src/objects/zcl_abapgit_object_xslt.clas.abap | 4 +- src/objects/zcl_abapgit_objects.clas.abap | 32 +- .../zcl_abapgit_objects.clas.testclasses.abap | 4 +- .../zcl_abapgit_objects_factory.clas.abap | 2 +- .../zcl_abapgit_objects_generic.clas.abap | 26 +- ...pgit_objects_generic.clas.testclasses.abap | 24 +- .../zcl_abapgit_objects_program.clas.abap | 32 +- ...pgit_objects_program.clas.testclasses.abap | 16 +- .../zcl_abapgit_persist_factory.clas.abap | 6 +- .../zcl_abapgit_persist_migrate.clas.abap | 25 +- ...apgit_persist_migrate.clas.locals_imp.abap | 6 +- .../zcl_abapgit_persist_packages.clas.abap | 6 +- .../zcl_abapgit_persist_settings.clas.abap | 2 +- .../zcl_abapgit_persistence_db.clas.abap | 2 +- .../zcl_abapgit_persistence_repo.clas.abap | 9 +- .../zcl_abapgit_persistence_user.clas.abap | 24 +- ...t_object_filter_tran.clas.testclasses.abap | 2 +- src/repo/stage/zcl_abapgit_merge.clas.abap | 18 +- .../zcl_abapgit_repo_item_state.clas.abap | 14 +- ...pgit_repo_item_state.clas.testclasses.abap | 4 +- .../utils/zcl_abapgit_repo_news.clas.abap | 32 +- ...cl_abapgit_repo_news.clas.testclasses.abap | 8 +- src/repo/utils/zcl_abapgit_zip.clas.abap | 10 +- src/repo/zcl_abapgit_dot_abapgit.clas.abap | 4 +- src/repo/zcl_abapgit_repo.clas.abap | 26 +- .../zcl_abapgit_repo.clas.testclasses.abap | 2 +- ...apgit_repo_checksums.clas.testclasses.abap | 30 +- .../zcl_abapgit_repo_content_list.clas.abap | 10 +- .../zcl_abapgit_repo_cs_migration.clas.abap | 2 +- src/repo/zcl_abapgit_repo_srv.clas.abap | 6 +- src/repo/zcl_abapgit_repo_status.clas.abap | 17 +- ...l_abapgit_repo_status.clas.locals_imp.abap | 2 +- ..._abapgit_repo_status.clas.testclasses.abap | 41 +-- src/syntax/zcl_abapgit_syntax_abap.clas.abap | 9 +- ..._abapgit_syntax_abap.clas.testclasses.abap | 6 +- src/syntax/zcl_abapgit_syntax_css.clas.abap | 7 +- .../zcl_abapgit_syntax_factory.clas.abap | 12 +- .../zcl_abapgit_syntax_highlighter.clas.abap | 13 +- src/syntax/zcl_abapgit_syntax_js.clas.abap | 7 +- ..._abapgit_syntax_json.clas.testclasses.abap | 2 +- ...l_abapgit_syntax_xml.clas.testclasses.abap | 6 +- .../zcl_abapgit_gui_page_template.clas.abap | 2 +- src/ui/core/zcl_abapgit_gui.clas.abap | 12 +- .../zcl_abapgit_gui_asset_manager.clas.abap | 2 +- .../zcl_abapgit_gui_css_processor.clas.abap | 2 +- ...it_gui_css_processor.clas.testclasses.abap | 2 +- src/ui/core/zcl_abapgit_gui_event.clas.abap | 10 +- ...cl_abapgit_gui_event.clas.testclasses.abap | 18 +- .../core/zcl_abapgit_gui_hotkey_ctl.clas.abap | 4 +- .../zcl_abapgit_gui_html_processor.clas.abap | 10 +- ...t_gui_html_processor.clas.testclasses.abap | 4 +- ...cl_abapgit_gui_utils.clas.testclasses.abap | 8 +- src/ui/core/zcl_abapgit_html.clas.abap | 10 +- .../zcl_abapgit_html.clas.testclasses.abap | 6 +- ...l_abapgit_html_parts.clas.testclasses.abap | 8 +- .../zcl_abapgit_html_viewer_gui.clas.abap | 4 +- src/ui/flow/zcl_abapgit_flow_exit.clas.abap | 2 +- .../flow/zcl_abapgit_gui_page_flow.clas.abap | 16 +- ...abapgit_gui_page_flow.clas.locals_imp.abap | 6 +- .../zcl_abapgit_exception_viewer.clas.abap | 2 +- .../lib/zcl_abapgit_gui_chunk_lib.clas.abap | 40 +-- ...bapgit_gui_chunk_lib.clas.testclasses.abap | 8 +- .../zcl_abapgit_gui_in_page_modal.clas.abap | 10 +- src/ui/lib/zcl_abapgit_gui_menus.clas.abap | 40 +-- src/ui/lib/zcl_abapgit_gui_page.clas.abap | 20 +- src/ui/lib/zcl_abapgit_gui_page_hoc.clas.abap | 4 +- src/ui/lib/zcl_abapgit_gui_picklist.clas.abap | 4 +- src/ui/lib/zcl_abapgit_html_form.clas.abap | 4 +- .../lib/zcl_abapgit_html_form_utils.clas.abap | 30 +- ...pgit_html_form_utils.clas.testclasses.abap | 2 +- src/ui/lib/zcl_abapgit_html_table.clas.abap | 8 +- ...l_abapgit_html_table.clas.testclasses.abap | 8 +- src/ui/lib/zcl_abapgit_html_toolbar.clas.abap | 8 +- src/ui/lib/zcl_abapgit_log_viewer.clas.abap | 6 +- .../zcl_abapgit_gui_page_code_insp.clas.abap | 19 +- .../codi/zcl_abapgit_gui_page_runit.clas.abap | 6 +- .../zcl_abapgit_gui_page_syntax.clas.abap | 4 +- .../zcl_abapgit_gui_page_whereused.clas.abap | 8 +- .../db/zcl_abapgit_gui_page_db.clas.abap | 10 +- .../zcl_abapgit_gui_page_db_entry.clas.abap | 14 +- .../zcl_abapgit_gui_page_addofflin.clas.abap | 8 +- .../zcl_abapgit_gui_page_addonline.clas.abap | 10 +- .../zcl_abapgit_gui_page_sett_bckg.clas.abap | 12 +- .../zcl_abapgit_gui_page_sett_glob.clas.abap | 39 +- .../zcl_abapgit_gui_page_sett_info.clas.abap | 6 +- .../zcl_abapgit_gui_page_sett_locl.clas.abap | 38 +- .../zcl_abapgit_gui_page_sett_pers.clas.abap | 30 +- .../zcl_abapgit_gui_page_sett_remo.clas.abap | 16 +- ...t_gui_page_sett_remo.clas.testclasses.abap | 10 +- .../zcl_abapgit_gui_page_sett_repo.clas.abap | 23 +- .../zcl_abapgit_gui_page_commit.clas.abap | 16 +- .../pages/zcl_abapgit_gui_page_data.clas.abap | 16 +- .../zcl_abapgit_gui_page_debuginfo.clas.abap | 24 +- .../pages/zcl_abapgit_gui_page_diff.clas.abap | 8 +- .../zcl_abapgit_gui_page_diff_base.clas.abap | 87 ++--- .../zcl_abapgit_gui_page_ex_object.clas.abap | 8 +- .../zcl_abapgit_gui_page_ex_pckage.clas.abap | 8 +- .../zcl_abapgit_gui_page_merge.clas.abap | 14 +- .../zcl_abapgit_gui_page_merge_res.clas.abap | 26 +- .../zcl_abapgit_gui_page_merge_sel.clas.abap | 6 +- .../zcl_abapgit_gui_page_patch.clas.abap | 18 +- .../pages/zcl_abapgit_gui_page_pull.clas.abap | 12 +- .../zcl_abapgit_gui_page_repo_over.clas.abap | 28 +- .../zcl_abapgit_gui_page_repo_view.clas.abap | 55 ++- .../zcl_abapgit_gui_page_run_bckg.clas.abap | 4 +- .../zcl_abapgit_gui_page_stage.clas.abap | 28 +- .../pages/zcl_abapgit_gui_page_tags.clas.abap | 8 +- .../zcl_abapgit_gui_page_tutorial.clas.abap | 6 +- .../zcl_abapgit_popup_branch_list.clas.abap | 12 +- .../zcl_abapgit_popup_code_insp.clas.abap | 8 +- .../zcl_abapgit_popup_pull_request.clas.abap | 8 +- .../zcl_abapgit_popup_tag_list.clas.abap | 8 +- .../progress/zcl_abapgit_progress.clas.abap | 2 +- .../routing/zcl_abapgit_gui_router.clas.abap | 11 +- .../zcl_abapgit_services_repo.clas.abap | 4 +- ...bapgit_services_repo.clas.testclasses.abap | 8 +- ...it_frontend_services.clas.testclasses.abap | 2 +- src/ui/zcl_abapgit_popups.clas.abap | 57 ++- .../zcl_abapgit_popups.clas.locals_imp.abap | 19 +- src/ui/zcl_abapgit_ui_factory.clas.abap | 26 +- ...l_abapgit_ui_injector.clas.locals_imp.abap | 2 +- ..._abapgit_ui_injector.clas.testclasses.abap | 2 +- src/utils/zcl_abapgit_convert.clas.abap | 7 +- src/utils/zcl_abapgit_diff.clas.abap | 4 +- .../zcl_abapgit_diff.clas.testclasses.abap | 10 +- src/utils/zcl_abapgit_log.clas.abap | 4 +- .../zcl_abapgit_log.clas.testclasses.abap | 10 +- src/utils/zcl_abapgit_path.clas.abap | 15 +- src/utils/zcl_abapgit_string_buffer.clas.abap | 2 +- src/utils/zcl_abapgit_string_map.clas.abap | 10 +- src/utils/zcl_abapgit_timer.clas.abap | 4 +- src/utils/zcl_abapgit_utils.clas.abap | 8 +- src/xml/zcl_abapgit_xml.clas.testclasses.abap | 2 +- ...cl_abapgit_xml_input.clas.testclasses.abap | 16 +- ...l_abapgit_xml_output.clas.testclasses.abap | 4 +- src/xml/zcl_abapgit_xml_pretty.clas.abap | 4 +- ...l_abapgit_xml_pretty.clas.testclasses.abap | 2 +- src/zabapgit_forms.prog.abap | 19 +- src/zcl_abapgit_factory.clas.abap | 24 +- ...zcl_abapgit_injector.clas.testclasses.abap | 2 +- ...cx_abapgit_exception.clas.testclasses.abap | 8 +- 347 files changed, 1708 insertions(+), 2440 deletions(-) diff --git a/src/apack/zcl_abapgit_apack_migration.clas.abap b/src/apack/zcl_abapgit_apack_migration.clas.abap index 5a603f531..bdc8f1755 100644 --- a/src/apack/zcl_abapgit_apack_migration.clas.abap +++ b/src/apack/zcl_abapgit_apack_migration.clas.abap @@ -124,10 +124,9 @@ CLASS zcl_abapgit_apack_migration IMPLEMENTATION. METHOD add_intf_source_and_activate. - TYPES temp1 TYPE TABLE OF dwinactiv. -DATA: ls_clskey TYPE seoclskey, + DATA: ls_clskey TYPE seoclskey, ls_inactive_object TYPE dwinactiv, - lt_inactive_objects TYPE temp1. + lt_inactive_objects TYPE TABLE OF dwinactiv. ls_clskey-clsname = zif_abapgit_apack_definitions=>c_apack_interface_cust. @@ -245,9 +244,7 @@ DATA: ls_clskey TYPE seoclskey, SELECT SINGLE clsname FROM seoclass INTO lv_interface_name WHERE clsname = zif_abapgit_apack_definitions=>c_apack_interface_cust. - DATA temp1 TYPE xsdboolean. - temp1 = boolc( sy-subrc = 0 ). - rv_interface_exists = temp1. + rv_interface_exists = xsdbool( sy-subrc = 0 ). ENDMETHOD. @@ -257,9 +254,8 @@ DATA: ls_clskey TYPE seoclskey, FIELD-SYMBOLS: TYPE i. ASSIGN (zif_abapgit_apack_definitions=>c_apack_interface_cust)=>('CO_INTERFACE_VERSION') TO . - DATA temp2 TYPE xsdboolean. - temp2 = boolc( IS ASSIGNED AND >= c_apack_interface_version ). - rv_interface_valid = temp2. + rv_interface_valid = xsdbool( IS ASSIGNED + AND >= c_apack_interface_version ). ENDMETHOD. @@ -279,7 +275,7 @@ DATA: ls_clskey TYPE seoclskey, DATA: lo_apack_migration TYPE REF TO zcl_abapgit_apack_migration. - CREATE OBJECT lo_apack_migration. + lo_apack_migration = NEW #( ). lo_apack_migration->perform_migration( ). ENDMETHOD. diff --git a/src/apack/zcl_abapgit_apack_reader.clas.abap b/src/apack/zcl_abapgit_apack_reader.clas.abap index beae63fe1..8666bff74 100644 --- a/src/apack/zcl_abapgit_apack_reader.clas.abap +++ b/src/apack/zcl_abapgit_apack_reader.clas.abap @@ -145,7 +145,7 @@ CLASS zcl_abapgit_apack_reader IMPLEMENTATION. IF sy-subrc <> 0. ls_instance-package = iv_package_name. - CREATE OBJECT ls_instance-instance EXPORTING iv_package_name = iv_package_name. + ls_instance-instance = NEW #( iv_package_name = iv_package_name ). INSERT ls_instance INTO TABLE gt_instances. ENDIF. @@ -245,9 +245,7 @@ CLASS zcl_abapgit_apack_reader IMPLEMENTATION. ls_returned_manifest = get_manifest_descriptor( ). - DATA temp1 TYPE xsdboolean. - temp1 = boolc( ls_returned_manifest IS NOT INITIAL ). - rv_has_manifest = temp1. + rv_has_manifest = xsdbool( ls_returned_manifest IS NOT INITIAL ). ENDMETHOD. diff --git a/src/apack/zcl_abapgit_apack_writer.clas.abap b/src/apack/zcl_abapgit_apack_writer.clas.abap index b818ea887..7df13be47 100644 --- a/src/apack/zcl_abapgit_apack_writer.clas.abap +++ b/src/apack/zcl_abapgit_apack_writer.clas.abap @@ -35,7 +35,7 @@ CLASS zcl_abapgit_apack_writer IMPLEMENTATION. METHOD create_instance. - CREATE OBJECT ro_manifest_writer EXPORTING is_apack_manifest_descriptor = is_apack_manifest_descriptor. + ro_manifest_writer = NEW #( is_apack_manifest_descriptor = is_apack_manifest_descriptor ). ENDMETHOD. diff --git a/src/apack/zcl_abapgit_apack_writer.clas.testclasses.abap b/src/apack/zcl_abapgit_apack_writer.clas.testclasses.abap index 168993402..065afe7c9 100644 --- a/src/apack/zcl_abapgit_apack_writer.clas.testclasses.abap +++ b/src/apack/zcl_abapgit_apack_writer.clas.testclasses.abap @@ -21,22 +21,16 @@ CLASS ltcl_apack_manifest_writer IMPLEMENTATION. lv_actual_xml = lo_manifest_writer->serialize( ). cl_abap_unit_assert=>assert_not_initial( lv_actual_xml ). - DATA temp1 TYPE xsdboolean. - temp1 = boolc( contains( val = lv_actual_xml - sub = 'abapGit' ) ). - lv_bool = temp1. + lv_bool = xsdbool( contains( val = lv_actual_xml + sub = 'abapGit' ) ). cl_abap_unit_assert=>assert_equals( act = lv_bool exp = abap_true ). - DATA temp2 TYPE xsdboolean. - temp2 = boolc( contains( val = lv_actual_xml - sub = 'github.com/larshp' ) ). - lv_bool = temp2. + lv_bool = xsdbool( contains( val = lv_actual_xml + sub = 'github.com/larshp' ) ). cl_abap_unit_assert=>assert_equals( act = lv_bool exp = abap_true ). - DATA temp3 TYPE xsdboolean. - temp3 = boolc( contains( val = lv_actual_xml - sub = 'abapGit' ) ). - lv_bool = temp3. + lv_bool = xsdbool( contains( val = lv_actual_xml + sub = 'abapGit' ) ). cl_abap_unit_assert=>assert_equals( act = lv_bool exp = abap_true ). ENDMETHOD. diff --git a/src/background/zcl_abapgit_background.clas.abap b/src/background/zcl_abapgit_background.clas.abap index 5812f2aed..effb37393 100644 --- a/src/background/zcl_abapgit_background.clas.abap +++ b/src/background/zcl_abapgit_background.clas.abap @@ -152,13 +152,13 @@ CLASS ZCL_ABAPGIT_BACKGROUND IMPLEMENTATION. RETURN. ENDTRY. - CREATE OBJECT lo_per. + lo_per = NEW #( ). lt_list = lo_per->list( ). WRITE: / 'Background mode'. LOOP AT lt_list ASSIGNING . - CREATE OBJECT li_log TYPE zcl_abapgit_log. + li_log = NEW zcl_abapgit_log( ). TRY. lo_repo ?= zcl_abapgit_repo_srv=>get_instance( )->get( -key ). diff --git a/src/background/zcl_abapgit_background_push_au.clas.abap b/src/background/zcl_abapgit_background_push_au.clas.abap index 97e9c65a7..7fc6c808c 100644 --- a/src/background/zcl_abapgit_background_push_au.clas.abap +++ b/src/background/zcl_abapgit_background_push_au.clas.abap @@ -132,7 +132,7 @@ CLASS zcl_abapgit_background_push_au IMPLEMENTATION. * Fill user details ls_comment-committer = determine_user_details( lv_changed_by ). - CREATE OBJECT lo_stage. + lo_stage = NEW #( ). CLEAR ls_user_files. @@ -193,7 +193,7 @@ CLASS zcl_abapgit_background_push_au IMPLEMENTATION. ASSERT lines( is_files-remote ) > 0. - CREATE OBJECT lo_stage. + lo_stage = NEW #( ). ls_comment-comment = 'BG: Deletion'. diff --git a/src/background/zcl_abapgit_background_push_fi.clas.abap b/src/background/zcl_abapgit_background_push_fi.clas.abap index d1d49911e..2fb0f36ff 100644 --- a/src/background/zcl_abapgit_background_push_fi.clas.abap +++ b/src/background/zcl_abapgit_background_push_fi.clas.abap @@ -77,7 +77,7 @@ CLASS zcl_abapgit_background_push_fi IMPLEMENTATION. ASSERT lines( ls_files-local ) > 0 OR lines( ls_files-remote ) > 0. - CREATE OBJECT lo_stage. + lo_stage = NEW #( ). LOOP AT ls_files-local ASSIGNING . mi_log->add_info( |stage: { -file-path } { -file-filename }| ). diff --git a/src/cts/zcl_abapgit_cts_api.clas.abap b/src/cts/zcl_abapgit_cts_api.clas.abap index b9ede31f7..6ee2e1a7a 100644 --- a/src/cts/zcl_abapgit_cts_api.clas.abap +++ b/src/cts/zcl_abapgit_cts_api.clas.abap @@ -173,9 +173,7 @@ CLASS zcl_abapgit_cts_api IMPLEMENTATION. zcx_abapgit_exception=>raise_t100( ). ENDIF. - DATA temp1 TYPE xsdboolean. - temp1 = boolc( lv_lock_flag <> space ). - rv_locked = temp1. + rv_locked = xsdbool( lv_lock_flag <> space ). ENDMETHOD. @@ -193,9 +191,7 @@ CLASS zcl_abapgit_cts_api IMPLEMENTATION. IMPORTING pe_result = lv_type_check_result. - DATA temp2 TYPE xsdboolean. - temp2 = boolc( lv_type_check_result = 'L' ). - rv_lockable = temp2. + rv_lockable = xsdbool( lv_type_check_result = 'L' ). ENDMETHOD. @@ -213,9 +209,7 @@ CLASS zcl_abapgit_cts_api IMPLEMENTATION. IMPORTING pe_result = lv_type_check_result. - DATA temp3 TYPE xsdboolean. - temp3 = boolc( lv_type_check_result CA 'RTL' OR iv_object_type = 'TABU' ). - rv_transportable = temp3. + rv_transportable = xsdbool( lv_type_check_result CA 'RTL' OR iv_object_type = 'TABU' ). ENDMETHOD. @@ -348,8 +342,7 @@ CLASS zcl_abapgit_cts_api IMPLEMENTATION. METHOD zif_abapgit_cts_api~create_transport_entries. DATA lt_tables TYPE tredt_objects. - TYPES temp1 TYPE STANDARD TABLE OF e071k. -DATA lt_table_keys TYPE temp1. + DATA lt_table_keys TYPE STANDARD TABLE OF e071k. DATA lv_with_dialog TYPE abap_bool. FIELD-SYMBOLS LIKE LINE OF lt_tables. @@ -439,8 +432,7 @@ DATA lt_table_keys TYPE temp1. METHOD zif_abapgit_cts_api~get_transports_for_list. DATA lv_request TYPE trkorr. - TYPES temp2 TYPE SORTED TABLE OF tlock WITH NON-UNIQUE KEY object hikey. -DATA lt_tlock TYPE temp2. + DATA lt_tlock TYPE SORTED TABLE OF tlock WITH NON-UNIQUE KEY object hikey. DATA ls_object_key TYPE e071. DATA lv_type_check_result TYPE c LENGTH 1. DATA ls_lock_key TYPE tlock_int. @@ -562,8 +554,7 @@ DATA lt_tlock TYPE temp2. trfunction TYPE e070-trfunction, strkorr TYPE e070-strkorr, END OF ty_e070. - TYPES temp3 TYPE STANDARD TABLE OF ty_e070 WITH DEFAULT KEY. -DATA lt_e070 TYPE temp3. + DATA lt_e070 TYPE STANDARD TABLE OF ty_e070 WITH DEFAULT KEY. * find all tasks first SELECT trkorr trfunction strkorr @@ -594,10 +585,8 @@ DATA lt_e070 TYPE temp3. obj_name TYPE e071-obj_name, END OF ty_contents. - TYPES temp4 TYPE STANDARD TABLE OF trkorr WITH DEFAULT KEY. -DATA lt_tasks TYPE temp4. - TYPES temp5 TYPE STANDARD TABLE OF ty_contents WITH DEFAULT KEY. -DATA lt_contents TYPE temp5. + DATA lt_tasks TYPE STANDARD TABLE OF trkorr WITH DEFAULT KEY. + DATA lt_contents TYPE STANDARD TABLE OF ty_contents WITH DEFAULT KEY. DATA ls_contents LIKE LINE OF lt_contents. DATA ls_list LIKE LINE OF rt_list. diff --git a/src/cts/zcl_abapgit_transport.clas.abap b/src/cts/zcl_abapgit_transport.clas.abap index 2b1af43fd..2e0f363ff 100644 --- a/src/cts/zcl_abapgit_transport.clas.abap +++ b/src/cts/zcl_abapgit_transport.clas.abap @@ -305,7 +305,7 @@ CLASS ZCL_ABAPGIT_TRANSPORT IMPLEMENTATION. lv_message TYPE string. FIELD-SYMBOLS: TYPE sprot_u. - CREATE OBJECT li_log TYPE zcl_abapgit_log EXPORTING iv_title = iv_title. + li_log = NEW zcl_abapgit_log( iv_title = iv_title ). LOOP AT it_log ASSIGNING . diff --git a/src/cts/zcl_abapgit_transport_2_branch.clas.abap b/src/cts/zcl_abapgit_transport_2_branch.clas.abap index 8717487e4..1cb67c59a 100644 --- a/src/cts/zcl_abapgit_transport_2_branch.clas.abap +++ b/src/cts/zcl_abapgit_transport_2_branch.clas.abap @@ -48,7 +48,7 @@ CLASS zcl_abapgit_transport_2_branch IMPLEMENTATION. io_repository->create_branch( lv_branch_name ). - CREATE OBJECT lo_stage. + lo_stage = NEW #( ). ls_stage_objects = zcl_abapgit_factory=>get_stage_logic( )->get( io_repository ). @@ -76,7 +76,7 @@ CLASS zcl_abapgit_transport_2_branch IMPLEMENTATION. METHOD stage_transport_objects. DATA lo_transport_objects TYPE REF TO zcl_abapgit_transport_objects. - CREATE OBJECT lo_transport_objects EXPORTING it_transport_objects = it_transport_objects. + lo_transport_objects = NEW #( it_transport_objects = it_transport_objects ). lo_transport_objects->to_stage( io_stage = io_stage diff --git a/src/cts/zcl_abapgit_transport_mass.clas.abap b/src/cts/zcl_abapgit_transport_mass.clas.abap index b3c4e326c..d7d65160e 100644 --- a/src/cts/zcl_abapgit_transport_mass.clas.abap +++ b/src/cts/zcl_abapgit_transport_mass.clas.abap @@ -40,7 +40,7 @@ CLASS zcl_abapgit_transport_mass IMPLEMENTATION. ENDIF. * Instantiate transport zipper object that will also create the timestamped output folder - CREATE OBJECT lo_transport_zipper TYPE lcl_transport_zipper EXPORTING iv_folder = lv_folder. + lo_transport_zipper = NEW lcl_transport_zipper( iv_folder = lv_folder ). * Generate the local zip files from the given list of transport requests lo_transport_zipper->generate_files( diff --git a/src/cts/zcl_abapgit_transport_objects.clas.testclasses.abap b/src/cts/zcl_abapgit_transport_objects.clas.testclasses.abap index aec35aa66..9cf409e57 100644 --- a/src/cts/zcl_abapgit_transport_objects.clas.testclasses.abap +++ b/src/cts/zcl_abapgit_transport_objects.clas.testclasses.abap @@ -57,7 +57,7 @@ ENDCLASS. CLASS ltcl_transport_objects IMPLEMENTATION. METHOD setup. - CREATE OBJECT mo_stage. + mo_stage = NEW #( ). ENDMETHOD. METHOD add_new_to_local_files. @@ -308,7 +308,7 @@ CLASS ltcl_transport_objects IMPLEMENTATION. ENDMETHOD. METHOD when_staging. - CREATE OBJECT mo_transport_objects EXPORTING it_transport_objects = mt_transport_objects. + mo_transport_objects = NEW #( it_transport_objects = mt_transport_objects ). mo_transport_objects->to_stage( io_stage = mo_stage is_stage_objects = ms_stage_objects diff --git a/src/data/zcl_abapgit_data_config.clas.testclasses.abap b/src/data/zcl_abapgit_data_config.clas.testclasses.abap index 291778a63..c3be633a0 100644 --- a/src/data/zcl_abapgit_data_config.clas.testclasses.abap +++ b/src/data/zcl_abapgit_data_config.clas.testclasses.abap @@ -38,7 +38,7 @@ CLASS ltcl_test IMPLEMENTATION. DATA li_config TYPE REF TO zif_abapgit_data_config. DATA ls_config TYPE zif_abapgit_data_config=>ty_config. - CREATE OBJECT li_config TYPE zcl_abapgit_data_config. + li_config = NEW zcl_abapgit_data_config( ). ls_config-name = 'HELLO'. ls_config-type = zif_abapgit_data_config=>c_data_type-tabu. @@ -64,7 +64,7 @@ CLASS ltcl_test IMPLEMENTATION. DATA lv_json TYPE string. - CREATE OBJECT li_config TYPE zcl_abapgit_data_config. + li_config = NEW zcl_abapgit_data_config( ). li_config->add_config( ms_config ). lt_files = li_config->to_json( ). @@ -92,7 +92,7 @@ CLASS ltcl_test IMPLEMENTATION. DATA li_config TYPE REF TO zif_abapgit_data_config. - CREATE OBJECT li_config TYPE zcl_abapgit_data_config. + li_config = NEW zcl_abapgit_data_config( ). li_config->from_json( it_files ). diff --git a/src/data/zcl_abapgit_data_deserializer.clas.testclasses.abap b/src/data/zcl_abapgit_data_deserializer.clas.testclasses.abap index ce9da092b..4e15bb8e6 100644 --- a/src/data/zcl_abapgit_data_deserializer.clas.testclasses.abap +++ b/src/data/zcl_abapgit_data_deserializer.clas.testclasses.abap @@ -21,8 +21,8 @@ CLASS ltcl_test IMPLEMENTATION. DATA lt_files TYPE zif_abapgit_git_definitions=>ty_files_tt. DATA ls_config TYPE zif_abapgit_data_config=>ty_config. - CREATE OBJECT li_cut TYPE zcl_abapgit_data_deserializer. - CREATE OBJECT li_config TYPE zcl_abapgit_data_config. + li_cut = NEW zcl_abapgit_data_deserializer( ). + li_config = NEW zcl_abapgit_data_config( ). ls_config-type = zif_abapgit_data_config=>c_data_type-tabu. ls_config-name = 'T100'. @@ -70,7 +70,7 @@ CLASS ltcl_test IMPLEMENTATION. ls_t100-text = |abapGit aunit test|. INSERT ls_t100 INTO TABLE . - CREATE OBJECT li_cut TYPE zcl_abapgit_data_deserializer. + li_cut = NEW zcl_abapgit_data_deserializer( ). ls_result = li_cut->preview_database_changes( iv_name = ls_config-name ir_db_data = lr_db_data @@ -138,7 +138,7 @@ CLASS ltcl_test IMPLEMENTATION. ls_t100-text = |abapGit aunit test UPDATE|. INSERT ls_t100 INTO TABLE . - CREATE OBJECT li_cut TYPE zcl_abapgit_data_deserializer. + li_cut = NEW zcl_abapgit_data_deserializer( ). ls_result = li_cut->preview_database_changes( iv_name = ls_config-name ir_db_data = lr_db_data @@ -200,7 +200,7 @@ CLASS ltcl_test IMPLEMENTATION. ls_t100-text = |abapGit aunit test DELETE|. INSERT ls_t100 INTO TABLE . - CREATE OBJECT li_cut TYPE zcl_abapgit_data_deserializer. + li_cut = NEW zcl_abapgit_data_deserializer( ). ls_result = li_cut->preview_database_changes( iv_name = ls_config-name ir_db_data = lr_db_data diff --git a/src/data/zcl_abapgit_data_factory.clas.abap b/src/data/zcl_abapgit_data_factory.clas.abap index 42533cffd..69a6acb6c 100644 --- a/src/data/zcl_abapgit_data_factory.clas.abap +++ b/src/data/zcl_abapgit_data_factory.clas.abap @@ -31,14 +31,14 @@ CLASS zcl_abapgit_data_factory IMPLEMENTATION. METHOD get_config. - CREATE OBJECT ri_config TYPE zcl_abapgit_data_config. + ri_config = NEW zcl_abapgit_data_config( ). ENDMETHOD. METHOD get_deserializer. IF gi_deserializer IS INITIAL. - CREATE OBJECT gi_deserializer TYPE zcl_abapgit_data_deserializer. + gi_deserializer = NEW zcl_abapgit_data_deserializer( ). ENDIF. ri_deserializer = gi_deserializer. @@ -49,7 +49,7 @@ CLASS zcl_abapgit_data_factory IMPLEMENTATION. METHOD get_serializer. IF gi_serializer IS INITIAL. - CREATE OBJECT gi_serializer TYPE zcl_abapgit_data_serializer. + gi_serializer = NEW zcl_abapgit_data_serializer( ). ENDIF. ri_serializer = gi_serializer. @@ -60,7 +60,7 @@ CLASS zcl_abapgit_data_factory IMPLEMENTATION. METHOD get_supporter. IF gi_supporter IS INITIAL. - CREATE OBJECT gi_supporter TYPE zcl_abapgit_data_supporter. + gi_supporter = NEW zcl_abapgit_data_supporter( ). ENDIF. ri_supporter = gi_supporter. diff --git a/src/data/zcl_abapgit_data_serializer.clas.testclasses.abap b/src/data/zcl_abapgit_data_serializer.clas.testclasses.abap index 8fa5c1caa..bed13a762 100644 --- a/src/data/zcl_abapgit_data_serializer.clas.testclasses.abap +++ b/src/data/zcl_abapgit_data_serializer.clas.testclasses.abap @@ -18,8 +18,8 @@ ENDCLASS. CLASS ltcl_test IMPLEMENTATION. METHOD setup. - CREATE OBJECT mi_cut TYPE zcl_abapgit_data_serializer. - CREATE OBJECT mi_config TYPE zcl_abapgit_data_config. + mi_cut = NEW zcl_abapgit_data_serializer( ). + mi_config = NEW zcl_abapgit_data_config( ). ENDMETHOD. METHOD serialize. diff --git a/src/data/zcl_abapgit_data_supporter.clas.testclasses.abap b/src/data/zcl_abapgit_data_supporter.clas.testclasses.abap index 82c5a0d03..8066335ee 100644 --- a/src/data/zcl_abapgit_data_supporter.clas.testclasses.abap +++ b/src/data/zcl_abapgit_data_supporter.clas.testclasses.abap @@ -50,8 +50,8 @@ CLASS ltcl_supporter IMPLEMENTATION. DATA lv_act TYPE abap_bool. " Mock sets table T005 to be supported - CREATE OBJECT lo_mock. - CREATE OBJECT lo_inject. + lo_mock = NEW #( ). + lo_inject = NEW #( ). lo_inject->set_supporter( lo_mock ). lv_act = zcl_abapgit_data_factory=>get_supporter( )->is_object_supported( diff --git a/src/env/zcl_abapgit_abap_language_vers.clas.testclasses.abap b/src/env/zcl_abapgit_abap_language_vers.clas.testclasses.abap index 1e2df9364..e347ea7a4 100644 --- a/src/env/zcl_abapgit_abap_language_vers.clas.testclasses.abap +++ b/src/env/zcl_abapgit_abap_language_vers.clas.testclasses.abap @@ -58,7 +58,7 @@ ENDCLASS. CLASS lcl_persist_settings IMPLEMENTATION. METHOD constructor. - CREATE OBJECT mo_settings. + mo_settings = NEW #( ). ENDMETHOD. METHOD zif_abapgit_persist_settings~modify. @@ -131,10 +131,10 @@ ENDCLASS. CLASS ltcl_abap_language_version IMPLEMENTATION. METHOD setup. - CREATE OBJECT mo_environment. + mo_environment = NEW #( ). zcl_abapgit_injector=>set_environment( mo_environment ). - CREATE OBJECT mi_persistency TYPE lcl_persist_settings. + mi_persistency = NEW lcl_persist_settings( ). zcl_abapgit_persist_injector=>set_settings( mi_persistency ). APPEND zif_abapgit_dot_abapgit=>c_abap_language_version-undefined TO mt_versions. @@ -150,7 +150,7 @@ CLASS ltcl_abap_language_version IMPLEMENTATION. mo_dot_abapgit = zcl_abapgit_dot_abapgit=>build_default( ). mo_dot_abapgit->set_abap_language_version( iv_abap_language_version ). - CREATE OBJECT mo_cut EXPORTING io_dot_abapgit = mo_dot_abapgit. + mo_cut = NEW #( io_dot_abapgit = mo_dot_abapgit ). ENDMETHOD. METHOD set_environment. @@ -417,9 +417,7 @@ CLASS ltcl_abap_language_version IMPLEMENTATION. clskey = ls_clskey EXCEPTIONS OTHERS = 1. - DATA temp1 TYPE xsdboolean. - temp1 = boolc( sy-subrc = 0 ). - mv_has_language_cfg = temp1. + mv_has_language_cfg = xsdbool( sy-subrc = 0 ). LOOP AT mt_versions INTO lv_version. diff --git a/src/env/zcl_abapgit_environment.clas.abap b/src/env/zcl_abapgit_environment.clas.abap index 1b9dfbd5e..2fcc4e257 100644 --- a/src/env/zcl_abapgit_environment.clas.abap +++ b/src/env/zcl_abapgit_environment.clas.abap @@ -67,9 +67,11 @@ CLASS zcl_abapgit_environment IMPLEMENTATION. " Changes to repository objects are not permitted in this client (TK 729) " Shadow system " Running upgrade - DATA temp1 TYPE xsdboolean. - temp1 = boolc( lv_systemedit <> 'N' AND lv_sys_cliinddep_edit NA '23' AND lv_is_shadow <> abap_true AND lv_is_upgrade <> abap_true ). - rv_result = temp1. + rv_result = xsdbool( + lv_systemedit <> 'N' AND + lv_sys_cliinddep_edit NA '23' AND + lv_is_shadow <> abap_true AND + lv_is_upgrade <> abap_true ). ENDMETHOD. @@ -200,16 +202,14 @@ CLASS zcl_abapgit_environment IMPLEMENTATION. METHOD zif_abapgit_environment~is_variant_maintenance. - TYPES temp1 TYPE STANDARD TABLE OF rsdynnr WITH NON-UNIQUE DEFAULT KEY. -DATA: - lt_variscreens TYPE temp1. + DATA: + lt_variscreens TYPE STANDARD TABLE OF rsdynnr + WITH NON-UNIQUE DEFAULT KEY. " Memory is set in LSVARF08 / EXPORT_SCREEN_TABLES. IMPORT variscreens = lt_variscreens FROM MEMORY ID '%_SCRNR_%'. - DATA temp2 TYPE xsdboolean. - temp2 = boolc( lines( lt_variscreens ) > 0 ). - rv_is_variant_maintenance = temp2. + rv_is_variant_maintenance = xsdbool( lines( lt_variscreens ) > 0 ). ENDMETHOD. diff --git a/src/env/zcl_abapgit_environment.clas.testclasses.abap b/src/env/zcl_abapgit_environment.clas.testclasses.abap index b544e1195..da574c41c 100644 --- a/src/env/zcl_abapgit_environment.clas.testclasses.abap +++ b/src/env/zcl_abapgit_environment.clas.testclasses.abap @@ -24,7 +24,7 @@ CLASS ltcl_test IMPLEMENTATION. METHOD setup. - CREATE OBJECT mi_cut TYPE zcl_abapgit_environment. + mi_cut = NEW zcl_abapgit_environment( ). ENDMETHOD. diff --git a/src/env/zcl_abapgit_feature.clas.abap b/src/env/zcl_abapgit_feature.clas.abap index 4cdaed06c..b1dc2a59b 100644 --- a/src/env/zcl_abapgit_feature.clas.abap +++ b/src/env/zcl_abapgit_feature.clas.abap @@ -36,16 +36,12 @@ CLASS zcl_abapgit_feature IMPLEMENTATION. lv_features = zcl_abapgit_persist_factory=>get_settings( )->read( )->get_experimental_features( ). CONDENSE lv_features NO-GAPS. - DATA temp1 TYPE xsdboolean. - temp1 = boolc( lv_features = abap_true ). - rv_run = temp1. + rv_run = xsdbool( lv_features = abap_true ). IF iv_feature IS NOT INITIAL. SPLIT lv_features AT ',' INTO TABLE lt_features. READ TABLE lt_features TRANSPORTING NO FIELDS WITH TABLE KEY table_line = iv_feature. - DATA temp2 TYPE xsdboolean. - temp2 = boolc( rv_run = abap_true OR sy-subrc = 0 ). - rv_run = temp2. + rv_run = xsdbool( rv_run = abap_true OR sy-subrc = 0 ). ENDIF. ENDMETHOD. diff --git a/src/env/zcl_abapgit_feature.clas.testclasses.abap b/src/env/zcl_abapgit_feature.clas.testclasses.abap index 006bafe09..39a90edae 100644 --- a/src/env/zcl_abapgit_feature.clas.testclasses.abap +++ b/src/env/zcl_abapgit_feature.clas.testclasses.abap @@ -17,7 +17,7 @@ ENDCLASS. CLASS ltcl_feature IMPLEMENTATION. METHOD setup. - CREATE OBJECT mo_cut. + mo_cut = NEW #( ). mo_settings = zcl_abapgit_persist_factory=>get_settings( )->read( ). ENDMETHOD. diff --git a/src/env/zcl_abapgit_settings.clas.abap b/src/env/zcl_abapgit_settings.clas.abap index f6738c3a1..bda21eebd 100644 --- a/src/env/zcl_abapgit_settings.clas.abap +++ b/src/env/zcl_abapgit_settings.clas.abap @@ -290,7 +290,7 @@ CLASS zcl_abapgit_settings IMPLEMENTATION. DATA: li_output TYPE REF TO zif_abapgit_xml_output. - CREATE OBJECT li_output TYPE zcl_abapgit_xml_output. + li_output = NEW zcl_abapgit_xml_output( ). li_output->add( iv_name = zcl_abapgit_persistence_db=>c_type_settings ig_data = ms_settings ). @@ -492,7 +492,7 @@ CLASS zcl_abapgit_settings IMPLEMENTATION. DATA: lo_input TYPE REF TO zif_abapgit_xml_input. - CREATE OBJECT lo_input TYPE zcl_abapgit_xml_input EXPORTING iv_xml = iv_settings_xml. + lo_input = NEW zcl_abapgit_xml_input( iv_xml = iv_settings_xml ). CLEAR ms_settings. diff --git a/src/env/zcl_abapgit_user_record.clas.abap b/src/env/zcl_abapgit_user_record.clas.abap index 54080e9c3..e4bd92e7f 100644 --- a/src/env/zcl_abapgit_user_record.clas.abap +++ b/src/env/zcl_abapgit_user_record.clas.abap @@ -151,7 +151,7 @@ CLASS zcl_abapgit_user_record IMPLEMENTATION. IF sy-subrc = 0. ro_user = -o_user. ELSE. - CREATE OBJECT ro_user EXPORTING iv_user = iv_user. + ro_user = NEW #( iv_user = iv_user ). ENDIF. ENDMETHOD. diff --git a/src/exits/zcl_abapgit_exit.clas.abap b/src/exits/zcl_abapgit_exit.clas.abap index c286c7eb9..2c875ed8a 100644 --- a/src/exits/zcl_abapgit_exit.clas.abap +++ b/src/exits/zcl_abapgit_exit.clas.abap @@ -52,7 +52,7 @@ CLASS zcl_abapgit_exit IMPLEMENTATION. ENDTRY. ENDIF. - CREATE OBJECT gi_global_exit TYPE zcl_abapgit_exit. " this class + gi_global_exit = NEW zcl_abapgit_exit( ). " this class ri_exit = gi_global_exit. @@ -76,9 +76,7 @@ CLASS zcl_abapgit_exit IMPLEMENTATION. EXCEPTIONS type_not_found = 1 OTHERS = 2 ). - DATA temp1 TYPE xsdboolean. - temp1 = boolc( sy-subrc = 0 ). - rv_running_in_test_context = temp1. + rv_running_in_test_context = xsdbool( sy-subrc = 0 ). ENDMETHOD. diff --git a/src/git/v2/zcl_abapgit_gitv2_porcelain.clas.abap b/src/git/v2/zcl_abapgit_gitv2_porcelain.clas.abap index 2b88e82b8..da5599e72 100644 --- a/src/git/v2/zcl_abapgit_gitv2_porcelain.clas.abap +++ b/src/git/v2/zcl_abapgit_gitv2_porcelain.clas.abap @@ -185,7 +185,7 @@ CLASS ZCL_ABAPGIT_GITV2_PORCELAIN IMPLEMENTATION. " add dummy packet so the v1 branch parsing can be reused lv_data = |0004\n{ zcl_abapgit_convert=>xstring_to_string_utf8( lv_xstring ) }|. - CREATE OBJECT ro_list EXPORTING iv_data = lv_data. + ro_list = NEW #( iv_data = lv_data ). ENDMETHOD. diff --git a/src/git/zcl_abapgit_git_add_patch.clas.testclasses.abap b/src/git/zcl_abapgit_git_add_patch.clas.testclasses.abap index 07f5c1885..699b8b8a5 100644 --- a/src/git/zcl_abapgit_git_add_patch.clas.testclasses.abap +++ b/src/git/zcl_abapgit_git_add_patch.clas.testclasses.abap @@ -665,7 +665,7 @@ CLASS ltcl_calculate_patch IMPLEMENTATION. DATA: lo_git_add_patch TYPE REF TO zcl_abapgit_git_add_patch. - CREATE OBJECT lo_git_add_patch EXPORTING it_diff = mt_diff. + lo_git_add_patch = NEW #( it_diff = mt_diff ). TRY. mt_patch = lo_git_add_patch->get_patch( ). diff --git a/src/git/zcl_abapgit_git_commit.clas.abap b/src/git/zcl_abapgit_git_commit.clas.abap index 23373bcaa..c076e83c7 100644 --- a/src/git/zcl_abapgit_git_commit.clas.abap +++ b/src/git/zcl_abapgit_git_commit.clas.abap @@ -221,9 +221,7 @@ CLASS zcl_abapgit_git_commit IMPLEMENTATION. READ TABLE it_commits TRANSPORTING NO FIELDS WITH KEY sha1 = iv_sha1. - DATA temp1 TYPE xsdboolean. - temp1 = boolc( sy-subrc <> 0 ). - rv_result = temp1. + rv_result = xsdbool( sy-subrc <> 0 ). ENDIF. @@ -232,9 +230,8 @@ CLASS zcl_abapgit_git_commit IMPLEMENTATION. METHOD parse_commits. - TYPES temp1 TYPE STANDARD TABLE OF string WITH DEFAULT KEY. -DATA: ls_commit TYPE zif_abapgit_git_definitions=>ty_commit, - lt_body TYPE temp1, + DATA: ls_commit TYPE zif_abapgit_git_definitions=>ty_commit, + lt_body TYPE STANDARD TABLE OF string WITH DEFAULT KEY, ls_raw TYPE zcl_abapgit_git_pack=>ty_commit. FIELD-SYMBOLS: LIKE LINE OF it_objects, diff --git a/src/git/zcl_abapgit_git_factory.clas.abap b/src/git/zcl_abapgit_git_factory.clas.abap index c6f558f9e..bb745e144 100644 --- a/src/git/zcl_abapgit_git_factory.clas.abap +++ b/src/git/zcl_abapgit_git_factory.clas.abap @@ -25,14 +25,14 @@ ENDCLASS. CLASS zcl_abapgit_git_factory IMPLEMENTATION. METHOD get_v2_porcelain. - CREATE OBJECT ri_v2 TYPE zcl_abapgit_gitv2_porcelain. + ri_v2 = NEW zcl_abapgit_gitv2_porcelain( ). ENDMETHOD. METHOD get_git_transport. IF gi_git_transport IS INITIAL. - CREATE OBJECT gi_git_transport TYPE zcl_abapgit_git_transport. + gi_git_transport = NEW zcl_abapgit_git_transport( ). ENDIF. ri_git_transport = gi_git_transport. diff --git a/src/git/zcl_abapgit_git_pack.clas.abap b/src/git/zcl_abapgit_git_pack.clas.abap index c9a6cb681..1847e8818 100644 --- a/src/git/zcl_abapgit_git_pack.clas.abap +++ b/src/git/zcl_abapgit_git_pack.clas.abap @@ -527,7 +527,7 @@ CLASS zcl_abapgit_git_pack IMPLEMENTATION. FIELD-SYMBOLS: LIKE LINE OF ct_objects. - CREATE OBJECT lo_stream EXPORTING iv_data = is_object-data. + lo_stream = NEW #( iv_data = is_object-data ). * find base READ TABLE ct_objects ASSIGNING diff --git a/src/git/zcl_abapgit_git_pack.clas.testclasses.abap b/src/git/zcl_abapgit_git_pack.clas.testclasses.abap index fcfe52e0b..1a0b65b0a 100644 --- a/src/git/zcl_abapgit_git_pack.clas.testclasses.abap +++ b/src/git/zcl_abapgit_git_pack.clas.testclasses.abap @@ -282,7 +282,7 @@ CLASS ltcl_pack IMPLEMENTATION. METHOD setup. DATA lo_progress_double TYPE REF TO ltcl_progress_double. - CREATE OBJECT lo_progress_double TYPE ltcl_progress_double. + lo_progress_double = NEW ltcl_progress_double( ). zcl_abapgit_progress=>set_instance( lo_progress_double ). ENDMETHOD. diff --git a/src/git/zcl_abapgit_git_transport.clas.abap b/src/git/zcl_abapgit_git_transport.clas.abap index c5b54f905..b516c3dc6 100644 --- a/src/git/zcl_abapgit_git_transport.clas.abap +++ b/src/git/zcl_abapgit_git_transport.clas.abap @@ -144,7 +144,7 @@ CLASS zcl_abapgit_git_transport IMPLEMENTATION. lv_data = eo_client->get_cdata( ). - CREATE OBJECT eo_branch_list EXPORTING iv_data = lv_data. + eo_branch_list = NEW #( iv_data = lv_data ). ENDMETHOD. diff --git a/src/git/zcl_abapgit_git_utils.clas.testclasses.abap b/src/git/zcl_abapgit_git_utils.clas.testclasses.abap index 5f559f8af..8a50cf3eb 100644 --- a/src/git/zcl_abapgit_git_utils.clas.testclasses.abap +++ b/src/git/zcl_abapgit_git_utils.clas.testclasses.abap @@ -14,7 +14,7 @@ ENDCLASS. CLASS ltcl_git_utils IMPLEMENTATION. METHOD setup. - CREATE OBJECT mo_cut. + mo_cut = NEW #( ). ENDMETHOD. METHOD get_null. diff --git a/src/git/zlib/zcl_abapgit_zlib.clas.abap b/src/git/zlib/zcl_abapgit_zlib.clas.abap index 7189fe3ce..e3ccff65c 100644 --- a/src/git/zlib/zcl_abapgit_zlib.clas.abap +++ b/src/git/zlib/zcl_abapgit_zlib.clas.abap @@ -142,7 +142,7 @@ CLASS zcl_abapgit_zlib IMPLEMENTATION. ENDIF. CLEAR gv_out. - CREATE OBJECT go_stream EXPORTING iv_data = iv_compressed. + go_stream = NEW #( iv_data = iv_compressed ). DO. lv_bfinal = go_stream->take_bits( 1 ). @@ -225,7 +225,7 @@ CLASS zcl_abapgit_zlib IMPLEMENTATION. = go_stream->take_int( 3 ). ENDDO. - CREATE OBJECT go_lencode EXPORTING it_lengths = lt_lengths. + go_lencode = NEW #( it_lengths = lt_lengths ). CLEAR lt_lengths. WHILE lines( lt_lengths ) < lv_nlen + lv_ndist. @@ -254,9 +254,9 @@ CLASS zcl_abapgit_zlib IMPLEMENTATION. DELETE lt_lengths FROM lv_nlen + 1. DELETE lt_dists TO lv_nlen. - CREATE OBJECT go_lencode EXPORTING it_lengths = lt_lengths. + go_lencode = NEW #( it_lengths = lt_lengths ). - CREATE OBJECT go_distcode EXPORTING it_lengths = lt_dists. + go_distcode = NEW #( it_lengths = lt_dists ). ENDMETHOD. @@ -279,14 +279,14 @@ CLASS zcl_abapgit_zlib IMPLEMENTATION. APPEND 8 TO lt_lengths. ENDDO. - CREATE OBJECT go_lencode EXPORTING it_lengths = lt_lengths. + go_lencode = NEW #( it_lengths = lt_lengths ). CLEAR lt_lengths. DO c_maxdcodes TIMES. APPEND 5 TO lt_lengths. ENDDO. - CREATE OBJECT go_distcode EXPORTING it_lengths = lt_lengths. + go_distcode = NEW #( it_lengths = lt_lengths ). ENDMETHOD. diff --git a/src/git/zlib/zcl_abapgit_zlib_convert.clas.testclasses.abap b/src/git/zlib/zcl_abapgit_zlib_convert.clas.testclasses.abap index 130e0cbb0..db87b22e4 100644 --- a/src/git/zlib/zcl_abapgit_zlib_convert.clas.testclasses.abap +++ b/src/git/zlib/zcl_abapgit_zlib_convert.clas.testclasses.abap @@ -18,7 +18,7 @@ ENDCLASS. CLASS ltcl_test IMPLEMENTATION. METHOD setup. - CREATE OBJECT mo_cut. + mo_cut = NEW #( ). ENDMETHOD. METHOD bits_to_int. diff --git a/src/git/zlib/zcl_abapgit_zlib_huffman.clas.testclasses.abap b/src/git/zlib/zcl_abapgit_zlib_huffman.clas.testclasses.abap index c8594e9ce..ca6a7dd8b 100644 --- a/src/git/zlib/zcl_abapgit_zlib_huffman.clas.testclasses.abap +++ b/src/git/zlib/zcl_abapgit_zlib_huffman.clas.testclasses.abap @@ -18,7 +18,7 @@ CLASS ltcl_test IMPLEMENTATION. APPEND 8 TO lt_lengths. ENDDO. - CREATE OBJECT lo_huffman EXPORTING it_lengths = lt_lengths. + lo_huffman = NEW #( it_lengths = lt_lengths ). ENDMETHOD. @@ -41,7 +41,7 @@ CLASS ltcl_test IMPLEMENTATION. APPEND 8 TO lt_lengths. ENDDO. - CREATE OBJECT lo_huffman EXPORTING it_lengths = lt_lengths. + lo_huffman = NEW #( it_lengths = lt_lengths ). ENDMETHOD. diff --git a/src/git/zlib/zcl_abapgit_zlib_stream.clas.testclasses.abap b/src/git/zlib/zcl_abapgit_zlib_stream.clas.testclasses.abap index 037e5e827..42e1b1676 100644 --- a/src/git/zlib/zcl_abapgit_zlib_stream.clas.testclasses.abap +++ b/src/git/zlib/zcl_abapgit_zlib_stream.clas.testclasses.abap @@ -20,7 +20,7 @@ CLASS ltcl_test IMPLEMENTATION. lv_bytes TYPE xstring. - CREATE OBJECT lo_stream EXPORTING iv_data = '112233445566'. + lo_stream = NEW #( iv_data = '112233445566' ). lv_bits = lo_stream->take_bits( 8 ). diff --git a/src/git_platform/zcl_abapgit_git_url.clas.testclasses.abap b/src/git_platform/zcl_abapgit_git_url.clas.testclasses.abap index 36b2112ea..7cee498d4 100644 --- a/src/git_platform/zcl_abapgit_git_url.clas.testclasses.abap +++ b/src/git_platform/zcl_abapgit_git_url.clas.testclasses.abap @@ -27,7 +27,7 @@ CLASS ltcl_repo_online IMPLEMENTATION. FIELD-SYMBOLS TYPE ty_show_url_test. - CREATE OBJECT lo_cut. + lo_cut = NEW #( ). ls_provider_urls-repo_url = |https://github.com/abapGit/abapGit.git|. ls_provider_urls-show_url = |https://github.com/abapGit/abapGit/commit/{ lv_testhash }|. diff --git a/src/git_platform/zcl_abapgit_pr_enumerator.clas.abap b/src/git_platform/zcl_abapgit_pr_enumerator.clas.abap index 459fa2246..a54cdf4a4 100644 --- a/src/git_platform/zcl_abapgit_pr_enumerator.clas.abap +++ b/src/git_platform/zcl_abapgit_pr_enumerator.clas.abap @@ -72,8 +72,8 @@ CLASS zcl_abapgit_pr_enumerator IMPLEMENTATION. val = lv_repo regex = '\.git$' with = '' ). - CREATE OBJECT ri_provider TYPE zcl_abapgit_pr_enum_github EXPORTING iv_user_and_repo = |{ lv_user }/{ lv_repo }| - ii_http_agent = li_agent. + ri_provider = NEW zcl_abapgit_pr_enum_github( iv_user_and_repo = |{ lv_user }/{ lv_repo }| + ii_http_agent = li_agent ). ELSE. zcx_abapgit_exception=>raise( |PR enumeration is not supported for { iv_repo_url }| ). ENDIF. @@ -95,6 +95,6 @@ CLASS zcl_abapgit_pr_enumerator IMPLEMENTATION. METHOD new. - CREATE OBJECT ro_instance EXPORTING iv_url = iv_url. + ro_instance = NEW #( iv_url = iv_url ). ENDMETHOD. ENDCLASS. diff --git a/src/http/zcl_abapgit_http.clas.abap b/src/http/zcl_abapgit_http.clas.abap index 96f40b8a8..91a48eeea 100644 --- a/src/http/zcl_abapgit_http.clas.abap +++ b/src/http/zcl_abapgit_http.clas.abap @@ -118,9 +118,9 @@ CLASS zcl_abapgit_http IMPLEMENTATION. WHEN c_scheme-digest. * https://en.wikipedia.org/wiki/Digest_access_authentication * e.g. used by https://www.gerritcodereview.com/ - CREATE OBJECT lo_digest EXPORTING ii_client = ii_client - iv_username = lv_user - iv_password = lv_pass. + lo_digest = NEW #( ii_client = ii_client + iv_username = lv_user + iv_password = lv_pass ). lo_digest->run( ii_client ). io_client->set_digest( lo_digest ). WHEN OTHERS. @@ -162,7 +162,7 @@ CLASS zcl_abapgit_http IMPLEMENTATION. li_client = get_http_client( iv_url ). - CREATE OBJECT ro_client EXPORTING ii_client = li_client. + ro_client = NEW #( ii_client = li_client ). IF is_local_system( iv_url ) = abap_true. li_client->send_sap_logon_ticket( ). @@ -295,7 +295,7 @@ CLASS zcl_abapgit_http IMPLEMENTATION. lv_proxy_service TYPE string, lo_proxy_configuration TYPE REF TO zcl_abapgit_proxy_config. - CREATE OBJECT lo_proxy_configuration. + lo_proxy_configuration = NEW #( ). ri_client = zcl_abapgit_exit=>get_instance( )->create_http_client( iv_url ). @@ -368,9 +368,7 @@ CLASS zcl_abapgit_http IMPLEMENTATION. FIND REGEX 'https?://([^/^:]*)' IN iv_url SUBMATCHES lv_host. READ TABLE lt_list WITH KEY table_line = lv_host TRANSPORTING NO FIELDS. - DATA temp1 TYPE xsdboolean. - temp1 = boolc( sy-subrc = 0 ). - rv_bool = temp1. + rv_bool = xsdbool( sy-subrc = 0 ). ENDMETHOD. ENDCLASS. diff --git a/src/http/zcl_abapgit_http_agent.clas.abap b/src/http/zcl_abapgit_http_agent.clas.abap index 6e85e1cb6..649ae1a69 100644 --- a/src/http/zcl_abapgit_http_agent.clas.abap +++ b/src/http/zcl_abapgit_http_agent.clas.abap @@ -51,14 +51,14 @@ CLASS ZCL_ABAPGIT_HTTP_AGENT IMPLEMENTATION. METHOD constructor. - CREATE OBJECT mo_global_headers. + mo_global_headers = NEW #( ). ENDMETHOD. METHOD create. - CREATE OBJECT ri_instance TYPE zcl_abapgit_http_agent. + ri_instance = NEW zcl_abapgit_http_agent( ). ENDMETHOD. @@ -78,7 +78,7 @@ CLASS ZCL_ABAPGIT_HTTP_AGENT IMPLEMENTATION. DATA lv_message TYPE string. FIELD-SYMBOLS LIKE LINE OF io_query->mt_entries. - CREATE OBJECT lo_proxy_configuration. + lo_proxy_configuration = NEW #( ). cl_http_client=>create_by_url( EXPORTING diff --git a/src/http/zcl_abapgit_http_agent.clas.locals_imp.abap b/src/http/zcl_abapgit_http_agent.clas.locals_imp.abap index 73c4a3566..4c6c7005e 100644 --- a/src/http/zcl_abapgit_http_agent.clas.locals_imp.abap +++ b/src/http/zcl_abapgit_http_agent.clas.locals_imp.abap @@ -18,7 +18,7 @@ CLASS lcl_http_response IMPLEMENTATION. METHOD create. DATA lo_response TYPE REF TO lcl_http_response. - CREATE OBJECT lo_response. + lo_response = NEW #( ). lo_response->mi_client = ii_client. lo_response->mi_response = ii_client->response. ri_response ?= lo_response. @@ -31,9 +31,7 @@ CLASS lcl_http_response IMPLEMENTATION. METHOD zif_abapgit_http_response~is_ok. DATA lv_code TYPE i. lv_code = zif_abapgit_http_response~code( ). - DATA temp1 TYPE xsdboolean. - temp1 = boolc( lv_code >= 200 AND lv_code < 300 ). - rv_yes = temp1. + rv_yes = xsdbool( lv_code >= 200 AND lv_code < 300 ). ENDMETHOD. METHOD zif_abapgit_http_response~data. @@ -67,7 +65,7 @@ CLASS lcl_http_response IMPLEMENTATION. DATA lt_headers TYPE tihttpnvp. FIELD-SYMBOLS LIKE LINE OF lt_headers. - CREATE OBJECT ro_headers. + ro_headers = NEW #( ). mi_response->get_header_fields( CHANGING fields = lt_headers ). LOOP AT lt_headers ASSIGNING . diff --git a/src/inspect/zcl_abapgit_code_inspector.clas.abap b/src/inspect/zcl_abapgit_code_inspector.clas.abap index 2389d2ac3..86e9aa750 100644 --- a/src/inspect/zcl_abapgit_code_inspector.clas.abap +++ b/src/inspect/zcl_abapgit_code_inspector.clas.abap @@ -302,9 +302,7 @@ CLASS zcl_abapgit_code_inspector IMPLEMENTATION. FROM trdir WHERE name = is_obj-objname. - DATA temp1 TYPE xsdboolean. - temp1 = boolc( ls_program_type = 'I' ). - rv_skip = temp1. " Include program. + rv_skip = xsdbool( ls_program_type = 'I' ). " Include program. WHEN OTHERS. rv_skip = abap_false. @@ -381,9 +379,7 @@ CLASS zcl_abapgit_code_inspector IMPLEMENTATION. IF iv_save = abap_true. READ TABLE rt_list TRANSPORTING NO FIELDS WITH KEY kind = 'E'. - DATA temp2 TYPE xsdboolean. - temp2 = boolc( sy-subrc <> 0 ). - mv_success = temp2. + mv_success = xsdbool( sy-subrc <> 0 ). ENDIF. CATCH zcx_abapgit_exception INTO lx_error. diff --git a/src/inspect/zcl_abapgit_where_used_tools.clas.abap b/src/inspect/zcl_abapgit_where_used_tools.clas.abap index 14d13ef11..fc5211dee 100644 --- a/src/inspect/zcl_abapgit_where_used_tools.clas.abap +++ b/src/inspect/zcl_abapgit_where_used_tools.clas.abap @@ -410,7 +410,7 @@ CLASS zcl_abapgit_where_used_tools IMPLEMENTATION. METHOD new. - CREATE OBJECT ro_instance. + ro_instance = NEW #( ). ENDMETHOD. diff --git a/src/json/zcl_abapgit_ajson.clas.abap b/src/json/zcl_abapgit_ajson.clas.abap index 908c14c76..c0c640343 100644 --- a/src/json/zcl_abapgit_ajson.clas.abap +++ b/src/json/zcl_abapgit_ajson.clas.abap @@ -138,9 +138,9 @@ CLASS zcl_abapgit_ajson IMPLEMENTATION. METHOD create_empty. - CREATE OBJECT ro_instance EXPORTING iv_to_abap_corresponding_only = iv_to_abap_corresponding_only - iv_format_datetime = iv_format_datetime - iv_keep_item_order = iv_keep_item_order. + ro_instance = NEW #( iv_to_abap_corresponding_only = iv_to_abap_corresponding_only + iv_format_datetime = iv_format_datetime + iv_keep_item_order = iv_keep_item_order ). ro_instance->mi_custom_mapping = ii_custom_mapping. ENDMETHOD. @@ -153,14 +153,14 @@ CLASS zcl_abapgit_ajson IMPLEMENTATION. zcx_abapgit_ajson_error=>raise( 'Source not bound' ). ENDIF. - CREATE OBJECT ro_instance EXPORTING iv_to_abap_corresponding_only = ii_source_json->opts( )-to_abap_corresponding_only - iv_format_datetime = ii_source_json->opts( )-format_datetime - iv_keep_item_order = ii_source_json->opts( )-keep_item_order. + ro_instance = NEW #( iv_to_abap_corresponding_only = ii_source_json->opts( )-to_abap_corresponding_only + iv_format_datetime = ii_source_json->opts( )-format_datetime + iv_keep_item_order = ii_source_json->opts( )-keep_item_order ). IF ii_filter IS NOT BOUND AND ii_mapper IS NOT BOUND. ro_instance->mt_json_tree = ii_source_json->mt_json_tree. ELSE. - CREATE OBJECT lo_mutator_queue. + lo_mutator_queue = NEW #( ). IF ii_mapper IS BOUND. " Mapping goes first. But maybe it should be a freely definable queue of processors ? lo_mutator_queue->add( lcl_mapper_runner=>new( ii_mapper ) ). @@ -230,9 +230,9 @@ CLASS zcl_abapgit_ajson IMPLEMENTATION. METHOD new. - CREATE OBJECT ro_instance EXPORTING iv_to_abap_corresponding_only = iv_to_abap_corresponding_only - iv_format_datetime = iv_format_datetime - iv_keep_item_order = iv_keep_item_order. + ro_instance = NEW #( iv_to_abap_corresponding_only = iv_to_abap_corresponding_only + iv_format_datetime = iv_format_datetime + iv_keep_item_order = iv_keep_item_order ). ENDMETHOD. @@ -240,8 +240,8 @@ CLASS zcl_abapgit_ajson IMPLEMENTATION. DATA lo_parser TYPE REF TO lcl_json_parser. - CREATE OBJECT ro_instance. - CREATE OBJECT lo_parser. + ro_instance = NEW #( ). + lo_parser = NEW #( ). ro_instance->mt_json_tree = lo_parser->parse( iv_json = iv_json iv_keep_item_order = iv_keep_item_order ). @@ -373,9 +373,7 @@ CLASS zcl_abapgit_ajson IMPLEMENTATION. METHOD zif_abapgit_ajson~exists. - DATA temp1 TYPE xsdboolean. - temp1 = boolc( get_item( iv_path ) IS NOT INITIAL ). - rv_exists = temp1. + rv_exists = xsdbool( get_item( iv_path ) IS NOT INITIAL ). ENDMETHOD. @@ -415,9 +413,7 @@ CLASS zcl_abapgit_ajson IMPLEMENTATION. IF lr_item IS INITIAL OR lr_item->type = zif_abapgit_ajson_types=>node_type-null. RETURN. ELSEIF lr_item->type = zif_abapgit_ajson_types=>node_type-boolean. - DATA temp2 TYPE xsdboolean. - temp2 = boolc( lr_item->value = 'true' ). - rv_value = temp2. + rv_value = xsdbool( lr_item->value = 'true' ). ELSEIF lr_item->value IS NOT INITIAL. rv_value = abap_true. ENDIF. @@ -499,7 +495,7 @@ CLASS zcl_abapgit_ajson IMPLEMENTATION. RETURN. ENDIF. - CREATE OBJECT lo_to_abap. + lo_to_abap = NEW #( ). TRY. rv_value = lo_to_abap->to_timestamp( lr_item->value ). @@ -511,9 +507,7 @@ CLASS zcl_abapgit_ajson IMPLEMENTATION. METHOD zif_abapgit_ajson~is_empty. - DATA temp3 TYPE xsdboolean. - temp3 = boolc( lines( mt_json_tree ) = 0 ). - rv_yes = temp3. + rv_yes = xsdbool( lines( mt_json_tree ) = 0 ). ENDMETHOD. @@ -706,7 +700,7 @@ CLASS zcl_abapgit_ajson IMPLEMENTATION. ENDIF. IF go_float_regex IS NOT BOUND. - CREATE OBJECT go_float_regex EXPORTING pattern = '^([1-9][0-9]*|0)\.[0-9]+$'. + go_float_regex = NEW #( pattern = '^([1-9][0-9]*|0)\.[0-9]+$' ). " expects fractional, because ints are detected separately ENDIF. @@ -760,9 +754,7 @@ CLASS zcl_abapgit_ajson IMPLEMENTATION. ri_json = me. DATA lv_bool TYPE abap_bool. - DATA temp4 TYPE xsdboolean. - temp4 = boolc( iv_val IS NOT INITIAL ). - lv_bool = temp4. + lv_bool = xsdbool( iv_val IS NOT INITIAL ). zif_abapgit_ajson~set( iv_ignore_empty = abap_false iv_path = iv_path @@ -849,7 +841,7 @@ CLASS zcl_abapgit_ajson IMPLEMENTATION. DATA lv_path_len TYPE i. DATA lv_path_pattern TYPE string. - CREATE OBJECT lo_section. + lo_section = NEW #( ). lv_normalized_path = lcl_utils=>normalize_path( iv_path ). lv_path_len = strlen( lv_normalized_path ). ls_path_parts = lcl_utils=>split_path( lv_normalized_path ). @@ -950,10 +942,8 @@ CLASS zcl_abapgit_ajson IMPLEMENTATION. DATA lo_to_abap TYPE REF TO lcl_json_to_abap. CLEAR ev_container. - DATA temp5 TYPE xsdboolean. - temp5 = boolc( iv_corresponding = abap_true OR ms_opts-to_abap_corresponding_only = abap_true ). - CREATE OBJECT lo_to_abap EXPORTING iv_corresponding = temp5 - ii_custom_mapping = mi_custom_mapping. + lo_to_abap = NEW #( iv_corresponding = xsdbool( iv_corresponding = abap_true OR ms_opts-to_abap_corresponding_only = abap_true ) + ii_custom_mapping = mi_custom_mapping ). lo_to_abap->to_abap( EXPORTING diff --git a/src/json/zcl_abapgit_ajson.clas.locals_imp.abap b/src/json/zcl_abapgit_ajson.clas.locals_imp.abap index b8dba20a5..6618efef0 100644 --- a/src/json/zcl_abapgit_ajson.clas.locals_imp.abap +++ b/src/json/zcl_abapgit_ajson.clas.locals_imp.abap @@ -381,8 +381,7 @@ CLASS lcl_json_parser IMPLEMENTATION. DATA lv_json TYPE string. DATA lv_offset TYPE i. - TYPES temp1 TYPE TABLE OF string. -DATA lt_text TYPE temp1. + DATA lt_text TYPE TABLE OF string. DATA lv_text TYPE string. DATA lv_line TYPE i. DATA lv_pos TYPE i. @@ -584,7 +583,7 @@ CLASS lcl_json_serializer IMPLEMENTATION. METHOD stringify. DATA lo TYPE REF TO lcl_json_serializer. - CREATE OBJECT lo. + lo = NEW #( ). lo->mt_json_tree = it_json_tree. lo->mv_indent_step = iv_indent. lo->mv_keep_item_order = iv_keep_item_order. @@ -812,8 +811,7 @@ CLASS lcl_json_to_abap DEFINITION FINAL. type_kind LIKE lif_kind=>any, tab_item_buf TYPE REF TO data, END OF ty_type_cache. - TYPES temp2_e16272e46b TYPE HASHED TABLE OF ty_type_cache WITH UNIQUE KEY type_path. -DATA mt_node_type_cache TYPE temp2_e16272e46b. + DATA mt_node_type_cache TYPE HASHED TABLE OF ty_type_cache WITH UNIQUE KEY type_path. DATA mr_nodes TYPE REF TO zif_abapgit_ajson_types=>ty_nodes_ts. DATA mi_custom_mapping TYPE REF TO zif_abapgit_ajson_mapping. @@ -1110,9 +1108,7 @@ CLASS lcl_json_to_abap IMPLEMENTATION. " Do nothing WHEN zif_abapgit_ajson_types=>node_type-boolean. " TODO: check type ? - DATA temp1 TYPE xsdboolean. - temp1 = boolc( is_node-value = 'true' ). - = temp1. + = xsdbool( is_node-value = 'true' ). WHEN zif_abapgit_ajson_types=>node_type-number. " TODO: check type ? = is_node-value. @@ -1419,7 +1415,7 @@ CLASS lcl_abap_to_json IMPLEMENTATION. lo_type = cl_abap_typedescr=>describe_by_data( iv_data ). - CREATE OBJECT lo_converter. + lo_converter = NEW #( ). lo_converter->mi_custom_mapping = ii_custom_mapping. lo_converter->mv_keep_item_order = is_opts-keep_item_order. lo_converter->mv_format_datetime = is_opts-format_datetime. @@ -1799,7 +1795,7 @@ CLASS lcl_abap_to_json IMPLEMENTATION. lo_type = cl_abap_typedescr=>describe_by_data( iv_data ). - CREATE OBJECT lo_converter. + lo_converter = NEW #( ). lo_converter->mi_custom_mapping = ii_custom_mapping. lo_converter->mv_keep_item_order = is_opts-keep_item_order. lo_converter->mv_format_datetime = is_opts-format_datetime. @@ -1915,7 +1911,7 @@ ENDCLASS. CLASS lcl_filter_runner IMPLEMENTATION. METHOD new. - CREATE OBJECT ro_instance EXPORTING ii_filter = ii_filter. + ro_instance = NEW #( ii_filter = ii_filter ). ENDMETHOD. METHOD constructor. @@ -2027,7 +2023,7 @@ ENDCLASS. CLASS lcl_mapper_runner IMPLEMENTATION. METHOD new. - CREATE OBJECT ro_instance EXPORTING ii_mapper = ii_mapper. + ro_instance = NEW #( ii_mapper = ii_mapper ). ENDMETHOD. METHOD constructor. @@ -2121,8 +2117,7 @@ CLASS lcl_mutator_queue DEFINITION FINAL. VALUE(ro_self) TYPE REF TO lcl_mutator_queue. PRIVATE SECTION. - TYPES temp3_493fc4808e TYPE STANDARD TABLE OF REF TO lif_mutator_runner. -DATA mt_queue TYPE temp3_493fc4808e. + DATA mt_queue TYPE STANDARD TABLE OF REF TO lif_mutator_runner. ENDCLASS. @@ -2136,7 +2131,7 @@ CLASS lcl_mutator_queue IMPLEMENTATION. ENDMETHOD. METHOD new. - CREATE OBJECT ro_instance. + ro_instance = NEW #( ). ENDMETHOD. METHOD lif_mutator_runner~run. diff --git a/src/json/zcl_abapgit_ajson.clas.testclasses.abap b/src/json/zcl_abapgit_ajson.clas.testclasses.abap index 7d897586e..22485c203 100644 --- a/src/json/zcl_abapgit_ajson.clas.testclasses.abap +++ b/src/json/zcl_abapgit_ajson.clas.testclasses.abap @@ -97,8 +97,8 @@ ENDCLASS. CLASS ltcl_parser_test IMPLEMENTATION. METHOD setup. - CREATE OBJECT mo_cut. - CREATE OBJECT mo_nodes. + mo_cut = NEW #( ). + mo_nodes = NEW #( ). ENDMETHOD. METHOD parse_bare_values. @@ -201,7 +201,7 @@ CLASS ltcl_parser_test IMPLEMENTATION. mo_nodes->add( '/ |float |num |123.45 | |0' ). DATA lt_act TYPE zif_abapgit_ajson_types=>ty_nodes_tt. - CREATE OBJECT mo_cut. + mo_cut = NEW #( ). lt_act = mo_cut->parse( '{"float": 123.45}' ). cl_abap_unit_assert=>assert_equals( act = lt_act @@ -304,10 +304,9 @@ CLASS ltcl_parser_test IMPLEMENTATION. DATA lo_cut TYPE REF TO lcl_json_parser. DATA lx TYPE REF TO zcx_abapgit_ajson_error. DATA lv_numc TYPE n LENGTH 10. - TYPES temp1 TYPE HASHED TABLE OF string WITH UNIQUE DEFAULT KEY. -DATA lt_hashed TYPE temp1. + DATA lt_hashed TYPE HASHED TABLE OF string WITH UNIQUE DEFAULT KEY. - CREATE OBJECT lo_cut. + lo_cut = NEW #( ). TRY. lo_cut->parse( lv_numc ). @@ -376,7 +375,7 @@ DATA lt_hashed TYPE temp1. DATA lt_act TYPE zif_abapgit_ajson_types=>ty_nodes_tt. DATA lo_nodes TYPE REF TO lcl_nodes_helper. - CREATE OBJECT lo_nodes. + lo_nodes = NEW #( ). lo_nodes->add( ' | |object | | |8' ). lo_nodes->add( '/ |string |str |abc | |0' ). lo_nodes->add( '/ |number |num |123 | |0' ). @@ -407,7 +406,7 @@ DATA lt_hashed TYPE temp1. lo_nodes->add( '/issues/2/end/ |col |num |22 | |0' ). lo_nodes->add( '/issues/2/ |filename |str |./zxxx.prog.abap | |0' ). - CREATE OBJECT lo_cut. + lo_cut = NEW #( ). lt_act = lo_cut->parse( sample_json( ) ). cl_abap_unit_assert=>assert_equals( act = lt_act @@ -431,7 +430,7 @@ DATA lt_hashed TYPE temp1. DATA lt_act TYPE zif_abapgit_ajson_types=>ty_nodes_tt. DATA lo_nodes TYPE REF TO lcl_nodes_helper. - CREATE OBJECT lo_nodes. + lo_nodes = NEW #( ). lo_nodes->add( ' | |object | | |8 |0' ). lo_nodes->add( '/ |string |str |abc | |0 |1' ). lo_nodes->add( '/ |number |num |123 | |0 |2' ). @@ -462,7 +461,7 @@ DATA lt_hashed TYPE temp1. lo_nodes->add( '/issues/2/end/ |col |num |22 | |0 |2' ). lo_nodes->add( '/issues/2/ |filename |str |./zxxx.prog.abap | |0 |5' ). - CREATE OBJECT lo_cut. + lo_cut = NEW #( ). lt_act = lo_cut->parse( iv_json = sample_json( ) iv_keep_item_order = abap_true ). @@ -492,7 +491,7 @@ DATA lt_hashed TYPE temp1. DATA lx TYPE REF TO zcx_abapgit_ajson_error. TRY. - CREATE OBJECT lo_cut. + lo_cut = NEW #( ). lo_cut->parse( '{ "a" = 1, "a" = 1 }' ). cl_abap_unit_assert=>fail( ). CATCH zcx_abapgit_ajson_error INTO lx. @@ -507,7 +506,7 @@ DATA lt_hashed TYPE temp1. DATA lx TYPE REF TO zcx_abapgit_ajson_error. TRY. - CREATE OBJECT lo_cut. + lo_cut = NEW #( ). lo_cut->parse( 'X

Y

' ). cl_abap_unit_assert=>fail( ). CATCH zcx_abapgit_ajson_error INTO lx. @@ -604,7 +603,7 @@ CLASS ltcl_serializer_test IMPLEMENTATION. DATA lo_nodes TYPE REF TO lcl_nodes_helper. - CREATE OBJECT lo_nodes. + lo_nodes = NEW #( ). lo_nodes->add( ' | |object | | |8' ). lo_nodes->add( '/ |string |str |abc | |0' ). lo_nodes->add( '/ |number |num |123 | |0' ). @@ -712,7 +711,7 @@ CLASS ltcl_serializer_test IMPLEMENTATION. DATA lv_exp TYPE string. DATA lo_nodes TYPE REF TO lcl_nodes_helper. - CREATE OBJECT lo_nodes. + lo_nodes = NEW #( ). lo_nodes->add( ' | |array | | |3' ). lo_nodes->add( '/ |1 |str |abc |2 |0' ). lo_nodes->add( '/ |2 |num |123 |1 |0' ). @@ -733,7 +732,7 @@ CLASS ltcl_serializer_test IMPLEMENTATION. DATA lv_exp TYPE string. DATA lo_nodes TYPE REF TO lcl_nodes_helper. - CREATE OBJECT lo_nodes. + lo_nodes = NEW #( ). lo_nodes->add( ' | |object | | |3 |0' ). lo_nodes->add( '/ |beta |str |b | |0 |3' ). lo_nodes->add( '/ |zulu |str |z | |0 |1' ). @@ -763,7 +762,7 @@ CLASS ltcl_serializer_test IMPLEMENTATION. DATA lv_exp TYPE string. DATA lo_nodes TYPE REF TO lcl_nodes_helper. - CREATE OBJECT lo_nodes. + lo_nodes = NEW #( ). lo_nodes->add( ' | |array | | |3' ). lo_nodes->add( '/ |1 |object | |2 |2' ). lo_nodes->add( '/1/ |a |num |1 | |0' ). @@ -800,7 +799,7 @@ CLASS ltcl_serializer_test IMPLEMENTATION. DATA lv_exp TYPE string. DATA lo_nodes TYPE REF TO lcl_nodes_helper. - CREATE OBJECT lo_nodes. + lo_nodes = NEW #( ). lo_nodes->add( ' | |array | | |0' ). lv_act = lcl_json_serializer=>stringify( @@ -830,7 +829,7 @@ CLASS ltcl_serializer_test IMPLEMENTATION. DATA lv_val TYPE string. DATA lo_nodes TYPE REF TO lcl_nodes_helper. - CREATE OBJECT lo_nodes. + lo_nodes = NEW #( ). lv_val = 'a' && '"' && '\' && cl_abap_char_utilities=>horizontal_tab && cl_abap_char_utilities=>cr_lf. lo_nodes->add( | \| \|str \|{ lv_val }\| \|0| ). @@ -849,7 +848,7 @@ CLASS ltcl_serializer_test IMPLEMENTATION. DATA lv_exp TYPE string. DATA lo_nodes TYPE REF TO lcl_nodes_helper. - CREATE OBJECT lo_nodes. + lo_nodes = NEW #( ). lv_act = lcl_json_serializer=>stringify( lo_nodes->sorted( ) ). lv_exp = ''. @@ -1037,7 +1036,7 @@ CLASS ltcl_reader_test IMPLEMENTATION. DATA lo_cut TYPE REF TO zcl_abapgit_ajson. DATA lo_nodes TYPE REF TO lcl_nodes_helper. - CREATE OBJECT lo_nodes. + lo_nodes = NEW #( ). lo_nodes->add( ' | |array | | |2' ). lo_nodes->add( '/ |1 |object | |1 |5' ). lo_nodes->add( '/1/ |message |str |Indentation problem ... | |0' ). @@ -1069,7 +1068,7 @@ CLASS ltcl_reader_test IMPLEMENTATION. " ********************************************************************** - CREATE OBJECT lo_nodes. + lo_nodes = NEW #( ). lo_nodes->add( ' | |object | | |8' ). lo_nodes->add( '/ |string |str |abc | |0' ). lo_nodes->add( '/ |number |num |123 | |0' ). @@ -1108,7 +1107,7 @@ CLASS ltcl_reader_test IMPLEMENTATION. " ********************************************************************** - CREATE OBJECT lo_nodes. + lo_nodes = NEW #( ). lo_nodes->add( ' | |object | | |2' ). lo_nodes->add( '/ |row |num |3 | |0' ). lo_nodes->add( '/ |col |num |21 | |0' ). @@ -1185,10 +1184,10 @@ CLASS ltcl_reader_test IMPLEMENTATION. DATA lo_nodes TYPE REF TO lcl_nodes_helper. DATA lv_exp TYPE d. - CREATE OBJECT lo_cut. + lo_cut = NEW #( ). lv_exp = '20200728'. - CREATE OBJECT lo_nodes. + lo_nodes = NEW #( ). lo_nodes->add( ' | |object | | |1' ). lo_nodes->add( '/ |date1 |str |2020-07-28 | |0' ). lo_cut->mt_json_tree = lo_nodes->mt_nodes. @@ -1197,7 +1196,7 @@ CLASS ltcl_reader_test IMPLEMENTATION. act = lo_cut->zif_abapgit_ajson~get_date( '/date1' ) exp = lv_exp ). - CREATE OBJECT lo_nodes. + lo_nodes = NEW #( ). lo_nodes->add( ' | |object | | |1' ). lo_nodes->add( '/ |date1 |str |2020-07-28T01:00:00Z | |0' ). lo_cut->mt_json_tree = lo_nodes->mt_nodes. @@ -1206,7 +1205,7 @@ CLASS ltcl_reader_test IMPLEMENTATION. act = lo_cut->zif_abapgit_ajson~get_date( '/date1' ) exp = lv_exp ). - CREATE OBJECT lo_nodes. + lo_nodes = NEW #( ). lo_nodes->add( ' | |object | | |1' ). lo_nodes->add( '/ |date1 |str |20200728 | |0' ). lo_cut->mt_json_tree = lo_nodes->mt_nodes. @@ -1223,9 +1222,9 @@ CLASS ltcl_reader_test IMPLEMENTATION. DATA lo_nodes TYPE REF TO lcl_nodes_helper. DATA lv_exp TYPE timestamp VALUE `20200728000000`. - CREATE OBJECT lo_cut. + lo_cut = NEW #( ). - CREATE OBJECT lo_nodes. + lo_nodes = NEW #( ). lo_nodes->add( ' | |object | | |1' ). lo_nodes->add( '/ |timestamp|str |2020-07-28T00:00:00Z | |0' ). lo_cut->mt_json_tree = lo_nodes->mt_nodes. @@ -1373,7 +1372,7 @@ CLASS ltcl_reader_test IMPLEMENTATION. DATA lt_act TYPE string_table. DATA lt_exp TYPE string_table. - CREATE OBJECT lo_nodes. + lo_nodes = NEW #( ). lo_nodes->add( ' | |array | | |6' ). lo_nodes->add( '/ |1 |num |123 |1|0' ). lo_nodes->add( '/ |2 |num |234 |2|0' ). @@ -1389,7 +1388,7 @@ CLASS ltcl_reader_test IMPLEMENTATION. APPEND '' TO lt_exp. APPEND '' TO lt_exp. - CREATE OBJECT lo_cut. + lo_cut = NEW #( ). lo_cut->mt_json_tree = lo_nodes->mt_nodes. lt_act = lo_cut->zif_abapgit_ajson~array_to_string_table( '/' ). @@ -1400,7 +1399,7 @@ CLASS ltcl_reader_test IMPLEMENTATION. " negative DATA lx TYPE REF TO zcx_abapgit_ajson_error. - CREATE OBJECT lo_nodes. + lo_nodes = NEW #( ). lo_nodes->add( ' | |object | | |1' ). lo_nodes->add( '/ |a |str |abc | |0' ). lo_cut->mt_json_tree = lo_nodes->mt_nodes. @@ -1432,7 +1431,7 @@ CLASS ltcl_reader_test IMPLEMENTATION. exp = 'Array expected at: /a' ). ENDTRY. - CREATE OBJECT lo_nodes. + lo_nodes = NEW #( ). lo_nodes->add( ' | |array | | |1' ). lo_nodes->add( '/ |1 |object | |1|0' ). lo_cut->mt_json_tree = lo_nodes->mt_nodes. @@ -1573,7 +1572,7 @@ CLASS ltcl_json_to_abap IMPLEMENTATION. DATA lv_exp_timestamp TYPE timestamp VALUE '20200728000000'. DATA lo_nodes TYPE REF TO lcl_nodes_helper. - CREATE OBJECT lo_nodes. + lo_nodes = NEW #( ). lo_nodes->add( ' | |object | | ' ). lo_nodes->add( '/ |str |str |hello | ' ). lo_nodes->add( '/ |int |num |5 | ' ). @@ -1589,7 +1588,7 @@ CLASS ltcl_json_to_abap IMPLEMENTATION. lo_nodes->add( '/ |timestamp3 |str |2020-07-28T01:00:00+01:00 | ' ). lo_nodes->add( '/ |timestamp4 |str |2020-07-28T01:00:00+01:00 | ' ). - CREATE OBJECT lo_cut. + lo_cut = NEW #( ). lo_cut->to_abap( EXPORTING it_nodes = lo_nodes->sorted( ) @@ -1620,10 +1619,10 @@ CLASS ltcl_json_to_abap IMPLEMENTATION. DATA lv_mock TYPE timestamp. DATA lo_nodes TYPE REF TO lcl_nodes_helper. - CREATE OBJECT lo_nodes. + lo_nodes = NEW #( ). lo_nodes->add( ' | |str |0000-00-00T00:00:00Z| ' ). - CREATE OBJECT lo_cut. + lo_cut = NEW #( ). lo_cut->to_abap( EXPORTING it_nodes = lo_nodes->sorted( ) @@ -1642,10 +1641,10 @@ CLASS ltcl_json_to_abap IMPLEMENTATION. DATA lv_mock TYPE t. DATA lo_nodes TYPE REF TO lcl_nodes_helper. - CREATE OBJECT lo_nodes. + lo_nodes = NEW #( ). lo_nodes->add( ' | |str |11:11:11| ' ). - CREATE OBJECT lo_cut. + lo_cut = NEW #( ). lo_cut->to_abap( EXPORTING it_nodes = lo_nodes->sorted( ) @@ -1658,10 +1657,10 @@ CLASS ltcl_json_to_abap IMPLEMENTATION. DATA lv_mock_init TYPE t. - CREATE OBJECT lo_nodes. + lo_nodes = NEW #( ). lo_nodes->add( ' | |str || ' ). - CREATE OBJECT lo_cut. + lo_cut = NEW #( ). lo_cut->to_abap( EXPORTING it_nodes = lo_nodes->sorted( ) @@ -1680,10 +1679,10 @@ CLASS ltcl_json_to_abap IMPLEMENTATION. DATA lv_act TYPE p LENGTH 10 DECIMALS 3. DATA lo_nodes TYPE REF TO lcl_nodes_helper. - CREATE OBJECT lo_nodes. + lo_nodes = NEW #( ). lo_nodes->add( ' | |str |1.3333 | ' ). - CREATE OBJECT lo_cut. + lo_cut = NEW #( ). lo_cut->to_abap( EXPORTING it_nodes = lo_nodes->sorted( ) @@ -1702,10 +1701,10 @@ CLASS ltcl_json_to_abap IMPLEMENTATION. DATA lv_mock TYPE string. DATA lo_nodes TYPE REF TO lcl_nodes_helper. - CREATE OBJECT lo_nodes. + lo_nodes = NEW #( ). lo_nodes->add( ' | |str |hello | ' ). - CREATE OBJECT lo_cut. + lo_cut = NEW #( ). lo_cut->to_abap( EXPORTING it_nodes = lo_nodes->sorted( ) @@ -1725,12 +1724,12 @@ CLASS ltcl_json_to_abap IMPLEMENTATION. DATA lt_exp TYPE string_table. DATA lo_nodes TYPE REF TO lcl_nodes_helper. - CREATE OBJECT lo_nodes. + lo_nodes = NEW #( ). lo_nodes->add( ' | |array | | ' ). lo_nodes->add( '/ |1 |str |One |1' ). lo_nodes->add( '/ |2 |str |Two |2' ). - CREATE OBJECT lo_cut. + lo_cut = NEW #( ). lo_cut->to_abap( EXPORTING it_nodes = lo_nodes->sorted( ) @@ -1749,21 +1748,19 @@ CLASS ltcl_json_to_abap IMPLEMENTATION. METHOD to_abap_array_of_arrays_simple. DATA lo_cut TYPE REF TO lcl_json_to_abap. - TYPES temp2 TYPE TABLE OF string_table. -DATA lt_mock TYPE temp2. - TYPES temp3 TYPE TABLE OF string_table. -DATA lt_exp TYPE temp3. + DATA lt_mock TYPE TABLE OF string_table. + DATA lt_exp TYPE TABLE OF string_table. DATA lt_tmp TYPE string_table. DATA lo_nodes TYPE REF TO lcl_nodes_helper. - CREATE OBJECT lo_nodes. + lo_nodes = NEW #( ). lo_nodes->add( ' | |array | | ' ). lo_nodes->add( '/ |1 |array | |1' ). lo_nodes->add( '/ |2 |array | |2' ). lo_nodes->add( '/1/ |1 |str |One |1' ). lo_nodes->add( '/2/ |1 |str |Two |1' ). - CREATE OBJECT lo_cut. + lo_cut = NEW #( ). lo_cut->to_abap( EXPORTING it_nodes = lo_nodes->sorted( ) @@ -1785,14 +1782,12 @@ DATA lt_exp TYPE temp3. METHOD to_abap_array_of_arrays. DATA lo_cut TYPE REF TO lcl_json_to_abap. - TYPES temp4 TYPE TABLE OF string_table. -DATA lt_mock TYPE temp4. - TYPES temp5 TYPE TABLE OF string_table. -DATA lt_exp TYPE temp5. + DATA lt_mock TYPE TABLE OF string_table. + DATA lt_exp TYPE TABLE OF string_table. DATA lt_tmp TYPE string_table. DATA lo_nodes TYPE REF TO lcl_nodes_helper. - CREATE OBJECT lo_nodes. + lo_nodes = NEW #( ). lo_nodes->add( ' | |array | | ' ). lo_nodes->add( '/ |1 |array | |1' ). lo_nodes->add( '/ |2 |array | |2' ). @@ -1801,7 +1796,7 @@ DATA lt_exp TYPE temp5. lo_nodes->add( '/2/ |1 |str |Three |1' ). lo_nodes->add( '/2/ |2 |str |Four |2' ). - CREATE OBJECT lo_cut. + lo_cut = NEW #( ). lo_cut->to_abap( EXPORTING it_nodes = lo_nodes->sorted( ) @@ -1829,7 +1824,7 @@ DATA lt_exp TYPE temp5. DATA ls_exp TYPE ty_complex. DATA lo_nodes TYPE REF TO lcl_nodes_helper. - CREATE OBJECT lo_nodes. + lo_nodes = NEW #( ). lo_nodes->add( ' | |object | | ' ). lo_nodes->add( '/ |tab |array | | ' ). lo_nodes->add( '/tab/ |1 |object | |1' ). @@ -1837,7 +1832,7 @@ DATA lt_exp TYPE temp5. lo_nodes->add( '/tab/ |2 |object | |2' ). lo_nodes->add( '/tab/2/|a |str |Two | ' ). - CREATE OBJECT lo_cut. + lo_cut = NEW #( ). lo_cut->to_abap( EXPORTING it_nodes = lo_nodes->sorted( ) @@ -1863,13 +1858,13 @@ DATA lt_exp TYPE temp5. DATA ls_exp TYPE ty_complex. DATA lo_nodes TYPE REF TO lcl_nodes_helper. - CREATE OBJECT lo_nodes. + lo_nodes = NEW #( ). lo_nodes->add( ' | |object | | ' ). lo_nodes->add( '/ |tab_plain |array | | ' ). lo_nodes->add( '/tab_plain/ |1 |str |One |1' ). lo_nodes->add( '/tab_plain/ |2 |str |Two |2' ). - CREATE OBJECT lo_cut. + lo_cut = NEW #( ). lo_cut->to_abap( EXPORTING it_nodes = lo_nodes->sorted( ) @@ -1888,18 +1883,16 @@ DATA lt_exp TYPE temp5. METHOD to_abap_hashed_plain_tab. DATA lo_cut TYPE REF TO lcl_json_to_abap. - TYPES temp6 TYPE HASHED TABLE OF string WITH UNIQUE KEY table_line. -DATA lt_mock TYPE temp6. - TYPES temp7 TYPE HASHED TABLE OF string WITH UNIQUE KEY table_line. -DATA lt_exp TYPE temp7. + DATA lt_mock TYPE HASHED TABLE OF string WITH UNIQUE KEY table_line. + DATA lt_exp TYPE HASHED TABLE OF string WITH UNIQUE KEY table_line. DATA lo_nodes TYPE REF TO lcl_nodes_helper. - CREATE OBJECT lo_nodes. + lo_nodes = NEW #( ). lo_nodes->add( ' | |array | | ' ). lo_nodes->add( '/ |1 |str |One |1' ). lo_nodes->add( '/ |2 |str |Two |2' ). - CREATE OBJECT lo_cut. + lo_cut = NEW #( ). lo_cut->to_abap( EXPORTING it_nodes = lo_nodes->sorted( ) @@ -1922,7 +1915,7 @@ DATA lt_exp TYPE temp7. DATA lt_exp TYPE tty_struc_hashed. DATA lo_nodes TYPE REF TO lcl_nodes_helper. - CREATE OBJECT lo_nodes. + lo_nodes = NEW #( ). lo_nodes->add( ' | |array | | ' ). lo_nodes->add( '/ |1 |object | |1' ). lo_nodes->add( '/ |2 |object | |2' ). @@ -1931,7 +1924,7 @@ DATA lt_exp TYPE temp7. lo_nodes->add( '/2/ |a |str |Two | ' ). lo_nodes->add( '/2/ |b |num |2 | ' ). - CREATE OBJECT lo_cut. + lo_cut = NEW #( ). lo_cut->to_abap( EXPORTING it_nodes = lo_nodes->sorted( ) @@ -1959,7 +1952,7 @@ DATA lt_exp TYPE temp7. DATA lt_exp TYPE tty_struc_sorted. DATA lo_nodes TYPE REF TO lcl_nodes_helper. - CREATE OBJECT lo_nodes. + lo_nodes = NEW #( ). lo_nodes->add( ' | |array | | ' ). lo_nodes->add( '/ |1 |object | |1' ). lo_nodes->add( '/ |2 |object | |2' ). @@ -1968,7 +1961,7 @@ DATA lt_exp TYPE temp7. lo_nodes->add( '/2/ |a |str |Two | ' ). lo_nodes->add( '/2/ |b |num |2 | ' ). - CREATE OBJECT lo_cut. + lo_cut = NEW #( ). lo_cut->to_abap( EXPORTING it_nodes = lo_nodes->sorted( ) @@ -1995,12 +1988,12 @@ DATA lt_exp TYPE temp7. DATA lx TYPE REF TO zcx_abapgit_ajson_error. DATA ls_mock TYPE ty_complex. - CREATE OBJECT lo_cut. + lo_cut = NEW #( ). DATA lo_nodes TYPE REF TO lcl_nodes_helper. TRY. - CREATE OBJECT lo_nodes. + lo_nodes = NEW #( ). lo_nodes->add( ' | |object | ' ). lo_nodes->add( '/ |str |object | ' ). @@ -2017,7 +2010,7 @@ DATA lt_exp TYPE temp7. ENDTRY. TRY. - CREATE OBJECT lo_nodes. + lo_nodes = NEW #( ). lo_nodes->add( ' | |object | ' ). lo_nodes->add( '/ |str |array | ' ). @@ -2034,7 +2027,7 @@ DATA lt_exp TYPE temp7. ENDTRY. TRY. - CREATE OBJECT lo_nodes. + lo_nodes = NEW #( ). lo_nodes->add( ' | |object | ' ). lo_nodes->add( '/ |int |str |hello ' ). @@ -2051,7 +2044,7 @@ DATA lt_exp TYPE temp7. ENDTRY. TRY. - CREATE OBJECT lo_nodes. + lo_nodes = NEW #( ). lo_nodes->add( ' | |object | ' ). lo_nodes->add( '/ |date1 |str |baddate ' ). @@ -2068,7 +2061,7 @@ DATA lt_exp TYPE temp7. ENDTRY. TRY. - CREATE OBJECT lo_nodes. + lo_nodes = NEW #( ). lo_nodes->add( ' | |object | ' ). lo_nodes->add( '/ |missing |str |123 ' ). @@ -2086,7 +2079,7 @@ DATA lt_exp TYPE temp7. TRY. DATA lt_str TYPE string_table. - CREATE OBJECT lo_nodes. + lo_nodes = NEW #( ). lo_nodes->add( ' | |array | | ' ). lo_nodes->add( '/ |a |str |hello |1' ). @@ -2104,7 +2097,7 @@ DATA lt_exp TYPE temp7. TRY. DATA lr_obj TYPE REF TO object. - CREATE OBJECT lo_nodes. + lo_nodes = NEW #( ). lo_nodes->add( ' | |str |hello | ' ). lo_cut->to_abap( @@ -2121,7 +2114,7 @@ DATA lt_exp TYPE temp7. TRY. DATA lr_data TYPE REF TO data. - CREATE OBJECT lo_nodes. + lo_nodes = NEW #( ). lo_nodes->add( ' | |str |hello | ' ). lo_cut->to_abap( @@ -2137,9 +2130,8 @@ DATA lt_exp TYPE temp7. ENDTRY. TRY. - TYPES temp8 TYPE HASHED TABLE OF string WITH UNIQUE KEY table_line. -DATA lt_hashed TYPE temp8. - CREATE OBJECT lo_nodes. + DATA lt_hashed TYPE HASHED TABLE OF string WITH UNIQUE KEY table_line. + lo_nodes = NEW #( ). lo_nodes->add( ' | |array | | ' ). lo_nodes->add( '/ |1 |str |One |1' ). lo_nodes->add( '/ |2 |str |One |2' ). @@ -2165,14 +2157,14 @@ DATA lt_hashed TYPE temp8. DATA ls_exp TYPE ty_struc. DATA lo_nodes TYPE REF TO lcl_nodes_helper. - CREATE OBJECT lo_nodes. + lo_nodes = NEW #( ). lo_nodes->add( ' | |object | | ' ). lo_nodes->add( '/ |a |str |test | ' ). lo_nodes->add( '/ |c |num |24022022 | ' ). ls_exp-a = 'test'. - CREATE OBJECT lo_cut EXPORTING iv_corresponding = abap_true. + lo_cut = NEW #( iv_corresponding = abap_true ). lo_cut->to_abap( EXPORTING @@ -2194,7 +2186,7 @@ DATA lt_hashed TYPE temp8. DATA lo_nodes TYPE REF TO lcl_nodes_helper. DATA lx TYPE REF TO zcx_abapgit_ajson_error. - CREATE OBJECT lo_nodes. + lo_nodes = NEW #( ). lo_nodes->add( ' | |object | | ' ). lo_nodes->add( '/ |a |str |test | ' ). lo_nodes->add( '/ |c |num |24022022 | ' ). @@ -2203,7 +2195,7 @@ DATA lt_hashed TYPE temp8. ls_exp-b = 24022022. TRY. - CREATE OBJECT lo_cut. + lo_cut = NEW #( ). lo_cut->to_abap( EXPORTING it_nodes = lo_nodes->sorted( ) @@ -2226,14 +2218,14 @@ DATA lt_hashed TYPE temp8. DATA li_json TYPE REF TO zif_abapgit_ajson. DATA lo_nodes TYPE REF TO lcl_nodes_helper. - CREATE OBJECT lo_nodes. + lo_nodes = NEW #( ). lo_nodes->add( ' | |object | | ' ). lo_nodes->add( '/ |a |str |test | ' ). lo_nodes->add( '/ |c |num |24022022 | ' ). ls_exp-a = 'test'. - CREATE OBJECT lo_cut. + lo_cut = NEW #( ). lo_cut->mt_json_tree = lo_nodes->mt_nodes. lo_cut->to_abap( @@ -2264,14 +2256,14 @@ DATA lt_hashed TYPE temp8. DATA lo_nodes TYPE REF TO lcl_nodes_helper. DATA lx TYPE REF TO zcx_abapgit_ajson_error. - CREATE OBJECT lo_nodes. + lo_nodes = NEW #( ). lo_nodes->add( ' | |object | | ' ). lo_nodes->add( '/ |a |str |test | ' ). lo_nodes->add( '/ |c |num |24022022 | ' ). ls_exp-a = 'test'. - CREATE OBJECT lo_cut. + lo_cut = NEW #( ). lo_cut->mt_json_tree = lo_nodes->mt_nodes. TRY. @@ -2293,8 +2285,7 @@ DATA lt_hashed TYPE temp8. bar TYPE string, END OF ty_foo_bar. - TYPES temp9 TYPE STANDARD TABLE OF ty_foo_bar. -DATA lt_foo_bar TYPE temp9. + DATA lt_foo_bar TYPE STANDARD TABLE OF ty_foo_bar. DATA ls_foo_bar LIKE LINE OF lt_foo_bar. DATA lo_ajson TYPE REF TO zcl_abapgit_ajson. DATA lv_json TYPE string. @@ -2327,8 +2318,7 @@ DATA lt_foo_bar TYPE temp9. bar TYPE string, END OF ty_foo_bar. - TYPES temp10 TYPE STANDARD TABLE OF ty_foo_bar WITH NON-UNIQUE KEY foo. -DATA lt_foo_bar TYPE temp10. + DATA lt_foo_bar TYPE STANDARD TABLE OF ty_foo_bar WITH NON-UNIQUE KEY foo. DATA ls_foo_bar LIKE LINE OF lt_foo_bar. DATA lo_ajson TYPE REF TO zcl_abapgit_ajson. DATA lv_json TYPE string. @@ -2361,8 +2351,7 @@ DATA lt_foo_bar TYPE temp10. bar TYPE string, END OF ty_foo_bar. - TYPES temp11 TYPE SORTED TABLE OF ty_foo_bar WITH NON-UNIQUE KEY foo. -DATA lt_foo_bar TYPE temp11. + DATA lt_foo_bar TYPE SORTED TABLE OF ty_foo_bar WITH NON-UNIQUE KEY foo. DATA ls_foo_bar LIKE LINE OF lt_foo_bar. DATA lo_ajson TYPE REF TO zcl_abapgit_ajson. DATA lv_json TYPE string. @@ -2395,8 +2384,7 @@ DATA lt_foo_bar TYPE temp11. bar TYPE string, END OF ty_foo_bar. - TYPES temp12 TYPE SORTED TABLE OF ty_foo_bar WITH UNIQUE KEY foo. -DATA lt_foo_bar TYPE temp12. + DATA lt_foo_bar TYPE SORTED TABLE OF ty_foo_bar WITH UNIQUE KEY foo. DATA ls_foo_bar LIKE LINE OF lt_foo_bar. DATA lo_ajson TYPE REF TO zcl_abapgit_ajson. DATA lv_json TYPE string. @@ -2429,8 +2417,7 @@ DATA lt_foo_bar TYPE temp12. bar TYPE string, END OF ty_foo_bar. - TYPES temp13 TYPE HASHED TABLE OF ty_foo_bar WITH UNIQUE KEY foo. -DATA lt_foo_bar TYPE temp13. + DATA lt_foo_bar TYPE HASHED TABLE OF ty_foo_bar WITH UNIQUE KEY foo. DATA ls_foo_bar LIKE LINE OF lt_foo_bar. DATA lo_ajson TYPE REF TO zcl_abapgit_ajson. DATA lv_json TYPE string. @@ -2523,7 +2510,7 @@ CLASS ltcl_writer_test IMPLEMENTATION. lo_cut = zcl_abapgit_ajson=>create_empty( ). - CREATE OBJECT lo_nodes_exp. + lo_nodes_exp = NEW #( ). lo_nodes_exp->add( ' | |object | ||1' ). lo_nodes_exp->add( '/ |a |object | ||1' ). lo_nodes_exp->add( '/a/ |b |object | ||1' ). @@ -2535,7 +2522,7 @@ CLASS ltcl_writer_test IMPLEMENTATION. act = lo_cut->mt_json_tree exp = lo_nodes_exp->sorted( ) ). - CREATE OBJECT lo_nodes_exp. + lo_nodes_exp = NEW #( ). lo_nodes_exp->add( ' | |object | ||1' ). lo_nodes_exp->add( '/ |a |object | ||1' ). lo_nodes_exp->add( '/a/ |b |object | ||1' ). @@ -2553,7 +2540,7 @@ CLASS ltcl_writer_test IMPLEMENTATION. lo_cut = zcl_abapgit_ajson=>create_empty( ). - CREATE OBJECT lo_nodes_exp. + lo_nodes_exp = NEW #( ). lo_nodes_exp->add( ' | |object | ||1' ). lo_nodes_exp->add( '/ |a |object | ||1' ). lo_nodes_exp->add( '/a/ |b |object | ||1' ). @@ -2562,7 +2549,7 @@ CLASS ltcl_writer_test IMPLEMENTATION. lo_cut->mt_json_tree = lo_nodes_exp->mt_nodes. - CREATE OBJECT lo_nodes_exp. + lo_nodes_exp = NEW #( ). lo_nodes_exp->add( ' | |object | ||1' ). lo_nodes_exp->add( '/ |a |object | ||0' ). @@ -2583,7 +2570,7 @@ CLASS ltcl_writer_test IMPLEMENTATION. lo_cut = zcl_abapgit_ajson=>create_empty( ). - CREATE OBJECT lo_nodes_exp. + lo_nodes_exp = NEW #( ). lo_nodes_exp->add( ' | |object | ||1' ). lo_nodes_exp->add( '/ |a |object | ||1' ). lo_nodes_exp->add( '/a/ |b |object | ||1' ). @@ -2592,7 +2579,7 @@ CLASS ltcl_writer_test IMPLEMENTATION. lo_cut->mt_json_tree = lo_nodes_exp->mt_nodes. - CREATE OBJECT lo_nodes_exp. + lo_nodes_exp = NEW #( ). lo_nodes_exp->add( ' | |object | ||1' ). lo_nodes_exp->add( '/ |a |object | ||0' ). @@ -2602,7 +2589,7 @@ CLASS ltcl_writer_test IMPLEMENTATION. act = lo_cut->mt_json_tree exp = lo_nodes_exp->sorted( ) ). - CREATE OBJECT lo_nodes_exp. + lo_nodes_exp = NEW #( ). lo_nodes_exp->add( ' | |object | ||1' ). lo_nodes_exp->add( '/ |a |object | ||1' ). lo_nodes_exp->add( '/a/ |b |object | ||1' ). @@ -2611,7 +2598,7 @@ CLASS ltcl_writer_test IMPLEMENTATION. lo_cut->mt_json_tree = lo_nodes_exp->mt_nodes. - CREATE OBJECT lo_nodes_exp. + lo_nodes_exp = NEW #( ). lo_nodes_exp->add( ' | |object | ||1' ). lo_nodes_exp->add( '/ |a |object | ||0' ). @@ -2635,7 +2622,7 @@ CLASS ltcl_writer_test IMPLEMENTATION. li_writer = lo_cut. " Prepare source - CREATE OBJECT lo_nodes. + lo_nodes = NEW #( ). lo_nodes->add( ' | |object | ||1' ). lo_nodes->add( '/ |x |object | ||2' ). lo_nodes->add( '/x/ |b |str |abc ||0' ). @@ -2658,7 +2645,7 @@ CLASS ltcl_writer_test IMPLEMENTATION. exp = lo_nodes->sorted( ) ). " Test 2 - assign deep - CREATE OBJECT lo_nodes. + lo_nodes = NEW #( ). lo_nodes->add( ' | |object | ||1' ). lo_nodes->add( '/ |a |object | ||1' ). lo_nodes->add( '/a/ |b |object | ||1' ). @@ -2676,7 +2663,7 @@ CLASS ltcl_writer_test IMPLEMENTATION. exp = lo_nodes->sorted( ) ). " Test 3 - assign rewrite - CREATE OBJECT lo_nodes. + lo_nodes = NEW #( ). lo_nodes->add( ' | |object | ||1' ). lo_nodes->add( '/ |a |object | ||1' ). lo_nodes->add( '/a/ |b |object | ||1' ). @@ -2703,7 +2690,7 @@ CLASS ltcl_writer_test IMPLEMENTATION. li_writer = lo_cut. " Prepare source - CREATE OBJECT lo_nodes. + lo_nodes = NEW #( ). lo_nodes->add( ' | |object | ||1' ). lo_nodes->add( '/ |x |object | ||2' ). lo_nodes->add( '/x/ |b |str |abc ||0' ). @@ -2731,7 +2718,7 @@ CLASS ltcl_writer_test IMPLEMENTATION. li_cut = zcl_abapgit_ajson=>create_empty( ). - CREATE OBJECT lo_nodes. + lo_nodes = NEW #( ). lo_nodes->add( ' | |object | ||1' ). lo_nodes->add( '/ |a |num |1 ||0' ). @@ -2745,7 +2732,7 @@ CLASS ltcl_writer_test IMPLEMENTATION. act = li_cut->mt_json_tree exp = lo_nodes->sorted( ) ). - CREATE OBJECT lo_nodes. + lo_nodes = NEW #( ). lo_nodes->add( ' | |object | ||2' ). lo_nodes->add( '/ |a |num |1 ||0' ). lo_nodes->add( '/ |b |num |0 ||0' ). @@ -2777,7 +2764,7 @@ CLASS ltcl_writer_test IMPLEMENTATION. li_writer = lo_cut. " Prepare source - CREATE OBJECT lo_nodes. + lo_nodes = NEW #( ). lo_nodes->add( ' | |object | ||1' ). lo_nodes->add( '/ |x |object | ||3' ). lo_nodes->add( '/x/ |b |str |abc ||0' ). @@ -2813,7 +2800,7 @@ CLASS ltcl_writer_test IMPLEMENTATION. li_writer = lo_cut. " Prepare source - CREATE OBJECT lo_nodes. + lo_nodes = NEW #( ). lo_nodes->add( ' | |object | ||6' ). lo_nodes->add( '/ |d |str |2022-04-01 ||0' ). lo_nodes->add( '/ |d_empty |str | ||0' ). @@ -2845,7 +2832,7 @@ CLASS ltcl_writer_test IMPLEMENTATION. APPEND 'world' TO lt_tab. " Prepare source - CREATE OBJECT lo_nodes. + lo_nodes = NEW #( ). lo_nodes->add( ' | |object | | |1' ). lo_nodes->add( '/ |x |array | | |2' ). lo_nodes->add( '/x/ |1 |str |hello|1|0' ). @@ -2865,8 +2852,7 @@ CLASS ltcl_writer_test IMPLEMENTATION. DATA lo_nodes TYPE REF TO lcl_nodes_helper. DATA lo_cut TYPE REF TO zcl_abapgit_ajson. DATA li_writer TYPE REF TO zif_abapgit_ajson. - TYPES temp14 TYPE HASHED TABLE OF string WITH UNIQUE KEY table_line. -DATA lt_tab TYPE temp14. + DATA lt_tab TYPE HASHED TABLE OF string WITH UNIQUE KEY table_line. lo_cut = zcl_abapgit_ajson=>create_empty( ). li_writer = lo_cut. @@ -2875,7 +2861,7 @@ DATA lt_tab TYPE temp14. INSERT `world` INTO TABLE lt_tab. " Prepare source - CREATE OBJECT lo_nodes. + lo_nodes = NEW #( ). lo_nodes->add( ' | |object | | |1' ). lo_nodes->add( '/ |x |array | | |2' ). lo_nodes->add( '/x/ |1 |str |hello|1|0' ). @@ -2920,7 +2906,7 @@ DATA lt_tab TYPE temp14. INSERT ls_tab INTO TABLE lt_tab. " prepare source - CREATE OBJECT lo_nodes. + lo_nodes = NEW #( ). lo_nodes->add( ' | |array | |0|2' ). lo_nodes->add( '/ |1 |object | |1|3' ). lo_nodes->add( '/ |2 |object | |2|3' ). @@ -2950,7 +2936,7 @@ DATA lt_tab TYPE temp14. li_writer = lo_cut. " touch - CREATE OBJECT lo_nodes_exp. + lo_nodes_exp = NEW #( ). lo_nodes_exp->add( ' | |object | | |1' ). lo_nodes_exp->add( '/ |a |array | | |0' ). @@ -2961,7 +2947,7 @@ DATA lt_tab TYPE temp14. exp = lo_nodes_exp->sorted( ) ). " add string - CREATE OBJECT lo_nodes_exp. + lo_nodes_exp = NEW #( ). lo_nodes_exp->add( ' | |object | | |1' ). lo_nodes_exp->add( '/ |a |array | | |1' ). lo_nodes_exp->add( '/a/ |1 |str |hello|1|0' ). @@ -2975,7 +2961,7 @@ DATA lt_tab TYPE temp14. exp = lo_nodes_exp->sorted( ) ). " add obj - CREATE OBJECT lo_nodes_exp. + lo_nodes_exp = NEW #( ). lo_nodes_exp->add( ' | |object | | |1' ). lo_nodes_exp->add( '/ |a |array | | |2' ). lo_nodes_exp->add( '/a/ |1 |str |hello|1|0' ). @@ -3003,7 +2989,7 @@ DATA lt_tab TYPE temp14. exp = lo_nodes_exp->sorted( ) ). " re-touch with clear - CREATE OBJECT lo_nodes_exp. + lo_nodes_exp = NEW #( ). lo_nodes_exp->add( ' | |object | | |1' ). lo_nodes_exp->add( '/ |a |array | | |0' ). @@ -3016,7 +3002,7 @@ DATA lt_tab TYPE temp14. exp = lo_nodes_exp->sorted( ) ). " free-add array item (index must be updated) - CREATE OBJECT lo_nodes_exp. + lo_nodes_exp = NEW #( ). lo_nodes_exp->add( ' | |object | | |1' ). lo_nodes_exp->add( '/ |a |array | | |2' ). lo_nodes_exp->add( '/a/ |1 |object | |1|1' ). @@ -3136,7 +3122,7 @@ DATA lt_tab TYPE temp14. li_writer = lo_cut. " object - CREATE OBJECT lo_nodes_exp. + lo_nodes_exp = NEW #( ). lo_nodes_exp->add( ' | |object | ||1' ). lo_nodes_exp->add( '/ |x |str |hello||0' ). @@ -3149,7 +3135,7 @@ DATA lt_tab TYPE temp14. exp = lo_nodes_exp->sorted( ) ). " object empty path - CREATE OBJECT lo_nodes_exp. + lo_nodes_exp = NEW #( ). lo_nodes_exp->add( ' | |object | ||1' ). lo_nodes_exp->add( '/ |x |str |hello||0' ). @@ -3163,7 +3149,7 @@ DATA lt_tab TYPE temp14. exp = lo_nodes_exp->sorted( ) ). " array - CREATE OBJECT lo_nodes_exp. + lo_nodes_exp = NEW #( ). lo_nodes_exp->add( ' | |array | | |1' ). lo_nodes_exp->add( '/ |1 |str |hello|1|0' ). @@ -3178,7 +3164,7 @@ DATA lt_tab TYPE temp14. exp = lo_nodes_exp->sorted( ) ). " value - CREATE OBJECT lo_nodes_exp. + lo_nodes_exp = NEW #( ). lo_nodes_exp->add( ' | |str |hello||0' ). li_writer->clear( ). @@ -3201,7 +3187,7 @@ DATA lt_tab TYPE temp14. " abap_bool lo_cut = zcl_abapgit_ajson=>create_empty( ). li_writer = lo_cut. - CREATE OBJECT lo_nodes_exp. + lo_nodes_exp = NEW #( ). lo_nodes_exp->add( ' | |object | ||2' ). lo_nodes_exp->add( '/ |a |bool |true ||0' ). lo_nodes_exp->add( '/ |b |bool |false ||0' ). @@ -3228,7 +3214,7 @@ DATA lt_tab TYPE temp14. " int lo_cut = zcl_abapgit_ajson=>create_empty( ). li_writer = lo_cut. - CREATE OBJECT lo_nodes_exp. + lo_nodes_exp = NEW #( ). lo_nodes_exp->add( ' | |object | ||2' ). lo_nodes_exp->add( '/ |a |bool |true ||0' ). lo_nodes_exp->add( '/ |b |bool |false ||0' ). @@ -3256,7 +3242,7 @@ DATA lt_tab TYPE temp14. " tab lo_cut = zcl_abapgit_ajson=>create_empty( ). li_writer = lo_cut. - CREATE OBJECT lo_nodes_exp. + lo_nodes_exp = NEW #( ). lo_nodes_exp->add( ' | |object | ||2' ). lo_nodes_exp->add( '/ |a |bool |true ||0' ). lo_nodes_exp->add( '/ |b |bool |false ||0' ). @@ -3285,7 +3271,7 @@ DATA lt_tab TYPE temp14. lo_cut = zcl_abapgit_ajson=>create_empty( ). li_writer = lo_cut. - CREATE OBJECT lo_nodes_exp. + lo_nodes_exp = NEW #( ). lo_nodes_exp->add( ' | |object | ||3' ). lo_nodes_exp->add( '/ |a |str |123 ||0' ). lo_nodes_exp->add( '/ |b |str |X ||0' ). @@ -3316,7 +3302,7 @@ DATA lt_tab TYPE temp14. lo_cut = zcl_abapgit_ajson=>create_empty( ). li_writer = lo_cut. - CREATE OBJECT lo_nodes_exp. + lo_nodes_exp = NEW #( ). lo_nodes_exp->add( ' | |object | ||1' ). lo_nodes_exp->add( '/ |a |num |123 ||0' ). @@ -3337,7 +3323,7 @@ DATA lt_tab TYPE temp14. DATA lv_p TYPE p LENGTH 5 DECIMALS 2 VALUE '123.45'. li_json = zcl_abapgit_ajson=>create_empty( ). - CREATE OBJECT lo_nodes_exp. + lo_nodes_exp = NEW #( ). lo_nodes_exp->add( ' | |object | ||1' ). lo_nodes_exp->add( '/ |a |num |123.45 ||0' ). @@ -3360,7 +3346,7 @@ DATA lt_tab TYPE temp14. lo_cut = zcl_abapgit_ajson=>create_empty( ). li_writer = lo_cut. - CREATE OBJECT lo_nodes_exp. + lo_nodes_exp = NEW #( ). lo_nodes_exp->add( ' | |object | ||2' ). lo_nodes_exp->add( '/ |a |str |2020-07-05 ||0' ). lo_nodes_exp->add( '/ |b |str | ||0' ). @@ -3390,7 +3376,7 @@ DATA lt_tab TYPE temp14. lo_cut = zcl_abapgit_ajson=>create_empty( ). li_writer = lo_cut. - CREATE OBJECT lo_nodes_exp. + lo_nodes_exp = NEW #( ). lo_nodes_exp->add( ' | |object | ||1' ). lo_nodes_exp->add( '/ |a |str |2021-05-05T12:00:00Z ||0' ). @@ -3466,7 +3452,7 @@ DATA lt_tab TYPE temp14. DATA lo_nodes_exp TYPE REF TO lcl_nodes_helper. DATA li_writer TYPE REF TO zif_abapgit_ajson. - CREATE OBJECT lo_nodes_exp. + lo_nodes_exp = NEW #( ). lo_nodes_exp->add( ' | |object | | |1' ). lo_nodes_exp->add( '/ |issues |array | | |2' ). lo_nodes_exp->add( '/issues/ |1 |object | |1 |1' ). @@ -3895,10 +3881,8 @@ CLASS ltcl_integrated IMPLEMENTATION. METHOD array_index. - TYPES temp15 TYPE TABLE OF ty_loc. -DATA lt_act TYPE temp15. - TYPES temp16 TYPE TABLE OF ty_loc. -DATA lt_exp TYPE temp16. + DATA lt_act TYPE TABLE OF ty_loc. + DATA lt_exp TYPE TABLE OF ty_loc. DATA ls_exp TYPE ty_loc. DATA lv_src TYPE string. @@ -4251,7 +4235,7 @@ CLASS ltcl_abap_to_json IMPLEMENTATION. DATA lo_src TYPE REF TO zcl_abapgit_ajson. lo_src = zcl_abapgit_ajson=>create_empty( ). - CREATE OBJECT lo_nodes. + lo_nodes = NEW #( ). lo_nodes->add( ' | |object | ||1' ). lo_nodes->add( '/ |a |object | ||1' ). lo_nodes->add( '/a/ |b |object | ||1' ). @@ -4273,7 +4257,7 @@ CLASS ltcl_abap_to_json IMPLEMENTATION. DATA lt_nodes TYPE zif_abapgit_ajson_types=>ty_nodes_tt. " number - CREATE OBJECT lo_nodes_exp. + lo_nodes_exp = NEW #( ). lo_nodes_exp->add( ' | |num |1 ||' ). lt_nodes = lcl_abap_to_json=>convert( iv_data = 1 ). @@ -4290,7 +4274,7 @@ CLASS ltcl_abap_to_json IMPLEMENTATION. DATA lt_nodes TYPE zif_abapgit_ajson_types=>ty_nodes_tt. " string - CREATE OBJECT lo_nodes_exp. + lo_nodes_exp = NEW #( ). lo_nodes_exp->add( ' | |str |abc ||' ). lt_nodes = lcl_abap_to_json=>convert( iv_data = 'abc' ). @@ -4307,7 +4291,7 @@ CLASS ltcl_abap_to_json IMPLEMENTATION. DATA lt_nodes TYPE zif_abapgit_ajson_types=>ty_nodes_tt. " true - CREATE OBJECT lo_nodes_exp. + lo_nodes_exp = NEW #( ). lo_nodes_exp->add( ' | |bool |true ||' ). lt_nodes = lcl_abap_to_json=>convert( iv_data = abap_true ). @@ -4324,7 +4308,7 @@ CLASS ltcl_abap_to_json IMPLEMENTATION. DATA lt_nodes TYPE zif_abapgit_ajson_types=>ty_nodes_tt. " false - CREATE OBJECT lo_nodes_exp. + lo_nodes_exp = NEW #( ). lo_nodes_exp->add( ' | |bool |false ||' ). lt_nodes = lcl_abap_to_json=>convert( iv_data = abap_false ). @@ -4341,7 +4325,7 @@ CLASS ltcl_abap_to_json IMPLEMENTATION. DATA lt_nodes TYPE zif_abapgit_ajson_types=>ty_nodes_tt. DATA lv_xsdboolean TYPE xsdboolean. - CREATE OBJECT lo_nodes_exp. + lo_nodes_exp = NEW #( ). lo_nodes_exp->add( ' | |bool |true ||' ). lv_xsdboolean = 'X'. @@ -4360,7 +4344,7 @@ CLASS ltcl_abap_to_json IMPLEMENTATION. DATA lv_null_ref TYPE REF TO data. " null - CREATE OBJECT lo_nodes_exp. + lo_nodes_exp = NEW #( ). lo_nodes_exp->add( ' | |null |null ||' ). lt_nodes = lcl_abap_to_json=>convert( iv_data = lv_null_ref ). @@ -4378,7 +4362,7 @@ CLASS ltcl_abap_to_json IMPLEMENTATION. DATA lv_timezone TYPE timezone VALUE ''. DATA lv_timestamp TYPE timestamp. - CREATE OBJECT lo_nodes_exp. + lo_nodes_exp = NEW #( ). lo_nodes_exp->add( ' | |str |2022-08-31T00:00:00Z||' ). CONVERT DATE '20220831' TIME '000000' @@ -4397,7 +4381,7 @@ CLASS ltcl_abap_to_json IMPLEMENTATION. DATA lt_nodes TYPE zif_abapgit_ajson_types=>ty_nodes_tt. DATA lv_timestamp TYPE timestamp. - CREATE OBJECT lo_nodes_exp. + lo_nodes_exp = NEW #( ). lo_nodes_exp->add( ' | |str |0000-00-00T00:00:00Z||' ). lv_timestamp = 0. @@ -4417,7 +4401,7 @@ CLASS ltcl_abap_to_json IMPLEMENTATION. ls_prefix-path = '/a/'. ls_prefix-name = 'b'. - CREATE OBJECT lo_nodes_exp. + lo_nodes_exp = NEW #( ). lo_nodes_exp->add( '/a/ |b |num |1 ||' ). lt_nodes = lcl_abap_to_json=>convert( @@ -4441,7 +4425,7 @@ CLASS ltcl_abap_to_json IMPLEMENTATION. ls_struc-c = abap_true. ls_struc-d = 'X'. - CREATE OBJECT lo_nodes_exp. + lo_nodes_exp = NEW #( ). lo_nodes_exp->add( ' | |object | ||4' ). lo_nodes_exp->add( '/ |a |str |abc ||0' ). lo_nodes_exp->add( '/ |b |num |10 ||0' ). @@ -4480,7 +4464,7 @@ CLASS ltcl_abap_to_json IMPLEMENTATION. APPEND INITIAL LINE TO ls_struc-tab ASSIGNING . -a = 'bcd'. - CREATE OBJECT lo_nodes_exp. + lo_nodes_exp = NEW #( ). lo_nodes_exp->add( ' | |object | ||8' ). lo_nodes_exp->add( '/ |a |str |abc ||0' ). lo_nodes_exp->add( '/ |b |num |10 ||0' ). @@ -4529,7 +4513,7 @@ CLASS ltcl_abap_to_json IMPLEMENTATION. ls_struc-d_suf = 'X'. ls_struc-el = 'elem'. - CREATE OBJECT lo_nodes_exp. + lo_nodes_exp = NEW #( ). lo_nodes_exp->add( ' | |object | ||5' ). lo_nodes_exp->add( '/ |a_suf |str |abc ||0' ). lo_nodes_exp->add( '/ |b_suf |num |10 ||0' ). @@ -4550,8 +4534,7 @@ CLASS ltcl_abap_to_json IMPLEMENTATION. DATA lo_nodes_exp TYPE REF TO lcl_nodes_helper. DATA lt_nodes TYPE zif_abapgit_ajson_types=>ty_nodes_tt. - TYPES temp17 TYPE TABLE OF ty_struc. -DATA lt_tab TYPE temp17. + DATA lt_tab TYPE TABLE OF ty_struc. FIELD-SYMBOLS LIKE LINE OF lt_tab. APPEND INITIAL LINE TO lt_tab ASSIGNING . @@ -4561,7 +4544,7 @@ DATA lt_tab TYPE temp17. -a = 'bcd'. -b = 20. - CREATE OBJECT lo_nodes_exp. + lo_nodes_exp = NEW #( ). lo_nodes_exp->add( ' | |array | | |2' ). lo_nodes_exp->add( '/ |1 |object | |1|4' ). lo_nodes_exp->add( '/1/ |a |str |abc | |0' ). @@ -4584,7 +4567,7 @@ DATA lt_tab TYPE temp17. APPEND 'abc' TO lt_strtab. APPEND 'bcd' TO lt_strtab. - CREATE OBJECT lo_nodes_exp. + lo_nodes_exp = NEW #( ). lo_nodes_exp->add( ' | |array | | |2' ). lo_nodes_exp->add( '/ |1 |str |abc |1|0' ). lo_nodes_exp->add( '/ |2 |str |bcd |2|0' ). @@ -4619,8 +4602,7 @@ CLASS ltcl_filter_test DEFINITION FINAL type TYPE zif_abapgit_ajson_filter=>ty_visit_type, END OF ty_visit_history. - TYPES temp18_9418cd8b8d TYPE TABLE OF ty_visit_history. -DATA mt_visit_history TYPE temp18_9418cd8b8d. + DATA mt_visit_history TYPE TABLE OF ty_visit_history. METHODS simple_test FOR TESTING RAISING zcx_abapgit_ajson_error. METHODS array_test FOR TESTING RAISING zcx_abapgit_ajson_error. @@ -4641,9 +4623,7 @@ CLASS ltcl_filter_test IMPLEMENTATION. APPEND ls_visit_history TO mt_visit_history. ENDIF. - DATA temp1 TYPE xsdboolean. - temp1 = boolc( NOT is_node-name CA 'xX' AND NOT is_node-value CA 'xX' ). - rv_keep = temp1. + rv_keep = xsdbool( NOT is_node-name CA 'xX' AND NOT is_node-value CA 'xX' ). ENDMETHOD. @@ -4674,7 +4654,7 @@ CLASS ltcl_filter_test IMPLEMENTATION. ii_source_json = lo_json ii_filter = me ). - CREATE OBJECT lo_nodes_exp. + lo_nodes_exp = NEW #( ). lo_nodes_exp->add( ' | |object | | |3' ). lo_nodes_exp->add( '/ |a |num |1 | |0' ). lo_nodes_exp->add( '/ |b |num |1 | |0' ). @@ -4733,7 +4713,7 @@ CLASS ltcl_filter_test IMPLEMENTATION. ii_source_json = lo_json ii_filter = me ). - CREATE OBJECT lo_nodes_exp. + lo_nodes_exp = NEW #( ). lo_nodes_exp->add( ' | |array | | |10' ). lo_nodes_exp->add( '/ |1 |str |a |1|0' ). lo_nodes_exp->add( '/ |2 |str |b |2|0' ). @@ -4878,7 +4858,7 @@ CLASS ltcl_mapper_test IMPLEMENTATION. ii_source_json = lo_json ii_mapper = me ). - CREATE OBJECT lo_nodes_exp. + lo_nodes_exp = NEW #( ). lo_nodes_exp->add( ' | |object | | |4' ). lo_nodes_exp->add( '/ |AB |num |1 | |0' ). lo_nodes_exp->add( '/ |bc |num |2 | |0' ). @@ -4920,7 +4900,7 @@ CLASS ltcl_mapper_test IMPLEMENTATION. ii_source_json = lo_json ii_mapper = me ). - CREATE OBJECT lo_nodes_exp. + lo_nodes_exp = NEW #( ). lo_nodes_exp->add( ' | |array | | |2' ). lo_nodes_exp->add( '/ |1 |object | |1|2' ). lo_nodes_exp->add( '/ |2 |object | |2|2' ). @@ -4979,7 +4959,7 @@ CLASS ltcl_mapper_test IMPLEMENTATION. ii_source_json = lo_json ii_mapper = me ). - CREATE OBJECT lo_nodes_exp. + lo_nodes_exp = NEW #( ). lo_nodes_exp->add( ' | |num |1 | |0' ). cl_abap_unit_assert=>assert_equals( act = lo_json_filtered->mt_json_tree @@ -5053,7 +5033,7 @@ CLASS ltcl_cloning_test IMPLEMENTATION. li_json_new = li_json->clone( ). - CREATE OBJECT lo_nodes_exp. + lo_nodes_exp = NEW #( ). lo_nodes_exp->add( ' | |object | | |2' ). lo_nodes_exp->add( '/ |ab |num |1 | |0' ). lo_nodes_exp->add( '/ |xy |num |2 | |0' ). @@ -5094,7 +5074,7 @@ CLASS ltcl_cloning_test IMPLEMENTATION. li_json_new = li_json->filter( me ). - CREATE OBJECT lo_nodes_exp. + lo_nodes_exp = NEW #( ). lo_nodes_exp->add( ' | |object | | |1' ). lo_nodes_exp->add( '/ |ab |num |1 | |0' ). @@ -5120,7 +5100,7 @@ CLASS ltcl_cloning_test IMPLEMENTATION. li_json_new = li_json->map( me ). - CREATE OBJECT lo_nodes_exp. + lo_nodes_exp = NEW #( ). lo_nodes_exp->add( ' | |object | | |2' ). lo_nodes_exp->add( '/ |AB |num |1 | |0' ). lo_nodes_exp->add( '/ |xy |num |2 | |0' ). @@ -5146,9 +5126,7 @@ CLASS ltcl_cloning_test IMPLEMENTATION. ENDMETHOD. METHOD zif_abapgit_ajson_filter~keep_node. - DATA temp2 TYPE xsdboolean. - temp2 = boolc( is_node-name IS INITIAL OR is_node-name+0(1) <> 'x' ). - rv_keep = temp2. + rv_keep = xsdbool( is_node-name IS INITIAL OR is_node-name+0(1) <> 'x' ). ENDMETHOD. METHOD mapper_and_filter. @@ -5173,7 +5151,7 @@ CLASS ltcl_cloning_test IMPLEMENTATION. ii_filter = me ii_mapper = me ). - CREATE OBJECT lo_nodes_exp. + lo_nodes_exp = NEW #( ). lo_nodes_exp->add( ' | |object | | |2' ). lo_nodes_exp->add( '/ |AB |num |1 | |0' ). lo_nodes_exp->add( '/ |bc |num |2 | |0' ). diff --git a/src/json/zcl_abapgit_ajson_filter_lib.clas.abap b/src/json/zcl_abapgit_ajson_filter_lib.clas.abap index 0b92ea7dc..23a167675 100644 --- a/src/json/zcl_abapgit_ajson_filter_lib.clas.abap +++ b/src/json/zcl_abapgit_ajson_filter_lib.clas.abap @@ -37,18 +37,18 @@ CLASS zcl_abapgit_ajson_filter_lib IMPLEMENTATION. METHOD create_and_filter. - CREATE OBJECT ri_filter TYPE lcl_and_filter EXPORTING it_filters = it_filters. + ri_filter = NEW lcl_and_filter( it_filters = it_filters ). ENDMETHOD. METHOD create_empty_filter. - CREATE OBJECT ri_filter TYPE lcl_empty_filter. + ri_filter = NEW lcl_empty_filter( ). ENDMETHOD. METHOD create_path_filter. - CREATE OBJECT ri_filter TYPE lcl_paths_filter EXPORTING iv_pattern_search = iv_pattern_search - it_skip_paths = it_skip_paths - iv_skip_paths = iv_skip_paths. + ri_filter = NEW lcl_paths_filter( iv_pattern_search = iv_pattern_search + it_skip_paths = it_skip_paths + iv_skip_paths = iv_skip_paths ). ENDMETHOD. ENDCLASS. diff --git a/src/json/zcl_abapgit_ajson_filter_lib.clas.locals_imp.abap b/src/json/zcl_abapgit_ajson_filter_lib.clas.locals_imp.abap index b607cdae9..aa04d65c4 100644 --- a/src/json/zcl_abapgit_ajson_filter_lib.clas.locals_imp.abap +++ b/src/json/zcl_abapgit_ajson_filter_lib.clas.locals_imp.abap @@ -10,9 +10,9 @@ ENDCLASS. CLASS lcl_empty_filter IMPLEMENTATION. METHOD zif_abapgit_ajson_filter~keep_node. - DATA temp1 TYPE xsdboolean. - temp1 = boolc( ( iv_visit = zif_abapgit_ajson_filter=>visit_type-value AND is_node-value IS NOT INITIAL ) OR ( iv_visit <> zif_abapgit_ajson_filter=>visit_type-value AND is_node-children > 0 ) ). - rv_keep = temp1. + rv_keep = xsdbool( + ( iv_visit = zif_abapgit_ajson_filter=>visit_type-value AND is_node-value IS NOT INITIAL ) OR + ( iv_visit <> zif_abapgit_ajson_filter=>visit_type-value AND is_node-children > 0 ) ). " children = 0 on open for initially empty nodes and on close for filtered ones ENDMETHOD. @@ -33,8 +33,7 @@ CLASS lcl_paths_filter DEFINITION FINAL. RAISING zcx_abapgit_ajson_error. PRIVATE SECTION. - TYPES temp1_c60817b628 TYPE HASHED TABLE OF string WITH UNIQUE KEY table_line. -DATA mt_skip_paths TYPE temp1_c60817b628. + DATA mt_skip_paths TYPE HASHED TABLE OF string WITH UNIQUE KEY table_line. DATA mv_pattern_search TYPE abap_bool. ENDCLASS. @@ -57,9 +56,7 @@ CLASS lcl_paths_filter IMPLEMENTATION. ENDLOOP. ELSE. READ TABLE mt_skip_paths WITH KEY table_line = lv_full_path TRANSPORTING NO FIELDS. - DATA temp2 TYPE xsdboolean. - temp2 = boolc( sy-subrc <> 0 ). - rv_keep = temp2. + rv_keep = xsdbool( sy-subrc <> 0 ). ENDIF. ENDMETHOD. @@ -70,11 +67,7 @@ CLASS lcl_paths_filter IMPLEMENTATION. DATA lt_tab TYPE string_table. FIELD-SYMBOLS TYPE string. - DATA temp3 TYPE xsdboolean. - temp3 = boolc( iv_skip_paths IS INITIAL ). - DATA temp1 TYPE xsdboolean. - temp1 = boolc( it_skip_paths IS INITIAL ). - IF temp3 = temp1. " XOR + IF xsdbool( iv_skip_paths IS INITIAL ) = xsdbool( it_skip_paths IS INITIAL ). " XOR zcx_abapgit_ajson_error=>raise( 'no filter path specified' ). ENDIF. diff --git a/src/json/zcl_abapgit_ajson_mapping.clas.abap b/src/json/zcl_abapgit_ajson_mapping.clas.abap index 658dad092..00aac1bda 100644 --- a/src/json/zcl_abapgit_ajson_mapping.clas.abap +++ b/src/json/zcl_abapgit_ajson_mapping.clas.abap @@ -77,8 +77,8 @@ CLASS zcl_abapgit_ajson_mapping IMPLEMENTATION. METHOD create_camel_case. - CREATE OBJECT ri_mapping TYPE lcl_mapping_camel EXPORTING it_mapping_fields = it_mapping_fields - iv_first_json_upper = iv_first_json_upper. + ri_mapping = NEW lcl_mapping_camel( it_mapping_fields = it_mapping_fields + iv_first_json_upper = iv_first_json_upper ). ENDMETHOD. @@ -93,50 +93,50 @@ CLASS zcl_abapgit_ajson_mapping IMPLEMENTATION. APPEND LINES OF it_more TO lt_queue. DELETE lt_queue WHERE table_line IS INITIAL. - CREATE OBJECT ri_mapping TYPE lcl_compound_mapper EXPORTING it_queue = lt_queue. + ri_mapping = NEW lcl_compound_mapper( it_queue = lt_queue ). ENDMETHOD. METHOD create_field_mapping. - CREATE OBJECT ri_mapping TYPE lcl_mapping_fields EXPORTING it_mapping_fields = it_mapping_fields. + ri_mapping = NEW lcl_mapping_fields( it_mapping_fields = it_mapping_fields ). ENDMETHOD. METHOD create_lower_case. - CREATE OBJECT ri_mapping TYPE lcl_mapping_to_lower EXPORTING it_mapping_fields = it_mapping_fields. + ri_mapping = NEW lcl_mapping_to_lower( it_mapping_fields = it_mapping_fields ). ENDMETHOD. METHOD create_rename. - CREATE OBJECT ri_mapping TYPE lcl_rename EXPORTING it_rename_map = it_rename_map - iv_rename_by = iv_rename_by. + ri_mapping = NEW lcl_rename( it_rename_map = it_rename_map + iv_rename_by = iv_rename_by ). ENDMETHOD. METHOD create_to_camel_case. - CREATE OBJECT ri_mapping TYPE lcl_to_camel EXPORTING iv_first_json_upper = iv_first_json_upper. + ri_mapping = NEW lcl_to_camel( iv_first_json_upper = iv_first_json_upper ). ENDMETHOD. METHOD create_to_snake_case. - CREATE OBJECT ri_mapping TYPE lcl_to_snake. + ri_mapping = NEW lcl_to_snake( ). ENDMETHOD. METHOD create_upper_case. - CREATE OBJECT ri_mapping TYPE lcl_mapping_to_upper EXPORTING it_mapping_fields = it_mapping_fields. + ri_mapping = NEW lcl_mapping_to_upper( it_mapping_fields = it_mapping_fields ). ENDMETHOD. ENDCLASS. diff --git a/src/json/zcl_abapgit_ajson_mapping.clas.locals_imp.abap b/src/json/zcl_abapgit_ajson_mapping.clas.locals_imp.abap index 0c535bcf7..6b9ceefcb 100644 --- a/src/json/zcl_abapgit_ajson_mapping.clas.locals_imp.abap +++ b/src/json/zcl_abapgit_ajson_mapping.clas.locals_imp.abap @@ -69,15 +69,11 @@ CLASS lcl_rename IMPLEMENTATION. CASE mv_rename_by. WHEN zcl_abapgit_ajson_mapping=>rename_by-attr_name. READ TABLE mt_rename_map ASSIGNING WITH TABLE KEY by_name COMPONENTS from = cv_name. - DATA temp1 TYPE xsdboolean. - temp1 = boolc( sy-subrc = 0 ). - lv_pair_found = temp1. + lv_pair_found = xsdbool( sy-subrc = 0 ). WHEN zcl_abapgit_ajson_mapping=>rename_by-full_path. lv_full_path = is_node-path && cv_name. READ TABLE mt_rename_map ASSIGNING WITH TABLE KEY by_name COMPONENTS from = lv_full_path. - DATA temp2 TYPE xsdboolean. - temp2 = boolc( sy-subrc = 0 ). - lv_pair_found = temp2. + lv_pair_found = xsdbool( sy-subrc = 0 ). WHEN zcl_abapgit_ajson_mapping=>rename_by-pattern. lv_full_path = is_node-path && cv_name. LOOP AT mt_rename_map ASSIGNING . @@ -208,8 +204,7 @@ CLASS lcl_mapping_camel IMPLEMENTATION. "DEPRECATED METHOD zif_abapgit_ajson_mapping~to_json. TYPES ty_token TYPE c LENGTH 255. - TYPES temp1 TYPE STANDARD TABLE OF ty_token. -DATA lt_tokens TYPE temp1. + DATA lt_tokens TYPE STANDARD TABLE OF ty_token. DATA lv_from TYPE i. FIELD-SYMBOLS LIKE LINE OF lt_tokens. @@ -313,8 +308,7 @@ CLASS lcl_to_camel IMPLEMENTATION. TYPES lty_token TYPE c LENGTH 255. CONSTANTS lc_forced_underscore_marker TYPE c LENGTH 1 VALUE cl_abap_char_utilities=>horizontal_tab. - TYPES temp2 TYPE STANDARD TABLE OF lty_token. -DATA lt_tokens TYPE temp2. + DATA lt_tokens TYPE STANDARD TABLE OF lty_token. DATA lv_from TYPE i. FIELD-SYMBOLS LIKE LINE OF lt_tokens. diff --git a/src/json/zcl_abapgit_ajson_utilities.clas.abap b/src/json/zcl_abapgit_ajson_utilities.clas.abap index f9ced6f08..4f656808c 100644 --- a/src/json/zcl_abapgit_ajson_utilities.clas.abap +++ b/src/json/zcl_abapgit_ajson_utilities.clas.abap @@ -308,9 +308,10 @@ CLASS zcl_abapgit_ajson_utilities IMPLEMENTATION. eo_delete = li_del eo_change = li_mod ). - DATA temp1 TYPE xsdboolean. - temp1 = boolc( li_ins->is_empty( ) = abap_true AND li_del->is_empty( ) = abap_true AND li_mod->is_empty( ) = abap_true ). - rv_yes = temp1. + rv_yes = xsdbool( + li_ins->is_empty( ) = abap_true AND + li_del->is_empty( ) = abap_true AND + li_mod->is_empty( ) = abap_true ). ENDMETHOD. @@ -341,17 +342,13 @@ CLASS zcl_abapgit_ajson_utilities IMPLEMENTATION. METHOD new. - CREATE OBJECT ro_instance. + ro_instance = NEW #( ). ENDMETHOD. METHOD normalize_input. - DATA temp2 TYPE xsdboolean. - temp2 = boolc( iv_json IS INITIAL ). - DATA temp1 TYPE xsdboolean. - temp1 = boolc( io_json IS INITIAL ). - IF temp2 = temp1. + IF xsdbool( iv_json IS INITIAL ) = xsdbool( io_json IS INITIAL ). zcx_abapgit_ajson_error=>raise( 'Either supply JSON string or instance, but not both' ). ENDIF. diff --git a/src/json/zcl_abapgit_ajson_utilities.clas.testclasses.abap b/src/json/zcl_abapgit_ajson_utilities.clas.testclasses.abap index 4ee90fa9b..382bc2850 100644 --- a/src/json/zcl_abapgit_ajson_utilities.clas.testclasses.abap +++ b/src/json/zcl_abapgit_ajson_utilities.clas.testclasses.abap @@ -192,7 +192,7 @@ CLASS ltcl_json_utils IMPLEMENTATION. REPLACE ALL OCCURRENCES OF '\n' IN lv_json WITH cl_abap_char_utilities=>newline. - CREATE OBJECT lo_insert_exp. + lo_insert_exp = NEW #( ). lo_insert_exp->add( ' | |object | |0|3' ). lo_insert_exp->add( '/ |boolean |str |true |0|0' ). " changed type (insert new) lo_insert_exp->add( '/ |issues |array | |0|1' ). @@ -201,7 +201,7 @@ CLASS ltcl_json_utils IMPLEMENTATION. lo_insert_exp->add( '/issues/1/ |end |object | |0|1' ). lo_insert_exp->add( '/issues/1/end/ |new |num |1 |0|0' ). " array insert - CREATE OBJECT lo_delete_exp. + lo_delete_exp = NEW #( ). lo_delete_exp->add( ' | |object | |0|3' ). lo_delete_exp->add( '/ |boolean |bool |true |0|0' ). " changed type (delete old) lo_delete_exp->add( '/ |false |bool |false |0|0' ). " delete @@ -210,7 +210,7 @@ CLASS ltcl_json_utils IMPLEMENTATION. lo_delete_exp->add( '/issues/1/ |end |object | |0|1' ). lo_delete_exp->add( '/issues/1/end/ |row |num |4 |0|0' ). " array delete - CREATE OBJECT lo_change_exp. + lo_change_exp = NEW #( ). lo_change_exp->add( ' | |object | |0|2' ). lo_change_exp->add( '/ |issues |array | |0|1' ). lo_change_exp->add( '/ |number |num |789 |0|0' ). " changed value @@ -218,7 +218,7 @@ CLASS ltcl_json_utils IMPLEMENTATION. lo_change_exp->add( '/issues/1/ |start |object | |0|1' ). lo_change_exp->add( '/issues/1/start/|row |num |5 |0|0' ). " array change - CREATE OBJECT lo_util. + lo_util = NEW #( ). lo_util->diff( EXPORTING @@ -275,18 +275,18 @@ CLASS ltcl_json_utils IMPLEMENTATION. REPLACE ALL OCCURRENCES OF '\n' IN lv_json_a WITH cl_abap_char_utilities=>newline. REPLACE ALL OCCURRENCES OF '\n' IN lv_json_b WITH cl_abap_char_utilities=>newline. - CREATE OBJECT lo_insert_exp. + lo_insert_exp = NEW #( ). lo_insert_exp->add( ' | |object | |0|1' ). lo_insert_exp->add( '/ |string |array | |0|3' ). lo_insert_exp->add( '/string/ |1 |str |a |1|0' ). lo_insert_exp->add( '/string/ |2 |str |b |2|0' ). lo_insert_exp->add( '/string/ |3 |str |c |3|0' ). - CREATE OBJECT lo_delete_exp. + lo_delete_exp = NEW #( ). lo_delete_exp->add( ' | |object | |0|1' ). lo_delete_exp->add( '/ |string |str |abc |0|0' ). - CREATE OBJECT lo_util. + lo_util = NEW #( ). lo_util->diff( EXPORTING @@ -359,7 +359,7 @@ CLASS ltcl_json_utils IMPLEMENTATION. REPLACE ALL OCCURRENCES OF '\n' IN lv_json_a WITH cl_abap_char_utilities=>newline. REPLACE ALL OCCURRENCES OF '\n' IN lv_json_b WITH cl_abap_char_utilities=>newline. - CREATE OBJECT lo_util. + lo_util = NEW #( ). " Empty arrays are ignored by default lo_util->diff( @@ -394,7 +394,7 @@ CLASS ltcl_json_utils IMPLEMENTATION. eo_delete = lo_delete eo_change = lo_change ). - CREATE OBJECT lo_insert_exp. + lo_insert_exp = NEW #( ). lo_insert_exp->add( ' | |object | |0|1' ). lo_insert_exp->add( '/ |names |array | |0|0' ). @@ -444,7 +444,7 @@ CLASS ltcl_json_utils IMPLEMENTATION. REPLACE ALL OCCURRENCES OF '\n' IN lv_json_a WITH cl_abap_char_utilities=>newline. REPLACE ALL OCCURRENCES OF '\n' IN lv_json_b WITH cl_abap_char_utilities=>newline. - CREATE OBJECT lo_merge_exp. + lo_merge_exp = NEW #( ). lo_merge_exp->add( ' | |object | |0|3' ). lo_merge_exp->add( '/ |float |num |123.45 |0|0' ). lo_merge_exp->add( '/ |number |num |123 |0|0' ). @@ -453,7 +453,7 @@ CLASS ltcl_json_utils IMPLEMENTATION. lo_merge_exp->add( '/string/ |2 |str |c |2|0' ). lo_merge_exp->add( '/string/ |3 |str |b |3|0' ). - CREATE OBJECT lo_util. + lo_util = NEW #( ). lo_merge = lo_util->merge( iv_json_a = lv_json_a @@ -501,7 +501,7 @@ CLASS ltcl_json_utils IMPLEMENTATION. REPLACE ALL OCCURRENCES OF '\n' IN lv_sorted_exp WITH cl_abap_char_utilities=>newline. - CREATE OBJECT lo_util. + lo_util = NEW #( ). lv_sorted = lo_util->sort( iv_json = lv_json ). diff --git a/src/json/zcx_abapgit_ajson_error.clas.abap b/src/json/zcx_abapgit_ajson_error.clas.abap index ecc86896f..52047c853 100644 --- a/src/json/zcx_abapgit_ajson_error.clas.abap +++ b/src/json/zcx_abapgit_ajson_error.clas.abap @@ -92,7 +92,7 @@ method raise. data lx type ref to zcx_abapgit_ajson_error. - CREATE OBJECT lx EXPORTING message = iv_msg. + lx = NEW #( message = iv_msg ). lx->set_location( iv_location = iv_location is_node = is_node ). diff --git a/src/objects/aff/zcl_abapgit_aff_registry.clas.testclasses.abap b/src/objects/aff/zcl_abapgit_aff_registry.clas.testclasses.abap index 3fbd7682c..0acd38072 100644 --- a/src/objects/aff/zcl_abapgit_aff_registry.clas.testclasses.abap +++ b/src/objects/aff/zcl_abapgit_aff_registry.clas.testclasses.abap @@ -37,7 +37,7 @@ CLASS ltcl_aff_registry IMPLEMENTATION. lo_settings_stub->set_experimental_features( '' ). ENDIF. - CREATE OBJECT lo_cut TYPE zcl_abapgit_aff_registry. + lo_cut = NEW zcl_abapgit_aff_registry( ). lv_act = lo_cut->is_supported_object_type( iv_obj_type ). cl_abap_unit_assert=>assert_equals( exp = iv_is_supported act = lv_act ). diff --git a/src/objects/aff/zcl_abapgit_json_handler.clas.abap b/src/objects/aff/zcl_abapgit_json_handler.clas.abap index 738d017f9..729f2cb52 100644 --- a/src/objects/aff/zcl_abapgit_json_handler.clas.abap +++ b/src/objects/aff/zcl_abapgit_json_handler.clas.abap @@ -246,7 +246,7 @@ CLASS zcl_abapgit_json_handler IMPLEMENTATION. map2json_custom_enum( EXPORTING it_enum_mappings = iv_enum_mappings CHANGING co_ajson = lo_ajson ). - CREATE OBJECT lo_filter EXPORTING iv_skip_paths = iv_skip_paths. + lo_filter = NEW #( iv_skip_paths = iv_skip_paths ). " files end with an empty line (EOF) lv_json = lo_ajson->clone( )->filter( lo_filter )->stringify( 2 ) && cl_abap_char_utilities=>newline. diff --git a/src/objects/aff/zcl_abapgit_json_handler.clas.locals_imp.abap b/src/objects/aff/zcl_abapgit_json_handler.clas.locals_imp.abap index 39a486342..a567f5dd8 100644 --- a/src/objects/aff/zcl_abapgit_json_handler.clas.locals_imp.abap +++ b/src/objects/aff/zcl_abapgit_json_handler.clas.locals_imp.abap @@ -24,17 +24,13 @@ CLASS lcl_aff_filter IMPLEMENTATION. lv_path = is_node-path && is_node-name. READ TABLE mt_skip_paths WITH KEY path = lv_path value = is_node-value TRANSPORTING NO FIELDS. - DATA temp1 TYPE xsdboolean. - temp1 = boolc( sy-subrc = 0 ). - IF temp1 = abap_true + IF xsdbool( sy-subrc = 0 ) = abap_true AND iv_visit = zif_abapgit_ajson_filter=>visit_type-value. rv_keep = abap_false. RETURN. ELSE. READ TABLE mt_skip_paths WITH KEY path = lv_path TRANSPORTING NO FIELDS. - DATA temp2 TYPE xsdboolean. - temp2 = boolc( sy-subrc = 0 ). - IF temp2 = abap_true + IF xsdbool( sy-subrc = 0 ) = abap_true AND iv_visit = zif_abapgit_ajson_filter=>visit_type-value. rv_keep = abap_true. RETURN. diff --git a/src/objects/aff/zcl_abapgit_json_path.clas.abap b/src/objects/aff/zcl_abapgit_json_path.clas.abap index 3f1b1f834..ff512f69c 100644 --- a/src/objects/aff/zcl_abapgit_json_path.clas.abap +++ b/src/objects/aff/zcl_abapgit_json_path.clas.abap @@ -44,7 +44,7 @@ CLASS zcl_abapgit_json_path IMPLEMENTATION. APPEND `$` TO lt_root_path. - CREATE OBJECT lo_json_path. + lo_json_path = NEW #( ). lo_json_path->serialize_rec( EXPORTING io_reader = lo_reader it_path = lt_root_path CHANGING ct_json_paths = rt_result ). diff --git a/src/objects/aff/zcl_abapgit_json_path.clas.locals_imp.abap b/src/objects/aff/zcl_abapgit_json_path.clas.locals_imp.abap index 8ae7a8edf..fe18fb750 100644 --- a/src/objects/aff/zcl_abapgit_json_path.clas.locals_imp.abap +++ b/src/objects/aff/zcl_abapgit_json_path.clas.locals_imp.abap @@ -98,10 +98,8 @@ CLASS lcl_json_path IMPLEMENTATION. METHOD path_contains_array. DATA lv_array_pattern TYPE string VALUE `.*\[.*\].*`. - DATA temp1 TYPE xsdboolean. - temp1 = boolc( matches( val = iv_path - regex = lv_array_pattern ) ). - rv_result = temp1. + rv_result = xsdbool( matches( val = iv_path + regex = lv_array_pattern ) ). ENDMETHOD. METHOD build_json. @@ -172,9 +170,7 @@ CLASS lcl_json_path IMPLEMENTATION. METHOD is_primitiv. FIND REGEX `^.\w+` IN iv_string. " string start with . - DATA temp2 TYPE xsdboolean. - temp2 = boolc( sy-subrc = 0 ). - rv_result = temp2. + rv_result = xsdbool( sy-subrc = 0 ). ENDMETHOD. @@ -204,21 +200,15 @@ CLASS lcl_json_path IMPLEMENTATION. ENDMETHOD. METHOD is_array. - DATA temp3 TYPE xsdboolean. - temp3 = boolc( io_reader->name = 'array' ). - rv_result = temp3. + rv_result = xsdbool( io_reader->name = 'array' ). ENDMETHOD. METHOD is_string_open. - DATA temp4 TYPE xsdboolean. - temp4 = boolc( io_reader->name = 'str' AND io_reader->node_type = if_sxml_node=>co_nt_element_open ). - rv_result = temp4. + rv_result = xsdbool( io_reader->name = 'str' AND io_reader->node_type = if_sxml_node=>co_nt_element_open ). ENDMETHOD. METHOD is_object. - DATA temp5 TYPE xsdboolean. - temp5 = boolc( io_reader->name = 'object' ). - rv_result = temp5. + rv_result = xsdbool( io_reader->name = 'object' ). ENDMETHOD. METHOD serialize_rec. diff --git a/src/objects/aff/zcl_abapgit_json_path.clas.testclasses.abap b/src/objects/aff/zcl_abapgit_json_path.clas.testclasses.abap index eba81a4af..3b6d38dfe 100644 --- a/src/objects/aff/zcl_abapgit_json_path.clas.testclasses.abap +++ b/src/objects/aff/zcl_abapgit_json_path.clas.testclasses.abap @@ -39,7 +39,7 @@ CLASS ltcl_json_path IMPLEMENTATION. lo_ajson->delete( '/category/' ). lo_ajson->delete( '/proxy/' ). - CREATE OBJECT lo_cut. + lo_cut = NEW #( ). rt_result = lo_cut->serialize( lo_ajson->stringify( ) ). ENDMETHOD. @@ -154,7 +154,7 @@ CLASS ltcl_json_path IMPLEMENTATION. APPEND `$.descriptions.methods[?(@.name=='METH1')].description=Sonne` TO lt_file. APPEND `$.descriptions.methods[?(@.name=='METH1')].parameters[?(@.name=='param2')].description=ABC` TO lt_file. - CREATE OBJECT lo_cut. + lo_cut = NEW #( ). lv_act = lo_cut->deserialize( lt_file ). APPEND `{ "header": { "description": "Text" } ,` TO lt_exp. @@ -185,7 +185,7 @@ CLASS ltcl_json_path IMPLEMENTATION. APPEND `$.header.description=Text` TO lt_file. - CREATE OBJECT lo_cut. + lo_cut = NEW #( ). lv_act = lo_cut->deserialize( lt_file ). lv_is_equal = zcl_abapgit_ajson_utilities=>new( )->is_equal( @@ -206,7 +206,7 @@ CLASS ltcl_json_path IMPLEMENTATION. APPEND `!this is a comment [abc]` TO lt_file. APPEND `` TO lt_file. - CREATE OBJECT lo_cut. + lo_cut = NEW #( ). lv_act = lo_cut->deserialize( lt_file ). cl_abap_unit_assert=>assert_initial( lv_act ). diff --git a/src/objects/aff/zcl_abapgit_object_common_aff.clas.abap b/src/objects/aff/zcl_abapgit_object_common_aff.clas.abap index e7e6f7a3b..a922d7aa9 100644 --- a/src/objects/aff/zcl_abapgit_object_common_aff.clas.abap +++ b/src/objects/aff/zcl_abapgit_object_common_aff.clas.abap @@ -98,7 +98,7 @@ CLASS zcl_abapgit_object_common_aff IMPLEMENTATION. TRY. lo_handler = get_object_handler( ). - CREATE OBJECT li_aff_registry TYPE zcl_abapgit_aff_registry. + li_aff_registry = NEW zcl_abapgit_aff_registry( ). lv_is_supported = li_aff_registry->is_supported_object_type( is_item-obj_type ). CATCH cx_root. diff --git a/src/objects/aff/zcl_abapgit_object_common_aff.clas.testclasses.abap b/src/objects/aff/zcl_abapgit_object_common_aff.clas.testclasses.abap index ca4ad731f..dd423d412 100644 --- a/src/objects/aff/zcl_abapgit_object_common_aff.clas.testclasses.abap +++ b/src/objects/aff/zcl_abapgit_object_common_aff.clas.testclasses.abap @@ -221,8 +221,8 @@ CLASS ltcl_aff_settings_deserialize IMPLEMENTATION. RETURN. ENDIF. - CREATE OBJECT lo_cut EXPORTING is_item = ls_item - iv_language = 'E'. + lo_cut = NEW #( is_item = ls_item + iv_language = 'E' ). TRY. lo_settings_deserialize = lo_cut->create_aff_setting_deserialize( ). diff --git a/src/objects/core/zcl_abapgit_dependencies.clas.testclasses.abap b/src/objects/core/zcl_abapgit_dependencies.clas.testclasses.abap index 8afe2c3cb..606ebd8df 100644 --- a/src/objects/core/zcl_abapgit_dependencies.clas.testclasses.abap +++ b/src/objects/core/zcl_abapgit_dependencies.clas.testclasses.abap @@ -177,7 +177,7 @@ CLASS ltcl_resolve_packages IMPLEMENTATION. DATA: lo_mock_sap_package TYPE REF TO ltcl_sap_package. - CREATE OBJECT lo_mock_sap_package EXPORTING iv_package = 'Z_MAIN'. + lo_mock_sap_package = NEW #( iv_package = 'Z_MAIN' ). lo_mock_sap_package->set_sub_packages( mt_sub_packages ). diff --git a/src/objects/core/zcl_abapgit_file_deserialize.clas.abap b/src/objects/core/zcl_abapgit_file_deserialize.clas.abap index 242d9686f..30f2cd40e 100644 --- a/src/objects/core/zcl_abapgit_file_deserialize.clas.abap +++ b/src/objects/core/zcl_abapgit_file_deserialize.clas.abap @@ -175,7 +175,7 @@ CLASS zcl_abapgit_file_deserialize IMPLEMENTATION. lt_items = map_results_to_items( it_results ). - CREATE OBJECT lo_graph EXPORTING it_items = lt_items. + lo_graph = NEW #( it_items = lt_items ). LOOP AT lt_items INTO ls_item. CLEAR lt_requires. diff --git a/src/objects/core/zcl_abapgit_file_deserialize.clas.testclasses.abap b/src/objects/core/zcl_abapgit_file_deserialize.clas.testclasses.abap index c7de5afe6..6f1eb3a62 100644 --- a/src/objects/core/zcl_abapgit_file_deserialize.clas.testclasses.abap +++ b/src/objects/core/zcl_abapgit_file_deserialize.clas.testclasses.abap @@ -36,7 +36,7 @@ CLASS ltcl_filter_files_to_deser IMPLEMENTATION. METHOD setup. - CREATE OBJECT mo_objects. + mo_objects = NEW #( ). ENDMETHOD. @@ -259,7 +259,7 @@ ENDCLASS. CLASS ltcl_prio_deserialization IMPLEMENTATION. METHOD setup. - CREATE OBJECT mo_objects. + mo_objects = NEW #( ). mv_exp_output_tabix = 0. ENDMETHOD. @@ -434,7 +434,7 @@ CLASS ltcl_prio_deserialization IMPLEMENTATION. DATA lo_log TYPE REF TO zcl_abapgit_log. - CREATE OBJECT lo_log. + lo_log = NEW #( ). mt_output = mo_objects->prioritize_deser( ii_log = lo_log diff --git a/src/objects/core/zcl_abapgit_filename_logic.clas.abap b/src/objects/core/zcl_abapgit_filename_logic.clas.abap index 65be901bf..6e41b25eb 100644 --- a/src/objects/core/zcl_abapgit_filename_logic.clas.abap +++ b/src/objects/core/zcl_abapgit_filename_logic.clas.abap @@ -130,12 +130,8 @@ CLASS zcl_abapgit_filename_logic IMPLEMENTATION. METHOD detect_obj_definition. - DATA temp1 TYPE xsdboolean. - temp1 = boolc( iv_ext = to_upper( c_package_file-extension ) AND strlen( iv_type ) = 4 ). - ev_is_xml = temp1. - DATA temp2 TYPE xsdboolean. - temp2 = boolc( iv_ext = to_upper( c_json_file-extension ) AND strlen( iv_type ) = 4 ). - ev_is_json = temp2. + ev_is_xml = xsdbool( iv_ext = to_upper( c_package_file-extension ) AND strlen( iv_type ) = 4 ). + ev_is_json = xsdbool( iv_ext = to_upper( c_json_file-extension ) AND strlen( iv_type ) = 4 ). ENDMETHOD. @@ -157,7 +153,7 @@ CLASS zcl_abapgit_filename_logic IMPLEMENTATION. " Assume AFF namespace convention IF go_aff_registry IS INITIAL. - CREATE OBJECT go_aff_registry TYPE zcl_abapgit_aff_registry. + go_aff_registry = NEW zcl_abapgit_aff_registry( ). ENDIF. IF go_aff_registry->is_supported_object_type( |{ lv_type }| ) = abap_true. @@ -237,9 +233,7 @@ CLASS zcl_abapgit_filename_logic IMPLEMENTATION. ev_is_xml = lv_xml ev_is_json = lv_json ). - DATA temp3 TYPE xsdboolean. - temp3 = boolc( lv_json = abap_true OR lv_xml = abap_true ). - rv_yes = temp3. + rv_yes = xsdbool( lv_json = abap_true OR lv_xml = abap_true ). ENDMETHOD. @@ -354,7 +348,7 @@ CLASS zcl_abapgit_filename_logic IMPLEMENTATION. ENDTRY. " Handle namespaces - CREATE OBJECT go_aff_registry TYPE zcl_abapgit_aff_registry. + go_aff_registry = NEW zcl_abapgit_aff_registry( ). IF go_aff_registry->is_supported_object_type( is_item-obj_type ) = abap_true. FIND ALL OCCURRENCES OF `/` IN rv_filename MATCH COUNT lv_nb_of_slash. diff --git a/src/objects/core/zcl_abapgit_filename_logic.clas.testclasses.abap b/src/objects/core/zcl_abapgit_filename_logic.clas.testclasses.abap index 486c8410c..915298c63 100644 --- a/src/objects/core/zcl_abapgit_filename_logic.clas.testclasses.abap +++ b/src/objects/core/zcl_abapgit_filename_logic.clas.testclasses.abap @@ -12,7 +12,7 @@ CLASS lcl_memory_settings IMPLEMENTATION. ENDMETHOD. METHOD zif_abapgit_persist_settings~read. - CREATE OBJECT ro_settings. + ro_settings = NEW #( ). ENDMETHOD. ENDCLASS. @@ -46,7 +46,7 @@ CLASS ltcl_run_checks IMPLEMENTATION. " Assume for unit tests that starting folder is /src/ with prefix logic mo_dot = zcl_abapgit_dot_abapgit=>build_default( ). - CREATE OBJECT li_memory. + li_memory = NEW #( ). zcl_abapgit_persist_injector=>set_settings( li_memory ). ENDMETHOD. diff --git a/src/objects/core/zcl_abapgit_folder_logic.clas.abap b/src/objects/core/zcl_abapgit_folder_logic.clas.abap index 45e086779..9ee4b3615 100644 --- a/src/objects/core/zcl_abapgit_folder_logic.clas.abap +++ b/src/objects/core/zcl_abapgit_folder_logic.clas.abap @@ -56,7 +56,7 @@ CLASS zcl_abapgit_folder_logic IMPLEMENTATION. METHOD get_instance. - CREATE OBJECT ro_instance. + ro_instance = NEW #( ). ENDMETHOD. diff --git a/src/objects/core/zcl_abapgit_folder_logic.clas.testclasses.abap b/src/objects/core/zcl_abapgit_folder_logic.clas.testclasses.abap index d9bb1bc55..16f7aab23 100644 --- a/src/objects/core/zcl_abapgit_folder_logic.clas.testclasses.abap +++ b/src/objects/core/zcl_abapgit_folder_logic.clas.testclasses.abap @@ -207,7 +207,7 @@ CLASS ltcl_folder_logic IMPLEMENTATION. DATA lo_top_foo TYPE REF TO ltcl_folder_logic_package. - CREATE OBJECT lo_top_foo. + lo_top_foo = NEW #( ). zcl_abapgit_injector=>set_sap_package( iv_package = c_top ii_sap_package = me ). diff --git a/src/objects/core/zcl_abapgit_item_graph.clas.abap b/src/objects/core/zcl_abapgit_item_graph.clas.abap index a93175dbe..22cd8655c 100644 --- a/src/objects/core/zcl_abapgit_item_graph.clas.abap +++ b/src/objects/core/zcl_abapgit_item_graph.clas.abap @@ -26,10 +26,10 @@ CLASS zcl_abapgit_item_graph DEFINITION to TYPE zif_abapgit_definitions=>ty_item, END OF ty_edge. - TYPES temp1_90785a0d00 TYPE STANDARD TABLE OF zif_abapgit_definitions=>ty_item WITH DEFAULT KEY. -DATA mt_vertices TYPE temp1_90785a0d00. - TYPES temp2_90785a0d00 TYPE STANDARD TABLE OF ty_edge WITH DEFAULT KEY WITH NON-UNIQUE SORTED KEY sec_to COMPONENTS to WITH NON-UNIQUE SORTED KEY sec_from COMPONENTS from. -DATA mt_edges TYPE temp2_90785a0d00. + DATA mt_vertices TYPE STANDARD TABLE OF zif_abapgit_definitions=>ty_item WITH DEFAULT KEY. + DATA mt_edges TYPE STANDARD TABLE OF ty_edge WITH DEFAULT KEY + WITH NON-UNIQUE SORTED KEY sec_to COMPONENTS to + WITH NON-UNIQUE SORTED KEY sec_from COMPONENTS from. DATA mv_warning TYPE abap_bool. METHODS remove_vertex IMPORTING iv_index TYPE i. @@ -88,9 +88,7 @@ CLASS ZCL_ABAPGIT_ITEM_GRAPH IMPLEMENTATION. METHOD has_vertices. - DATA temp1 TYPE xsdboolean. - temp1 = boolc( lines( mt_vertices ) > 0 ). - rv_bool = temp1. + rv_bool = xsdbool( lines( mt_vertices ) > 0 ). ENDMETHOD. diff --git a/src/objects/core/zcl_abapgit_item_graph.clas.testclasses.abap b/src/objects/core/zcl_abapgit_item_graph.clas.testclasses.abap index 660fa90e5..60484b0c6 100644 --- a/src/objects/core/zcl_abapgit_item_graph.clas.testclasses.abap +++ b/src/objects/core/zcl_abapgit_item_graph.clas.testclasses.abap @@ -17,7 +17,7 @@ CLASS ltcl_test IMPLEMENTATION. DATA ls_item2 LIKE LINE OF lt_items. DATA ls_next LIKE LINE OF lt_items. - CREATE OBJECT li_log TYPE zcl_abapgit_log. + li_log = NEW zcl_abapgit_log( ). ls_item1-obj_type = 'TYPE'. ls_item1-obj_type = '1111'. @@ -27,7 +27,7 @@ CLASS ltcl_test IMPLEMENTATION. ls_item2-obj_type = '2222'. APPEND ls_item2 TO lt_items. - CREATE OBJECT lo_graph EXPORTING it_items = lt_items. + lo_graph = NEW #( it_items = lt_items ). lo_graph->add_edge( is_from = ls_item1 diff --git a/src/objects/core/zcl_abapgit_objects_activation.clas.abap b/src/objects/core/zcl_abapgit_objects_activation.clas.abap index f8bf20451..004a1f5cb 100644 --- a/src/objects/core/zcl_abapgit_objects_activation.clas.abap +++ b/src/objects/core/zcl_abapgit_objects_activation.clas.abap @@ -155,14 +155,11 @@ CLASS zcl_abapgit_objects_activation IMPLEMENTATION. METHOD activate_ddic. - TYPES temp1 TYPE STANDARD TABLE OF dcgentb. -TYPES temp2 TYPE STANDARD TABLE OF dcdeltb. -TYPES temp3 TYPE STANDARD TABLE OF dctablres. -DATA: lt_gentab TYPE temp1, + DATA: lt_gentab TYPE STANDARD TABLE OF dcgentb, lv_rc TYPE sy-subrc, ls_gentab LIKE LINE OF lt_gentab, - lt_deltab TYPE temp2, - lt_action_tab TYPE temp3, + lt_deltab TYPE STANDARD TABLE OF dcdeltb, + lt_action_tab TYPE STANDARD TABLE OF dctablres, lv_logname TYPE ddmass-logname. FIELD-SYMBOLS: LIKE LINE OF gt_objects. @@ -288,9 +285,7 @@ DATA: lt_gentab TYPE temp1, lv_popup = abap_false. ENDIF. - DATA temp1 TYPE xsdboolean. - temp1 = boolc( lv_popup = abap_false ). - lv_no_ui = temp1. + lv_no_ui = xsdbool( lv_popup = abap_false ). IF iv_ddic = abap_true. lv_msg = |(with DDIC)|. @@ -414,8 +409,7 @@ DATA: lt_gentab TYPE temp1, METHOD add_errors_and_warnings_to_log. - TYPES temp4 TYPE STANDARD TABLE OF trlog. -DATA: lt_lines TYPE temp4, + DATA: lt_lines TYPE STANDARD TABLE OF trlog, lv_logname_db TYPE ddprh-protname. FIELD-SYMBOLS: LIKE LINE OF lt_lines. @@ -546,9 +540,7 @@ DATA: lt_lines TYPE temp4, illegal_input = 1 OTHERS = 2. - DATA temp2 TYPE xsdboolean. - temp2 = boolc( sy-subrc = 0 AND ( lv_state = '' OR lv_state = 'A' ) ). - rv_active = temp2. + rv_active = xsdbool( sy-subrc = 0 AND ( lv_state = '' OR lv_state = 'A' ) ). ENDMETHOD. @@ -574,12 +566,10 @@ DATA: lt_lines TYPE temp4, METHOD is_non_ddic_active. - TYPES temp5 TYPE STANDARD TABLE OF sprot_u WITH DEFAULT KEY. -TYPES temp4 TYPE STANDARD TABLE OF e071 WITH DEFAULT KEY. -DATA: - lt_messages TYPE temp5, + DATA: + lt_messages TYPE STANDARD TABLE OF sprot_u WITH DEFAULT KEY, ls_e071 TYPE e071, - lt_e071 TYPE temp4. + lt_e071 TYPE STANDARD TABLE OF e071 WITH DEFAULT KEY. ls_e071-object = is_item-obj_type. ls_e071-obj_name = is_item-obj_name. @@ -594,9 +584,7 @@ DATA: p_e071 = lt_e071 p_xmsg = lt_messages. - DATA temp3 TYPE xsdboolean. - temp3 = boolc( lt_messages IS INITIAL ). - rv_active = temp3. + rv_active = xsdbool( lt_messages IS INITIAL ). ENDMETHOD. @@ -618,8 +606,8 @@ DATA: lv_include = cl_oo_classname_service=>get_interfacepool_name( ls_class-clsname ). ENDCASE. - CREATE OBJECT lo_cross EXPORTING p_name = lv_include - p_include = lv_include. + lo_cross = NEW #( p_name = lv_include + p_include = lv_include ). lo_cross->index_actualize( IMPORTING p_error = lv_error ). diff --git a/src/objects/core/zcl_abapgit_objects_activation.clas.testclasses.abap b/src/objects/core/zcl_abapgit_objects_activation.clas.testclasses.abap index ff6d29118..799db5387 100644 --- a/src/objects/core/zcl_abapgit_objects_activation.clas.testclasses.abap +++ b/src/objects/core/zcl_abapgit_objects_activation.clas.testclasses.abap @@ -18,7 +18,7 @@ ENDCLASS. CLASS ltcl_tests IMPLEMENTATION. METHOD setup. - CREATE OBJECT mo_cut. + mo_cut = NEW #( ). ENDMETHOD. METHOD is_active. diff --git a/src/objects/core/zcl_abapgit_objects_check.clas.testclasses.abap b/src/objects/core/zcl_abapgit_objects_check.clas.testclasses.abap index 1ba862168..30a31beba 100644 --- a/src/objects/core/zcl_abapgit_objects_check.clas.testclasses.abap +++ b/src/objects/core/zcl_abapgit_objects_check.clas.testclasses.abap @@ -37,7 +37,7 @@ CLASS ltcl_warning_overwrite_find IMPLEMENTATION. METHOD setup. - CREATE OBJECT mo_objects. + mo_objects = NEW #( ). ENDMETHOD. diff --git a/src/objects/core/zcl_abapgit_objects_files.clas.abap b/src/objects/core/zcl_abapgit_objects_files.clas.abap index 200e3974c..111d8d5f5 100644 --- a/src/objects/core/zcl_abapgit_objects_files.clas.abap +++ b/src/objects/core/zcl_abapgit_objects_files.clas.abap @@ -325,8 +325,8 @@ CLASS zcl_abapgit_objects_files IMPLEMENTATION. METHOD new. - CREATE OBJECT ro_files EXPORTING is_item = is_item - iv_path = iv_path. + ro_files = NEW #( is_item = is_item + iv_path = iv_path ). ENDMETHOD. @@ -412,11 +412,11 @@ CLASS zcl_abapgit_objects_files IMPLEMENTATION. CASE lv_ext. WHEN 'po'. - CREATE OBJECT lo_po EXPORTING iv_lang = lv_lang. + lo_po = NEW #( iv_lang = lv_lang ). lo_po->parse( -data ). APPEND lo_po TO rt_i18n_files. WHEN 'properties'. - CREATE OBJECT lo_properties EXPORTING iv_lang = lv_lang. + lo_properties = NEW #( iv_lang = lv_lang ). lo_properties->parse( -data ). APPEND lo_properties TO rt_i18n_files. WHEN OTHERS. @@ -479,8 +479,8 @@ CLASS zcl_abapgit_objects_files IMPLEMENTATION. lv_xml = zcl_abapgit_convert=>xstring_to_string_utf8( lv_data ). - CREATE OBJECT ri_xml TYPE zcl_abapgit_xml_input EXPORTING iv_xml = lv_xml - iv_filename = lv_filename. + ri_xml = NEW zcl_abapgit_xml_input( iv_xml = lv_xml + iv_filename = lv_filename ). ENDMETHOD. diff --git a/src/objects/core/zcl_abapgit_serialize.clas.abap b/src/objects/core/zcl_abapgit_serialize.clas.abap index f25f5fbc5..b3e3e500c 100644 --- a/src/objects/core/zcl_abapgit_serialize.clas.abap +++ b/src/objects/core/zcl_abapgit_serialize.clas.abap @@ -217,7 +217,7 @@ CLASS zcl_abapgit_serialize IMPLEMENTATION. ii_log = ii_log it_filter = it_filter ). - CREATE OBJECT lo_filter. + lo_filter = NEW #( ). lo_filter->apply( EXPORTING it_filter = it_filter CHANGING ct_tadir = lt_tadir ). @@ -225,9 +225,7 @@ CLASS zcl_abapgit_serialize IMPLEMENTATION. * if there are less than 10 objects run in single thread * this helps a lot when debugging, plus performance gain * with low number of objects does not matter much - DATA temp1 TYPE xsdboolean. - temp1 = boolc( lines( lt_tadir ) < 10 ). - lv_force = temp1. + lv_force = xsdbool( lines( lt_tadir ) < 10 ). lt_found = serialize( iv_package = iv_package @@ -273,7 +271,7 @@ CLASS zcl_abapgit_serialize IMPLEMENTATION. ms_i18n_params-main_language_only = is_local_settings-main_language_only. ENDIF. - CREATE OBJECT mo_abap_language_version EXPORTING io_dot_abapgit = mo_dot_abapgit. + mo_abap_language_version = NEW #( io_dot_abapgit = mo_dot_abapgit ). ENDMETHOD. @@ -481,9 +479,14 @@ CLASS zcl_abapgit_serialize IMPLEMENTATION. METHOD is_parallelization_possible. - DATA temp2 TYPE xsdboolean. - temp2 = boolc( zcl_abapgit_factory=>get_environment( )->is_merged( ) = abap_false AND zcl_abapgit_persist_factory=>get_settings( )->read( )->get_parallel_proc_disabled( ) = abap_false AND mv_group IS NOT INITIAL AND zcl_abapgit_factory=>get_function_module( )->function_exists( 'Z_ABAPGIT_SERIALIZE_PARALLEL' ) = abap_true ). - rv_result = temp2. + rv_result = xsdbool( zcl_abapgit_factory=>get_environment( )->is_merged( ) = abap_false + AND zcl_abapgit_persist_factory=>get_settings( )->read( )->get_parallel_proc_disabled( ) = abap_false + AND mv_group IS NOT INITIAL + " The function module below should always exist here as is_merged evaluated to false above. + " It does however not exist in the transpiled version which then causes unit tests to fail. + " Therefore the check needs to stay. + AND zcl_abapgit_factory=>get_function_module( + )->function_exists( 'Z_ABAPGIT_SERIALIZE_PARALLEL' ) = abap_true ). ENDMETHOD. diff --git a/src/objects/core/zcl_abapgit_serialize.clas.testclasses.abap b/src/objects/core/zcl_abapgit_serialize.clas.testclasses.abap index 39b028823..c82a2be13 100644 --- a/src/objects/core/zcl_abapgit_serialize.clas.testclasses.abap +++ b/src/objects/core/zcl_abapgit_serialize.clas.testclasses.abap @@ -27,7 +27,7 @@ CLASS ltd_settings IMPLEMENTATION. ENDMETHOD. METHOD zif_abapgit_persist_settings~read. - CREATE OBJECT ro_settings. + ro_settings = NEW #( ). ro_settings->set_parallel_proc_disabled( mv_parallel_proc_disabled ). ENDMETHOD. @@ -291,20 +291,20 @@ CLASS ltcl_determine_max_processes IMPLEMENTATION. METHOD setup. - CREATE OBJECT mo_settings_double. + mo_settings_double = NEW #( ). zcl_abapgit_persist_injector=>set_settings( mo_settings_double ). - CREATE OBJECT mo_environment_double. + mo_environment_double = NEW #( ). zcl_abapgit_injector=>set_environment( mo_environment_double ). - CREATE OBJECT mo_function_module_double. + mo_function_module_double = NEW #( ). zcl_abapgit_injector=>set_function_module( mo_function_module_double ). - CREATE OBJECT mo_exit. + mo_exit = NEW #( ). zcl_abapgit_injector=>set_exit( mo_exit ). TRY. - CREATE OBJECT mo_cut. + mo_cut = NEW #( ). CATCH zcx_abapgit_exception. cl_abap_unit_assert=>fail( 'Error creating serializer' ). ENDTRY. @@ -470,7 +470,7 @@ CLASS ltcl_serialize IMPLEMENTATION. mo_dot = zcl_abapgit_dot_abapgit=>build_default( ). TRY. - CREATE OBJECT mo_cut EXPORTING io_dot_abapgit = mo_dot. + mo_cut = NEW #( io_dot_abapgit = mo_dot ). CATCH zcx_abapgit_exception. cl_abap_unit_assert=>fail( 'Error creating serializer' ). ENDTRY. @@ -521,13 +521,13 @@ CLASS ltcl_serialize IMPLEMENTATION. -object = 'ABCD'. -obj_name = 'OBJECT'. - CREATE OBJECT li_log1 TYPE zcl_abapgit_log. + li_log1 = NEW zcl_abapgit_log( ). mo_cut->serialize( it_tadir = lt_tadir ii_log = li_log1 iv_force_sequential = abap_true ). - CREATE OBJECT li_log2 TYPE zcl_abapgit_log. + li_log2 = NEW zcl_abapgit_log( ). mo_cut->serialize( it_tadir = lt_tadir ii_log = li_log2 @@ -575,14 +575,14 @@ CLASS ltcl_serialize IMPLEMENTATION. -obj_name = 'ZCL_TEST_IGNORE'. -devclass = '$ZTEST'. - CREATE OBJECT li_log1 TYPE zcl_abapgit_log. + li_log1 = NEW zcl_abapgit_log( ). mo_cut->serialize( iv_package = '$ZTEST' it_tadir = lt_tadir ii_log = li_log1 iv_force_sequential = abap_true ). - CREATE OBJECT li_log2 TYPE zcl_abapgit_log. + li_log2 = NEW zcl_abapgit_log( ). mo_cut->serialize( iv_package = '$ZTEST' it_tadir = lt_tadir @@ -638,9 +638,9 @@ CLASS ltcl_i18n IMPLEMENTATION. " ls_data-i18n_languages needs to be initial to get classic I18N data TRY. - CREATE OBJECT mo_dot_abapgit EXPORTING is_data = ls_data. + mo_dot_abapgit = NEW #( is_data = ls_data ). - CREATE OBJECT mo_cut EXPORTING io_dot_abapgit = mo_dot_abapgit. + mo_cut = NEW #( io_dot_abapgit = mo_dot_abapgit ). CATCH zcx_abapgit_exception. cl_abap_unit_assert=>fail( 'Error creating serializer' ). ENDTRY. @@ -677,7 +677,7 @@ CLASS ltcl_i18n IMPLEMENTATION. lv_xml = zcl_abapgit_convert=>xstring_to_string_utf8( -file-data ). - CREATE OBJECT lo_input EXPORTING iv_xml = lv_xml. + lo_input = NEW #( iv_xml = lv_xml ). lo_input->zif_abapgit_xml_input~read( EXPORTING iv_name = 'DD02V' CHANGING cg_data = ls_dd02v ). diff --git a/src/objects/ecatt/zcl_abapgit_ecatt_data_upload.clas.abap b/src/objects/ecatt/zcl_abapgit_ecatt_data_upload.clas.abap index d39f0d33c..abbf549df 100644 --- a/src/objects/ecatt/zcl_abapgit_ecatt_data_upload.clas.abap +++ b/src/objects/ecatt/zcl_abapgit_ecatt_data_upload.clas.abap @@ -77,8 +77,8 @@ CLASS zcl_abapgit_ecatt_data_upload IMPLEMENTATION. IF ex_ecatt_object->object_type <> ms_current_object-s_obj_type OR ex_ecatt_object->object_name <> ms_current_object-d_obj_name OR ex_ecatt_object->object_version <> ms_current_object-d_obj_ver. - CREATE OBJECT mx_ecatt_apl EXPORTING textid = cx_ecatt_apl=>any_text - free_text = 'Unexpected object in save sequence'. + mx_ecatt_apl = NEW #( textid = cx_ecatt_apl=>any_text + free_text = 'Unexpected object in save sequence' ). RETURN. ENDIF. diff --git a/src/objects/ecatt/zcl_abapgit_ecatt_helper.clas.abap b/src/objects/ecatt/zcl_abapgit_ecatt_helper.clas.abap index d95010150..8bb0e2170 100644 --- a/src/objects/ecatt/zcl_abapgit_ecatt_helper.clas.abap +++ b/src/objects/ecatt/zcl_abapgit_ecatt_helper.clas.abap @@ -53,7 +53,7 @@ CLASS zcl_abapgit_ecatt_helper IMPLEMENTATION. "download method will create the xml stream "note: it's the redefined download( ) of each object type specific download, which is called TRY. - CREATE OBJECT lo_load_help_dummy EXPORTING im_maintain_function = ''. + lo_load_help_dummy = NEW #( im_maintain_function = '' ). io_download->download( im_object_name = iv_object_name im_object_version = iv_object_version diff --git a/src/objects/enh/zcl_abapgit_object_enho_hook.clas.abap b/src/objects/enh/zcl_abapgit_object_enho_hook.clas.abap index 9c0770f13..4555f5e27 100644 --- a/src/objects/enh/zcl_abapgit_object_enho_hook.clas.abap +++ b/src/objects/enh/zcl_abapgit_object_enho_hook.clas.abap @@ -261,9 +261,7 @@ CLASS ZCL_ABAPGIT_OBJECT_ENHO_HOOK IMPLEMENTATION. IF ls_original_object-org_main_type = 'PROG' OR ls_original_object-org_main_type = 'REPS'. TRY. ls_progdir = zcl_abapgit_factory=>get_sap_report( )->read_progdir( ls_original_object-org_main_name ). - DATA temp1 TYPE xsdboolean. - temp1 = boolc( ls_progdir-subc = 'I' ). - ls_original_object-include_bound = temp1. + ls_original_object-include_bound = xsdbool( ls_progdir-subc = 'I' ). CATCH zcx_abapgit_exception. ls_original_object-include_bound = abap_false. ENDTRY. diff --git a/src/objects/jump/zcl_abapgit_adt_link.clas.abap b/src/objects/jump/zcl_abapgit_adt_link.clas.abap index 9bd4f2c85..32bdd14d9 100644 --- a/src/objects/jump/zcl_abapgit_adt_link.clas.abap +++ b/src/objects/jump/zcl_abapgit_adt_link.clas.abap @@ -218,9 +218,7 @@ CLASS zcl_abapgit_adt_link IMPLEMENTATION. RECEIVING result = lv_vit_wb_request. - DATA temp1 TYPE xsdboolean. - temp1 = boolc( NOT lv_vit_wb_request = abap_true ). - rv_is_adt_jump_possible = temp1. + rv_is_adt_jump_possible = xsdbool( NOT lv_vit_wb_request = abap_true ). CATCH cx_root. zcx_abapgit_exception=>raise( 'ADT Jump Error' ). diff --git a/src/objects/jump/zcl_abapgit_gui_jumper.clas.abap b/src/objects/jump/zcl_abapgit_gui_jumper.clas.abap index c9574e56c..6d8b3d269 100644 --- a/src/objects/jump/zcl_abapgit_gui_jumper.clas.abap +++ b/src/objects/jump/zcl_abapgit_gui_jumper.clas.abap @@ -116,9 +116,7 @@ CLASS zcl_abapgit_gui_jumper IMPLEMENTATION. jump_not_possible = 1 OTHERS = 2. - DATA temp1 TYPE xsdboolean. - temp1 = boolc( sy-subrc = 0 ). - rv_exit = temp1. + rv_exit = xsdbool( sy-subrc = 0 ). ENDMETHOD. @@ -137,9 +135,7 @@ CLASS zcl_abapgit_gui_jumper IMPLEMENTATION. invalid_object_type = 2 OTHERS = 3. - DATA temp2 TYPE xsdboolean. - temp2 = boolc( sy-subrc = 0 ). - rv_exit = temp2. + rv_exit = xsdbool( sy-subrc = 0 ). ENDMETHOD. @@ -164,9 +160,7 @@ CLASS zcl_abapgit_gui_jumper IMPLEMENTATION. invalid_object_type = 2 OTHERS = 3. - DATA temp3 TYPE xsdboolean. - temp3 = boolc( sy-subrc = 0 ). - rv_exit = temp3. + rv_exit = xsdbool( sy-subrc = 0 ). ENDIF. @@ -230,8 +224,7 @@ CLASS zcl_abapgit_gui_jumper IMPLEMENTATION. METHOD zif_abapgit_gui_jumper~jump_abapgit. - TYPES temp1 TYPE STANDARD TABLE OF rfc_spagpa. -DATA lt_spagpa TYPE temp1. + DATA lt_spagpa TYPE STANDARD TABLE OF rfc_spagpa. DATA ls_spagpa LIKE LINE OF lt_spagpa. DATA lv_save_sy_langu TYPE sy-langu. DATA lv_subrc TYPE syst-subrc. diff --git a/src/objects/oo/zcl_abapgit_oo_base.clas.abap b/src/objects/oo/zcl_abapgit_oo_base.clas.abap index 078bce0b7..61c386424 100644 --- a/src/objects/oo/zcl_abapgit_oo_base.clas.abap +++ b/src/objects/oo/zcl_abapgit_oo_base.clas.abap @@ -260,7 +260,7 @@ CLASS zcl_abapgit_oo_base IMPLEMENTATION. METHOD zif_abapgit_oo_object_fnc~serialize_abap. DATA lo_oo_serializer TYPE REF TO zcl_abapgit_oo_serializer. - CREATE OBJECT lo_oo_serializer. + lo_oo_serializer = NEW #( ). CASE iv_type. WHEN seop_ext_class_locals_def. rt_source = lo_oo_serializer->serialize_locals_def( is_class_key ). diff --git a/src/objects/oo/zcl_abapgit_oo_class.clas.abap b/src/objects/oo/zcl_abapgit_oo_class.clas.abap index 848925656..431ec801a 100644 --- a/src/objects/oo/zcl_abapgit_oo_class.clas.abap +++ b/src/objects/oo/zcl_abapgit_oo_class.clas.abap @@ -806,9 +806,7 @@ CLASS zcl_abapgit_oo_class IMPLEMENTATION. no_text = 4 inconsistent = 5 OTHERS = 6. - DATA temp1 TYPE xsdboolean. - temp1 = boolc( sy-subrc = 0 OR sy-subrc = 4 ). - rv_exists = temp1. + rv_exists = xsdbool( sy-subrc = 0 OR sy-subrc = 4 ). ENDMETHOD. diff --git a/src/objects/oo/zcl_abapgit_oo_factory.clas.abap b/src/objects/oo/zcl_abapgit_oo_factory.clas.abap index a47c00f83..dba196f8b 100644 --- a/src/objects/oo/zcl_abapgit_oo_factory.clas.abap +++ b/src/objects/oo/zcl_abapgit_oo_factory.clas.abap @@ -24,9 +24,9 @@ CLASS zcl_abapgit_oo_factory IMPLEMENTATION. METHOD get_by_type. IF iv_object_type = 'CLAS'. - CREATE OBJECT ri_object_oriented_object TYPE zcl_abapgit_oo_class. + ri_object_oriented_object = NEW zcl_abapgit_oo_class( ). ELSEIF iv_object_type = 'INTF'. - CREATE OBJECT ri_object_oriented_object TYPE zcl_abapgit_oo_interface. + ri_object_oriented_object = NEW zcl_abapgit_oo_interface( ). ENDIF. ENDMETHOD. @@ -40,13 +40,13 @@ CLASS zcl_abapgit_oo_factory IMPLEMENTATION. ls_object_name-clsname = to_upper( iv_object_name ). - CREATE OBJECT li_class TYPE zcl_abapgit_oo_class. + li_class = NEW zcl_abapgit_oo_class( ). IF li_class->exists( ls_object_name ) = abap_true. ri_object_oriented_object = li_class. RETURN. ENDIF. - CREATE OBJECT li_interface TYPE zcl_abapgit_oo_interface. + li_interface = NEW zcl_abapgit_oo_interface( ). IF li_interface->exists( ls_object_name ) = abap_true. ri_object_oriented_object = li_interface. RETURN. diff --git a/src/objects/oo/zcl_abapgit_oo_interface.clas.abap b/src/objects/oo/zcl_abapgit_oo_interface.clas.abap index ded2eabd2..55668236b 100644 --- a/src/objects/oo/zcl_abapgit_oo_interface.clas.abap +++ b/src/objects/oo/zcl_abapgit_oo_interface.clas.abap @@ -301,9 +301,7 @@ CLASS zcl_abapgit_oo_interface IMPLEMENTATION. no_text = 4 inconsistent = 5 OTHERS = 6. - DATA temp1 TYPE xsdboolean. - temp1 = boolc( sy-subrc = 0 OR sy-subrc = 4 ). - rv_exists = temp1. + rv_exists = xsdbool( sy-subrc = 0 OR sy-subrc = 4 ). ENDMETHOD. diff --git a/src/objects/oo/zcl_abapgit_oo_serializer.clas.testclasses.abap b/src/objects/oo/zcl_abapgit_oo_serializer.clas.testclasses.abap index 41571bf04..8f8ae4ac8 100644 --- a/src/objects/oo/zcl_abapgit_oo_serializer.clas.testclasses.abap +++ b/src/objects/oo/zcl_abapgit_oo_serializer.clas.testclasses.abap @@ -36,7 +36,7 @@ CLASS ltcl_oo_serialize IMPLEMENTATION. METHOD setup. - CREATE OBJECT mo_oo_serializer. + mo_oo_serializer = NEW #( ). ENDMETHOD. diff --git a/src/objects/rules/zcl_abapgit_field_rules.clas.abap b/src/objects/rules/zcl_abapgit_field_rules.clas.abap index 784fb3b48..2e3a695f7 100644 --- a/src/objects/rules/zcl_abapgit_field_rules.clas.abap +++ b/src/objects/rules/zcl_abapgit_field_rules.clas.abap @@ -36,7 +36,7 @@ CLASS zcl_abapgit_field_rules IMPLEMENTATION. METHOD create. - CREATE OBJECT ro_result TYPE zcl_abapgit_field_rules. + ro_result = NEW zcl_abapgit_field_rules( ). ENDMETHOD. diff --git a/src/objects/rules/zcl_abapgit_field_rules.clas.testclasses.abap b/src/objects/rules/zcl_abapgit_field_rules.clas.testclasses.abap index 43a72f230..95f2196c3 100644 --- a/src/objects/rules/zcl_abapgit_field_rules.clas.testclasses.abap +++ b/src/objects/rules/zcl_abapgit_field_rules.clas.testclasses.abap @@ -46,7 +46,7 @@ CLASS zcl_abapgit_field_rules DEFINITION LOCAL FRIENDS ltcl_field_rules. CLASS ltcl_field_rules IMPLEMENTATION. METHOD setup. - CREATE OBJECT mo_cut. + mo_cut = NEW #( ). ENDMETHOD. METHOD fill_value. diff --git a/src/objects/sap/zcl_abapgit_function_module.clas.abap b/src/objects/sap/zcl_abapgit_function_module.clas.abap index edd9bca1e..e7400293d 100644 --- a/src/objects/sap/zcl_abapgit_function_module.clas.abap +++ b/src/objects/sap/zcl_abapgit_function_module.clas.abap @@ -31,9 +31,7 @@ CLASS zcl_abapgit_function_module IMPLEMENTATION. EXCEPTIONS function_not_exist = 1 OTHERS = 2. - DATA temp1 TYPE xsdboolean. - temp1 = boolc( sy-subrc = 0 ). - rv_exists = temp1. + rv_exists = xsdbool( sy-subrc = 0 ). CATCH cx_sy_dyn_call_illegal_func. * then its running in ABAP Cloud Programming Model, assume nothing is released * I could not find any way to check for this -Hvam diff --git a/src/objects/sap/zcl_abapgit_sap_namespace.clas.abap b/src/objects/sap/zcl_abapgit_sap_namespace.clas.abap index 8ff5cebe6..f5669a391 100644 --- a/src/objects/sap/zcl_abapgit_sap_namespace.clas.abap +++ b/src/objects/sap/zcl_abapgit_sap_namespace.clas.abap @@ -21,9 +21,7 @@ CLASS ZCL_ABAPGIT_SAP_NAMESPACE IMPLEMENTATION. FIELD-SYMBOLS TYPE any. TRY. SELECT SINGLE editflag FROM ('TRNSPACE') INTO lv_editflag WHERE namespace = iv_namespace. - DATA temp1 TYPE xsdboolean. - temp1 = boolc( sy-subrc = 0 ). - rv_yes = temp1. + rv_yes = xsdbool( sy-subrc = 0 ). CATCH cx_sy_dynamic_osql_error. ASSIGN ('XCO_CP_SYSTEM=>NAMESPACE') TO . lo_obj = . @@ -46,9 +44,7 @@ CLASS ZCL_ABAPGIT_SAP_NAMESPACE IMPLEMENTATION. FIELD-SYMBOLS TYPE any. TRY. SELECT SINGLE editflag FROM ('TRNSPACE') INTO lv_editflag WHERE namespace = iv_namespace. - DATA temp2 TYPE xsdboolean. - temp2 = boolc( sy-subrc = 0 AND lv_editflag = 'X' ). - rv_yes = temp2. + rv_yes = xsdbool( sy-subrc = 0 AND lv_editflag = 'X' ). CATCH cx_sy_dynamic_osql_error. ASSIGN ('XCO_CP_SYSTEM=>NAMESPACE') TO . lo_obj = . diff --git a/src/objects/sap/zcl_abapgit_sap_package.clas.abap b/src/objects/sap/zcl_abapgit_sap_package.clas.abap index 765feac08..bd9f0c963 100644 --- a/src/objects/sap/zcl_abapgit_sap_package.clas.abap +++ b/src/objects/sap/zcl_abapgit_sap_package.clas.abap @@ -54,9 +54,7 @@ CLASS zcl_abapgit_sap_package IMPLEMENTATION. rv_are_changes_rec_in_tr_req = li_package->wbo_korr_flag. WHEN 1. " For new packages, derive from package name - DATA temp1 TYPE xsdboolean. - temp1 = boolc( mv_package(1) <> '$' AND mv_package(1) <> 'T' ). - rv_are_changes_rec_in_tr_req = temp1. + rv_are_changes_rec_in_tr_req = xsdbool( mv_package(1) <> '$' AND mv_package(1) <> 'T' ). WHEN OTHERS. zcx_abapgit_exception=>raise_t100( ). ENDCASE. @@ -233,9 +231,7 @@ CLASS zcl_abapgit_sap_package IMPLEMENTATION. intern_err = 3 no_access = 4 object_locked_and_modified = 5 ). - DATA temp2 TYPE xsdboolean. - temp2 = boolc( sy-subrc <> 1 ). - rv_bool = temp2. + rv_bool = xsdbool( sy-subrc <> 1 ). ENDMETHOD. diff --git a/src/objects/tabl/zcl_abapgit_object_tabl.clas.abap b/src/objects/tabl/zcl_abapgit_object_tabl.clas.abap index c192b5717..91af551af 100644 --- a/src/objects/tabl/zcl_abapgit_object_tabl.clas.abap +++ b/src/objects/tabl/zcl_abapgit_object_tabl.clas.abap @@ -452,9 +452,9 @@ CLASS ZCL_ABAPGIT_OBJECT_TABL IMPLEMENTATION. METHOD is_db_table_category. " values from domain TABCLASS - DATA temp1 TYPE xsdboolean. - temp1 = boolc( iv_tabclass = 'TRANSP' OR iv_tabclass = 'CLUSTER' OR iv_tabclass = 'POOL' ). - rv_is_db_table_type = temp1. + rv_is_db_table_type = xsdbool( iv_tabclass = 'TRANSP' + OR iv_tabclass = 'CLUSTER' + OR iv_tabclass = 'POOL' ). ENDMETHOD. @@ -469,9 +469,7 @@ CLASS ZCL_ABAPGIT_OBJECT_TABL IMPLEMENTATION. FROM edisegment INTO lv_segment_type WHERE segtyp = lv_segment_type. - DATA temp2 TYPE xsdboolean. - temp2 = boolc( sy-subrc = 0 ). - rv_is_idoc_segment = temp2. + rv_is_idoc_segment = xsdbool( sy-subrc = 0 ). ENDMETHOD. @@ -488,8 +486,7 @@ CLASS ZCL_ABAPGIT_OBJECT_TABL IMPLEMENTATION. DATA lv_segment_type TYPE edilsegtyp. DATA lv_result LIKE sy-subrc. DATA lv_devclass TYPE devclass. - TYPES temp1 TYPE STANDARD TABLE OF edisegmdef. -DATA lt_segmentdefinitions TYPE temp1. + DATA lt_segmentdefinitions TYPE STANDARD TABLE OF edisegmdef. DATA ls_segment_definition TYPE zif_abapgit_object_tabl=>ty_segment_definition. FIELD-SYMBOLS: TYPE edisegmdef. @@ -616,8 +613,7 @@ DATA lt_segmentdefinitions TYPE temp1. as4time TYPE dd02l-as4time, END OF ty_data. - TYPES temp2 TYPE STANDARD TABLE OF ty_data WITH DEFAULT KEY. -DATA: lt_data TYPE temp2, + DATA: lt_data TYPE STANDARD TABLE OF ty_data WITH DEFAULT KEY, ls_data LIKE LINE OF lt_data. @@ -840,9 +836,7 @@ DATA: lt_data TYPE temp2, SELECT SINGLE tabname FROM dd02l INTO lv_tabname WHERE tabname = lv_tabname. "#EC CI_NOORDER ENDIF. - DATA temp3 TYPE xsdboolean. - temp3 = boolc( sy-subrc = 0 ). - rv_bool = temp3. + rv_bool = xsdbool( sy-subrc = 0 ). ENDMETHOD. @@ -853,13 +847,13 @@ DATA: lt_data TYPE temp2, li_local_version_input TYPE REF TO zif_abapgit_xml_input. - CREATE OBJECT li_local_version_output TYPE zcl_abapgit_xml_output. + li_local_version_output = NEW zcl_abapgit_xml_output( ). zif_abapgit_object~serialize( li_local_version_output ). - CREATE OBJECT li_local_version_input TYPE zcl_abapgit_xml_input EXPORTING iv_xml = li_local_version_output->render( ). + li_local_version_input = NEW zcl_abapgit_xml_input( iv_xml = li_local_version_output->render( ) ). - CREATE OBJECT ri_comparator TYPE zcl_abapgit_object_tabl_compar EXPORTING ii_local = li_local_version_input. + ri_comparator = NEW zcl_abapgit_object_tabl_compar( ii_local = li_local_version_input ). ENDMETHOD. diff --git a/src/objects/tabl/zcl_abapgit_object_tabl_compar.clas.abap b/src/objects/tabl/zcl_abapgit_object_tabl_compar.clas.abap index 039eec255..68318f580 100644 --- a/src/objects/tabl/zcl_abapgit_object_tabl_compar.clas.abap +++ b/src/objects/tabl/zcl_abapgit_object_tabl_compar.clas.abap @@ -64,9 +64,8 @@ CLASS ZCL_ABAPGIT_OBJECT_TABL_COMPAR IMPLEMENTATION. METHOD get_where_used_recursive. - TYPES temp1 TYPE STANDARD TABLE OF rsfindlst. -DATA: lt_findstrings TYPE string_table, - lt_founds TYPE temp1, + DATA: lt_findstrings TYPE string_table, + lt_founds TYPE STANDARD TABLE OF rsfindlst, lt_scope TYPE ty_seu_obj, lv_findstring LIKE LINE OF lt_findstrings. @@ -141,20 +140,16 @@ DATA: lt_findstrings TYPE string_table, DELETE lt_founds WHERE object_cls <> 'DT'. - DATA temp1 TYPE xsdboolean. - temp1 = boolc( lines( lt_founds ) > 0 ). - rv_is_structure_used_in_db_tab = temp1. + rv_is_structure_used_in_db_tab = xsdbool( lines( lt_founds ) > 0 ). ENDMETHOD. METHOD validate. - TYPES temp2 TYPE TABLE OF dd03p. -TYPES temp1 TYPE TABLE OF dd03p. -DATA: lt_previous_table_fields TYPE temp2, + DATA: lt_previous_table_fields TYPE TABLE OF dd03p, ls_previous_table_field LIKE LINE OF lt_previous_table_fields, - lt_current_table_fields TYPE temp1, + lt_current_table_fields TYPE TABLE OF dd03p, ls_current_table_field LIKE LINE OF lt_current_table_fields, ls_dd02v TYPE dd02v, ls_item TYPE zif_abapgit_definitions=>ty_item, diff --git a/src/objects/tabl/zcl_abapgit_object_tabl_ddl.clas.testclasses.abap b/src/objects/tabl/zcl_abapgit_object_tabl_ddl.clas.testclasses.abap index e9050a887..46eb4813c 100644 --- a/src/objects/tabl/zcl_abapgit_object_tabl_ddl.clas.testclasses.abap +++ b/src/objects/tabl/zcl_abapgit_object_tabl_ddl.clas.testclasses.abap @@ -31,7 +31,7 @@ CLASS ltcl_test IMPLEMENTATION. DATA lv_result TYPE string. lv_text = |hello ' world|. - CREATE OBJECT lo_cut. + lo_cut = NEW #( ). lv_result = lo_cut->escape_string( lv_text ). cl_abap_unit_assert=>assert_equals( @@ -53,7 +53,7 @@ CLASS ltcl_test IMPLEMENTATION. DATA lv_xml TYPE string. - CREATE OBJECT lo_format. + lo_format = NEW #( ). CALL TRANSFORMATION id OPTIONS value_handling = 'accept_data_loss' diff --git a/src/objects/texts/zcl_abapgit_i18n_params.clas.abap b/src/objects/texts/zcl_abapgit_i18n_params.clas.abap index 52f0fca38..da9c3502c 100644 --- a/src/objects/texts/zcl_abapgit_i18n_params.clas.abap +++ b/src/objects/texts/zcl_abapgit_i18n_params.clas.abap @@ -120,19 +120,19 @@ CLASS zcl_abapgit_i18n_params IMPLEMENTATION. METHOD is_lxe_applicable. - DATA temp1 TYPE xsdboolean. - temp1 = boolc( ms_params-main_language_only = abap_false AND ms_params-use_lxe = abap_true AND ms_params-translation_languages IS NOT INITIAL ). - rv_yes = temp1. + rv_yes = xsdbool( ms_params-main_language_only = abap_false AND + ms_params-use_lxe = abap_true AND + ms_params-translation_languages IS NOT INITIAL ). ENDMETHOD. METHOD new. - CREATE OBJECT ro_instance EXPORTING iv_main_language = iv_main_language - iv_main_language_only = iv_main_language_only - it_translation_langs = it_translation_langs - iv_use_lxe = iv_use_lxe - is_params = is_params. + ro_instance = NEW #( iv_main_language = iv_main_language + iv_main_language_only = iv_main_language_only + it_translation_langs = it_translation_langs + iv_use_lxe = iv_use_lxe + is_params = is_params ). ENDMETHOD. diff --git a/src/objects/texts/zcl_abapgit_longtexts.clas.abap b/src/objects/texts/zcl_abapgit_longtexts.clas.abap index 2b7573163..4027f5ff4 100644 --- a/src/objects/texts/zcl_abapgit_longtexts.clas.abap +++ b/src/objects/texts/zcl_abapgit_longtexts.clas.abap @@ -216,9 +216,7 @@ CLASS zcl_abapgit_longtexts IMPLEMENTATION. LOOP AT lt_longtexts ASSIGNING . - DATA temp1 TYPE xsdboolean. - temp1 = boolc( iv_main_language <> -dokil-langu ). - lv_no_main_lang = temp1. + lv_no_main_lang = xsdbool( iv_main_language <> -dokil-langu ). CALL FUNCTION 'DOCU_UPDATE' EXPORTING diff --git a/src/objects/texts/zcl_abapgit_longtexts.clas.testclasses.abap b/src/objects/texts/zcl_abapgit_longtexts.clas.testclasses.abap index 5e0e26e3b..2bc2097c0 100644 --- a/src/objects/texts/zcl_abapgit_longtexts.clas.testclasses.abap +++ b/src/objects/texts/zcl_abapgit_longtexts.clas.testclasses.abap @@ -15,7 +15,7 @@ CLASS zcl_abapgit_longtexts DEFINITION LOCAL FRIENDS ltcl_longtexts. CLASS ltcl_longtexts IMPLEMENTATION. METHOD setup. - CREATE OBJECT mo_cut. + mo_cut = NEW #( ). ENDMETHOD. METHOD escape_name. diff --git a/src/objects/texts/zcl_abapgit_lxe_texts.clas.abap b/src/objects/texts/zcl_abapgit_lxe_texts.clas.abap index 264c9afab..ddd7d3c52 100644 --- a/src/objects/texts/zcl_abapgit_lxe_texts.clas.abap +++ b/src/objects/texts/zcl_abapgit_lxe_texts.clas.abap @@ -181,8 +181,7 @@ CLASS zcl_abapgit_lxe_texts IMPLEMENTATION. METHOD check_langs_versus_installed. - TYPES temp1 TYPE HASHED TABLE OF laiso WITH UNIQUE KEY table_line. -DATA lt_installed_hash TYPE temp1. + DATA lt_installed_hash TYPE HASHED TABLE OF laiso WITH UNIQUE KEY table_line. FIELD-SYMBOLS LIKE LINE OF it_languages. CLEAR: et_intersection, et_missfits. @@ -519,9 +518,7 @@ DATA lt_installed_hash TYPE temp1. METHOD is_object_supported. READ TABLE gt_supported_obj_types TRANSPORTING NO FIELDS WITH KEY table_line = iv_object_type. - DATA temp1 TYPE xsdboolean. - temp1 = boolc( sy-subrc = 0 ). - rv_yes = temp1. + rv_yes = xsdbool( sy-subrc = 0 ). ENDMETHOD. @@ -646,7 +643,7 @@ DATA lt_installed_hash TYPE temp1. LOOP AT mo_i18n_params->ms_params-translation_languages INTO lv_lang. lv_lang = to_lower( lv_lang ). - CREATE OBJECT lo_po_file EXPORTING iv_lang = lv_lang. + lo_po_file = NEW #( iv_lang = lv_lang ). LOOP AT lt_lxe_texts ASSIGNING . IF iso4_to_iso2( -target_lang ) = lv_lang. lo_po_file->push_text_pairs( diff --git a/src/objects/texts/zcl_abapgit_po_file.clas.abap b/src/objects/texts/zcl_abapgit_po_file.clas.abap index d4a6a1f72..c7d155112 100644 --- a/src/objects/texts/zcl_abapgit_po_file.clas.abap +++ b/src/objects/texts/zcl_abapgit_po_file.clas.abap @@ -93,7 +93,7 @@ CLASS zcl_abapgit_po_file IMPLEMENTATION. FIELD-SYMBOLS LIKE LINE OF mt_pairs. FIELD-SYMBOLS LIKE LINE OF -comments. - CREATE OBJECT ro_buf. + ro_buf = NEW #( ). LOOP AT mt_pairs ASSIGNING . IF sy-tabix <> 1. @@ -116,7 +116,7 @@ CLASS zcl_abapgit_po_file IMPLEMENTATION. METHOD build_po_head. - CREATE OBJECT ro_buf. + ro_buf = NEW #( ). " TODO, more headers ? sample: https://www.gnu.org/software/trans-coord/manual/gnun/html_node/PO-Header.html " TODO, does \n really necessary ? check editors support for non-\n diff --git a/src/objects/texts/zcl_abapgit_po_file.clas.testclasses.abap b/src/objects/texts/zcl_abapgit_po_file.clas.testclasses.abap index b03b275a0..363e72580 100644 --- a/src/objects/texts/zcl_abapgit_po_file.clas.testclasses.abap +++ b/src/objects/texts/zcl_abapgit_po_file.clas.testclasses.abap @@ -26,7 +26,7 @@ CLASS ltcl_po_file IMPLEMENTATION. FIELD-SYMBOLS LIKE LINE OF lt_lxe_pairs. - CREATE OBJECT lo_po EXPORTING iv_lang = 'xx'. + lo_po = NEW #( iv_lang = 'xx' ). APPEND INITIAL LINE TO lt_lxe_pairs ASSIGNING . -textkey = 'K1'. @@ -51,7 +51,7 @@ CLASS ltcl_po_file IMPLEMENTATION. lv_act = lo_po->build_po_body( )->join_w_newline_and_flush( ). - CREATE OBJECT lo_buf. + lo_buf = NEW #( ). lo_buf->add( '#: T1/OBJ1/K1, maxlen=10' )->add( '#: T1/OBJ1/K2 X, maxlen=11' @@ -98,7 +98,7 @@ CLASS ltcl_po_file IMPLEMENTATION. CLEAR -t_text. ENDLOOP. - CREATE OBJECT lo_buf. + lo_buf = NEW #( ). lo_buf->add( 'msgid ""' )->add( 'msgstr ""' @@ -113,7 +113,7 @@ CLASS ltcl_po_file IMPLEMENTATION. )->add( 'msgid "World"' )->add( 'msgstr "World DE"' ). - CREATE OBJECT lo_po EXPORTING iv_lang = 'xx'. + lo_po = NEW #( iv_lang = 'xx' ). lo_po->parse_po( lo_buf->join_w_newline_and_flush( ) ). lo_po->zif_abapgit_i18n_file~translate( CHANGING ct_text_pairs = lt_lxe_pairs_act ). @@ -127,7 +127,7 @@ CLASS ltcl_po_file IMPLEMENTATION. DATA lo_po TYPE REF TO zcl_abapgit_po_file. - CREATE OBJECT lo_po EXPORTING iv_lang = 'xx'. + lo_po = NEW #( iv_lang = 'xx' ). TRY. lo_po->parse_po( zcl_abapgit_string_buffer=>new( @@ -223,7 +223,7 @@ CLASS ltcl_po_file IMPLEMENTATION. DATA lo_po TYPE REF TO zcl_abapgit_po_file. FIELD-SYMBOLS LIKE LINE OF lo_po->mt_pairs. - CREATE OBJECT lo_po EXPORTING iv_lang = 'xx'. + lo_po = NEW #( iv_lang = 'xx' ). lo_po->parse_po( zcl_abapgit_string_buffer=>new( )->add( 'msgid "a"' )->add( 'msgstr "1\n"' @@ -239,7 +239,7 @@ CLASS ltcl_po_file IMPLEMENTATION. act = -target exp = |1{ cl_abap_char_utilities=>newline }2| ). - CREATE OBJECT lo_po EXPORTING iv_lang = 'xx'. + lo_po = NEW #( iv_lang = 'xx' ). lo_po->parse_po( zcl_abapgit_string_buffer=>new( )->add( 'msgid "a"' )->add( 'msgstr ""' diff --git a/src/objects/texts/zcl_abapgit_properties_file.clas.abap b/src/objects/texts/zcl_abapgit_properties_file.clas.abap index 53827fb2c..d6c55c961 100644 --- a/src/objects/texts/zcl_abapgit_properties_file.clas.abap +++ b/src/objects/texts/zcl_abapgit_properties_file.clas.abap @@ -54,7 +54,7 @@ CLASS zcl_abapgit_properties_file IMPLEMENTATION. lo_json_path TYPE REF TO zcl_abapgit_json_path, lx_exception TYPE REF TO cx_static_check. - CREATE OBJECT lo_json_path. + lo_json_path = NEW #( ). TRY. lv_translation = lo_json_path->deserialize( mt_translation ). diff --git a/src/objects/texts/zcl_abapgit_properties_file.clas.testclasses.abap b/src/objects/texts/zcl_abapgit_properties_file.clas.testclasses.abap index 6dd988690..e122adc52 100644 --- a/src/objects/texts/zcl_abapgit_properties_file.clas.testclasses.abap +++ b/src/objects/texts/zcl_abapgit_properties_file.clas.testclasses.abap @@ -15,7 +15,7 @@ CLASS ltcl_test IMPLEMENTATION. DATA: lo_cut TYPE REF TO zcl_abapgit_properties_file. DATA: lv_act TYPE laiso. - CREATE OBJECT lo_cut EXPORTING iv_lang = 'DE'. + lo_cut = NEW #( iv_lang = 'DE' ). lv_act = lo_cut->zif_abapgit_i18n_file~lang( ). cl_abap_unit_assert=>assert_equals( diff --git a/src/objects/zcl_abapgit_object_acid.clas.abap b/src/objects/zcl_abapgit_object_acid.clas.abap index aeee89fd5..2b0efa80b 100644 --- a/src/objects/zcl_abapgit_object_acid.clas.abap +++ b/src/objects/zcl_abapgit_object_acid.clas.abap @@ -138,9 +138,7 @@ CLASS zcl_abapgit_object_acid IMPLEMENTATION. lo_aab = create_object( ). lo_aab->get_state( IMPORTING ex_state = lv_state ). - DATA temp1 TYPE xsdboolean. - temp1 = boolc( lv_state = abap_true ). - rv_bool = temp1. + rv_bool = xsdbool( lv_state = abap_true ). ENDMETHOD. diff --git a/src/objects/zcl_abapgit_object_aqbg.clas.abap b/src/objects/zcl_abapgit_object_aqbg.clas.abap index 0bba5e3a9..483abec97 100644 --- a/src/objects/zcl_abapgit_object_aqbg.clas.abap +++ b/src/objects/zcl_abapgit_object_aqbg.clas.abap @@ -57,9 +57,9 @@ CLASS zcl_abapgit_object_aqbg IMPLEMENTATION. METHOD get_generic. " transaction SQ03 - CREATE OBJECT ro_generic EXPORTING is_item = ms_item - io_field_rules = get_field_rules( ) - iv_language = mv_language. + ro_generic = NEW #( is_item = ms_item + io_field_rules = get_field_rules( ) + iv_language = mv_language ). ENDMETHOD. diff --git a/src/objects/zcl_abapgit_object_aqqu.clas.abap b/src/objects/zcl_abapgit_object_aqqu.clas.abap index a470e41d3..9ef5faef0 100644 --- a/src/objects/zcl_abapgit_object_aqqu.clas.abap +++ b/src/objects/zcl_abapgit_object_aqqu.clas.abap @@ -36,9 +36,9 @@ CLASS zcl_abapgit_object_aqqu IMPLEMENTATION. METHOD get_generic. " transaction SQ01 - CREATE OBJECT ro_generic EXPORTING is_item = ms_item - io_field_rules = get_field_rules( ) - iv_language = mv_language. + ro_generic = NEW #( is_item = ms_item + io_field_rules = get_field_rules( ) + iv_language = mv_language ). ENDMETHOD. diff --git a/src/objects/zcl_abapgit_object_aqsg.clas.abap b/src/objects/zcl_abapgit_object_aqsg.clas.abap index e22f77a87..6fe8a2a26 100644 --- a/src/objects/zcl_abapgit_object_aqsg.clas.abap +++ b/src/objects/zcl_abapgit_object_aqsg.clas.abap @@ -36,9 +36,9 @@ CLASS zcl_abapgit_object_aqsg IMPLEMENTATION. METHOD get_generic. " transaction SQ02 - CREATE OBJECT ro_generic EXPORTING is_item = ms_item - io_field_rules = get_field_rules( ) - iv_language = mv_language. + ro_generic = NEW #( is_item = ms_item + io_field_rules = get_field_rules( ) + iv_language = mv_language ). ENDMETHOD. diff --git a/src/objects/zcl_abapgit_object_asfc.clas.abap b/src/objects/zcl_abapgit_object_asfc.clas.abap index c359b1597..92e98cb9e 100644 --- a/src/objects/zcl_abapgit_object_asfc.clas.abap +++ b/src/objects/zcl_abapgit_object_asfc.clas.abap @@ -23,8 +23,8 @@ CLASS zcl_abapgit_object_asfc IMPLEMENTATION. METHOD get_generic. - CREATE OBJECT ro_generic EXPORTING is_item = ms_item - iv_language = mv_language. + ro_generic = NEW #( is_item = ms_item + iv_language = mv_language ). ENDMETHOD. diff --git a/src/objects/zcl_abapgit_object_auth.clas.abap b/src/objects/zcl_abapgit_object_auth.clas.abap index c37070301..6d78c6eab 100644 --- a/src/objects/zcl_abapgit_object_auth.clas.abap +++ b/src/objects/zcl_abapgit_object_auth.clas.abap @@ -54,7 +54,7 @@ CLASS zcl_abapgit_object_auth IMPLEMENTATION. lo_auth TYPE REF TO cl_auth_tools. " authority check - CREATE OBJECT lo_auth. + lo_auth = NEW #( ). IF lo_auth->authority_check_suso( actvt = '06' fieldname = mv_fieldname ) <> 0. MESSAGE e463(01) WITH mv_fieldname INTO zcx_abapgit_exception=>null. @@ -96,7 +96,7 @@ CLASS zcl_abapgit_object_auth IMPLEMENTATION. tadir_insert( iv_package ). - CREATE OBJECT lo_auth. + lo_auth = NEW #( ). IF lo_auth->add_afield_to_trkorr( ls_authx-fieldname ) <> 0. zcx_abapgit_exception=>raise( 'Error deserializing AUTH' ). @@ -118,9 +118,7 @@ CLASS zcl_abapgit_object_auth IMPLEMENTATION. SELECT SINGLE fieldname FROM authx INTO mv_fieldname WHERE fieldname = ms_item-obj_name. "#EC CI_GENBUFF - DATA temp1 TYPE xsdboolean. - temp1 = boolc( sy-subrc = 0 ). - rv_bool = temp1. + rv_bool = xsdbool( sy-subrc = 0 ). ENDMETHOD. diff --git a/src/objects/zcl_abapgit_object_avar.clas.abap b/src/objects/zcl_abapgit_object_avar.clas.abap index 2f7a91961..a4eed329a 100644 --- a/src/objects/zcl_abapgit_object_avar.clas.abap +++ b/src/objects/zcl_abapgit_object_avar.clas.abap @@ -153,9 +153,7 @@ CLASS zcl_abapgit_object_avar IMPLEMENTATION. lo_aab = create_object( ). lo_aab->get_state( IMPORTING ex_state = lv_state ). - DATA temp1 TYPE xsdboolean. - temp1 = boolc( lv_state = abap_true ). - rv_bool = temp1. + rv_bool = xsdbool( lv_state = abap_true ). ENDMETHOD. diff --git a/src/objects/zcl_abapgit_object_avas.clas.abap b/src/objects/zcl_abapgit_object_avas.clas.abap index 595d0d81f..12c81b16a 100644 --- a/src/objects/zcl_abapgit_object_avas.clas.abap +++ b/src/objects/zcl_abapgit_object_avas.clas.abap @@ -41,8 +41,7 @@ CLASS zcl_abapgit_object_avas IMPLEMENTATION. METHOD insert_assignments. - TYPES temp1 TYPE STANDARD TABLE OF cls_assignment. -DATA: lt_assignment TYPE temp1, + DATA: lt_assignment TYPE STANDARD TABLE OF cls_assignment, ls_assignment LIKE LINE OF lt_assignment, ls_value LIKE LINE OF is_avas-values. @@ -80,7 +79,7 @@ DATA: lt_assignment TYPE temp1, lv_id = ms_item-obj_name. TRY. - CREATE OBJECT ro_avas EXPORTING im_assignment_id = lv_id. + ro_avas = NEW #( im_assignment_id = lv_id ). CATCH cx_pak_wb_object_locked INTO lx_err. zcx_abapgit_exception=>raise( |AVAS { lv_id }: locked: { lx_err->get_longtext( ) }| ). CATCH cx_pak_not_authorized INTO lx_err. @@ -165,9 +164,7 @@ DATA: lt_assignment TYPE temp1, SELECT SINGLE guid FROM cls_assignment INTO lv_guid WHERE guid = ms_item-obj_name. - DATA temp1 TYPE xsdboolean. - temp1 = boolc( sy-subrc = 0 ). - rv_bool = temp1. + rv_bool = xsdbool( sy-subrc = 0 ). ENDMETHOD. diff --git a/src/objects/zcl_abapgit_object_char.clas.abap b/src/objects/zcl_abapgit_object_char.clas.abap index 711132161..c9d042a12 100644 --- a/src/objects/zcl_abapgit_object_char.clas.abap +++ b/src/objects/zcl_abapgit_object_char.clas.abap @@ -43,16 +43,14 @@ CLASS ZCL_ABAPGIT_OBJECT_CHAR IMPLEMENTATION. SELECT SINGLE name FROM cls_attribute INTO lv_name WHERE name = ms_item-obj_name. - DATA temp1 TYPE xsdboolean. - temp1 = boolc( sy-subrc <> 0 ). - lv_new = temp1. + lv_new = xsdbool( sy-subrc <> 0 ). lv_name = ms_item-obj_name. TRY. - CREATE OBJECT ro_char EXPORTING im_name = lv_name - im_type_group = iv_type_group - im_new = lv_new - im_activation_state = iv_activation_state. + ro_char = NEW #( im_name = lv_name + im_type_group = iv_type_group + im_new = lv_new + im_activation_state = iv_activation_state ). CATCH cx_pak_invalid_data cx_pak_not_authorized cx_pak_invalid_state diff --git a/src/objects/zcl_abapgit_object_chdo.clas.abap b/src/objects/zcl_abapgit_object_chdo.clas.abap index 91a4d9d87..aaa1263ce 100644 --- a/src/objects/zcl_abapgit_object_chdo.clas.abap +++ b/src/objects/zcl_abapgit_object_chdo.clas.abap @@ -49,11 +49,9 @@ CLASS zcl_abapgit_object_chdo IMPLEMENTATION. METHOD after_import. - TYPES temp1 TYPE STANDARD TABLE OF e071 WITH DEFAULT KEY. -TYPES temp2 TYPE STANDARD TABLE OF sprot_u WITH DEFAULT KEY. -DATA: lt_cts_object_entry TYPE temp1, + DATA: lt_cts_object_entry TYPE STANDARD TABLE OF e071 WITH DEFAULT KEY, ls_cts_object_entry LIKE LINE OF lt_cts_object_entry, - lt_errormsg TYPE temp2. + lt_errormsg TYPE STANDARD TABLE OF sprot_u WITH DEFAULT KEY. ls_cts_object_entry-pgmid = 'R3TR'. ls_cts_object_entry-object = ms_item-obj_type. @@ -222,11 +220,9 @@ DATA: lt_cts_object_entry TYPE temp1, METHOD zif_abapgit_object~delete. - TYPES temp3 TYPE STANDARD TABLE OF cdnames. -TYPES temp4 TYPE STANDARD TABLE OF tcdrs. -DATA: lt_cdnames TYPE temp3, + DATA: lt_cdnames TYPE STANDARD TABLE OF cdnames, ls_cdnames TYPE cdnames, - lt_tcdrs TYPE temp4, + lt_tcdrs TYPE STANDARD TABLE OF tcdrs, ls_tcdrs TYPE tcdrs, lv_msg TYPE symsgv. @@ -308,9 +304,7 @@ DATA: lt_cdnames TYPE temp3, FROM tcdrp WHERE object = mv_object. - DATA temp1 TYPE xsdboolean. - temp1 = boolc( sy-subrc = 0 ). - rv_bool = temp1. + rv_bool = xsdbool( sy-subrc = 0 ). ENDMETHOD. @@ -347,8 +341,7 @@ DATA: lt_cdnames TYPE temp3, METHOD zif_abapgit_object~jump. - TYPES temp5 TYPE STANDARD TABLE OF bdcdata. -DATA: lt_bdcdata TYPE temp5, + DATA: lt_bdcdata TYPE STANDARD TABLE OF bdcdata, ls_bdcdata LIKE LINE OF lt_bdcdata. CLEAR: ls_bdcdata. @@ -388,13 +381,10 @@ DATA: lt_bdcdata TYPE temp5, METHOD zif_abapgit_object~serialize. - TYPES temp6 TYPE STANDARD TABLE OF tcdrp. -TYPES temp5 TYPE STANDARD TABLE OF tcdob. -TYPES temp1 TYPE STANDARD TABLE OF tcdobt. -DATA: ls_change_object TYPE ty_change_document, - lt_tcdrp TYPE temp6, - lt_tcdob TYPE temp5, - lt_tcdobt TYPE temp1, + DATA: ls_change_object TYPE ty_change_document, + lt_tcdrp TYPE STANDARD TABLE OF tcdrp, + lt_tcdob TYPE STANDARD TABLE OF tcdob, + lt_tcdobt TYPE STANDARD TABLE OF tcdobt, BEGIN OF ls_nulldatetime, " hack ro reset fields when they exist without syntax errors when they don't udate TYPE sy-datum, utime TYPE sy-uzeit, diff --git a/src/objects/zcl_abapgit_object_cmod.clas.abap b/src/objects/zcl_abapgit_object_cmod.clas.abap index e0d526c8f..33b642199 100644 --- a/src/objects/zcl_abapgit_object_cmod.clas.abap +++ b/src/objects/zcl_abapgit_object_cmod.clas.abap @@ -72,13 +72,10 @@ CLASS zcl_abapgit_object_cmod IMPLEMENTATION. METHOD zif_abapgit_object~deserialize. - TYPES temp1 TYPE TABLE OF modact. -TYPES temp2 TYPE TABLE OF modtext. -TYPES temp3 TYPE TABLE OF modattr. -DATA: lv_name TYPE modact-name, - lt_modact TYPE temp1, - lt_modtext TYPE temp2, - lt_modattr TYPE temp3. + DATA: lv_name TYPE modact-name, + lt_modact TYPE TABLE OF modact, + lt_modtext TYPE TABLE OF modtext, + lt_modattr TYPE TABLE OF modattr. lv_name = ms_item-obj_name. @@ -128,9 +125,7 @@ DATA: lv_name TYPE modact-name, DATA: lv_name TYPE modact-name. SELECT SINGLE name FROM modact INTO lv_name WHERE name = ms_item-obj_name. - DATA temp1 TYPE xsdboolean. - temp1 = boolc( sy-subrc = 0 ). - rv_bool = temp1. + rv_bool = xsdbool( sy-subrc = 0 ). ENDMETHOD. @@ -181,12 +176,9 @@ DATA: lv_name TYPE modact-name, METHOD zif_abapgit_object~serialize. - TYPES temp4 TYPE TABLE OF modact. -TYPES temp5 TYPE TABLE OF modtext. -TYPES temp6 TYPE TABLE OF modattr. -DATA: lt_modact TYPE temp4, - lt_modtext TYPE temp5, - lt_modattr TYPE temp6. + DATA: lt_modact TYPE TABLE OF modact, + lt_modtext TYPE TABLE OF modtext, + lt_modattr TYPE TABLE OF modattr. FIELD-SYMBOLS: TYPE modattr. diff --git a/src/objects/zcl_abapgit_object_cus0.clas.abap b/src/objects/zcl_abapgit_object_cus0.clas.abap index 7e67131e2..0d0c8cc47 100644 --- a/src/objects/zcl_abapgit_object_cus0.clas.abap +++ b/src/objects/zcl_abapgit_object_cus0.clas.abap @@ -111,9 +111,7 @@ CLASS zcl_abapgit_object_cus0 IMPLEMENTATION. IMPORTING message = ls_message. - DATA temp1 TYPE xsdboolean. - temp1 = boolc( ls_message IS INITIAL ). - rv_bool = temp1. + rv_bool = xsdbool( ls_message IS INITIAL ). ENDMETHOD. diff --git a/src/objects/zcl_abapgit_object_cus1.clas.abap b/src/objects/zcl_abapgit_object_cus1.clas.abap index 2e06b4982..1098bc9c4 100644 --- a/src/objects/zcl_abapgit_object_cus1.clas.abap +++ b/src/objects/zcl_abapgit_object_cus1.clas.abap @@ -129,9 +129,7 @@ CLASS zcl_abapgit_object_cus1 IMPLEMENTATION. activity_exists_not = 1 OTHERS = 2. - DATA temp1 TYPE xsdboolean. - temp1 = boolc( sy-subrc = 0 ). - rv_bool = temp1. + rv_bool = xsdbool( sy-subrc = 0 ). ENDMETHOD. @@ -167,8 +165,7 @@ CLASS zcl_abapgit_object_cus1 IMPLEMENTATION. METHOD zif_abapgit_object~jump. - TYPES temp1 TYPE STANDARD TABLE OF bdcdata. -DATA: lt_bdc_data TYPE temp1. + DATA: lt_bdc_data TYPE STANDARD TABLE OF bdcdata. FIELD-SYMBOLS: TYPE bdcdata. APPEND INITIAL LINE TO lt_bdc_data ASSIGNING . diff --git a/src/objects/zcl_abapgit_object_cus2.clas.abap b/src/objects/zcl_abapgit_object_cus2.clas.abap index ef9409a16..cee074cff 100644 --- a/src/objects/zcl_abapgit_object_cus2.clas.abap +++ b/src/objects/zcl_abapgit_object_cus2.clas.abap @@ -126,9 +126,7 @@ CLASS zcl_abapgit_object_cus2 IMPLEMENTATION. attributes_exists_not = 1 OTHERS = 2. - DATA temp1 TYPE xsdboolean. - temp1 = boolc( sy-subrc = 0 ). - rv_bool = temp1. + rv_bool = xsdbool( sy-subrc = 0 ). ENDMETHOD. diff --git a/src/objects/zcl_abapgit_object_ddls.clas.abap b/src/objects/zcl_abapgit_object_ddls.clas.abap index 186c5091b..af5cfeae7 100644 --- a/src/objects/zcl_abapgit_object_ddls.clas.abap +++ b/src/objects/zcl_abapgit_object_ddls.clas.abap @@ -220,12 +220,10 @@ CLASS zcl_abapgit_object_ddls IMPLEMENTATION. METHOD zif_abapgit_object~delete. - TYPES temp1 TYPE TABLE OF dcdeltb. -TYPES temp2 TYPE TABLE OF dcgentb. -DATA: - lt_deltab TYPE temp1, + DATA: + lt_deltab TYPE TABLE OF dcdeltb, ls_deltab TYPE dcdeltb, - lt_gentab TYPE temp2, + lt_gentab TYPE TABLE OF dcgentb, lv_rc TYPE sy-subrc. " CL_DD_DDL_HANDLER->DELETE does not work for CDS views that reference other views @@ -369,9 +367,7 @@ DATA: name = ms_item-obj_name IMPORTING got_state = lv_state. - DATA temp1 TYPE xsdboolean. - temp1 = boolc( NOT lv_state IS INITIAL ). - rv_bool = temp1. + rv_bool = xsdbool( NOT lv_state IS INITIAL ). CATCH cx_root. rv_bool = abap_false. ENDTRY. @@ -445,11 +441,10 @@ DATA: METHOD zif_abapgit_object~serialize. - TYPES temp3 TYPE STANDARD TABLE OF fieldname WITH DEFAULT KEY. -DATA: lo_ddl TYPE REF TO object, + DATA: lo_ddl TYPE REF TO object, lr_data TYPE REF TO data, lr_data_baseinfo TYPE REF TO data, - lt_clr_comps TYPE temp3, + lt_clr_comps TYPE STANDARD TABLE OF fieldname WITH DEFAULT KEY, lx_error TYPE REF TO cx_root. FIELD-SYMBOLS: TYPE any, diff --git a/src/objects/zcl_abapgit_object_devc.clas.abap b/src/objects/zcl_abapgit_object_devc.clas.abap index 976709030..aeedda563 100644 --- a/src/objects/zcl_abapgit_object_devc.clas.abap +++ b/src/objects/zcl_abapgit_object_devc.clas.abap @@ -139,9 +139,7 @@ CLASS zcl_abapgit_object_devc IMPLEMENTATION. WHERE pgmid = 'R3TR' AND NOT ( ( object = 'DEVC' OR object = 'SOTR' ) AND obj_name = iv_package_name ) AND devclass = iv_package_name. - DATA temp1 TYPE xsdboolean. - temp1 = boolc( sy-subrc <> 0 ). - rv_is_empty = temp1. + rv_is_empty = xsdbool( sy-subrc <> 0 ). ENDMETHOD. @@ -185,10 +183,9 @@ CLASS zcl_abapgit_object_devc IMPLEMENTATION. METHOD remove_obsolete_tadir. - TYPES temp1 TYPE STANDARD TABLE OF devclass. -DATA: + DATA: lv_pack TYPE devclass, - lt_pack TYPE temp1, + lt_pack TYPE STANDARD TABLE OF devclass, ls_tadir TYPE zif_abapgit_definitions=>ty_tadir, lt_tadir TYPE zif_abapgit_definitions=>ty_tadir_tt, ls_item TYPE zif_abapgit_definitions=>ty_item. @@ -340,12 +337,11 @@ DATA: METHOD update_pinf_usages. - TYPES temp2 TYPE SORTED TABLE OF i WITH UNIQUE KEY table_line. -DATA: lt_current_permissions TYPE tpak_permission_to_use_list, + DATA: lt_current_permissions TYPE tpak_permission_to_use_list, li_usage TYPE REF TO if_package_permission_to_use, ls_data_sign TYPE scomppsign, ls_add_permission_data TYPE pkgpermdat, - lt_handled TYPE temp2. + lt_handled TYPE SORTED TABLE OF i WITH UNIQUE KEY table_line. FIELD-SYMBOLS: LIKE LINE OF it_usage_data. " Get the current permissions diff --git a/src/objects/zcl_abapgit_object_dial.clas.abap b/src/objects/zcl_abapgit_object_dial.clas.abap index 33116aae6..55c2fb2f9 100644 --- a/src/objects/zcl_abapgit_object_dial.clas.abap +++ b/src/objects/zcl_abapgit_object_dial.clas.abap @@ -30,9 +30,8 @@ CLASS zcl_abapgit_object_dial IMPLEMENTATION. METHOD zif_abapgit_object~delete. - TYPES temp1 TYPE STANDARD TABLE OF bdcdata. -DATA: ls_bcdata TYPE bdcdata, - lt_bcdata TYPE temp1. + DATA: ls_bcdata TYPE bdcdata, + lt_bcdata TYPE STANDARD TABLE OF bdcdata. ls_bcdata-program = 'SAPMSDIA'. ls_bcdata-dynpro = '1010'. @@ -127,9 +126,7 @@ DATA: ls_bcdata TYPE bdcdata, ls_tdct = _read_tdct( ). - DATA temp1 TYPE xsdboolean. - temp1 = boolc( ls_tdct IS NOT INITIAL ). - rv_bool = temp1. + rv_bool = xsdbool( ls_tdct IS NOT INITIAL ). ENDMETHOD. @@ -180,9 +177,7 @@ DATA: ls_bcdata TYPE bdcdata, object_not_found = 1 OTHERS = 2. - DATA temp2 TYPE xsdboolean. - temp2 = boolc( sy-subrc = 0 ). - rv_exit = temp2. + rv_exit = xsdbool( sy-subrc = 0 ). ENDMETHOD. diff --git a/src/objects/zcl_abapgit_object_doct.clas.abap b/src/objects/zcl_abapgit_object_doct.clas.abap index c9ad088f1..468acbcee 100644 --- a/src/objects/zcl_abapgit_object_doct.clas.abap +++ b/src/objects/zcl_abapgit_object_doct.clas.abap @@ -90,9 +90,7 @@ CLASS zcl_abapgit_object_doct IMPLEMENTATION. WHERE id = c_id AND object = lv_object. "#EC CI_GENBUFF "#EC CI_NOORDER - DATA temp1 TYPE xsdboolean. - temp1 = boolc( sy-subrc = 0 ). - rv_bool = temp1. + rv_bool = xsdbool( sy-subrc = 0 ). ENDMETHOD. @@ -129,10 +127,9 @@ CLASS zcl_abapgit_object_doct IMPLEMENTATION. METHOD zif_abapgit_object~jump. - TYPES temp1 TYPE STANDARD TABLE OF bdcdata. -DATA: ls_dokentry TYPE dokentry, + DATA: ls_dokentry TYPE dokentry, ls_bcdata TYPE bdcdata, - lt_bcdata TYPE temp1. + lt_bcdata TYPE STANDARD TABLE OF bdcdata. " We need to modify dokentry directly, otherwise " Batch Input on SE61 wouldn't work because it stores diff --git a/src/objects/zcl_abapgit_object_docv.clas.abap b/src/objects/zcl_abapgit_object_docv.clas.abap index 4f6f54639..dc6445134 100644 --- a/src/objects/zcl_abapgit_object_docv.clas.abap +++ b/src/objects/zcl_abapgit_object_docv.clas.abap @@ -155,9 +155,7 @@ CLASS zcl_abapgit_object_docv IMPLEMENTATION. WHERE id = mv_id AND object = mv_doc_object. "#EC CI_GENBUFF "#EC CI_NOORDER - DATA temp1 TYPE xsdboolean. - temp1 = boolc( sy-subrc = 0 ). - rv_bool = temp1. + rv_bool = xsdbool( sy-subrc = 0 ). ENDMETHOD. diff --git a/src/objects/zcl_abapgit_object_doma.clas.abap b/src/objects/zcl_abapgit_object_doma.clas.abap index 67313160a..c86b80606 100644 --- a/src/objects/zcl_abapgit_object_doma.clas.abap +++ b/src/objects/zcl_abapgit_object_doma.clas.abap @@ -100,13 +100,11 @@ CLASS zcl_abapgit_object_doma IMPLEMENTATION. METHOD deserialize_texts. - TYPES temp1 TYPE TABLE OF dd07v. -TYPES temp2 TYPE TABLE OF langu. -DATA: lv_name TYPE ddobjname, + DATA: lv_name TYPE ddobjname, lv_valpos TYPE valpos, ls_dd01v_tmp TYPE dd01v, - lt_dd07v_tmp TYPE temp1, - lt_i18n_langs TYPE temp2, + lt_dd07v_tmp TYPE TABLE OF dd07v, + lt_i18n_langs TYPE TABLE OF langu, lt_dd01_texts TYPE ty_dd01_texts, lt_dd07_texts TYPE ty_dd07_texts. @@ -203,13 +201,11 @@ DATA: lv_name TYPE ddobjname, METHOD serialize_texts. - TYPES temp3 TYPE TABLE OF dd07v. -TYPES temp4 TYPE TABLE OF langu. -DATA: lv_name TYPE ddobjname, + DATA: lv_name TYPE ddobjname, lv_index TYPE i, ls_dd01v TYPE dd01v, - lt_dd07v TYPE temp3, - lt_i18n_langs TYPE temp4, + lt_dd07v TYPE TABLE OF dd07v, + lt_i18n_langs TYPE TABLE OF langu, lt_dd01_texts TYPE ty_dd01_texts, lt_dd07_texts TYPE ty_dd07_texts, lt_language_filter TYPE zif_abapgit_environment=>ty_system_language_filter. @@ -339,11 +335,10 @@ DATA: lv_name TYPE ddobjname, * package SEDD * package SDIC - TYPES temp5 TYPE TABLE OF dd07v. -DATA: lv_name TYPE ddobjname, + DATA: lv_name TYPE ddobjname, lv_done TYPE abap_bool, ls_dd01v TYPE dd01v, - lt_dd07v TYPE temp5. + lt_dd07v TYPE TABLE OF dd07v. FIELD-SYMBOLS TYPE dd07v. @@ -411,9 +406,7 @@ DATA: lv_name TYPE ddobjname, SELECT SINGLE domname FROM dd01l INTO lv_domname WHERE domname = ms_item-obj_name. - DATA temp1 TYPE xsdboolean. - temp1 = boolc( sy-subrc = 0 ). - rv_bool = temp1. + rv_bool = xsdbool( sy-subrc = 0 ). ENDMETHOD. @@ -467,12 +460,11 @@ DATA: lv_name TYPE ddobjname, METHOD zif_abapgit_object~serialize. - TYPES temp6 TYPE TABLE OF dd07v. -DATA: lv_name TYPE ddobjname, + DATA: lv_name TYPE ddobjname, lv_state TYPE ddgotstate, ls_dd01v TYPE dd01v, lv_masklen TYPE c LENGTH 4, - lt_dd07v TYPE temp6. + lt_dd07v TYPE TABLE OF dd07v. FIELD-SYMBOLS TYPE dd07v. diff --git a/src/objects/zcl_abapgit_object_dsys.clas.abap b/src/objects/zcl_abapgit_object_dsys.clas.abap index b485163ca..468dd6a8e 100644 --- a/src/objects/zcl_abapgit_object_dsys.clas.abap +++ b/src/objects/zcl_abapgit_object_dsys.clas.abap @@ -180,9 +180,7 @@ CLASS zcl_abapgit_object_dsys IMPLEMENTATION. WHERE id = c_id AND object = mv_doc_object. "#EC CI_GENBUFF "#EC CI_NOORDER - DATA temp1 TYPE xsdboolean. - temp1 = boolc( lv_count > 0 ). - rv_bool = temp1. + rv_bool = xsdbool( lv_count > 0 ). ENDMETHOD. @@ -234,9 +232,7 @@ CLASS zcl_abapgit_object_dsys IMPLEMENTATION. no_editor = 2 OTHERS = 3. - DATA temp2 TYPE xsdboolean. - temp2 = boolc( sy-subrc = 0 ). - rv_exit = temp2. + rv_exit = xsdbool( sy-subrc = 0 ). ENDMETHOD. diff --git a/src/objects/zcl_abapgit_object_dtel.clas.abap b/src/objects/zcl_abapgit_object_dtel.clas.abap index ecafcd4c6..c5e766538 100644 --- a/src/objects/zcl_abapgit_object_dtel.clas.abap +++ b/src/objects/zcl_abapgit_object_dtel.clas.abap @@ -40,10 +40,9 @@ CLASS zcl_abapgit_object_dtel IMPLEMENTATION. METHOD deserialize_texts. - TYPES temp1 TYPE TABLE OF langu. -DATA: lv_name TYPE ddobjname, + DATA: lv_name TYPE ddobjname, ls_dd04v_tmp TYPE dd04v, - lt_i18n_langs TYPE temp1, + lt_i18n_langs TYPE TABLE OF langu, lt_dd04_texts TYPE ty_dd04_texts. FIELD-SYMBOLS: LIKE LINE OF lt_i18n_langs, @@ -93,12 +92,11 @@ DATA: lv_name TYPE ddobjname, METHOD serialize_texts. - TYPES temp2 TYPE TABLE OF langu. -DATA: lv_name TYPE ddobjname, + DATA: lv_name TYPE ddobjname, lv_index TYPE i, ls_dd04v TYPE dd04v, lt_dd04_texts TYPE ty_dd04_texts, - lt_i18n_langs TYPE temp2, + lt_i18n_langs TYPE TABLE OF langu, lt_language_filter TYPE zif_abapgit_environment=>ty_system_language_filter. FIELD-SYMBOLS: LIKE LINE OF lt_i18n_langs, @@ -246,9 +244,7 @@ DATA: lv_name TYPE ddobjname, SELECT SINGLE rollname FROM dd04l INTO lv_rollname WHERE rollname = lv_rollname. ENDIF. - DATA temp1 TYPE xsdboolean. - temp1 = boolc( sy-subrc = 0 ). - rv_bool = temp1. + rv_bool = xsdbool( sy-subrc = 0 ). ENDMETHOD. diff --git a/src/objects/zcl_abapgit_object_ecat.clas.abap b/src/objects/zcl_abapgit_object_ecat.clas.abap index 1a91f6a79..0d31bf529 100644 --- a/src/objects/zcl_abapgit_object_ecat.clas.abap +++ b/src/objects/zcl_abapgit_object_ecat.clas.abap @@ -22,7 +22,7 @@ CLASS zcl_abapgit_object_ecat IMPLEMENTATION. METHOD get_download. - CREATE OBJECT ro_download TYPE zcl_abapgit_ecatt_script_downl. + ro_download = NEW zcl_abapgit_ecatt_script_downl( ). ENDMETHOD. @@ -43,7 +43,7 @@ CLASS zcl_abapgit_object_ecat IMPLEMENTATION. METHOD get_upload. - CREATE OBJECT ro_upload TYPE zcl_abapgit_ecatt_script_upl. + ro_upload = NEW zcl_abapgit_ecatt_script_upl( ). ENDMETHOD. ENDCLASS. diff --git a/src/objects/zcl_abapgit_object_ecsd.clas.abap b/src/objects/zcl_abapgit_object_ecsd.clas.abap index e9e5e9ced..f99143551 100644 --- a/src/objects/zcl_abapgit_object_ecsd.clas.abap +++ b/src/objects/zcl_abapgit_object_ecsd.clas.abap @@ -22,7 +22,7 @@ CLASS zcl_abapgit_object_ecsd IMPLEMENTATION. METHOD get_download. - CREATE OBJECT ro_download TYPE zcl_abapgit_ecatt_system_downl. + ro_download = NEW zcl_abapgit_ecatt_system_downl( ). ENDMETHOD. @@ -43,7 +43,7 @@ CLASS zcl_abapgit_object_ecsd IMPLEMENTATION. METHOD get_upload. - CREATE OBJECT ro_upload TYPE zcl_abapgit_ecatt_system_upl. + ro_upload = NEW zcl_abapgit_ecatt_system_upl( ). ENDMETHOD. ENDCLASS. diff --git a/src/objects/zcl_abapgit_object_ecsp.clas.abap b/src/objects/zcl_abapgit_object_ecsp.clas.abap index a4e2d7ae0..9a152ec92 100644 --- a/src/objects/zcl_abapgit_object_ecsp.clas.abap +++ b/src/objects/zcl_abapgit_object_ecsp.clas.abap @@ -22,7 +22,7 @@ CLASS zcl_abapgit_object_ecsp IMPLEMENTATION. METHOD get_download. - CREATE OBJECT ro_download TYPE zcl_abapgit_ecatt_sp_download. + ro_download = NEW zcl_abapgit_ecatt_sp_download( ). ENDMETHOD. @@ -44,7 +44,7 @@ CLASS zcl_abapgit_object_ecsp IMPLEMENTATION. METHOD get_upload. - CREATE OBJECT ro_upload TYPE zcl_abapgit_ecatt_sp_upload. + ro_upload = NEW zcl_abapgit_ecatt_sp_upload( ). ENDMETHOD. ENDCLASS. diff --git a/src/objects/zcl_abapgit_object_ectc.clas.abap b/src/objects/zcl_abapgit_object_ectc.clas.abap index 457f2d081..242a3f979 100644 --- a/src/objects/zcl_abapgit_object_ectc.clas.abap +++ b/src/objects/zcl_abapgit_object_ectc.clas.abap @@ -22,7 +22,7 @@ CLASS zcl_abapgit_object_ectc IMPLEMENTATION. METHOD get_download. - CREATE OBJECT ro_download TYPE zcl_abapgit_ecatt_config_downl. + ro_download = NEW zcl_abapgit_ecatt_config_downl( ). ENDMETHOD. @@ -43,7 +43,7 @@ CLASS zcl_abapgit_object_ectc IMPLEMENTATION. METHOD get_upload. - CREATE OBJECT ro_upload TYPE zcl_abapgit_ecatt_config_upl. + ro_upload = NEW zcl_abapgit_ecatt_config_upl( ). ENDMETHOD. ENDCLASS. diff --git a/src/objects/zcl_abapgit_object_ectd.clas.abap b/src/objects/zcl_abapgit_object_ectd.clas.abap index 86ca112ed..941c7810c 100644 --- a/src/objects/zcl_abapgit_object_ectd.clas.abap +++ b/src/objects/zcl_abapgit_object_ectd.clas.abap @@ -22,7 +22,7 @@ CLASS zcl_abapgit_object_ectd IMPLEMENTATION. METHOD get_download. - CREATE OBJECT ro_download TYPE zcl_abapgit_ecatt_data_downl. + ro_download = NEW zcl_abapgit_ecatt_data_downl( ). ENDMETHOD. @@ -43,7 +43,7 @@ CLASS zcl_abapgit_object_ectd IMPLEMENTATION. METHOD get_upload. - CREATE OBJECT ro_upload TYPE zcl_abapgit_ecatt_data_upload. + ro_upload = NEW zcl_abapgit_ecatt_data_upload( ). ENDMETHOD. ENDCLASS. diff --git a/src/objects/zcl_abapgit_object_ecvo.clas.abap b/src/objects/zcl_abapgit_object_ecvo.clas.abap index 7b49e4c59..5bcf00ce0 100644 --- a/src/objects/zcl_abapgit_object_ecvo.clas.abap +++ b/src/objects/zcl_abapgit_object_ecvo.clas.abap @@ -22,7 +22,7 @@ CLASS zcl_abapgit_object_ecvo IMPLEMENTATION. METHOD get_download. - CREATE OBJECT ro_download TYPE zcl_abapgit_ecatt_val_obj_down. + ro_download = NEW zcl_abapgit_ecatt_val_obj_down( ). ENDMETHOD. @@ -44,7 +44,7 @@ CLASS zcl_abapgit_object_ecvo IMPLEMENTATION. METHOD get_upload. - CREATE OBJECT ro_upload TYPE zcl_abapgit_ecatt_val_obj_upl. + ro_upload = NEW zcl_abapgit_ecatt_val_obj_upl( ). ENDMETHOD. ENDCLASS. diff --git a/src/objects/zcl_abapgit_object_enho.clas.abap b/src/objects/zcl_abapgit_object_enho.clas.abap index a11ddb760..7ad286893 100644 --- a/src/objects/zcl_abapgit_object_enho.clas.abap +++ b/src/objects/zcl_abapgit_object_enho.clas.abap @@ -25,23 +25,23 @@ CLASS zcl_abapgit_object_enho IMPLEMENTATION. CASE iv_tool. WHEN cl_enh_tool_badi_impl=>tooltype. - CREATE OBJECT ri_enho TYPE zcl_abapgit_object_enho_badi EXPORTING is_item = ms_item. + ri_enho = NEW zcl_abapgit_object_enho_badi( is_item = ms_item ). WHEN cl_enh_tool_hook_impl=>tooltype. - CREATE OBJECT ri_enho TYPE zcl_abapgit_object_enho_hook EXPORTING is_item = ms_item - io_files = mo_files. + ri_enho = NEW zcl_abapgit_object_enho_hook( is_item = ms_item + io_files = mo_files ). WHEN cl_enh_tool_class=>tooltype. - CREATE OBJECT ri_enho TYPE zcl_abapgit_object_enho_class EXPORTING is_item = ms_item - io_files = mo_files. + ri_enho = NEW zcl_abapgit_object_enho_class( is_item = ms_item + io_files = mo_files ). WHEN cl_enh_tool_intf=>tooltype. - CREATE OBJECT ri_enho TYPE zcl_abapgit_object_enho_intf EXPORTING is_item = ms_item - io_files = mo_files. + ri_enho = NEW zcl_abapgit_object_enho_intf( is_item = ms_item + io_files = mo_files ). WHEN cl_wdr_cfg_enhancement=>tooltype. - CREATE OBJECT ri_enho TYPE zcl_abapgit_object_enho_wdyc EXPORTING is_item = ms_item. + ri_enho = NEW zcl_abapgit_object_enho_wdyc( is_item = ms_item ). WHEN 'FUGRENH'. - CREATE OBJECT ri_enho TYPE zcl_abapgit_object_enho_fugr EXPORTING is_item = ms_item - io_files = mo_files. + ri_enho = NEW zcl_abapgit_object_enho_fugr( is_item = ms_item + io_files = mo_files ). WHEN 'WDYENH'. - CREATE OBJECT ri_enho TYPE zcl_abapgit_object_enho_wdyn EXPORTING is_item = ms_item. + ri_enho = NEW zcl_abapgit_object_enho_wdyn( is_item = ms_item ). WHEN OTHERS. zcx_abapgit_exception=>raise( |Unsupported ENHO type { iv_tool }| ). ENDCASE. diff --git a/src/objects/zcl_abapgit_object_enhs.clas.abap b/src/objects/zcl_abapgit_object_enhs.clas.abap index 6fdec9eeb..833128ac5 100644 --- a/src/objects/zcl_abapgit_object_enhs.clas.abap +++ b/src/objects/zcl_abapgit_object_enhs.clas.abap @@ -24,9 +24,9 @@ CLASS zcl_abapgit_object_enhs IMPLEMENTATION. CASE iv_tool. WHEN cl_enh_tool_badi_def=>tooltype. - CREATE OBJECT ri_enho TYPE zcl_abapgit_object_enhs_badi_d. + ri_enho = NEW zcl_abapgit_object_enhs_badi_d( ). WHEN cl_enh_tool_hook_def=>tool_type. - CREATE OBJECT ri_enho TYPE zcl_abapgit_object_enhs_hook_d. + ri_enho = NEW zcl_abapgit_object_enhs_hook_d( ). WHEN OTHERS. zcx_abapgit_exception=>raise( |ENHS: Unsupported tool { iv_tool }| ). ENDCASE. diff --git a/src/objects/zcl_abapgit_object_enqu.clas.abap b/src/objects/zcl_abapgit_object_enqu.clas.abap index 5778348cd..071b6e2d1 100644 --- a/src/objects/zcl_abapgit_object_enqu.clas.abap +++ b/src/objects/zcl_abapgit_object_enqu.clas.abap @@ -46,10 +46,9 @@ CLASS zcl_abapgit_object_enqu IMPLEMENTATION. METHOD zif_abapgit_object~deserialize. - TYPES temp1 TYPE TABLE OF dd26e. -DATA: lv_name TYPE ddobjname, + DATA: lv_name TYPE ddobjname, ls_dd25v TYPE dd25v, - lt_dd26e TYPE temp1, + lt_dd26e TYPE TABLE OF dd26e, lt_dd27p TYPE ty_dd27p. @@ -94,9 +93,7 @@ DATA: lv_name TYPE ddobjname, SELECT SINGLE viewname FROM dd25l INTO lv_viewname WHERE viewname = ms_item-obj_name. - DATA temp1 TYPE xsdboolean. - temp1 = boolc( sy-subrc = 0 ). - rv_bool = temp1. + rv_bool = xsdbool( sy-subrc = 0 ). ENDMETHOD. @@ -150,11 +147,10 @@ DATA: lv_name TYPE ddobjname, METHOD zif_abapgit_object~serialize. - TYPES temp2 TYPE TABLE OF dd26e. -DATA: lv_name TYPE ddobjname, + DATA: lv_name TYPE ddobjname, lv_state TYPE ddgotstate, ls_dd25v TYPE dd25v, - lt_dd26e TYPE temp2, + lt_dd26e TYPE TABLE OF dd26e, lt_dd27p TYPE ty_dd27p. lv_name = ms_item-obj_name. diff --git a/src/objects/zcl_abapgit_object_fdt0.clas.abap b/src/objects/zcl_abapgit_object_fdt0.clas.abap index 9417f7331..04117f6a5 100644 --- a/src/objects/zcl_abapgit_object_fdt0.clas.abap +++ b/src/objects/zcl_abapgit_object_fdt0.clas.abap @@ -82,9 +82,7 @@ CLASS zcl_abapgit_object_fdt0 IMPLEMENTATION. WHERE object_type = 'AP' AND id = lv_application_id AND deleted = ''. - DATA temp1 TYPE xsdboolean. - temp1 = boolc( lv_count = 0 ). - ev_create = temp1. + ev_create = xsdbool( lv_count = 0 ). ENDIF. " Fill in user/time/system-specific fields @@ -396,8 +394,7 @@ CLASS zcl_abapgit_object_fdt0 IMPLEMENTATION. METHOD zif_abapgit_object~delete. DATA lv_is_local TYPE abap_bool. - TYPES temp1 TYPE TABLE OF fdt_admn_0000s-application_id. -DATA lt_application_id TYPE temp1. + DATA lt_application_id TYPE TABLE OF fdt_admn_0000s-application_id. DATA ls_object_category_sel TYPE if_fdt_query=>s_object_category_sel. DATA lv_failure TYPE abap_bool. DATA lx_fdt_input TYPE REF TO cx_fdt_input. @@ -591,9 +588,7 @@ DATA lt_application_id TYPE temp1. AND name = ms_item-obj_name AND deleted = ''. - DATA temp2 TYPE xsdboolean. - temp2 = boolc( lv_count > 0 ). - rv_bool = temp2. + rv_bool = xsdbool( lv_count > 0 ). ENDMETHOD. @@ -603,12 +598,12 @@ DATA lt_application_id TYPE temp1. DATA lo_local_version_output TYPE REF TO zcl_abapgit_xml_output. DATA lo_local_version_input TYPE REF TO zcl_abapgit_xml_input. - CREATE OBJECT lo_local_version_output. + lo_local_version_output = NEW #( ). zif_abapgit_object~serialize( lo_local_version_output ). - CREATE OBJECT lo_local_version_input EXPORTING iv_xml = lo_local_version_output->zif_abapgit_xml_output~render( ). + lo_local_version_input = NEW #( iv_xml = lo_local_version_output->zif_abapgit_xml_output~render( ) ). - CREATE OBJECT ri_comparator TYPE zcl_abapgit_object_tabl_compar EXPORTING ii_local = lo_local_version_input. + ri_comparator = NEW zcl_abapgit_object_tabl_compar( ii_local = lo_local_version_input ). ENDMETHOD. @@ -655,9 +650,7 @@ DATA lt_application_id TYPE temp1. lv_index = lines( lt_version ). READ TABLE lt_version ASSIGNING INDEX lv_index. - DATA temp3 TYPE xsdboolean. - temp3 = boolc( -state = 'A' ). - rv_active = temp3. + rv_active = xsdbool( -state = 'A' ). ENDMETHOD. diff --git a/src/objects/zcl_abapgit_object_form.clas.abap b/src/objects/zcl_abapgit_object_form.clas.abap index da10f9082..8f15f5f96 100644 --- a/src/objects/zcl_abapgit_object_form.clas.abap +++ b/src/objects/zcl_abapgit_object_form.clas.abap @@ -130,7 +130,7 @@ CLASS zcl_abapgit_object_form IMPLEMENTATION. DATA lv_string TYPE string. DATA li_xml TYPE REF TO zif_abapgit_xml_output. - CREATE OBJECT li_xml TYPE zcl_abapgit_xml_output. + li_xml = NEW zcl_abapgit_xml_output( ). li_xml->add( iv_name = c_objectname_tdlines ig_data = it_lines ). lv_string = li_xml->render( ). @@ -174,7 +174,7 @@ CLASS zcl_abapgit_object_form IMPLEMENTATION. ENDTRY. - CREATE OBJECT li_xml TYPE zcl_abapgit_xml_input EXPORTING iv_xml = lv_string. + li_xml = NEW zcl_abapgit_xml_input( iv_xml = lv_string ). li_xml->read( EXPORTING iv_name = c_objectname_tdlines CHANGING cg_data = rt_lines ). @@ -329,9 +329,7 @@ CLASS zcl_abapgit_object_form IMPLEMENTATION. IMPORTING olanguage = lv_lang. - DATA temp1 TYPE xsdboolean. - temp1 = boolc( lv_lang IS NOT INITIAL ). - rv_bool = temp1. + rv_bool = xsdbool( lv_lang IS NOT INITIAL ). ENDMETHOD. @@ -380,8 +378,7 @@ CLASS zcl_abapgit_object_form IMPLEMENTATION. METHOD zif_abapgit_object~jump. - TYPES temp1 TYPE TABLE OF bdcdata. -DATA: lt_bdcdata TYPE temp1. + DATA: lt_bdcdata TYPE TABLE OF bdcdata. FIELD-SYMBOLS: LIKE LINE OF lt_bdcdata. diff --git a/src/objects/zcl_abapgit_object_fugr.clas.abap b/src/objects/zcl_abapgit_object_fugr.clas.abap index 67f247ede..b87b589db 100644 --- a/src/objects/zcl_abapgit_object_fugr.clas.abap +++ b/src/objects/zcl_abapgit_object_fugr.clas.abap @@ -219,12 +219,11 @@ CLASS zcl_abapgit_object_fugr IMPLEMENTATION. METHOD deserialize_functions. - TYPES temp1 TYPE TABLE OF abaptxt255. -DATA: lv_include TYPE rs38l-include, + DATA: lv_include TYPE rs38l-include, lv_area TYPE rs38l-area, lv_group TYPE rs38l-area, lv_namespace TYPE rs38l-namespace, - lt_source TYPE temp1, + lt_source TYPE TABLE OF abaptxt255, lv_msg TYPE string, lx_error TYPE REF TO zcx_abapgit_exception. @@ -362,13 +361,12 @@ DATA: lv_include TYPE rs38l-include, METHOD deserialize_includes. - TYPES temp2 TYPE TABLE OF abaptxt255. -DATA: lo_xml TYPE REF TO zif_abapgit_xml_input, + DATA: lo_xml TYPE REF TO zif_abapgit_xml_input, ls_progdir TYPE zif_abapgit_sap_report=>ty_progdir, lt_includes TYPE ty_sobj_name_tt, lt_tpool TYPE textpool_table, lt_tpool_ext TYPE zif_abapgit_definitions=>ty_tpool_tt, - lt_source TYPE temp2, + lt_source TYPE TABLE OF abaptxt255, lx_exc TYPE REF TO zcx_abapgit_exception. FIELD-SYMBOLS: LIKE LINE OF lt_includes. @@ -589,16 +587,14 @@ DATA: lo_xml TYPE REF TO zif_abapgit_xml_input, progname TYPE reposrc-progname, END OF ty_reposrc. - TYPES temp3 TYPE STANDARD TABLE OF ty_reposrc WITH DEFAULT KEY. -TYPES temp1 TYPE HASHED TABLE OF objname WITH UNIQUE KEY table_line. -DATA: lt_reposrc TYPE temp3, + DATA: lt_reposrc TYPE STANDARD TABLE OF ty_reposrc WITH DEFAULT KEY, ls_reposrc LIKE LINE OF lt_reposrc, lv_program TYPE program, lv_maintviewname LIKE LINE OF rt_includes, lv_offset_ns TYPE i, lv_tabix LIKE sy-tabix, lt_functab TYPE ty_rs38l_incl_tt, - lt_tadir_includes TYPE temp1. + lt_tadir_includes TYPE HASHED TABLE OF objname WITH UNIQUE KEY table_line. FIELD-SYMBOLS: LIKE LINE OF rt_includes, LIKE LINE OF lt_functab. @@ -853,9 +849,8 @@ DATA: lt_reposrc TYPE temp3, METHOD serialize_functions. - TYPES temp5 TYPE TABLE OF rssource. -DATA: - lt_source TYPE temp5, + DATA: + lt_source TYPE TABLE OF rssource, lt_functab TYPE ty_rs38l_incl_tt, lt_new_source TYPE rsfb_source, ls_function LIKE LINE OF rt_functions. @@ -1066,8 +1061,8 @@ DATA: LOOP AT it_includes INTO lv_include. - CREATE OBJECT lo_cross EXPORTING p_name = lv_include - p_include = lv_include. + lo_cross = NEW #( p_name = lv_include + p_include = lv_include ). lo_cross->index_actualize( ). @@ -1084,9 +1079,8 @@ DATA: time TYPE t, END OF ty_stamps. - TYPES temp6 TYPE STANDARD TABLE OF ty_stamps WITH DEFAULT KEY. -DATA: - lt_stamps TYPE temp6, + DATA: + lt_stamps TYPE STANDARD TABLE OF ty_stamps WITH DEFAULT KEY, lv_program TYPE program, lv_found TYPE abap_bool, lt_functions TYPE ty_rs38l_incl_tt. @@ -1279,9 +1273,7 @@ DATA: function_pool = lv_pool EXCEPTIONS pool_not_exists = 1. - DATA temp1 TYPE xsdboolean. - temp1 = boolc( sy-subrc <> 1 ). - rv_bool = temp1. + rv_bool = xsdbool( sy-subrc <> 1 ). ENDMETHOD. diff --git a/src/objects/zcl_abapgit_object_g4ba.clas.abap b/src/objects/zcl_abapgit_object_g4ba.clas.abap index 15218ba54..809de5582 100644 --- a/src/objects/zcl_abapgit_object_g4ba.clas.abap +++ b/src/objects/zcl_abapgit_object_g4ba.clas.abap @@ -65,9 +65,9 @@ CLASS zcl_abapgit_object_g4ba IMPLEMENTATION. METHOD get_generic. - CREATE OBJECT ro_generic EXPORTING io_field_rules = get_field_rules( ) - is_item = ms_item - iv_language = mv_language. + ro_generic = NEW #( io_field_rules = get_field_rules( ) + is_item = ms_item + iv_language = mv_language ). ENDMETHOD. diff --git a/src/objects/zcl_abapgit_object_g4bs.clas.abap b/src/objects/zcl_abapgit_object_g4bs.clas.abap index 9902bb017..f9a106e6a 100644 --- a/src/objects/zcl_abapgit_object_g4bs.clas.abap +++ b/src/objects/zcl_abapgit_object_g4bs.clas.abap @@ -65,9 +65,9 @@ CLASS zcl_abapgit_object_g4bs IMPLEMENTATION. METHOD get_generic. - CREATE OBJECT ro_generic EXPORTING io_field_rules = get_field_rules( ) - is_item = ms_item - iv_language = mv_language. + ro_generic = NEW #( io_field_rules = get_field_rules( ) + is_item = ms_item + iv_language = mv_language ). ENDMETHOD. diff --git a/src/objects/zcl_abapgit_object_idoc.clas.abap b/src/objects/zcl_abapgit_object_idoc.clas.abap index 48ef875c4..e0a45e311 100644 --- a/src/objects/zcl_abapgit_object_idoc.clas.abap +++ b/src/objects/zcl_abapgit_object_idoc.clas.abap @@ -97,9 +97,7 @@ CLASS zcl_abapgit_object_idoc IMPLEMENTATION. db_error = 2 no_authority = 3 OTHERS = 4. - DATA temp1 TYPE xsdboolean. - temp1 = boolc( sy-subrc = 0 AND ls_idoc-attributes-closed = abap_true ). - rv_closed = temp1. + rv_closed = xsdbool( sy-subrc = 0 AND ls_idoc-attributes-closed = abap_true ). ENDMETHOD. @@ -262,9 +260,7 @@ CLASS zcl_abapgit_object_idoc IMPLEMENTATION. db_error = 2 OTHERS = 3. - DATA temp2 TYPE xsdboolean. - temp2 = boolc( sy-subrc = 0 ). - rv_bool = temp2. + rv_bool = xsdbool( sy-subrc = 0 ). ENDMETHOD. @@ -301,8 +297,7 @@ CLASS zcl_abapgit_object_idoc IMPLEMENTATION. METHOD zif_abapgit_object~jump. - TYPES temp1 TYPE TABLE OF bdcdata. -DATA: lt_bdcdata TYPE temp1. + DATA: lt_bdcdata TYPE TABLE OF bdcdata. FIELD-SYMBOLS: LIKE LINE OF lt_bdcdata. diff --git a/src/objects/zcl_abapgit_object_iext.clas.abap b/src/objects/zcl_abapgit_object_iext.clas.abap index 37b8301f7..611fa0218 100644 --- a/src/objects/zcl_abapgit_object_iext.clas.abap +++ b/src/objects/zcl_abapgit_object_iext.clas.abap @@ -123,9 +123,7 @@ CLASS zcl_abapgit_object_iext IMPLEMENTATION. EXCEPTIONS OTHERS = 1. - DATA temp1 TYPE xsdboolean. - temp1 = boolc( sy-subrc = 0 ). - rv_bool = temp1. + rv_bool = xsdbool( sy-subrc = 0 ). ENDMETHOD. @@ -162,8 +160,7 @@ CLASS zcl_abapgit_object_iext IMPLEMENTATION. METHOD zif_abapgit_object~jump. - TYPES temp1 TYPE TABLE OF bdcdata. -DATA: lt_bdcdata TYPE temp1. + DATA: lt_bdcdata TYPE TABLE OF bdcdata. FIELD-SYMBOLS: LIKE LINE OF lt_bdcdata. diff --git a/src/objects/zcl_abapgit_object_intf.clas.abap b/src/objects/zcl_abapgit_object_intf.clas.abap index c0fd72372..1402d8f86 100644 --- a/src/objects/zcl_abapgit_object_intf.clas.abap +++ b/src/objects/zcl_abapgit_object_intf.clas.abap @@ -139,7 +139,7 @@ CLASS zcl_abapgit_object_intf IMPLEMENTATION. mi_object_oriented_object_fct = zcl_abapgit_oo_factory=>get_by_type( ms_item-obj_type ). - CREATE OBJECT li_aff_registry TYPE zcl_abapgit_aff_registry. + li_aff_registry = NEW zcl_abapgit_aff_registry( ). mv_aff_enabled = li_aff_registry->is_supported_object_type( 'INTF' ). @@ -296,7 +296,7 @@ CLASS zcl_abapgit_object_intf IMPLEMENTATION. lv_json_data = mo_files->read_string( 'json' ). ls_intf_aff = lcl_aff_metadata_handler=>deserialize( lv_json_data ). - CREATE OBJECT lo_aff_mapper TYPE lcl_aff_type_mapping. + lo_aff_mapper = NEW lcl_aff_type_mapping( ). lo_aff_mapper->to_abapgit( EXPORTING iv_data = ls_intf_aff iv_object_name = ms_item-obj_name IMPORTING es_data = rs_intf ). diff --git a/src/objects/zcl_abapgit_object_intf.clas.locals_imp.abap b/src/objects/zcl_abapgit_object_intf.clas.locals_imp.abap index bb280092a..0774bd17a 100644 --- a/src/objects/zcl_abapgit_object_intf.clas.locals_imp.abap +++ b/src/objects/zcl_abapgit_object_intf.clas.locals_imp.abap @@ -546,14 +546,14 @@ CLASS lcl_aff_metadata_handler IMPLEMENTATION. lt_paths_to_skip TYPE zcl_abapgit_json_handler=>ty_skip_paths. - CREATE OBJECT lo_aff_mapper TYPE lcl_aff_type_mapping. + lo_aff_mapper = NEW lcl_aff_type_mapping( ). lo_aff_mapper->to_aff( EXPORTING iv_data = is_intf IMPORTING es_data = ls_data_aff ). lt_enum_mappings = get_mappings( ). lt_paths_to_skip = get_paths_to_skip( ). - CREATE OBJECT lo_aff_handler. + lo_aff_handler = NEW #( ). TRY. rv_result = lo_aff_handler->serialize( iv_data = ls_data_aff iv_enum_mappings = lt_enum_mappings @@ -622,7 +622,7 @@ CLASS lcl_aff_metadata_handler IMPLEMENTATION. lt_enum_mappings = get_mappings( ). - CREATE OBJECT lo_ajson. + lo_ajson = NEW #( ). TRY. lo_ajson->deserialize( EXPORTING @@ -669,10 +669,10 @@ CLASS lcl_aff_metadata_handler IMPLEMENTATION. ENDTRY. - CREATE OBJECT lo_json_path. + lo_json_path = NEW #( ). lt_translation = lo_json_path->serialize( lv_json ). - CREATE OBJECT lo_trans_file EXPORTING iv_lang = lv_langu. + lo_trans_file = NEW #( iv_lang = lv_langu ). lo_trans_file->push_text_pairs( lt_translation ). @@ -721,7 +721,7 @@ CLASS lcl_aff_metadata_handler IMPLEMENTATION. ls_aff_data-header-original_language = lv_sap1. - CREATE OBJECT lo_type_mapper TYPE lcl_aff_type_mapping. + lo_type_mapper = NEW lcl_aff_type_mapping( ). lo_type_mapper->to_abapgit( EXPORTING iv_data = ls_aff_data diff --git a/src/objects/zcl_abapgit_object_intf.clas.testclasses.abap b/src/objects/zcl_abapgit_object_intf.clas.testclasses.abap index e795e0e6e..de2f2fbdf 100644 --- a/src/objects/zcl_abapgit_object_intf.clas.testclasses.abap +++ b/src/objects/zcl_abapgit_object_intf.clas.testclasses.abap @@ -148,13 +148,13 @@ CLASS ltcl_unit_test IMPLEMENTATION. mo_files = zcl_abapgit_objects_files=>new( ms_item ). - CREATE OBJECT lo_cut EXPORTING is_item = ms_item - iv_language = 'E' - io_files = mo_files. + lo_cut = NEW #( is_item = ms_item + iv_language = 'E' + io_files = mo_files ). - CREATE OBJECT mo_log. + mo_log = NEW #( ). - CREATE OBJECT mo_object_fnc. + mo_object_fnc = NEW #( ). lo_cut->mi_object_oriented_object_fct = mo_object_fnc. mo_cut = lo_cut. @@ -170,7 +170,7 @@ CLASS ltcl_unit_test IMPLEMENTATION. DATA ls_expected_docu_line TYPE tline. DATA lt_expected_docu_lines TYPE tlinetab. - CREATE OBJECT lo_xmlin TYPE zcl_abapgit_xml_input EXPORTING iv_xml = get_xml( ). + lo_xmlin = NEW zcl_abapgit_xml_input( iv_xml = get_xml( ) ). mo_files->add_abap( get_source( ) ). diff --git a/src/objects/zcl_abapgit_object_iobj.clas.abap b/src/objects/zcl_abapgit_object_iobj.clas.abap index ccc8acbd4..93df661e7 100644 --- a/src/objects/zcl_abapgit_object_iobj.clas.abap +++ b/src/objects/zcl_abapgit_object_iobj.clas.abap @@ -77,8 +77,7 @@ CLASS zcl_abapgit_object_iobj IMPLEMENTATION. objnm TYPE c LENGTH 30. TYPES END OF ty_iobj. - TYPES temp1 TYPE STANDARD TABLE OF ty_iobj. -DATA: lt_iobjname TYPE temp1, + DATA: lt_iobjname TYPE STANDARD TABLE OF ty_iobj, lv_subrc TYPE sy-subrc. APPEND ms_item-obj_name TO lt_iobjname. @@ -108,12 +107,11 @@ DATA: lt_iobjname TYPE temp1, METHOD zif_abapgit_object~deserialize. - TYPES temp2 TYPE STANDARD TABLE OF bapiret2. -DATA: + DATA: lr_details TYPE REF TO data, lr_infoobj TYPE REF TO data, ls_return TYPE bapiret2, - lt_return TYPE temp2, + lt_return TYPE STANDARD TABLE OF bapiret2, lr_compounds TYPE REF TO data, lr_attributes TYPE REF TO data, lr_navigationattributes TYPE REF TO data, @@ -270,9 +268,7 @@ DATA: INTO lv_iobjnm WHERE iobjnm = ms_item-obj_name. - DATA temp1 TYPE xsdboolean. - temp1 = boolc( sy-subrc = 0 ). - rv_bool = temp1. + rv_bool = xsdbool( sy-subrc = 0 ). ENDMETHOD. diff --git a/src/objects/zcl_abapgit_object_iwmo.clas.abap b/src/objects/zcl_abapgit_object_iwmo.clas.abap index 077fb1d6c..4595b9ce0 100644 --- a/src/objects/zcl_abapgit_object_iwmo.clas.abap +++ b/src/objects/zcl_abapgit_object_iwmo.clas.abap @@ -47,9 +47,9 @@ CLASS zcl_abapgit_object_iwmo IMPLEMENTATION. METHOD get_generic. - CREATE OBJECT ro_generic EXPORTING io_field_rules = get_field_rules( ) - is_item = ms_item - iv_language = mv_language. + ro_generic = NEW #( io_field_rules = get_field_rules( ) + is_item = ms_item + iv_language = mv_language ). ENDMETHOD. diff --git a/src/objects/zcl_abapgit_object_iwom.clas.abap b/src/objects/zcl_abapgit_object_iwom.clas.abap index 605c4a3a6..9d8b356da 100644 --- a/src/objects/zcl_abapgit_object_iwom.clas.abap +++ b/src/objects/zcl_abapgit_object_iwom.clas.abap @@ -47,9 +47,9 @@ CLASS zcl_abapgit_object_iwom IMPLEMENTATION. METHOD get_generic. - CREATE OBJECT ro_generic EXPORTING io_field_rules = get_field_rules( ) - is_item = ms_item - iv_language = mv_language. + ro_generic = NEW #( io_field_rules = get_field_rules( ) + is_item = ms_item + iv_language = mv_language ). ENDMETHOD. diff --git a/src/objects/zcl_abapgit_object_iwpr.clas.abap b/src/objects/zcl_abapgit_object_iwpr.clas.abap index 8280c21ce..6b983f3ad 100644 --- a/src/objects/zcl_abapgit_object_iwpr.clas.abap +++ b/src/objects/zcl_abapgit_object_iwpr.clas.abap @@ -47,9 +47,9 @@ CLASS zcl_abapgit_object_iwpr IMPLEMENTATION. METHOD get_generic. - CREATE OBJECT ro_generic EXPORTING io_field_rules = get_field_rules( ) - is_item = ms_item - iv_language = mv_language. + ro_generic = NEW #( io_field_rules = get_field_rules( ) + is_item = ms_item + iv_language = mv_language ). ENDMETHOD. diff --git a/src/objects/zcl_abapgit_object_iwsg.clas.abap b/src/objects/zcl_abapgit_object_iwsg.clas.abap index c7d9fa52b..068d9c934 100644 --- a/src/objects/zcl_abapgit_object_iwsg.clas.abap +++ b/src/objects/zcl_abapgit_object_iwsg.clas.abap @@ -49,9 +49,9 @@ CLASS zcl_abapgit_object_iwsg IMPLEMENTATION. METHOD get_generic. - CREATE OBJECT ro_generic EXPORTING io_field_rules = get_field_rules( ) - is_item = ms_item - iv_language = mv_language. + ro_generic = NEW #( io_field_rules = get_field_rules( ) + is_item = ms_item + iv_language = mv_language ). ENDMETHOD. diff --git a/src/objects/zcl_abapgit_object_iwsv.clas.abap b/src/objects/zcl_abapgit_object_iwsv.clas.abap index 928cd8d6c..48cd5af1e 100644 --- a/src/objects/zcl_abapgit_object_iwsv.clas.abap +++ b/src/objects/zcl_abapgit_object_iwsv.clas.abap @@ -47,9 +47,9 @@ CLASS zcl_abapgit_object_iwsv IMPLEMENTATION. METHOD get_generic. - CREATE OBJECT ro_generic EXPORTING io_field_rules = get_field_rules( ) - is_item = ms_item - iv_language = mv_language. + ro_generic = NEW #( io_field_rules = get_field_rules( ) + is_item = ms_item + iv_language = mv_language ). ENDMETHOD. diff --git a/src/objects/zcl_abapgit_object_iwvb.clas.abap b/src/objects/zcl_abapgit_object_iwvb.clas.abap index 0062cf99f..bcf4641a6 100644 --- a/src/objects/zcl_abapgit_object_iwvb.clas.abap +++ b/src/objects/zcl_abapgit_object_iwvb.clas.abap @@ -47,9 +47,9 @@ CLASS zcl_abapgit_object_iwvb IMPLEMENTATION. METHOD get_generic. - CREATE OBJECT ro_generic EXPORTING io_field_rules = get_field_rules( ) - is_item = ms_item - iv_language = mv_language. + ro_generic = NEW #( io_field_rules = get_field_rules( ) + is_item = ms_item + iv_language = mv_language ). ENDMETHOD. diff --git a/src/objects/zcl_abapgit_object_msag.clas.abap b/src/objects/zcl_abapgit_object_msag.clas.abap index 5f7ff4574..9f87fb678 100644 --- a/src/objects/zcl_abapgit_object_msag.clas.abap +++ b/src/objects/zcl_abapgit_object_msag.clas.abap @@ -116,13 +116,11 @@ CLASS zcl_abapgit_object_msag IMPLEMENTATION. METHOD deserialize_texts. - TYPES temp1 TYPE TABLE OF t100t. -TYPES temp2 TYPE TABLE OF t100u. -DATA: lv_msg_id TYPE rglif-message_id, + DATA: lv_msg_id TYPE rglif-message_id, ls_t100 TYPE t100, - lt_t100t TYPE temp1, + lt_t100t TYPE TABLE OF t100t, lt_t100_texts TYPE ty_t100_texts, - lt_t100u TYPE temp2. + lt_t100u TYPE TABLE OF t100u. FIELD-SYMBOLS: TYPE ty_t100_text. @@ -179,9 +177,9 @@ DATA: lv_msg_id TYPE rglif-message_id, METHOD serialize_longtexts_msag. - TYPES temp3 TYPE STANDARD TABLE OF dokhl-object WITH NON-UNIQUE DEFAULT KEY. -DATA: lv_doku_object_name TYPE dokhl-object, - lt_doku_object_names TYPE temp3, + DATA: lv_doku_object_name TYPE dokhl-object, + lt_doku_object_names TYPE STANDARD TABLE OF dokhl-object + WITH NON-UNIQUE DEFAULT KEY, lt_dokil TYPE zif_abapgit_definitions=>ty_dokil_tt, ls_dokil LIKE LINE OF lt_dokil, lt_language_filter TYPE zif_abapgit_environment=>ty_system_language_filter. @@ -231,12 +229,10 @@ DATA: lv_doku_object_name TYPE dokhl-object, METHOD serialize_texts. - TYPES temp4 TYPE TABLE OF t100t. -TYPES temp3 TYPE TABLE OF langu. -DATA: lv_msg_id TYPE rglif-message_id, + DATA: lv_msg_id TYPE rglif-message_id, lt_t100_texts TYPE ty_t100_texts, - lt_t100t TYPE temp4, - lt_i18n_langs TYPE temp3, + lt_t100t TYPE TABLE OF t100t, + lt_i18n_langs TYPE TABLE OF langu, lt_language_filter TYPE zif_abapgit_environment=>ty_system_language_filter. lv_msg_id = ms_item-obj_name. @@ -351,13 +347,11 @@ DATA: lv_msg_id TYPE rglif-message_id, METHOD zif_abapgit_object~deserialize. * fm RPY_MESSAGE_ID_INSERT almost works, but not in older versions - TYPES temp6 TYPE TABLE OF t100. -TYPES temp4 TYPE TABLE OF t100u. -DATA: ls_t100a TYPE t100a, + DATA: ls_t100a TYPE t100a, ls_t100t TYPE t100t, ls_t100u TYPE t100u, - lt_t100 TYPE temp6, - lt_before TYPE temp4. + lt_t100 TYPE TABLE OF t100, + lt_before TYPE TABLE OF t100u. FIELD-SYMBOLS: LIKE LINE OF lt_t100. @@ -432,9 +426,7 @@ DATA: ls_t100a TYPE t100a, SELECT SINGLE arbgb FROM t100a INTO lv_arbgb WHERE arbgb = ms_item-obj_name. "#EC CI_GENBUFF - DATA temp1 TYPE xsdboolean. - temp1 = boolc( sy-subrc = 0 ). - rv_bool = temp1. + rv_bool = xsdbool( sy-subrc = 0 ). ENDMETHOD. diff --git a/src/objects/zcl_abapgit_object_nrob.clas.abap b/src/objects/zcl_abapgit_object_nrob.clas.abap index c17c3121d..448cb8a08 100644 --- a/src/objects/zcl_abapgit_object_nrob.clas.abap +++ b/src/objects/zcl_abapgit_object_nrob.clas.abap @@ -17,12 +17,10 @@ CLASS zcl_abapgit_object_nrob IMPLEMENTATION. METHOD delete_intervals. - TYPES temp1 TYPE STANDARD TABLE OF inriv WITH DEFAULT KEY. -TYPES temp2 TYPE STANDARD TABLE OF inriv WITH DEFAULT KEY. -DATA: lv_error TYPE c LENGTH 1, + DATA: lv_error TYPE c LENGTH 1, ls_error TYPE inrer, - lt_list TYPE temp1, - lt_error_iv TYPE temp2. + lt_list TYPE STANDARD TABLE OF inriv WITH DEFAULT KEY, + lt_error_iv TYPE STANDARD TABLE OF inriv WITH DEFAULT KEY. FIELD-SYMBOLS: LIKE LINE OF lt_list. @@ -148,8 +146,7 @@ DATA: lv_error TYPE c LENGTH 1, METHOD zif_abapgit_object~deserialize. - TYPES temp3 TYPE TABLE OF inoer. -DATA: lt_errors TYPE temp3, + DATA: lt_errors TYPE TABLE OF inoer, ls_attributes TYPE tnro, ls_text TYPE tnrot. @@ -246,9 +243,7 @@ DATA: lt_errors TYPE temp3, SELECT SINGLE object FROM tnro INTO lv_object WHERE object = ms_item-obj_name. - DATA temp1 TYPE xsdboolean. - temp1 = boolc( sy-subrc = 0 ). - rv_bool = temp1. + rv_bool = xsdbool( sy-subrc = 0 ). ENDMETHOD. @@ -285,9 +280,8 @@ DATA: lt_errors TYPE temp3, METHOD zif_abapgit_object~jump. - TYPES temp4 TYPE STANDARD TABLE OF bdcdata. -DATA: ls_bcdata TYPE bdcdata, - lt_bcdata TYPE temp4. + DATA: ls_bcdata TYPE bdcdata, + lt_bcdata TYPE STANDARD TABLE OF bdcdata. ls_bcdata-program = 'SAPMSNRO'. ls_bcdata-dynpro = '0150'. diff --git a/src/objects/zcl_abapgit_object_nspc.clas.abap b/src/objects/zcl_abapgit_object_nspc.clas.abap index b13239cd5..57dfb0f80 100644 --- a/src/objects/zcl_abapgit_object_nspc.clas.abap +++ b/src/objects/zcl_abapgit_object_nspc.clas.abap @@ -135,12 +135,10 @@ CLASS zcl_abapgit_object_nspc IMPLEMENTATION. METHOD deserialize_texts. - TYPES temp1 TYPE TABLE OF langu. -TYPES temp2 TYPE TABLE OF cvers_ref. -DATA: + DATA: ls_trnspacett TYPE trnspacett, - lt_i18n_langs TYPE temp1, - lt_cvers_refs TYPE temp2, + lt_i18n_langs TYPE TABLE OF langu, + lt_cvers_refs TYPE TABLE OF cvers_ref, ls_cvers_ref TYPE cvers_ref, lt_nspc_texts TYPE ty_nspc_texts. @@ -215,13 +213,11 @@ DATA: METHOD serialize_texts. - TYPES temp3 TYPE TABLE OF cvers_ref. -TYPES temp4 TYPE TABLE OF langu. -DATA: + DATA: ls_trnspacett TYPE trnspacett, lt_nspc_texts TYPE ty_nspc_texts, - lt_cvers_refs TYPE temp3, - lt_i18n_langs TYPE temp4. + lt_cvers_refs TYPE TABLE OF cvers_ref, + lt_i18n_langs TYPE TABLE OF langu. FIELD-SYMBOLS: LIKE LINE OF lt_i18n_langs, @@ -375,9 +371,7 @@ DATA: namespace_not_valid = 1 OTHERS = 2. - DATA temp1 TYPE xsdboolean. - temp1 = boolc( sy-subrc = 0 ). - rv_bool = temp1. + rv_bool = xsdbool( sy-subrc = 0 ). ENDMETHOD. @@ -436,9 +430,7 @@ DATA: view_not_found = 13 OTHERS = 14. - DATA temp2 TYPE xsdboolean. - temp2 = boolc( sy-subrc = 0 ). - rv_exit = temp2. + rv_exit = xsdbool( sy-subrc = 0 ). ENDMETHOD. diff --git a/src/objects/zcl_abapgit_object_oa2p.clas.abap b/src/objects/zcl_abapgit_object_oa2p.clas.abap index aa75032ca..7e2f5e917 100644 --- a/src/objects/zcl_abapgit_object_oa2p.clas.abap +++ b/src/objects/zcl_abapgit_object_oa2p.clas.abap @@ -194,10 +194,9 @@ CLASS zcl_abapgit_object_oa2p IMPLEMENTATION. METHOD zif_abapgit_object~is_locked. - TYPES temp1 TYPE STANDARD TABLE OF seqg3. -DATA: lv_profile_name TYPE eqegraarg, + DATA: lv_profile_name TYPE eqegraarg, lv_lock_number TYPE i, - lt_locks TYPE temp1. + lt_locks TYPE STANDARD TABLE OF seqg3. lv_profile_name = mv_profile. @@ -212,9 +211,7 @@ DATA: lv_profile_name TYPE eqegraarg, enq = lt_locks. " Number of chosen lock entries - DATA temp2 TYPE xsdboolean. - temp2 = boolc( lv_lock_number > 0 ). - rv_is_locked = temp2. + rv_is_locked = xsdbool( lv_lock_number > 0 ). ENDMETHOD. diff --git a/src/objects/zcl_abapgit_object_odso.clas.abap b/src/objects/zcl_abapgit_object_odso.clas.abap index 5a75dd20a..e1f938029 100644 --- a/src/objects/zcl_abapgit_object_odso.clas.abap +++ b/src/objects/zcl_abapgit_object_odso.clas.abap @@ -76,11 +76,10 @@ CLASS zcl_abapgit_object_odso IMPLEMENTATION. METHOD zif_abapgit_object~delete. - TYPES temp1 TYPE STANDARD TABLE OF bal_s_msg. -DATA: lv_odsonam TYPE c LENGTH 30, + DATA: lv_odsonam TYPE c LENGTH 30, lv_objname TYPE sobj_name, lo_collection TYPE REF TO object, - lt_msg TYPE temp1, + lt_msg TYPE STANDARD TABLE OF bal_s_msg, ls_msg TYPE bal_s_msg. TRY. @@ -120,14 +119,13 @@ DATA: lv_odsonam TYPE c LENGTH 30, METHOD zif_abapgit_object~deserialize. - TYPES temp2 TYPE STANDARD TABLE OF bapiret2. -DATA: lv_dsonam TYPE c LENGTH 30, + DATA: lv_dsonam TYPE c LENGTH 30, lr_details TYPE REF TO data, lr_infoobjects TYPE REF TO data, lr_navigation TYPE REF TO data, lr_indexes TYPE REF TO data, lr_index_iobj TYPE REF TO data, - lt_return TYPE temp2, + lt_return TYPE STANDARD TABLE OF bapiret2, ls_return TYPE bapiret2. FIELD-SYMBOLS: @@ -234,9 +232,7 @@ DATA: lv_dsonam TYPE c LENGTH 30, INTO lv_iobjnm WHERE odsobject = ms_item-obj_name. - DATA temp1 TYPE xsdboolean. - temp1 = boolc( sy-subrc = 0 ). - rv_bool = temp1. + rv_bool = xsdbool( sy-subrc = 0 ). ENDMETHOD. diff --git a/src/objects/zcl_abapgit_object_otgr.clas.abap b/src/objects/zcl_abapgit_object_otgr.clas.abap index 3a5a0c46d..6cb540d14 100644 --- a/src/objects/zcl_abapgit_object_otgr.clas.abap +++ b/src/objects/zcl_abapgit_object_otgr.clas.abap @@ -47,9 +47,9 @@ CLASS zcl_abapgit_object_otgr IMPLEMENTATION. lv_name = ms_item-obj_name. TRY. - CREATE OBJECT ro_otgr EXPORTING im_name = lv_name - im_new = lv_new - im_activation_state = lv_state. + ro_otgr = NEW #( im_name = lv_name + im_new = lv_new + im_activation_state = lv_state ). CATCH cx_pak_invalid_data cx_pak_not_authorized cx_pak_invalid_state diff --git a/src/objects/zcl_abapgit_object_para.clas.abap b/src/objects/zcl_abapgit_object_para.clas.abap index e7afd3ad1..5ca4632db 100644 --- a/src/objects/zcl_abapgit_object_para.clas.abap +++ b/src/objects/zcl_abapgit_object_para.clas.abap @@ -156,9 +156,7 @@ CLASS zcl_abapgit_object_para IMPLEMENTATION. SELECT SINGLE paramid FROM tpara INTO lv_paramid WHERE paramid = ms_item-obj_name. "#EC CI_GENBUFF - DATA temp1 TYPE xsdboolean. - temp1 = boolc( sy-subrc = 0 ). - rv_bool = temp1. + rv_bool = xsdbool( sy-subrc = 0 ). ENDMETHOD. diff --git a/src/objects/zcl_abapgit_object_pdts.clas.locals_imp.abap b/src/objects/zcl_abapgit_object_pdts.clas.locals_imp.abap index d21fb9742..cb81a7bc3 100644 --- a/src/objects/zcl_abapgit_object_pdts.clas.locals_imp.abap +++ b/src/objects/zcl_abapgit_object_pdts.clas.locals_imp.abap @@ -73,7 +73,7 @@ CLASS lcl_task_definition IMPLEMENTATION. DATA lo_taskdef TYPE REF TO lcl_task_definition. - CREATE OBJECT lo_taskdef. + lo_taskdef = NEW #( ). lo_taskdef->mv_objid = iv_objid. lo_taskdef->supply_instance( ). @@ -185,7 +185,7 @@ CLASS lcl_task_definition IMPLEMENTATION. METHOD create. DATA lo_task TYPE REF TO lcl_task_definition. - CREATE OBJECT lo_task TYPE lcl_task_definition. + lo_task = NEW lcl_task_definition( ). lo_task->mv_objid = iv_objid. lo_task->ms_task = is_task_data. ri_result = lo_task. diff --git a/src/objects/zcl_abapgit_object_pdts.clas.testclasses.abap b/src/objects/zcl_abapgit_object_pdts.clas.testclasses.abap index 6cfb7506b..7a2b34963 100644 --- a/src/objects/zcl_abapgit_object_pdts.clas.testclasses.abap +++ b/src/objects/zcl_abapgit_object_pdts.clas.testclasses.abap @@ -61,8 +61,8 @@ CLASS ltc_smoke_test IMPLEMENTATION. ls_item-obj_name = '99999999'. TRY. - CREATE OBJECT mo_cut TYPE zcl_abapgit_object_pdts EXPORTING is_item = ls_item - iv_language = sy-langu. + mo_cut = NEW zcl_abapgit_object_pdts( is_item = ls_item + iv_language = sy-langu ). CATCH zcx_abapgit_exception. cl_abap_unit_assert=>fail( ). ENDTRY. diff --git a/src/objects/zcl_abapgit_object_pdxx_super.clas.abap b/src/objects/zcl_abapgit_object_pdxx_super.clas.abap index f4dadb7f7..1de6296d3 100644 --- a/src/objects/zcl_abapgit_object_pdxx_super.clas.abap +++ b/src/objects/zcl_abapgit_object_pdxx_super.clas.abap @@ -105,9 +105,7 @@ CLASS zcl_abapgit_object_pdxx_super IMPLEMENTATION. not_found = 1 OTHERS = 2. - DATA temp1 TYPE xsdboolean. - temp1 = boolc( sy-subrc = 0 ). - rv_bool = temp1. + rv_bool = xsdbool( sy-subrc = 0 ). ENDMETHOD. diff --git a/src/objects/zcl_abapgit_object_pdxx_super.clas.testclasses.abap b/src/objects/zcl_abapgit_object_pdxx_super.clas.testclasses.abap index 7260fb827..bc318c3e3 100644 --- a/src/objects/zcl_abapgit_object_pdxx_super.clas.testclasses.abap +++ b/src/objects/zcl_abapgit_object_pdxx_super.clas.testclasses.abap @@ -46,8 +46,8 @@ CLASS ltc_lock IMPLEMENTATION. ls_item-obj_type = 'PDXX'. ls_item-obj_name = 'XX' && lc_dummy. - CREATE OBJECT lo_cut TYPE lth_object_pdxx EXPORTING is_item = ls_item - iv_language = sy-langu. + lo_cut = NEW lth_object_pdxx( is_item = ls_item + iv_language = sy-langu ). cl_abap_unit_assert=>assert_equals( act = lo_cut->is_locked( ) exp = abap_true ). @@ -103,8 +103,8 @@ CLASS ltc_general_tests IMPLEMENTATION. ls_item-obj_type = 'PDZZ'. ls_item-obj_name = 'ZZ99999999'. - CREATE OBJECT lo_cut TYPE lth_object_pdxx EXPORTING is_item = ls_item - iv_language = sy-langu. + lo_cut = NEW lth_object_pdxx( is_item = ls_item + iv_language = sy-langu ). cl_abap_unit_assert=>assert_equals( act = lo_cut->get_objkey( )-otype exp = 'ZZ' ). diff --git a/src/objects/zcl_abapgit_object_pers.clas.abap b/src/objects/zcl_abapgit_object_pers.clas.abap index 3975982ca..3d4c3fd0d 100644 --- a/src/objects/zcl_abapgit_object_pers.clas.abap +++ b/src/objects/zcl_abapgit_object_pers.clas.abap @@ -151,9 +151,7 @@ CLASS zcl_abapgit_object_pers IMPLEMENTATION. pers_key_does_not_exist = 1 OTHERS = 2 ). - DATA temp1 TYPE xsdboolean. - temp1 = boolc( sy-subrc = 0 ). - rv_bool = temp1. + rv_bool = xsdbool( sy-subrc = 0 ). ENDMETHOD. @@ -193,9 +191,8 @@ CLASS zcl_abapgit_object_pers IMPLEMENTATION. METHOD zif_abapgit_object~jump. - TYPES temp1 TYPE STANDARD TABLE OF bdcdata. -DATA: ls_bcdata TYPE bdcdata, - lt_bcdata TYPE temp1. + DATA: ls_bcdata TYPE bdcdata, + lt_bcdata TYPE STANDARD TABLE OF bdcdata. ls_bcdata-program = 'SAPLSPERS_REG_DIALOG'. ls_bcdata-dynpro = '0100'. diff --git a/src/objects/zcl_abapgit_object_pinf.clas.abap b/src/objects/zcl_abapgit_object_pinf.clas.abap index 76e188d70..5902f3442 100644 --- a/src/objects/zcl_abapgit_object_pinf.clas.abap +++ b/src/objects/zcl_abapgit_object_pinf.clas.abap @@ -61,7 +61,7 @@ CLASS zcl_abapgit_object_pinf IMPLEMENTATION. METHOD create_facade. - CREATE OBJECT ri_facade TYPE lcl_package_interface_facade EXPORTING ii_interface = ii_interface. + ri_facade = NEW lcl_package_interface_facade( ii_interface = ii_interface ). ENDMETHOD. @@ -295,16 +295,12 @@ CLASS zcl_abapgit_object_pinf IMPLEMENTATION. SELECT SINGLE pack_name FROM intf INTO lv_pack_name WHERE intf_name = ms_item-obj_name. - DATA temp1 TYPE xsdboolean. - temp1 = boolc( sy-subrc = 0 ). - rv_bool = temp1. + rv_bool = xsdbool( sy-subrc = 0 ). IF rv_bool = abap_true. SELECT SINGLE mainpack FROM tdevc INTO lv_main_pack WHERE devclass = lv_pack_name. "#EC CI_GENBUFF - DATA temp2 TYPE xsdboolean. - temp2 = boolc( sy-subrc = 0 ). - rv_bool = temp2. + rv_bool = xsdbool( sy-subrc = 0 ). ENDIF. ENDMETHOD. diff --git a/src/objects/zcl_abapgit_object_prog.clas.abap b/src/objects/zcl_abapgit_object_prog.clas.abap index 44b530f5f..1d3b14d42 100644 --- a/src/objects/zcl_abapgit_object_prog.clas.abap +++ b/src/objects/zcl_abapgit_object_prog.clas.abap @@ -277,9 +277,7 @@ CLASS zcl_abapgit_object_prog IMPLEMENTATION. SELECT SINGLE progname FROM reposrc INTO lv_progname WHERE progname = ms_item-obj_name. - DATA temp1 TYPE xsdboolean. - temp1 = boolc( sy-subrc = 0 ). - rv_bool = temp1. + rv_bool = xsdbool( sy-subrc = 0 ). ENDMETHOD. diff --git a/src/objects/zcl_abapgit_object_scp1.clas.abap b/src/objects/zcl_abapgit_object_scp1.clas.abap index 8b8332227..8683e97f9 100644 --- a/src/objects/zcl_abapgit_object_scp1.clas.abap +++ b/src/objects/zcl_abapgit_object_scp1.clas.abap @@ -389,9 +389,7 @@ CLASS zcl_abapgit_object_scp1 IMPLEMENTATION. profid = lv_profid IMPORTING rc = lv_rc. - DATA temp1 TYPE xsdboolean. - temp1 = boolc( lv_rc = 0 ). - rv_bool = temp1. + rv_bool = xsdbool( lv_rc = 0 ). ENDMETHOD. diff --git a/src/objects/zcl_abapgit_object_scvi.clas.abap b/src/objects/zcl_abapgit_object_scvi.clas.abap index 6c37cff86..4ef5874b0 100644 --- a/src/objects/zcl_abapgit_object_scvi.clas.abap +++ b/src/objects/zcl_abapgit_object_scvi.clas.abap @@ -117,9 +117,7 @@ CLASS zcl_abapgit_object_scvi IMPLEMENTATION. EXCEPTIONS no_variant = 1 OTHERS = 2. - DATA temp1 TYPE xsdboolean. - temp1 = boolc( sy-subrc = 0 ). - rv_bool = temp1. + rv_bool = xsdbool( sy-subrc = 0 ). ENDMETHOD. diff --git a/src/objects/zcl_abapgit_object_sfpf.clas.abap b/src/objects/zcl_abapgit_object_sfpf.clas.abap index f21d66356..d64e7833d 100644 --- a/src/objects/zcl_abapgit_object_sfpf.clas.abap +++ b/src/objects/zcl_abapgit_object_sfpf.clas.abap @@ -47,8 +47,7 @@ CLASS zcl_abapgit_object_sfpf IMPLEMENTATION. * it is better to collect all attributes in a cache table * instead of implementing of a nested loop using get_next(). - TYPES temp1 LIKE SORTED TABLE OF ls_attr_href WITH NON-UNIQUE KEY val. -DATA: + DATA: li_iterator TYPE REF TO if_ixml_node_iterator, li_elem TYPE REF TO if_ixml_element, lv_new TYPE string, @@ -58,7 +57,7 @@ DATA: val TYPE string, attr TYPE REF TO if_ixml_attribute, END OF ls_attr_href, - lt_attr_href TYPE temp1. + lt_attr_href LIKE SORTED TABLE OF ls_attr_href WITH NON-UNIQUE KEY val. FIELD-SYMBOLS LIKE LINE OF lt_attr_href. @@ -287,9 +286,7 @@ DATA: SELECT SINGLE name FROM fplayout INTO lv_name WHERE name = ms_item-obj_name. - DATA temp1 TYPE xsdboolean. - temp1 = boolc( sy-subrc = 0 ). - rv_bool = temp1. + rv_bool = xsdbool( sy-subrc = 0 ). ENDMETHOD. diff --git a/src/objects/zcl_abapgit_object_sfpi.clas.abap b/src/objects/zcl_abapgit_object_sfpi.clas.abap index 064892988..a6e44daf0 100644 --- a/src/objects/zcl_abapgit_object_sfpi.clas.abap +++ b/src/objects/zcl_abapgit_object_sfpi.clas.abap @@ -129,9 +129,7 @@ CLASS zcl_abapgit_object_sfpi IMPLEMENTATION. SELECT SINGLE name FROM fpinterface INTO lv_name WHERE name = ms_item-obj_name. - DATA temp1 TYPE xsdboolean. - temp1 = boolc( sy-subrc = 0 ). - rv_bool = temp1. + rv_bool = xsdbool( sy-subrc = 0 ). ENDMETHOD. diff --git a/src/objects/zcl_abapgit_object_shi3.clas.abap b/src/objects/zcl_abapgit_object_shi3.clas.abap index c4570e7d6..0003efdb9 100644 --- a/src/objects/zcl_abapgit_object_shi3.clas.abap +++ b/src/objects/zcl_abapgit_object_shi3.clas.abap @@ -112,16 +112,13 @@ CLASS zcl_abapgit_object_shi3 IMPLEMENTATION. METHOD insert_transport. - TYPES temp1 TYPE TABLE OF e071. -TYPES temp2 TYPE TABLE OF e071k. -TYPES temp3 TYPE TABLE OF ko200. -DATA: + DATA: ls_msg TYPE hier_mess, ls_object TYPE e071, - lt_objects TYPE temp1, - lt_keys TYPE temp2, + lt_objects TYPE TABLE OF e071, + lt_keys TYPE TABLE OF e071k, ls_ko200 TYPE ko200, - lt_ko200 TYPE temp3. + lt_ko200 TYPE TABLE OF ko200. " This function shows a popup so get objects and keys and insert " them into transport below @@ -162,8 +159,7 @@ DATA: METHOD is_used. - TYPES temp4 TYPE STANDARD TABLE OF ttree WITH DEFAULT KEY. -DATA: lt_used_in_structures TYPE temp4. + DATA: lt_used_in_structures TYPE STANDARD TABLE OF ttree WITH DEFAULT KEY. CALL FUNCTION 'STREE_GET_STRUCTURE_USAGE' EXPORTING @@ -207,8 +203,7 @@ DATA: lt_used_in_structures TYPE temp4. METHOD jump_se43. - TYPES temp5 TYPE TABLE OF bdcdata. -DATA: lt_bdcdata TYPE temp5. + DATA: lt_bdcdata TYPE TABLE OF bdcdata. FIELD-SYMBOLS: LIKE LINE OF lt_bdcdata. @@ -272,17 +267,13 @@ DATA: lt_bdcdata TYPE temp5. METHOD zif_abapgit_object~deserialize. - TYPES temp6 TYPE TABLE OF ttreet. -TYPES temp4 TYPE TABLE OF hier_iface. -TYPES temp5 TYPE TABLE OF hier_texts. -TYPES temp1 TYPE TABLE OF hier_ref. -DATA: ls_msg TYPE hier_mess, + DATA: ls_msg TYPE hier_mess, ls_head TYPE ttree, ls_ttree TYPE ttree, - lt_titles TYPE temp6, - lt_nodes TYPE temp4, - lt_texts TYPE temp5, - lt_refs TYPE temp1. + lt_titles TYPE TABLE OF ttreet, + lt_nodes TYPE TABLE OF hier_iface, + lt_texts TYPE TABLE OF hier_texts, + lt_refs TYPE TABLE OF hier_ref. io_xml->read( EXPORTING iv_name = 'TREE_HEAD' CHANGING cg_data = ls_head ). @@ -373,9 +364,7 @@ DATA: ls_msg TYPE hier_mess, structure_header = ls_header structure_tadir = ls_tadir. - DATA temp1 TYPE xsdboolean. - temp1 = boolc( ls_header-id IS NOT INITIAL ). - rv_bool = temp1. + rv_bool = xsdbool( ls_header-id IS NOT INITIAL ). ENDMETHOD. @@ -444,16 +433,12 @@ DATA: ls_msg TYPE hier_mess, METHOD zif_abapgit_object~serialize. - TYPES temp10 TYPE TABLE OF ttreet. -TYPES temp8 TYPE TABLE OF hier_iface. -TYPES temp9 TYPE TABLE OF hier_texts. -TYPES temp2 TYPE TABLE OF hier_ref. -DATA: ls_msg TYPE hier_mess, + DATA: ls_msg TYPE hier_mess, ls_head TYPE ttree, - lt_titles TYPE temp10, - lt_nodes TYPE temp8, - lt_texts TYPE temp9, - lt_refs TYPE temp2, + lt_titles TYPE TABLE OF ttreet, + lt_nodes TYPE TABLE OF hier_iface, + lt_texts TYPE TABLE OF hier_texts, + lt_refs TYPE TABLE OF hier_ref, lv_all_languages TYPE abap_bool. diff --git a/src/objects/zcl_abapgit_object_shi5.clas.abap b/src/objects/zcl_abapgit_object_shi5.clas.abap index 9b1072f85..ca027d2c4 100644 --- a/src/objects/zcl_abapgit_object_shi5.clas.abap +++ b/src/objects/zcl_abapgit_object_shi5.clas.abap @@ -51,12 +51,11 @@ CLASS zcl_abapgit_object_shi5 IMPLEMENTATION. METHOD zif_abapgit_object~delete. - TYPES temp1 TYPE TABLE OF treenamesp. -DATA: + DATA: ls_msg TYPE hier_mess, lv_found_users TYPE hier_yesno, ls_check_extensions TYPE treenamesp, - lt_check_extensions TYPE temp1, + lt_check_extensions TYPE TABLE OF treenamesp, lv_obj_name TYPE ko200-obj_name. " STREE_EXTENSION_DELETE shows a popup so do the same here @@ -175,9 +174,7 @@ DATA: IMPORTING extension_header = ls_extension_header. - DATA temp1 TYPE xsdboolean. - temp1 = boolc( ls_extension_header IS NOT INITIAL ). - rv_bool = temp1. + rv_bool = xsdbool( ls_extension_header IS NOT INITIAL ). ENDMETHOD. @@ -213,8 +210,7 @@ DATA: METHOD zif_abapgit_object~jump. - TYPES temp2 TYPE STANDARD TABLE OF ttree_ext. -DATA: lt_extension TYPE temp2. + DATA: lt_extension TYPE STANDARD TABLE OF ttree_ext. FIELD-SYMBOLS: LIKE LINE OF lt_extension. INSERT INITIAL LINE INTO TABLE lt_extension ASSIGNING . diff --git a/src/objects/zcl_abapgit_object_shlp.clas.abap b/src/objects/zcl_abapgit_object_shlp.clas.abap index 9bd13c829..1ab9808dd 100644 --- a/src/objects/zcl_abapgit_object_shlp.clas.abap +++ b/src/objects/zcl_abapgit_object_shlp.clas.abap @@ -106,15 +106,12 @@ CLASS zcl_abapgit_object_shlp IMPLEMENTATION. METHOD zif_abapgit_object~deserialize. - TYPES temp1 TYPE TABLE OF dd31v. -TYPES temp2 TYPE TABLE OF dd32p. -TYPES temp3 TYPE TABLE OF dd33v. -DATA: lv_name TYPE ddobjname, + DATA: lv_name TYPE ddobjname, lv_done TYPE abap_bool, ls_dd30v TYPE dd30v, - lt_dd31v TYPE temp1, - lt_dd32p TYPE temp2, - lt_dd33v TYPE temp3. + lt_dd31v TYPE TABLE OF dd31v, + lt_dd32p TYPE TABLE OF dd32p, + lt_dd33v TYPE TABLE OF dd33v. io_xml->read( EXPORTING iv_name = 'DD30V' CHANGING cg_data = ls_dd30v ). @@ -172,9 +169,7 @@ DATA: lv_name TYPE ddobjname, SELECT SINGLE shlpname FROM dd30l INTO lv_shlpname WHERE shlpname = ms_item-obj_name. - DATA temp1 TYPE xsdboolean. - temp1 = boolc( sy-subrc = 0 ). - rv_bool = temp1. + rv_bool = xsdbool( sy-subrc = 0 ). ENDMETHOD. @@ -227,15 +222,12 @@ DATA: lv_name TYPE ddobjname, METHOD zif_abapgit_object~serialize. - TYPES temp4 TYPE TABLE OF dd31v. -TYPES temp5 TYPE TABLE OF dd32p. -TYPES temp6 TYPE TABLE OF dd33v. -DATA: lv_name TYPE ddobjname, + DATA: lv_name TYPE ddobjname, lv_state TYPE ddgotstate, ls_dd30v TYPE dd30v, - lt_dd31v TYPE temp4, - lt_dd32p TYPE temp5, - lt_dd33v TYPE temp6. + lt_dd31v TYPE TABLE OF dd31v, + lt_dd32p TYPE TABLE OF dd32p, + lt_dd33v TYPE TABLE OF dd33v. FIELD-SYMBOLS: LIKE LINE OF lt_dd32p. diff --git a/src/objects/zcl_abapgit_object_shma.clas.abap b/src/objects/zcl_abapgit_object_shma.clas.abap index 015fcba24..843b3968d 100644 --- a/src/objects/zcl_abapgit_object_shma.clas.abap +++ b/src/objects/zcl_abapgit_object_shma.clas.abap @@ -167,9 +167,7 @@ CLASS zcl_abapgit_object_shma IMPLEMENTATION. INTO lv_area_name WHERE area_name = ms_item-obj_name. - DATA temp1 TYPE xsdboolean. - temp1 = boolc( sy-subrc = 0 ). - rv_bool = temp1. + rv_bool = xsdbool( sy-subrc = 0 ). ENDMETHOD. @@ -208,9 +206,8 @@ CLASS zcl_abapgit_object_shma IMPLEMENTATION. METHOD zif_abapgit_object~jump. - TYPES temp1 TYPE STANDARD TABLE OF bdcdata. -DATA: ls_bcdata TYPE bdcdata, - lt_bcdata TYPE temp1. + DATA: ls_bcdata TYPE bdcdata, + lt_bcdata TYPE STANDARD TABLE OF bdcdata. ls_bcdata-program = 'SAPLSHMA'. ls_bcdata-dynpro = '0100'. diff --git a/src/objects/zcl_abapgit_object_sicf.clas.abap b/src/objects/zcl_abapgit_object_sicf.clas.abap index a70d8fd5f..9757c4481 100644 --- a/src/objects/zcl_abapgit_object_sicf.clas.abap +++ b/src/objects/zcl_abapgit_object_sicf.clas.abap @@ -95,9 +95,8 @@ CLASS zcl_abapgit_object_sicf IMPLEMENTATION. METHOD change_sicf. - TYPES temp1 TYPE TABLE OF icfhandler. -DATA: lt_icfhndlist TYPE icfhndlist, - lt_existing TYPE temp1, + DATA: lt_icfhndlist TYPE icfhndlist, + lt_existing TYPE TABLE OF icfhandler, ls_icfserdesc TYPE icfserdesc. FIELD-SYMBOLS: LIKE LINE OF lt_existing. @@ -503,13 +502,12 @@ DATA: lt_icfhndlist TYPE icfhndlist, METHOD zif_abapgit_object~deserialize. - TYPES temp2 TYPE TABLE OF icfhandler. -DATA: ls_icfservice TYPE icfservice, + DATA: ls_icfservice TYPE icfservice, ls_read TYPE icfservice, ls_icfdocu TYPE icfdocu, lv_url TYPE string, lv_exists TYPE abap_bool, - lt_icfhandler TYPE temp2. + lt_icfhandler TYPE TABLE OF icfhandler. io_xml->read( EXPORTING iv_name = 'URL' CHANGING cg_data = lv_url ). @@ -551,9 +549,7 @@ DATA: ls_icfservice TYPE icfservice, SELECT SINGLE icfaltnme FROM icfservice INTO ls_key-icf_name WHERE icf_name = ms_item-obj_name(15) AND icfparguid = ms_item-obj_name+15. - DATA temp1 TYPE xsdboolean. - temp1 = boolc( sy-subrc = 0 ). - rv_bool = temp1. + rv_bool = xsdbool( sy-subrc = 0 ). ENDMETHOD. @@ -598,9 +594,8 @@ DATA: ls_icfservice TYPE icfservice, METHOD zif_abapgit_object~jump. - TYPES temp3 TYPE STANDARD TABLE OF bdcdata. -DATA: ls_bcdata TYPE bdcdata, - lt_bcdata TYPE temp3. + DATA: ls_bcdata TYPE bdcdata, + lt_bcdata TYPE STANDARD TABLE OF bdcdata. ls_bcdata-program = 'RSICFTREE'. ls_bcdata-dynpro = '1000'. @@ -668,11 +663,10 @@ DATA: ls_bcdata TYPE bdcdata, METHOD zif_abapgit_object~serialize. - TYPES temp4 TYPE TABLE OF icfhandler. -DATA: ls_icfservice TYPE icfservice, + DATA: ls_icfservice TYPE icfservice, ls_icfdocu TYPE icfdocu, lv_url TYPE string, - lt_icfhandler TYPE temp4. + lt_icfhandler TYPE TABLE OF icfhandler. read( IMPORTING es_icfservice = ls_icfservice es_icfdocu = ls_icfdocu diff --git a/src/objects/zcl_abapgit_object_smim.clas.abap b/src/objects/zcl_abapgit_object_smim.clas.abap index 4ca521dc6..15ec98937 100644 --- a/src/objects/zcl_abapgit_object_smim.clas.abap +++ b/src/objects/zcl_abapgit_object_smim.clas.abap @@ -67,9 +67,8 @@ CLASS zcl_abapgit_object_smim IMPLEMENTATION. METHOD get_filename. - TYPES temp1 TYPE TABLE OF string. -DATA: lv_lines TYPE i, - lt_strings TYPE temp1. + DATA: lv_lines TYPE i, + lt_strings TYPE TABLE OF string. SPLIT iv_url AT '/' INTO TABLE lt_strings. @@ -260,9 +259,7 @@ DATA: lv_lines TYPE i, SELECT SINGLE loio_id FROM smimloio INTO lv_loio WHERE loio_id = lv_loio. "#EC CI_GENBUFF - DATA temp1 TYPE xsdboolean. - temp1 = boolc( sy-subrc = 0 ). - rv_bool = temp1. + rv_bool = xsdbool( sy-subrc = 0 ). ENDMETHOD. diff --git a/src/objects/zcl_abapgit_object_sobj.clas.abap b/src/objects/zcl_abapgit_object_sobj.clas.abap index 9a93b9731..bff9b8ee2 100644 --- a/src/objects/zcl_abapgit_object_sobj.clas.abap +++ b/src/objects/zcl_abapgit_object_sobj.clas.abap @@ -85,9 +85,9 @@ CLASS zcl_abapgit_object_sobj IMPLEMENTATION. METHOD get_generic. - CREATE OBJECT ro_generic EXPORTING io_field_rules = get_field_rules( ) - is_item = ms_item - iv_language = mv_language. + ro_generic = NEW #( io_field_rules = get_field_rules( ) + is_item = ms_item + iv_language = mv_language ). ENDMETHOD. @@ -98,9 +98,7 @@ CLASS zcl_abapgit_object_sobj IMPLEMENTATION. METHOD is_locked. - DATA temp1 TYPE xsdboolean. - temp1 = boolc( is_objtype_locked( ) = abap_true OR is_program_locked( ) = abap_true ). - rv_is_locked = temp1. + rv_is_locked = xsdbool( is_objtype_locked( ) = abap_true OR is_program_locked( ) = abap_true ). ENDMETHOD. diff --git a/src/objects/zcl_abapgit_object_splo.clas.abap b/src/objects/zcl_abapgit_object_splo.clas.abap index 3c805f6b4..2cfebe50d 100644 --- a/src/objects/zcl_abapgit_object_splo.clas.abap +++ b/src/objects/zcl_abapgit_object_splo.clas.abap @@ -69,9 +69,7 @@ CLASS zcl_abapgit_object_splo IMPLEMENTATION. SELECT SINGLE papart INTO lv_papart FROM tsp1d WHERE papart = ms_item-obj_name. - DATA temp1 TYPE xsdboolean. - temp1 = boolc( sy-subrc = 0 ). - rv_bool = temp1. + rv_bool = xsdbool( sy-subrc = 0 ). ENDMETHOD. diff --git a/src/objects/zcl_abapgit_object_sppf.clas.abap b/src/objects/zcl_abapgit_object_sppf.clas.abap index 11c105b1b..88e6749f2 100644 --- a/src/objects/zcl_abapgit_object_sppf.clas.abap +++ b/src/objects/zcl_abapgit_object_sppf.clas.abap @@ -23,8 +23,8 @@ CLASS zcl_abapgit_object_sppf IMPLEMENTATION. METHOD get_generic. - CREATE OBJECT ro_generic EXPORTING is_item = ms_item - iv_language = mv_language. + ro_generic = NEW #( is_item = ms_item + iv_language = mv_language ). ENDMETHOD. diff --git a/src/objects/zcl_abapgit_object_sprx.clas.abap b/src/objects/zcl_abapgit_object_sprx.clas.abap index 2604bc6ac..ae81e67bf 100644 --- a/src/objects/zcl_abapgit_object_sprx.clas.abap +++ b/src/objects/zcl_abapgit_object_sprx.clas.abap @@ -321,9 +321,7 @@ CLASS zcl_abapgit_object_sprx IMPLEMENTATION. status = lv_status status_text = lv_status_text ). - DATA temp1 TYPE xsdboolean. - temp1 = boolc( lv_status = if_proxy=>c_state_active ). - rv_bool = temp1. + rv_bool = xsdbool( lv_status = if_proxy=>c_state_active ). ENDMETHOD. diff --git a/src/objects/zcl_abapgit_object_sqsc.clas.abap b/src/objects/zcl_abapgit_object_sqsc.clas.abap index 2e3281c89..1d277aef3 100644 --- a/src/objects/zcl_abapgit_object_sqsc.clas.abap +++ b/src/objects/zcl_abapgit_object_sqsc.clas.abap @@ -156,10 +156,10 @@ CLASS zcl_abapgit_object_sqsc IMPLEMENTATION. IF zcl_abapgit_objects=>exists( ls_item ) = abap_true. - CREATE OBJECT lo_interface EXPORTING is_item = ls_item - iv_language = mv_language - io_files = mo_files - io_i18n_params = mo_i18n_params. + lo_interface = NEW #( is_item = ls_item + iv_language = mv_language + io_files = mo_files + io_i18n_params = mo_i18n_params ). lo_interface->zif_abapgit_object~delete( iv_package = iv_package iv_transport = iv_transport ). diff --git a/src/objects/zcl_abapgit_object_srvb.clas.abap b/src/objects/zcl_abapgit_object_srvb.clas.abap index 6a92cb6c9..e8e89a14c 100644 --- a/src/objects/zcl_abapgit_object_srvb.clas.abap +++ b/src/objects/zcl_abapgit_object_srvb.clas.abap @@ -435,9 +435,7 @@ CLASS zcl_abapgit_object_srvb IMPLEMENTATION. p_object_data = lo_object_data ). ENDIF. - DATA temp1 TYPE xsdboolean. - temp1 = boolc( lo_object_data IS NOT INITIAL AND lo_object_data->get_object_key( ) IS NOT INITIAL ). - rv_bool = temp1. + rv_bool = xsdbool( lo_object_data IS NOT INITIAL AND lo_object_data->get_object_key( ) IS NOT INITIAL ). CATCH cx_root. rv_bool = abap_false. ENDTRY. diff --git a/src/objects/zcl_abapgit_object_srvd.clas.abap b/src/objects/zcl_abapgit_object_srvd.clas.abap index 493dd41f6..53057ceef 100644 --- a/src/objects/zcl_abapgit_object_srvd.clas.abap +++ b/src/objects/zcl_abapgit_object_srvd.clas.abap @@ -467,9 +467,7 @@ CLASS zcl_abapgit_object_srvd IMPLEMENTATION. data_selection = 'P' IMPORTING eo_object_data = lo_object_data. - DATA temp1 TYPE xsdboolean. - temp1 = boolc( lo_object_data IS NOT INITIAL AND lo_object_data->get_object_key( ) IS NOT INITIAL ). - rv_bool = temp1. + rv_bool = xsdbool( lo_object_data IS NOT INITIAL AND lo_object_data->get_object_key( ) IS NOT INITIAL ). CATCH cx_root. rv_bool = abap_false. ENDTRY. diff --git a/src/objects/zcl_abapgit_object_ssfo.clas.abap b/src/objects/zcl_abapgit_object_ssfo.clas.abap index 7422073dc..2cfda57cb 100644 --- a/src/objects/zcl_abapgit_object_ssfo.clas.abap +++ b/src/objects/zcl_abapgit_object_ssfo.clas.abap @@ -246,8 +246,7 @@ CLASS zcl_abapgit_object_ssfo IMPLEMENTATION. METHOD sort_texts. - TYPES temp1 TYPE STANDARD TABLE OF stxfobjt. -DATA: li_node TYPE REF TO if_ixml_node, + DATA: li_node TYPE REF TO if_ixml_node, li_item TYPE REF TO if_ixml_node, li_field TYPE REF TO if_ixml_node, li_item_list TYPE REF TO if_ixml_node_list, @@ -256,7 +255,7 @@ DATA: li_node TYPE REF TO if_ixml_node, lv_index TYPE i, lv_field TYPE fieldname, ls_item TYPE stxfobjt, - lt_items TYPE temp1. + lt_items TYPE STANDARD TABLE OF stxfobjt. FIELD-SYMBOLS TYPE any. @@ -360,7 +359,7 @@ DATA: li_node TYPE REF TO if_ixml_node, lx_error TYPE REF TO cx_ssf_fb, lv_text TYPE string. - CREATE OBJECT lo_sf. + lo_sf = NEW #( ). * set "created by" and "changed by" to current user li_iterator = io_xml->get_raw( )->get_root_element( )->create_iterator( ). @@ -419,9 +418,7 @@ DATA: li_node TYPE REF TO if_ixml_node, SELECT SINGLE formname FROM stxfadm INTO lv_formname WHERE formname = ms_item-obj_name. - DATA temp1 TYPE xsdboolean. - temp1 = boolc( sy-subrc = 0 ). - rv_bool = temp1. + rv_bool = xsdbool( sy-subrc = 0 ). ENDMETHOD. @@ -459,9 +456,7 @@ DATA: li_node TYPE REF TO if_ixml_node, IMPORTING o_inactive = lv_inactive. - DATA temp2 TYPE xsdboolean. - temp2 = boolc( lv_inactive = abap_false ). - rv_active = temp2. + rv_active = xsdbool( lv_inactive = abap_false ). ENDMETHOD. @@ -476,8 +471,7 @@ DATA: li_node TYPE REF TO if_ixml_node, METHOD zif_abapgit_object~jump. - TYPES temp2 TYPE TABLE OF bdcdata. -DATA: lt_bdcdata TYPE temp2, + DATA: lt_bdcdata TYPE TABLE OF bdcdata, lv_formtype TYPE stxfadm-formtype. FIELD-SYMBOLS: LIKE LINE OF lt_bdcdata. @@ -555,7 +549,7 @@ DATA: lt_bdcdata TYPE temp2, li_ixml = cl_ixml=>create( ). li_xml_doc = li_ixml->create_document( ). - CREATE OBJECT lo_sf. + lo_sf = NEW #( ). lv_formname = ms_item-obj_name. " convert type TRY. lo_sf->load( im_formname = lv_formname diff --git a/src/objects/zcl_abapgit_object_ssst.clas.abap b/src/objects/zcl_abapgit_object_ssst.clas.abap index 0618cbc2a..d8bde82fc 100644 --- a/src/objects/zcl_abapgit_object_ssst.clas.abap +++ b/src/objects/zcl_abapgit_object_ssst.clas.abap @@ -72,14 +72,11 @@ CLASS zcl_abapgit_object_ssst IMPLEMENTATION. METHOD zif_abapgit_object~deserialize. * see fm SSF_UPLOAD_STYLE - TYPES temp1 TYPE TABLE OF ssfparas. -TYPES temp2 TYPE TABLE OF ssfstrings. -TYPES temp3 TYPE TABLE OF stxstab. -DATA: ls_header TYPE ssfcats, + DATA: ls_header TYPE ssfcats, ls_new_header TYPE ssfcats, - lt_paragraphs TYPE temp1, - lt_strings TYPE temp2, - lt_tabstops TYPE temp3. + lt_paragraphs TYPE TABLE OF ssfparas, + lt_strings TYPE TABLE OF ssfstrings, + lt_tabstops TYPE TABLE OF stxstab. FIELD-SYMBOLS: TYPE spras. @@ -151,9 +148,7 @@ DATA: ls_header TYPE ssfcats, WHERE active = c_style_active AND stylename = ms_item-obj_name AND vari = ''. - DATA temp1 TYPE xsdboolean. - temp1 = boolc( sy-subrc = 0 ). - rv_bool = temp1. + rv_bool = xsdbool( sy-subrc = 0 ). ENDMETHOD. @@ -191,9 +186,8 @@ DATA: ls_header TYPE ssfcats, METHOD zif_abapgit_object~jump. - TYPES temp4 TYPE STANDARD TABLE OF bdcdata. -DATA: ls_bcdata TYPE bdcdata, - lt_bcdata TYPE temp4. + DATA: ls_bcdata TYPE bdcdata, + lt_bcdata TYPE STANDARD TABLE OF bdcdata. ls_bcdata-program = 'SAPMSSFS'. ls_bcdata-dynpro = '0100'. @@ -232,14 +226,11 @@ DATA: ls_bcdata TYPE bdcdata, METHOD zif_abapgit_object~serialize. * see fm SSF_DOWNLOAD_STYLE - TYPES temp5 TYPE TABLE OF ssfparas. -TYPES temp4 TYPE TABLE OF ssfstrings. -TYPES temp6 TYPE TABLE OF stxstab. -DATA: lv_style_name TYPE tdssname, + DATA: lv_style_name TYPE tdssname, ls_header TYPE ssfcats, - lt_paragraphs TYPE temp5, - lt_strings TYPE temp4, - lt_tabstops TYPE temp6. + lt_paragraphs TYPE TABLE OF ssfparas, + lt_strings TYPE TABLE OF ssfstrings, + lt_tabstops TYPE TABLE OF stxstab. lv_style_name = ms_item-obj_name. diff --git a/src/objects/zcl_abapgit_object_styl.clas.abap b/src/objects/zcl_abapgit_object_styl.clas.abap index 3474e649f..99c7af6a6 100644 --- a/src/objects/zcl_abapgit_object_styl.clas.abap +++ b/src/objects/zcl_abapgit_object_styl.clas.abap @@ -100,9 +100,7 @@ CLASS zcl_abapgit_object_styl IMPLEMENTATION. strings = ls_style-strings tabs = ls_style-tabs. - DATA temp1 TYPE xsdboolean. - temp1 = boolc( lv_found = abap_true ). - rv_bool = temp1. + rv_bool = xsdbool( lv_found = abap_true ). ENDMETHOD. diff --git a/src/objects/zcl_abapgit_object_sucu.clas.abap b/src/objects/zcl_abapgit_object_sucu.clas.abap index 4d7d28e91..5e21fab35 100644 --- a/src/objects/zcl_abapgit_object_sucu.clas.abap +++ b/src/objects/zcl_abapgit_object_sucu.clas.abap @@ -23,8 +23,8 @@ CLASS zcl_abapgit_object_sucu IMPLEMENTATION. METHOD get_generic. - CREATE OBJECT ro_generic EXPORTING is_item = ms_item - iv_language = mv_language. + ro_generic = NEW #( is_item = ms_item + iv_language = mv_language ). ENDMETHOD. diff --git a/src/objects/zcl_abapgit_object_susc.clas.abap b/src/objects/zcl_abapgit_object_susc.clas.abap index d71013c7d..fc54e138b 100644 --- a/src/objects/zcl_abapgit_object_susc.clas.abap +++ b/src/objects/zcl_abapgit_object_susc.clas.abap @@ -179,9 +179,7 @@ CLASS zcl_abapgit_object_susc IMPLEMENTATION. SELECT SINGLE oclss FROM tobc INTO lv_oclss WHERE oclss = ms_item-obj_name. - DATA temp1 TYPE xsdboolean. - temp1 = boolc( sy-subrc = 0 ). - rv_bool = temp1. + rv_bool = xsdbool( sy-subrc = 0 ). ENDMETHOD. diff --git a/src/objects/zcl_abapgit_object_sush.clas.abap b/src/objects/zcl_abapgit_object_sush.clas.abap index 1023f912f..27c50e5bc 100644 --- a/src/objects/zcl_abapgit_object_sush.clas.abap +++ b/src/objects/zcl_abapgit_object_sush.clas.abap @@ -245,9 +245,7 @@ CLASS zcl_abapgit_object_sush IMPLEMENTATION. SELECT SINGLE * FROM usobhash INTO ls_usobhash "#EC CI_ALL_FIELDS_NEEDED WHERE name = ms_item-obj_name. "#EC CI_SGLSELECT - DATA temp1 TYPE xsdboolean. - temp1 = boolc( sy-subrc = 0 ). - rv_bool = temp1. + rv_bool = xsdbool( sy-subrc = 0 ). ENDMETHOD. diff --git a/src/objects/zcl_abapgit_object_suso.clas.abap b/src/objects/zcl_abapgit_object_suso.clas.abap index 8e8915d99..1cc41d1ff 100644 --- a/src/objects/zcl_abapgit_object_suso.clas.abap +++ b/src/objects/zcl_abapgit_object_suso.clas.abap @@ -164,11 +164,9 @@ CLASS zcl_abapgit_object_suso IMPLEMENTATION. METHOD regenerate_sap_all. - TYPES temp1 TYPE STANDARD TABLE OF e071. -TYPES temp2 TYPE STANDARD TABLE OF e071k. -DATA: ls_e071 TYPE e071, - lt_e071 TYPE temp1, - lt_e071k TYPE temp2. + DATA: ls_e071 TYPE e071, + lt_e071 TYPE STANDARD TABLE OF e071, + lt_e071k TYPE STANDARD TABLE OF e071k. ls_e071-pgmid = 'R3TR'. ls_e071-object = ms_item-obj_type. @@ -228,16 +226,13 @@ DATA: ls_e071 TYPE e071, METHOD zif_abapgit_object~deserialize. * see function group SUSA - TYPES temp3 TYPE TABLE OF tactz. -TYPES temp4 TYPE TABLE OF tobjvordat. -TYPES temp1 TYPE TABLE OF tobjvor. -DATA: lv_objectname TYPE trobj_name, + DATA: lv_objectname TYPE trobj_name, ls_tobj TYPE tobj, ls_tobjt TYPE tobjt, ls_tobjvorflg TYPE tobjvorflg, - lt_tactz TYPE temp3, - lt_tobjvordat TYPE temp4, - lt_tobjvor TYPE temp1. + lt_tactz TYPE TABLE OF tactz, + lt_tobjvordat TYPE TABLE OF tobjvordat, + lt_tobjvor TYPE TABLE OF tobjvor. ASSERT NOT ms_item-obj_name IS INITIAL. @@ -291,9 +286,7 @@ DATA: lv_objectname TYPE trobj_name, SELECT SINGLE objct FROM tobj INTO lv_objct WHERE objct = ms_item-obj_name. - DATA temp1 TYPE xsdboolean. - temp1 = boolc( sy-subrc = 0 ). - rv_bool = temp1. + rv_bool = xsdbool( sy-subrc = 0 ). ENDMETHOD. @@ -353,15 +346,12 @@ DATA: lv_objectname TYPE trobj_name, METHOD zif_abapgit_object~serialize. - TYPES temp6 TYPE TABLE OF tactz. -TYPES temp7 TYPE TABLE OF tobjvordat. -TYPES temp2 TYPE TABLE OF tobjvor. -DATA: ls_tobj TYPE tobj, + DATA: ls_tobj TYPE tobj, ls_tobjt TYPE tobjt, ls_tobjvorflg TYPE tobjvorflg, - lt_tactz TYPE temp6, - lt_tobjvordat TYPE temp7, - lt_tobjvor TYPE temp2. + lt_tactz TYPE TABLE OF tactz, + lt_tobjvordat TYPE TABLE OF tobjvordat, + lt_tobjvor TYPE TABLE OF tobjvor. SELECT SINGLE * FROM tobj INTO ls_tobj diff --git a/src/objects/zcl_abapgit_object_sxci.clas.abap b/src/objects/zcl_abapgit_object_sxci.clas.abap index c91e1580f..8cf43045c 100644 --- a/src/objects/zcl_abapgit_object_sxci.clas.abap +++ b/src/objects/zcl_abapgit_object_sxci.clas.abap @@ -86,8 +86,8 @@ CLASS zcl_abapgit_object_sxci IMPLEMENTATION. lv_package = iv_package. - CREATE OBJECT lo_filter_values_object EXPORTING filter_object = lo_filter_object - filter_values = ls_classic_badi_implementation-filters. + lo_filter_values_object = NEW #( filter_object = lo_filter_object + filter_values = ls_classic_badi_implementation-filters ). CALL FUNCTION 'SXO_IMPL_SAVE' EXPORTING @@ -148,9 +148,7 @@ CLASS zcl_abapgit_object_sxci IMPLEMENTATION. data_inconsistency = 2 OTHERS = 3. - DATA temp1 TYPE xsdboolean. - temp1 = boolc( sy-subrc = 0 ). - rv_bool = temp1. + rv_bool = xsdbool( sy-subrc = 0 ). ENDMETHOD. diff --git a/src/objects/zcl_abapgit_object_sxsd.clas.abap b/src/objects/zcl_abapgit_object_sxsd.clas.abap index f912755de..ad4f8b4c7 100644 --- a/src/objects/zcl_abapgit_object_sxsd.clas.abap +++ b/src/objects/zcl_abapgit_object_sxsd.clas.abap @@ -66,9 +66,7 @@ CLASS zcl_abapgit_object_sxsd IMPLEMENTATION. METHOD zif_abapgit_object~exists. - DATA temp1 TYPE xsdboolean. - temp1 = boolc( ms_badi_attr IS NOT INITIAL ). - rv_bool = temp1. + rv_bool = xsdbool( ms_badi_attr IS NOT INITIAL ). ENDMETHOD. diff --git a/src/objects/zcl_abapgit_object_tobj.clas.abap b/src/objects/zcl_abapgit_object_tobj.clas.abap index 98471c991..5d3454201 100644 --- a/src/objects/zcl_abapgit_object_tobj.clas.abap +++ b/src/objects/zcl_abapgit_object_tobj.clas.abap @@ -46,8 +46,7 @@ CLASS zcl_abapgit_object_tobj IMPLEMENTATION. METHOD update_extra. - TYPES temp1 TYPE STANDARD TABLE OF tvimf. -DATA: lt_current_tvimf TYPE temp1. + DATA: lt_current_tvimf TYPE STANDARD TABLE OF tvimf. FIELD-SYMBOLS: TYPE tvimf. MODIFY tddat FROM is_tobj-tddat. @@ -215,9 +214,7 @@ DATA: lt_current_tvimf TYPE temp1. SELECT SINGLE objectname FROM objh INTO lv_objectname WHERE objectname = ms_item-obj_name(lv_type_pos) AND objecttype = ms_item-obj_name+lv_type_pos. "#EC CI_GENBUFF - DATA temp1 TYPE xsdboolean. - temp1 = boolc( sy-subrc = 0 ). - rv_bool = temp1. + rv_bool = xsdbool( sy-subrc = 0 ). ENDMETHOD. @@ -267,9 +264,7 @@ DATA: lt_current_tvimf TYPE temp1. jump_not_possible = 1 OTHERS = 2. - DATA temp2 TYPE xsdboolean. - temp2 = boolc( sy-subrc = 0 ). - rv_exit = temp2. + rv_exit = xsdbool( sy-subrc = 0 ). ENDMETHOD. diff --git a/src/objects/zcl_abapgit_object_tran.clas.abap b/src/objects/zcl_abapgit_object_tran.clas.abap index 0aa6b8f60..23413baa0 100644 --- a/src/objects/zcl_abapgit_object_tran.clas.abap +++ b/src/objects/zcl_abapgit_object_tran.clas.abap @@ -35,9 +35,8 @@ CLASS zcl_abapgit_object_tran DEFINITION object TYPE rglif-docutype VALUE 'O' ##NO_TEXT, END OF c_variant_type. - TYPES temp1_15c4f683bb TYPE STANDARD TABLE OF bdcdata. -DATA: - mt_bcdata TYPE temp1_15c4f683bb . + DATA: + mt_bcdata TYPE STANDARD TABLE OF bdcdata . METHODS transaction_read IMPORTING @@ -123,8 +122,7 @@ CLASS zcl_abapgit_object_tran IMPLEMENTATION. METHOD call_se93. - TYPES temp2 TYPE STANDARD TABLE OF bdcmsgcoll. -DATA: lt_message TYPE temp2. + DATA: lt_message TYPE STANDARD TABLE OF bdcmsgcoll. DATA lv_msg TYPE string. FIELD-SYMBOLS: TYPE bdcmsgcoll. @@ -159,8 +157,7 @@ DATA: lt_message TYPE temp2. METHOD clear_functiongroup_globals. TYPES ty_param_vari TYPE abap_bool. - TYPES temp3 TYPE STANDARD TABLE OF rsmp_check WITH DEFAULT KEY. -DATA lt_error_list TYPE temp3. + DATA lt_error_list TYPE STANDARD TABLE OF rsmp_check WITH DEFAULT KEY. FIELD-SYMBOLS TYPE ty_param_vari. " only way to clear global fields in function group @@ -345,8 +342,7 @@ DATA lt_error_list TYPE temp3. METHOD deserialize_texts. - TYPES temp4 TYPE TABLE OF tstct. -DATA lt_tpool_i18n TYPE temp4. + DATA lt_tpool_i18n TYPE TABLE OF tstct. FIELD-SYMBOLS LIKE LINE OF lt_tpool_i18n. @@ -377,9 +373,7 @@ DATA lt_tpool_i18n TYPE temp4. METHOD is_variant_transaction. - DATA temp1 TYPE xsdboolean. - temp1 = boolc( is_tstcp-param(1) = '@' ). - rv_variant_transaction = temp1. + rv_variant_transaction = xsdbool( is_tstcp-param(1) = '@' ). ENDMETHOD. @@ -405,8 +399,7 @@ DATA lt_tpool_i18n TYPE temp4. METHOD serialize_texts. - TYPES temp5 TYPE TABLE OF tstct. -DATA lt_tpool_i18n TYPE temp5. + DATA lt_tpool_i18n TYPE TABLE OF tstct. IF mo_i18n_params->ms_params-main_language_only = abap_true. RETURN. @@ -610,10 +603,8 @@ DATA lt_tpool_i18n TYPE temp5. METHOD transaction_read. - TYPES temp6 TYPE TABLE OF tstc. -TYPES temp1 TYPE TABLE OF tstcc. -DATA: lt_tcodes TYPE temp6, - lt_gui_attr TYPE temp1. + DATA: lt_tcodes TYPE TABLE OF tstc, + lt_gui_attr TYPE TABLE OF tstcc. CLEAR: es_transaction, es_gui_attr. @@ -812,9 +803,7 @@ DATA: lt_tcodes TYPE temp6, SELECT SINGLE tcode FROM tstc INTO lv_tcode WHERE tcode = ms_item-obj_name. "#EC CI_GENBUFF - DATA temp2 TYPE xsdboolean. - temp2 = boolc( sy-subrc = 0 ). - rv_bool = temp2. + rv_bool = xsdbool( sy-subrc = 0 ). ENDMETHOD. @@ -853,8 +842,7 @@ DATA: lt_tcodes TYPE temp6, METHOD zif_abapgit_object~jump. - TYPES temp8 TYPE TABLE OF bdcdata. -DATA: lt_bdcdata TYPE temp8. + DATA: lt_bdcdata TYPE TABLE OF bdcdata. FIELD-SYMBOLS: LIKE LINE OF lt_bdcdata. diff --git a/src/objects/zcl_abapgit_object_tran.clas.testclasses.abap b/src/objects/zcl_abapgit_object_tran.clas.testclasses.abap index 12e234fbb..9bc9601b6 100644 --- a/src/objects/zcl_abapgit_object_tran.clas.testclasses.abap +++ b/src/objects/zcl_abapgit_object_tran.clas.testclasses.abap @@ -52,8 +52,8 @@ CLASS ltcl_split_parameters IMPLEMENTATION. ls_item-obj_name = 'ZDUMMY'. ls_item-obj_type = 'TRAN'. - CREATE OBJECT mo_cut EXPORTING is_item = ls_item - iv_language = sy-langu. + mo_cut = NEW #( is_item = ls_item + iv_language = sy-langu ). ENDMETHOD. diff --git a/src/objects/zcl_abapgit_object_ttyp.clas.abap b/src/objects/zcl_abapgit_object_ttyp.clas.abap index 04fc973bb..b19931b2c 100644 --- a/src/objects/zcl_abapgit_object_ttyp.clas.abap +++ b/src/objects/zcl_abapgit_object_ttyp.clas.abap @@ -105,9 +105,7 @@ CLASS zcl_abapgit_object_ttyp IMPLEMENTATION. SELECT SINGLE typename FROM dd40l INTO lv_typename WHERE typename = ms_item-obj_name. - DATA temp1 TYPE xsdboolean. - temp1 = boolc( sy-subrc = 0 ). - rv_bool = temp1. + rv_bool = xsdbool( sy-subrc = 0 ). ENDMETHOD. diff --git a/src/objects/zcl_abapgit_object_udmo.clas.abap b/src/objects/zcl_abapgit_object_udmo.clas.abap index 11ae7375e..32e5d1e62 100644 --- a/src/objects/zcl_abapgit_object_udmo.clas.abap +++ b/src/objects/zcl_abapgit_object_udmo.clas.abap @@ -219,8 +219,7 @@ CLASS zcl_abapgit_object_udmo IMPLEMENTATION. METHOD deserialize_entities. - TYPES temp1 TYPE STANDARD TABLE OF dm41s WITH DEFAULT KEY. -DATA lt_udmo_entities TYPE temp1. + DATA lt_udmo_entities TYPE STANDARD TABLE OF dm41s WITH DEFAULT KEY. DATA ls_udmo_entity LIKE LINE OF lt_udmo_entities. @@ -248,8 +247,7 @@ DATA lt_udmo_entities TYPE temp1. DATA content TYPE xstring. DATA END OF ls_udmo_long_text. - TYPES temp2 LIKE STANDARD TABLE OF ls_udmo_long_text. -DATA lt_udmo_long_texts TYPE temp2. + DATA lt_udmo_long_texts LIKE STANDARD TABLE OF ls_udmo_long_text. DATA ls_header TYPE thead. io_xml->read( EXPORTING iv_name = 'UDMO_LONG_TEXTS' @@ -327,8 +325,7 @@ DATA lt_udmo_long_texts TYPE temp2. METHOD deserialize_short_texts. - TYPES temp3 TYPE STANDARD TABLE OF ty_udmo_text_type WITH DEFAULT KEY. -DATA lt_udmo_texts TYPE temp3. + DATA lt_udmo_texts TYPE STANDARD TABLE OF ty_udmo_text_type WITH DEFAULT KEY. DATA ls_udmo_text TYPE ty_udmo_text_type. DATA ls_dm40t TYPE dm40t. @@ -408,8 +405,7 @@ DATA lt_udmo_texts TYPE temp3. METHOD serialize_entities. - TYPES temp4 TYPE STANDARD TABLE OF dm41s WITH DEFAULT KEY. -DATA lt_udmo_entities TYPE temp4. + DATA lt_udmo_entities TYPE STANDARD TABLE OF dm41s WITH DEFAULT KEY. FIELD-SYMBOLS TYPE dm41s. SELECT * FROM dm41s @@ -454,10 +450,8 @@ DATA lt_udmo_entities TYPE temp4. DATA content TYPE xstring. DATA END OF ls_udmo_long_text. - TYPES temp5 LIKE STANDARD TABLE OF ls_udmo_long_text. -DATA lt_udmo_long_texts TYPE temp5. - TYPES temp6 TYPE STANDARD TABLE OF ty_language_type. -DATA lt_udmo_languages TYPE temp6. + DATA lt_udmo_long_texts LIKE STANDARD TABLE OF ls_udmo_long_text. + DATA lt_udmo_languages TYPE STANDARD TABLE OF ty_language_type. DATA ls_udmo_language LIKE LINE OF lt_udmo_languages. DATA: lv_error_status TYPE lxestatprc. @@ -546,8 +540,7 @@ DATA lt_udmo_languages TYPE temp6. METHOD serialize_short_texts. - TYPES temp7 TYPE STANDARD TABLE OF ty_udmo_text_type WITH DEFAULT KEY. -DATA lt_udmo_texts TYPE temp7. + DATA lt_udmo_texts TYPE STANDARD TABLE OF ty_udmo_text_type WITH DEFAULT KEY. " You are reminded that administrative information, such as last changed by user, date, time is not serialized. " You are reminded that active short texts of all (existent) languages are serialized. @@ -673,9 +666,7 @@ DATA lt_udmo_texts TYPE temp7. SELECT COUNT( * ) FROM dm40l WHERE dmoid = mv_data_model AND as4local = mv_activation_state. - DATA temp1 TYPE xsdboolean. - temp1 = boolc( sy-subrc = 0 ). - rv_bool = temp1. + rv_bool = xsdbool( sy-subrc = 0 ). @@ -722,8 +713,7 @@ DATA lt_udmo_texts TYPE temp7. " CALL FUNCTION 'SDU_MODEL_SHOW' " CALL FUNCTION 'RS_TOOL_ACCESS' - TYPES temp8 TYPE TABLE OF bdcdata. -DATA lt_bdcdata TYPE temp8. + DATA lt_bdcdata TYPE TABLE OF bdcdata. FIELD-SYMBOLS: LIKE LINE OF lt_bdcdata. diff --git a/src/objects/zcl_abapgit_object_ueno.clas.abap b/src/objects/zcl_abapgit_object_ueno.clas.abap index 828785940..aaf5537f4 100644 --- a/src/objects/zcl_abapgit_object_ueno.clas.abap +++ b/src/objects/zcl_abapgit_object_ueno.clas.abap @@ -451,9 +451,9 @@ CLASS zcl_abapgit_object_ueno IMPLEMENTATION. METHOD get_generic. - CREATE OBJECT ro_generic EXPORTING io_field_rules = get_field_rules( ) - is_item = ms_item - iv_language = mv_language. + ro_generic = NEW #( io_field_rules = get_field_rules( ) + is_item = ms_item + iv_language = mv_language ). ENDMETHOD. diff --git a/src/objects/zcl_abapgit_object_vcls.clas.abap b/src/objects/zcl_abapgit_object_vcls.clas.abap index b917f2b38..d4806ea64 100644 --- a/src/objects/zcl_abapgit_object_vcls.clas.abap +++ b/src/objects/zcl_abapgit_object_vcls.clas.abap @@ -75,13 +75,10 @@ CLASS zcl_abapgit_object_vcls IMPLEMENTATION. METHOD zif_abapgit_object~deserialize. - TYPES temp1 TYPE TABLE OF v_vclstruc. -TYPES temp2 TYPE TABLE OF v_vclstdep. -TYPES temp3 TYPE TABLE OF v_vclmf. -DATA: ls_vcldir_entry TYPE v_vcldir, - lt_vclstruc TYPE temp1, - lt_vclstrudep TYPE temp2, - lt_vclmf TYPE temp3, + DATA: ls_vcldir_entry TYPE v_vcldir, + lt_vclstruc TYPE TABLE OF v_vclstruc, + lt_vclstrudep TYPE TABLE OF v_vclstdep, + lt_vclmf TYPE TABLE OF v_vclmf, lv_objectname TYPE ob_object. @@ -136,9 +133,7 @@ DATA: ls_vcldir_entry TYPE v_vcldir, SELECT SINGLE changedate INTO lv_changedate FROM vcldir WHERE vclname = ms_item-obj_name. - DATA temp1 TYPE xsdboolean. - temp1 = boolc( sy-subrc = 0 ). - rv_bool = temp1. + rv_bool = xsdbool( sy-subrc = 0 ). ENDMETHOD. @@ -171,9 +166,7 @@ DATA: ls_vcldir_entry TYPE v_vcldir, WHERE vclname = ms_item-obj_name. * see logic in function module VIEWCLUSTER_GET_DEFINITION - DATA temp2 TYPE xsdboolean. - temp2 = boolc( lv_changedate IS NOT INITIAL ). - rv_active = temp2. + rv_active = xsdbool( lv_changedate IS NOT INITIAL ). ENDMETHOD. @@ -207,9 +200,8 @@ DATA: ls_vcldir_entry TYPE v_vcldir, METHOD zif_abapgit_object~jump. - TYPES temp4 TYPE STANDARD TABLE OF bdcdata. -DATA: ls_bcdata TYPE bdcdata, - lt_bcdata TYPE temp4. + DATA: ls_bcdata TYPE bdcdata, + lt_bcdata TYPE STANDARD TABLE OF bdcdata. ls_bcdata-program = 'SAPMSVIM'. ls_bcdata-dynpro = '0050'. @@ -268,14 +260,11 @@ DATA: ls_bcdata TYPE bdcdata, METHOD zif_abapgit_object~serialize. - TYPES temp5 TYPE TABLE OF v_vclstruc. -TYPES temp4 TYPE TABLE OF v_vclstdep. -TYPES temp6 TYPE TABLE OF v_vclmf. -DATA: lv_vclname TYPE vcl_name, + DATA: lv_vclname TYPE vcl_name, ls_vcldir_entry TYPE v_vcldir, - lt_vclstruc TYPE temp5, - lt_vclstrudep TYPE temp4, - lt_vclmf TYPE temp6. + lt_vclstruc TYPE TABLE OF v_vclstruc, + lt_vclstrudep TYPE TABLE OF v_vclstdep, + lt_vclmf TYPE TABLE OF v_vclmf. IF zif_abapgit_object~exists( ) = abap_false. diff --git a/src/objects/zcl_abapgit_object_view.clas.abap b/src/objects/zcl_abapgit_object_view.clas.abap index b71b23cec..c455762d6 100644 --- a/src/objects/zcl_abapgit_object_view.clas.abap +++ b/src/objects/zcl_abapgit_object_view.clas.abap @@ -105,10 +105,9 @@ CLASS zcl_abapgit_object_view IMPLEMENTATION. METHOD deserialize_texts. - TYPES temp1 TYPE TABLE OF langu. -DATA: + DATA: lv_name TYPE ddobjname, - lt_i18n_langs TYPE temp1, + lt_i18n_langs TYPE TABLE OF langu, lt_dd25_texts TYPE ty_dd25_texts, ls_dd25v_tmp TYPE dd25v. @@ -160,10 +159,9 @@ DATA: METHOD insert_transport. - TYPES temp2 TYPE TABLE OF tddat. -DATA: + DATA: ls_key TYPE tddat, - lt_keys TYPE temp2. + lt_keys TYPE TABLE OF tddat. IF iv_transport IS INITIAL. RETURN. @@ -221,12 +219,11 @@ DATA: METHOD serialize_texts. - TYPES temp3 TYPE TABLE OF langu. -DATA: + DATA: lv_index TYPE i, ls_dd25v TYPE dd25v, lt_dd25_texts TYPE ty_dd25_texts, - lt_i18n_langs TYPE temp3, + lt_i18n_langs TYPE TABLE OF langu, lt_language_filter TYPE zif_abapgit_environment=>ty_system_language_filter. FIELD-SYMBOLS: @@ -336,17 +333,13 @@ DATA: METHOD zif_abapgit_object~deserialize. - TYPES temp4 TYPE TABLE OF dd26v. -TYPES temp1 TYPE TABLE OF dd27p. -TYPES temp2 TYPE TABLE OF dd28j. -TYPES temp3 TYPE TABLE OF dd28v. -DATA: lv_name TYPE ddobjname, + DATA: lv_name TYPE ddobjname, ls_dd25v TYPE dd25v, ls_dd09l TYPE dd09l, - lt_dd26v TYPE temp4, - lt_dd27p TYPE temp1, - lt_dd28j TYPE temp2, - lt_dd28v TYPE temp3, + lt_dd26v TYPE TABLE OF dd26v, + lt_dd27p TYPE TABLE OF dd27p, + lt_dd28j TYPE TABLE OF dd28j, + lt_dd28v TYPE TABLE OF dd28v, ls_extras TYPE zif_abapgit_object_tabl=>ty_internal-extras. FIELD-SYMBOLS: LIKE LINE OF lt_dd27p. @@ -429,9 +422,7 @@ DATA: lv_name TYPE ddobjname, SELECT SINGLE viewname FROM dd25l INTO lv_viewname WHERE viewname = ms_item-obj_name. - DATA temp1 TYPE xsdboolean. - temp1 = boolc( sy-subrc = 0 ). - rv_bool = temp1. + rv_bool = xsdbool( sy-subrc = 0 ). IF rv_bool = abap_true. TRY. diff --git a/src/objects/zcl_abapgit_object_wapa.clas.abap b/src/objects/zcl_abapgit_object_wapa.clas.abap index a8e680980..0a17d79f3 100644 --- a/src/objects/zcl_abapgit_object_wapa.clas.abap +++ b/src/objects/zcl_abapgit_object_wapa.clas.abap @@ -270,9 +270,8 @@ CLASS zcl_abapgit_object_wapa IMPLEMENTATION. METHOD zif_abapgit_object~changed_by. - TYPES temp1 TYPE STANDARD TABLE OF o2pagdir WITH DEFAULT KEY. -DATA: lv_name TYPE o2applname, - lt_pages TYPE temp1, + DATA: lv_name TYPE o2applname, + lt_pages TYPE STANDARD TABLE OF o2pagdir WITH DEFAULT KEY, ls_latest LIKE LINE OF lt_pages. @@ -545,9 +544,7 @@ DATA: lv_name TYPE o2applname, object_not_existing = 1 permission_failure = 2 error_occured = 3 ). - DATA temp1 TYPE xsdboolean. - temp1 = boolc( sy-subrc = 0 ). - rv_bool = temp1. + rv_bool = xsdbool( sy-subrc = 0 ). ENDMETHOD. diff --git a/src/objects/zcl_abapgit_object_wdca.clas.abap b/src/objects/zcl_abapgit_object_wdca.clas.abap index 316b07dab..790849cac 100644 --- a/src/objects/zcl_abapgit_object_wdca.clas.abap +++ b/src/objects/zcl_abapgit_object_wdca.clas.abap @@ -68,8 +68,8 @@ CLASS zcl_abapgit_object_wdca IMPLEMENTATION. ls_key = ms_item-obj_name. TRY. - CREATE OBJECT lo_cfg EXPORTING config_key = ls_key - object_name = lv_name. + lo_cfg = NEW #( config_key = ls_key + object_name = lv_name ). MOVE-CORRESPONDING ls_key TO ls_outline. @@ -128,8 +128,8 @@ CLASS zcl_abapgit_object_wdca IMPLEMENTATION. ls_key = ms_item-obj_name. TRY. - CREATE OBJECT lo_cfg EXPORTING config_key = ls_key - object_name = lv_name. + lo_cfg = NEW #( config_key = ls_key + object_name = lv_name ). MOVE-CORRESPONDING ls_key TO es_outline. @@ -184,8 +184,8 @@ CLASS zcl_abapgit_object_wdca IMPLEMENTATION. MOVE-CORRESPONDING is_outline TO ls_key. TRY. - CREATE OBJECT lo_cfg EXPORTING config_key = ls_key - object_name = lv_name. + lo_cfg = NEW #( config_key = ls_key + object_name = lv_name ). READ TABLE it_data INDEX 1 INTO ls_data. ASSERT sy-subrc = 0. @@ -256,10 +256,9 @@ CLASS zcl_abapgit_object_wdca IMPLEMENTATION. METHOD zif_abapgit_object~deserialize. - TYPES temp1 TYPE TABLE OF wdy_config_appt. -DATA: ls_outline TYPE wdy_cfg_outline_data, + DATA: ls_outline TYPE wdy_cfg_outline_data, lt_data TYPE wdy_cfg_persist_data_appl_tab, - lt_config_appt TYPE temp1, + lt_config_appt TYPE TABLE OF wdy_config_appt, lv_xml_string TYPE string, lv_xml_xstring TYPE xstring. @@ -330,9 +329,7 @@ DATA: ls_outline TYPE wdy_cfg_outline_data, WHERE config_id = ls_wdy_config_key-config_id AND config_type = ls_wdy_config_key-config_type AND config_var = ls_wdy_config_key-config_var. "#EC CI_GENBUFF - DATA temp1 TYPE xsdboolean. - temp1 = boolc( sy-subrc = 0 ). - rv_bool = temp1. + rv_bool = xsdbool( sy-subrc = 0 ). ENDMETHOD. @@ -383,10 +380,9 @@ DATA: ls_outline TYPE wdy_cfg_outline_data, METHOD zif_abapgit_object~serialize. - TYPES temp2 TYPE TABLE OF wdy_config_appt. -DATA: ls_outline TYPE wdy_cfg_outline_data, + DATA: ls_outline TYPE wdy_cfg_outline_data, lt_data TYPE wdy_cfg_persist_data_appl_tab, - lt_cc_text TYPE temp2, + lt_cc_text TYPE TABLE OF wdy_config_appt, lv_xml_xstring TYPE xstring, lv_xml_string TYPE string. diff --git a/src/objects/zcl_abapgit_object_wdcc.clas.abap b/src/objects/zcl_abapgit_object_wdcc.clas.abap index ff59c34b4..374b8282f 100644 --- a/src/objects/zcl_abapgit_object_wdcc.clas.abap +++ b/src/objects/zcl_abapgit_object_wdcc.clas.abap @@ -69,14 +69,12 @@ CLASS zcl_abapgit_object_wdcc IMPLEMENTATION. METHOD zif_abapgit_object~deserialize. - TYPES temp1 TYPE TABLE OF wdy_config_compt. -TYPES temp2 TYPE TABLE OF wdy_config_datt. -DATA: lv_config_id TYPE c LENGTH 32, + DATA: lv_config_id TYPE c LENGTH 32, lv_config_type TYPE n LENGTH 2, lv_config_var TYPE c LENGTH 6, - lt_otr_texts TYPE temp1, + lt_otr_texts TYPE TABLE OF wdy_config_compt, ls_orig_config TYPE wdy_config_data, - lt_config_datt TYPE temp2, + lt_config_datt TYPE TABLE OF wdy_config_datt, lv_xml_string TYPE string, lv_xml_xstring TYPE xstring. @@ -289,8 +287,7 @@ DATA: lv_config_id TYPE c LENGTH 32, METHOD zif_abapgit_object~is_locked. - TYPES temp3 TYPE STANDARD TABLE OF seqg3. -DATA: lt_enq TYPE temp3, + DATA: lt_enq TYPE STANDARD TABLE OF seqg3, lv_subrc TYPE sysubrc, lv_garg TYPE eqegraarg. @@ -312,9 +309,7 @@ DATA: lt_enq TYPE temp3, zcx_abapgit_exception=>raise( 'Error check object lock WDCC: ' && ms_item-obj_name ). ENDIF. - DATA temp1 TYPE xsdboolean. - temp1 = boolc( lines( lt_enq ) > 0 ). - rv_is_locked = temp1. + rv_is_locked = xsdbool( lines( lt_enq ) > 0 ). ENDMETHOD. @@ -336,11 +331,9 @@ DATA: lt_enq TYPE temp3, METHOD zif_abapgit_object~serialize. - TYPES temp4 TYPE TABLE OF wdy_config_compt. -TYPES temp3 TYPE TABLE OF wdy_config_datt. -DATA: lv_xml_xstring TYPE xstring, - lt_otr_texts TYPE temp4, - lt_cc_text TYPE temp3, + DATA: lv_xml_xstring TYPE xstring, + lt_otr_texts TYPE TABLE OF wdy_config_compt, + lt_cc_text TYPE TABLE OF wdy_config_datt, ls_orig_config TYPE wdy_config_data, ls_outline TYPE wdy_cfg_outline_data, ls_config_key TYPE wdy_config_key, diff --git a/src/objects/zcl_abapgit_object_wdya.clas.abap b/src/objects/zcl_abapgit_object_wdya.clas.abap index 79edc8961..61b1ca489 100644 --- a/src/objects/zcl_abapgit_object_wdya.clas.abap +++ b/src/objects/zcl_abapgit_object_wdya.clas.abap @@ -72,9 +72,9 @@ CLASS ZCL_ABAPGIT_OBJECT_WDYA IMPLEMENTATION. TRY. - CREATE OBJECT lo_app EXPORTING name = is_app-application_name - definition = is_app - devclass = iv_package. + lo_app = NEW #( name = is_app-application_name + definition = is_app + devclass = iv_package ). LOOP AT it_properties ASSIGNING . li_prop = lo_app->if_wdy_md_application~create_property( -name ). diff --git a/src/objects/zcl_abapgit_object_wdyn.clas.abap b/src/objects/zcl_abapgit_object_wdyn.clas.abap index bcd1f0aec..62e7ebf16 100644 --- a/src/objects/zcl_abapgit_object_wdyn.clas.abap +++ b/src/objects/zcl_abapgit_object_wdyn.clas.abap @@ -14,11 +14,9 @@ CLASS zcl_abapgit_object_wdyn DEFINITION CONSTANTS c_longtext_id_wd TYPE dokil-id VALUE 'WD' ##NO_TEXT. CONSTANTS c_longtext_name_wc TYPE string VALUE 'LONGTEXTS_WC' ##NO_TEXT. - TYPES temp1_cda9d1eaa8 TYPE TABLE OF wdy_ctlr_compo_vrs. -TYPES temp2_cda9d1eaa8 TYPE TABLE OF wdy_ctlr_compo_source_vrs. -DATA: - mt_components TYPE temp1_cda9d1eaa8, - mt_sources TYPE temp2_cda9d1eaa8. + DATA: + mt_components TYPE TABLE OF wdy_ctlr_compo_vrs, + mt_sources TYPE TABLE OF wdy_ctlr_compo_source_vrs. METHODS: get_limu_objects @@ -561,16 +559,11 @@ CLASS zcl_abapgit_object_wdyn IMPLEMENTATION. METHOD read_controller. - TYPES temp3 TYPE TABLE OF wdy_ctlr_compo_vrs. -TYPES temp4 TYPE TABLE OF wdy_ctlr_compo_source_vrs. -TYPES temp1 TYPE TABLE OF wdy_controller. -TYPES temp2 TYPE TABLE OF smodilog. -TYPES temp5 TYPE TABLE OF smodisrc. -DATA: lt_components TYPE temp3, - lt_sources TYPE temp4, - lt_definition TYPE temp1, - lt_psmodilog TYPE temp2, - lt_psmodisrc TYPE temp5, + DATA: lt_components TYPE TABLE OF wdy_ctlr_compo_vrs, + lt_sources TYPE TABLE OF wdy_ctlr_compo_source_vrs, + lt_definition TYPE TABLE OF wdy_controller, + lt_psmodilog TYPE TABLE OF smodilog, + lt_psmodisrc TYPE TABLE OF smodisrc, lt_fm_param TYPE abap_func_parmbind_tab, lt_fm_exception TYPE abap_func_excpbind_tab. @@ -678,12 +671,9 @@ DATA: lt_components TYPE temp3, METHOD read_definition. - TYPES temp8 TYPE TABLE OF wdy_component. -TYPES temp9 TYPE TABLE OF smodilog. -TYPES temp6 TYPE TABLE OF smodisrc. -DATA: lt_definition TYPE temp8, - lt_psmodilog TYPE temp9, - lt_psmodisrc TYPE temp6. + DATA: lt_definition TYPE TABLE OF wdy_component, + lt_psmodilog TYPE TABLE OF smodilog, + lt_psmodisrc TYPE TABLE OF smodisrc. CALL FUNCTION 'WDYD_GET_OBJECT' @@ -726,12 +716,9 @@ DATA: lt_definition TYPE temp8, METHOD read_view. - TYPES temp11 TYPE TABLE OF wdy_view_vrs. -TYPES temp12 TYPE TABLE OF smodilog. -TYPES temp7 TYPE TABLE OF smodisrc. -DATA: lt_definition TYPE temp11, - lt_psmodilog TYPE temp12, - lt_psmodisrc TYPE temp7. + DATA: lt_definition TYPE TABLE OF wdy_view_vrs, + lt_psmodilog TYPE TABLE OF smodilog, + lt_psmodisrc TYPE TABLE OF smodisrc. FIELD-SYMBOLS: LIKE LINE OF lt_definition. @@ -918,12 +905,12 @@ DATA: lt_definition TYPE temp11, lv_object_name TYPE seu_objkey. - CREATE OBJECT lo_component. + lo_component = NEW #( ). lv_object_name = ms_item-obj_name. - CREATE OBJECT lo_request EXPORTING p_object_type = 'YC' - p_object_name = lv_object_name - p_operation = swbm_c_op_delete_no_dialog. + lo_request = NEW #( p_object_type = 'YC' + p_object_name = lv_object_name + p_operation = swbm_c_op_delete_no_dialog ). lo_component->if_wb_program~process_wb_request( p_wb_request = lo_request @@ -992,9 +979,7 @@ DATA: lt_definition TYPE temp11, SELECT SINGLE component_name FROM wdy_component INTO lv_component_name WHERE component_name = ms_item-obj_name. "#EC CI_GENBUFF - DATA temp1 TYPE xsdboolean. - temp1 = boolc( sy-subrc = 0 ). - rv_bool = temp1. + rv_bool = xsdbool( sy-subrc = 0 ). ENDMETHOD. @@ -1046,13 +1031,11 @@ DATA: lt_definition TYPE temp11, METHOD zif_abapgit_object~serialize. - TYPES temp14 TYPE STANDARD TABLE OF dokil-object WITH DEFAULT KEY. -TYPES temp15 TYPE STANDARD TABLE OF dokil WITH DEFAULT KEY. -DATA: ls_component TYPE wdy_component_metadata, + DATA: ls_component TYPE wdy_component_metadata, ls_comp TYPE wdy_ctlr_compo_vrs, lv_object TYPE dokil-object, - lt_object TYPE temp14, - lt_dokil TYPE temp15, + lt_object TYPE STANDARD TABLE OF dokil-object WITH DEFAULT KEY, + lt_dokil TYPE STANDARD TABLE OF dokil WITH DEFAULT KEY, ls_description TYPE wdy_ext_ctx_map. ls_component = read( ). diff --git a/src/objects/zcl_abapgit_object_webi.clas.abap b/src/objects/zcl_abapgit_object_webi.clas.abap index 651d93814..7389d499e 100644 --- a/src/objects/zcl_abapgit_object_webi.clas.abap +++ b/src/objects/zcl_abapgit_object_webi.clas.abap @@ -360,7 +360,7 @@ CLASS ZCL_ABAPGIT_OBJECT_WEBI IMPLEMENTATION. lv_name = ms_item-obj_name. - CREATE OBJECT lo_vif. + lo_vif = NEW #( ). TRY. lo_vif->if_ws_md_vif_root~delete_virtual_interface( lv_name ). CATCH cx_ws_md_exception. diff --git a/src/objects/zcl_abapgit_object_xinx.clas.abap b/src/objects/zcl_abapgit_object_xinx.clas.abap index 9b312582a..0c9c9fd2d 100644 --- a/src/objects/zcl_abapgit_object_xinx.clas.abap +++ b/src/objects/zcl_abapgit_object_xinx.clas.abap @@ -321,9 +321,7 @@ CLASS zcl_abapgit_object_xinx IMPLEMENTATION. zcx_abapgit_exception=>raise( 'Error reading index' ). ENDIF. - DATA temp1 TYPE xsdboolean. - temp1 = boolc( ls_dd12v IS NOT INITIAL ). - rv_bool = temp1. + rv_bool = xsdbool( ls_dd12v IS NOT INITIAL ). ENDMETHOD. diff --git a/src/objects/zcl_abapgit_object_xslt.clas.abap b/src/objects/zcl_abapgit_object_xslt.clas.abap index 929fd2a6f..6a4ce4d64 100644 --- a/src/objects/zcl_abapgit_object_xslt.clas.abap +++ b/src/objects/zcl_abapgit_object_xslt.clas.abap @@ -174,9 +174,7 @@ CLASS zcl_abapgit_object_xslt IMPLEMENTATION. lv_name = ms_item-obj_name. rv_bool = cl_o2_api_xsltdesc=>exists( lv_name ). - DATA temp1 TYPE xsdboolean. - temp1 = boolc( rv_bool = '1' ). - rv_bool = temp1. + rv_bool = xsdbool( rv_bool = '1' ). ENDMETHOD. diff --git a/src/objects/zcl_abapgit_objects.clas.abap b/src/objects/zcl_abapgit_objects.clas.abap index 32b3cdad9..3b5f42c17 100644 --- a/src/objects/zcl_abapgit_objects.clas.abap +++ b/src/objects/zcl_abapgit_objects.clas.abap @@ -265,11 +265,10 @@ CLASS zcl_abapgit_objects IMPLEMENTATION. METHOD check_duplicates. - TYPES temp1 TYPE STANDARD TABLE OF string WITH DEFAULT KEY. -DATA: lt_files TYPE zif_abapgit_git_definitions=>ty_files_tt, + DATA: lt_files TYPE zif_abapgit_git_definitions=>ty_files_tt, lv_path TYPE string, lv_filename TYPE string, - lt_duplicates TYPE temp1, + lt_duplicates TYPE STANDARD TABLE OF string WITH DEFAULT KEY, lv_duplicates LIKE LINE OF lt_duplicates, lv_all_duplicates TYPE string. @@ -415,8 +414,8 @@ DATA: lt_files TYPE zif_abapgit_git_definitions=>ty_files_tt, RETURN. ENDIF. - CREATE OBJECT li_remote_version TYPE zcl_abapgit_xml_input EXPORTING iv_xml = zcl_abapgit_convert=>xstring_to_string_utf8( ls_remote_file-data ) - iv_filename = ls_remote_file-filename. + li_remote_version = NEW zcl_abapgit_xml_input( iv_xml = zcl_abapgit_convert=>xstring_to_string_utf8( ls_remote_file-data ) + iv_filename = ls_remote_file-filename ). ls_result = li_comparator->compare( ii_remote = li_remote_version ii_log = ii_log ). @@ -509,11 +508,11 @@ DATA: lt_files TYPE zif_abapgit_git_definitions=>ty_files_tt, IF iv_native_only = abap_false. TRY. " 2nd step, try looking for plugins IF io_files IS BOUND AND io_i18n_params IS BOUND. - CREATE OBJECT ri_obj TYPE zcl_abapgit_objects_bridge EXPORTING is_item = is_item - io_files = io_files - io_i18n_params = io_i18n_params. + ri_obj = NEW zcl_abapgit_objects_bridge( is_item = is_item + io_files = io_files + io_i18n_params = io_i18n_params ). ELSE. - CREATE OBJECT ri_obj TYPE zcl_abapgit_objects_bridge EXPORTING is_item = is_item. + ri_obj = NEW zcl_abapgit_objects_bridge( is_item = is_item ). ENDIF. CATCH cx_sy_create_object_error. zcx_abapgit_exception=>raise( lv_message ). @@ -725,7 +724,7 @@ DATA: lt_files TYPE zif_abapgit_git_definitions=>ty_files_tt, ii_log->add_info( |>>> Deserializing { lines( lt_items ) } objects| ). ENDIF. - CREATE OBJECT lo_abap_language_vers EXPORTING io_dot_abapgit = lo_dot. + lo_abap_language_vers = NEW #( io_dot_abapgit = lo_dot ). lo_folder_logic = zcl_abapgit_folder_logic=>get_instance( ). LOOP AT lt_results ASSIGNING . @@ -1208,16 +1207,14 @@ DATA: lt_files TYPE zif_abapgit_git_definitions=>ty_files_tt, io_files = lo_files io_i18n_params = io_i18n_params ). - CREATE OBJECT li_xml TYPE zcl_abapgit_xml_output. + li_xml = NEW zcl_abapgit_xml_output( ). rs_files_and_item-item = is_item. TRY. li_obj->serialize( li_xml ). CATCH zcx_abapgit_exception INTO lx_error. - DATA temp1 TYPE xsdboolean. - temp1 = boolc( li_obj->is_active( ) = abap_false ). - rs_files_and_item-item-inactive = temp1. + rs_files_and_item-item-inactive = xsdbool( li_obj->is_active( ) = abap_false ). RAISE EXCEPTION lx_error. ENDTRY. @@ -1240,9 +1237,7 @@ DATA: lt_files TYPE zif_abapgit_git_definitions=>ty_files_tt, check_duplicates( rs_files_and_item-files ). - DATA temp2 TYPE xsdboolean. - temp2 = boolc( li_obj->is_active( ) = abap_false ). - rs_files_and_item-item-inactive = temp2. + rs_files_and_item-item-inactive = xsdbool( li_obj->is_active( ) = abap_false ). LOOP AT rs_files_and_item-files ASSIGNING . -sha1 = zcl_abapgit_hash=>sha1_blob( -data ). @@ -1253,8 +1248,7 @@ DATA: lt_files TYPE zif_abapgit_git_definitions=>ty_files_tt, METHOD supported_list. - TYPES temp2 TYPE STANDARD TABLE OF ko100. -DATA lt_objects TYPE temp2. + DATA lt_objects TYPE STANDARD TABLE OF ko100. DATA ls_item TYPE zif_abapgit_definitions=>ty_item. DATA ls_supported_obj_type TYPE ty_supported_types. DATA lt_types TYPE zif_abapgit_exit=>ty_object_types. diff --git a/src/objects/zcl_abapgit_objects.clas.testclasses.abap b/src/objects/zcl_abapgit_objects.clas.testclasses.abap index 3bf6283f5..18423238f 100644 --- a/src/objects/zcl_abapgit_objects.clas.testclasses.abap +++ b/src/objects/zcl_abapgit_objects.clas.testclasses.abap @@ -73,7 +73,7 @@ CLASS lcl_settings_with_features IMPLEMENTATION. METHOD zif_abapgit_persist_settings~read. - CREATE OBJECT ro_settings. + ro_settings = NEW #( ). ro_settings->set_experimental_features( mv_features ). ENDMETHOD. @@ -209,7 +209,7 @@ CLASS ltcl_serialize IMPLEMENTATION. ls_item-obj_name = 'IF_BADI_TADIR_CHANGED'. lv_features = |{ zcl_abapgit_aff_registry=>c_aff_feature }, { zcl_abapgit_properties_file=>c_properties_feature }|. - CREATE OBJECT lo_settings EXPORTING iv_features = lv_features. + lo_settings = NEW #( iv_features = lv_features ). zcl_abapgit_persist_injector=>set_settings( lo_settings ). diff --git a/src/objects/zcl_abapgit_objects_factory.clas.abap b/src/objects/zcl_abapgit_objects_factory.clas.abap index 11a781863..08568a6e8 100644 --- a/src/objects/zcl_abapgit_objects_factory.clas.abap +++ b/src/objects/zcl_abapgit_objects_factory.clas.abap @@ -21,7 +21,7 @@ CLASS ZCL_ABAPGIT_OBJECTS_FACTORY IMPLEMENTATION. METHOD get_gui_jumper. IF gi_gui_jumper IS INITIAL. - CREATE OBJECT gi_gui_jumper TYPE zcl_abapgit_gui_jumper. + gi_gui_jumper = NEW zcl_abapgit_gui_jumper( ). ENDIF. ri_gui_jumper = gi_gui_jumper. diff --git a/src/objects/zcl_abapgit_objects_generic.clas.abap b/src/objects/zcl_abapgit_objects_generic.clas.abap index 6e1070f06..5bf46ed22 100644 --- a/src/objects/zcl_abapgit_objects_generic.clas.abap +++ b/src/objects/zcl_abapgit_objects_generic.clas.abap @@ -43,12 +43,10 @@ CLASS zcl_abapgit_objects_generic DEFINITION ty_t_objkey TYPE SORTED TABLE OF ty_s_objkey WITH UNIQUE KEY num . DATA ms_object_header TYPE objh . - TYPES temp1_c6f892cf3d TYPE STANDARD TABLE OF objsl WITH DEFAULT KEY. -DATA: - mt_object_table TYPE temp1_c6f892cf3d . - TYPES temp2_c6f892cf3d TYPE STANDARD TABLE OF objm WITH DEFAULT KEY. -DATA: - mt_object_method TYPE temp2_c6f892cf3d . + DATA: + mt_object_table TYPE STANDARD TABLE OF objsl WITH DEFAULT KEY . + DATA: + mt_object_method TYPE STANDARD TABLE OF objm WITH DEFAULT KEY . DATA ms_item TYPE zif_abapgit_definitions=>ty_item . DATA mv_language TYPE spras . @@ -132,11 +130,9 @@ CLASS zcl_abapgit_objects_generic IMPLEMENTATION. METHOD after_import. - TYPES temp3 TYPE STANDARD TABLE OF e071 WITH DEFAULT KEY. -TYPES temp1 TYPE STANDARD TABLE OF e071k WITH DEFAULT KEY. -DATA: lt_cts_object_entry TYPE temp3, + DATA: lt_cts_object_entry TYPE STANDARD TABLE OF e071 WITH DEFAULT KEY, ls_cts_object_entry LIKE LINE OF lt_cts_object_entry, - lt_cts_key TYPE temp1. + lt_cts_key TYPE STANDARD TABLE OF e071k WITH DEFAULT KEY. FIELD-SYMBOLS LIKE LINE OF mt_object_method. @@ -188,11 +184,9 @@ DATA: lt_cts_object_entry TYPE temp3, METHOD before_export. - TYPES temp5 TYPE STANDARD TABLE OF e071 WITH DEFAULT KEY. -TYPES temp2 TYPE STANDARD TABLE OF e071k WITH DEFAULT KEY. -DATA: lt_cts_object_entry TYPE temp5, + DATA: lt_cts_object_entry TYPE STANDARD TABLE OF e071 WITH DEFAULT KEY, ls_cts_object_entry LIKE LINE OF lt_cts_object_entry, - lt_cts_key TYPE temp2, + lt_cts_key TYPE STANDARD TABLE OF e071k WITH DEFAULT KEY, lv_client TYPE trclient. FIELD-SYMBOLS LIKE LINE OF mt_object_method. @@ -428,9 +422,7 @@ DATA: lt_cts_object_entry TYPE temp5, ASSIGN lr_table_line->* TO . SELECT SINGLE * FROM (lv_primary) INTO WHERE (lv_where_clause). - DATA temp1 TYPE xsdboolean. - temp1 = boolc( sy-dbcnt > 0 ). - rv_bool = temp1. + rv_bool = xsdbool( sy-dbcnt > 0 ). ENDMETHOD. diff --git a/src/objects/zcl_abapgit_objects_generic.clas.testclasses.abap b/src/objects/zcl_abapgit_objects_generic.clas.testclasses.abap index c4df28e9b..4dda78e06 100644 --- a/src/objects/zcl_abapgit_objects_generic.clas.testclasses.abap +++ b/src/objects/zcl_abapgit_objects_generic.clas.testclasses.abap @@ -28,9 +28,9 @@ CLASS ltcl_test IMPLEMENTATION. ls_item-obj_type = 'ASFC'. ls_item-obj_name = 'SAP_AS_TEST_001'. - CREATE OBJECT lo_cut EXPORTING is_item = ls_item. + lo_cut = NEW #( is_item = ls_item ). - CREATE OBJECT li_xml TYPE zcl_abapgit_xml_output. + li_xml = NEW zcl_abapgit_xml_output( ). lo_cut->serialize( li_xml ). * checks that it does not dump @@ -46,8 +46,8 @@ CLASS ltcl_test IMPLEMENTATION. ls_item-obj_type = 'ACGR'. ls_item-obj_name = 'SAP_BC_BASIS_ADMIN'. - CREATE OBJECT lo_cut EXPORTING is_item = ls_item - iv_language = zif_abapgit_definitions=>c_english. + lo_cut = NEW #( is_item = ls_item + iv_language = zif_abapgit_definitions=>c_english ). cl_abap_unit_assert=>assert_equals( exp = 'AGR_DEFINE' @@ -66,8 +66,8 @@ CLASS ltcl_test IMPLEMENTATION. ls_item-obj_type = 'ACGR'. ls_item-obj_name = 'SAP_BC_BASIS_ADMIN'. - CREATE OBJECT lo_cut EXPORTING is_item = ls_item - iv_language = zif_abapgit_definitions=>c_english. + lo_cut = NEW #( is_item = ls_item + iv_language = zif_abapgit_definitions=>c_english ). lt_key_fields = lo_cut->get_key_fields( 'AGR_HIER' ). @@ -92,8 +92,8 @@ CLASS ltcl_test IMPLEMENTATION. ls_item-obj_type = 'NSPC'. ls_item-obj_name = '/BIC/'. - CREATE OBJECT lo_cut EXPORTING is_item = ls_item - iv_language = zif_abapgit_definitions=>c_english. + lo_cut = NEW #( is_item = ls_item + iv_language = zif_abapgit_definitions=>c_english ). cl_abap_unit_assert=>assert_equals( exp = `NAMESPACE = '/BIC/'` @@ -120,8 +120,8 @@ CLASS ltcl_test IMPLEMENTATION. ls_item-obj_name+32 = '09'. ls_item-obj_name+34 = 'TEST'. - CREATE OBJECT lo_cut EXPORTING is_item = ls_item - iv_language = zif_abapgit_definitions=>c_english. + lo_cut = NEW #( is_item = ls_item + iv_language = zif_abapgit_definitions=>c_english ). lt_key_fields = lo_cut->get_key_fields( 'WDY_CONFIG_DATA' ). @@ -176,8 +176,8 @@ CLASS ltcl_test IMPLEMENTATION. ls_item-obj_type = 'ASFC'. ls_item-obj_name = 'SAP_AS_TEST_002'. - CREATE OBJECT lo_cut EXPORTING is_item = ls_item - iv_language = zif_abapgit_definitions=>c_english. + lo_cut = NEW #( is_item = ls_item + iv_language = zif_abapgit_definitions=>c_english ). lt_key_fields = lo_cut->get_key_fields( 'AIND_STR4' ). diff --git a/src/objects/zcl_abapgit_objects_program.clas.abap b/src/objects/zcl_abapgit_objects_program.clas.abap index 30acdb50c..73abbe033 100644 --- a/src/objects/zcl_abapgit_objects_program.clas.abap +++ b/src/objects/zcl_abapgit_objects_program.clas.abap @@ -321,12 +321,10 @@ CLASS zcl_abapgit_objects_program IMPLEMENTATION. CONSTANTS lc_rpyty_force_off TYPE c LENGTH 1 VALUE '/'. - TYPES temp1 TYPE TABLE OF d020s. -TYPES temp2 TYPE TABLE OF d023s. -DATA: lv_name TYPE dwinactiv-obj_name, - lt_d020s_to_delete TYPE temp1, + DATA: lv_name TYPE dwinactiv-obj_name, + lt_d020s_to_delete TYPE TABLE OF d020s, ls_d020s LIKE LINE OF lt_d020s_to_delete, - lt_params TYPE temp2, + lt_params TYPE TABLE OF d023s, ls_dynpro LIKE LINE OF it_dynpros. FIELD-SYMBOLS: TYPE rpy_dyfatc. @@ -738,9 +736,9 @@ DATA: lv_name TYPE dwinactiv-obj_name, METHOD is_exit_include. - DATA temp1 TYPE xsdboolean. - temp1 = boolc( iv_program CP 'LX*' OR iv_program CP 'SAPLX*' OR iv_program+1 CP '/LX*' OR iv_program+1 CP '/SAPLX*' ). - rv_is_exit_include = temp1. + rv_is_exit_include = xsdbool( + iv_program CP 'LX*' OR iv_program CP 'SAPLX*' OR + iv_program+1 CP '/LX*' OR iv_program+1 CP '/SAPLX*' ). ENDMETHOD. @@ -808,16 +806,13 @@ DATA: lv_name TYPE dwinactiv-obj_name, METHOD serialize_dynpros. - TYPES temp3 TYPE TABLE OF d020s. -TYPES temp4 TYPE TABLE OF d021t. -TYPES temp1 TYPE TABLE OF d021s. -DATA: ls_header TYPE rpy_dyhead, + DATA: ls_header TYPE rpy_dyhead, lt_containers TYPE dycatt_tab, lt_fields_to_containers TYPE dyfatc_tab, lt_flow_logic TYPE swydyflow, - lt_d020s TYPE temp3, - lt_texts TYPE temp4, - lt_fieldlist_int TYPE temp1. "internal format + lt_d020s TYPE TABLE OF d020s, + lt_texts TYPE TABLE OF d021t, + lt_fieldlist_int TYPE TABLE OF d021s. "internal format FIELD-SYMBOLS: LIKE LINE OF lt_d020s, TYPE scrpostyle, @@ -949,13 +944,12 @@ DATA: ls_header TYPE rpy_dyhead, METHOD serialize_program. - TYPES temp6 TYPE TABLE OF abaptxt255. -DATA: ls_progdir TYPE zif_abapgit_sap_report=>ty_progdir, + DATA: ls_progdir TYPE zif_abapgit_sap_report=>ty_progdir, lv_program_name TYPE syrepid, lt_dynpros TYPE ty_dynpro_tt, ls_cua TYPE ty_cua, li_report TYPE REF TO zif_abapgit_sap_report, - lt_source TYPE temp6, + lt_source TYPE TABLE OF abaptxt255, lt_tpool TYPE textpool_table, ls_tpool LIKE LINE OF lt_tpool, li_xml TYPE REF TO zif_abapgit_xml_output. @@ -1017,7 +1011,7 @@ DATA: ls_progdir TYPE zif_abapgit_sap_report=>ty_progdir, IF io_xml IS BOUND. li_xml = io_xml. ELSE. - CREATE OBJECT li_xml TYPE zcl_abapgit_xml_output. + li_xml = NEW zcl_abapgit_xml_output( ). ENDIF. li_xml->add( iv_name = 'PROGDIR' diff --git a/src/objects/zcl_abapgit_objects_program.clas.testclasses.abap b/src/objects/zcl_abapgit_objects_program.clas.testclasses.abap index c801a2931..46d438649 100644 --- a/src/objects/zcl_abapgit_objects_program.clas.testclasses.abap +++ b/src/objects/zcl_abapgit_objects_program.clas.testclasses.abap @@ -34,8 +34,8 @@ CLASS ltcl_test IMPLEMENTATION. " case 1, not FUGR, should skip ls_item-obj_type = 'PROG'. - CREATE OBJECT lo_cut EXPORTING iv_language = 'E' - is_item = ls_item. + lo_cut = NEW #( iv_language = 'E' + is_item = ls_item ). lt_src_act = lt_src_orig. lo_cut->strip_generation_comments( CHANGING ct_source = lt_src_act ). @@ -45,8 +45,8 @@ CLASS ltcl_test IMPLEMENTATION. " case 2, FUGR ls_item-obj_type = 'FUGR'. - CREATE OBJECT lo_cut EXPORTING iv_language = 'E' - is_item = ls_item. + lo_cut = NEW #( iv_language = 'E' + is_item = ls_item ). lt_src_act = lt_src_orig. lo_cut->strip_generation_comments( CHANGING ct_source = lt_src_act ). @@ -66,8 +66,8 @@ CLASS ltcl_test IMPLEMENTATION. APPEND 'some code starts here' TO lt_src_orig. ls_item-obj_type = 'FUGR'. - CREATE OBJECT lo_cut EXPORTING iv_language = 'E' - is_item = ls_item. + lo_cut = NEW #( iv_language = 'E' + is_item = ls_item ). lt_src_act = lt_src_orig. lo_cut->strip_generation_comments( CHANGING ct_source = lt_src_act ). @@ -101,8 +101,8 @@ CLASS ltcl_test IMPLEMENTATION. " case 1, not FUGR, should skip ls_item-obj_type = 'FUGR'. - CREATE OBJECT lo_cut EXPORTING iv_language = 'E' - is_item = ls_item. + lo_cut = NEW #( iv_language = 'E' + is_item = ls_item ). lt_src_act = lt_src_orig. lo_cut->strip_generation_comments( CHANGING ct_source = lt_src_act ). diff --git a/src/persist/zcl_abapgit_persist_factory.clas.abap b/src/persist/zcl_abapgit_persist_factory.clas.abap index 64d82b806..5b646d093 100644 --- a/src/persist/zcl_abapgit_persist_factory.clas.abap +++ b/src/persist/zcl_abapgit_persist_factory.clas.abap @@ -30,7 +30,7 @@ CLASS ZCL_ABAPGIT_PERSIST_FACTORY IMPLEMENTATION. METHOD get_repo. IF gi_repo IS INITIAL. - CREATE OBJECT gi_repo TYPE zcl_abapgit_persistence_repo. + gi_repo = NEW zcl_abapgit_persistence_repo( ). ENDIF. ri_repo = gi_repo. @@ -41,7 +41,7 @@ CLASS ZCL_ABAPGIT_PERSIST_FACTORY IMPLEMENTATION. METHOD get_repo_cs. IF gi_repo_cs IS INITIAL. - CREATE OBJECT gi_repo_cs TYPE zcl_abapgit_persistence_repo. + gi_repo_cs = NEW zcl_abapgit_persistence_repo( ). ENDIF. ri_repo_cs = gi_repo_cs. @@ -52,7 +52,7 @@ CLASS ZCL_ABAPGIT_PERSIST_FACTORY IMPLEMENTATION. METHOD get_settings. IF gi_settings IS INITIAL. - CREATE OBJECT gi_settings TYPE zcl_abapgit_persist_settings. + gi_settings = NEW zcl_abapgit_persist_settings( ). ENDIF. ri_settings = gi_settings. diff --git a/src/persist/zcl_abapgit_persist_migrate.clas.abap b/src/persist/zcl_abapgit_persist_migrate.clas.abap index 5c78acfb8..a29472de6 100644 --- a/src/persist/zcl_abapgit_persist_migrate.clas.abap +++ b/src/persist/zcl_abapgit_persist_migrate.clas.abap @@ -96,21 +96,17 @@ CLASS zcl_abapgit_persist_migrate IMPLEMENTATION. ENDTRY. " New exists and differs from own - then it is really new, needs to be installed - DATA temp1 TYPE xsdboolean. - temp1 = boolc( lv_h_own = lv_h_new ). - rv_exists = temp1. + rv_exists = xsdbool( lv_h_own = lv_h_new ). ENDMETHOD. METHOD lock_create. - TYPES temp1 TYPE STANDARD TABLE OF dd26e WITH DEFAULT KEY. -TYPES temp2 TYPE STANDARD TABLE OF dd27p WITH DEFAULT KEY. -DATA: lv_obj_name TYPE tadir-obj_name, + DATA: lv_obj_name TYPE tadir-obj_name, ls_dd25v TYPE dd25v, - lt_dd26e TYPE temp1, - lt_dd27p TYPE temp2. + lt_dd26e TYPE STANDARD TABLE OF dd26e WITH DEFAULT KEY, + lt_dd27p TYPE STANDARD TABLE OF dd27p WITH DEFAULT KEY. FIELD-SYMBOLS: LIKE LINE OF lt_dd26e, LIKE LINE OF lt_dd27p. @@ -198,9 +194,7 @@ DATA: lv_obj_name TYPE tadir-obj_name, SELECT SINGLE viewname FROM dd25l INTO lv_viewname WHERE viewname = zcl_abapgit_persistence_db=>c_lock. - DATA temp2 TYPE xsdboolean. - temp2 = boolc( sy-subrc = 0 ). - rv_exists = temp2. + rv_exists = xsdbool( sy-subrc = 0 ). ENDMETHOD. @@ -222,12 +216,11 @@ DATA: lv_obj_name TYPE tadir-obj_name, METHOD table_create. - TYPES temp3 TYPE STANDARD TABLE OF dd03p WITH DEFAULT KEY. -DATA: lv_rc LIKE sy-subrc, + DATA: lv_rc LIKE sy-subrc, lv_obj_name TYPE tadir-obj_name, ls_dd02v TYPE dd02v, ls_dd09l TYPE dd09l, - lt_dd03p TYPE temp3. + lt_dd03p TYPE STANDARD TABLE OF dd03p WITH DEFAULT KEY. FIELD-SYMBOLS: LIKE LINE OF lt_dd03p. @@ -322,9 +315,7 @@ DATA: lv_rc LIKE sy-subrc, SELECT SINGLE tabname FROM dd02l INTO lv_tabname WHERE tabname = zcl_abapgit_persistence_db=>c_tabname. "#EC CI_NOORDER - DATA temp3 TYPE xsdboolean. - temp3 = boolc( sy-subrc = 0 ). - rv_exists = temp3. + rv_exists = xsdbool( sy-subrc = 0 ). ENDMETHOD. ENDCLASS. diff --git a/src/persist/zcl_abapgit_persist_migrate.clas.locals_imp.abap b/src/persist/zcl_abapgit_persist_migrate.clas.locals_imp.abap index 17206399a..9652bb2b6 100644 --- a/src/persist/zcl_abapgit_persist_migrate.clas.locals_imp.abap +++ b/src/persist/zcl_abapgit_persist_migrate.clas.locals_imp.abap @@ -27,8 +27,8 @@ CLASS lcl_cua_interface IMPLEMENTATION. AND object = 'PROG' AND obj_name = sy-cprog. - CREATE OBJECT ro_instance EXPORTING iv_language = 'E' - is_item = ls_item. + ro_instance = NEW #( iv_language = 'E' + is_item = ls_item ). ENDMETHOD. @@ -46,7 +46,7 @@ CLASS lcl_cua_interface IMPLEMENTATION. is_cua = is_cua iv_program_name = ms_item-obj_name ). - CREATE OBJECT li_log TYPE zcl_abapgit_log. + li_log = NEW zcl_abapgit_log( ). zcl_abapgit_objects_activation=>activate( li_log ). zcl_abapgit_objects_activation=>clear( ). diff --git a/src/persist/zcl_abapgit_persist_packages.clas.abap b/src/persist/zcl_abapgit_persist_packages.clas.abap index 425d44737..1abe63540 100644 --- a/src/persist/zcl_abapgit_persist_packages.clas.abap +++ b/src/persist/zcl_abapgit_persist_packages.clas.abap @@ -61,7 +61,7 @@ CLASS zcl_abapgit_persist_packages IMPLEMENTATION. DATA lo_input TYPE REF TO zif_abapgit_xml_input. - CREATE OBJECT lo_input TYPE zcl_abapgit_xml_input EXPORTING iv_xml = iv_xml. + lo_input = NEW zcl_abapgit_xml_input( iv_xml = iv_xml ). lo_input->read( EXPORTING @@ -75,7 +75,7 @@ CLASS zcl_abapgit_persist_packages IMPLEMENTATION. METHOD get_instance. IF go_persist IS NOT BOUND. - CREATE OBJECT go_persist. + go_persist = NEW #( ). ENDIF. ro_persist = go_persist. @@ -144,7 +144,7 @@ CLASS zcl_abapgit_persist_packages IMPLEMENTATION. DATA li_output TYPE REF TO zif_abapgit_xml_output. - CREATE OBJECT li_output TYPE zcl_abapgit_xml_output. + li_output = NEW zcl_abapgit_xml_output( ). li_output->add( iv_name = zcl_abapgit_persistence_db=>c_type_packages diff --git a/src/persist/zcl_abapgit_persist_settings.clas.abap b/src/persist/zcl_abapgit_persist_settings.clas.abap index 125dc3af9..2174e8f79 100644 --- a/src/persist/zcl_abapgit_persist_settings.clas.abap +++ b/src/persist/zcl_abapgit_persist_settings.clas.abap @@ -52,7 +52,7 @@ CLASS ZCL_ABAPGIT_PERSIST_SETTINGS IMPLEMENTATION. ENDIF. " Settings have changed or have not yet been loaded - CREATE OBJECT ro_settings. + ro_settings = NEW #( ). TRY. diff --git a/src/persist/zcl_abapgit_persistence_db.clas.abap b/src/persist/zcl_abapgit_persistence_db.clas.abap index f73f44ac9..8fb9b5add 100644 --- a/src/persist/zcl_abapgit_persistence_db.clas.abap +++ b/src/persist/zcl_abapgit_persistence_db.clas.abap @@ -131,7 +131,7 @@ CLASS ZCL_ABAPGIT_PERSISTENCE_DB IMPLEMENTATION. METHOD get_instance. IF go_db IS NOT BOUND. - CREATE OBJECT go_db. + go_db = NEW #( ). ENDIF. ro_db = go_db. diff --git a/src/persist/zcl_abapgit_persistence_repo.clas.abap b/src/persist/zcl_abapgit_persistence_repo.clas.abap index e7024d64a..28d1a727d 100644 --- a/src/persist/zcl_abapgit_persistence_repo.clas.abap +++ b/src/persist/zcl_abapgit_persistence_repo.clas.abap @@ -19,8 +19,7 @@ CLASS zcl_abapgit_persistence_repo DEFINITION PRIVATE SECTION. - TYPES temp1_ad823f8588 TYPE STANDARD TABLE OF abap_compname. -DATA mt_meta_fields TYPE temp1_ad823f8588. + DATA mt_meta_fields TYPE STANDARD TABLE OF abap_compname. DATA mo_db TYPE REF TO zcl_abapgit_persistence_db . METHODS from_xml @@ -243,7 +242,7 @@ CLASS zcl_abapgit_persistence_repo IMPLEMENTATION. DATA: lo_background TYPE REF TO zcl_abapgit_persist_background. - CREATE OBJECT lo_background. + lo_background = NEW #( ). lo_background->delete( iv_key ). mo_db->delete( iv_type = zcl_abapgit_persistence_db=>c_type_repo @@ -263,9 +262,7 @@ CLASS zcl_abapgit_persistence_repo IMPLEMENTATION. it_keys = lt_keys iv_type = zcl_abapgit_persistence_db=>c_type_repo ). - DATA temp1 TYPE xsdboolean. - temp1 = boolc( lines( lt_content ) > 0 ). - rv_yes = temp1. + rv_yes = xsdbool( lines( lt_content ) > 0 ). ENDMETHOD. diff --git a/src/persist/zcl_abapgit_persistence_user.clas.abap b/src/persist/zcl_abapgit_persistence_user.clas.abap index a72359a9e..81f47ef0b 100644 --- a/src/persist/zcl_abapgit_persistence_user.clas.abap +++ b/src/persist/zcl_abapgit_persistence_user.clas.abap @@ -116,11 +116,11 @@ CLASS zcl_abapgit_persistence_user IMPLEMENTATION. IF iv_user = sy-uname ##USER_OK. IF gi_current_user IS NOT BOUND. - CREATE OBJECT gi_current_user TYPE zcl_abapgit_persistence_user. + gi_current_user = NEW zcl_abapgit_persistence_user( ). ENDIF. ri_user = gi_current_user. ELSE. - CREATE OBJECT ri_user TYPE zcl_abapgit_persistence_user EXPORTING iv_user = iv_user. + ri_user = NEW zcl_abapgit_persistence_user( iv_user = iv_user ). ENDIF. ENDMETHOD. @@ -335,9 +335,7 @@ CLASS zcl_abapgit_persistence_user IMPLEMENTATION. READ TABLE ms_user-favorites TRANSPORTING NO FIELDS WITH KEY table_line = iv_repo_key. - DATA temp1 TYPE xsdboolean. - temp1 = boolc( sy-subrc = 0 ). - rv_yes = temp1. + rv_yes = xsdbool( sy-subrc = 0 ). ENDMETHOD. @@ -451,9 +449,7 @@ CLASS zcl_abapgit_persistence_user IMPLEMENTATION. METHOD zif_abapgit_persist_user~toggle_changes_only. - DATA temp2 TYPE xsdboolean. - temp2 = boolc( ms_user-changes_only = abap_false ). - ms_user-changes_only = temp2. + ms_user-changes_only = xsdbool( ms_user-changes_only = abap_false ). update( ). rv_changes_only = ms_user-changes_only. @@ -463,9 +459,7 @@ CLASS zcl_abapgit_persistence_user IMPLEMENTATION. METHOD zif_abapgit_persist_user~toggle_diff_unified. - DATA temp3 TYPE xsdboolean. - temp3 = boolc( ms_user-diff_unified = abap_false ). - ms_user-diff_unified = temp3. + ms_user-diff_unified = xsdbool( ms_user-diff_unified = abap_false ). update( ). rv_diff_unified = ms_user-diff_unified. @@ -491,9 +485,7 @@ CLASS zcl_abapgit_persistence_user IMPLEMENTATION. METHOD zif_abapgit_persist_user~toggle_hide_files. - DATA temp4 TYPE xsdboolean. - temp4 = boolc( ms_user-hide_files = abap_false ). - ms_user-hide_files = temp4. + ms_user-hide_files = xsdbool( ms_user-hide_files = abap_false ). update( ). rv_hide = ms_user-hide_files. @@ -502,9 +494,7 @@ CLASS zcl_abapgit_persistence_user IMPLEMENTATION. METHOD zif_abapgit_persist_user~toggle_show_folders. - DATA temp5 TYPE xsdboolean. - temp5 = boolc( ms_user-show_folders = abap_false ). - ms_user-show_folders = temp5. + ms_user-show_folders = xsdbool( ms_user-show_folders = abap_false ). update( ). rv_folders = ms_user-show_folders. diff --git a/src/repo/filter/zcl_abapgit_object_filter_tran.clas.testclasses.abap b/src/repo/filter/zcl_abapgit_object_filter_tran.clas.testclasses.abap index 3884f02da..e38847e29 100644 --- a/src/repo/filter/zcl_abapgit_object_filter_tran.clas.testclasses.abap +++ b/src/repo/filter/zcl_abapgit_object_filter_tran.clas.testclasses.abap @@ -22,7 +22,7 @@ ENDCLASS. CLASS ltcl_adjust_filter IMPLEMENTATION. METHOD setup. - CREATE OBJECT mo_cut. + mo_cut = NEW #( ). ENDMETHOD. METHOD teardown. diff --git a/src/repo/stage/zcl_abapgit_merge.clas.abap b/src/repo/stage/zcl_abapgit_merge.clas.abap index e018ccba2..cfe84fa74 100644 --- a/src/repo/stage/zcl_abapgit_merge.clas.abap +++ b/src/repo/stage/zcl_abapgit_merge.clas.abap @@ -92,7 +92,7 @@ CLASS zcl_abapgit_merge IMPLEMENTATION. lt_files = all_files( ). - CREATE OBJECT ms_merge-stage EXPORTING iv_merge_source = ms_merge-source-sha1. + ms_merge-stage = NEW #( iv_merge_source = ms_merge-source-sha1 ). LOOP AT lt_files ASSIGNING . @@ -110,15 +110,9 @@ CLASS zcl_abapgit_merge IMPLEMENTATION. WITH KEY path_name COMPONENTS path = -path name = -name. "#EC CI_SUBRC - DATA temp1 TYPE xsdboolean. - temp1 = boolc( IS ASSIGNED ). - lv_found_source = temp1. - DATA temp2 TYPE xsdboolean. - temp2 = boolc( IS ASSIGNED ). - lv_found_target = temp2. - DATA temp3 TYPE xsdboolean. - temp3 = boolc( IS ASSIGNED ). - lv_found_common = temp3. + lv_found_source = xsdbool( IS ASSIGNED ). + lv_found_target = xsdbool( IS ASSIGNED ). + lv_found_common = xsdbool( IS ASSIGNED ). IF lv_found_source = abap_false AND lv_found_target = abap_false. @@ -375,9 +369,7 @@ CLASS zcl_abapgit_merge IMPLEMENTATION. METHOD zif_abapgit_merge~has_conflicts. - DATA temp4 TYPE xsdboolean. - temp4 = boolc( lines( mt_conflicts ) > 0 ). - rv_conflicts_exists = temp4. + rv_conflicts_exists = xsdbool( lines( mt_conflicts ) > 0 ). ENDMETHOD. diff --git a/src/repo/utils/zcl_abapgit_repo_item_state.clas.abap b/src/repo/utils/zcl_abapgit_repo_item_state.clas.abap index 9a903c0b8..580ad16bd 100644 --- a/src/repo/utils/zcl_abapgit_repo_item_state.clas.abap +++ b/src/repo/utils/zcl_abapgit_repo_item_state.clas.abap @@ -48,9 +48,9 @@ CLASS zcl_abapgit_repo_item_state IMPLEMENTATION. METHOD is_unchanged. - DATA temp1 TYPE xsdboolean. - temp1 = boolc( mv_is_reassigned = abap_false AND mv_lstate = zif_abapgit_definitions=>c_state-unchanged AND mv_rstate = zif_abapgit_definitions=>c_state-unchanged ). - rv_is_unchanged = temp1. + rv_is_unchanged = xsdbool( mv_is_reassigned = abap_false + AND mv_lstate = zif_abapgit_definitions=>c_state-unchanged + AND mv_rstate = zif_abapgit_definitions=>c_state-unchanged ). ENDMETHOD. @@ -86,9 +86,7 @@ CLASS zcl_abapgit_repo_item_state IMPLEMENTATION. mv_rstate = reduce( iv_prev = mv_rstate iv_cur = is_repo_item-rstate ). - DATA temp2 TYPE xsdboolean. - temp2 = boolc( mv_is_reassigned = abap_true OR is_repo_item-packmove = abap_true ). - mv_is_reassigned = temp2. + mv_is_reassigned = xsdbool( mv_is_reassigned = abap_true OR is_repo_item-packmove = abap_true ). ENDMETHOD. @@ -101,9 +99,7 @@ CLASS zcl_abapgit_repo_item_state IMPLEMENTATION. mv_rstate = reduce( iv_prev = mv_rstate iv_cur = is_status_item-rstate ). - DATA temp3 TYPE xsdboolean. - temp3 = boolc( mv_is_reassigned = abap_true OR is_status_item-packmove = abap_true ). - mv_is_reassigned = temp3. + mv_is_reassigned = xsdbool( mv_is_reassigned = abap_true OR is_status_item-packmove = abap_true ). ENDMETHOD. ENDCLASS. diff --git a/src/repo/utils/zcl_abapgit_repo_item_state.clas.testclasses.abap b/src/repo/utils/zcl_abapgit_repo_item_state.clas.testclasses.abap index 477f0ec8f..272d338c7 100644 --- a/src/repo/utils/zcl_abapgit_repo_item_state.clas.testclasses.abap +++ b/src/repo/utils/zcl_abapgit_repo_item_state.clas.testclasses.abap @@ -13,7 +13,7 @@ CLASS ltcl_state_test IMPLEMENTATION. DATA ls_item TYPE zif_abapgit_definitions=>ty_result. DATA lo_cut TYPE REF TO zcl_abapgit_repo_item_state. - CREATE OBJECT lo_cut. + lo_cut = NEW #( ). cl_abap_unit_assert=>assert_equals( act = lo_cut->local( ) @@ -123,7 +123,7 @@ CLASS ltcl_state_test IMPLEMENTATION. DATA ls_item TYPE zif_abapgit_definitions=>ty_repo_item. DATA lo_cut TYPE REF TO zcl_abapgit_repo_item_state. - CREATE OBJECT lo_cut. + lo_cut = NEW #( ). cl_abap_unit_assert=>assert_equals( act = lo_cut->local( ) diff --git a/src/repo/utils/zcl_abapgit_repo_news.clas.abap b/src/repo/utils/zcl_abapgit_repo_news.clas.abap index 93ed510f9..3ddbe6f92 100644 --- a/src/repo/utils/zcl_abapgit_repo_news.clas.abap +++ b/src/repo/utils/zcl_abapgit_repo_news.clas.abap @@ -157,9 +157,9 @@ CLASS zcl_abapgit_repo_news IMPLEMENTATION. LOOP AT lt_remote ASSIGNING WHERE path = lc_log_path AND ( filename CP lc_log_filename OR filename CP lc_log_filename_up ). - CREATE OBJECT ro_instance EXPORTING iv_rawdata = -data - iv_current_version = lv_version - iv_lastseen_version = zcl_abapgit_version=>normalize( lv_last_seen ). + ro_instance = NEW #( iv_rawdata = -data + iv_current_version = lv_version + iv_lastseen_version = zcl_abapgit_version=>normalize( lv_last_seen ) ). EXIT. @@ -181,32 +181,26 @@ CLASS zcl_abapgit_repo_news IMPLEMENTATION. METHOD has_important. READ TABLE mt_log WITH KEY is_important = abap_true TRANSPORTING NO FIELDS. - DATA temp1 TYPE xsdboolean. - temp1 = boolc( sy-subrc IS INITIAL ). - rv_boolean = temp1. + rv_boolean = xsdbool( sy-subrc IS INITIAL ). ENDMETHOD. METHOD has_news. - DATA temp2 TYPE xsdboolean. - temp2 = boolc( lines( mt_log ) > 0 ). - rv_boolean = temp2. + rv_boolean = xsdbool( lines( mt_log ) > 0 ). ENDMETHOD. METHOD has_unseen. - DATA temp3 TYPE xsdboolean. - temp3 = boolc( zcl_abapgit_version=>compare( iv_a = mv_latest_version - iv_b = mv_lastseen_version ) > 0 ). - rv_boolean = temp3. + rv_boolean = xsdbool( zcl_abapgit_version=>compare( + iv_a = mv_latest_version + iv_b = mv_lastseen_version ) > 0 ). ENDMETHOD. METHOD has_updates. - DATA temp4 TYPE xsdboolean. - temp4 = boolc( zcl_abapgit_version=>compare( iv_a = mv_latest_version - iv_b = mv_current_version ) > 0 ). - rv_boolean = temp4. + rv_boolean = xsdbool( zcl_abapgit_version=>compare( + iv_a = mv_latest_version + iv_b = mv_current_version ) > 0 ). ENDMETHOD. @@ -283,9 +277,7 @@ CLASS zcl_abapgit_repo_news IMPLEMENTATION. iv_b = iv_current_version ). ELSE. FIND FIRST OCCURRENCE OF REGEX '^\s*!' IN iv_line. - DATA temp5 TYPE xsdboolean. - temp5 = boolc( sy-subrc IS INITIAL ). - rs_log-is_important = temp5. " Change is important + rs_log-is_important = xsdbool( sy-subrc IS INITIAL ). " Change is important ENDIF. rs_log-text = iv_line. diff --git a/src/repo/utils/zcl_abapgit_repo_news.clas.testclasses.abap b/src/repo/utils/zcl_abapgit_repo_news.clas.testclasses.abap index fac2c0c4c..eef570087 100644 --- a/src/repo/utils/zcl_abapgit_repo_news.clas.testclasses.abap +++ b/src/repo/utils/zcl_abapgit_repo_news.clas.testclasses.abap @@ -152,7 +152,7 @@ CLASS ltcl_news IMPLEMENTATION. DATA lo_log_entries TYPE REF TO lcl_log_entries. " Generate test data - CREATE OBJECT lo_src_text_buf. + lo_src_text_buf = NEW #( ). lo_src_text_buf->add( '======' ). lo_src_text_buf->add( '------' ). lo_src_text_buf->add( ` ` ). @@ -169,7 +169,7 @@ CLASS ltcl_news IMPLEMENTATION. " Case 1 " Generate expected results - CREATE OBJECT lo_log_entries. + lo_log_entries = NEW #( ). " VERSION HEAD IMP POS TEXT lo_log_entries->add( '1.28.0 /X / /1 /2017-02-13 v1.28.0' ). lo_log_entries->add( '1.28.0 / / /0 /+ Staging page redesigned' ). @@ -187,7 +187,7 @@ CLASS ltcl_news IMPLEMENTATION. " Case 2 (exect version match) - CREATE OBJECT lo_log_entries. + lo_log_entries = NEW #( ). " VERSION HEAD IMP UPD TEXT lo_log_entries->add( '1.28.0 /X / /1 /2017-02-13 v1.28.0' ). lo_log_entries->add( '1.28.0 / / /0 /+ Staging page redesigned' ). @@ -202,7 +202,7 @@ CLASS ltcl_news IMPLEMENTATION. msg = ' Error during parsing: Case 2.' ). " Case 3 (display tail) - CREATE OBJECT lo_log_entries. + lo_log_entries = NEW #( ). " VERSION HEAD IMP UPD TEXT lo_log_entries->add( '1.28.0 /X / /0 /2017-02-13 v1.28.0' ). lo_log_entries->add( '1.28.0 / / /0 /+ Staging page redesigned' ). diff --git a/src/repo/utils/zcl_abapgit_zip.clas.abap b/src/repo/utils/zcl_abapgit_zip.clas.abap index 854e317b3..e399f761d 100644 --- a/src/repo/utils/zcl_abapgit_zip.clas.abap +++ b/src/repo/utils/zcl_abapgit_zip.clas.abap @@ -88,7 +88,7 @@ CLASS zcl_abapgit_zip IMPLEMENTATION. FIELD-SYMBOLS: LIKE LINE OF it_files. - CREATE OBJECT lo_zip. + lo_zip = NEW #( ). LOOP AT it_files ASSIGNING . CONCATENATE -file-path+1 -file-filename INTO lv_filename. @@ -107,15 +107,15 @@ CLASS zcl_abapgit_zip IMPLEMENTATION. DATA lt_zip TYPE zif_abapgit_definitions=>ty_files_item_tt. DATA lo_serialize TYPE REF TO zcl_abapgit_serialize. - CREATE OBJECT li_log TYPE zcl_abapgit_log. + li_log = NEW zcl_abapgit_log( ). li_log->set_title( 'Zip Export Log' ). IF zcl_abapgit_factory=>get_sap_package( iv_package )->exists( ) = abap_false. zcx_abapgit_exception=>raise( |Package { iv_package } doesn't exist| ). ENDIF. - CREATE OBJECT lo_serialize EXPORTING io_dot_abapgit = io_dot_abapgit - is_local_settings = is_local_settings. + lo_serialize = NEW #( io_dot_abapgit = io_dot_abapgit + is_local_settings = is_local_settings ). lt_zip = lo_serialize->files_local( iv_package = iv_package @@ -313,7 +313,7 @@ CLASS zcl_abapgit_zip IMPLEMENTATION. LIKE LINE OF rt_files. - CREATE OBJECT lo_zip. + lo_zip = NEW #( ). lo_zip->load( EXPORTING zip = iv_xstr EXCEPTIONS diff --git a/src/repo/zcl_abapgit_dot_abapgit.clas.abap b/src/repo/zcl_abapgit_dot_abapgit.clas.abap index fe71b7b4d..db8ee9264 100644 --- a/src/repo/zcl_abapgit_dot_abapgit.clas.abap +++ b/src/repo/zcl_abapgit_dot_abapgit.clas.abap @@ -170,7 +170,7 @@ CLASS zcl_abapgit_dot_abapgit IMPLEMENTATION. ls_data-starting_folder = '/src/'. ls_data-folder_logic = zif_abapgit_dot_abapgit=>c_folder_logic-prefix. - CREATE OBJECT ro_dot_abapgit EXPORTING is_data = ls_data. + ro_dot_abapgit = NEW #( is_data = ls_data ). ENDMETHOD. @@ -190,7 +190,7 @@ CLASS zcl_abapgit_dot_abapgit IMPLEMENTATION. ls_data = from_xml( lv_xml ). - CREATE OBJECT ro_dot_abapgit EXPORTING is_data = ls_data. + ro_dot_abapgit = NEW #( is_data = ls_data ). ENDMETHOD. diff --git a/src/repo/zcl_abapgit_repo.clas.abap b/src/repo/zcl_abapgit_repo.clas.abap index 6a86d060b..9df77bd70 100644 --- a/src/repo/zcl_abapgit_repo.clas.abap +++ b/src/repo/zcl_abapgit_repo.clas.abap @@ -205,7 +205,7 @@ CLASS ZCL_ABAPGIT_REPO IMPLEMENTATION. DATA lo_abapgit_abap_language_vers TYPE REF TO zcl_abapgit_abap_language_vers. DATA lv_text TYPE string. - CREATE OBJECT lo_abapgit_abap_language_vers EXPORTING io_dot_abapgit = get_dot_abapgit( ). + lo_abapgit_abap_language_vers = NEW #( io_dot_abapgit = get_dot_abapgit( ) ). IF lo_abapgit_abap_language_vers->is_import_allowed( ms_data-package ) = abap_false. lv_text = |Repository cannot be imported. | && @@ -270,7 +270,7 @@ CLASS ZCL_ABAPGIT_REPO IMPLEMENTATION. METHOD create_new_log. - CREATE OBJECT mi_log TYPE zcl_abapgit_log. + mi_log = NEW zcl_abapgit_log( ). mi_log->set_title( iv_title ). ri_log = mi_log. @@ -368,7 +368,7 @@ CLASS ZCL_ABAPGIT_REPO IMPLEMENTATION. RETURN. ENDIF. - CREATE OBJECT ri_config TYPE zcl_abapgit_data_config. + ri_config = NEW zcl_abapgit_data_config( ). mi_data_config = ri_config. " Assume remote data has been loaded already @@ -468,7 +468,7 @@ CLASS ZCL_ABAPGIT_REPO IMPLEMENTATION. CLEAR lt_tadir. INSERT ls_tadir INTO TABLE lt_tadir. - CREATE OBJECT lo_serialize. + lo_serialize = NEW #( ). lt_new_local_files = lo_serialize->serialize( iv_package = ms_data-package it_tadir = lt_tadir ). @@ -677,7 +677,7 @@ CLASS ZCL_ABAPGIT_REPO IMPLEMENTATION. METHOD zif_abapgit_repo~checksums. - CREATE OBJECT ri_checksums TYPE zcl_abapgit_repo_checksums EXPORTING iv_repo_key = ms_data-key. + ri_checksums = NEW zcl_abapgit_repo_checksums( iv_repo_key = ms_data-key ). ENDMETHOD. @@ -777,7 +777,7 @@ CLASS ZCL_ABAPGIT_REPO IMPLEMENTATION. METHOD zif_abapgit_repo~get_dot_abapgit. - CREATE OBJECT ro_dot_abapgit EXPORTING is_data = ms_data-dot_abapgit. + ro_dot_abapgit = NEW #( is_data = ms_data-dot_abapgit ). ENDMETHOD. @@ -791,8 +791,8 @@ CLASS ZCL_ABAPGIT_REPO IMPLEMENTATION. RETURN. ENDIF. - CREATE OBJECT lo_serialize EXPORTING io_dot_abapgit = get_dot_abapgit( ) - is_local_settings = get_local_settings( ). + lo_serialize = NEW #( io_dot_abapgit = get_dot_abapgit( ) + is_local_settings = get_local_settings( ) ). rt_files = lo_serialize->files_local( iv_package = get_package( ) @@ -813,8 +813,8 @@ CLASS ZCL_ABAPGIT_REPO IMPLEMENTATION. DATA lt_filter TYPE zif_abapgit_definitions=>ty_tadir_tt. - CREATE OBJECT lo_serialize EXPORTING io_dot_abapgit = get_dot_abapgit( ) - is_local_settings = get_local_settings( ). + lo_serialize = NEW #( io_dot_abapgit = get_dot_abapgit( ) + is_local_settings = get_local_settings( ) ). lt_filter = ii_obj_filter->get_filter( ). @@ -843,7 +843,7 @@ CLASS ZCL_ABAPGIT_REPO IMPLEMENTATION. IF ii_obj_filter IS NOT INITIAL. lt_filter = ii_obj_filter->get_filter( ). - CREATE OBJECT lr_filter. + lr_filter = NEW #( ). lr_filter->apply_object_filter( EXPORTING it_filter = lt_filter @@ -897,9 +897,7 @@ CLASS ZCL_ABAPGIT_REPO IMPLEMENTATION. METHOD zif_abapgit_repo~has_remote_source. - DATA temp1 TYPE xsdboolean. - temp1 = boolc( lines( mt_remote ) > 0 ). - rv_yes = temp1. + rv_yes = xsdbool( lines( mt_remote ) > 0 ). ENDMETHOD. diff --git a/src/repo/zcl_abapgit_repo.clas.testclasses.abap b/src/repo/zcl_abapgit_repo.clas.testclasses.abap index 9369fdf5d..b26e940e6 100644 --- a/src/repo/zcl_abapgit_repo.clas.testclasses.abap +++ b/src/repo/zcl_abapgit_repo.clas.testclasses.abap @@ -63,7 +63,7 @@ CLASS ltcl_find_remote_dot_abapgit IMPLEMENTATION. ls_data-key = c_dummy_repo_key. " online/offline doesn't matter... - CREATE OBJECT mo_repo TYPE zcl_abapgit_repo_offline EXPORTING is_data = ls_data. + mo_repo = NEW zcl_abapgit_repo_offline( is_data = ls_data ). ENDMETHOD. diff --git a/src/repo/zcl_abapgit_repo_checksums.clas.testclasses.abap b/src/repo/zcl_abapgit_repo_checksums.clas.testclasses.abap index 1c944de48..61eb0be6d 100644 --- a/src/repo/zcl_abapgit_repo_checksums.clas.testclasses.abap +++ b/src/repo/zcl_abapgit_repo_checksums.clas.testclasses.abap @@ -364,13 +364,13 @@ CLASS ltcl_test_checksums IMPLEMENTATION. DATA li_cut TYPE REF TO zif_abapgit_repo_checksums. DATA lt_checksums_exp TYPE zif_abapgit_persistence=>ty_local_checksum_tt. - CREATE OBJECT lo_mock. + lo_mock = NEW #( ). zcl_abapgit_repo_srv=>inject_instance( lo_mock ). zcl_abapgit_persist_injector=>set_repo_cs( me ). ltcl_test_checksum_serializer=>get_mock( IMPORTING et_checksums = lt_checksums_exp ). - CREATE OBJECT li_cut TYPE zcl_abapgit_repo_checksums EXPORTING iv_repo_key = '1'. + li_cut = NEW zcl_abapgit_repo_checksums( iv_repo_key = '1' ). cl_abap_unit_assert=>assert_equals( act = li_cut->get( ) @@ -386,25 +386,25 @@ CLASS ltcl_test_checksums IMPLEMENTATION. DATA lo_l_builder TYPE REF TO lcl_local_file_builder. DATA lo_r_builder TYPE REF TO lcl_remote_file_builder. - CREATE OBJECT lo_mock. + lo_mock = NEW #( ). zcl_abapgit_repo_srv=>inject_instance( lo_mock ). zcl_abapgit_persist_injector=>set_repo_cs( me ). " Local - CREATE OBJECT lo_l_builder. + lo_l_builder = NEW #( ). lo_l_builder->add( '$PKG PROG ZHELLO / zhello.prog.abap hash1' ). lo_l_builder->add( '$PKG PROG ZHELLO / zhello.prog.xml hash2' ). lo_l_builder->add( '$PKG DEVC $PKG / $pkg.devc.xml hash3' ). lo_mock->mt_local_files = lo_l_builder->mt_tab. " Remote - CREATE OBJECT lo_r_builder. + lo_r_builder = NEW #( ). lo_r_builder->add( '/ zhello.prog.abap hash1' ). lo_r_builder->add( '/ zhello.prog.xml hash2' ). lo_r_builder->add( '/ $pkg.devc.xml hash3' ). lo_mock->mt_remote_files = lo_r_builder->mt_tab. - CREATE OBJECT li_cut TYPE zcl_abapgit_repo_checksums EXPORTING iv_repo_key = '1'. + li_cut = NEW zcl_abapgit_repo_checksums( iv_repo_key = '1' ). li_cut->rebuild( ). @@ -431,16 +431,16 @@ CLASS ltcl_test_checksums IMPLEMENTATION. DATA lv_cs_exp TYPE string. DATA lo_f_builder TYPE REF TO lcl_file_sig_builder. - CREATE OBJECT lo_mock. + lo_mock = NEW #( ). zcl_abapgit_repo_srv=>inject_instance( lo_mock ). zcl_abapgit_persist_injector=>set_repo_cs( me ). - CREATE OBJECT lo_f_builder. + lo_f_builder = NEW #( ). lo_f_builder->add( '/ zhello.prog.abap hash1' ). lo_f_builder->add( '/ zhello.prog.xml hashNEW' ). - CREATE OBJECT li_cut TYPE zcl_abapgit_repo_checksums EXPORTING iv_repo_key = '1'. + li_cut = NEW zcl_abapgit_repo_checksums( iv_repo_key = '1' ). li_cut->update( lo_f_builder->mt_tab ). @@ -486,25 +486,25 @@ CLASS ltcl_test_checksums IMPLEMENTATION. DATA lo_l_builder TYPE REF TO lcl_local_file_builder. DATA lo_r_builder TYPE REF TO lcl_remote_file_builder. - CREATE OBJECT lo_mock. + lo_mock = NEW #( ). zcl_abapgit_repo_srv=>inject_instance( lo_mock ). zcl_abapgit_persist_injector=>set_repo_cs( me ). " Local - CREATE OBJECT lo_l_builder. + lo_l_builder = NEW #( ). lo_l_builder->add( '@ @ @ / .abapgit.xml hashZ' ). lo_l_builder->add( '@ @ @ / .gitignore whatever' ). lo_l_builder->add( '$PKG DEVC $PKG / $pkg.devc.xml hash3' ). lo_mock->mt_local_files = lo_l_builder->mt_tab. " Remote - CREATE OBJECT lo_r_builder. + lo_r_builder = NEW #( ). lo_r_builder->add( '/ .abapgit.xml hashZ' ). lo_r_builder->add( '/ .gitignore whatever' ). lo_r_builder->add( '/ $pkg.devc.xml hash3' ). lo_mock->mt_remote_files = lo_r_builder->mt_tab. - CREATE OBJECT li_cut TYPE zcl_abapgit_repo_checksums EXPORTING iv_repo_key = '1'. + li_cut = NEW zcl_abapgit_repo_checksums( iv_repo_key = '1' ). li_cut->rebuild( ). @@ -547,11 +547,11 @@ CLASS ltcl_update_calculator_test IMPLEMENTATION. DATA lo_l_builder TYPE REF TO lcl_local_file_builder. DATA lo_f_builder TYPE REF TO lcl_file_sig_builder. - CREATE OBJECT lo_f_builder. + lo_f_builder = NEW #( ). lo_f_builder->add( '/ zhello.prog.abap hash1' ). lo_f_builder->add( '/ zhello.prog.xml hashNEW' ). - CREATE OBJECT lo_l_builder. + lo_l_builder = NEW #( ). lo_l_builder->add( '$PKG PROG ZHELLO / zhello.prog.abap hash1' ). lo_l_builder->add( '$PKG PROG ZHELLO / zhello.prog.xml hash2' ). lo_l_builder->add( '$PKG DEVC $PKG / $pkg.devc.xml hash3' ). diff --git a/src/repo/zcl_abapgit_repo_content_list.clas.abap b/src/repo/zcl_abapgit_repo_content_list.clas.abap index 2f30bf983..76b4deec4 100644 --- a/src/repo/zcl_abapgit_repo_content_list.clas.abap +++ b/src/repo/zcl_abapgit_repo_content_list.clas.abap @@ -92,7 +92,7 @@ CLASS zcl_abapgit_repo_content_list IMPLEMENTATION. ls_folder-path = -path. ls_folder-sortkey = c_sortkey-dir. " Directory ls_folder-is_dir = abap_true. - CREATE OBJECT lo_state. + lo_state = NEW #( ). ENDAT. ls_folder-changes = ls_folder-changes + -changes. @@ -136,14 +136,12 @@ CLASS zcl_abapgit_repo_content_list IMPLEMENTATION. -changes = 0. -path = -path. -srcsystem = -srcsystem. - CREATE OBJECT lo_state. + lo_state = NEW #( ). ENDAT. IF -filename IS NOT INITIAL. MOVE-CORRESPONDING TO ls_file. - DATA temp1 TYPE xsdboolean. - temp1 = boolc( -match = abap_false ). - ls_file-is_changed = temp1. " TODO refactor + ls_file-is_changed = xsdbool( -match = abap_false ). " TODO refactor APPEND ls_file TO -files. IF -inactive = abap_true AND -sortkey > c_sortkey-changed. @@ -206,7 +204,7 @@ CLASS zcl_abapgit_repo_content_list IMPLEMENTATION. METHOD constructor. mo_repo = io_repo. - CREATE OBJECT mi_log TYPE zcl_abapgit_log. + mi_log = NEW zcl_abapgit_log( ). ENDMETHOD. diff --git a/src/repo/zcl_abapgit_repo_cs_migration.clas.abap b/src/repo/zcl_abapgit_repo_cs_migration.clas.abap index 6dd5f1ac5..87e6488b1 100644 --- a/src/repo/zcl_abapgit_repo_cs_migration.clas.abap +++ b/src/repo/zcl_abapgit_repo_cs_migration.clas.abap @@ -71,7 +71,7 @@ CLASS ZCL_ABAPGIT_REPO_CS_MIGRATION IMPLEMENTATION. RETURN. ENDIF. - CREATE OBJECT lo_cs EXPORTING iv_repo_key = iv_repo_key. + lo_cs = NEW #( iv_repo_key = iv_repo_key ). lo_cs->force_write( ls_repo_extract-local_checksums ). ENDMETHOD. diff --git a/src/repo/zcl_abapgit_repo_srv.clas.abap b/src/repo/zcl_abapgit_repo_srv.clas.abap index c91599a36..51bbfe330 100644 --- a/src/repo/zcl_abapgit_repo_srv.clas.abap +++ b/src/repo/zcl_abapgit_repo_srv.clas.abap @@ -122,7 +122,7 @@ CLASS zcl_abapgit_repo_srv IMPLEMENTATION. METHOD get_instance. IF gi_ref IS INITIAL. - CREATE OBJECT gi_ref TYPE zcl_abapgit_repo_srv. + gi_ref = NEW zcl_abapgit_repo_srv( ). ENDIF. ri_srv = gi_ref. ENDMETHOD. @@ -136,9 +136,9 @@ CLASS zcl_abapgit_repo_srv IMPLEMENTATION. METHOD instantiate_and_add. IF is_repo_meta-offline = abap_false. - CREATE OBJECT ri_repo TYPE zcl_abapgit_repo_online EXPORTING is_data = is_repo_meta. + ri_repo = NEW zcl_abapgit_repo_online( is_data = is_repo_meta ). ELSE. - CREATE OBJECT ri_repo TYPE zcl_abapgit_repo_offline EXPORTING is_data = is_repo_meta. + ri_repo = NEW zcl_abapgit_repo_offline( is_data = is_repo_meta ). ENDIF. add( ri_repo ). diff --git a/src/repo/zcl_abapgit_repo_status.clas.abap b/src/repo/zcl_abapgit_repo_status.clas.abap index b2e167346..f542c40e8 100644 --- a/src/repo/zcl_abapgit_repo_status.clas.abap +++ b/src/repo/zcl_abapgit_repo_status.clas.abap @@ -136,9 +136,7 @@ CLASS zcl_abapgit_repo_status IMPLEMENTATION. rs_result-path = is_local-file-path. rs_result-filename = is_local-file-filename. - DATA temp1 TYPE xsdboolean. - temp1 = boolc( is_local-file-sha1 = is_remote-sha1 ). - rs_result-match = temp1. + rs_result-match = xsdbool( is_local-file-sha1 = is_remote-sha1 ). IF rs_result-match = abap_true. RETURN. ENDIF. @@ -290,8 +288,8 @@ CLASS zcl_abapgit_repo_status IMPLEMENTATION. ct_local = lt_local ct_remote = lt_remote ). - CREATE OBJECT lo_instance EXPORTING iv_root_package = ii_repo->get_package( ) - io_dot = ii_repo->get_dot_abapgit( ). + lo_instance = NEW #( iv_root_package = ii_repo->get_package( ) + io_dot = ii_repo->get_dot_abapgit( ) ). rt_results = lo_instance->calculate_status( it_local = lt_local @@ -300,8 +298,8 @@ CLASS zcl_abapgit_repo_status IMPLEMENTATION. IF ii_log IS BOUND. " This method just adds messages to the log. No log, nothing to do here - CREATE OBJECT lo_consistency_checks EXPORTING iv_root_package = ii_repo->get_package( ) - io_dot = ii_repo->get_dot_abapgit( ). + lo_consistency_checks = NEW #( iv_root_package = ii_repo->get_package( ) + io_dot = ii_repo->get_dot_abapgit( ) ). ii_log->merge_with( lo_consistency_checks->run_checks( rt_results ) ). ENDIF. @@ -425,13 +423,12 @@ CLASS zcl_abapgit_repo_status IMPLEMENTATION. METHOD process_items. - TYPES temp1 TYPE SORTED TABLE OF devclass WITH UNIQUE KEY table_line. -DATA: + DATA: ls_item LIKE LINE OF ct_items, lv_is_xml TYPE abap_bool, lv_is_json TYPE abap_bool, lv_sub_fetched TYPE abap_bool, - lt_sub_packages TYPE temp1. + lt_sub_packages TYPE SORTED TABLE OF devclass WITH UNIQUE KEY table_line. FIELD-SYMBOLS LIKE LINE OF it_unprocessed_remote. diff --git a/src/repo/zcl_abapgit_repo_status.clas.locals_imp.abap b/src/repo/zcl_abapgit_repo_status.clas.locals_imp.abap index 938bab5f4..69e5d4b91 100644 --- a/src/repo/zcl_abapgit_repo_status.clas.locals_imp.abap +++ b/src/repo/zcl_abapgit_repo_status.clas.locals_imp.abap @@ -65,7 +65,7 @@ CLASS lcl_status_consistency_checks IMPLEMENTATION. METHOD run_checks. - CREATE OBJECT mi_log TYPE zcl_abapgit_log. + mi_log = NEW zcl_abapgit_log( ). " Find all objects which were assigned to a different package check_package_move( it_results ). diff --git a/src/repo/zcl_abapgit_repo_status.clas.testclasses.abap b/src/repo/zcl_abapgit_repo_status.clas.testclasses.abap index 9e9d289a2..4af21c2cb 100644 --- a/src/repo/zcl_abapgit_repo_status.clas.testclasses.abap +++ b/src/repo/zcl_abapgit_repo_status.clas.testclasses.abap @@ -118,9 +118,7 @@ CLASS ltcl_run_checks IMPLEMENTATION. ENDMETHOD. METHOD zif_abapgit_sap_namespace~exists. - DATA temp1 TYPE xsdboolean. - temp1 = boolc( iv_namespace <> 'NOTEXIST' ). - rv_yes = temp1. + rv_yes = xsdbool( iv_namespace <> 'NOTEXIST' ). ENDMETHOD. METHOD zif_abapgit_sap_namespace~is_editable. @@ -151,7 +149,7 @@ CLASS ltcl_run_checks IMPLEMENTATION. METHOD setup. - CREATE OBJECT mi_log TYPE zcl_abapgit_log. + mi_log = NEW zcl_abapgit_log( ). mo_dot = zcl_abapgit_dot_abapgit=>build_default( ). mo_dot->set_starting_folder( '/' ). " assumed by unit tests @@ -164,8 +162,8 @@ CLASS ltcl_run_checks IMPLEMENTATION. zcl_abapgit_injector=>set_sap_namespace( me ). - CREATE OBJECT mo_instance EXPORTING iv_root_package = '$Z$' - io_dot = mo_dot. + mo_instance = NEW #( iv_root_package = '$Z$' + io_dot = mo_dot ). ENDMETHOD. @@ -505,8 +503,8 @@ CLASS ltcl_run_checks IMPLEMENTATION. iv_path = '/' iv_filename = '#notexist#zclass1.clas.xml' ). - CREATE OBJECT mo_instance EXPORTING iv_root_package = '/NOTEXIST/Z' - io_dot = mo_dot. + mo_instance = NEW #( iv_root_package = '/NOTEXIST/Z' + io_dot = mo_dot ). mi_log = mo_instance->run_checks( mt_results ). @@ -532,8 +530,8 @@ CLASS ltcl_run_checks IMPLEMENTATION. iv_path = '/' iv_filename = '(notexist)zclass1.clas.json' ). - CREATE OBJECT mo_instance EXPORTING iv_root_package = '/NOTEXIST/Z' - io_dot = mo_dot. + mo_instance = NEW #( iv_root_package = '/NOTEXIST/Z' + io_dot = mo_dot ). mi_log = mo_instance->run_checks( mt_results ). @@ -567,8 +565,8 @@ CLASS ltcl_run_checks IMPLEMENTATION. iv_path = '' iv_filename = 'package.devc.xml' ). - CREATE OBJECT mo_instance EXPORTING iv_root_package = '$MAIN' - io_dot = mo_dot. + mo_instance = NEW #( iv_root_package = '$MAIN' + io_dot = mo_dot ). mi_log = mo_instance->run_checks( mt_results ). @@ -683,9 +681,8 @@ CLASS ltcl_status_helper DEFINITION FOR TESTING. devclass TYPE tadir-devclass, END OF ty_tadir. - TYPES temp1_69da81890d TYPE STANDARD TABLE OF ty_tadir WITH DEFAULT KEY. -DATA: - mt_tadir TYPE temp1_69da81890d, + DATA: + mt_tadir TYPE STANDARD TABLE OF ty_tadir WITH DEFAULT KEY, mt_local TYPE zif_abapgit_definitions=>ty_files_item_tt, mt_remote TYPE zif_abapgit_git_definitions=>ty_files_tt, mt_state TYPE zif_abapgit_git_definitions=>ty_file_signatures_tt. @@ -774,15 +771,15 @@ CLASS ltcl_status_helper IMPLEMENTATION. lo_dot = zcl_abapgit_dot_abapgit=>build_default( ). lo_dot->set_starting_folder( '/' ). " assumed by unit tests - CREATE OBJECT lo_instance EXPORTING iv_root_package = iv_devclass - io_dot = lo_dot. + lo_instance = NEW #( iv_root_package = iv_devclass + io_dot = lo_dot ). lt_results = lo_instance->calculate_status( it_local = mt_local it_remote = mt_remote it_cur_state = mt_state ). - CREATE OBJECT ro_result EXPORTING it_results = lt_results. + ro_result = NEW #( it_results = lt_results ). ENDMETHOD. @@ -823,7 +820,7 @@ CLASS ltcl_calculate_status IMPLEMENTATION. METHOD setup. - CREATE OBJECT mo_helper. + mo_helper = NEW #( ). zcl_abapgit_injector=>set_tadir( mo_helper ). ENDMETHOD. @@ -923,7 +920,7 @@ CLASS ltcl_calculate_status IMPLEMENTATION. METHOD diff. " Modified both - CREATE OBJECT mo_helper. + mo_helper = NEW #( ). mo_helper->add_local( iv_obj_type = 'DOMA' iv_obj_name = '$$ZDOMA1' @@ -951,7 +948,7 @@ CLASS ltcl_calculate_status IMPLEMENTATION. exp = zif_abapgit_definitions=>c_state-modified ). " Modified local only - CREATE OBJECT mo_helper. + mo_helper = NEW #( ). mo_helper->add_local( iv_obj_type = 'DOMA' iv_obj_name = '$$ZDOMA1' @@ -979,7 +976,7 @@ CLASS ltcl_calculate_status IMPLEMENTATION. exp = zif_abapgit_definitions=>c_state-unchanged ). " Modified remote only - CREATE OBJECT mo_helper. + mo_helper = NEW #( ). mo_helper->add_local( iv_obj_type = 'DOMA' iv_obj_name = '$$ZDOMA1' diff --git a/src/syntax/zcl_abapgit_syntax_abap.clas.abap b/src/syntax/zcl_abapgit_syntax_abap.clas.abap index 49169cd6c..ddb4c1aac 100644 --- a/src/syntax/zcl_abapgit_syntax_abap.clas.abap +++ b/src/syntax/zcl_abapgit_syntax_abap.clas.abap @@ -75,9 +75,8 @@ CLASS ZCL_ABAPGIT_SYNTAX_ABAP IMPLEMENTATION. METHOD init_keywords. - TYPES temp1 TYPE STANDARD TABLE OF string. -DATA: lv_keywords TYPE string, - lt_keywords TYPE temp1. + DATA: lv_keywords TYPE string, + lt_keywords TYPE STANDARD TABLE OF string. lv_keywords = '&&|?TO|ABAP-SOURCE|ABBREVIATED|ABS|ABSTRACT|ACCEPT|ACCEPTING' && @@ -207,9 +206,7 @@ DATA: lv_keywords TYPE string, lv_str = to_upper( iv_chunk ). READ TABLE gt_keywords WITH KEY table_line = lv_str TRANSPORTING NO FIELDS. - DATA temp1 TYPE xsdboolean. - temp1 = boolc( sy-subrc = 0 ). - rv_yes = temp1. + rv_yes = xsdbool( sy-subrc = 0 ). ENDMETHOD. diff --git a/src/syntax/zcl_abapgit_syntax_abap.clas.testclasses.abap b/src/syntax/zcl_abapgit_syntax_abap.clas.testclasses.abap index 2f258d464..5e4e5a283 100644 --- a/src/syntax/zcl_abapgit_syntax_abap.clas.testclasses.abap +++ b/src/syntax/zcl_abapgit_syntax_abap.clas.testclasses.abap @@ -17,7 +17,7 @@ CLASS ltcl_abapgit_syntax_abap IMPLEMENTATION. METHOD setup. - CREATE OBJECT mo_cut. + mo_cut = NEW #( ). ENDMETHOD. @@ -64,7 +64,7 @@ ENDCLASS. CLASS ltcl_syntax_basic_logic IMPLEMENTATION. METHOD setup. - CREATE OBJECT mo_syntax_highlighter. + mo_syntax_highlighter = NEW #( ). ENDMETHOD. METHOD format_line. @@ -182,7 +182,7 @@ CLASS ltcl_syntax_cases IMPLEMENTATION. lo_syntax TYPE REF TO zcl_abapgit_syntax_abap. - CREATE OBJECT lo_syntax. + lo_syntax = NEW #( ). lt_matches_act = lo_syntax->parse_line( iv_line ). SORT lt_matches_act BY offset. diff --git a/src/syntax/zcl_abapgit_syntax_css.clas.abap b/src/syntax/zcl_abapgit_syntax_css.clas.abap index f6a84de39..5d16feeef 100644 --- a/src/syntax/zcl_abapgit_syntax_css.clas.abap +++ b/src/syntax/zcl_abapgit_syntax_css.clas.abap @@ -342,8 +342,7 @@ CLASS zcl_abapgit_syntax_css IMPLEMENTATION. METHOD insert_keywords. - TYPES temp1 TYPE STANDARD TABLE OF string. -DATA: lt_keywords TYPE temp1, + DATA: lt_keywords TYPE STANDARD TABLE OF string, ls_keyword TYPE ty_keyword. FIELD-SYMBOLS: TYPE any. @@ -366,9 +365,7 @@ DATA: lt_keywords TYPE temp1, lv_str = to_lower( iv_chunk ). READ TABLE gt_keywords WITH TABLE KEY keyword = lv_str TRANSPORTING NO FIELDS. - DATA temp1 TYPE xsdboolean. - temp1 = boolc( sy-subrc = 0 ). - rv_yes = temp1. + rv_yes = xsdbool( sy-subrc = 0 ). ENDMETHOD. diff --git a/src/syntax/zcl_abapgit_syntax_factory.clas.abap b/src/syntax/zcl_abapgit_syntax_factory.clas.abap index 6f1e62929..15204ac83 100644 --- a/src/syntax/zcl_abapgit_syntax_factory.clas.abap +++ b/src/syntax/zcl_abapgit_syntax_factory.clas.abap @@ -24,17 +24,17 @@ CLASS zcl_abapgit_syntax_factory IMPLEMENTATION. " Create instance of highlighter dynamically dependent on syntax type IF iv_filename CP '*.abap'. - CREATE OBJECT ro_instance TYPE zcl_abapgit_syntax_abap. + ro_instance = NEW zcl_abapgit_syntax_abap( ). ELSEIF iv_filename CP '*.xml' OR iv_filename CP '*.html' OR iv_filename CP '*.xdp'. - CREATE OBJECT ro_instance TYPE zcl_abapgit_syntax_xml. + ro_instance = NEW zcl_abapgit_syntax_xml( ). ELSEIF iv_filename CP '*.css'. - CREATE OBJECT ro_instance TYPE zcl_abapgit_syntax_css. + ro_instance = NEW zcl_abapgit_syntax_css( ). ELSEIF iv_filename CP '*.js'. - CREATE OBJECT ro_instance TYPE zcl_abapgit_syntax_js. + ro_instance = NEW zcl_abapgit_syntax_js( ). ELSEIF iv_filename CP '*.json' OR iv_filename CP '*.jsonc'. - CREATE OBJECT ro_instance TYPE zcl_abapgit_syntax_json. + ro_instance = NEW zcl_abapgit_syntax_json( ). ELSEIF iv_filename CP '*.txt' OR iv_filename CP '*.ini' OR iv_filename CP '*.text'. - CREATE OBJECT ro_instance TYPE zcl_abapgit_syntax_txt. + ro_instance = NEW zcl_abapgit_syntax_txt( ). ELSE. CLEAR ro_instance. ENDIF. diff --git a/src/syntax/zcl_abapgit_syntax_highlighter.clas.abap b/src/syntax/zcl_abapgit_syntax_highlighter.clas.abap index 9859b339f..8bd1501bb 100644 --- a/src/syntax/zcl_abapgit_syntax_highlighter.clas.abap +++ b/src/syntax/zcl_abapgit_syntax_highlighter.clas.abap @@ -33,9 +33,8 @@ CLASS zcl_abapgit_syntax_highlighter DEFINITION END OF ty_rule . CONSTANTS c_token_none TYPE c VALUE '.' ##NO_TEXT. - TYPES temp1_fcfa3a189b TYPE STANDARD TABLE OF ty_rule. -DATA: - mt_rules TYPE temp1_fcfa3a189b . + DATA: + mt_rules TYPE STANDARD TABLE OF ty_rule . DATA mv_hidden_chars TYPE abap_bool . METHODS add_rule @@ -94,8 +93,8 @@ CLASS zcl_abapgit_syntax_highlighter IMPLEMENTATION. DATA ls_rule LIKE LINE OF mt_rules. IF NOT iv_regex IS INITIAL. - CREATE OBJECT ls_rule-regex EXPORTING pattern = iv_regex - ignore_case = abap_true. + ls_rule-regex = NEW #( pattern = iv_regex + ignore_case = abap_true ). ENDIF. ls_rule-token = iv_token. @@ -193,9 +192,7 @@ CLASS zcl_abapgit_syntax_highlighter IMPLEMENTATION. "/^\s+$/ lv_whitespace = ` ` && cl_abap_char_utilities=>horizontal_tab && cl_abap_char_utilities=>cr_lf. - DATA temp1 TYPE xsdboolean. - temp1 = boolc( iv_string CO lv_whitespace ). - rv_result = temp1. + rv_result = xsdbool( iv_string CO lv_whitespace ). ENDMETHOD. diff --git a/src/syntax/zcl_abapgit_syntax_js.clas.abap b/src/syntax/zcl_abapgit_syntax_js.clas.abap index 78e7dfe29..93d6f417d 100644 --- a/src/syntax/zcl_abapgit_syntax_js.clas.abap +++ b/src/syntax/zcl_abapgit_syntax_js.clas.abap @@ -151,8 +151,7 @@ CLASS zcl_abapgit_syntax_js IMPLEMENTATION. METHOD insert_keywords. - TYPES temp1 TYPE STANDARD TABLE OF string. -DATA: lt_keywords TYPE temp1, + DATA: lt_keywords TYPE STANDARD TABLE OF string, ls_keyword TYPE ty_keyword. FIELD-SYMBOLS: TYPE any. @@ -175,9 +174,7 @@ DATA: lt_keywords TYPE temp1, lv_str = to_lower( iv_chunk ). READ TABLE gt_keywords WITH TABLE KEY keyword = lv_str TRANSPORTING NO FIELDS. - DATA temp1 TYPE xsdboolean. - temp1 = boolc( sy-subrc = 0 ). - rv_yes = temp1. + rv_yes = xsdbool( sy-subrc = 0 ). ENDMETHOD. diff --git a/src/syntax/zcl_abapgit_syntax_json.clas.testclasses.abap b/src/syntax/zcl_abapgit_syntax_json.clas.testclasses.abap index dd12c12fd..d4141262c 100644 --- a/src/syntax/zcl_abapgit_syntax_json.clas.testclasses.abap +++ b/src/syntax/zcl_abapgit_syntax_json.clas.testclasses.abap @@ -19,7 +19,7 @@ CLASS ltcl_abapgit_syntax_json IMPLEMENTATION. METHOD setup. - CREATE OBJECT mo_cut. + mo_cut = NEW #( ). ENDMETHOD. diff --git a/src/syntax/zcl_abapgit_syntax_xml.clas.testclasses.abap b/src/syntax/zcl_abapgit_syntax_xml.clas.testclasses.abap index 587c5d464..37a3e4fc4 100644 --- a/src/syntax/zcl_abapgit_syntax_xml.clas.testclasses.abap +++ b/src/syntax/zcl_abapgit_syntax_xml.clas.testclasses.abap @@ -24,7 +24,7 @@ CLASS ltcl_abapgit_syntax_xml IMPLEMENTATION. METHOD setup. - CREATE OBJECT mo_cut. + mo_cut = NEW #( ). ENDMETHOD. @@ -121,7 +121,7 @@ CLASS ltcl_abapgit_syntax_xml IMPLEMENTATION. act = mo_cut->process_line( |