La cuestión es que, el programa ya está definido con el *NOPASS y
hay un montón de programas que acceden a él, por lo que cambiar los
parámetros de entrada es complicado.
Me haré otro programa que, en
función de esos datos que me indicas haga la llamada al que ya existe y
pondré éste como programa a ejecutar en el mandato.
Gracias.
Juan
Carlos.
El 09/11/2015 11:02, Alex Martínez escribió:
> Hola
>
>
Las 15 direcciones de correo las puede definir como char 50 por ejemplo
>
> PARM KWD(EMAIL) TYPE(*CHAR) LEN(50) MIN(1) MAX(20)
PROMPT('Correo')
>
> El programa recibirá 1 PARÁMETRO de 1002 de
longitud ( 20 elementos de 50 char + 2 byte )... asi que no debes usar
*NOPASS sino definir una DS por ejemplo
>
> El "truco" es que los 2
primero bytes indican el numero de elementos pasados, es decir el numero
de direcciones de correo que has indicado en el mandato
>
> NOTE: The
values for a list parameter are passed consecutively, preceded by a
2-byte binary value that indicates the number of values entered in the
parameter by the user.
>
>
http://www-01.ibm.com/support/knowledgecenter/ssw_ibm_i_61/cl/parm.htm
[3]
>
> El 9 de noviembre de 2015, 10:18, Juan Carlos Paredes Castañón
<[email protected]> escribió:
>
>> Buenos días:
>>
>> Tengo un
programa RPG que recibe un número variable de parámetros (entre 2 y 17).
Concretamente, recibe una cola de salida y un texto obligatorios y hasta
15 direcciones de correo para enviarlo. Las 15 direcciones están
definidas con Options(*NOPASS) para que no sea necesario pasar más que
las que se van a usar.
>>
>> Quería hacer un mandato que invocara a
este programa, pero no tengo claro cómo definir los parámetros
variables.
>>
>> ¿Alguna idea?
>>
>> --
>> url:
http://www.paredes.info [1]
>> mail: [email protected]
>>
>>
____________________________________________________
>> Únete a Recursos
AS400, nuestra Comunidad ( http://bit.ly/db68dd [2] )
>> Forum.Help400
(c) Publicaciones Help400, S.L.
>
>
____________________________________________________
> Únete a Recursos
AS400, nuestra Comunidad ( http://bit.ly/db68dd [2] )
> Forum.Help400
(c) Publicaciones Help400, S.L.
--
url: http://www.paredes.info
mail:
[email protected]
Links:
------
[1] http://www.paredes.info
[2]
http://bit.ly/db68dd
[3]
http://www-01.ibm.com/support/knowledgecenter/ssw_ibm_i_61/cl/parm.htm
____________________________________________________
Únete a Recursos AS400, nuestra Comunidad ( http://bit.ly/db68dd )
Forum.Help400 © Publicaciones Help400, S.L.