Verry slow code on Collection.GetNextDocument(doc)

Plaese have someone an Idea ?The following code is realy fast on a Domino 7.02 Server on a

Windows 2003 system. I get 100 Documents in one second.

On a Domino 7.02 Server runnig on AIX 5.3, the same code

is realy slow. I get only one document per second.

Here is the part of my code.

Set Collection = view.GetAllDocumentsByKey(Key)

Set doc = Collection.GetFirstDocument

N=0

Do Until doc Is Nothing		  

  N=N+1	

  Print "N:="+Str(N)  'VERRY SOLW !!! On AIX one per sec.

  Set doc = Collection.GetNextDocument(doc)

Loop

The hardware of the windows and the aix Server has nearly

the same performance. All ideas are welcome.

With best regards

Walter