W Pub: ABAP Cursosentenciareceiveresultsfromfunctions

<html>

<head>

<meta http-equiv="Content-Type" content="text/html; charset=windows-1252">

<meta name="GENERATOR" content="Microsoft FrontPage 4.0">

<meta name="ProgId" content="FrontPage.Editor.Document">

<title>RECEIVE RESULTS FROM FUNCTION</title>

<link rel="stylesheet" href="../../gaussr3.css" tppabs="http://www.gaussr3.com/gaussr3.css" type="text/css">

</head>

<body>

<p align="left">⚠ &lt;b&gt;<span class="titulo">RECEIVE RESULTS FROM FUNCTION</span>⚠ &lt;/b&gt;</p>

<p align="left" class="gaussr3">⚠ &lt;b&gt;Definicin⚠ &lt;/b&gt;</p>

<p align="left" class="gaussr3">Recupera los resultados de una funcin que ha

  sido ejecutada de forma asncrona. </p>

<p align="left" class="gaussr3">⚠ &lt;b&gt;Sintaxis:⚠ &lt;/b&gt;</p>

<pre class="gaussr3">RECEIVED RESULTS FROM FUNCTION <funcin>

[ IMPORTING <parmetro1> = <campo1> ... <parmetron> = <campon> ]

[ TABLES <parmetro1> = <campo1> ... <parmetron> = <campon> ]

[ EXCEPTIONS <excepcin1> = <campo1> ... <excepcinn> = <campon> ].</pre>

<p class="gaussr3">Recupera todos los parmetros de una funcin que ha sido ejecutada

  asincrnicamente, como por ejemplo con la sentencia ⚠ &lt;a href="call_function.htm" tppabs="http://www.gaussr3.com/abap4/sentencias/call_function.htm"&gt;CALL 
  FUNCTION .. STARTING NEW TASK⚠ &lt;/a&gt;.</p>

<p class="gaussr3">⚠ &lt;b&gt;Ejemplo:⚠ &lt;/b&gt;</p>

<pre class="gaussr3">DATA: INFO LIKE RFCSI,

  • Result of RFC_SYSTEM_INFO function
      SYSTEM_MSG(80) VALUE SPACE.
  • Exception handling</pre>

<pre class="gaussr3">CALL FUNCTION 'RFC_SYSTEM_INFO'

     STARTING NEW TASK 'INFO'
     PERFORMING 'RETURN_INFO' ON END OF TASK.</pre>

<pre class="gaussr3">WRITE: 'Wait for reply'.

...

AT USER-COMMAND.

  • Return from FORM routine RETURN_INFO
   IF SYSTEM_MSG = SPACE.
     WRITE: 'Destination =', INFO-RFCDEST.
   ELSE.
     WRITE SYSTEM_MSG.
   ENDIF.

...

FORM RETURN_INFO USING TASKNAME.</pre>

<pre class="gaussr3"> RECEIVE RESULTS FROM FUNCTION 'RFC_SYSTEM_INFO'

      IMPORTING  RFCSI_EXPORT = INFO
      EXCEPTIONS SYSTEM_FAILURE MESSAGE SYSTEM_MSG.</pre>

<pre class="gaussr3"> REFRESH SCREEN. "Simula el campo de comando = return key

ENDFORM.</pre>

<p class="gaussr3">⚠ &lt;b&gt;Vase tambin: ⚠ &lt;/b&gt;⚠ &lt;a href="call_function.htm" tppabs="http://www.gaussr3.com/abap4/sentencias/call_function.htm"&gt;CALL FUNCTION

  .. STARTING NEW TASK⚠ &lt;/a&gt;.</p>

</body>

</html>