Show TOC

Procedure documentationCalling a Function in SAP Systems Locate this document in the navigation structure

 

In the following example program, an external RFC client connects to an SAP system and calls the function module BAPI_COMPANY_GETDETAIL:

Syntax Syntax

    2. 

  2. #include <stdlib.h>
    3. 

  3. #include <stdio.h>
    4. 

  4. #include "sapnwrfc.h"
    5. 

    6. 

  6. void errorHandling(RFC_RC rc, SAP_UC description[], RFC_ERROR_INFO*
    7. 

  7. errorInfo, RFC_CONNECTION_HANDLE connection){
    8. 

  8. 	printfU(cU("%s: %d\n"), description, rc);
    9. 

  9. 	printfU(cU("%s: %s\n"), errorInfo->key, errorInfo->message);
    10. 

  10. /* It's better to close the TCP/IP connection cleanly, than to 
    11. 

  11. just let the backend get a "Connection reset by peer" error...*/
    12. 

    13. 

  13. 	if (connection != NULL) RfcCloseConnection(connection, errorInfo);
    14. 

    15. 

  15. 	exit(1);
    16. 

  16. }
    17. 

    18. 

  18. int mainU(int argc, SAP_UC** argv){
    19. 

  19. 	RFC_RC rc = RFC_OK;
    20. 

  20. 	RFC_CONNECTION_PARAMETER loginParams[6];
    21. 

  21. 	RFC_ERROR_INFO errorInfo;
    22. 

  22. 	RFC_CONNECTION_HANDLE connection;
    23. 

  23. 	RFC_FUNCTION_DESC_HANDLE bapiCompanyDesc;
    24. 

  24. 	RFC_FUNCTION_HANDLE bapiCompany;
    25. 

  25. 	RFC_STRUCTURE_HANDLE returnStructure;
    26. 

  26. 	SAP_UC message[221];
    27. 

  27. 	RFC_BYTE buffer[1105];
    28. 

  28. 	unsigned utf8Len = 1105, resultLen;
    29. 

  29. 	FILE* outFile;
    30. 

    31. 

    32. 

    33. 

  33. ----------------------------------------------- 
    34. 

  34. /*OPEN CONNECTION*/
    35. 

  35. ----------------------------------------------- 
    36. 

    37. 

    38. 

    39. 

    40. 

  40. /*Create logon parameter list*/
    41. 

    42. 

  42. 	loginParams[0].name = cU("ashost");	loginParams[0].value =
    43. 

  43. cU("hs0023");
    44. 

  44. 	loginParams[1].name = cU("sysnr");	loginParams[1].value = cU("05");
    45. 

  45. 	loginParams[2].name = cU("client");	loginParams[2].value =
    46. 

  46. cU("800");
    47. 

  47. 	loginParams[3].name = cU("user");	loginParams[3].value =
    48. 

  48. cU("alice");
    49. 

  49. 	loginParams[4].name = cU("lang");	loginParams[4].value =
    50. 

  50. cU("EN");
    51. 

  51. 	loginParams[5].name = cU("passwd");	loginParams[5].value =
    52. 

  52. cU("secret");
    53. 

    54. 

  54. /*Open connection*/
    55. 

    56. 

  56. 	connection = RfcOpenConnection(loginParams, 6, );
    57. 

  57. 	if (connection == NULL) errorHandling(rc, cU("Error during logon"),
    58. 

  58. , NULL);
    59. 

    60. 

    61. 

    62. 

    63. 

  63. ----------------------------------------------- 
    64. 

  64. /* DYNAMIC METADATA retrieval (can also be executed using STATIC functions)*/
    65. 

  65. ----------------------------------------------- 
    66. 

    67. 

  67. 	bapiCompanyDesc = RfcGetFunctionDesc(connection,
    68. 

  68. cU("BAPI_COMPANY_GETDETAIL"), );
    69. 

  69. 	if (bapiCompanyDesc == NULL) errorHandling(rc, cU("Error during
    70. 

  70. metadata lookup"), , connection);
    71. 

    72. 

  72. -----------------------------------------------
    73. 

  73. /*FUNCTION CALL/*
    74. 

  74. -----------------------------------------------
    75. 

  75. 	
    76. 

  76. /*Create function instance*/
    77. 

  77. 	
    78. 

  78. bapiCompany = RfcCreateFunction(bapiCompanyDesc, );
    79. 

    80. 

  80. 	/*Parameter setting*/ 
    81. 

    82. 

  82. 	RfcSetChars(bapiCompany, cU("COMPANYID"), cU("000007"), 6,
    83. 

  83. );
    84. 

    85. 

  85. 	/*Call*/
    86. 

    87. 

  87. 	rc = RfcInvoke(connection, bapiCompany, );
    88. 

  88. 	if (rc != RFC_OK) errorHandling(rc, cU("Error calling
    89. 

  89. BAPI_COMPANY_GETDETAIL"), , connection);
    90. 

    91. 

  91. 	/*Getting parameters*/
    92. 

    93. 

  93. 	RfcGetStructure(bapiCompany, cU("RETURN"), ,
    94. 

  94. );
    95. 

  95. 	RfcGetString(returnStructure, cU("MESSAGE"), message, 221,
    96. 

  96. , );
    97. 

    98. 

  98. 	/*After having finished the procedure: release memory only if a ‘create’ function was invoked before*/
    99. 

    100. 

  100. 	RfcDestroyFunction(bapiCompany, );
    101. 

    102. 

  102. 	/*Final UTF8-UTF16 conversion*/
    103. 

    104. 

  104. 	windows.h utf8Len = WideCharToMultiByte(CP_UTF8, 0, message,
    105. 

  105. strlenU(message), buffer, 1105, NULL, NULL);
    106. 

  106. 	RfcSAPUCToUTF8(message,  strlenU(message), buffer, ,
    107. 

  107. , );
    108. 

    109. 

  109. 	outFile = fopen("message.xml", "w");
    110. 

  110. 	fputs("<?xml version=\"1.0\"?>\n<message>", outFile);
    111. 

  111. 	fputs(buffer, outFile);
    112. 

  112. 	fputs("</message>", outFile);
    113. 

  113. 	fclose(outFile);
    114. 

  114. 	return 0;
    115. 

  115. }
    116. 

    117. 

  117.  
    118. 

    119. 

    120. 

    121. 



End of the code.