Hi Tariq

>No body wrote any code in this thread. Every body try to present suggestions.
>I ask if thread poster knows the codes then what he needs to post any thread.

something like:

lnOpBal = 0
lnCloBal = 0

SCAN
   lnCloBal = lnOpBal + Table.Receipt - Table.Payment

   REPLACE Opening WITH lnOpBal, Balance WITH lnCloBal

   lnOpBal = lnCloBal
ENDSCAN

Untested you will have to adapt it. As you will notice though other posters have not given you code but were aiming for something similar and had assumed that you can do basic programming yourself. You were lucky that experienced people were responding to your thread.

But I will repeat myself this is not the right way, unless this is a cursor you are replacing in. Calculated field has pain attached to it down the line. I have been there and done that.

Hope it helps.