Syntax

2. /* main program */

3. rfc_handle = RfcAccept(...);	/*	Accept RFC connection	*/

4. if (rfc_handle == RFC_HANDLE_NULL)	/*	Check return code	*/

5. {

6.   rfc_error_handling("RfcAccept");	/*	Handle error and get error	*/

7.   return 1;	/*	specification via RfcLastError	*/

8. }

9. rfc_rc = RfcInstallFunction(‘ABC’, abc_function,...);
   	/*	Install RFC function ‘ABC’	*/

10. 	/*	under the C-routine 	*/

11. 	/*	‘abc_function’	*/

12. if (rfc_rc != RFC_OK)	/*	Check return code	*/

13. {

14.   rfc_error_handling("Install function ‘ABC’);

15. 	/*	Handle error and get error	*/

16.   return 1;	/*	specification via RfcLastError	*/

17. }

18. do	/*	Wait for call or execution of	*/

19. {

20.   rfc_rc = RfcDispatch(...);	/*	installed RFC functions until	*/

21. } while ( rfc_rc == RFC_OK);	/*	connection is closed or	*/	/*	terminated	*/

22. RfcClose(...);				/*	Close RFC connection	*/

24. /* RFC function: ‘ABC’ */

25. static RFC_RC abc_function(RFC_HANDLE rfc_handle)
    {
      rfc_rc = RfcGetData(...);	/*	Get associated RFC data	*/

26.   if (rfc_rc != RFC_OK)	/*	Check return code	*/

27.   {

28.     rfc_error_handling("RfcGetData");
    	/*	Handle error and get error	*/

29.     return 1;	/*	specification via RfcLastError	*/

30.   }

31. ...	/*	Process RFC data	*/

32. rfc_rc = RfcSendData(...);	/*Report result to ABAP program	*/

33.   if (rfc_rc != RFC_OK)	/*	Check return code	*/

34.   {

35.     rfc_error_handling("RfcSendData");	
    	/*	Handle error and get error	*/

36.     return 1;	/*	specification via RfcLastError	*/

37.   }

38. return 0;	/*	Back to RFC Library	*/

39. }