View previous topic :: View next topic
|
Author |
Message |
enrico-sorichetti
Superior Member
Joined: 14 Mar 2007 Posts: 10873 Location: italy
|
|
|
|
do a bit of rereading, please
the 16MB limit is for a single variable, not for an array ( wrong term anyway ) as a whole
each entry of an array ( as You call it ) is a variable
( the right term would be a STEMMED variable )
each [stemmed] variable ( apart a few bytes of control info ) can be up to 16 MB
how many variables You can define and use depends on the virtual storage avilable |
|
Back to top |
|
|
ug123 Warnings : 1 New User
Joined: 01 Mar 2007 Posts: 39 Location: Chennai
|
|
|
|
Dick, I appologies for not responding. Please let me know other than rexx how can we do that...
This is what I am doing currently.
DSN='HLQ.XXXX'
"ALLOC DA('"DSN"') F(OUTDD) SHR"
"EXECIO 0 DISKR OUTDD(OPEN"
"EXECIO * DISKR OUTDD(STEM I."
COUNT = 0
DO LIN = 1 TO I.0
COUNT = COUNT + 1
END
ZEDLMSG = 'TOTAL RECORDS:' || COUNT
"ISPEXEC SETMSG MSG(ISRZ001)"
"EXECIO 0 DISKR OUTDD(FINIS"
"FREE F(OUTDD)"
Please give some code if anything is wrong in the above code.
Thanks,
Ugandar... |
|
Back to top |
|
|
enrico-sorichetti
Superior Member
Joined: 14 Mar 2007 Posts: 10873 Location: italy
|
|
|
|
edited to correct my first wrong impression
Quote: |
nothing wrong from a REXX syntactic point of view,
|
why in <heaven> the loop
Code: |
COUNT = 0
DO LIN = 1 TO I.0
COUNT = COUNT + 1
END |
at the end count will be equal to i.0
are You trying to be real sure that things match
the approach is wrong because an "EXECIO * READ .... (STEM ...."
will try to read in memory all the records and trying to manage in rexx more than a few thousandths records will give a poor performance from any point of view.
if there is a real business need to have an interactive count the most performing approach would be to invoke from rexx Your sort product
to count the records, writing a single output record with the result
and then in rexx read the single line displaying the result
see the jcl/dfsort forums on samples about counting records
but, I really see a little need to find out in an interactive way the record count |
|
Back to top |
|
|
|