set cent on
set date brit
use long20
go 1300
store ahargana to ahx
store recno() to rn
loca for lsun > 120 .and. ahx > 1871600 .and. lmoo > 280 .and. lmoo < 293.33 .and. recno() > 1300
store date to string
display
?”Date”, string
Program shows date as 29/08/2023