Boa tarde galera, quero criar uma função que receberá o valor de duas variáveis como parametro, como fazer isso quando o imput da variavel é um extent? abaixo exemplo: Código: DEF VAR a AS CHAR INIT "123". DEF VAR b AS CHAR INIT "222". PROCEDURE teste : DEF INPUT PARAM t AS CHAR EXTENT 2. MESSAGE t[1] t[2] VIEW-AS ALERT-BOX. END. RUN teste(INPUT [A,B] ).
O parâmetro de entrada tem que ser o mesmo da entrada informada, ou seja, o parâmetro precisa ser do mesmo tipo e formato. Sendo assim, o que você pretende fazer não é possível sem uma "variável de compatibilidade", digamos assim. Se realmente há a necessidade de variáveis separadas: Código: DEF VAR a AS CHAR INIT "123". DEF VAR b AS CHAR INIT "222". DEF VAR e AS CHAR EXTENT 2. PROCEDURE teste : DEF INPUT PARAM t AS CHAR EXTENT 2. MESSAGE t[1] t[2] VIEW-AS ALERT-BOX. END. ASSIGN e[1] = a e[2] = b. RUN teste(INPUT e ).
Obrigado, essa era minha dúvida, queria saber se em casos assim poderia economizar a declaração de uma variável, mais não é possível.