VFP en pantalla verde AS/400

666 views
Skip to first unread message

Gerardo Ramírez

unread,
Jul 16, 2012, 12:42:20 PM7/16/12
to publice...@googlegroups.com

En el proyecto, en el cual la necesidad consistía, en generar un archivo de Excel a partir de la información almacenada en un archivo físico en el AS/400; mediante una opción de menú del usuario en el AS/400. Mis investigaciones me permitieron tener el código de los programas hechos en VFP almacenados en bibliotecas del AS/400 y no en la PC. Estos programas están alojados en el AS/400, y desde ahí se crean y se editan con la herramienta SEU en pantalla verde. Luego se ejecutan desde la biblioteca en donde estén almacenados.

Por eso me sigue impresionando VFP, que los programas PRG, pueden existir dentro de bibliotecas del AS/400, junto con programas de RPG y COBOL. Desde luego que tiene su truco, el cual no estoy seguro que pueda hacerse con  JAVA, .NET, entre otros.

¿Será de interés para IBM, ofrecer comprar VFP a Microsoft, para hacerlo aún más grande?. No lo sé, pero el Zorro me deja sorprendido.

Este es uno de los programas editados en pantalla verde, y que se ejecuta por el usuario para obtener el resultado deseado, desde un menú del AS/400.
 
Parte1.gif
Parte2.gif
Parte3.gif

Carlos Miguel FARIAS

unread,
Jul 16, 2012, 4:17:05 PM7/16/12
to publice...@googlegroups.com
Para "correr" el programa .PRG en el AS/400, que runtime usabas, o le hacias simular al AS un windows "virtual"?
Saludos: Miguel, La Pampa, (RA)

Gerardo Ramírez

unread,
Jul 16, 2012, 4:59:50 PM7/16/12
to publice...@googlegroups.com
Estimado Carlos.
No existe un runtime, ni tampoco simulo un Windows. El truco está en un programa hecho en VFP (.EXE) en la PC, que usa EXECSCRIPT(), como parte de su lógica interna, además en combinación con un programa CLLE que usa STRPCCMD del lado del AS/400. Esto lo hice así porque por aspectos de seguridad, en la empresa, requieren que los programas, estén almacenados solamente en bibliotecas de producción del AS/400.


--
 
 
 

Walter R. Ojeda Valiente

unread,
Jul 16, 2012, 5:02:15 PM7/16/12
to publice...@googlegroups.com
Bueno, si alguna vez debo trabajar con una AS/400 espero recordarme de esto que estás escribiendo para pedirte ayuda si la necesito.

Saludos.

Walter.





Date: Mon, 16 Jul 2012 14:59:50 -0600
Subject: Re: [vfp] VFP en pantalla verde AS/400
From: teac...@gmail.com
To: publice...@googlegroups.com
--
 
 
 

Gerardo Ramírez

unread,
Jul 16, 2012, 5:14:07 PM7/16/12
to publice...@googlegroups.com
Estimado Walter, con todo gusto estoy para ayudarte, no es nada difícil, y más para un profesional como tú. De hecho existe un servidor AS/400 en Alemania que brinda cuentas gratis, el cual uso a veces como estudio entre otras cosas. Y te puedes abrir una cuenta, aprender, y entrar al mundo de los iSeries.

--
 
 
 

Carlos Miguel FARIAS

unread,
Jul 17, 2012, 7:02:21 AM7/17/12
to publice...@googlegroups.com
Esta claro, el runtime es del fox comùn en el PC, el programa corre en el PC a traves del utilitario de conexiòn que provee el OS/400, el fuente està seguro dentro del AS/400.
Cualquiera que meta en el pc un vfp que en lugar de ejecutar el script, lo copie al disco local, esta pudiendo ver el script. Por el lado del AS es seguro, deberà cuidarse que no instalen cualquier fruta en el pc cliente.
Saludos: Miguel, La Pampa (RA)


--
 
 
 

Gerardo Ramírez

unread,
Jul 17, 2012, 10:42:14 AM7/17/12
to publice...@googlegroups.com
Tienes razón el runtime es de Fox en el PC. Ahora el programa no corre a través del utilitario de conexión, sino que este es más bien el medio de comunicación entre el PC y el AS/400. Es un programa de tipo CLLE en el AS/400, el que ejecuta un programa Fox en el PC que invoca al runtime de Fox.
 
Y por otro lado, no cualquiera que meta en el PC, un programa de VFP, lo puede copiar. Recuerda que la seguridad en el AS/400, es muy robusta y poderosa; y si el usuario conectado no tiene las autorizaciones necesarias otorgadas por ejemplo por QSECOFER; esta limitado.
 
Ejemplo de intentar visualizar el programa de Fox en el AS/400:
 
 
 
--
 
 
 

WRKMBRPDM.gif

Gerardo Ramírez

unread,
Jul 17, 2012, 10:54:55 AM7/17/12
to publice...@googlegroups.com
De hecho Carlos el AS/400 y los Mainframes como el Sistema/390 IBM, es el único sistema que no ha podido ser accedido por un Hacker
 

Carlos Miguel FARIAS

unread,
Jul 17, 2012, 12:08:19 PM7/17/12
to publice...@googlegroups.com
No fueron accedidos que se se sepa, los chicos de la NSA tampoco? ;-)
Igualmente, la seguridad del AS es muy robusta.
Aunque, con mucho frio, a veces tampoco puedo visualizar el miembro ;-)))))
Saludos: Miguel, Santa Rosa (LP)

--
 
 
 

Daniel Sánchez

unread,
Jul 18, 2012, 12:27:38 AM7/18/12
to publice...@googlegroups.com
Lo que no saben es que Windev se conecta o trabaja con AS/400


haber como les queda el ojo.

Saludos

--
Daniel Sánchez Escobar
Investigación y Desarrollo
Reset Software & Sistemas
Móvil +051-949398047
Trujillo - Perú

Gerardo Ramírez

unread,
Jul 18, 2012, 10:30:04 AM7/18/12
to publice...@googlegroups.com
Si Daniel, así es, y de hecho en la empresa donde trabajo tienen el producto.
 
Pero lo que el producto hace, se puede hacer con otros productos. Por ejemplo Websphere, Navigator. Igual yo he hecho aplicativos con VFP, que se conectan de forma nativa al AS/400 sin ODBC ni OLE DB; y también con VFP se pueden ejecutar comandos del AS/400, programas RPG, COBOL, etc, hasta se pueden depurar programas en el AS/400 que estan en un JOB con STRSRVJOB y STRDBG, administrar el SPOOL igual que se hace con WRKSPLF, ejecutar sesiones del AS/400 invisibles al usuario, etc.
 
No dudo del poder de AS/400 WinDev, pero quisiera saber por ejemplo como trabajar con las API del AS/400 con el producto. Por ejemplo yo pude desarrollar una utilidad que permite recuperar los fuentes de programas borrados del AS/400, a partir de los objetos que son los progrmas compilados como:
 
BUSQUEDA    *PGM      CBLLE   COBOL ILE
DD0600           *PGM      RPGLE   RPG ILE
DD0605           *PGM      CBL       COBOL
DEBUG           *PGM      CLE       C ILE
EMBOCE        *PGM      CLLE     CLP ILE
GEP003          *PGM      RPG36   RPG II
GEP005          *PGM      RPG      RPG/400
IAC038            *PGM      CLP      CLP
 


 

--
 
 
 

Reply all
Reply to author
Forward
0 new messages