Gracias David

ya pude generarlo



ahora el problema es que lo necesito ejecutar desde un usuario (USRPRF)

y el el USERPRF  solo permite llamas de inicio a un menú o un programa de 
cualquier tipo

sin embargo un comando como lo ejecuto ???


saludos





________________________________
De: forum.help400-boun...@listas.combios.es 
<forum.help400-boun...@listas.combios.es> en nombre de Rafael Silva 
<rsilva.l...@gmail.com>
Enviado: jueves, 27 de abril de 2017 09:06 a. m.
Para: forum.help400@listas.combios.es
Asunto: Re: Resumen de Forum.help400, Vol 126, Envío 23

Debes colocar la palabra clave MIN(1), para puedas ejecutar el comando y te 
pida el parámetro..... De esta manera:

   CMD        PROMPT('Plantel') ALLOW(*INTERACT)
            PARM       KWD(PLA) TYPE(*CHAR) LEN(2) MIN(1) +                     
                        PROMPT('Plantel')


Saludos,


El 27 de abril de 2017, 9:54, 
<forum.help400-requ...@listas.combios.es<mailto:forum.help400-requ...@listas.combios.es>>
 escribió:
Envíe los mensajes para la lista Forum.help400 a
        forum.help400@listas.combios.es<mailto:forum.help400@listas.combios.es>

Para subscribirse o anular su subscripción a través de la WEB
        http://listas.combios.es/cgi-bin/mailman/listinfo/forum.help400

O por correo electrónico, enviando un mensaje con el texto "help" en
el asunto (subject) o en el cuerpo a:
        
forum.help400-requ...@listas.combios.es<mailto:forum.help400-requ...@listas.combios.es>

Puede contactar con el responsable de la lista escribiendo a:
        
forum.help400-ow...@listas.combios.es<mailto:forum.help400-ow...@listas.combios.es>

Si responde a algún contenido de este mensaje, por favor, edite la
linea del asunto (subject) para que el texto sea mas especifico que:
"Re: Contents of Forum.help400 digest...". Además, por favor, incluya
en la respuesta sólo aquellas partes del mensaje a las que está
respondiendo.


Asuntos del día:

   1. Re: Cracion de un comado con 1 parametro  (Juan Gutierrez Ruiz)
   2. Re: Cracion de un comado con 1 parametro (Juan Gutierrez Ruiz)


----------------------------------------------------------------------

Message: 1
Date: Thu, 27 Apr 2017 13:53:53 +0000
From: Juan Gutierrez Ruiz 
<juan_gutierrez_r...@hotmail.com<mailto:juan_gutierrez_r...@hotmail.com>>
Subject: Re: Cracion de un comado con 1 parametro
To: "'forum.help400'" 
<forum.help400@listas.combios.es<mailto:forum.help400@listas.combios.es>>
Message-ID:
        
<cy4pr12mb1496e3e625b5623da4c66defbe...@cy4pr12mb1496.namprd12.prod.outlook.com<mailto:cy4pr12mb1496e3e625b5623da4c66defbe...@cy4pr12mb1496.namprd12.prod.outlook.com>>

Content-Type: text/plain; charset="iso-8859-1"

Gracias por responder


Pero al crear el comando y lo ejecuto

no me pide el dato del parámetro (plantel)

me faltara algo ??



CRTCMD CMD(QGPL/CMDPREAB) PGM(QGPL/PRECABIER)




Parámetros o mandato
===> CMDPREAB



gracias




________________________________
De: 
forum.help400-boun...@listas.combios.es<mailto:forum.help400-boun...@listas.combios.es>
 
<forum.help400-boun...@listas.combios.es<mailto:forum.help400-boun...@listas.combios.es>>
 en nombre de Javier Mora <jm...@musgrave.es<mailto:jm...@musgrave.es>>
Enviado: jueves, 27 de abril de 2017 02:35 a. m.
Para: 'forum.help400'
Asunto: RE: Cracion de un comado con 1 parametro


     PGM   PARM(&PLA)

     DCL VAR(&PLA) TYPE(*CHAR) LEN(2)



Saludos,



Javier Mora





De: 
forum.help400-boun...@listas.combios.es<mailto:forum.help400-boun...@listas.combios.es>
 
