1

我想在 SAP 中创建一个“输入字段”，它使用 vb 脚本中传递的值。举一个具体的例子，我想打开FBL5N，将发票传递到一个字段中，然后在 中查看发票VF03。执行此操作的脚本已准备好，适用于发票的硬编码值或通过 VBA。

这是GUI脚本部分

inputfield (2,35)  "inv" (2,45) size=10 name="V_inv"
pushbutton (toolbar)  "print_inv" process="InvoiceScript.txt"
using MYINV = "V_inv"

现在，我不知道如何处理 inputscript 部分。在这件事上我希望得到你的帮助。这是我的第一次尝试：

Screen SAPLSLVC.0500
ApplyGuiScript template="VF03INV.vbs"
Enter

感谢您的帮助，如果您需要任何精度，请告诉我。以下是我获得上述代码的灵感来源： http ://www.synactive.com/tutor_e/lessonia03.html http://www.synactive.com/docu_e/docia_process2.html

***如果有可能有一个版本可以读取剪贴板中的值，那就更好了。

4

2 回答 2

2

经过多次尝试，这里有一个解决方案：

脚本（SAPLSLVC.0500.txt）：

inputfield (2,35)  "inv" (2,45) size=10 name="V_inv" 
pushbutton (toolbar)  "script" "/OVF03" process="startvf03.txt"
using INV = [V_inv] ' need this when opening new screen

输入脚本（startvf03.txt）：

parameter INV
Screen SAPMV60A.0101    'this is the VF03 screen
SET F[VBRK-VBELN] "&U[INV]"    'pass invoice # parameter
ApplyGuiScript "C:\guiXT\scripts\VF03INV.vbs"

VBScript (VF03INV.vbs)：

inv = session.findById("wnd[0]/usr/ctxtVBRK-VBELN").text
session.findById("wnd[0]/mbar/menu[0]/menu[11]").Select
session.findById("wnd[1]/tbar[0]/btn[37]").press
session.findById("wnd[0]/tbar[0]/okcd").Text = "pdf!"
session.findById("wnd[0]").sendVKey 0

'with some little extra here on how to save a pdf in SAP

'get new strings for locations (specific to my situation)
abc = session.findById("wnd[1]/usr/cntlHTML/shellcont/shell").Browserhandle.locationURL
beg = instr(abc,"C:")
cde =  mid(abc,beg,9999)
dest = "C:\111\invoices\" & inv & ".pdf"

'changing from temp to a specific folder
Set FSO = CreateObject("Scripting.FileSystemObject")
FSO.copyfile cde, dest

'close the open file
session.findById("wnd[1]").close
session.findById("wnd[0]").close
Set fso = nothing

*您通常看到的几个If Not IsObject(application) Then不是必需的，但拥有它们并没有什么坏处。

希望对大家学习Guixt有帮助

于 2017-01-17T01:33:18.827 回答
0

在带有参数“模板”的 VB 脚本中，您可以按如下方式寻址 GuiXT 变量。

例如：

msgbox "&V[V_inv]"
于 2017-01-16T09:53:22.300 回答