我在S/4HANA的事務碼MM02裡為Material維護圖檔檔案作為附件:
通過如下簡單的ABAP代碼即可将圖檔檔案的二進制内容讀取出來:
REPORT zgos_api.
DATA ls_appl_object TYPE gos_s_obj.
DATA lo_gos_api TYPE REF TO cl_gos_api.
DATA lt_attachment_list TYPE gos_t_atta.
DATA lt_role_filter TYPE gos_t_rol.
DATA: lv_id TYPE matnr VALUE '16',
lt_att TYPE TABLE OF sibflporb.
CALL FUNCTION 'CONVERSION_EXIT_MATN1_INPUT'
EXPORTING
input = lv_id
IMPORTING
output = lv_id.
ls_appl_object-typeid = 'BUS1001006'.
ls_appl_object-instid = lv_id.
ls_appl_object-catid = 'BO'.
START-OF-SELECTION.
TRY.
lo_gos_api = cl_gos_api=>create_instance( ls_appl_object ).
APPEND cl_gos_api=>c_attachment TO lt_role_filter.
lt_attachment_list = lo_gos_api->get_atta_list( lt_role_filter ).
CATCH cx_gos_api INTO DATA(error).
WRITE:/ error->get_text( ).
RETURN.
ENDTRY.
DATA: ls_key TYPE gos_s_attkey,
lv_base64 type string.
LOOP AT lt_attachment_list ASSIGNING FIELD-SYMBOL(<id>).
ls_key-atta_id = <id>-atta_id.
ls_key-atta_cat = <id>-atta_cat.
DATA(ls) = lo_gos_api->get_al_item( ls_key ).
BREAK-POINT.
ENDLOOP.
然後我把這段代碼封裝到一個Function moduleZDIS_GET_MATERIAL_IMAGES裡,在Java代碼裡消費這個function module,把S/4HANA傳回的二進制内容存成本地圖檔檔案。在ABAP系統裡圖檔二進制檔案内容的類型為RAWSTRING,如何在Java裡使用它?
使用JCO在Java裡消費ABAP function module的代碼:
static private void getProductImageTest(){
JCoDestination destination = null;
try {
destination = JCoDestinationManager.getDestination(DESTINATION_NAME);
JCoRepository repo = destination.getRepository();
JCoFunction stfcConnection = repo.getFunction("ZDIS_GET_MATERIAL_IMAGES");
JCoParameterList imports = stfcConnection.getImportParameterList();
String materialID = "16";
imports.setValue("IV_MATERIAL_ID", materialID);
stfcConnection.execute(destination);
JCoParameterList exports = stfcConnection.getExportParameterList();
int abapDuration = exports.getInt("EV_DURATION");
StringBuilder sb = new StringBuilder();
sb.append("{ \"" + ABAP_DURATION + "\": " + abapDuration + ",");
sb.append("\"" + UPSELL_PRODUCT + "\":[");
JCoTable codes = exports.getTable("ET_IMAGES");
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);
sb.append("{\"" + FILE_ID + "\":" + codes.getString("FILEID") + ","
+ "\"" + FILE_OWNER + "\":\"" + codes.getString("OWNER") + "\"" + ",");
sb.append("{\"" + FILE_CDATE + "\":" + codes.getString("CREATION_DATE") + ","
+ "\"" + FILE_NAME + "\":\"" + codes.getString("FILENAME") + "\"");
storeLocalFile(codes);
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();
}
}
其中把ABAP的類型為RAWSTRING的字段儲存成本地檔案的代碼封裝于方法storeLocalFile裡:
static private void storeLocalFile(JCoTable codes){
InputStream is = codes.getBinaryStream("FILECONTENT");
try {
File file = new File("c:\\temp\\" + codes.getString("FILENAME"));
byte[] bytes = new byte[is.available()];
is.read(bytes);
OutputStream output = new FileOutputStream(file);
BufferedOutputStream bufferedOutput = new BufferedOutputStream(output);
bufferedOutput.write(bytes);
bufferedOutput.close();
is.close();
} catch (IOException e) {
e.printStackTrace();
}
}
執行Java代碼後,在本地C槽temp目錄下能夠看到S/4HANA裡Material ID為16的兩個附件圖檔:
要擷取更多Jerry的原創技術文章,請關注公衆号"汪子熙"或者掃描下面二維碼:
![](https://img.laitimes.com/img/_0nNw4CM6IyYiwiM6ICdiwiIwQjMx8CX39CXy8CXycXZpZVZnFWbpN0NlAXayR3cvwFduVWay9WLvRXdh9CXyI3Zv1UZnFWbp9zZuBnLkJjNjNjZyUDMilzYklTN00SM5cTN4AjMvw1cldWYtl2XkF2bsBXdvw1bp5SdoNnbhlmauMXZnFWbp1CZh9GbwV3Lc9CX6MHc0RHaiojIsJye.png)