使用按钮从 SAP 系统内打开 Excel 文件

了解如何通过 SAP 屏幕上创建的按钮打开所需的 Excel 文件。为了演示这一点，将指导您完成以下步骤。

1. 使用 del 命令删除 SAP 上不必要的元素
2. 添加一个按钮，单击后打开弹出窗口
3. 创建一个函数来选择 excel 文件
4. 创建打开所需 excel 文件的函数

定制

登录 SAP 并在 SAP Easy Access 屏幕上删除映像容器，如下图所示： 

// 删除 SAP Easy Access 屏幕上的图像容器 
del("X[IMAGE_CONTAINER]")；

屏幕脚本：

1、添加一个 "打开 Excel 文件 "的工具栏按钮，以执行名为 "选择 Excel 文件 "的程序，并在单击时弹出一个窗口

// 创建一个标签为 "打开 Excel 文件 "的按钮，点击后弹出一个窗口。 
pushbutton([TOOLBAR],"@48@Open Excel File", "?", {"process":选择Excel文件})；

2、使用加载命令将 wsoffice 添加到 SAPLSMTR_NAVIGATION.E0100.sjs 文件中；这样就可以访问其中包含的功能。

// 需要加载该文件以显示 "文件选择 "弹出窗口
load('wsoffice')；

 3、现在，在文件中添加以下 Liquid UI 脚本并保存。

 //function SelectExcelfile(param){
   if(szPrompt==void 0) szPrompt = 'Select the Excel File'；
    var dialog = new ActiveXObject('MsComDlg.CommonDialog')；
    dialog.Filter='Excel Files(*.xlsx*)|*.xlsx*'；
    dialog.MaxFileSize=32767； 
    dialog.DialogTitle=szPrompt；
    dialog.Flags=0x200|0x80000|0x800|0x4|0x200000 
    dialog.ShowOpen()；  
    var ret = dialog.FileName；
    dialog = void 0； 
  if(file!=""){  
  ifopenExcelfile(file)  
    }
    else{
    message("File Not Selected!",{"StatusLine":true, "title": "Information", "type": "W"})；
    }
 }
// 打开 Excel 文件的函数
function openExcelfile(filename){ 
   g_ExcelApp = new ActiveXObject('Excel.Application')；
   g_ExcelBook=g_ExcelApp.Workbooks.Open(filename)；
   g_ExcelApp.Visible=true； 
   g_ExcelApp.ScreenUpdating=true；
   message("S:" +filename+" Excel 文件已成功打开")；
  }

SAP 流程

1、现在，刷新 SAP 屏幕，然后点击打开 Excel 文件工具栏按钮。如下图所示，弹出一个窗口。

 

2、选择需要打开的 excel 文件，然后点击打开，如下图所示。 

3、然后，选定的 Excel 文件将被打开，并显示 "Excel 文件已成功打开 "的成功信息和文件路径，如下图所示。 

4、如果没有选择文件，则会显示错误信息 "未选择文件"，如下图所示。