Sube un archivo a un bucket

Esta muestra de código se puede usar para subir un objeto a un bucket de Cloud Storage.

Si deseas obtener una colección completa de muestras de código para la edición SAP BTP del SDK de ABAP para Google Cloud, consulta el repositorio de muestras de código en GitHub.

Si deseas obtener una colección completa de muestras de código para la edición local o cualquier edición en la nube del SDK de ABAP para Google Cloud, consulta el repositorio de muestras de código en GitHub.

Muestra de código

Edición SAP BTP

" --------------------------------------------------------------------
"  Copyright 2024 Google LLC                                         -
"                                                                    -
"  Licensed under the Apache License, Version 2.0 (the "License");   -
"  you may not use this file except in compliance with the License.  -
"  You may obtain a copy of the License at                           -
"      https://www.apache.org/licenses/LICENSE-2.0                   -
"  Unless required by applicable law or agreed to in writing,        -
"  software distributed under the License is distributed on an       -
"  "AS IS" BASIS, WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND,      -
"  either express or implied.                                        -
"  See the License for the specific language governing permissions   -
"  and limitations under the License.                                -
" --------------------------------------------------------------------
CLASS zcl_cs_upload_file_to_bucket DEFINITION
  PUBLIC FINAL
  CREATE PUBLIC.

  PUBLIC SECTION.
    INTERFACES if_oo_adt_classrun.
ENDCLASS.

CLASS zcl_cs_upload_file_to_bucket IMPLEMENTATION.
  METHOD if_oo_adt_classrun~main.
    " Data Declarations
    DATA lv_p_bucket     TYPE string.
    DATA lv_q_name       TYPE string.
    DATA ls_data         TYPE xstring.
    DATA lv_content_type TYPE string.

    TRY.
        " Open HTTP Connection
        " Pass the configured client key
        DATA(lo_client) = NEW /goog/cl_storage_v1( iv_key_name = 'CLIENT_KEY' ).

        " Populate the data that needs to be passed to the API
        " Name of the bucket
        lv_p_bucket = 'sample-bucket'.
        " Name of the object
        lv_q_name   = 'sample-object'.
        " Read object data into ls_data
        ls_data         = '<Object data in XSTRING form>'.
        " Content type of the object
        lv_content_type = '<Content Type>'.

        " Call API method
        lo_client->insert_objects( EXPORTING iv_q_name       = lv_q_name
                                             iv_p_bucket     = lv_p_bucket
                                             is_data         = ls_data
                                             iv_content_type = lv_content_type
                                   IMPORTING es_output       = DATA(ls_output)
                                             ev_ret_code     = DATA(lv_ret_code)
                                             ev_err_text     = DATA(lv_err_text)
                                             es_err_resp     = DATA(ls_err_resp) ).

        IF lo_client->is_success( lv_ret_code ).
          out->write( 'Bucket created successfully!' ).
        ELSE.
          out->write( | Error occurred: { lv_err_text }| ).
        ENDIF.

        " Close HTTP connection
        lo_client->close( ).

      CATCH /goog/cx_sdk INTO DATA(lo_sdk_excp).
        lv_err_text = lo_sdk_excp->get_text( ).
        out->write( |Exception occurred: { lv_err_text } | ).
    ENDTRY.
  ENDMETHOD.
ENDCLASS.

Edición local o cualquier edición en la nube

**********************************************************************
*  Copyright 2023 Google LLC                                         *
*                                                                    *
*  Licensed under the Apache License, Version 2.0 (the "License");   *
*  you may not use this file except in compliance with the License.  *
*  You may obtain a copy of the License at                           *
*      https://www.apache.org/licenses/LICENSE-2.0                   *
*  Unless required by applicable law or agreed to in writing,        *
*  software distributed under the License is distributed on an       *
*  "AS IS" BASIS, WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND,      *
*  either express or implied.                                        *
*  See the License for the specific language governing permissions   *
*  and limitations under the License.                                *
**********************************************************************

REPORT zr_upload_file_bucket.

* Data Declarations
DATA:
  lv_p_bucket     TYPE string,
  lv_q_name       TYPE string,
  ls_data         TYPE xstring,
  lv_content_type TYPE string.

TRY.
*  Open HTTP Connection
    DATA(lo_client) = NEW /goog/cl_storage_v1( iv_key_name = 'CLIENT_KEY' ).

*   Populate the data that needs to be passed to the api
    "Name of the bucket
    lv_p_bucket       = 'sample-bucket'.
    "Name of the object
    lv_q_name         = 'sample-object'.
    "Read object data into ls_data
    ls_data          = '<Object data in XSTRING form>'.
    "Content type of the object
    lv_content_type  = '<Content Type>'.

*   Call API method
    CALL METHOD lo_client->insert_objects
      EXPORTING
        iv_q_name       = lv_q_name
        iv_p_bucket     = lv_p_bucket
        is_data         = ls_data
        iv_content_type = lv_content_type
      IMPORTING
        es_output       = DATA(ls_output)
        ev_ret_code     = DATA(lv_ret_code)
        ev_err_text     = DATA(lv_err_text)
        es_err_resp     = DATA(ls_err_resp).

    IF lo_client->is_success( lv_ret_code ).
      MESSAGE 'Bucket created successfully!' TYPE 'S'.
    ELSE.
      MESSAGE lv_err_text TYPE 'E'.
    ENDIF.

*   Close HTTP connection
    lo_client->close( ).

  CATCH /goog/cx_sdk INTO DATA(lo_exception).
    MESSAGE lo_exception->get_text( ) TYPE 'E'.
ENDTRY.