I have a focus file with 80K records. Existing functionality is - Online screen updates the data in file and REPEAT command is used to search existing record in the file. This functionality works for few scenarios and failed for few.
When i check the count (number of times) entered values is compared with key field in file , count is always 65K in both cases .

When i deleted some records from file and then run this functionality, it works as expected.

My query is - does this repeat command has any limitation on loop count

Interesting...I had that problem years ago -- I had to do a repeat loop and whenever it went to about 125 times, it would crash.

So, I ended up breaking up the loop and actually exiting Focus and re-entering after writing out the last instance and then starting from there.

Looks like that limitation may still exist.

Vivian

In Modify, I encountered a 64K limit on "REPEAT n [TIMES]". That's a while back, but Modify is "stabilized" so it's presumably still true.

Try converting it to REPEAT WHILE.

Sonali,

In the very far back past when -REPEAT did not exist, we used to simulate a loop with -IF and -GOTO.
I suggest you try this.

More importantly, what's in the -REPEAT loop?

thanks all for your response.

Below is code

Modify file
some processing

Reposition keyfield
Repeat * times
next key fields
on next ( tries to find the required record in file and if found , it hold the segment)
ON NEXT HOLD SEG.(key field)
end repeat
Later segment is deleted and new one is added with correct value.

I used to work with MODIFY, and miss it!

It sounds like you are NEXTing through a segment, with a very large number of occurrences.

You might want to clarify if you are saving multiple records (SPA), or if you are saving only one record.

Is it possible to establish a position in the segement with MATCH, and then start NEXTing at that point?

Does your code stop NEXTing, when it stops finding records it needs?

If it's feasible, it will be simpler to (first use TABLE to) HOLD the keys + other pertinent data for the records that need revision/deletion, and use
FIXFORM FROM HOLD
(rather than a Next loop )
to drive the operation.

quote:

HOLD the keys + other pertinent data for the records that need revision/deletion, and use FIXFORM FROM HOLD

Exactly where I was going with this line of questioning! :-)

This message has been edited. Last edited by: David Briars,

Thanks. I will try this option. I have never made any changes to focus online program so not sure if this option will work.

My code do not have define file or table file and i am beginner in online focus. I will keep you updated with progress or new issues

Thanks everyone for reply and valuable information.

Ahhh, The good ol' days...

quote:

I used to work with MODIFY, and miss it!