Buenos días,
Desde hace una semana, los correos smtp que envío con la utilidad SNDM, no
llegan a las direcciones de GMAIL.
Alguien tiene alguna idea.
A otras direcciones si llegan.
Versión S.O. V5R4M0
gracias.
Joxean Muguruza
E-mail: jmugur...@netekin.com
Hola a tod@s:
Tengo un pequeño problemilla, necesito generar un nº aleatorio en COBOL400
(NO ILE) y no puedo utilizar CEERAN0.
He encontrado varios ejemplos en San Google pero ninguno me funciona, o son
para COBOL-II o para ILE o simplemente no funcionan.
¿Alguien tiene una rutinilla en COBOL400
Juan:
No es en Cobol400… alguien me lo envió, no sé de donde salió, pero sirve.
Saludos
Ignacio T
0001.00 C *ENTRYPLIST
0002.00 C PARM RANNBR 90
0003.00 C PARM LOVAL 90
0004.00 C
Muchas gracias Ignacio pero no puedo utilizar RPG (ya me gustaría).
Lo necesito en COBOL400.
Un saludo.
Juanra
El 17 de septiembre de 2014, 14:58, Tellez Alvarado, Ignacio Andres
ignacio.tel...@scotiabank.cl escribió:
Juan, y aquí va el comando…(lo olvide).
Ignacio
/* COMPILAR
Hola Juanra,
Cuanto tiempo…
A ver si esto te sirve:
http://www-01.ibm.com/support/knowledgecenter/api/content/ssw_ibm_i_71/apis/qc3genprns.htm
No tengo ningún ejemplo en cobol ahora….cualquier cosa me dices…
De: forum.help400-boun...@listas.combios.es
Yo diria que sirve para COBOL/400:
The Generate Pseudorandom Numbers (OPM, QC3GENRN)
Esta API la puedes llamar desde un COBOL400 puro y duro.
De: forum.help400-boun...@listas.combios.es
[mailto:forum.help400-boun...@listas.combios.es] En nombre de Juan Ramón Garcia
Enviado el: miércoles, 17
¿Puedes utilizar SQL embebido? Si es así, puedes utilizar la función
Select int(RAND()) into :numero from sysibm/sysdummy1
Esto te generaría un número aleatorio de 1 dígito. Si lo necesitas de mayor
longitud, puedes ir multiplicando por potencias de 10.
Un saludo.
Juan Carlos.
De:
Hola a tod@s:
Al final he tirado por la calle de enmedio y como lo que necesito es muy
específico (un nº entre 1 y 24) me he basado en la hora y funciona bastante
bien:
01 VARIABLES-GENERALES.
05 W-HORA.
10 W-HH PIC 9(2) VALUE ZEROS.
10 W-MM
8 matches
Mail list logo