6: --------------------------------------------------------------------------------
7:
8: -- Procedure to update TO DO Items where p_run_type IN ('S','Y','P')
9: PROCEDURE update_to_do_items (p_base_id IN igf_ap_fa_base_rec_all.base_id%TYPE,
10: p_ci_cal_type IN igs_ca_inst.cal_type%TYPE,
11: p_ci_sequence_number IN igs_ca_inst.sequence_number%TYPE
12: )
13: IS
14: --------------------------------------------------------------------------------
7:
8: -- Procedure to update TO DO Items where p_run_type IN ('S','Y','P')
9: PROCEDURE update_to_do_items (p_base_id IN igf_ap_fa_base_rec_all.base_id%TYPE,
10: p_ci_cal_type IN igs_ca_inst.cal_type%TYPE,
11: p_ci_sequence_number IN igs_ca_inst.sequence_number%TYPE
12: )
13: IS
14: --------------------------------------------------------------------------------
15: -- Created by : ridas, Oracle India
185: -- If matching it returns the new calculated amount
186: FUNCTION is_attrib_matching(
187: p_base_id IN igf_ap_fa_base_rec_all.base_id%TYPE,
188: p_base_details IN igf_aw_coa_gen.base_details,
189: p_ci_cal_type IN igs_ca_inst.cal_type%TYPE,
190: p_ci_sequence_number IN igs_ca_inst.sequence_number%TYPE,
191: p_ld_cal_type IN igs_ca_inst.cal_type%TYPE,
192: p_ld_sequence_number IN igs_ca_inst.sequence_number%TYPE,
193: p_item_code IN igf_aw_item.item_code%TYPE,
186: FUNCTION is_attrib_matching(
187: p_base_id IN igf_ap_fa_base_rec_all.base_id%TYPE,
188: p_base_details IN igf_aw_coa_gen.base_details,
189: p_ci_cal_type IN igs_ca_inst.cal_type%TYPE,
190: p_ci_sequence_number IN igs_ca_inst.sequence_number%TYPE,
191: p_ld_cal_type IN igs_ca_inst.cal_type%TYPE,
192: p_ld_sequence_number IN igs_ca_inst.sequence_number%TYPE,
193: p_item_code IN igf_aw_item.item_code%TYPE,
194: p_amount OUT NOCOPY NUMBER,
187: p_base_id IN igf_ap_fa_base_rec_all.base_id%TYPE,
188: p_base_details IN igf_aw_coa_gen.base_details,
189: p_ci_cal_type IN igs_ca_inst.cal_type%TYPE,
190: p_ci_sequence_number IN igs_ca_inst.sequence_number%TYPE,
191: p_ld_cal_type IN igs_ca_inst.cal_type%TYPE,
192: p_ld_sequence_number IN igs_ca_inst.sequence_number%TYPE,
193: p_item_code IN igf_aw_item.item_code%TYPE,
194: p_amount OUT NOCOPY NUMBER,
195: p_rate_order_num OUT NOCOPY NUMBER
188: p_base_details IN igf_aw_coa_gen.base_details,
189: p_ci_cal_type IN igs_ca_inst.cal_type%TYPE,
190: p_ci_sequence_number IN igs_ca_inst.sequence_number%TYPE,
191: p_ld_cal_type IN igs_ca_inst.cal_type%TYPE,
192: p_ld_sequence_number IN igs_ca_inst.sequence_number%TYPE,
193: p_item_code IN igf_aw_item.item_code%TYPE,
194: p_amount OUT NOCOPY NUMBER,
195: p_rate_order_num OUT NOCOPY NUMBER
196: ) RETURN BOOLEAN IS
213: c_chk_per_exist CperexistCurTyp ;
214: lv_chk_per_exist NUMBER(1);
215:
216: CURSOR c_rate_order (
217: c_ci_cal_type igs_ca_inst.cal_type%TYPE,
218: c_ci_sequence_number igs_ca_inst.sequence_number%TYPE,
219: c_item_code igf_aw_item.item_code%TYPE
220: ) IS
221: SELECT rate.*
214: lv_chk_per_exist NUMBER(1);
215:
216: CURSOR c_rate_order (
217: c_ci_cal_type igs_ca_inst.cal_type%TYPE,
218: c_ci_sequence_number igs_ca_inst.sequence_number%TYPE,
219: c_item_code igf_aw_item.item_code%TYPE
220: ) IS
221: SELECT rate.*
222: FROM igf_aw_coa_rate_det rate
446:
447: -- This procedure is to evaluate the COA re-computation amount
448: PROCEDURE evaluate(
449: p_base_id IN igf_ap_fa_base_rec_all.base_id%TYPE,
450: p_ci_cal_type IN igs_ca_inst.cal_type%TYPE,
451: p_ci_sequence_number IN igs_ca_inst.sequence_number%TYPE
452: ) IS
453: --------------------------------------------------------------------------------
454: -- Created by : ridas, Oracle India
447: -- This procedure is to evaluate the COA re-computation amount
448: PROCEDURE evaluate(
449: p_base_id IN igf_ap_fa_base_rec_all.base_id%TYPE,
450: p_ci_cal_type IN igs_ca_inst.cal_type%TYPE,
451: p_ci_sequence_number IN igs_ca_inst.sequence_number%TYPE
452: ) IS
453: --------------------------------------------------------------------------------
454: -- Created by : ridas, Oracle India
455: -- Date created: 26-OCT-2004
516:
517: l_item c_item%ROWTYPE;
518:
519: CURSOR c_rate_ord_exists (
520: cp_ci_cal_type igs_ca_inst.cal_type%TYPE,
521: cp_ci_sequence_number igs_ca_inst.sequence_number%TYPE,
522: cp_item_code igf_aw_item.item_code%TYPE
523: ) IS
524: SELECT 'X' exist
517: l_item c_item%ROWTYPE;
518:
519: CURSOR c_rate_ord_exists (
520: cp_ci_cal_type igs_ca_inst.cal_type%TYPE,
521: cp_ci_sequence_number igs_ca_inst.sequence_number%TYPE,
522: cp_item_code igf_aw_item.item_code%TYPE
523: ) IS
524: SELECT 'X' exist
525: FROM igf_aw_coa_rate_det rate
849: );
850:
851: l_person_todo c_person_todo%ROWTYPE;
852:
853: lv_ci_cal_type igs_ca_inst_all.cal_type%TYPE;
854: ln_ci_sequence_number igs_ca_inst_all.sequence_number%TYPE;
855: ln_base_id igf_ap_fa_base_rec_all.base_id%TYPE;
856: lv_err_msg fnd_new_messages.message_name%TYPE;
857: lv_return_flag VARCHAR2(1);
850:
851: l_person_todo c_person_todo%ROWTYPE;
852:
853: lv_ci_cal_type igs_ca_inst_all.cal_type%TYPE;
854: ln_ci_sequence_number igs_ca_inst_all.sequence_number%TYPE;
855: ln_base_id igf_ap_fa_base_rec_all.base_id%TYPE;
856: lv_err_msg fnd_new_messages.message_name%TYPE;
857: lv_return_flag VARCHAR2(1);
858: