abapgit-agent 1.0.0 → 1.0.1

package/INSTALL.md

@@ -62,11 +62,11 @@ Deploy ABAP objects using abapGit:
 
 ```bash
 # Option A: Install globally for system-level integration
-sudo npm link
+sudo npm install -g abapgit-agent
 
-# Option B: Use from cloned repo
+# Option B: For local development, use npm link instead
 cd abapgit-agent
-npm install
+sudo npm link
 ```
 
 ## Configuration
@@ -100,7 +100,7 @@ cp .abapGitAgent.example .abapGitAgent
 
 This package supports **system-level integration**, meaning any ABAP git repository can use it without cloning this repository:
 
-1. **Install globally**: `sudo npm link`
+1. **Install globally**: `sudo npm install -g abapgit-agent`
 2. **Configure**: Add `.abapGitAgent` to your ABAP repo
 3. **Use**: Run `abapgit-agent` from your repo directory
 

package/README.md

@@ -14,7 +14,8 @@ This project provides a bridge between AI coding tools and your ABAP system:
 
 ## Quick Start
 
-1. **Install CLI**: From this repo, run `sudo npm link`
+1. **Install CLI**: Run `sudo npm install -g abapgit-agent`
+   - For local development, use `sudo npm link` from this repo instead
 2. **Configure repo**: Add `.abapGitAgent` with SAP credentials
 3. **Validate code**: Run `abapgit-agent pull` after pushing
 
@@ -111,6 +112,7 @@ Failure case with details:
 | Topic | File |
 |-------|------|
 | Installation & Setup | [INSTALL.md](INSTALL.md) |
+| CLI Commands Overview | [docs/commands.md](docs/commands.md) |
 | REST API Reference | [API.md](API.md) |
 | Error Handling | [ERROR_HANDLING.md](ERROR_HANDLING.md) |
 | ABAP Coding Guidelines | [abap/CLAUDE.md](abap/CLAUDE.md) |

package/abap/zcl_abgagt_agent.clas.abap

@@ -62,25 +62,6 @@ CLASS zcl_abgagt_agent DEFINITION PUBLIC FINAL CREATE PUBLIC.
       RETURNING
         VALUE(rs_result) TYPE zif_abgagt_agent=>ty_result.
 
-    METHODS get_test_classes
-      IMPORTING
-        iv_package TYPE devclass OPTIONAL
-        it_objects TYPE zif_abgagt_agent=>ty_object_keys OPTIONAL
-      RETURNING
-        VALUE(rt_classes) TYPE zif_abgagt_agent=>ty_object_keys.
-
-    METHODS run_aunit_tests
-      IMPORTING
-        it_classes TYPE zif_abgagt_agent=>ty_object_keys
-      RETURNING
-        VALUE(rt_results) TYPE zif_abgagt_agent=>ty_test_results.
-
-    METHODS count_results
-      IMPORTING
-        it_results TYPE zif_abgagt_agent=>ty_test_results
-      CHANGING
-        rs_stats TYPE zif_abgagt_agent=>ty_unit_result.
-
 ENDCLASS.
 
 CLASS zcl_abgagt_agent IMPLEMENTATION.
@@ -182,179 +163,6 @@ CLASS zcl_abgagt_agent IMPLEMENTATION.
     ENDIF.
   ENDMETHOD.
 
