Este error da generalmente porque se quedo grabado entradas corruptas en el archivo gxswinfo.ini, el mismo que esta ubicado en la carpeta raiz de la KB, lo mas recomendable es recordar cual fue la ultima KB que se utilizo para crear un instalador y en la misma eliminar ese archivo.
Con esto se soluciona el asunto.
lunes, junio 23, 2008
viernes, junio 20, 2008
Error en compilador RPG - GX9 con WorkPanel TRABAJAR CON
Generalmente suele no compilar el objeto que invoca a otro objeto de la forma siguiente:
Call(TCLIENTES ,'INS','')
Lo correcto seria lo siguiente:
&Parametro = ''
TCLIENTES.CALL('INS', &Parametro)
El parametro puede ser Caracter o Numerico, asignarle siempre un valor vacio.
Cuando se hace un WorkPanel tipo Trabajar Con se detalla el siguiente ejemplo de los eventos
Event 'ADICIONAR REGISTRO' 6
............&Clave = 0
............TCLIENTE.CALL('INS', &Clave)
............Refresh
EndEvent
Event Enter
............For Each Linea
...................Do Case
.........................Case &Op = '2' // modificar
..................................TCLIENTE.CALL('UPD', Clave)
.........................Case &Op = '4' // Eliminar
..................................TCLIENTE.CALL('DLT', Clave)
.........................Case &Op = '5' // Revisar
..................................TCLIENTE.CALL('DSP', Clave)
..................EndCase
............EndFor
............Refresh
EndEvent
Esta seria la forma correcta de como trabajar un WorkPanel de mantenimiento.
Endif
Call(TCLIENTES ,'INS','')
Lo correcto seria lo siguiente:
&Parametro = ''
TCLIENTES.CALL('INS', &Parametro)
El parametro puede ser Caracter o Numerico, asignarle siempre un valor vacio.
Cuando se hace un WorkPanel tipo Trabajar Con se detalla el siguiente ejemplo de los eventos
Event 'ADICIONAR REGISTRO' 6
............&Clave = 0
............TCLIENTE.CALL('INS', &Clave)
............Refresh
EndEvent
Event Enter
............For Each Linea
...................Do Case
.........................Case &Op = '2' // modificar
..................................TCLIENTE.CALL('UPD', Clave)
.........................Case &Op = '4' // Eliminar
..................................TCLIENTE.CALL('DLT', Clave)
.........................Case &Op = '5' // Revisar
..................................TCLIENTE.CALL('DSP', Clave)
..................EndCase
............EndFor
............Refresh
EndEvent
Esta seria la forma correcta de como trabajar un WorkPanel de mantenimiento.
Endif
miércoles, junio 18, 2008
Ruta No especificada Compilador JAVA GX9
Es tipo que cuando utilizamos el generador Java de la Version GX9, por cualquier circunstancia al momento de compilar nos desplega el siguiente error:
NAMKE ruta no existe
Eso sucede comunmente cuando hemos cambiado las rutas del tomcat
Para el caso de la ubicacion de las clases /tomcat/webapps/aplicacion/WEB-INF/classes
Para la ubicacion de las imagenes o scripts /tomcat/webapps/aplicacion/images
Debemos tener presente esta opcion cuando hacemos una modificacion al modelo o creamos un modelo nuevo, tambien cuando reinstalamos un servidor donde esta el tomcat o cuando cambiamos de servidor donde esta el tomcat.
NAMKE ruta no existe
Eso sucede comunmente cuando hemos cambiado las rutas del tomcat
Para el caso de la ubicacion de las clases /tomcat/webapps/aplicacion/WEB-INF/classes
Para la ubicacion de las imagenes o scripts /tomcat/webapps/aplicacion/images
Debemos tener presente esta opcion cuando hacemos una modificacion al modelo o creamos un modelo nuevo, tambien cuando reinstalamos un servidor donde esta el tomcat o cuando cambiamos de servidor donde esta el tomcat.
lunes, junio 09, 2008
Para Conexion Dinamica a la Base de Datos Con GX
msg('Conectando a base de datos... '+rtrim(&Base_datos) + ' En el servidor '+rtrim(&Servidor), nowait)
&Conexion = GetDatastore("Default")
&Conexion.Disconnect()
&Conexion.ConnectionData = "SERVER=" + rtrim(&Servidor) + ";DATABASE=" + rtrim(&Base_datos)
&Conexion.UserName = 'sa'
&Conexio.UserPassword = 'sa'
&Conexio.ShowPrompt = 3
&ConexionEstado=&Conextion.Connect()
If &ConexionEstado <> 0
msg('->'+str(&ConexionEstado)+' '+&Conexion.ErrDescription)
Else
msg('Se conecto a '+&Conexion.ODBCDatasourceName)
Endif
&Conexion = GetDatastore("Default")
&Conexion.Disconnect()
&Conexion.ConnectionData = "SERVER=" + rtrim(&Servidor) + ";DATABASE=" + rtrim(&Base_datos)
&Conexion.UserName = 'sa'
&Conexio.UserPassword = 'sa'
&Conexio.ShowPrompt = 3
&ConexionEstado=&Conextion.Connect()
If &ConexionEstado <> 0
msg('->'+str(&ConexionEstado)+' '+&Conexion.ErrDescription)
Else
msg('Se conecto a '+&Conexion.ODBCDatasourceName)
Endif
viernes, junio 06, 2008
Problemas con NET en Win GX9 Upg4 y Net Upg4
Descargar esta actualizacion del FrameWork 2, instalar y volver a generar el modelo en su totalidad para publicar la apilcacion.
http://download.microsoft.com/download/c/e/4/ce445110-e494-4a45-81db-05852ffba284/NDP20-KB928365-X86.exe
http://download.microsoft.com/download/c/e/4/ce445110-e494-4a45-81db-05852ffba284/NDP20-KB928365-X86.exe
Suscribirse a:
Entradas (Atom)