How to Write F41021.Select/Fetch Next More Efficiently

Hi - I want find out out the on receipt qty that is done in P41202 application. I am doing this in an application but for all items upon entering business unit and clicking ok.

Now, I have to do the following

F41021.Select (ITM/MCU)

F41021.FetchNext(Fetch Required Fields)

While SUCCESS

F41021.FetchNext(Fetch Required Fields)

F41021 Get Item Qty

END WHILE

This is taking lot of time to more number of records. Is there any other better way to do this?

Best Regards, Harish