-  METHOD zif_abgagt_agent~inspect.
-    DATA ls_error LIKE LINE OF rs_result-errors.
-    DATA lv_obj_type TYPE string.
-    DATA lv_obj_name TYPE string.
-
-    " Convert file name to object type and name
-    parse_file_to_object(
-      EXPORTING iv_file = iv_file
-      IMPORTING ev_obj_type = lv_obj_type
-                ev_obj_name = lv_obj_name ).
-
-    rs_result-success = abap_true.
-    rs_result-object_type = lv_obj_type.
-    rs_result-object_name = lv_obj_name.
-
-    TRY.
-        " Check if object exists in TADIR
-        DATA lv_devclass TYPE devclass.
-        SELECT SINGLE devclass FROM tadir
-          INTO lv_devclass
-          WHERE pgmid = 'R3TR'
-            AND object = lv_obj_type
-            AND obj_name = lv_obj_name.
-
-        IF lv_devclass IS INITIAL.
-          rs_result-success = abap_false.
-          rs_result-error_count = 1.
-          ls_error-line = '1'.
-          ls_error-column = '1'.
-          ls_error-text = |Object { lv_obj_type } { lv_obj_name } does not exist|.
-          ls_error-word = ''.
-          APPEND ls_error TO rs_result-errors.
-          RETURN.
-        ENDIF.
-
-        " Create object structure for the specific object
-        DATA ls_obj TYPE scir_objs.
-        ls_obj-objtype = lv_obj_type.
-        ls_obj-objname = lv_obj_name.
-
-        DATA lt_objects TYPE scit_objs.
-        APPEND ls_obj TO lt_objects.
-
-        " Create unique name for inspection
-        DATA lv_name TYPE sci_objs.
-        CONCATENATE 'SYNT_' sy-uname sy-datum sy-uzeit INTO lv_name.
-
-        " Create object set
-        DATA(lo_objset) = cl_ci_objectset=>save_from_list(
-          p_name    = lv_name
-          p_objects = lt_objects ).
-
-        " Get check variant for syntax check
-        DATA(lo_variant) = cl_ci_checkvariant=>get_ref(
-          p_user = ''
-          p_name = 'SYNTAX_CHECK' ).
-
-        " Create inspection
-        cl_ci_inspection=>create(
-          EXPORTING
-            p_user = sy-uname
-            p_name = lv_name
-          RECEIVING
-            p_ref = DATA(lo_inspection) ).
-
-        " Set inspection with object set and variant
-        lo_inspection->set(
-          EXPORTING
-            p_chkv = lo_variant
-            p_objs = lo_objset ).
-
-        " Save inspection
-        lo_inspection->save( ).
-
-        " Run inspection via RFC (for async CLI execution)
-        lo_inspection->run(
-          EXPORTING
-            p_howtorun = 'R'
-          EXCEPTIONS
-            invalid_check_version = 1
-            OTHERS = 2 ).
-
-        " Get results
-        DATA lt_list TYPE scit_alvlist.
-        lo_inspection->plain_list( IMPORTING p_list = lt_list ).
-
-        " Parse results
-        LOOP AT lt_list INTO DATA(ls_list).
-          " Only include errors for the requested object
-          IF ls_list-objtype = lv_obj_type AND ls_list-objname = lv_obj_name.
-            CLEAR ls_error.
-            ls_error-line = ls_list-line.
-            ls_error-column = ls_list-col.
-            ls_error-text = ls_list-text.
-            ls_error-word = ls_list-code.
-            APPEND ls_error TO rs_result-errors.
-          ENDIF.
-        ENDLOOP.
-
-        " Cleanup
-        lo_inspection->delete(
-          EXCEPTIONS
-            locked = 1
-            error_in_enqueue = 2
-            not_authorized = 3
-            exceptn_appl_exists = 4
-            OTHERS = 5 ).
-
-        lo_objset->delete(
-          EXCEPTIONS
-            exists_in_insp = 1
-            locked = 2
-            error_in_enqueue = 3
-            not_authorized = 4
-            exists_in_objs = 5
-            OTHERS = 6 ).
-
-        rs_result-error_count = lines( rs_result-errors ).
-        IF rs_result-error_count > 0.
-          rs_result-success = abap_false.
-        ENDIF.
-
-      CATCH cx_root INTO DATA(lx_error).
-        rs_result-success = abap_false.
-        rs_result-error_count = 1.
-        ls_error-line = '1'.
-        ls_error-column = '1'.
-        ls_error-text = lx_error->get_text( ).
-        ls_error-word = ''.
-        APPEND ls_error TO rs_result-errors.
-    ENDTRY.
-  ENDMETHOD.
-
-  METHOD zif_abgagt_agent~run_tests.
-    " Initialize result
-    rs_result-success = abap_false.
-    rs_result-test_count = 0.
-    rs_result-passed_count = 0.
-    rs_result-failed_count = 0.
-
-    " Get test classes to run
-    DATA(lt_test_classes) = get_test_classes(
-      iv_package = iv_package
-      it_objects = it_objects ).
-
-    IF lt_test_classes IS INITIAL.
-      rs_result-message = 'No test classes found'.
-      RETURN.
-    ENDIF.
-
-    rs_result-message = |Found { lines( lt_test_classes ) } test class(es)|.
-
-    " Run AUnit tests
-    rs_result-results = run_aunit_tests( lt_test_classes ).
-
-    IF rs_result-results IS INITIAL.
-      rs_result-message = |No test results - { rs_result-message }|.
-      RETURN.
-    ENDIF.
-
-    " Count results
-    count_results(
-      EXPORTING it_results = rs_result-results
-      CHANGING rs_stats = rs_result ).
-
-    IF rs_result-failed_count = 0.
-      rs_result-success = abap_true.
-      rs_result-message = |All { rs_result-test_count } tests passed|.
-    ELSE.
-      rs_result-message = |{ rs_result-failed_count } of { rs_result-test_count } tests failed|.
-    ENDIF.
-  ENDMETHOD.
-
   METHOD configure_credentials.
     zcl_abapgit_persist_factory=>get_user( )->set_repo_git_user_name(
       iv_url = iv_url iv_username = iv_username ).
@@ -605,163 +413,6 @@ CLASS zcl_abgagt_agent IMPLEMENTATION.
     ENDWHILE.
   ENDMETHOD.
 
-  METHOD get_test_classes.
-    DATA: lt_tadir TYPE TABLE OF tadir.
-
-    FIELD-SYMBOLS: <ls_tadir> LIKE LINE OF lt_tadir.
-
-    " Get all test classes from package
-    IF iv_package IS NOT INITIAL.
-      SELECT * FROM tadir
-        INTO TABLE lt_tadir
-        WHERE devclass = iv_package
-          AND object = 'CLAS'
-          AND obj_name LIKE '%_TEST'
-        ORDER BY obj_name.
-
-      LOOP AT lt_tadir ASSIGNING <ls_tadir>.
-        APPEND INITIAL LINE TO rt_classes ASSIGNING FIELD-SYMBOL(<ls_class>).
-        <ls_class>-object_type = 'CLAS'.
-        <ls_class>-object_name = <ls_tadir>-obj_name.
-      ENDLOOP.
-    ENDIF.
-
-    " Add specified objects
-    IF it_objects IS NOT INITIAL.
-      LOOP AT it_objects ASSIGNING FIELD-SYMBOL(<ls_obj>).
-        APPEND INITIAL LINE TO rt_classes ASSIGNING <ls_class>.
-        <ls_class>-object_type = <ls_obj>-object_type.
-        <ls_class>-object_name = <ls_obj>-object_name.
-      ENDLOOP.
-    ENDIF.
-
-    " Remove duplicates
-    SORT rt_classes BY object_name.
-    DELETE ADJACENT DUPLICATES FROM rt_classes COMPARING object_name.
-
-  ENDMETHOD.
-
-  METHOD run_aunit_tests.
-    " Run unit tests using CL_SUT_AUNIT_RUNNER
-    DATA: lo_runner TYPE REF TO cl_sut_aunit_runner.
-
-    " Create runner using s_create
-    cl_sut_aunit_runner=>s_create(
-      EXPORTING
-        p_cov       = abap_false
-        i_flg_api   = abap_true
-      RECEIVING
-        r_ref_runner = lo_runner ).
-
-    " Configure runner
-    lo_runner->p_disp = abap_false.    " Don't show results UI
-    lo_runner->p_save = abap_true.      " Save values
-    lo_runner->p_runmd = 'E'.           " Execute only (not plan)
-
-    " Set test classes
-    DATA lv_test_classes TYPE string.
-    LOOP AT it_classes ASSIGNING FIELD-SYMBOL(<ls_class>).
-      IF lv_test_classes IS INITIAL.
-        lv_test_classes = <ls_class>-object_name.
-      ELSE.
-        lv_test_classes = |{ lv_test_classes } { <ls_class>-object_name }|.
-      ENDIF.
-    ENDLOOP.
-
-    " Run tests
-    TRY.
-        lo_runner->run(
-          EXPORTING
-            i_flg_select_only = abap_false
-          EXCEPTIONS
-            OTHERS = 1 ).
-      CATCH cx_sut_error.
-        RETURN.
-    ENDTRY.
-
-    IF sy-subrc <> 0.
-      RETURN.
-    ENDIF.
-
-    " Get results from tab_objects
-    DATA(lt_objects) = lo_runner->tab_objects.
-
-    IF lt_objects IS INITIAL.
-      RETURN.
-    ENDIF.
-
-    " Process results - structure: OBJECT-TAB_TESTCLASSES-TAB_METHODS
-    LOOP AT lt_objects ASSIGNING FIELD-SYMBOL(<ls_object>).
-      DATA(lv_obj_name) = <ls_object>-obj_name.
-
-      " Loop through test classes
-      LOOP AT <ls_object>-tab_testclasses ASSIGNING FIELD-SYMBOL(<ls_tcl>).
-        DATA(lv_tcl_name) = <ls_tcl>-testclass.
-
-        " Loop through test methods
-        LOOP AT <ls_tcl>-tab_methods ASSIGNING FIELD-SYMBOL(<ls_method>).
-          " Extract fields dynamically since structure names vary
-          DATA: lv_methodname TYPE string,
-                lv_kind TYPE string,
-                lv_desc TYPE string,
-                lv_src TYPE string.
-
-          ASSIGN COMPONENT 'METHODNAME' OF STRUCTURE <ls_method> TO FIELD-SYMBOL(<lv_mname>).
-          IF sy-subrc = 0 AND <lv_mname> IS ASSIGNED.
-            lv_methodname = <lv_mname>.
-          ENDIF.
-
-          ASSIGN COMPONENT 'KIND' OF STRUCTURE <ls_method> TO FIELD-SYMBOL(<lv_kind>).
-          IF sy-subrc = 0 AND <lv_kind> IS ASSIGNED.
-            lv_kind = <lv_kind>.
-          ENDIF.
-
-          ASSIGN COMPONENT 'DESCRIPTION' OF STRUCTURE <ls_method> TO FIELD-SYMBOL(<lv_desc>).
-          IF sy-subrc = 0 AND <lv_desc> IS ASSIGNED.
-            lv_desc = <lv_desc>.
-          ENDIF.
-
-          ASSIGN COMPONENT 'SOURCE' OF STRUCTURE <ls_method> TO FIELD-SYMBOL(<lv_src>).
-          IF sy-subrc = 0 AND <lv_src> IS ASSIGNED.
-            lv_src = <lv_src>.
-          ENDIF.
-
-          DATA(ls_result) = VALUE zif_abgagt_agent=>ty_test_result(
-            object_type = 'CLAS'
-            object_name = lv_obj_name
-            test_method = lv_methodname
-            status = lv_kind
-            message = lv_desc
-            line = lv_src
-          ).
-          APPEND ls_result TO rt_results.
-        ENDLOOP.
-      ENDLOOP.
-    ENDLOOP.
-  ENDMETHOD.
-
-  METHOD count_results.
-    rs_stats-test_count = lines( it_results ).
-    rs_stats-passed_count = 0.
-    rs_stats-failed_count = 0.
-
-    LOOP AT it_results ASSIGNING FIELD-SYMBOL(<ls_result>).
-      CASE <ls_result>-status.
-        WHEN 'P' OR 'S'.  " Passed or Success
-          rs_stats-passed_count = rs_stats-passed_count + 1.
-        WHEN 'A' OR 'E' OR 'F'.  " Abort, Error, or Failed
-          rs_stats-failed_count = rs_stats-failed_count + 1.
-        WHEN OTHERS.
-          IF <ls_result>-message CS 'Passed' OR <ls_result>-message CS 'passed'.
-            rs_stats-passed_count = rs_stats-passed_count + 1.
-          ELSE.
-            rs_stats-failed_count = rs_stats-failed_count + 1.
-          ENDIF.
-      ENDCASE.
-    ENDLOOP.
-
-  ENDMETHOD.
-
   METHOD get_version.
     rv_version = '1.0.0'.
   ENDMETHOD.

