<code> #!/bin/ksh printf “Enter Destination File: ” read dest files=“/*/u??/oradata/$ORACLE_SID/oralogs -name alert_$ORACLE_SID.log” for file in $(find $files) do

   DT=$(date)
   awk '
   BEGIN {Flg=0}
   NR==1 {
       R=split(DATE,TMP," ")
       Day=TMP[[1]]
       Month=TMP[[2]]
       NoDay=TMP[[3]]
   }
   {NoDayM=NoDay-1}
   NF==5 && $2==Month && ($3==(NoDayM) || $3==(NoDayM)) {Flg=1}
   Flg==1 {print $0}
   ' DATE="$DT" $file | awk '
   /^ORA-/ || /cannot/ {print DATE print $0}
   NF==5 {DATE=$0}
   ' >> $dest

done exit 0