Yo creo que hay que decirle en la definición del mandato, en el parámetro que
vas a pasar, que tiene un mínimo de al menos 1 valor.
CMD PROMPT('Plantel') ALLOW(*INTERACT)
PARM KWD(PLA) TYPE(*CHAR) LEN(2) MIN(1) PROMPT('Plantel')
Saludos
De: forum.help400-boun...@listas.combios.es
[mailto:forum.help400-boun...@listas.combios.es] En nombre de Juan Gutierrez
Ruiz
Enviado el: miércoles, 26 de abril de 2017 20:55
Para: forum.help400
CC: Raul Gallo; manuelhmor...@gmail.com
Asunto: Cracion de un comado con 1 parametro
hola Forum
estoy haciendo un comando para llamar a un programa cl y el cl a un RPG
pero tengo mucho que no hacia uno
como hago para que el comando me pida el parámetro plantel
me falta algo al crearlo ??
me pueden echar una manita
gracias
este es mi comando
Opc Miembro Tipo Texto
CMDPREAB CMD comando para llamar al cl preabierto
CMD PROMPT('Plantel') ALLOW(*INTERACT)
PARM KWD(PLA) TYPE(*CHAR) LEN(2) PROMPT('Plantel')
====================================================================================
Opc Miembro Tipo Texto
PRECABIER CLLE ejecuta desde el movil el precio abierto
PGM
DCL VAR(&PLA) TYPE(*CHAR) LEN(2)
MONMSG MSGID(CPF9999)
MONMSG MSGID(CPF0000)
CALL PGM(DAPREABI)
ENDPGM
=========================================================================
Crear mandato (CRTCMD)
Teclee elecciones, pulse Intro.
Mandato . . . . . . . . . . . . CMD > CMDPREAB
Biblioteca . . . . . . . . . . > QGPL
Programa para procesar mandato PGM > PRECABIER
Biblioteca . . . . . . . . . . > QGPL
Archivo fuente . . . . . . . . . SRCFILE QCMDSRC
Biblioteca . . . . . . . . . . *LIBL
Miembro fuente . . . . . . . . . SRCMBR *CMD
Seguro en ejecución multihebra THDSAFE *NO
Acción de trabajo multihebra . . MLTTHDACN *SYSVAL
Texto descriptivo . . . . . . . TEXT *SRCMBRTXT
Parámetros adicionales
Programa comprobación validez . VLDCKR *NONE
Biblioteca . . . . . . . . . .
Más...
************AVISO LEGAL***********
Este mensaje se dirige exclusivamente a su destinatario y puede contener
información privilegiada o confidencial. Si no es vd. el destinatario indicado,
queda notificado de que la lectura, utilización, divulgación y/o copia sin
autorización está prohibida en virtud de la legislación vigente. Si ha recibido
este mensaje por error, le rogamos que lo comunique inmediatamente por esta
misma vía y proceda a su destrucción. Antes de imprimir este mensaje, asegúrese
de que es necesario. El medio ambiente está en nuestra mano.
____________________________________________________
Únete a Recursos AS400, nuestra Comunidad ( http://bit.ly/db68dd )
Forum.Help400 © Publicaciones Help400, S.L.