[mailto: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 21:55
Para: forum.help400
CC: Raul Gallo; manuelhmor...@gmail.com<mailto: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...










------------ próxima parte ------------
Se ha borrado un adjunto en formato HTML...
URL: 
<http://listas.combios.es/cgi-bin/mailman/private/forum.help400/attachments/20170427/4e895be1/attachment-0001.html>

------------------------------

Message: 2
Date: Thu, 27 Apr 2017 13:54:13 +0000
From: Juan Gutierrez Ruiz 
<juan_gutierrez_r...@hotmail.com<mailto:juan_gutierrez_r...@hotmail.com>>
Subject: Re: Cracion de un comado con 1 parametro
To: Manuel Humberto Moreno 
<manuelhmor...@gmail.com<mailto:manuelhmor...@gmail.com>>
Cc: Raul Gallo <rga...@prodigy.net.mx<mailto:rga...@prodigy.net.mx>>, 
"forum.help400"
        
<forum.help400@listas.combios.es<mailto:forum.help400@listas.combios.es>>
Message-ID:
        
<cy4pr12mb14966be3dfd7b1d7bd0562e1be...@cy4pr12mb1496.namprd12.prod.outlook.com<mailto:cy4pr12mb14966be3dfd7b1d7bd0562e1be...@cy4pr12mb1496.namprd12.prod.outlook.com>>

Content-Type: text/plain; charset="iso-8859-1"

Gracias por responder


Pero al crear el comando y lo ejecuto

no me pide el dato del parámetro (plantel)

me faltara algo ??



CRTCMD CMD(QGPL/CMDPREAB) PGM(QGPL/PRECABIER)




Parámetros o mandato
===> CMDPREAB



gracias




________________________________
De: Manuel Humberto Moreno 
<manuelhmor...@gmail.com<mailto:manuelhmor...@gmail.com>>
Enviado: miércoles, 26 de abril de 2017 09:44 p. m.
Para: Juan Gutierrez Ruiz
Cc: forum.help400; Raul Gallo
Asunto: Re: Cracion de un comado con 1 parametro

Apreciado Juan

Diria que te falta en el programa CL

   PGM    PARM(&PLA)


Intentalo y nos cuentas

Manuel Humberto moreno
celular:    + 57 (315) 341 8987<tel:%2B%2057%20%28315%29%20341%208987>
e-mail:      
manuelhmor...@gmail.com<mailto:manuelhmor...@gmail.com><mailto:manuelhmor...@gmail.com<mailto:manuelhmor...@gmail.com>>

2017-04-26 14:54 GMT-05:00 Juan Gutierrez Ruiz 
<juan_gutierrez_r...@hotmail.com<mailto:juan_gutierrez_r...@hotmail.com><mailto:juan_gutierrez_r...@hotmail.com<mailto:juan_gutierrez_r...@hotmail.com>>>:

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...






------------ próxima parte ------------
Se ha borrado un adjunto en formato HTML...
URL: 
<http://listas.combios.es/cgi-bin/mailman/private/forum.help400/attachments/20170427/66d492cb/attachment.htm>

------------------------------

__________________________________________________
Forum.HELP400 es un servicio m&amp;amp;#225;s de ServerNEWS.
&amp;amp;#169; 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

Fin de Resumen de Forum.help400, Vol 126, Envío 23
**************************************************



--
Saludos,


Rafael E. Silva | Especialista en Sistemas


[https://docs.google.com/uc?export=download&id=0B_NVQWqtdnfZUlUxWWQyLUxwYk0&revid=0B_NVQWqtdnfZTHMrVDQ5MDZYL3FuekVpSGZEQk9ySm9yTHFrPQ][https://docs.google.com/uc?export=download&id=0B_NVQWqtdnfZbjJjcHo5ajRHb0k&revid=0B_NVQWqtdnfZeUdPNnJwVkNJVkxaeDF1N3ZpemJ1Z1ZENUJBPQ](+58)
 424 153-03.38
[https://docs.google.com/uc?export=download&id=0B_NVQWqtdnfZdHZzT3hqaG1FS3M&revid=0B_NVQWqtdnfZMmdWZFlubkpjZksxeTFsdTZQSWcvcVY2Z1lVPQ]
 http://Facebook.com/rsilva.lara
____________________________________________________
Únete a Recursos AS400, nuestra Comunidad ( http://bit.ly/db68dd )
Forum.Help400 © Publicaciones Help400, S.L.

Responder a