METHOD m_buscar_contrato .

  DATA lo_api_controller TYPE REF TO if_wd_controller.
  DATA ls_documento      TYPE wd_this->element_documento.

  lo_api_controller ?= wd_this->wd_get_api( ).
  DATA(lo_message_manager) = lo_api_controller->get_message_manager( ).

  DATA ls_configuracion TYPE wd_this->element_configuracion.
  wd_context->get_child_node( name = wd_this->wdctx_configuracion )->get_element(
  )->set_static_attributes( static_attributes = ls_configuracion ).

  DATA(lo_element) = wd_context->get_child_node( name = wd_this->wdctx_documento )->get_element( ).
  lo_element->get_static_attributes( IMPORTING static_attributes = ls_documento ).
  wd_this->m_invalidar_partners( ).
  IF ls_documento-object_id IS INITIAL.
    lo_message_manager->report_attribute_message(
       EXPORTING
         message_text              = 'Complete Contrato/Pedido'
         element                   = lo_element
         attribute_name            = 'OBJECT_ID' ).
    re_result = 'FAILED'.
    RETURN.
  ENDIF.

  IF ls_documento-process_type IS INITIAL.
    lo_message_manager->report_attribute_message(
       EXPORTING
         message_text              = 'Complete tipo de documento'
         element                   = lo_element
         attribute_name            = 'PROCESS_TYPE' ).
    re_result = 'FAILED'.
    RETURN.
  ENDIF.

  IF wd_this->m_buscar_local( im_object_id = ls_documento-object_id
                              im_tipo      = ls_documento-process_type ) EQ abap_true.
    wd_this->go_contrato = zcl_ppm_contrato=>get_instance( ls_documento-object_id ).
    RETURN.
  ELSEIF wd_this->m_buscar_proxy( im_object_id = ls_documento-object_id
                                  im_tipo      = ls_documento-process_type ) EQ abap_true.
    wd_this->go_contrato = zcl_ppm_contrato=>get_instance( ls_documento-object_id ).
*    wd_this->m_solicitar_catalogo( ).
    RETURN.

  ELSEIF wd_this->m_buscar_proxy( im_object_id = ls_documento-object_id
                                  im_tipo      = ls_documento-process_type ) EQ abap_false.
*Avanzar para que te permita mostrar los detalles del contrato sin bloquearte el proceso
    wd_this->go_contrato = zcl_ppm_contrato=>get_instance( ls_documento-object_id ).
    RETURN.
  ENDIF.
  re_result = 'FAILED'.
ENDMETHOD.