input ” Year ” to myear<\/p>\n\n\n\n
set cent on
set date brit<\/p>\n\n\n\n
use ahasx<\/p>\n\n\n\n
loca for myear = year
store ahargana to ah1
skip
store ahargana to ah2<\/p>\n\n\n\n
use long20<\/p>\n\n\n\n
loca for lsun > 270 .and. lsun < 271 .and. ahargana > ah1 .and. ahargana < ah2
store recno() to rn<\/p>\n\n\n\n
loca for recno() > rn .and. starno = 2<\/p>\n\n\n\n
display
wait”<\/p>\n\n\n\n
store date to dt<\/p>\n\n\n\n
if found()<\/p>\n\n\n\n
use holi
appe blank
repl holyday with “Makara Bharani”
repl date with dt<\/p>\n\n\n\n
endif<\/p>\n","protected":false},"excerpt":{"rendered":"
input ” Year ” to myear set cent onset date brit use ahasx loca for myear = yearstore ahargana to ah1skipstore ahargana to ah2 use long20 loca for lsun > 270 .and. lsun < 271 .and. ahargana > ah1 .and. ahargana < ah2store recno() to rn loca for recno() > rn .and. starno = 2 … <\/p>\n