//ListSrch JOB Echo=no
Database Search DD=Rules OUTLIM=3000 f=mail
//Rules DD *
S renewal= in lstown-l
index #.5 date.8 sender.17 subject.46
print
/*
//  EOJ