package/abap/zcl_abgagt_cmd_factory.clas.abap

@@ -22,9 +22,11 @@ CLASS zcl_abgagt_cmd_factory IMPLEMENTATION.
   METHOD constructor.
     " Build command to class name mapping
     mt_command_map = VALUE #(
-      ( command = zif_abgagt_command=>gc_pull     class_name = 'ZCL_ABGAGT_COMMAND_PULL' )
+      ( command = zif_abgagt_command=>gc_pull    class_name = 'ZCL_ABGAGT_COMMAND_PULL' )
       ( command = zif_abgagt_command=>gc_inspect class_name = 'ZCL_ABGAGT_COMMAND_INSPECT' )
       ( command = zif_abgagt_command=>gc_unit   class_name = 'ZCL_ABGAGT_COMMAND_UNIT' )
+      ( command = zif_abgagt_command=>gc_create class_name = 'ZCL_ABGAGT_COMMAND_CREATE' )
+      ( command = zif_abgagt_command=>gc_import class_name = 'ZCL_ABGAGT_COMMAND_IMPORT' )
     ).
   ENDMETHOD.
 

package/abap/zcl_abgagt_command_create.clas.abap

@@ -0,0 +1,86 @@
+*"*"use source
+*"*"Local Interface:
+*"**********************************************************************
+CLASS zcl_abgagt_command_create DEFINITION PUBLIC FINAL CREATE PUBLIC.
+
+  PUBLIC SECTION.
+    INTERFACES zif_abgagt_command.
+
+    TYPES: BEGIN OF ty_create_params,
+             url TYPE string,
+             branch TYPE string,
+             package TYPE string,
+             display_name TYPE string,
+             name TYPE string,
+             folder_logic TYPE string,
+             username TYPE string,
+             password TYPE string,
+           END OF ty_create_params.
+
+ENDCLASS.
+
+CLASS zcl_abgagt_command_create IMPLEMENTATION.
+
+  METHOD zif_abgagt_command~get_name.
+    rv_name = 'CREATE'.
+  ENDMETHOD.
+
+  METHOD zif_abgagt_command~execute.
+    DATA: ls_params TYPE ty_create_params,
+          lv_package TYPE devclass,
+          li_repo TYPE REF TO zif_abapgit_repo.
+
+    IF is_param IS SUPPLIED.
+      ls_params = CORRESPONDING #( is_param ).
+    ENDIF.
+
+    IF ls_params-folder_logic IS INITIAL.
+      ls_params-folder_logic = 'PREFIX'.
+    ENDIF.
+
+    IF ls_params-url IS INITIAL.
+      rv_result = '{"success":"","error":"URL is required"}'.
+      RETURN.
+    ENDIF.
+
+    IF ls_params-package IS INITIAL.
+      rv_result = '{"success":"","error":"Package is required"}'.
+      RETURN.
+    ENDIF.
+
+    lv_package = ls_params-package.
+
+    IF ls_params-username IS NOT INITIAL AND ls_params-password IS NOT INITIAL.
+      zcl_abapgit_persist_factory=>get_user( )->set_repo_git_user_name(
+        iv_url = ls_params-url iv_username = ls_params-username ).
+      zcl_abapgit_persist_factory=>get_user( )->set_repo_login(
+        iv_url = ls_params-url iv_login = ls_params-username ).
+      zcl_abapgit_login_manager=>set_basic(
+        iv_uri      = ls_params-url
+        iv_username = ls_params-username
+        iv_password = ls_params-password ).
+    ENDIF.
+
+    TRY.
+        li_repo = zcl_abapgit_repo_srv=>get_instance( )->new_online(
+          iv_url            = ls_params-url
+          iv_branch_name    = ls_params-branch
+          iv_display_name   = ls_params-display_name
+          iv_name           = ls_params-name
+          iv_package        = lv_package
+          iv_folder_logic   = ls_params-folder_logic ).
+      CATCH zcx_abapgit_exception INTO DATA(lx_error).
+        rv_result = '{"success":"","error":"' && lx_error->get_text( ) && '"}'.
+        RETURN.
+    ENDTRY.
+
+    DATA lv_response TYPE string.
+    lv_response = '{"success":"X",'.
+    lv_response = lv_response && '"repo_key":"' && li_repo->get_key( ) && '",'.
+    lv_response = lv_response && '"repo_name":"' && li_repo->get_name( ) && '",'.
+    lv_response = lv_response && '"message":"Repository created successfully"}'.
+
+    rv_result = lv_response.
+  ENDMETHOD.
+
+ENDCLASS.

