Boa tarde, estou com uma dúvida bastante simples a respeito de Arrays. É possível declarar um array no Progress? Se sim, como fazê-lo? Desde já agradeço a atenção.
Boa tarde @Yasser Rachid experimente: DEFINE VARIABLE contador AS INTEGER EXTENT 10 NO-UNDO. DISP contador WITH SIDE-LABELS. Se você quiser manipular somente um destes use: DEFINE VARIABLE contador AS INTEGER EXTENT 10 NO-UNDO. contador[3] = 25. DISP contador[3] WITH SIDE-LABELS. Para saber o número de extent use: DEFINE VARIABLE contador AS INTEGER EXTENT 10 NO-UNDO. DISP EXTENT(contador) contador[4] WITH SIDE-LABELS. Caso queira utilizar extent de tamanho dinâmico use: DEFINE VARIABLE contador AS INTEGER EXTENT NO-UNDO. EXTENT(contador) = 8. DISP EXTENT(contador) contador[8] WITH SIDE-LABELS. Espero ter ajudado. Abraço.
É sim Yasser Rachid segue exemplo. Código: DEF VAR A AS CHAR EXTENT 10. ASSIGN A[1] = "A" A[2] = "B" A[3] = "C" A[4] = "D" A[5] = "E" A[6] = "F" A[7] = "G" A[8] = "H" A[9] = "I" A[10] = "J". DISP A.
As dicas dos colegas acima estão corretas. Apenas friso que em PROGRESS o array sempre inicia em "1" e NUNCA em "0" como outras linguagens, ok? abs!
Em minha opinião referente ao extent é que se for maior que 15 acredito que vale mais apena usar temp-table.