Hola Roberto, En la PSDS si que está el usuario:
https://www.ibm.com/support/knowledgecenter/ssw_ibm_i_74/rzasd/psdsdt9.htm En la posición 358. Para recuperarlo en free: dcl-ds pgm_stat PSDS; user char(10) pos(358); end-ds; Un saludo Sergio Martinez De: Forum.help400 <[email protected]> En nombre de Roberto Palomino Enviado el: jueves, 18 de marzo de 2021 16:22 Para: forum.help400 <[email protected]> Asunto: Re: Rtvjoba en rpg o sql Gracias Víctor, si me sirve. Saludos ROBERTO PALOMINO MADUEÑO. Cel. (+51) 992882433 www.linkedin.com/in/roberto-palomino-madueno<http://www.linkedin.com/in/roberto-palomino-madueno> El jue., 18 de marzo de 2021 10:15 a. m., <[email protected]<mailto:[email protected]>> escribió: Hola, puede que te sirva esto https://www.rpgpgm.com/2016/02/retrieving-jobs-library-list-using-sql.html El jue, 18 mar 2021 a las 11:26, Roberto Palomino (<[email protected]<mailto:[email protected]>>) escribió: Buenos días a todos, alguien sabe cómo recuperar la librería current dentro de un programa RPG?, Básicamente es hacer RTVJOBA CURUSER(&CURUSER) Pero en RPG o SQL La estructura PSDS no lo tiene o si? GRACIAS ROBERTO PALOMINO. ____________________________________________________ Únete a Recursos AS400, nuestra Comunidad ( http://bit.ly/db68dd ) Forum.Help400 © Publicaciones Help400, S.L. ____________________________________________________ Únete a Recursos AS400, nuestra Comunidad ( http://bit.ly/db68dd ) Forum.Help400 © Publicaciones Help400, S.L. Este mensaje contiene información confidencial dirigida al destinatario del mismo. Las opiniones expresadas pertenecen al autor y no necesariamente a ESTIBARNA. Si Ud. recibe este mensaje por error, se ruega informe inmediatamente al remitente del mismo. Queda prohibido el uso, divulgación, copia o distribución a terceros de la información incluida en este mensaje.
____________________________________________________ �nete a Recursos AS400, nuestra Comunidad ( http://bit.ly/db68dd ) Forum.Help400 � Publicaciones Help400, S.L.
