Z_ZBC400_02_CONNECTION_GET

FUNCTION z_zbc400_02_connection_get.
*"----------------------------------------------------------------------
*"*"Local Interface:
*"  IMPORTING
*"     REFERENCE(IV_CARRID) TYPE  BC400_S_CONNECTION-CARRID
*"     REFERENCE(IV_CONNID) TYPE  BC400_S_CONNECTION-CONNID
*"  EXPORTING
*"     REFERENCE(ES_CONNECTION) TYPE  SPFLI
*"  EXCEPTIONS
*"      NO_DATA_FOUND
*"----------------------------------------------------------------------
  SELECT SINGLE * FROM spfli INTO CORRESPONDING FIELDS OF es_connection WHERE carrid = iv_carrid AND connid = iv_connid.
  IF sy-subrc <> 0.
    RAISE no_data_found.
  ENDIF.
ENDFUNCTION.