资讯专栏INFORMATION COLUMN

使用Java connector消费ABAP系统的函数

褰辩话 / 3342人阅读

摘要:环境的搭建我的系统有个函数名叫,输入一个和,会输出为这对客户和组合维护的一组和描述信息。测试如下下面是使用消费该函数的代码为简单起见没有使用的库进行的序列化。

Java Connector(JCO)环境的搭建:Step by step to download and configure JCO in your laptop
我的ABAP系统有个函数名叫ZDIS_GET_UPSELL_MATERIALS,输入一个customer ID和product ID,会输出为这对客户和product组合维护的一组Upsell product ID和描述信息。
测试如下:


下面是使用Java消费该函数的代码:

package jco;

import java.io.File;
import java.io.FileOutputStream;
import java.util.Properties;
import com.sap.conn.jco.JCoDestination;
import com.sap.conn.jco.JCoDestinationManager;
import com.sap.conn.jco.JCoException;
import com.sap.conn.jco.JCoFunction;
import com.sap.conn.jco.JCoParameterList;
import com.sap.conn.jco.JCoRepository;
import com.sap.conn.jco.JCoTable;
import com.sap.conn.jco.ext.DestinationDataProvider;

/**
 * basic examples for Java to ABAP communication  
 * See help: https://help.sap.com/saphelp_nwpi711/helpdata/en/48/70792c872c1b5ae10000000a42189c/frameset.htm
 */
public class StepByStepClient
{
    static String DESTINATION_NAME = "ABAP_AS_WITHOUT_POOL";
    static public final String ABAP_DURATION = "abapLayerDuration";
    static public final String UPSELL_PRODUCT = "upsellProducts";
    static public final String PRODUCT_ID = "productID";
    static public final String PRODUCT_TEXT = "productText";
    
    static private Properties prepareProperty(){
        Properties connectProperties = new Properties();
        connectProperties.setProperty(DestinationDataProvider.JCO_ASHOST, "ldcixcd.wdf.sap.corp");
        connectProperties.setProperty(DestinationDataProvider.JCO_SYSNR,  "00");
        connectProperties.setProperty(DestinationDataProvider.JCO_CLIENT, "111");
        connectProperties.setProperty(DestinationDataProvider.JCO_USER,   "WANGJER");
        connectProperties.setProperty(DestinationDataProvider.JCO_PASSWD, "Saptest1");
        connectProperties.setProperty(DestinationDataProvider.JCO_LANG,   "en");
        createDestinationDataFile(DESTINATION_NAME, connectProperties);
        connectProperties.setProperty(DestinationDataProvider.JCO_POOL_CAPACITY, "3");
        connectProperties.setProperty(DestinationDataProvider.JCO_PEAK_LIMIT,    "10");
        createDestinationDataFile(DESTINATION_NAME, connectProperties);
        return connectProperties;
    }
    
