Hi Farrukh,

Finally foll. script worked.

run {
allocate channel d1 type disk;
sql 'alter system archive log current';
backup
format 'e:\backup\%d_%s_%p_%t.1al'
archivelog all;
release channel d1;
resync catalog;
}
allocate channel for maintenance type disk;
change archivelog until time 'sysdate-1' delete;

Thanks everybody.