Passar Parametros

Discussão em 'Progress 4GL' iniciado por maicon, Novembro 23, 2012.

  1. maicon

    maicon Membro Participativo

    Bom dia

    Como funciona a passagem de parametros, ou seja, como faço para passar informaçoes de um programa para outro?
  2. felix

    felix Membro Participativo

    Boa Tarde.

    no programa que irá chamar você coloca input.

    exemplo:

    prog1.p(input codigo).

    no programa que irá receber você define a variable como input parameter.

    exemplo:
    define input parameter codigo as integer.

    espero ter ajudado
  3. muertebr

    muertebr Membro Participativo

    Se deseja retornar algum valor, troca input por output.
  4. lunho

    lunho Membro Participativo

    exemplos de duas procedures.

    procedure 1
    DEF VAR numero AS INT.
    UPDATE numero.
    RUN recebparam.p(numero).


    **********************************************

    procedure recebparam.p

    DEFINE INPUT PARAMETER meuparametro AS INTEGER.

    IF meuparametro > 10 THEN
    MESSAGE "Numero digitado maior que 10" VIEW-AS ALERT-BOX.
    ELSE
    MESSAGE "Numero digitado menor que 10" VIEW-AS ALERT-BOX.

Compartilhe esta Página