    static public void main(String[] arg) {
        createDestinationDataFile(DESTINATION_NAME, prepareProperty());
        
        JCoDestination destination = null;
        try {
            destination = JCoDestinationManager.getDestination(DESTINATION_NAME);
            JCoRepository repo = destination.getRepository();
            JCoFunction stfcConnection = repo.getFunction("ZDIS_GET_UPSELL_MATERIALS");

            JCoParameterList imports = stfcConnection.getImportParameterList();
        
            String customerID = "1000040";
            String materialID = "11";

            imports.setValue("IV_CUSTOMER_ID", customerID);
            imports.setValue("IV_MATERIAL_ID", materialID);

            stfcConnection.execute(destination);
        
            JCoParameterList exports = stfcConnection.getExportParameterList();
            
            // int result = exports.getInt("EV_RESULT");
            int abapDuration = exports.getInt("EV_DURATION");
            
            StringBuilder sb = new StringBuilder();
            sb.append("{ "" + ABAP_DURATION + "": " + abapDuration + ",");
            
            sb.append(""" + UPSELL_PRODUCT + "":[");
            
            JCoTable codes = exports.getTable("ET_MATERIALS");
            
            int row = codes.getNumRows();
            System.out.println("Total rows: " + row);
            
            System.out.println("ABAP duration: " + abapDuration);
            
            for( int i = 0; i < row; i++){
                codes.setRow(i);
                System.out.println(codes.getString("MATERIAL_ID") + "	" + codes.getString("MATERIAL_TEXT"));
                sb.append("{"" + PRODUCT_ID + "":" + codes.getString("MATERIAL_ID") + ","
                        + """ + PRODUCT_TEXT + "":"" + codes.getString("MATERIAL_TEXT") + """);
                if( i < row - 1){
                    sb.append("},");
                }
                else{
                    sb.append("}");
                }
            }
            sb.append("]}");
            
            System.out.println("Final json: " + sb.toString());
            
        } catch (JCoException e) {
            // TODO Auto-generated catch block
            e.printStackTrace();
        }
        
    }
    
    static private void createDestinationDataFile(String destinationName, Properties connectProperties)
    {
        File destCfg = new File(destinationName+".jcoDestination");
        try
        {
            FileOutputStream fos = new FileOutputStream(destCfg, false);
            connectProperties.store(fos, "for tests only !");
            fos.close();
        }
        catch (Exception e)
        {
            throw new RuntimeException("Unable to create the destination files", e);
        }
    } 
}

为简单起见没有使用Google的gson库进行Json的序列化。
执行结果:

要获取更多Jerry的原创技术文章,请关注公众号"汪子熙"

文章版权归作者所有,未经允许请勿转载,若此文章存在违规行为,您可以联系管理员删除。

转载请注明本文地址:https://www.ucloud.cn/yun/71352.html

相关文章

  • JavaScript访问SAP云平台上服务遇到跨域问题该怎么办

    摘要:关于的跨域问题的讨论网上有太多的资源了。直入主题,最近我正在做一个原型开发通过云平台和把系统上的暴露出来,给微信消费。请求得到响应之后,再将其发送给。回到我的原型开发需求,云平台上的消费如今通过来实现,为简单起见,我将硬编码在里。 关于JavaScript的跨域问题(Cross Domain)的讨论, 网上有太多的资源了。国内的程序猿写了非常多的优秀文章,Jerry这里就不再重复了。 ...

    用户84 评论0 收藏0
  • JavaScript访问SAP云平台上服务遇到跨域问题该怎么办

    摘要:关于的跨域问题的讨论网上有太多的资源了。直入主题,最近我正在做一个原型开发通过云平台和把系统上的暴露出来,给微信消费。请求得到响应之后,再将其发送给。回到我的原型开发需求,云平台上的消费如今通过来实现,为简单起见,我将硬编码在里。 关于JavaScript的跨域问题(Cross Domain)的讨论, 网上有太多的资源了。国内的程序猿写了非常多的优秀文章,Jerry这里就不再重复了。 ...

    Jinkey 评论0 收藏0
  • 站在巨人肩膀上牛顿:Kubernetes和SAP Kyma

    摘要:小的时候,听过牛顿这样谦虚的一句话如果说我看得比别人更远些,那是因为我站在巨人的肩膀上。。发布一个的事件,事件包含创建订单的字段。 这周Jerry在SAP上海研究院参加了一个为期4天的Kubernetes培训,度过了忙碌而又充实的4天。Jason,Benny和Peng三位大神的培训干货满满,借此机会,Jerry和过去的两位老领导Patrick和Evan叙了叙旧,也拜见了上海SAP圈子里...

    hosition 评论0 收藏0
  • 站在巨人肩膀上牛顿:Kubernetes和SAP Kyma

    摘要:小的时候,听过牛顿这样谦虚的一句话如果说我看得比别人更远些,那是因为我站在巨人的肩膀上。。发布一个的事件,事件包含创建订单的字段。 这周Jerry在SAP上海研究院参加了一个为期4天的Kubernetes培训,度过了忙碌而又充实的4天。Jason,Benny和Peng三位大神的培训干货满满,借此机会,Jerry和过去的两位老领导Patrick和Evan叙了叙旧,也拜见了上海SAP圈子里...

    Harpsichord1207 评论0 收藏0
  • 站在巨人肩膀上牛顿:Kubernetes和SAP Kyma

    摘要:小的时候,听过牛顿这样谦虚的一句话如果说我看得比别人更远些,那是因为我站在巨人的肩膀上。。发布一个的事件,事件包含创建订单的字段。 这周Jerry在SAP上海研究院参加了一个为期4天的Kubernetes培训,度过了忙碌而又充实的4天。Jason,Benny和Peng三位大神的培训干货满满,借此机会,Jerry和过去的两位老领导Patrick和Evan叙了叙旧,也拜见了上海SAP圈子里...

    王陆宽 评论0 收藏0

发表评论

0条评论

最新活动
阅读需要支付1元查看
<