2764: l_cursor_id NUMBER;
2765: i NUMBER;
2766: BEGIN
2767:
2768: FND_DSQL.init;
2769:
2770: FND_DSQL.add_text('SELECT claim_id, claim_number, object_version_number, claim_class, amount_remaining, amount_settled, source_object_id, payment_method ');
2771: FND_DSQL.add_text('FROM ozf_claims ');
2772: FND_DSQL.add_text('WHERE status_code = ''PENDING_CLOSE'' ');
2766: BEGIN
2767:
2768: FND_DSQL.init;
2769:
2770: FND_DSQL.add_text('SELECT claim_id, claim_number, object_version_number, claim_class, amount_remaining, amount_settled, source_object_id, payment_method ');
2771: FND_DSQL.add_text('FROM ozf_claims ');
2772: FND_DSQL.add_text('WHERE status_code = ''PENDING_CLOSE'' ');
2773:
2774: i := p_payment_method_tbl.FIRST;
2767:
2768: FND_DSQL.init;
2769:
2770: FND_DSQL.add_text('SELECT claim_id, claim_number, object_version_number, claim_class, amount_remaining, amount_settled, source_object_id, payment_method ');
2771: FND_DSQL.add_text('FROM ozf_claims ');
2772: FND_DSQL.add_text('WHERE status_code = ''PENDING_CLOSE'' ');
2773:
2774: i := p_payment_method_tbl.FIRST;
2775: IF i IS NOT NULL THEN
2768: FND_DSQL.init;
2769:
2770: FND_DSQL.add_text('SELECT claim_id, claim_number, object_version_number, claim_class, amount_remaining, amount_settled, source_object_id, payment_method ');
2771: FND_DSQL.add_text('FROM ozf_claims ');
2772: FND_DSQL.add_text('WHERE status_code = ''PENDING_CLOSE'' ');
2773:
2774: i := p_payment_method_tbl.FIRST;
2775: IF i IS NOT NULL THEN
2776: FND_DSQL.add_text(' AND ( ');
2772: FND_DSQL.add_text('WHERE status_code = ''PENDING_CLOSE'' ');
2773:
2774: i := p_payment_method_tbl.FIRST;
2775: IF i IS NOT NULL THEN
2776: FND_DSQL.add_text(' AND ( ');
2777: LOOP
2778: FND_DSQL.add_text(' payment_method = ');
2779: FND_DSQL.add_bind(p_payment_method_tbl(i));
2780: EXIT WHEN i = p_payment_method_tbl.LAST;
2774: i := p_payment_method_tbl.FIRST;
2775: IF i IS NOT NULL THEN
2776: FND_DSQL.add_text(' AND ( ');
2777: LOOP
2778: FND_DSQL.add_text(' payment_method = ');
2779: FND_DSQL.add_bind(p_payment_method_tbl(i));
2780: EXIT WHEN i = p_payment_method_tbl.LAST;
2781: i:=p_payment_method_tbl.NEXT(i);
2782: FND_DSQL.add_text(' OR ');
2775: IF i IS NOT NULL THEN
2776: FND_DSQL.add_text(' AND ( ');
2777: LOOP
2778: FND_DSQL.add_text(' payment_method = ');
2779: FND_DSQL.add_bind(p_payment_method_tbl(i));
2780: EXIT WHEN i = p_payment_method_tbl.LAST;
2781: i:=p_payment_method_tbl.NEXT(i);
2782: FND_DSQL.add_text(' OR ');
2783: END LOOP;
2778: FND_DSQL.add_text(' payment_method = ');
2779: FND_DSQL.add_bind(p_payment_method_tbl(i));
2780: EXIT WHEN i = p_payment_method_tbl.LAST;
2781: i:=p_payment_method_tbl.NEXT(i);
2782: FND_DSQL.add_text(' OR ');
2783: END LOOP;
2784: FND_DSQL.add_text(' ) ');
2785: END IF;
2786:
2780: EXIT WHEN i = p_payment_method_tbl.LAST;
2781: i:=p_payment_method_tbl.NEXT(i);
2782: FND_DSQL.add_text(' OR ');
2783: END LOOP;
2784: FND_DSQL.add_text(' ) ');
2785: END IF;
2786:
2787: IF p_payment_status IS NOT NULL THEN
2788: FND_DSQL.add_text(' AND payment_status = ');
2784: FND_DSQL.add_text(' ) ');
2785: END IF;
2786:
2787: IF p_payment_status IS NOT NULL THEN
2788: FND_DSQL.add_text(' AND payment_status = ');
2789: FND_DSQL.add_bind(p_payment_status);
2790: END IF;
2791:
2792:
2785: END IF;
2786:
2787: IF p_payment_status IS NOT NULL THEN
2788: FND_DSQL.add_text(' AND payment_status = ');
2789: FND_DSQL.add_bind(p_payment_status);
2790: END IF;
2791:
2792:
2793: IF p_claim_class IS NOT NULL THEN
2790: END IF;
2791:
2792:
2793: IF p_claim_class IS NOT NULL THEN
2794: FND_DSQL.add_text(' AND claim_class = ');
2795: FND_DSQL.add_bind(p_claim_class);
2796: END IF;
2797:
2798: IF p_cust_account_id IS NOT NULL THEN
2791:
2792:
2793: IF p_claim_class IS NOT NULL THEN
2794: FND_DSQL.add_text(' AND claim_class = ');
2795: FND_DSQL.add_bind(p_claim_class);
2796: END IF;
2797:
2798: IF p_cust_account_id IS NOT NULL THEN
2799: FND_DSQL.add_text(' AND cust_account_id = ');
2795: FND_DSQL.add_bind(p_claim_class);
2796: END IF;
2797:
2798: IF p_cust_account_id IS NOT NULL THEN
2799: FND_DSQL.add_text(' AND cust_account_id = ');
2800: FND_DSQL.add_bind(p_cust_account_id);
2801: END IF;
2802:
2803: IF p_claim_type_id IS NOT NULL THEN
2796: END IF;
2797:
2798: IF p_cust_account_id IS NOT NULL THEN
2799: FND_DSQL.add_text(' AND cust_account_id = ');
2800: FND_DSQL.add_bind(p_cust_account_id);
2801: END IF;
2802:
2803: IF p_claim_type_id IS NOT NULL THEN
2804: FND_DSQL.add_text(' AND claim_type_id = ');
2800: FND_DSQL.add_bind(p_cust_account_id);
2801: END IF;
2802:
2803: IF p_claim_type_id IS NOT NULL THEN
2804: FND_DSQL.add_text(' AND claim_type_id = ');
2805: FND_DSQL.add_bind(p_claim_type_id);
2806: END IF;
2807:
2808: IF p_reason_code_id IS NOT NULL THEN
2801: END IF;
2802:
2803: IF p_claim_type_id IS NOT NULL THEN
2804: FND_DSQL.add_text(' AND claim_type_id = ');
2805: FND_DSQL.add_bind(p_claim_type_id);
2806: END IF;
2807:
2808: IF p_reason_code_id IS NOT NULL THEN
2809: FND_DSQL.add_text(' AND reason_code_id = ');
2805: FND_DSQL.add_bind(p_claim_type_id);
2806: END IF;
2807:
2808: IF p_reason_code_id IS NOT NULL THEN
2809: FND_DSQL.add_text(' AND reason_code_id = ');
2810: FND_DSQL.add_bind(p_reason_code_id);
2811: END IF;
2812:
2813: END Get_claim_csr;
2806: END IF;
2807:
2808: IF p_reason_code_id IS NOT NULL THEN
2809: FND_DSQL.add_text(' AND reason_code_id = ');
2810: FND_DSQL.add_bind(p_reason_code_id);
2811: END IF;
2812:
2813: END Get_claim_csr;
2814:
2952: ,p_payment_status => 'PENDING'
2953: );
2954:
2955: l_claim_csr_id := DBMS_SQL.open_cursor;
2956: FND_DSQL.set_cursor(l_claim_csr_id);
2957: l_claim_csr_stmt := FND_DSQL.get_text(FALSE);
2958:
2959: l_stmt_debug := fnd_dsql.get_text(TRUE);
2960:
2953: );
2954:
2955: l_claim_csr_id := DBMS_SQL.open_cursor;
2956: FND_DSQL.set_cursor(l_claim_csr_id);
2957: l_claim_csr_stmt := FND_DSQL.get_text(FALSE);
2958:
2959: l_stmt_debug := fnd_dsql.get_text(TRUE);
2960:
2961: FND_FILE.PUT_LINE(FND_FILE.LOG, 'QUERY CLAIM SQL :: ' || l_stmt_debug);
2955: l_claim_csr_id := DBMS_SQL.open_cursor;
2956: FND_DSQL.set_cursor(l_claim_csr_id);
2957: l_claim_csr_stmt := FND_DSQL.get_text(FALSE);
2958:
2959: l_stmt_debug := fnd_dsql.get_text(TRUE);
2960:
2961: FND_FILE.PUT_LINE(FND_FILE.LOG, 'QUERY CLAIM SQL :: ' || l_stmt_debug);
2962:
2963: DBMS_SQL.parse(l_claim_csr_id, l_claim_csr_stmt, DBMS_SQL.native);
2968: DBMS_SQL.define_column(l_claim_csr_id, 5, l_claim_rec.amount_remaining);
2969: DBMS_SQL.define_column(l_claim_csr_id, 6, l_claim_rec.amount_settled);
2970: DBMS_SQL.define_column(l_claim_csr_id, 7, l_claim_rec.source_object_id);
2971: DBMS_SQL.define_column_char(l_claim_csr_id, 8, l_claim_rec.payment_method, 15);
2972: FND_DSQL.do_binds;
2973: l_claim_num_rows := DBMS_SQL.execute(l_claim_csr_id);
2974:
2975: l_counter := 1;
2976: LOOP
3161: ,p_payment_status => 'INTERFACED'
3162: );
3163:
3164: l_claim_csr_id := DBMS_SQL.open_cursor;
3165: FND_DSQL.set_cursor(l_claim_csr_id);
3166: l_claim_csr_stmt := FND_DSQL.get_text(FALSE);
3167:
3168: l_stmt_debug := fnd_dsql.get_text(TRUE);
3169:
3162: );
3163:
3164: l_claim_csr_id := DBMS_SQL.open_cursor;
3165: FND_DSQL.set_cursor(l_claim_csr_id);
3166: l_claim_csr_stmt := FND_DSQL.get_text(FALSE);
3167:
3168: l_stmt_debug := fnd_dsql.get_text(TRUE);
3169:
3170: FND_FILE.PUT_LINE(FND_FILE.LOG, 'QUERY CLAIM SQL :: ' || l_stmt_debug);
3164: l_claim_csr_id := DBMS_SQL.open_cursor;
3165: FND_DSQL.set_cursor(l_claim_csr_id);
3166: l_claim_csr_stmt := FND_DSQL.get_text(FALSE);
3167:
3168: l_stmt_debug := fnd_dsql.get_text(TRUE);
3169:
3170: FND_FILE.PUT_LINE(FND_FILE.LOG, 'QUERY CLAIM SQL :: ' || l_stmt_debug);
3171:
3172: DBMS_SQL.parse(l_claim_csr_id, l_claim_csr_stmt, DBMS_SQL.native);
3177: DBMS_SQL.define_column(l_claim_csr_id, 5, l_claim_rec.amount_remaining);
3178: DBMS_SQL.define_column(l_claim_csr_id, 6, l_claim_rec.amount_settled);
3179: DBMS_SQL.define_column(l_claim_csr_id, 7, l_claim_rec.source_object_id);
3180: DBMS_SQL.define_column_char(l_claim_csr_id, 8, l_claim_rec.payment_method, 15);
3181: FND_DSQL.do_binds;
3182: l_claim_num_rows := DBMS_SQL.execute(l_claim_csr_id);
3183:
3184: l_counter := 1;
3185: LOOP
3473: ,p_payment_status => 'INTERFACED'
3474: );
3475:
3476: l_claim_csr_id := DBMS_SQL.open_cursor;
3477: FND_DSQL.set_cursor(l_claim_csr_id);
3478: l_claim_csr_stmt := FND_DSQL.get_text(FALSE);
3479:
3480: l_stmt_debug := fnd_dsql.get_text(TRUE);
3481:
3474: );
3475:
3476: l_claim_csr_id := DBMS_SQL.open_cursor;
3477: FND_DSQL.set_cursor(l_claim_csr_id);
3478: l_claim_csr_stmt := FND_DSQL.get_text(FALSE);
3479:
3480: l_stmt_debug := fnd_dsql.get_text(TRUE);
3481:
3482: FND_FILE.PUT_LINE(FND_FILE.LOG, 'QUERY CLAIM SQL :: ' || l_stmt_debug);
3476: l_claim_csr_id := DBMS_SQL.open_cursor;
3477: FND_DSQL.set_cursor(l_claim_csr_id);
3478: l_claim_csr_stmt := FND_DSQL.get_text(FALSE);
3479:
3480: l_stmt_debug := fnd_dsql.get_text(TRUE);
3481:
3482: FND_FILE.PUT_LINE(FND_FILE.LOG, 'QUERY CLAIM SQL :: ' || l_stmt_debug);
3483:
3484: DBMS_SQL.parse(l_claim_csr_id, l_claim_csr_stmt, DBMS_SQL.native);
3490: DBMS_SQL.define_column(l_claim_csr_id, 6, l_claim_rec.amount_settled);
3491: DBMS_SQL.define_column(l_claim_csr_id, 7, l_claim_rec.source_object_id);
3492: DBMS_SQL.define_column_char(l_claim_csr_id, 8, l_claim_rec.payment_method, 15);
3493:
3494: FND_DSQL.do_binds;
3495: l_claim_num_rows := DBMS_SQL.execute(l_claim_csr_id);
3496:
3497: l_counter := 1;
3498: LOOP
4137: ,p_payment_status => 'INTERFACED'
4138: );
4139:
4140: l_claim_csr_id := DBMS_SQL.open_cursor;
4141: FND_DSQL.set_cursor(l_claim_csr_id);
4142: l_claim_csr_stmt := FND_DSQL.get_text(FALSE);
4143:
4144: l_stmt_debug := fnd_dsql.get_text(TRUE);
4145:
4138: );
4139:
4140: l_claim_csr_id := DBMS_SQL.open_cursor;
4141: FND_DSQL.set_cursor(l_claim_csr_id);
4142: l_claim_csr_stmt := FND_DSQL.get_text(FALSE);
4143:
4144: l_stmt_debug := fnd_dsql.get_text(TRUE);
4145:
4146: FND_FILE.PUT_LINE(FND_FILE.LOG, 'QUERY CLAIM SQL :: ' || l_stmt_debug);
4140: l_claim_csr_id := DBMS_SQL.open_cursor;
4141: FND_DSQL.set_cursor(l_claim_csr_id);
4142: l_claim_csr_stmt := FND_DSQL.get_text(FALSE);
4143:
4144: l_stmt_debug := fnd_dsql.get_text(TRUE);
4145:
4146: FND_FILE.PUT_LINE(FND_FILE.LOG, 'QUERY CLAIM SQL :: ' || l_stmt_debug);
4147:
4148: DBMS_SQL.parse(l_claim_csr_id, l_claim_csr_stmt, DBMS_SQL.native);
4153: DBMS_SQL.define_column(l_claim_csr_id, 5, l_claim_rec.amount_remaining);
4154: DBMS_SQL.define_column(l_claim_csr_id, 6, l_claim_rec.amount_settled);
4155: DBMS_SQL.define_column(l_claim_csr_id, 7, l_claim_rec.source_object_id);
4156: DBMS_SQL.define_column_char(l_claim_csr_id, 8, l_claim_rec.payment_method, 15);
4157: FND_DSQL.do_binds;
4158: l_claim_num_rows := DBMS_SQL.execute(l_claim_csr_id);
4159:
4160: l_counter := 1;
4161: LOOP