Parametros por Referência

Se com handle funciona, da para fazer umas gambiarras do tipo, mais nao acho uma boa ideia, use input-output mesmo xD

Código:

DEF VAR i   AS INT NO-UNDO .
DEF FRAME f-main
    i
    .

RUN pi-referencia(i:HANDLE , i:HANDLE) .

MESSAGE i:INPUT-VALUE VIEW-AS ALERT-BOX .


PROCEDURE pi-referencia:
    DEF INPUT PARAMETER hVarOne    AS HANDLE NO-UNDO .
    DEF INPUT PARAMETER hVarTwo    AS HANDLE NO-UNDO .

    ASSIGN hVarOne:SCREEN-VALUE = hVarOne:INPUT-VALUE + "10" .
    ASSIGN hVarTwo:SCREEN-VALUE = hVarTwo:INPUT-VALUE + "20" .

END PROCEDURE.

Acredito que nem todas as variáveis que ela deseja ter o valor estarão em frames.

Mas a gambi foi doida

=) Obrigada pela tentativa.

Mas não funciona para o que eu preciso. O "i" da frame não é o i que você declarou .. e sim uma representação visual dela apenas... ( message i:input-value skip i view-as alert-box)..

Pelo que pesquisei não há o que eu preciso em progress... dei um "jeitinho brasileiro" mas não ficou tão elegante a solução como ficaria se fosse possível obter as referências.

Valeu pela disposição em ajudar =)