JCO Connector

Question

Hi,
Can anyone explain functionlity of JCO Connector ?
Can we use java code in abap ?
In which editor ?
Bye,
Satya.

Answer 1

Hi Satyanarayana,
<b>SAP Java Connector - Excample 1: Simple RFC call
Scenario
We will call the RFC function module ZNAS_HIE1_GET_MEMBER_FARM.that returns members that have owned a farm. Input to the function is a farm number, and output is a table of members that have owned the farm and Owner number (Sequence number of owners).
Class testJCO is excuted and calls class GetMemberFarm method GetMemberFarmFromSap. Input parameters to GetMemberFarm are Farm and Owner number.
GetMemberFarmFromSap executes RFC ZNAS_HIE1_GET_MEMBER_FARM, that returns a table of members that have owned the farm from the input parameters.
GetMemberFarmFromSap loops through the table and finds the member where ZZCHCODE (Owner numer), is equal owner number from the input-parameters. and returns the member.
Code
Class testJCO
public class testJco
     public static void main(String[] args)
          GetMemberFarm testGetMemberFarm = new GetMemberFarm();
          String memberFarm= testGetMemberFarm.GetMemberFarmFromSap("0111020155","02");
          System.out.println("Memberfarm: " + memberFarm);
Class GetMemberFram
import com.sap.mw.jco.*;  //The JCO
public class GetMemberFarm {
  public String GetMemberFarmFromSap(String farm, String OwnerNumber)   
  {  String zzmemb ="";
        String memberFarm = "";
     JCO.Repository mRepository;
     JCO.Client mConnection = null;
     JCO.Function myFunction = null;
     //Create Connection to SAP
       try
            mConnection = JCO.createClient("800",           //SAP client
                                        "HFR",       //User ID
                                        "vimmer3",     //Password
                                        "EN",            //Language
                                        "53.205.22.71", //Host
                                        "03");           //System
         mConnection.connect();
         System.out.println("Connection OK");
       catch (Exception ex)
            System.out.println(ex);
      // Create function and parameters
      try
        //Create repository
        mRepository = new JCO.Repository( "GetMember", mConnection );
        //Get a function template from the repository
        IFunctionTemplate ftemplate = mRepository.getFunctionTemplate("ZNAS_HIE1_GET_MEMBER_FARM");
        //Create function
        myFunction = new JCO.Function(ftemplate);
        System.out.println("Function created");
        //Set import parameter
        JCO.Field zzfarm = myFunction.getImportParameterList().getField("ZZFARM");
        zzfarm.setValue(farm);
        System.out.println("Parameters ok");
     catch (Exception ex)       
          System.out.println(ex);
     // Execute function
     try
          mConnection.execute(myFunction);
        System.out.println("RFC Call OK");          
     catch (Exception ex)      
      {  System.out.println(ex); //Exception from function          
     // Handle return table GT_HIERARCHY
     // Loop over the table and find the record that
     // has ZZCHCODE = OwnerNumber from the
     // method parameters, and return Member for the
     // record
     JCO.Table gt_HIERARCHY = null;
     try
          gt_HIERARCHY=myFunction.getTableParameterList().getTable("GT_HIERARCHY");
          //Loop thhrough table and return the member that has
          // changecode (ZZCHCODE) = 02
          for (int i = 0; i < gt_HIERARCHY.getNumRows(); i++)
          {   gt_HIERARCHY.setRow(i);
              String zzchcode = gt_HIERARCHY.getString("ZZCHCODE");
              if (zzchcode.equals(OwnerNumber))                        
                   zzmemb = gt_HIERARCHY.getString("ZZMEMB");                   
     catch (Exception ex)      
      {  System.out.println(ex);           
     // Disconnect from SAP
     try
         mConnection.disconnect();  
         System.out.println("Disconnected from SAP");
      catch (Exception ex)
           System.out.println(ex);
      return zzmemb;
} //public class GetMemberFarm
Example: 2
SAP Java Connector - Example 3: Create Salesorder
This example shows how to make a sales order using the SAP java Connector and BAPI_SALESORDER_CREATEFROMDAT2. First the ABAP code for using the BAPI is shown, and next the Java implementation is shown.
ABAP Example
REPORT z_bapi_create_sales_order_test .
Order header:
- Order type: OR  Important you must use the german code TA
- Sales org: 1000
- Distrb. chan.: 10
- Division: 00
- Sold to party: 1032
- Ship to party: 1032
- Purch order: DG-19970626-3
Order item:
- Material: P-100
- Qty: 1
DATA:
Order partners
li_order_partners    TYPE STANDARD TABLE OF bapiparnr,
l_order_partners     LIKE bapiparnr,
Structures for order header
l_order_header_in    LIKE bapisdhd1,
l_order_header_inx   LIKE bapisdhd1x,
Tables for order items
li_order_items_in    TYPE STANDARD TABLE OF bapisditm,
l_order_items_in     LIKE bapisditm,
li_order_items_inx   TYPE STANDARD TABLE OF bapisditmx,
l_order_items_inx    LIKE bapisditmx,
Return table from bapi call
li_return TYPE STANDARD TABLE OF bapiret2,
l_return  TYPE bapiret2,
Sales document number
  l_vbeln LIKE bapivbeln-vbeln,
Error flag
  l_errflag(1) TYPE c.
START-OF-SELECTION.
Build partner information
  CLEAR l_order_partners.
  l_order_partners-partn_role = 'AG'.          "Remember German codes !
  l_order_partners-partn_numb = '0000001032'.
  APPEND l_order_partners TO li_order_partners.
Build order header
Update flag
  l_order_header_inx-updateflag = 'I'.
Sales document type
  l_order_header_in-doc_type    = 'TA'.        "Remember German codes !
  l_order_header_inx-doc_type   = 'X'.
Sales organization
  l_order_header_in-sales_org  = '1000'.
  l_order_header_inx-sales_org  = 'X'.
Distribution channel
  l_order_header_in-distr_chan = '10'.
  l_order_header_inx-distr_chan = 'X'.
Division
  l_order_header_in-division = '00'.
  l_order_header_inx-division = 'X'.
Purchase order
  l_order_header_in-purch_no_c = 'DG-19970626-300'.
  l_order_header_inx-purch_no_c = 'X'.
Build order item(s) - Only 1 is used in this example
  l_order_items_in-itm_number = '10'.
  l_order_items_inx-itm_number = '10'.
  l_order_items_in-material = 'P-100'.
  l_order_items_inx-material = 'X'.
  l_order_items_in-comp_quant = '1.000'.
  l_order_items_inx-comp_quant = 'X'.
  APPEND l_order_items_in TO li_order_items_in.
  l_order_items_inx-updateflag = 'I'.
  APPEND l_order_items_inx TO li_order_items_inx.
CALL Bapi
  CALL FUNCTION 'BAPI_SALESORDER_CREATEFROMDAT2'
       EXPORTING
            order_header_in  = l_order_header_in
            order_header_inx = l_order_header_inx
            testrun          = 'X'
       IMPORTING
            salesdocument    = l_vbeln
       TABLES
            return           = li_return
            order_items_in   = li_order_items_in
            order_items_inx  = li_order_items_inx
            order_partners   = li_order_partners.
END-OF-SELECTION.
Check and write Return table
  CLEAR l_errflag.
  WRITE: / 'Sales dcoument: ', l_vbeln.
  LOOP AT li_return INTO l_return.
    WRITE: / l_return-type, l_return-message(50).
    IF l_return-type = 'E'.
      l_errflag = 'X'.
    ENDIF.
  ENDLOOP.
No errors - Commit
  IF l_errflag  IS INITIAL.
    CALL FUNCTION 'BAPI_TRANSACTION_COMMIT'.
  ENDIF.</b>
Good Luck and thanks
AK