Hola a todos:
En un mandato de cosecha propia necesito validar que NO ocurra una situación
concreta. Por ejemplo, la siguiente definición:
PARM KWD(JOB) TYPE(QUALJOB) MIN(1) +
PROMPT('Nombre de trabajo')
QUALJOB: QUAL TYPE(*NAME) LEN(10) +
SPCVAL((*NOCHK))
QUAL TYPE(*NAME) DFT(*NOCHK) +
SPCVAL((*NOCHK)) +
PROMPT('Usuario')
QUAL TYPE(*CHAR) LEN(6) DFT(*NOCHK) +
RANGE(000000 999999) +
SPCVAL((*NOCHK)) +
PROMPT('Número')
Me permite usar esta combinación de valores:
MIMANDATO JOB(*NOCHK/*NOCHK/*NOCHK)
Situación que no quiero que suceda, al menos hay que especificar uno de los
tres valores del parámetro JOB. Para validar he utilizado DEP como sigue:
DEP CTL(*ALLWAYS) PARM((&JOB *NE '*NOCHK +
*NOCHK *NOCHK'))
Pero no se realiza la comprobación. No tengo mucha experienza con este mandato.
Mi intención de comprobar siempre que el contenido de &JOB no sea '*NOCHK...'.
¿Alguien me puede echar una manita? ¿Qué hago mal?
Un saludo
Javier Mora
Dpto. Informática
__________________________________________________
Forum.HELP400 es un servicio más de NEWS/400.
© Publicaciones Help400, S.L. - Todos los derechos reservados
http://www.help400.es
_____________________________________________________
Para darte de baja visita la siguente URL:
http://listas.combios.es/mailman/listinfo/forum.help400