Se encontraron 13 coincidencias

por jlanderos
06 Mar 2018, 22:29
Foro: REXX
Tema: Ayuda ejercicio
Respuestas: 5
Vistas: 756

Re: Ayuda ejercicio

Hola francisco, bueno esque en el modulo estamos haciendo otro lenguaje y voy estudiando e introduciendo con ayuda del profesor rexx Me ha quedado de la siguiente forma que creo que quedaría correcta. /* REXX */ ADDRESS TSO 'PROFILE NOPREFIX' "ALLOC FI(DDIN) DA(USUARIO.LISTA) SHR REUSE" "EXECIO * D...
por jlanderos
06 Mar 2018, 22:08
Foro: REXX
Tema: Ayuda para formateao de registros.
Respuestas: 2
Vistas: 271

Re: Ayuda para formateao de registros.

Hola: No entiendo muy bien lo que debes de hacer. Pero me parece que básicamente lo que necesitas es extraer los "X" mensajes del log del sistema. Hace tiempo elaboré un pequeño programa que hacía eso por necesidades del lugar. Búsqueda de errores, mensajes para depurar que aparecen en el sistema y ...
por jlanderos
06 Mar 2018, 05:18
Foro: REXX
Tema: Select con REXX
Respuestas: 4
Vistas: 296

Re: Select con REXX

Hola: Me parece que en el ejemplo que envías hace falta primero validar la conexión con DB2 y después de ello comenzar a trabajar con sentencias... Hice un rápido proceso para conectar a DB2 y validar su ambientación: /* REXX */ call DB2_ChkConn if result then say 'Falla en ambientación.' else call ...
por jlanderos
27 Dic 2017, 03:10
Foro: REXX
Tema: Consulta LPAR en Rexx
Respuestas: 3
Vistas: 544

Re: Consulta LPAR en Rexx

Hola:

Quiza te refieras a esto:

Código: Seleccionar todo

/* REXX */

SsId = MVSVAR('SYSNAME')   

Say 'El subsistema actual es >' SsId

exit
Saludos y suerte.

El camino de 1,000 kilómetros inicia con un solo paso. :arriba:
por jlanderos
27 Dic 2017, 03:05
Foro: REXX
Tema: Sustituir 2 caracteres por uno
Respuestas: 11
Vistas: 2942

Re: Sustituir 2 caracteres por uno

Hola: Tropezandome con un problema similar al que se comenta en este foro. Por el motivo de armar la estructura de un correo con formato HTML y la necesidad de sustituir símbolos propios de dicho formato tuve que hacer una función para ello. Aquí dejo mi contribución exacta como se realizó el test p...
por jlanderos
04 Oct 2017, 16:13
Foro: CICS Transaction server
Tema: START TRANSID(xxxx) por tiempo
Respuestas: 1
Vistas: 412

Re: START TRANSID(xxxx) por tiempo

Hola hdezmm: Me parece que eso se deba a que quiza la tarea se encuentra trabajando en un área de memoria controlada. Podrías probar con el comando: CEMT INQ UOW Si utilizas Mainview me parece que podrías visualizarlas, en modo WINDOWS, en la pantalla TASK. Lamentablemente en estos momentos no tengo...
por jlanderos
03 Oct 2017, 19:53
Foro: Sistema operativo
Tema: IBM Education Assistance for zOS 2.3
Respuestas: 5
Vistas: 1151

Re: IBM Education Assistance for zOS 2.3

denial escribió:Disculpa por la demora, te recomiendo que intentes nuevamente. Yo he podido sin problemas.
te comento que realicé nuevamente el intento y tuve el mismo problema. Puedo descargar el PDF pero al momento de intentar abrirlo me marca que está dañado.

La prueba la hice con varios.

Saludos.
por jlanderos
03 Oct 2017, 15:12
Foro: Comunicaciones
Tema: IP Servidor Hercules
Respuestas: 6
Vistas: 1070

Re: IP Servidor Hercules

Así es, aparentemente uno de los requisitos, que no está escrito en nigún lado pero da a enteder, es que para que puedas ver la IP que tienes configurada y trabajar con FTP por requerimiento indispensable debes de tener la PC conectada a una red ( cable de red ). Esto debido a que los DLL que utiliz...
por jlanderos
29 Sep 2017, 19:49
Foro: REXX
Tema: Medir Filesystems de USS y envio por mail
Respuestas: 2
Vistas: 1486

Re: Medir Filesystems de USS y envio por mail

Saludos: Antes que anda agradezco la aportación que haz hecho, es de gran ayuda para unos temillas que tengo pensado hacer en un futuro dentro del entorno en el que actualmente trabajo. Ahora bien, más que una corrección u observación sobre el programa en sí. Solo hago el comentarios que si la final...
por jlanderos
29 Sep 2017, 18:38
Foro: REXX
Tema: CURIOSIDADES DEL REXX
Respuestas: 9
Vistas: 3311

Re: CURIOSIDADES DEL REXX

Hola a todos, Escribo aquí una nueva curiosidad o pequeño reto del REXX surgido recientemente en un hilo de este foro. /* REXX no decide bien */ a = 'VICENTE12345678901234ANTONIO' b = 'ANTONIO12345678901235VICENTE' c = SUBSTR(a,8,14) d = SUBSTR(b,8,14) IF c < d THEN DO SAY 'c es menor que d' END IF...
por jlanderos
29 Sep 2017, 18:09
Foro: Sistema operativo
Tema: IBM Education Assistance for zOS 2.3
Respuestas: 5
Vistas: 1151

Re: IBM Education Assistance for zOS 2.3

Hola:

Gracias por el dato. Intenté descargar un par de manuales y me mandó un mensaje de "archivo dañado" al intentar abrirlos.
por jlanderos
29 Sep 2017, 15:49
Foro: Comunicaciones
Tema: IP Servidor Hercules
Respuestas: 6
Vistas: 1070

Re: IP Servidor Hercules

Hola nicotina: Te comento que he trabajado con Hercules un poco (3.12 y z/OS 1.10), por gusto de aprender nuevas cosas y trabajo también. Buscado en diversos foros sobre la posibilidad siquiera de poder comunicarte a hercules utilizando una conexión FTP desde la PC al HOST hay que hacer adecuaciones...
por jlanderos
29 Sep 2017, 14:45
Foro: REXX
Tema: trasformar formato fechas
Respuestas: 6
Vistas: 1095

Re: trasformar formato fechas

Una solución podría ser, tomando en cuenta que la entrada de datos siempre contará con la misma estructura: /* REXX */ timestamp = '170929123000xxxx' parse var timestamp anio 3 mes 5 dia 7 hr 9 min 11 sec 13 n say 'Año > ' || "'"anio"'" say 'Mes > ' || "'"mes"'" say 'Día > ' || "'"dia"'" say 'Hora >...