package/abap/zcl_abgagt_command_create.clas.xml

@@ -0,0 +1,15 @@
+<?xml version="1.0" encoding="utf-8"?>
+<abapGit version="v1.0.0" serializer="LCL_OBJECT_CLAS" serializer_version="v1.0.0">
+ <asx:abap xmlns:asx="http://www.sap.com/abapxml" version="1.0">
+  <asx:values>
+   <VSEOCLASS>
+    <CLSNAME>ZCL_ABGAGT_COMMAND_CREATE</CLSNAME>
+    <LANGU>E</LANGU>
+    <DESCRIPT>ABAP Git Agent - Create Command</DESCRIPT>
+    <EXPOSURE>2</EXPOSURE>
+    <STATE>1</STATE>
+    <UNICODE>X</UNICODE>
+   </VSEOCLASS>
+  </asx:values>
+ </asx:abap>
+</abapGit>

package/abap/zcl_abgagt_command_import.clas.abap

@@ -0,0 +1,138 @@
+*"*"use source
+*"*"Local Interface:
+*"**********************************************************************
+CLASS zcl_abgagt_command_import DEFINITION PUBLIC FINAL CREATE PUBLIC.
+
+  PUBLIC SECTION.
+    INTERFACES zif_abgagt_command.
+
+    TYPES: BEGIN OF ty_import_params,
+             url TYPE string,
+             message TYPE string,
+             username TYPE string,
+             password TYPE string,
+           END OF ty_import_params.
+
+ENDCLASS.
+
+CLASS zcl_abgagt_command_import IMPLEMENTATION.
+
+  METHOD zif_abgagt_command~get_name.
+    rv_name = 'IMPORT'.
+  ENDMETHOD.
+
+  METHOD zif_abgagt_command~execute.
+    DATA: ls_params TYPE ty_import_params,
+          li_repo TYPE REF TO zif_abapgit_repo,
+          li_repo_online TYPE REF TO zif_abapgit_repo_online,
+          lo_stage TYPE REF TO zcl_abapgit_stage,
+          lt_files TYPE zif_abapgit_definitions=>ty_files_item_tt,
+          lv_package TYPE devclass,
+          lv_message TYPE string,
+          lv_files_staged TYPE i.
+
+    " Use separate variables to avoid inline DATA issues
+    DATA: li_user TYPE REF TO zif_abapgit_persist_user,
+          lv_committer_name TYPE string,
+          lv_committer_email TYPE string.
+
+    TRY.
+        IF is_param IS SUPPLIED.
+          ls_params = CORRESPONDING #( is_param ).
+        ENDIF.
+
+        " Validate URL
+        IF ls_params-url IS INITIAL.
+          rv_result = '{"success":"","error":"URL is required"}'.
+          RETURN.
+        ENDIF.
+
+        " Configure credentials if provided
+        IF ls_params-username IS NOT INITIAL AND ls_params-password IS NOT INITIAL.
+          zcl_abapgit_persist_factory=>get_user( )->set_repo_git_user_name(
+            iv_url = ls_params-url iv_username = ls_params-username ).
+          zcl_abapgit_persist_factory=>get_user( )->set_repo_login(
+            iv_url = ls_params-url iv_login = ls_params-username ).
+          zcl_abapgit_login_manager=>set_basic(
+            iv_uri      = ls_params-url
+            iv_username = ls_params-username
+            iv_password = ls_params-password ).
+        ENDIF.
+
+        " Find repository by URL
+        zcl_abapgit_repo_srv=>get_instance( )->get_repo_from_url(
+          EXPORTING iv_url = ls_params-url
+          IMPORTING ei_repo = li_repo ).
+
+        IF li_repo IS NOT BOUND.
+          rv_result = '{"success":"","error":"Repository not found"}'.
+          RETURN.
+        ENDIF.
+
+        " Cast to online repo for push operations
+        li_repo_online ?= li_repo.
+
+        " Get package from repository
+        lv_package = li_repo->get_package( ).
+
+        " Build commit message if not provided
+        IF ls_params-message IS INITIAL.
+          lv_message = |feat: initial import from ABAP package { lv_package }|.
+        ELSE.
+          lv_message = ls_params-message.
+        ENDIF.
+
+        " Refresh repository
+        li_repo->refresh( ).
+
+        " Get local files
+        lt_files = li_repo->get_files_local( ).
+
+        " Count files
+        lv_files_staged = lines( lt_files ).
+
+        " Check if there are files to import
+        IF lv_files_staged = 0.
+          rv_result = '{"success":"","error":"No objects found in package"}'.
+          RETURN.
+        ENDIF.
+
+        " Create stage
+        CREATE OBJECT lo_stage.
+
+        " Add all files to stage
+        LOOP AT lt_files ASSIGNING FIELD-SYMBOL(<ls_file>).
+          lo_stage->add(
+            iv_path     = <ls_file>-file-path
+            iv_filename = <ls_file>-file-filename
+            iv_data     = <ls_file>-file-data ).
+        ENDLOOP.
+
+        " Get user details for committer
+        li_user = zcl_abapgit_persist_factory=>get_user( ).
+        lv_committer_name = li_user->get_default_git_user_name( ).
+        lv_committer_email = li_user->get_default_git_user_email( ).
+
+        " Prepare commit
+        DATA: ls_comment TYPE zif_abapgit_git_definitions=>ty_comment.
+        ls_comment-committer-name  = lv_committer_name.
+        ls_comment-committer-email = lv_committer_email.
+        ls_comment-comment         = lv_message.
+
+        " Commit and push
+        li_repo_online->push(
+          is_comment = ls_comment
+          io_stage   = lo_stage ).
+
+        COMMIT WORK.
+
+        rv_result = '{"success":"X","files_staged":"' && lv_files_staged && '","commit_message":"' && lv_message && '"}'.
+
+      CATCH zcx_abapgit_exception INTO DATA(lx_error).
+        rv_result = '{"success":"","error":"' && lx_error->get_text( ) && '"}'.
+      CATCH cx_root INTO DATA(lx_other).
+        rv_result = '{"success":"","error":"' && lx_other->get_text( ) && '"}'.
+    ENDTRY.
+  ENDMETHOD.
+
+ENDCLASS.

package/abap/zcl_abgagt_command_import.clas.xml

@@ -0,0 +1,15 @@
+<?xml version="1.0" encoding="utf-8"?>
+<abapGit version="v1.0.0" serializer="LCL_OBJECT_CLAS" serializer_version="v1.0.0">
+ <asx:abap xmlns:asx="http://www.sap.com/abapxml" version="1.0">
+  <asx:values>
+   <VSEOCLASS>
+    <CLSNAME>ZCL_ABGAGT_COMMAND_IMPORT</CLSNAME>
+    <LANGU>E</LANGU>
+    <DESCRIPT>Import command for ABAP Git Agent</DESCRIPT>
+    <EXPOSURE>2</EXPOSURE>
+    <STATE>1</STATE>
+    <UNICODE>X</UNICODE>
+   </VSEOCLASS>
+  </asx:values>
+ </asx:abap>
+</abapGit>