SAP/abapGit
1
0
Fork 0
mirror of https://github.com/abapGit/abapGit.git synced 2025-05-01 04:08:27 +08:00
Code Issues Actions 1 Packages Projects Releases Wiki Activity

remove some use of tihttpnvp (#6676)

Browse Source
This commit is contained in:
Lars Hvam 2023-11-30 08:39:01 +01:00 committed by GitHub
parent 9419a10e87
commit f6343068ef
No known key found for this signature in database
GPG Key ID: 4AEE18F83AFDEB23
2 changed files with 25 additions and 13 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

16
src/ui/core/zcl_abapgit_gui_event.clas.abap
View File

@ -30,9 +30,15 @@ CLASS zcl_abapgit_gui_event DEFINITION
CLASS-DATA gv_non_breaking_space TYPE string . CLASS-DATA gv_non_breaking_space TYPE string .
TYPES: BEGIN OF ty_name_value,
name TYPE string,
value TYPE string,
END OF ty_name_value.
TYPES ty_name_value_tt TYPE STANDARD TABLE OF ty_name_value WITH DEFAULT KEY.
METHODS fields_to_map METHODS fields_to_map
IMPORTING IMPORTING
it_fields TYPE tihttpnvp it_fields TYPE ty_name_value_tt
RETURNING RETURNING
VALUE(ro_string_map) TYPE REF TO zcl_abapgit_string_map VALUE(ro_string_map) TYPE REF TO zcl_abapgit_string_map
RAISING RAISING
@ -43,19 +49,19 @@ CLASS zcl_abapgit_gui_event DEFINITION
!it_post_data TYPE zif_abapgit_html_viewer=>ty_post_data !it_post_data TYPE zif_abapgit_html_viewer=>ty_post_data
!iv_upper_cased TYPE abap_bool DEFAULT abap_false !iv_upper_cased TYPE abap_bool DEFAULT abap_false
RETURNING RETURNING
VALUE(rt_fields) TYPE tihttpnvp . VALUE(rt_fields) TYPE ty_name_value_tt .
CLASS-METHODS parse_fields CLASS-METHODS parse_fields
IMPORTING IMPORTING
!iv_string TYPE clike !iv_string TYPE clike
!iv_upper_cased TYPE abap_bool DEFAULT abap_false !iv_upper_cased TYPE abap_bool DEFAULT abap_false
RETURNING RETURNING
VALUE(rt_fields) TYPE tihttpnvp . VALUE(rt_fields) TYPE ty_name_value_tt .
CLASS-METHODS parse_fields_upper_case_name CLASS-METHODS parse_fields_upper_case_name
IMPORTING IMPORTING
!iv_string TYPE clike !iv_string TYPE clike
RETURNING RETURNING
VALUE(rt_fields) TYPE tihttpnvp . VALUE(rt_fields) TYPE ty_name_value_tt .
CLASS-METHODS translate_postdata CLASS-METHODS translate_postdata
IMPORTING IMPORTING
@ -65,7 +71,7 @@ CLASS zcl_abapgit_gui_event DEFINITION
CLASS-METHODS field_keys_to_upper CLASS-METHODS field_keys_to_upper
CHANGING CHANGING
!ct_fields TYPE tihttpnvp . !ct_fields TYPE ty_name_value_tt .
CLASS-METHODS unescape CLASS-METHODS unescape
IMPORTING IMPORTING
!iv_string TYPE string !iv_string TYPE string

22
src/ui/lib/zcl_abapgit_html_action_utils.clas.abap
View File

@ -37,23 +37,29 @@ CLASS zcl_abapgit_html_action_utils DEFINITION
PROTECTED SECTION. PROTECTED SECTION.
PRIVATE SECTION. PRIVATE SECTION.
TYPES: BEGIN OF ty_name_value,
name TYPE string,
value TYPE string,
END OF ty_name_value.
TYPES ty_name_value_tt TYPE STANDARD TABLE OF ty_name_value WITH DEFAULT KEY.
CLASS-METHODS add_field CLASS-METHODS add_field
IMPORTING IMPORTING
!iv_name TYPE string !iv_name TYPE string
!ig_field TYPE any !ig_field TYPE any
CHANGING CHANGING
!ct_field TYPE tihttpnvp . !ct_field TYPE ty_name_value_tt .
CLASS-METHODS fields_to_string CLASS-METHODS fields_to_string
IMPORTING IMPORTING
!it_fields TYPE tihttpnvp !it_fields TYPE ty_name_value_tt
RETURNING RETURNING
VALUE(rv_string) TYPE string. VALUE(rv_string) TYPE string.
ENDCLASS. ENDCLASS.
CLASS ZCL_ABAPGIT_HTML_ACTION_UTILS IMPLEMENTATION. CLASS zcl_abapgit_html_action_utils IMPLEMENTATION.
METHOD add_field. METHOD add_field.
@ -82,7 +88,7 @@ CLASS ZCL_ABAPGIT_HTML_ACTION_UTILS IMPLEMENTATION.
METHOD dbkey_encode. METHOD dbkey_encode.
DATA lt_fields TYPE tihttpnvp. DATA lt_fields TYPE ty_name_value_tt.
add_field( EXPORTING iv_name = 'TYPE' add_field( EXPORTING iv_name = 'TYPE'
ig_field = is_key-type CHANGING ct_field = lt_fields ). ig_field = is_key-type CHANGING ct_field = lt_fields ).
@ -96,7 +102,7 @@ CLASS ZCL_ABAPGIT_HTML_ACTION_UTILS IMPLEMENTATION.
METHOD dir_encode. METHOD dir_encode.
DATA lt_fields TYPE tihttpnvp. DATA lt_fields TYPE ty_name_value_tt.
add_field( EXPORTING iv_name = 'PATH' add_field( EXPORTING iv_name = 'PATH'
ig_field = iv_path CHANGING ct_field = lt_fields ). ig_field = iv_path CHANGING ct_field = lt_fields ).
rv_string = fields_to_string( lt_fields ). rv_string = fields_to_string( lt_fields ).
@ -127,7 +133,7 @@ CLASS ZCL_ABAPGIT_HTML_ACTION_UTILS IMPLEMENTATION.
METHOD file_encode. METHOD file_encode.
DATA lt_fields TYPE tihttpnvp. DATA lt_fields TYPE ty_name_value_tt.
add_field( add_field(
@ -167,7 +173,7 @@ CLASS ZCL_ABAPGIT_HTML_ACTION_UTILS IMPLEMENTATION.
METHOD jump_encode. METHOD jump_encode.
DATA lt_fields TYPE tihttpnvp. DATA lt_fields TYPE ty_name_value_tt.
add_field( EXPORTING iv_name = 'TYPE' add_field( EXPORTING iv_name = 'TYPE'
@ -187,7 +193,7 @@ CLASS ZCL_ABAPGIT_HTML_ACTION_UTILS IMPLEMENTATION.
METHOD obj_encode. METHOD obj_encode.
DATA lt_fields TYPE tihttpnvp. DATA lt_fields TYPE ty_name_value_tt.
add_field( EXPORTING iv_name = 'KEY' add_field( EXPORTING iv_name = 'KEY'