The Adabas & Natural by Software AG Ideas Portal is hosted by Aha! Labs Inc.. Therefore, personally identifiable information are processed by Aha! Labs Inc., a company based in the United States of America. By using this Ideas Portal you agree to the
Terms of Service of Aha! Labs Inc.. For further information about Aha’s handling of your personally identifiable information, please go to:
https://www.aha.io/legal/security/gdpr.
Hello Detlef,
I wish to understand exactly your request.
Currently to achieve extending an array, you would need:
DEFINE DATA LOCAL
01 #VAR (I4) INIT <1>
END-DEFINE
Current
#VAR := *OCC(#A) + 1
EXPAND ARRAY #A TO (1:#VAR)
and you wish to have only this statement:
EXPAND ARRAY #A BY (1:#VAR)
Does our assumption correct?