Buenos días. Mi nombre es Carlos, encantado de saludarles.
Os escribo porque estoy desesperado, estoy creando un script desde el menú principal de SAP (ALT+F12) y “Grabar o Reproducir Script” y al reproducirlo me aparece un error de advertencia que dice “Se esperaba un final de instrucción -”. Procedo a poner paso por paso lo que hago.
1- Entro a la tabla Z* que necesito actualizar.
2- Procedo a generar el script desde el menú principal de SAP y pulsando en la opción “Grabar o Reproducir Script”.
3- Lo grabo con los pasos pertinentes.
4- Lo guardo y monto normalmente.
5- Procedo a ejecutar una prueba con cinco datos para ver que los inserta correctamente (tengo que meter unos 5000 datos en una tabla)
6- Los inserta correctamente, y acto seguido modifico el fichero antes utilizado borrando las líneas ya insertadas.
7- Al ejecutarlo de nuevo, me aparece un error que dice “Se esperaba un final de instrucción -” y no me deja ejecutar nada más, habiéndolo ejecutado un segundo antes sin problemas.
¿Qué puede estar pasando? Facilito el código de ejemplo del Script:
If Not IsObject(application) Then
Set SapGuiAuto = GetObject("SAPGUI")
Set application = SapGuiAuto.GetScriptingEngine
End If
If Not IsObject(connection) Then
Set connection = application.Children(0)
End If
If Not IsObject(session) Then
Set session = connection.Children(0)
End If
If IsObject(WScript) Then
WScript.ConnectObject session, "on"
WScript.ConnectObject application, "on"
End If
session.findById("wnd[0]").resizeWorkingPane 112,40,false
session.findById("wnd[0]/tbar[1]/btn[5]").press
session.findById("wnd[0]/usr/tblSAPLZEJEMPLO01TCTRL_ZEJEMPLO01/ctxtZEJEMPLO01-BUKRS[0,0]").text = "1.1"
session.findById("wnd[0]/usr/tblSAPLZEJEMPLO01TCTRL_ZEJEMPLO01/txtZEJEMPLO01-REPID[1,0]").text = "1.2"
session.findById("wnd[0]/usr/tblSAPLZEJEMPLO01TCTRL_ZEJEMPLO01/txtZEJEMPLO01-CAMPO[2,0]").text = "1.3"
session.findById("wnd[0]/usr/tblSAPLZEJEMPLO01TCTRL_ZEJEMPLO01/txtZEJEMPLO01-SECNR[3,0]").text = "1.4"
session.findById("wnd[0]/usr/tblSAPLZEJEMPLO01TCTRL_ZEJEMPLO01/txtZEJEMPLO01-SIGN[4,0]").text = "1.5"
session.findById("wnd[0]/usr/tblSAPLZEJEMPLO01TCTRL_ZEJEMPLO01/txtZEJEMPLO01-OPTI[5,0]").text = "1.6"
session.findById("wnd[0]/usr/tblSAPLZEJEMPLO01TCTRL_ZEJEMPLO01/txtZEJEMPLO01-LOW[6,0]").text = "1.7"
session.findById("wnd[0]/usr/tblSAPLZEJEMPLO01TCTRL_ZEJEMPLO01/txtZEJEMPLO01-HIGH[7,0]").text = "1.8"
session.findById("wnd[0]/usr/tblSAPLZEJEMPLO01TCTRL_ZEJEMPLO01/txtZEJEMPLO01-DESCR[8,0]").text = "1.9"
session.findById("wnd[0]").sendVKey 0
session.findById("wnd[0]/tbar[0]/btn[11]").press
session.findById("wnd[0]/tbar[0]/btn[3]").press
session.findById("wnd[0]").resizeWorkingPane 112,40,false
session.findById("wnd[0]/tbar[1]/btn[5]").press
session.findById("wnd[0]/usr/tblSAPLZEJEMPLO01TCTRL_ZEJEMPLO01/ctxtZEJEMPLO01-BUKRS[0,0]").text = "2.1"
session.findById("wnd[0]/usr/tblSAPLZEJEMPLO01TCTRL_ZEJEMPLO01/txtZEJEMPLO01-REPID[1,0]").text = "2.2"
session.findById("wnd[0]/usr/tblSAPLZEJEMPLO01TCTRL_ZEJEMPLO01/txtZEJEMPLO01-CAMPO[2,0]").text = "2.3"
session.findById("wnd[0]/usr/tblSAPLZEJEMPLO01TCTRL_ZEJEMPLO01/txtZEJEMPLO01-SECNR[3,0]").text = "2.4"
session.findById("wnd[0]/usr/tblSAPLZEJEMPLO01TCTRL_ZEJEMPLO01/txtZEJEMPLO01-SIGN[4,0]").text = "2.5"
session.findById("wnd[0]/usr/tblSAPLZEJEMPLO01TCTRL_ZEJEMPLO01/txtZEJEMPLO01-OPTI[5,0]").text = "2.6"
session.findById("wnd[0]/usr/tblSAPLZEJEMPLO01TCTRL_ZEJEMPLO01/txtZEJEMPLO01-LOW[6,0]").text = "2.7"
session.findById("wnd[0]/usr/tblSAPLZEJEMPLO01TCTRL_ZEJEMPLO01/txtZEJEMPLO01-HIGH[7,0]").text = "2.8"
session.findById("wnd[0]/usr/tblSAPLZEJEMPLO01TCTRL_ZEJEMPLO01/txtZEJEMPLO01-DESCR[8,0]").text = "2.9"
session.findById("wnd[0]").sendVKey 0
session.findById("wnd[0]/tbar[0]/btn[11]").press
session.findById("wnd[0]/tbar[0]/btn[3]").press
Como aclaración, mi versión de SAP es la 770 Final Release. Si necesitan cualquier otra cosa, me dicen.
Muchas gracias de antemano y un saludo.