[Home] [Help]
485: -- This procedure is the callable from concurrent manager
486: PROCEDURE main ( errbuf OUT NOCOPY VARCHAR2,
487: retcode OUT NOCOPY NUMBER,
488: p_award_year IN VARCHAR2,
489: p_batch_id IN igf_ap_li_bat_ints.batch_num%TYPE,
490: p_del_ind IN VARCHAR2 )
491: IS
492:
493: ------------------------------------------------------------------
546: l_ant_data c_ant_data%ROWTYPE;
547:
548:
549: --Cursor to validate batch no
550: CURSOR c_chk_batch(cp_batch_num igf_ap_li_bat_ints.batch_num%TYPE,
551: cp_batch_type igf_ap_li_bat_ints.batch_type%TYPE)
552: IS
553: SELECT batch_num
554: FROM igf_ap_li_bat_ints
547:
548:
549: --Cursor to validate batch no
550: CURSOR c_chk_batch(cp_batch_num igf_ap_li_bat_ints.batch_num%TYPE,
551: cp_batch_type igf_ap_li_bat_ints.batch_type%TYPE)
552: IS
553: SELECT batch_num
554: FROM igf_ap_li_bat_ints
555: WHERE batch_num = cp_batch_num
550: CURSOR c_chk_batch(cp_batch_num igf_ap_li_bat_ints.batch_num%TYPE,
551: cp_batch_type igf_ap_li_bat_ints.batch_type%TYPE)
552: IS
553: SELECT batch_num
554: FROM igf_ap_li_bat_ints
555: WHERE batch_num = cp_batch_num
556: AND batch_type= cp_batch_type
557: AND rownum = 1;
558: