3423: ,p_reason_code_id => p_reason_code_id
3424: ,p_payment_status => 'PENDING'
3425: );
3426:
3427: l_claim_csr_id := DBMS_SQL.open_cursor;
3428: FND_DSQL.set_cursor(l_claim_csr_id);
3429: l_claim_csr_stmt := FND_DSQL.get_text(FALSE);
3430:
3431: l_stmt_debug := fnd_dsql.get_text(TRUE);
3431: l_stmt_debug := fnd_dsql.get_text(TRUE);
3432:
3433: FND_FILE.PUT_LINE(FND_FILE.LOG, 'QUERY CLAIM SQL :: ' || l_stmt_debug);
3434:
3435: DBMS_SQL.parse(l_claim_csr_id, l_claim_csr_stmt, DBMS_SQL.native);
3436: DBMS_SQL.define_column(l_claim_csr_id, 1, l_claim_rec.claim_id);
3437: DBMS_SQL.define_column_char(l_claim_csr_id, 2, l_claim_rec.claim_number, 30);
3438: DBMS_SQL.define_column(l_claim_csr_id, 3, l_claim_rec.object_version_number);
3439: DBMS_SQL.define_column_char(l_claim_csr_id, 4, l_claim_rec.claim_class, 30);
3432:
3433: FND_FILE.PUT_LINE(FND_FILE.LOG, 'QUERY CLAIM SQL :: ' || l_stmt_debug);
3434:
3435: DBMS_SQL.parse(l_claim_csr_id, l_claim_csr_stmt, DBMS_SQL.native);
3436: DBMS_SQL.define_column(l_claim_csr_id, 1, l_claim_rec.claim_id);
3437: DBMS_SQL.define_column_char(l_claim_csr_id, 2, l_claim_rec.claim_number, 30);
3438: DBMS_SQL.define_column(l_claim_csr_id, 3, l_claim_rec.object_version_number);
3439: DBMS_SQL.define_column_char(l_claim_csr_id, 4, l_claim_rec.claim_class, 30);
3440: DBMS_SQL.define_column(l_claim_csr_id, 5, l_claim_rec.amount_remaining);
3433: FND_FILE.PUT_LINE(FND_FILE.LOG, 'QUERY CLAIM SQL :: ' || l_stmt_debug);
3434:
3435: DBMS_SQL.parse(l_claim_csr_id, l_claim_csr_stmt, DBMS_SQL.native);
3436: DBMS_SQL.define_column(l_claim_csr_id, 1, l_claim_rec.claim_id);
3437: DBMS_SQL.define_column_char(l_claim_csr_id, 2, l_claim_rec.claim_number, 30);
3438: DBMS_SQL.define_column(l_claim_csr_id, 3, l_claim_rec.object_version_number);
3439: DBMS_SQL.define_column_char(l_claim_csr_id, 4, l_claim_rec.claim_class, 30);
3440: DBMS_SQL.define_column(l_claim_csr_id, 5, l_claim_rec.amount_remaining);
3441: DBMS_SQL.define_column(l_claim_csr_id, 6, l_claim_rec.amount_settled);
3434:
3435: DBMS_SQL.parse(l_claim_csr_id, l_claim_csr_stmt, DBMS_SQL.native);
3436: DBMS_SQL.define_column(l_claim_csr_id, 1, l_claim_rec.claim_id);
3437: DBMS_SQL.define_column_char(l_claim_csr_id, 2, l_claim_rec.claim_number, 30);
3438: DBMS_SQL.define_column(l_claim_csr_id, 3, l_claim_rec.object_version_number);
3439: DBMS_SQL.define_column_char(l_claim_csr_id, 4, l_claim_rec.claim_class, 30);
3440: DBMS_SQL.define_column(l_claim_csr_id, 5, l_claim_rec.amount_remaining);
3441: DBMS_SQL.define_column(l_claim_csr_id, 6, l_claim_rec.amount_settled);
3442: DBMS_SQL.define_column(l_claim_csr_id, 7, l_claim_rec.source_object_id);
3435: DBMS_SQL.parse(l_claim_csr_id, l_claim_csr_stmt, DBMS_SQL.native);
3436: DBMS_SQL.define_column(l_claim_csr_id, 1, l_claim_rec.claim_id);
3437: DBMS_SQL.define_column_char(l_claim_csr_id, 2, l_claim_rec.claim_number, 30);
3438: DBMS_SQL.define_column(l_claim_csr_id, 3, l_claim_rec.object_version_number);
3439: DBMS_SQL.define_column_char(l_claim_csr_id, 4, l_claim_rec.claim_class, 30);
3440: DBMS_SQL.define_column(l_claim_csr_id, 5, l_claim_rec.amount_remaining);
3441: DBMS_SQL.define_column(l_claim_csr_id, 6, l_claim_rec.amount_settled);
3442: DBMS_SQL.define_column(l_claim_csr_id, 7, l_claim_rec.source_object_id);
3443: DBMS_SQL.define_column_char(l_claim_csr_id, 8, l_claim_rec.payment_method, 15);
3436: DBMS_SQL.define_column(l_claim_csr_id, 1, l_claim_rec.claim_id);
3437: DBMS_SQL.define_column_char(l_claim_csr_id, 2, l_claim_rec.claim_number, 30);
3438: DBMS_SQL.define_column(l_claim_csr_id, 3, l_claim_rec.object_version_number);
3439: DBMS_SQL.define_column_char(l_claim_csr_id, 4, l_claim_rec.claim_class, 30);
3440: DBMS_SQL.define_column(l_claim_csr_id, 5, l_claim_rec.amount_remaining);
3441: DBMS_SQL.define_column(l_claim_csr_id, 6, l_claim_rec.amount_settled);
3442: DBMS_SQL.define_column(l_claim_csr_id, 7, l_claim_rec.source_object_id);
3443: DBMS_SQL.define_column_char(l_claim_csr_id, 8, l_claim_rec.payment_method, 15);
3444: FND_DSQL.do_binds;
3437: DBMS_SQL.define_column_char(l_claim_csr_id, 2, l_claim_rec.claim_number, 30);
3438: DBMS_SQL.define_column(l_claim_csr_id, 3, l_claim_rec.object_version_number);
3439: DBMS_SQL.define_column_char(l_claim_csr_id, 4, l_claim_rec.claim_class, 30);
3440: DBMS_SQL.define_column(l_claim_csr_id, 5, l_claim_rec.amount_remaining);
3441: DBMS_SQL.define_column(l_claim_csr_id, 6, l_claim_rec.amount_settled);
3442: DBMS_SQL.define_column(l_claim_csr_id, 7, l_claim_rec.source_object_id);
3443: DBMS_SQL.define_column_char(l_claim_csr_id, 8, l_claim_rec.payment_method, 15);
3444: FND_DSQL.do_binds;
3445: l_claim_num_rows := DBMS_SQL.execute(l_claim_csr_id);
3438: DBMS_SQL.define_column(l_claim_csr_id, 3, l_claim_rec.object_version_number);
3439: DBMS_SQL.define_column_char(l_claim_csr_id, 4, l_claim_rec.claim_class, 30);
3440: DBMS_SQL.define_column(l_claim_csr_id, 5, l_claim_rec.amount_remaining);
3441: DBMS_SQL.define_column(l_claim_csr_id, 6, l_claim_rec.amount_settled);
3442: DBMS_SQL.define_column(l_claim_csr_id, 7, l_claim_rec.source_object_id);
3443: DBMS_SQL.define_column_char(l_claim_csr_id, 8, l_claim_rec.payment_method, 15);
3444: FND_DSQL.do_binds;
3445: l_claim_num_rows := DBMS_SQL.execute(l_claim_csr_id);
3446:
3439: DBMS_SQL.define_column_char(l_claim_csr_id, 4, l_claim_rec.claim_class, 30);
3440: DBMS_SQL.define_column(l_claim_csr_id, 5, l_claim_rec.amount_remaining);
3441: DBMS_SQL.define_column(l_claim_csr_id, 6, l_claim_rec.amount_settled);
3442: DBMS_SQL.define_column(l_claim_csr_id, 7, l_claim_rec.source_object_id);
3443: DBMS_SQL.define_column_char(l_claim_csr_id, 8, l_claim_rec.payment_method, 15);
3444: FND_DSQL.do_binds;
3445: l_claim_num_rows := DBMS_SQL.execute(l_claim_csr_id);
3446:
3447: l_counter := 1;
3441: DBMS_SQL.define_column(l_claim_csr_id, 6, l_claim_rec.amount_settled);
3442: DBMS_SQL.define_column(l_claim_csr_id, 7, l_claim_rec.source_object_id);
3443: DBMS_SQL.define_column_char(l_claim_csr_id, 8, l_claim_rec.payment_method, 15);
3444: FND_DSQL.do_binds;
3445: l_claim_num_rows := DBMS_SQL.execute(l_claim_csr_id);
3446:
3447: l_counter := 1;
3448: LOOP
3449: IF DBMS_SQL.fetch_rows(l_claim_csr_id) > 0 THEN
3445: l_claim_num_rows := DBMS_SQL.execute(l_claim_csr_id);
3446:
3447: l_counter := 1;
3448: LOOP
3449: IF DBMS_SQL.fetch_rows(l_claim_csr_id) > 0 THEN
3450:
3451: DBMS_SQL.column_value(l_claim_csr_id, 1, l_claim_rec.claim_id);
3452: DBMS_SQL.column_value_char(l_claim_csr_id, 2, l_claim_rec.claim_number);
3453: DBMS_SQL.column_value(l_claim_csr_id, 3, l_claim_rec.object_version_number);
3447: l_counter := 1;
3448: LOOP
3449: IF DBMS_SQL.fetch_rows(l_claim_csr_id) > 0 THEN
3450:
3451: DBMS_SQL.column_value(l_claim_csr_id, 1, l_claim_rec.claim_id);
3452: DBMS_SQL.column_value_char(l_claim_csr_id, 2, l_claim_rec.claim_number);
3453: DBMS_SQL.column_value(l_claim_csr_id, 3, l_claim_rec.object_version_number);
3454: DBMS_SQL.column_value_char(l_claim_csr_id, 4, l_claim_rec.claim_class);
3455: DBMS_SQL.column_value(l_claim_csr_id, 5, l_claim_rec.amount_remaining);
3448: LOOP
3449: IF DBMS_SQL.fetch_rows(l_claim_csr_id) > 0 THEN
3450:
3451: DBMS_SQL.column_value(l_claim_csr_id, 1, l_claim_rec.claim_id);
3452: DBMS_SQL.column_value_char(l_claim_csr_id, 2, l_claim_rec.claim_number);
3453: DBMS_SQL.column_value(l_claim_csr_id, 3, l_claim_rec.object_version_number);
3454: DBMS_SQL.column_value_char(l_claim_csr_id, 4, l_claim_rec.claim_class);
3455: DBMS_SQL.column_value(l_claim_csr_id, 5, l_claim_rec.amount_remaining);
3456: DBMS_SQL.column_value(l_claim_csr_id, 6, l_claim_rec.amount_settled);
3449: IF DBMS_SQL.fetch_rows(l_claim_csr_id) > 0 THEN
3450:
3451: DBMS_SQL.column_value(l_claim_csr_id, 1, l_claim_rec.claim_id);
3452: DBMS_SQL.column_value_char(l_claim_csr_id, 2, l_claim_rec.claim_number);
3453: DBMS_SQL.column_value(l_claim_csr_id, 3, l_claim_rec.object_version_number);
3454: DBMS_SQL.column_value_char(l_claim_csr_id, 4, l_claim_rec.claim_class);
3455: DBMS_SQL.column_value(l_claim_csr_id, 5, l_claim_rec.amount_remaining);
3456: DBMS_SQL.column_value(l_claim_csr_id, 6, l_claim_rec.amount_settled);
3457: DBMS_SQL.column_value(l_claim_csr_id, 7, l_claim_rec.source_object_id);
3450:
3451: DBMS_SQL.column_value(l_claim_csr_id, 1, l_claim_rec.claim_id);
3452: DBMS_SQL.column_value_char(l_claim_csr_id, 2, l_claim_rec.claim_number);
3453: DBMS_SQL.column_value(l_claim_csr_id, 3, l_claim_rec.object_version_number);
3454: DBMS_SQL.column_value_char(l_claim_csr_id, 4, l_claim_rec.claim_class);
3455: DBMS_SQL.column_value(l_claim_csr_id, 5, l_claim_rec.amount_remaining);
3456: DBMS_SQL.column_value(l_claim_csr_id, 6, l_claim_rec.amount_settled);
3457: DBMS_SQL.column_value(l_claim_csr_id, 7, l_claim_rec.source_object_id);
3458: DBMS_SQL.column_value_char(l_claim_csr_id, 8, l_claim_rec.payment_method);
3451: DBMS_SQL.column_value(l_claim_csr_id, 1, l_claim_rec.claim_id);
3452: DBMS_SQL.column_value_char(l_claim_csr_id, 2, l_claim_rec.claim_number);
3453: DBMS_SQL.column_value(l_claim_csr_id, 3, l_claim_rec.object_version_number);
3454: DBMS_SQL.column_value_char(l_claim_csr_id, 4, l_claim_rec.claim_class);
3455: DBMS_SQL.column_value(l_claim_csr_id, 5, l_claim_rec.amount_remaining);
3456: DBMS_SQL.column_value(l_claim_csr_id, 6, l_claim_rec.amount_settled);
3457: DBMS_SQL.column_value(l_claim_csr_id, 7, l_claim_rec.source_object_id);
3458: DBMS_SQL.column_value_char(l_claim_csr_id, 8, l_claim_rec.payment_method);
3459:
3452: DBMS_SQL.column_value_char(l_claim_csr_id, 2, l_claim_rec.claim_number);
3453: DBMS_SQL.column_value(l_claim_csr_id, 3, l_claim_rec.object_version_number);
3454: DBMS_SQL.column_value_char(l_claim_csr_id, 4, l_claim_rec.claim_class);
3455: DBMS_SQL.column_value(l_claim_csr_id, 5, l_claim_rec.amount_remaining);
3456: DBMS_SQL.column_value(l_claim_csr_id, 6, l_claim_rec.amount_settled);
3457: DBMS_SQL.column_value(l_claim_csr_id, 7, l_claim_rec.source_object_id);
3458: DBMS_SQL.column_value_char(l_claim_csr_id, 8, l_claim_rec.payment_method);
3459:
3460: l_claim_rma_fetch(l_counter).claim_id := l_claim_rec.claim_id;
3453: DBMS_SQL.column_value(l_claim_csr_id, 3, l_claim_rec.object_version_number);
3454: DBMS_SQL.column_value_char(l_claim_csr_id, 4, l_claim_rec.claim_class);
3455: DBMS_SQL.column_value(l_claim_csr_id, 5, l_claim_rec.amount_remaining);
3456: DBMS_SQL.column_value(l_claim_csr_id, 6, l_claim_rec.amount_settled);
3457: DBMS_SQL.column_value(l_claim_csr_id, 7, l_claim_rec.source_object_id);
3458: DBMS_SQL.column_value_char(l_claim_csr_id, 8, l_claim_rec.payment_method);
3459:
3460: l_claim_rma_fetch(l_counter).claim_id := l_claim_rec.claim_id;
3461: l_claim_rma_fetch(l_counter).claim_number := RTRIM(l_claim_rec.claim_number, ' ');
3454: DBMS_SQL.column_value_char(l_claim_csr_id, 4, l_claim_rec.claim_class);
3455: DBMS_SQL.column_value(l_claim_csr_id, 5, l_claim_rec.amount_remaining);
3456: DBMS_SQL.column_value(l_claim_csr_id, 6, l_claim_rec.amount_settled);
3457: DBMS_SQL.column_value(l_claim_csr_id, 7, l_claim_rec.source_object_id);
3458: DBMS_SQL.column_value_char(l_claim_csr_id, 8, l_claim_rec.payment_method);
3459:
3460: l_claim_rma_fetch(l_counter).claim_id := l_claim_rec.claim_id;
3461: l_claim_rma_fetch(l_counter).claim_number := RTRIM(l_claim_rec.claim_number, ' ');
3462: l_claim_rma_fetch(l_counter).object_version_number := l_claim_rec.object_version_number;
3470: EXIT;
3471: END IF;
3472: l_counter := l_counter + 1;
3473: END LOOP;
3474: DBMS_SQL.close_cursor(l_claim_csr_id);
3475:
3476: IF l_claim_rma_fetch.count > 0 THEN
3477: FOR i IN 1..l_claim_rma_fetch.count LOOP
3478: FND_MSG_PUB.initialize;
3632: ,p_reason_code_id => p_reason_code_id
3633: ,p_payment_status => 'INTERFACED'
3634: );
3635:
3636: l_claim_csr_id := DBMS_SQL.open_cursor;
3637: FND_DSQL.set_cursor(l_claim_csr_id);
3638: l_claim_csr_stmt := FND_DSQL.get_text(FALSE);
3639:
3640: l_stmt_debug := fnd_dsql.get_text(TRUE);
3640: l_stmt_debug := fnd_dsql.get_text(TRUE);
3641:
3642: FND_FILE.PUT_LINE(FND_FILE.LOG, 'QUERY CLAIM SQL :: ' || l_stmt_debug);
3643:
3644: DBMS_SQL.parse(l_claim_csr_id, l_claim_csr_stmt, DBMS_SQL.native);
3645: DBMS_SQL.define_column(l_claim_csr_id, 1, l_claim_rec.claim_id);
3646: DBMS_SQL.define_column_char(l_claim_csr_id, 2, l_claim_rec.claim_number, 30);
3647: DBMS_SQL.define_column(l_claim_csr_id, 3, l_claim_rec.object_version_number);
3648: DBMS_SQL.define_column_char(l_claim_csr_id, 4, l_claim_rec.claim_class, 30);
3641:
3642: FND_FILE.PUT_LINE(FND_FILE.LOG, 'QUERY CLAIM SQL :: ' || l_stmt_debug);
3643:
3644: DBMS_SQL.parse(l_claim_csr_id, l_claim_csr_stmt, DBMS_SQL.native);
3645: DBMS_SQL.define_column(l_claim_csr_id, 1, l_claim_rec.claim_id);
3646: DBMS_SQL.define_column_char(l_claim_csr_id, 2, l_claim_rec.claim_number, 30);
3647: DBMS_SQL.define_column(l_claim_csr_id, 3, l_claim_rec.object_version_number);
3648: DBMS_SQL.define_column_char(l_claim_csr_id, 4, l_claim_rec.claim_class, 30);
3649: DBMS_SQL.define_column(l_claim_csr_id, 5, l_claim_rec.amount_remaining);
3642: FND_FILE.PUT_LINE(FND_FILE.LOG, 'QUERY CLAIM SQL :: ' || l_stmt_debug);
3643:
3644: DBMS_SQL.parse(l_claim_csr_id, l_claim_csr_stmt, DBMS_SQL.native);
3645: DBMS_SQL.define_column(l_claim_csr_id, 1, l_claim_rec.claim_id);
3646: DBMS_SQL.define_column_char(l_claim_csr_id, 2, l_claim_rec.claim_number, 30);
3647: DBMS_SQL.define_column(l_claim_csr_id, 3, l_claim_rec.object_version_number);
3648: DBMS_SQL.define_column_char(l_claim_csr_id, 4, l_claim_rec.claim_class, 30);
3649: DBMS_SQL.define_column(l_claim_csr_id, 5, l_claim_rec.amount_remaining);
3650: DBMS_SQL.define_column(l_claim_csr_id, 6, l_claim_rec.amount_settled);
3643:
3644: DBMS_SQL.parse(l_claim_csr_id, l_claim_csr_stmt, DBMS_SQL.native);
3645: DBMS_SQL.define_column(l_claim_csr_id, 1, l_claim_rec.claim_id);
3646: DBMS_SQL.define_column_char(l_claim_csr_id, 2, l_claim_rec.claim_number, 30);
3647: DBMS_SQL.define_column(l_claim_csr_id, 3, l_claim_rec.object_version_number);
3648: DBMS_SQL.define_column_char(l_claim_csr_id, 4, l_claim_rec.claim_class, 30);
3649: DBMS_SQL.define_column(l_claim_csr_id, 5, l_claim_rec.amount_remaining);
3650: DBMS_SQL.define_column(l_claim_csr_id, 6, l_claim_rec.amount_settled);
3651: DBMS_SQL.define_column(l_claim_csr_id, 7, l_claim_rec.source_object_id);
3644: DBMS_SQL.parse(l_claim_csr_id, l_claim_csr_stmt, DBMS_SQL.native);
3645: DBMS_SQL.define_column(l_claim_csr_id, 1, l_claim_rec.claim_id);
3646: DBMS_SQL.define_column_char(l_claim_csr_id, 2, l_claim_rec.claim_number, 30);
3647: DBMS_SQL.define_column(l_claim_csr_id, 3, l_claim_rec.object_version_number);
3648: DBMS_SQL.define_column_char(l_claim_csr_id, 4, l_claim_rec.claim_class, 30);
3649: DBMS_SQL.define_column(l_claim_csr_id, 5, l_claim_rec.amount_remaining);
3650: DBMS_SQL.define_column(l_claim_csr_id, 6, l_claim_rec.amount_settled);
3651: DBMS_SQL.define_column(l_claim_csr_id, 7, l_claim_rec.source_object_id);
3652: DBMS_SQL.define_column_char(l_claim_csr_id, 8, l_claim_rec.payment_method, 15);
3645: DBMS_SQL.define_column(l_claim_csr_id, 1, l_claim_rec.claim_id);
3646: DBMS_SQL.define_column_char(l_claim_csr_id, 2, l_claim_rec.claim_number, 30);
3647: DBMS_SQL.define_column(l_claim_csr_id, 3, l_claim_rec.object_version_number);
3648: DBMS_SQL.define_column_char(l_claim_csr_id, 4, l_claim_rec.claim_class, 30);
3649: DBMS_SQL.define_column(l_claim_csr_id, 5, l_claim_rec.amount_remaining);
3650: DBMS_SQL.define_column(l_claim_csr_id, 6, l_claim_rec.amount_settled);
3651: DBMS_SQL.define_column(l_claim_csr_id, 7, l_claim_rec.source_object_id);
3652: DBMS_SQL.define_column_char(l_claim_csr_id, 8, l_claim_rec.payment_method, 15);
3653: FND_DSQL.do_binds;
3646: DBMS_SQL.define_column_char(l_claim_csr_id, 2, l_claim_rec.claim_number, 30);
3647: DBMS_SQL.define_column(l_claim_csr_id, 3, l_claim_rec.object_version_number);
3648: DBMS_SQL.define_column_char(l_claim_csr_id, 4, l_claim_rec.claim_class, 30);
3649: DBMS_SQL.define_column(l_claim_csr_id, 5, l_claim_rec.amount_remaining);
3650: DBMS_SQL.define_column(l_claim_csr_id, 6, l_claim_rec.amount_settled);
3651: DBMS_SQL.define_column(l_claim_csr_id, 7, l_claim_rec.source_object_id);
3652: DBMS_SQL.define_column_char(l_claim_csr_id, 8, l_claim_rec.payment_method, 15);
3653: FND_DSQL.do_binds;
3654: l_claim_num_rows := DBMS_SQL.execute(l_claim_csr_id);
3647: DBMS_SQL.define_column(l_claim_csr_id, 3, l_claim_rec.object_version_number);
3648: DBMS_SQL.define_column_char(l_claim_csr_id, 4, l_claim_rec.claim_class, 30);
3649: DBMS_SQL.define_column(l_claim_csr_id, 5, l_claim_rec.amount_remaining);
3650: DBMS_SQL.define_column(l_claim_csr_id, 6, l_claim_rec.amount_settled);
3651: DBMS_SQL.define_column(l_claim_csr_id, 7, l_claim_rec.source_object_id);
3652: DBMS_SQL.define_column_char(l_claim_csr_id, 8, l_claim_rec.payment_method, 15);
3653: FND_DSQL.do_binds;
3654: l_claim_num_rows := DBMS_SQL.execute(l_claim_csr_id);
3655:
3648: DBMS_SQL.define_column_char(l_claim_csr_id, 4, l_claim_rec.claim_class, 30);
3649: DBMS_SQL.define_column(l_claim_csr_id, 5, l_claim_rec.amount_remaining);
3650: DBMS_SQL.define_column(l_claim_csr_id, 6, l_claim_rec.amount_settled);
3651: DBMS_SQL.define_column(l_claim_csr_id, 7, l_claim_rec.source_object_id);
3652: DBMS_SQL.define_column_char(l_claim_csr_id, 8, l_claim_rec.payment_method, 15);
3653: FND_DSQL.do_binds;
3654: l_claim_num_rows := DBMS_SQL.execute(l_claim_csr_id);
3655:
3656: l_counter := 1;
3650: DBMS_SQL.define_column(l_claim_csr_id, 6, l_claim_rec.amount_settled);
3651: DBMS_SQL.define_column(l_claim_csr_id, 7, l_claim_rec.source_object_id);
3652: DBMS_SQL.define_column_char(l_claim_csr_id, 8, l_claim_rec.payment_method, 15);
3653: FND_DSQL.do_binds;
3654: l_claim_num_rows := DBMS_SQL.execute(l_claim_csr_id);
3655:
3656: l_counter := 1;
3657: LOOP
3658: IF DBMS_SQL.fetch_rows(l_claim_csr_id) > 0 THEN
3654: l_claim_num_rows := DBMS_SQL.execute(l_claim_csr_id);
3655:
3656: l_counter := 1;
3657: LOOP
3658: IF DBMS_SQL.fetch_rows(l_claim_csr_id) > 0 THEN
3659:
3660: DBMS_SQL.column_value(l_claim_csr_id, 1, l_claim_rec.claim_id);
3661: DBMS_SQL.column_value_char(l_claim_csr_id, 2, l_claim_rec.claim_number);
3662: DBMS_SQL.column_value(l_claim_csr_id, 3, l_claim_rec.object_version_number);
3656: l_counter := 1;
3657: LOOP
3658: IF DBMS_SQL.fetch_rows(l_claim_csr_id) > 0 THEN
3659:
3660: DBMS_SQL.column_value(l_claim_csr_id, 1, l_claim_rec.claim_id);
3661: DBMS_SQL.column_value_char(l_claim_csr_id, 2, l_claim_rec.claim_number);
3662: DBMS_SQL.column_value(l_claim_csr_id, 3, l_claim_rec.object_version_number);
3663: DBMS_SQL.column_value_char(l_claim_csr_id, 4, l_claim_rec.claim_class);
3664: DBMS_SQL.column_value(l_claim_csr_id, 5, l_claim_rec.amount_remaining);
3657: LOOP
3658: IF DBMS_SQL.fetch_rows(l_claim_csr_id) > 0 THEN
3659:
3660: DBMS_SQL.column_value(l_claim_csr_id, 1, l_claim_rec.claim_id);
3661: DBMS_SQL.column_value_char(l_claim_csr_id, 2, l_claim_rec.claim_number);
3662: DBMS_SQL.column_value(l_claim_csr_id, 3, l_claim_rec.object_version_number);
3663: DBMS_SQL.column_value_char(l_claim_csr_id, 4, l_claim_rec.claim_class);
3664: DBMS_SQL.column_value(l_claim_csr_id, 5, l_claim_rec.amount_remaining);
3665: DBMS_SQL.column_value(l_claim_csr_id, 6, l_claim_rec.amount_settled);
3658: IF DBMS_SQL.fetch_rows(l_claim_csr_id) > 0 THEN
3659:
3660: DBMS_SQL.column_value(l_claim_csr_id, 1, l_claim_rec.claim_id);
3661: DBMS_SQL.column_value_char(l_claim_csr_id, 2, l_claim_rec.claim_number);
3662: DBMS_SQL.column_value(l_claim_csr_id, 3, l_claim_rec.object_version_number);
3663: DBMS_SQL.column_value_char(l_claim_csr_id, 4, l_claim_rec.claim_class);
3664: DBMS_SQL.column_value(l_claim_csr_id, 5, l_claim_rec.amount_remaining);
3665: DBMS_SQL.column_value(l_claim_csr_id, 6, l_claim_rec.amount_settled);
3666: DBMS_SQL.column_value(l_claim_csr_id, 7, l_claim_rec.source_object_id);
3659:
3660: DBMS_SQL.column_value(l_claim_csr_id, 1, l_claim_rec.claim_id);
3661: DBMS_SQL.column_value_char(l_claim_csr_id, 2, l_claim_rec.claim_number);
3662: DBMS_SQL.column_value(l_claim_csr_id, 3, l_claim_rec.object_version_number);
3663: DBMS_SQL.column_value_char(l_claim_csr_id, 4, l_claim_rec.claim_class);
3664: DBMS_SQL.column_value(l_claim_csr_id, 5, l_claim_rec.amount_remaining);
3665: DBMS_SQL.column_value(l_claim_csr_id, 6, l_claim_rec.amount_settled);
3666: DBMS_SQL.column_value(l_claim_csr_id, 7, l_claim_rec.source_object_id);
3667: DBMS_SQL.column_value_char(l_claim_csr_id, 8, l_claim_rec.payment_method);
3660: DBMS_SQL.column_value(l_claim_csr_id, 1, l_claim_rec.claim_id);
3661: DBMS_SQL.column_value_char(l_claim_csr_id, 2, l_claim_rec.claim_number);
3662: DBMS_SQL.column_value(l_claim_csr_id, 3, l_claim_rec.object_version_number);
3663: DBMS_SQL.column_value_char(l_claim_csr_id, 4, l_claim_rec.claim_class);
3664: DBMS_SQL.column_value(l_claim_csr_id, 5, l_claim_rec.amount_remaining);
3665: DBMS_SQL.column_value(l_claim_csr_id, 6, l_claim_rec.amount_settled);
3666: DBMS_SQL.column_value(l_claim_csr_id, 7, l_claim_rec.source_object_id);
3667: DBMS_SQL.column_value_char(l_claim_csr_id, 8, l_claim_rec.payment_method);
3668:
3661: DBMS_SQL.column_value_char(l_claim_csr_id, 2, l_claim_rec.claim_number);
3662: DBMS_SQL.column_value(l_claim_csr_id, 3, l_claim_rec.object_version_number);
3663: DBMS_SQL.column_value_char(l_claim_csr_id, 4, l_claim_rec.claim_class);
3664: DBMS_SQL.column_value(l_claim_csr_id, 5, l_claim_rec.amount_remaining);
3665: DBMS_SQL.column_value(l_claim_csr_id, 6, l_claim_rec.amount_settled);
3666: DBMS_SQL.column_value(l_claim_csr_id, 7, l_claim_rec.source_object_id);
3667: DBMS_SQL.column_value_char(l_claim_csr_id, 8, l_claim_rec.payment_method);
3668:
3669: l_claim_rma_setl(l_counter).claim_id := l_claim_rec.claim_id;
3662: DBMS_SQL.column_value(l_claim_csr_id, 3, l_claim_rec.object_version_number);
3663: DBMS_SQL.column_value_char(l_claim_csr_id, 4, l_claim_rec.claim_class);
3664: DBMS_SQL.column_value(l_claim_csr_id, 5, l_claim_rec.amount_remaining);
3665: DBMS_SQL.column_value(l_claim_csr_id, 6, l_claim_rec.amount_settled);
3666: DBMS_SQL.column_value(l_claim_csr_id, 7, l_claim_rec.source_object_id);
3667: DBMS_SQL.column_value_char(l_claim_csr_id, 8, l_claim_rec.payment_method);
3668:
3669: l_claim_rma_setl(l_counter).claim_id := l_claim_rec.claim_id;
3670: l_claim_rma_setl(l_counter).claim_number := RTRIM(l_claim_rec.claim_number, ' ');
3663: DBMS_SQL.column_value_char(l_claim_csr_id, 4, l_claim_rec.claim_class);
3664: DBMS_SQL.column_value(l_claim_csr_id, 5, l_claim_rec.amount_remaining);
3665: DBMS_SQL.column_value(l_claim_csr_id, 6, l_claim_rec.amount_settled);
3666: DBMS_SQL.column_value(l_claim_csr_id, 7, l_claim_rec.source_object_id);
3667: DBMS_SQL.column_value_char(l_claim_csr_id, 8, l_claim_rec.payment_method);
3668:
3669: l_claim_rma_setl(l_counter).claim_id := l_claim_rec.claim_id;
3670: l_claim_rma_setl(l_counter).claim_number := RTRIM(l_claim_rec.claim_number, ' ');
3671: l_claim_rma_setl(l_counter).object_version_number := l_claim_rec.object_version_number;
3679: EXIT;
3680: END IF;
3681: l_counter := l_counter + 1;
3682: END LOOP;
3683: DBMS_SQL.close_cursor(l_claim_csr_id);
3684:
3685: IF l_claim_rma_setl.count > 0 THEN
3686: FOR i IN 1..l_claim_rma_setl.count LOOP
3687: FND_MSG_PUB.initialize;
3944: ,p_reason_code_id => p_reason_code_id
3945: ,p_payment_status => 'INTERFACED'
3946: );
3947:
3948: l_claim_csr_id := DBMS_SQL.open_cursor;
3949: FND_DSQL.set_cursor(l_claim_csr_id);
3950: l_claim_csr_stmt := FND_DSQL.get_text(FALSE);
3951:
3952: l_stmt_debug := fnd_dsql.get_text(TRUE);
3952: l_stmt_debug := fnd_dsql.get_text(TRUE);
3953:
3954: FND_FILE.PUT_LINE(FND_FILE.LOG, 'QUERY CLAIM SQL :: ' || l_stmt_debug);
3955:
3956: DBMS_SQL.parse(l_claim_csr_id, l_claim_csr_stmt, DBMS_SQL.native);
3957: DBMS_SQL.define_column(l_claim_csr_id, 1, l_claim_rec.claim_id);
3958: DBMS_SQL.define_column_char(l_claim_csr_id, 2, l_claim_rec.claim_number, 30);
3959: DBMS_SQL.define_column(l_claim_csr_id, 3, l_claim_rec.object_version_number);
3960: DBMS_SQL.define_column_char(l_claim_csr_id, 4, l_claim_rec.claim_class, 30);
3953:
3954: FND_FILE.PUT_LINE(FND_FILE.LOG, 'QUERY CLAIM SQL :: ' || l_stmt_debug);
3955:
3956: DBMS_SQL.parse(l_claim_csr_id, l_claim_csr_stmt, DBMS_SQL.native);
3957: DBMS_SQL.define_column(l_claim_csr_id, 1, l_claim_rec.claim_id);
3958: DBMS_SQL.define_column_char(l_claim_csr_id, 2, l_claim_rec.claim_number, 30);
3959: DBMS_SQL.define_column(l_claim_csr_id, 3, l_claim_rec.object_version_number);
3960: DBMS_SQL.define_column_char(l_claim_csr_id, 4, l_claim_rec.claim_class, 30);
3961: DBMS_SQL.define_column(l_claim_csr_id, 5, l_claim_rec.amount_remaining);
3954: FND_FILE.PUT_LINE(FND_FILE.LOG, 'QUERY CLAIM SQL :: ' || l_stmt_debug);
3955:
3956: DBMS_SQL.parse(l_claim_csr_id, l_claim_csr_stmt, DBMS_SQL.native);
3957: DBMS_SQL.define_column(l_claim_csr_id, 1, l_claim_rec.claim_id);
3958: DBMS_SQL.define_column_char(l_claim_csr_id, 2, l_claim_rec.claim_number, 30);
3959: DBMS_SQL.define_column(l_claim_csr_id, 3, l_claim_rec.object_version_number);
3960: DBMS_SQL.define_column_char(l_claim_csr_id, 4, l_claim_rec.claim_class, 30);
3961: DBMS_SQL.define_column(l_claim_csr_id, 5, l_claim_rec.amount_remaining);
3962: DBMS_SQL.define_column(l_claim_csr_id, 6, l_claim_rec.amount_settled);
3955:
3956: DBMS_SQL.parse(l_claim_csr_id, l_claim_csr_stmt, DBMS_SQL.native);
3957: DBMS_SQL.define_column(l_claim_csr_id, 1, l_claim_rec.claim_id);
3958: DBMS_SQL.define_column_char(l_claim_csr_id, 2, l_claim_rec.claim_number, 30);
3959: DBMS_SQL.define_column(l_claim_csr_id, 3, l_claim_rec.object_version_number);
3960: DBMS_SQL.define_column_char(l_claim_csr_id, 4, l_claim_rec.claim_class, 30);
3961: DBMS_SQL.define_column(l_claim_csr_id, 5, l_claim_rec.amount_remaining);
3962: DBMS_SQL.define_column(l_claim_csr_id, 6, l_claim_rec.amount_settled);
3963: DBMS_SQL.define_column(l_claim_csr_id, 7, l_claim_rec.source_object_id);
3956: DBMS_SQL.parse(l_claim_csr_id, l_claim_csr_stmt, DBMS_SQL.native);
3957: DBMS_SQL.define_column(l_claim_csr_id, 1, l_claim_rec.claim_id);
3958: DBMS_SQL.define_column_char(l_claim_csr_id, 2, l_claim_rec.claim_number, 30);
3959: DBMS_SQL.define_column(l_claim_csr_id, 3, l_claim_rec.object_version_number);
3960: DBMS_SQL.define_column_char(l_claim_csr_id, 4, l_claim_rec.claim_class, 30);
3961: DBMS_SQL.define_column(l_claim_csr_id, 5, l_claim_rec.amount_remaining);
3962: DBMS_SQL.define_column(l_claim_csr_id, 6, l_claim_rec.amount_settled);
3963: DBMS_SQL.define_column(l_claim_csr_id, 7, l_claim_rec.source_object_id);
3964: DBMS_SQL.define_column_char(l_claim_csr_id, 8, l_claim_rec.payment_method, 15);
3957: DBMS_SQL.define_column(l_claim_csr_id, 1, l_claim_rec.claim_id);
3958: DBMS_SQL.define_column_char(l_claim_csr_id, 2, l_claim_rec.claim_number, 30);
3959: DBMS_SQL.define_column(l_claim_csr_id, 3, l_claim_rec.object_version_number);
3960: DBMS_SQL.define_column_char(l_claim_csr_id, 4, l_claim_rec.claim_class, 30);
3961: DBMS_SQL.define_column(l_claim_csr_id, 5, l_claim_rec.amount_remaining);
3962: DBMS_SQL.define_column(l_claim_csr_id, 6, l_claim_rec.amount_settled);
3963: DBMS_SQL.define_column(l_claim_csr_id, 7, l_claim_rec.source_object_id);
3964: DBMS_SQL.define_column_char(l_claim_csr_id, 8, l_claim_rec.payment_method, 15);
3965:
3958: DBMS_SQL.define_column_char(l_claim_csr_id, 2, l_claim_rec.claim_number, 30);
3959: DBMS_SQL.define_column(l_claim_csr_id, 3, l_claim_rec.object_version_number);
3960: DBMS_SQL.define_column_char(l_claim_csr_id, 4, l_claim_rec.claim_class, 30);
3961: DBMS_SQL.define_column(l_claim_csr_id, 5, l_claim_rec.amount_remaining);
3962: DBMS_SQL.define_column(l_claim_csr_id, 6, l_claim_rec.amount_settled);
3963: DBMS_SQL.define_column(l_claim_csr_id, 7, l_claim_rec.source_object_id);
3964: DBMS_SQL.define_column_char(l_claim_csr_id, 8, l_claim_rec.payment_method, 15);
3965:
3966: FND_DSQL.do_binds;
3959: DBMS_SQL.define_column(l_claim_csr_id, 3, l_claim_rec.object_version_number);
3960: DBMS_SQL.define_column_char(l_claim_csr_id, 4, l_claim_rec.claim_class, 30);
3961: DBMS_SQL.define_column(l_claim_csr_id, 5, l_claim_rec.amount_remaining);
3962: DBMS_SQL.define_column(l_claim_csr_id, 6, l_claim_rec.amount_settled);
3963: DBMS_SQL.define_column(l_claim_csr_id, 7, l_claim_rec.source_object_id);
3964: DBMS_SQL.define_column_char(l_claim_csr_id, 8, l_claim_rec.payment_method, 15);
3965:
3966: FND_DSQL.do_binds;
3967: l_claim_num_rows := DBMS_SQL.execute(l_claim_csr_id);
3960: DBMS_SQL.define_column_char(l_claim_csr_id, 4, l_claim_rec.claim_class, 30);
3961: DBMS_SQL.define_column(l_claim_csr_id, 5, l_claim_rec.amount_remaining);
3962: DBMS_SQL.define_column(l_claim_csr_id, 6, l_claim_rec.amount_settled);
3963: DBMS_SQL.define_column(l_claim_csr_id, 7, l_claim_rec.source_object_id);
3964: DBMS_SQL.define_column_char(l_claim_csr_id, 8, l_claim_rec.payment_method, 15);
3965:
3966: FND_DSQL.do_binds;
3967: l_claim_num_rows := DBMS_SQL.execute(l_claim_csr_id);
3968:
3963: DBMS_SQL.define_column(l_claim_csr_id, 7, l_claim_rec.source_object_id);
3964: DBMS_SQL.define_column_char(l_claim_csr_id, 8, l_claim_rec.payment_method, 15);
3965:
3966: FND_DSQL.do_binds;
3967: l_claim_num_rows := DBMS_SQL.execute(l_claim_csr_id);
3968:
3969: l_counter := 1;
3970: LOOP
3971: IF DBMS_SQL.fetch_rows(l_claim_csr_id) > 0 THEN
3967: l_claim_num_rows := DBMS_SQL.execute(l_claim_csr_id);
3968:
3969: l_counter := 1;
3970: LOOP
3971: IF DBMS_SQL.fetch_rows(l_claim_csr_id) > 0 THEN
3972:
3973: DBMS_SQL.column_value(l_claim_csr_id, 1, l_claim_rec.claim_id);
3974: DBMS_SQL.column_value_char(l_claim_csr_id, 2, l_claim_rec.claim_number);
3975: DBMS_SQL.column_value(l_claim_csr_id, 3, l_claim_rec.object_version_number);
3969: l_counter := 1;
3970: LOOP
3971: IF DBMS_SQL.fetch_rows(l_claim_csr_id) > 0 THEN
3972:
3973: DBMS_SQL.column_value(l_claim_csr_id, 1, l_claim_rec.claim_id);
3974: DBMS_SQL.column_value_char(l_claim_csr_id, 2, l_claim_rec.claim_number);
3975: DBMS_SQL.column_value(l_claim_csr_id, 3, l_claim_rec.object_version_number);
3976: DBMS_SQL.column_value_char(l_claim_csr_id, 4, l_claim_rec.claim_class);
3977: DBMS_SQL.column_value(l_claim_csr_id, 5, l_claim_rec.amount_remaining);
3970: LOOP
3971: IF DBMS_SQL.fetch_rows(l_claim_csr_id) > 0 THEN
3972:
3973: DBMS_SQL.column_value(l_claim_csr_id, 1, l_claim_rec.claim_id);
3974: DBMS_SQL.column_value_char(l_claim_csr_id, 2, l_claim_rec.claim_number);
3975: DBMS_SQL.column_value(l_claim_csr_id, 3, l_claim_rec.object_version_number);
3976: DBMS_SQL.column_value_char(l_claim_csr_id, 4, l_claim_rec.claim_class);
3977: DBMS_SQL.column_value(l_claim_csr_id, 5, l_claim_rec.amount_remaining);
3978: DBMS_SQL.column_value(l_claim_csr_id, 6, l_claim_rec.amount_settled);
3971: IF DBMS_SQL.fetch_rows(l_claim_csr_id) > 0 THEN
3972:
3973: DBMS_SQL.column_value(l_claim_csr_id, 1, l_claim_rec.claim_id);
3974: DBMS_SQL.column_value_char(l_claim_csr_id, 2, l_claim_rec.claim_number);
3975: DBMS_SQL.column_value(l_claim_csr_id, 3, l_claim_rec.object_version_number);
3976: DBMS_SQL.column_value_char(l_claim_csr_id, 4, l_claim_rec.claim_class);
3977: DBMS_SQL.column_value(l_claim_csr_id, 5, l_claim_rec.amount_remaining);
3978: DBMS_SQL.column_value(l_claim_csr_id, 6, l_claim_rec.amount_settled);
3979: DBMS_SQL.column_value(l_claim_csr_id, 7, l_claim_rec.source_object_id);
3972:
3973: DBMS_SQL.column_value(l_claim_csr_id, 1, l_claim_rec.claim_id);
3974: DBMS_SQL.column_value_char(l_claim_csr_id, 2, l_claim_rec.claim_number);
3975: DBMS_SQL.column_value(l_claim_csr_id, 3, l_claim_rec.object_version_number);
3976: DBMS_SQL.column_value_char(l_claim_csr_id, 4, l_claim_rec.claim_class);
3977: DBMS_SQL.column_value(l_claim_csr_id, 5, l_claim_rec.amount_remaining);
3978: DBMS_SQL.column_value(l_claim_csr_id, 6, l_claim_rec.amount_settled);
3979: DBMS_SQL.column_value(l_claim_csr_id, 7, l_claim_rec.source_object_id);
3980: DBMS_SQL.column_value_char(l_claim_csr_id, 8, l_claim_rec.payment_method);
3973: DBMS_SQL.column_value(l_claim_csr_id, 1, l_claim_rec.claim_id);
3974: DBMS_SQL.column_value_char(l_claim_csr_id, 2, l_claim_rec.claim_number);
3975: DBMS_SQL.column_value(l_claim_csr_id, 3, l_claim_rec.object_version_number);
3976: DBMS_SQL.column_value_char(l_claim_csr_id, 4, l_claim_rec.claim_class);
3977: DBMS_SQL.column_value(l_claim_csr_id, 5, l_claim_rec.amount_remaining);
3978: DBMS_SQL.column_value(l_claim_csr_id, 6, l_claim_rec.amount_settled);
3979: DBMS_SQL.column_value(l_claim_csr_id, 7, l_claim_rec.source_object_id);
3980: DBMS_SQL.column_value_char(l_claim_csr_id, 8, l_claim_rec.payment_method);
3981:
3974: DBMS_SQL.column_value_char(l_claim_csr_id, 2, l_claim_rec.claim_number);
3975: DBMS_SQL.column_value(l_claim_csr_id, 3, l_claim_rec.object_version_number);
3976: DBMS_SQL.column_value_char(l_claim_csr_id, 4, l_claim_rec.claim_class);
3977: DBMS_SQL.column_value(l_claim_csr_id, 5, l_claim_rec.amount_remaining);
3978: DBMS_SQL.column_value(l_claim_csr_id, 6, l_claim_rec.amount_settled);
3979: DBMS_SQL.column_value(l_claim_csr_id, 7, l_claim_rec.source_object_id);
3980: DBMS_SQL.column_value_char(l_claim_csr_id, 8, l_claim_rec.payment_method);
3981:
3982: l_claim_id_ver(l_counter).claim_id := l_claim_rec.claim_id;
3975: DBMS_SQL.column_value(l_claim_csr_id, 3, l_claim_rec.object_version_number);
3976: DBMS_SQL.column_value_char(l_claim_csr_id, 4, l_claim_rec.claim_class);
3977: DBMS_SQL.column_value(l_claim_csr_id, 5, l_claim_rec.amount_remaining);
3978: DBMS_SQL.column_value(l_claim_csr_id, 6, l_claim_rec.amount_settled);
3979: DBMS_SQL.column_value(l_claim_csr_id, 7, l_claim_rec.source_object_id);
3980: DBMS_SQL.column_value_char(l_claim_csr_id, 8, l_claim_rec.payment_method);
3981:
3982: l_claim_id_ver(l_counter).claim_id := l_claim_rec.claim_id;
3983: l_claim_id_ver(l_counter).claim_number := RTRIM(l_claim_rec.claim_number, ' ');
3976: DBMS_SQL.column_value_char(l_claim_csr_id, 4, l_claim_rec.claim_class);
3977: DBMS_SQL.column_value(l_claim_csr_id, 5, l_claim_rec.amount_remaining);
3978: DBMS_SQL.column_value(l_claim_csr_id, 6, l_claim_rec.amount_settled);
3979: DBMS_SQL.column_value(l_claim_csr_id, 7, l_claim_rec.source_object_id);
3980: DBMS_SQL.column_value_char(l_claim_csr_id, 8, l_claim_rec.payment_method);
3981:
3982: l_claim_id_ver(l_counter).claim_id := l_claim_rec.claim_id;
3983: l_claim_id_ver(l_counter).claim_number := RTRIM(l_claim_rec.claim_number, ' ');
3984: l_claim_id_ver(l_counter).object_version_number := l_claim_rec.object_version_number;
3992: EXIT;
3993: END IF;
3994: l_counter := l_counter + 1;
3995: END LOOP;
3996: DBMS_SQL.close_cursor(l_claim_csr_id);
3997:
3998:
3999: IF l_claim_id_ver.count > 0 THEN
4000: FOR i IN 1..l_claim_id_ver.count LOOP
4623: ,p_reason_code_id => p_reason_code_id
4624: ,p_payment_status => 'INTERFACED'
4625: );
4626:
4627: l_claim_csr_id := DBMS_SQL.open_cursor;
4628: FND_DSQL.set_cursor(l_claim_csr_id);
4629: l_claim_csr_stmt := FND_DSQL.get_text(FALSE);
4630:
4631: l_stmt_debug := fnd_dsql.get_text(TRUE);
4631: l_stmt_debug := fnd_dsql.get_text(TRUE);
4632:
4633: FND_FILE.PUT_LINE(FND_FILE.LOG, 'QUERY CLAIM SQL :: ' || l_stmt_debug);
4634:
4635: DBMS_SQL.parse(l_claim_csr_id, l_claim_csr_stmt, DBMS_SQL.native);
4636: DBMS_SQL.define_column(l_claim_csr_id, 1, l_claim_rec.claim_id);
4637: DBMS_SQL.define_column_char(l_claim_csr_id, 2, l_claim_rec.claim_number, 30);
4638: DBMS_SQL.define_column(l_claim_csr_id, 3, l_claim_rec.object_version_number);
4639: DBMS_SQL.define_column_char(l_claim_csr_id, 4, l_claim_rec.claim_class, 30);
4632:
4633: FND_FILE.PUT_LINE(FND_FILE.LOG, 'QUERY CLAIM SQL :: ' || l_stmt_debug);
4634:
4635: DBMS_SQL.parse(l_claim_csr_id, l_claim_csr_stmt, DBMS_SQL.native);
4636: DBMS_SQL.define_column(l_claim_csr_id, 1, l_claim_rec.claim_id);
4637: DBMS_SQL.define_column_char(l_claim_csr_id, 2, l_claim_rec.claim_number, 30);
4638: DBMS_SQL.define_column(l_claim_csr_id, 3, l_claim_rec.object_version_number);
4639: DBMS_SQL.define_column_char(l_claim_csr_id, 4, l_claim_rec.claim_class, 30);
4640: DBMS_SQL.define_column(l_claim_csr_id, 5, l_claim_rec.amount_remaining);
4633: FND_FILE.PUT_LINE(FND_FILE.LOG, 'QUERY CLAIM SQL :: ' || l_stmt_debug);
4634:
4635: DBMS_SQL.parse(l_claim_csr_id, l_claim_csr_stmt, DBMS_SQL.native);
4636: DBMS_SQL.define_column(l_claim_csr_id, 1, l_claim_rec.claim_id);
4637: DBMS_SQL.define_column_char(l_claim_csr_id, 2, l_claim_rec.claim_number, 30);
4638: DBMS_SQL.define_column(l_claim_csr_id, 3, l_claim_rec.object_version_number);
4639: DBMS_SQL.define_column_char(l_claim_csr_id, 4, l_claim_rec.claim_class, 30);
4640: DBMS_SQL.define_column(l_claim_csr_id, 5, l_claim_rec.amount_remaining);
4641: DBMS_SQL.define_column(l_claim_csr_id, 6, l_claim_rec.amount_settled);
4634:
4635: DBMS_SQL.parse(l_claim_csr_id, l_claim_csr_stmt, DBMS_SQL.native);
4636: DBMS_SQL.define_column(l_claim_csr_id, 1, l_claim_rec.claim_id);
4637: DBMS_SQL.define_column_char(l_claim_csr_id, 2, l_claim_rec.claim_number, 30);
4638: DBMS_SQL.define_column(l_claim_csr_id, 3, l_claim_rec.object_version_number);
4639: DBMS_SQL.define_column_char(l_claim_csr_id, 4, l_claim_rec.claim_class, 30);
4640: DBMS_SQL.define_column(l_claim_csr_id, 5, l_claim_rec.amount_remaining);
4641: DBMS_SQL.define_column(l_claim_csr_id, 6, l_claim_rec.amount_settled);
4642: DBMS_SQL.define_column(l_claim_csr_id, 7, l_claim_rec.source_object_id);
4635: DBMS_SQL.parse(l_claim_csr_id, l_claim_csr_stmt, DBMS_SQL.native);
4636: DBMS_SQL.define_column(l_claim_csr_id, 1, l_claim_rec.claim_id);
4637: DBMS_SQL.define_column_char(l_claim_csr_id, 2, l_claim_rec.claim_number, 30);
4638: DBMS_SQL.define_column(l_claim_csr_id, 3, l_claim_rec.object_version_number);
4639: DBMS_SQL.define_column_char(l_claim_csr_id, 4, l_claim_rec.claim_class, 30);
4640: DBMS_SQL.define_column(l_claim_csr_id, 5, l_claim_rec.amount_remaining);
4641: DBMS_SQL.define_column(l_claim_csr_id, 6, l_claim_rec.amount_settled);
4642: DBMS_SQL.define_column(l_claim_csr_id, 7, l_claim_rec.source_object_id);
4643: DBMS_SQL.define_column_char(l_claim_csr_id, 8, l_claim_rec.payment_method, 15);
4636: DBMS_SQL.define_column(l_claim_csr_id, 1, l_claim_rec.claim_id);
4637: DBMS_SQL.define_column_char(l_claim_csr_id, 2, l_claim_rec.claim_number, 30);
4638: DBMS_SQL.define_column(l_claim_csr_id, 3, l_claim_rec.object_version_number);
4639: DBMS_SQL.define_column_char(l_claim_csr_id, 4, l_claim_rec.claim_class, 30);
4640: DBMS_SQL.define_column(l_claim_csr_id, 5, l_claim_rec.amount_remaining);
4641: DBMS_SQL.define_column(l_claim_csr_id, 6, l_claim_rec.amount_settled);
4642: DBMS_SQL.define_column(l_claim_csr_id, 7, l_claim_rec.source_object_id);
4643: DBMS_SQL.define_column_char(l_claim_csr_id, 8, l_claim_rec.payment_method, 15);
4644: FND_DSQL.do_binds;
4637: DBMS_SQL.define_column_char(l_claim_csr_id, 2, l_claim_rec.claim_number, 30);
4638: DBMS_SQL.define_column(l_claim_csr_id, 3, l_claim_rec.object_version_number);
4639: DBMS_SQL.define_column_char(l_claim_csr_id, 4, l_claim_rec.claim_class, 30);
4640: DBMS_SQL.define_column(l_claim_csr_id, 5, l_claim_rec.amount_remaining);
4641: DBMS_SQL.define_column(l_claim_csr_id, 6, l_claim_rec.amount_settled);
4642: DBMS_SQL.define_column(l_claim_csr_id, 7, l_claim_rec.source_object_id);
4643: DBMS_SQL.define_column_char(l_claim_csr_id, 8, l_claim_rec.payment_method, 15);
4644: FND_DSQL.do_binds;
4645: l_claim_num_rows := DBMS_SQL.execute(l_claim_csr_id);
4638: DBMS_SQL.define_column(l_claim_csr_id, 3, l_claim_rec.object_version_number);
4639: DBMS_SQL.define_column_char(l_claim_csr_id, 4, l_claim_rec.claim_class, 30);
4640: DBMS_SQL.define_column(l_claim_csr_id, 5, l_claim_rec.amount_remaining);
4641: DBMS_SQL.define_column(l_claim_csr_id, 6, l_claim_rec.amount_settled);
4642: DBMS_SQL.define_column(l_claim_csr_id, 7, l_claim_rec.source_object_id);
4643: DBMS_SQL.define_column_char(l_claim_csr_id, 8, l_claim_rec.payment_method, 15);
4644: FND_DSQL.do_binds;
4645: l_claim_num_rows := DBMS_SQL.execute(l_claim_csr_id);
4646:
4639: DBMS_SQL.define_column_char(l_claim_csr_id, 4, l_claim_rec.claim_class, 30);
4640: DBMS_SQL.define_column(l_claim_csr_id, 5, l_claim_rec.amount_remaining);
4641: DBMS_SQL.define_column(l_claim_csr_id, 6, l_claim_rec.amount_settled);
4642: DBMS_SQL.define_column(l_claim_csr_id, 7, l_claim_rec.source_object_id);
4643: DBMS_SQL.define_column_char(l_claim_csr_id, 8, l_claim_rec.payment_method, 15);
4644: FND_DSQL.do_binds;
4645: l_claim_num_rows := DBMS_SQL.execute(l_claim_csr_id);
4646:
4647: l_counter := 1;
4641: DBMS_SQL.define_column(l_claim_csr_id, 6, l_claim_rec.amount_settled);
4642: DBMS_SQL.define_column(l_claim_csr_id, 7, l_claim_rec.source_object_id);
4643: DBMS_SQL.define_column_char(l_claim_csr_id, 8, l_claim_rec.payment_method, 15);
4644: FND_DSQL.do_binds;
4645: l_claim_num_rows := DBMS_SQL.execute(l_claim_csr_id);
4646:
4647: l_counter := 1;
4648: LOOP
4649: IF DBMS_SQL.fetch_rows(l_claim_csr_id) > 0 THEN
4645: l_claim_num_rows := DBMS_SQL.execute(l_claim_csr_id);
4646:
4647: l_counter := 1;
4648: LOOP
4649: IF DBMS_SQL.fetch_rows(l_claim_csr_id) > 0 THEN
4650:
4651: DBMS_SQL.column_value(l_claim_csr_id, 1, l_claim_rec.claim_id);
4652: DBMS_SQL.column_value_char(l_claim_csr_id, 2, l_claim_rec.claim_number);
4653: DBMS_SQL.column_value(l_claim_csr_id, 3, l_claim_rec.object_version_number);
4647: l_counter := 1;
4648: LOOP
4649: IF DBMS_SQL.fetch_rows(l_claim_csr_id) > 0 THEN
4650:
4651: DBMS_SQL.column_value(l_claim_csr_id, 1, l_claim_rec.claim_id);
4652: DBMS_SQL.column_value_char(l_claim_csr_id, 2, l_claim_rec.claim_number);
4653: DBMS_SQL.column_value(l_claim_csr_id, 3, l_claim_rec.object_version_number);
4654: DBMS_SQL.column_value_char(l_claim_csr_id, 4, l_claim_rec.claim_class);
4655: DBMS_SQL.column_value(l_claim_csr_id, 5, l_claim_rec.amount_remaining);
4648: LOOP
4649: IF DBMS_SQL.fetch_rows(l_claim_csr_id) > 0 THEN
4650:
4651: DBMS_SQL.column_value(l_claim_csr_id, 1, l_claim_rec.claim_id);
4652: DBMS_SQL.column_value_char(l_claim_csr_id, 2, l_claim_rec.claim_number);
4653: DBMS_SQL.column_value(l_claim_csr_id, 3, l_claim_rec.object_version_number);
4654: DBMS_SQL.column_value_char(l_claim_csr_id, 4, l_claim_rec.claim_class);
4655: DBMS_SQL.column_value(l_claim_csr_id, 5, l_claim_rec.amount_remaining);
4656: DBMS_SQL.column_value(l_claim_csr_id, 6, l_claim_rec.amount_settled);
4649: IF DBMS_SQL.fetch_rows(l_claim_csr_id) > 0 THEN
4650:
4651: DBMS_SQL.column_value(l_claim_csr_id, 1, l_claim_rec.claim_id);
4652: DBMS_SQL.column_value_char(l_claim_csr_id, 2, l_claim_rec.claim_number);
4653: DBMS_SQL.column_value(l_claim_csr_id, 3, l_claim_rec.object_version_number);
4654: DBMS_SQL.column_value_char(l_claim_csr_id, 4, l_claim_rec.claim_class);
4655: DBMS_SQL.column_value(l_claim_csr_id, 5, l_claim_rec.amount_remaining);
4656: DBMS_SQL.column_value(l_claim_csr_id, 6, l_claim_rec.amount_settled);
4657: DBMS_SQL.column_value(l_claim_csr_id, 7, l_claim_rec.source_object_id);
4650:
4651: DBMS_SQL.column_value(l_claim_csr_id, 1, l_claim_rec.claim_id);
4652: DBMS_SQL.column_value_char(l_claim_csr_id, 2, l_claim_rec.claim_number);
4653: DBMS_SQL.column_value(l_claim_csr_id, 3, l_claim_rec.object_version_number);
4654: DBMS_SQL.column_value_char(l_claim_csr_id, 4, l_claim_rec.claim_class);
4655: DBMS_SQL.column_value(l_claim_csr_id, 5, l_claim_rec.amount_remaining);
4656: DBMS_SQL.column_value(l_claim_csr_id, 6, l_claim_rec.amount_settled);
4657: DBMS_SQL.column_value(l_claim_csr_id, 7, l_claim_rec.source_object_id);
4658: DBMS_SQL.column_value_char(l_claim_csr_id, 8, l_claim_rec.payment_method);
4651: DBMS_SQL.column_value(l_claim_csr_id, 1, l_claim_rec.claim_id);
4652: DBMS_SQL.column_value_char(l_claim_csr_id, 2, l_claim_rec.claim_number);
4653: DBMS_SQL.column_value(l_claim_csr_id, 3, l_claim_rec.object_version_number);
4654: DBMS_SQL.column_value_char(l_claim_csr_id, 4, l_claim_rec.claim_class);
4655: DBMS_SQL.column_value(l_claim_csr_id, 5, l_claim_rec.amount_remaining);
4656: DBMS_SQL.column_value(l_claim_csr_id, 6, l_claim_rec.amount_settled);
4657: DBMS_SQL.column_value(l_claim_csr_id, 7, l_claim_rec.source_object_id);
4658: DBMS_SQL.column_value_char(l_claim_csr_id, 8, l_claim_rec.payment_method);
4659:
4652: DBMS_SQL.column_value_char(l_claim_csr_id, 2, l_claim_rec.claim_number);
4653: DBMS_SQL.column_value(l_claim_csr_id, 3, l_claim_rec.object_version_number);
4654: DBMS_SQL.column_value_char(l_claim_csr_id, 4, l_claim_rec.claim_class);
4655: DBMS_SQL.column_value(l_claim_csr_id, 5, l_claim_rec.amount_remaining);
4656: DBMS_SQL.column_value(l_claim_csr_id, 6, l_claim_rec.amount_settled);
4657: DBMS_SQL.column_value(l_claim_csr_id, 7, l_claim_rec.source_object_id);
4658: DBMS_SQL.column_value_char(l_claim_csr_id, 8, l_claim_rec.payment_method);
4659:
4660: l_claim_id_ver(l_counter).claim_id := l_claim_rec.claim_id;
4653: DBMS_SQL.column_value(l_claim_csr_id, 3, l_claim_rec.object_version_number);
4654: DBMS_SQL.column_value_char(l_claim_csr_id, 4, l_claim_rec.claim_class);
4655: DBMS_SQL.column_value(l_claim_csr_id, 5, l_claim_rec.amount_remaining);
4656: DBMS_SQL.column_value(l_claim_csr_id, 6, l_claim_rec.amount_settled);
4657: DBMS_SQL.column_value(l_claim_csr_id, 7, l_claim_rec.source_object_id);
4658: DBMS_SQL.column_value_char(l_claim_csr_id, 8, l_claim_rec.payment_method);
4659:
4660: l_claim_id_ver(l_counter).claim_id := l_claim_rec.claim_id;
4661: l_claim_id_ver(l_counter).claim_number := RTRIM(l_claim_rec.claim_number, ' ');
4654: DBMS_SQL.column_value_char(l_claim_csr_id, 4, l_claim_rec.claim_class);
4655: DBMS_SQL.column_value(l_claim_csr_id, 5, l_claim_rec.amount_remaining);
4656: DBMS_SQL.column_value(l_claim_csr_id, 6, l_claim_rec.amount_settled);
4657: DBMS_SQL.column_value(l_claim_csr_id, 7, l_claim_rec.source_object_id);
4658: DBMS_SQL.column_value_char(l_claim_csr_id, 8, l_claim_rec.payment_method);
4659:
4660: l_claim_id_ver(l_counter).claim_id := l_claim_rec.claim_id;
4661: l_claim_id_ver(l_counter).claim_number := RTRIM(l_claim_rec.claim_number, ' ');
4662: l_claim_id_ver(l_counter).object_version_number := l_claim_rec.object_version_number;
4670: EXIT;
4671: END IF;
4672: l_counter := l_counter + 1;
4673: END LOOP;
4674: DBMS_SQL.close_cursor(l_claim_csr_id);
4675:
4676:
4677: -- Process individuals Claims
4678: FOR i IN 1..l_claim_id_ver.count LOOP