class ZCO_INBDELIVERY_REQUEST_OUT definition
  public
  inheriting from CL_PROXY_CLIENT
  create public .

public section.

  methods CONSTRUCTOR
    importing
      !LOGICAL_PORT_NAME type PRX_LOGICAL_PORT_NAME optional
    raising
      CX_AI_SYSTEM_FAULT .
  methods INBOUND_DELIVERY_REQUEST_OUT
    importing
      !OUTPUT type ZINBOUND_DELIVERY_REQUEST1
    raising
      CX_AI_SYSTEM_FAULT .
protected section.
private section.
ENDCLASS.



CLASS ZCO_INBDELIVERY_REQUEST_OUT IMPLEMENTATION.


* <SIGNATURE>---------------------------------------------------------------------------------------+
* | Instance Public Method ZCO_INBDELIVERY_REQUEST_OUT->CONSTRUCTOR
* +-------------------------------------------------------------------------------------------------+
* | [--->] LOGICAL_PORT_NAME              TYPE        PRX_LOGICAL_PORT_NAME(optional)
* | [!CX!] CX_AI_SYSTEM_FAULT
* +--------------------------------------------------------------------------------------</SIGNATURE>
  method CONSTRUCTOR.

  super->constructor(
    class_name          = 'ZCO_INBDELIVERY_REQUEST_OUT'
    logical_port_name   = logical_port_name
  ).

  endmethod.


* <SIGNATURE>---------------------------------------------------------------------------------------+
* | Instance Public Method ZCO_INBDELIVERY_REQUEST_OUT->INBOUND_DELIVERY_REQUEST_OUT
* +-------------------------------------------------------------------------------------------------+
* | [--->] OUTPUT                         TYPE        ZINBOUND_DELIVERY_REQUEST1
* | [!CX!] CX_AI_SYSTEM_FAULT
* +--------------------------------------------------------------------------------------</SIGNATURE>
  method INBOUND_DELIVERY_REQUEST_OUT.

  data:
    ls_parmbind type abap_parmbind,
    lt_parmbind type abap_parmbind_tab.

  ls_parmbind-name = 'OUTPUT'.
  ls_parmbind-kind = cl_abap_objectdescr=>importing.
  get reference of OUTPUT into ls_parmbind-value.
  insert ls_parmbind into table lt_parmbind.

  if_proxy_client~execute(
    exporting
      method_name = 'INBOUND_DELIVERY_REQUEST_OUT'
    changing
      parmbind_tab = lt_parmbind
  ).

  endmethod.
ENDCLASS.