/* PERS.sql by Kyle Judson CLPCCD                         */
/* A thru I used, on J 0809, batch_no 01=Jul, ..., 12=Jun */
/* ------------------------------------------------------ */
select distinct PDRPERS_BATCH_NO batch_no from PDRPERS
 where substr(PDRPERS_BATCH_NO,3,1) > 'I'
 order by substr(PDRPERS_BATCH_NO,3,1), substr(PDRPERS_BATCH_NO,1,2)
/
select 'make sure to use the correct batch no...' from dual;
update PDRPERS
   set PDRPERS_WORK_SCHEDULE = null
 where PDRPERS_BATCH_NO = '02J'
   and PDRPERS_CONT_CODE in ('14','15','16')
/
select 'update work schedule, OK to proceed?' from dual;
update PDRPERS
   set PDRPERS_PAY_CODE = 0
 where PDRPERS_BATCH_NO = '02J'
   and PDRPERS_CONT_CODE in ('14')
/
select 'update pay code, OK to exit?' from dual;
exit