2951: ,p_reason_code_id => p_reason_code_id
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);
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);
2964: DBMS_SQL.define_column(l_claim_csr_id, 1, l_claim_rec.claim_id);
2965: DBMS_SQL.define_column_char(l_claim_csr_id, 2, l_claim_rec.claim_number, 30);
2966: DBMS_SQL.define_column(l_claim_csr_id, 3, l_claim_rec.object_version_number);
2967: DBMS_SQL.define_column_char(l_claim_csr_id, 4, l_claim_rec.claim_class, 30);
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);
2964: DBMS_SQL.define_column(l_claim_csr_id, 1, l_claim_rec.claim_id);
2965: DBMS_SQL.define_column_char(l_claim_csr_id, 2, l_claim_rec.claim_number, 30);
2966: DBMS_SQL.define_column(l_claim_csr_id, 3, l_claim_rec.object_version_number);
2967: DBMS_SQL.define_column_char(l_claim_csr_id, 4, l_claim_rec.claim_class, 30);
2968: DBMS_SQL.define_column(l_claim_csr_id, 5, l_claim_rec.amount_remaining);
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);
2964: DBMS_SQL.define_column(l_claim_csr_id, 1, l_claim_rec.claim_id);
2965: DBMS_SQL.define_column_char(l_claim_csr_id, 2, l_claim_rec.claim_number, 30);
2966: DBMS_SQL.define_column(l_claim_csr_id, 3, l_claim_rec.object_version_number);
2967: DBMS_SQL.define_column_char(l_claim_csr_id, 4, l_claim_rec.claim_class, 30);
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);
2962:
2963: DBMS_SQL.parse(l_claim_csr_id, l_claim_csr_stmt, DBMS_SQL.native);
2964: DBMS_SQL.define_column(l_claim_csr_id, 1, l_claim_rec.claim_id);
2965: DBMS_SQL.define_column_char(l_claim_csr_id, 2, l_claim_rec.claim_number, 30);
2966: DBMS_SQL.define_column(l_claim_csr_id, 3, l_claim_rec.object_version_number);
2967: DBMS_SQL.define_column_char(l_claim_csr_id, 4, l_claim_rec.claim_class, 30);
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);
2963: DBMS_SQL.parse(l_claim_csr_id, l_claim_csr_stmt, DBMS_SQL.native);
2964: DBMS_SQL.define_column(l_claim_csr_id, 1, l_claim_rec.claim_id);
2965: DBMS_SQL.define_column_char(l_claim_csr_id, 2, l_claim_rec.claim_number, 30);
2966: DBMS_SQL.define_column(l_claim_csr_id, 3, l_claim_rec.object_version_number);
2967: DBMS_SQL.define_column_char(l_claim_csr_id, 4, l_claim_rec.claim_class, 30);
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);
2964: DBMS_SQL.define_column(l_claim_csr_id, 1, l_claim_rec.claim_id);
2965: DBMS_SQL.define_column_char(l_claim_csr_id, 2, l_claim_rec.claim_number, 30);
2966: DBMS_SQL.define_column(l_claim_csr_id, 3, l_claim_rec.object_version_number);
2967: DBMS_SQL.define_column_char(l_claim_csr_id, 4, l_claim_rec.claim_class, 30);
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;
2965: DBMS_SQL.define_column_char(l_claim_csr_id, 2, l_claim_rec.claim_number, 30);
2966: DBMS_SQL.define_column(l_claim_csr_id, 3, l_claim_rec.object_version_number);
2967: DBMS_SQL.define_column_char(l_claim_csr_id, 4, l_claim_rec.claim_class, 30);
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);
2966: DBMS_SQL.define_column(l_claim_csr_id, 3, l_claim_rec.object_version_number);
2967: DBMS_SQL.define_column_char(l_claim_csr_id, 4, l_claim_rec.claim_class, 30);
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:
2967: DBMS_SQL.define_column_char(l_claim_csr_id, 4, l_claim_rec.claim_class, 30);
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;
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
2977: IF DBMS_SQL.fetch_rows(l_claim_csr_id) > 0 THEN
2973: l_claim_num_rows := DBMS_SQL.execute(l_claim_csr_id);
2974:
2975: l_counter := 1;
2976: LOOP
2977: IF DBMS_SQL.fetch_rows(l_claim_csr_id) > 0 THEN
2978:
2979: DBMS_SQL.column_value(l_claim_csr_id, 1, l_claim_rec.claim_id);
2980: DBMS_SQL.column_value_char(l_claim_csr_id, 2, l_claim_rec.claim_number);
2981: DBMS_SQL.column_value(l_claim_csr_id, 3, l_claim_rec.object_version_number);
2975: l_counter := 1;
2976: LOOP
2977: IF DBMS_SQL.fetch_rows(l_claim_csr_id) > 0 THEN
2978:
2979: DBMS_SQL.column_value(l_claim_csr_id, 1, l_claim_rec.claim_id);
2980: DBMS_SQL.column_value_char(l_claim_csr_id, 2, l_claim_rec.claim_number);
2981: DBMS_SQL.column_value(l_claim_csr_id, 3, l_claim_rec.object_version_number);
2982: DBMS_SQL.column_value_char(l_claim_csr_id, 4, l_claim_rec.claim_class);
2983: DBMS_SQL.column_value(l_claim_csr_id, 5, l_claim_rec.amount_remaining);
2976: LOOP
2977: IF DBMS_SQL.fetch_rows(l_claim_csr_id) > 0 THEN
2978:
2979: DBMS_SQL.column_value(l_claim_csr_id, 1, l_claim_rec.claim_id);
2980: DBMS_SQL.column_value_char(l_claim_csr_id, 2, l_claim_rec.claim_number);
2981: DBMS_SQL.column_value(l_claim_csr_id, 3, l_claim_rec.object_version_number);
2982: DBMS_SQL.column_value_char(l_claim_csr_id, 4, l_claim_rec.claim_class);
2983: DBMS_SQL.column_value(l_claim_csr_id, 5, l_claim_rec.amount_remaining);
2984: DBMS_SQL.column_value(l_claim_csr_id, 6, l_claim_rec.amount_settled);
2977: IF DBMS_SQL.fetch_rows(l_claim_csr_id) > 0 THEN
2978:
2979: DBMS_SQL.column_value(l_claim_csr_id, 1, l_claim_rec.claim_id);
2980: DBMS_SQL.column_value_char(l_claim_csr_id, 2, l_claim_rec.claim_number);
2981: DBMS_SQL.column_value(l_claim_csr_id, 3, l_claim_rec.object_version_number);
2982: DBMS_SQL.column_value_char(l_claim_csr_id, 4, l_claim_rec.claim_class);
2983: DBMS_SQL.column_value(l_claim_csr_id, 5, l_claim_rec.amount_remaining);
2984: DBMS_SQL.column_value(l_claim_csr_id, 6, l_claim_rec.amount_settled);
2985: DBMS_SQL.column_value(l_claim_csr_id, 7, l_claim_rec.source_object_id);
2978:
2979: DBMS_SQL.column_value(l_claim_csr_id, 1, l_claim_rec.claim_id);
2980: DBMS_SQL.column_value_char(l_claim_csr_id, 2, l_claim_rec.claim_number);
2981: DBMS_SQL.column_value(l_claim_csr_id, 3, l_claim_rec.object_version_number);
2982: DBMS_SQL.column_value_char(l_claim_csr_id, 4, l_claim_rec.claim_class);
2983: DBMS_SQL.column_value(l_claim_csr_id, 5, l_claim_rec.amount_remaining);
2984: DBMS_SQL.column_value(l_claim_csr_id, 6, l_claim_rec.amount_settled);
2985: DBMS_SQL.column_value(l_claim_csr_id, 7, l_claim_rec.source_object_id);
2986: DBMS_SQL.column_value_char(l_claim_csr_id, 8, l_claim_rec.payment_method);
2979: DBMS_SQL.column_value(l_claim_csr_id, 1, l_claim_rec.claim_id);
2980: DBMS_SQL.column_value_char(l_claim_csr_id, 2, l_claim_rec.claim_number);
2981: DBMS_SQL.column_value(l_claim_csr_id, 3, l_claim_rec.object_version_number);
2982: DBMS_SQL.column_value_char(l_claim_csr_id, 4, l_claim_rec.claim_class);
2983: DBMS_SQL.column_value(l_claim_csr_id, 5, l_claim_rec.amount_remaining);
2984: DBMS_SQL.column_value(l_claim_csr_id, 6, l_claim_rec.amount_settled);
2985: DBMS_SQL.column_value(l_claim_csr_id, 7, l_claim_rec.source_object_id);
2986: DBMS_SQL.column_value_char(l_claim_csr_id, 8, l_claim_rec.payment_method);
2987:
2980: DBMS_SQL.column_value_char(l_claim_csr_id, 2, l_claim_rec.claim_number);
2981: DBMS_SQL.column_value(l_claim_csr_id, 3, l_claim_rec.object_version_number);
2982: DBMS_SQL.column_value_char(l_claim_csr_id, 4, l_claim_rec.claim_class);
2983: DBMS_SQL.column_value(l_claim_csr_id, 5, l_claim_rec.amount_remaining);
2984: DBMS_SQL.column_value(l_claim_csr_id, 6, l_claim_rec.amount_settled);
2985: DBMS_SQL.column_value(l_claim_csr_id, 7, l_claim_rec.source_object_id);
2986: DBMS_SQL.column_value_char(l_claim_csr_id, 8, l_claim_rec.payment_method);
2987:
2988: l_claim_rma_fetch(l_counter).claim_id := l_claim_rec.claim_id;
2981: DBMS_SQL.column_value(l_claim_csr_id, 3, l_claim_rec.object_version_number);
2982: DBMS_SQL.column_value_char(l_claim_csr_id, 4, l_claim_rec.claim_class);
2983: DBMS_SQL.column_value(l_claim_csr_id, 5, l_claim_rec.amount_remaining);
2984: DBMS_SQL.column_value(l_claim_csr_id, 6, l_claim_rec.amount_settled);
2985: DBMS_SQL.column_value(l_claim_csr_id, 7, l_claim_rec.source_object_id);
2986: DBMS_SQL.column_value_char(l_claim_csr_id, 8, l_claim_rec.payment_method);
2987:
2988: l_claim_rma_fetch(l_counter).claim_id := l_claim_rec.claim_id;
2989: l_claim_rma_fetch(l_counter).claim_number := RTRIM(l_claim_rec.claim_number, ' ');
2982: DBMS_SQL.column_value_char(l_claim_csr_id, 4, l_claim_rec.claim_class);
2983: DBMS_SQL.column_value(l_claim_csr_id, 5, l_claim_rec.amount_remaining);
2984: DBMS_SQL.column_value(l_claim_csr_id, 6, l_claim_rec.amount_settled);
2985: DBMS_SQL.column_value(l_claim_csr_id, 7, l_claim_rec.source_object_id);
2986: DBMS_SQL.column_value_char(l_claim_csr_id, 8, l_claim_rec.payment_method);
2987:
2988: l_claim_rma_fetch(l_counter).claim_id := l_claim_rec.claim_id;
2989: l_claim_rma_fetch(l_counter).claim_number := RTRIM(l_claim_rec.claim_number, ' ');
2990: l_claim_rma_fetch(l_counter).object_version_number := l_claim_rec.object_version_number;
2998: EXIT;
2999: END IF;
3000: l_counter := l_counter + 1;
3001: END LOOP;
3002: DBMS_SQL.close_cursor(l_claim_csr_id);
3003:
3004: IF l_claim_rma_fetch.count > 0 THEN
3005: FOR i IN 1..l_claim_rma_fetch.count LOOP
3006: FND_MSG_PUB.initialize;
3160: ,p_reason_code_id => p_reason_code_id
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);
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);
3173: DBMS_SQL.define_column(l_claim_csr_id, 1, l_claim_rec.claim_id);
3174: DBMS_SQL.define_column_char(l_claim_csr_id, 2, l_claim_rec.claim_number, 30);
3175: DBMS_SQL.define_column(l_claim_csr_id, 3, l_claim_rec.object_version_number);
3176: DBMS_SQL.define_column_char(l_claim_csr_id, 4, l_claim_rec.claim_class, 30);
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);
3173: DBMS_SQL.define_column(l_claim_csr_id, 1, l_claim_rec.claim_id);
3174: DBMS_SQL.define_column_char(l_claim_csr_id, 2, l_claim_rec.claim_number, 30);
3175: DBMS_SQL.define_column(l_claim_csr_id, 3, l_claim_rec.object_version_number);
3176: DBMS_SQL.define_column_char(l_claim_csr_id, 4, l_claim_rec.claim_class, 30);
3177: DBMS_SQL.define_column(l_claim_csr_id, 5, l_claim_rec.amount_remaining);
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);
3173: DBMS_SQL.define_column(l_claim_csr_id, 1, l_claim_rec.claim_id);
3174: DBMS_SQL.define_column_char(l_claim_csr_id, 2, l_claim_rec.claim_number, 30);
3175: DBMS_SQL.define_column(l_claim_csr_id, 3, l_claim_rec.object_version_number);
3176: DBMS_SQL.define_column_char(l_claim_csr_id, 4, l_claim_rec.claim_class, 30);
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);
3171:
3172: DBMS_SQL.parse(l_claim_csr_id, l_claim_csr_stmt, DBMS_SQL.native);
3173: DBMS_SQL.define_column(l_claim_csr_id, 1, l_claim_rec.claim_id);
3174: DBMS_SQL.define_column_char(l_claim_csr_id, 2, l_claim_rec.claim_number, 30);
3175: DBMS_SQL.define_column(l_claim_csr_id, 3, l_claim_rec.object_version_number);
3176: DBMS_SQL.define_column_char(l_claim_csr_id, 4, l_claim_rec.claim_class, 30);
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);
3172: DBMS_SQL.parse(l_claim_csr_id, l_claim_csr_stmt, DBMS_SQL.native);
3173: DBMS_SQL.define_column(l_claim_csr_id, 1, l_claim_rec.claim_id);
3174: DBMS_SQL.define_column_char(l_claim_csr_id, 2, l_claim_rec.claim_number, 30);
3175: DBMS_SQL.define_column(l_claim_csr_id, 3, l_claim_rec.object_version_number);
3176: DBMS_SQL.define_column_char(l_claim_csr_id, 4, l_claim_rec.claim_class, 30);
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);
3173: DBMS_SQL.define_column(l_claim_csr_id, 1, l_claim_rec.claim_id);
3174: DBMS_SQL.define_column_char(l_claim_csr_id, 2, l_claim_rec.claim_number, 30);
3175: DBMS_SQL.define_column(l_claim_csr_id, 3, l_claim_rec.object_version_number);
3176: DBMS_SQL.define_column_char(l_claim_csr_id, 4, l_claim_rec.claim_class, 30);
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;
3174: DBMS_SQL.define_column_char(l_claim_csr_id, 2, l_claim_rec.claim_number, 30);
3175: DBMS_SQL.define_column(l_claim_csr_id, 3, l_claim_rec.object_version_number);
3176: DBMS_SQL.define_column_char(l_claim_csr_id, 4, l_claim_rec.claim_class, 30);
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);
3175: DBMS_SQL.define_column(l_claim_csr_id, 3, l_claim_rec.object_version_number);
3176: DBMS_SQL.define_column_char(l_claim_csr_id, 4, l_claim_rec.claim_class, 30);
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:
3176: DBMS_SQL.define_column_char(l_claim_csr_id, 4, l_claim_rec.claim_class, 30);
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;
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
3186: IF DBMS_SQL.fetch_rows(l_claim_csr_id) > 0 THEN
3182: l_claim_num_rows := DBMS_SQL.execute(l_claim_csr_id);
3183:
3184: l_counter := 1;
3185: LOOP
3186: IF DBMS_SQL.fetch_rows(l_claim_csr_id) > 0 THEN
3187:
3188: DBMS_SQL.column_value(l_claim_csr_id, 1, l_claim_rec.claim_id);
3189: DBMS_SQL.column_value_char(l_claim_csr_id, 2, l_claim_rec.claim_number);
3190: DBMS_SQL.column_value(l_claim_csr_id, 3, l_claim_rec.object_version_number);
3184: l_counter := 1;
3185: LOOP
3186: IF DBMS_SQL.fetch_rows(l_claim_csr_id) > 0 THEN
3187:
3188: DBMS_SQL.column_value(l_claim_csr_id, 1, l_claim_rec.claim_id);
3189: DBMS_SQL.column_value_char(l_claim_csr_id, 2, l_claim_rec.claim_number);
3190: DBMS_SQL.column_value(l_claim_csr_id, 3, l_claim_rec.object_version_number);
3191: DBMS_SQL.column_value_char(l_claim_csr_id, 4, l_claim_rec.claim_class);
3192: DBMS_SQL.column_value(l_claim_csr_id, 5, l_claim_rec.amount_remaining);
3185: LOOP
3186: IF DBMS_SQL.fetch_rows(l_claim_csr_id) > 0 THEN
3187:
3188: DBMS_SQL.column_value(l_claim_csr_id, 1, l_claim_rec.claim_id);
3189: DBMS_SQL.column_value_char(l_claim_csr_id, 2, l_claim_rec.claim_number);
3190: DBMS_SQL.column_value(l_claim_csr_id, 3, l_claim_rec.object_version_number);
3191: DBMS_SQL.column_value_char(l_claim_csr_id, 4, l_claim_rec.claim_class);
3192: DBMS_SQL.column_value(l_claim_csr_id, 5, l_claim_rec.amount_remaining);
3193: DBMS_SQL.column_value(l_claim_csr_id, 6, l_claim_rec.amount_settled);
3186: IF DBMS_SQL.fetch_rows(l_claim_csr_id) > 0 THEN
3187:
3188: DBMS_SQL.column_value(l_claim_csr_id, 1, l_claim_rec.claim_id);
3189: DBMS_SQL.column_value_char(l_claim_csr_id, 2, l_claim_rec.claim_number);
3190: DBMS_SQL.column_value(l_claim_csr_id, 3, l_claim_rec.object_version_number);
3191: DBMS_SQL.column_value_char(l_claim_csr_id, 4, l_claim_rec.claim_class);
3192: DBMS_SQL.column_value(l_claim_csr_id, 5, l_claim_rec.amount_remaining);
3193: DBMS_SQL.column_value(l_claim_csr_id, 6, l_claim_rec.amount_settled);
3194: DBMS_SQL.column_value(l_claim_csr_id, 7, l_claim_rec.source_object_id);
3187:
3188: DBMS_SQL.column_value(l_claim_csr_id, 1, l_claim_rec.claim_id);
3189: DBMS_SQL.column_value_char(l_claim_csr_id, 2, l_claim_rec.claim_number);
3190: DBMS_SQL.column_value(l_claim_csr_id, 3, l_claim_rec.object_version_number);
3191: DBMS_SQL.column_value_char(l_claim_csr_id, 4, l_claim_rec.claim_class);
3192: DBMS_SQL.column_value(l_claim_csr_id, 5, l_claim_rec.amount_remaining);
3193: DBMS_SQL.column_value(l_claim_csr_id, 6, l_claim_rec.amount_settled);
3194: DBMS_SQL.column_value(l_claim_csr_id, 7, l_claim_rec.source_object_id);
3195: DBMS_SQL.column_value_char(l_claim_csr_id, 8, l_claim_rec.payment_method);
3188: DBMS_SQL.column_value(l_claim_csr_id, 1, l_claim_rec.claim_id);
3189: DBMS_SQL.column_value_char(l_claim_csr_id, 2, l_claim_rec.claim_number);
3190: DBMS_SQL.column_value(l_claim_csr_id, 3, l_claim_rec.object_version_number);
3191: DBMS_SQL.column_value_char(l_claim_csr_id, 4, l_claim_rec.claim_class);
3192: DBMS_SQL.column_value(l_claim_csr_id, 5, l_claim_rec.amount_remaining);
3193: DBMS_SQL.column_value(l_claim_csr_id, 6, l_claim_rec.amount_settled);
3194: DBMS_SQL.column_value(l_claim_csr_id, 7, l_claim_rec.source_object_id);
3195: DBMS_SQL.column_value_char(l_claim_csr_id, 8, l_claim_rec.payment_method);
3196:
3189: DBMS_SQL.column_value_char(l_claim_csr_id, 2, l_claim_rec.claim_number);
3190: DBMS_SQL.column_value(l_claim_csr_id, 3, l_claim_rec.object_version_number);
3191: DBMS_SQL.column_value_char(l_claim_csr_id, 4, l_claim_rec.claim_class);
3192: DBMS_SQL.column_value(l_claim_csr_id, 5, l_claim_rec.amount_remaining);
3193: DBMS_SQL.column_value(l_claim_csr_id, 6, l_claim_rec.amount_settled);
3194: DBMS_SQL.column_value(l_claim_csr_id, 7, l_claim_rec.source_object_id);
3195: DBMS_SQL.column_value_char(l_claim_csr_id, 8, l_claim_rec.payment_method);
3196:
3197: l_claim_rma_setl(l_counter).claim_id := l_claim_rec.claim_id;
3190: DBMS_SQL.column_value(l_claim_csr_id, 3, l_claim_rec.object_version_number);
3191: DBMS_SQL.column_value_char(l_claim_csr_id, 4, l_claim_rec.claim_class);
3192: DBMS_SQL.column_value(l_claim_csr_id, 5, l_claim_rec.amount_remaining);
3193: DBMS_SQL.column_value(l_claim_csr_id, 6, l_claim_rec.amount_settled);
3194: DBMS_SQL.column_value(l_claim_csr_id, 7, l_claim_rec.source_object_id);
3195: DBMS_SQL.column_value_char(l_claim_csr_id, 8, l_claim_rec.payment_method);
3196:
3197: l_claim_rma_setl(l_counter).claim_id := l_claim_rec.claim_id;
3198: l_claim_rma_setl(l_counter).claim_number := RTRIM(l_claim_rec.claim_number, ' ');
3191: DBMS_SQL.column_value_char(l_claim_csr_id, 4, l_claim_rec.claim_class);
3192: DBMS_SQL.column_value(l_claim_csr_id, 5, l_claim_rec.amount_remaining);
3193: DBMS_SQL.column_value(l_claim_csr_id, 6, l_claim_rec.amount_settled);
3194: DBMS_SQL.column_value(l_claim_csr_id, 7, l_claim_rec.source_object_id);
3195: DBMS_SQL.column_value_char(l_claim_csr_id, 8, l_claim_rec.payment_method);
3196:
3197: l_claim_rma_setl(l_counter).claim_id := l_claim_rec.claim_id;
3198: l_claim_rma_setl(l_counter).claim_number := RTRIM(l_claim_rec.claim_number, ' ');
3199: l_claim_rma_setl(l_counter).object_version_number := l_claim_rec.object_version_number;
3207: EXIT;
3208: END IF;
3209: l_counter := l_counter + 1;
3210: END LOOP;
3211: DBMS_SQL.close_cursor(l_claim_csr_id);
3212:
3213: IF l_claim_rma_setl.count > 0 THEN
3214: FOR i IN 1..l_claim_rma_setl.count LOOP
3215: FND_MSG_PUB.initialize;
3472: ,p_reason_code_id => p_reason_code_id
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);
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);
3485: DBMS_SQL.define_column(l_claim_csr_id, 1, l_claim_rec.claim_id);
3486: DBMS_SQL.define_column_char(l_claim_csr_id, 2, l_claim_rec.claim_number, 30);
3487: DBMS_SQL.define_column(l_claim_csr_id, 3, l_claim_rec.object_version_number);
3488: DBMS_SQL.define_column_char(l_claim_csr_id, 4, l_claim_rec.claim_class, 30);
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);
3485: DBMS_SQL.define_column(l_claim_csr_id, 1, l_claim_rec.claim_id);
3486: DBMS_SQL.define_column_char(l_claim_csr_id, 2, l_claim_rec.claim_number, 30);
3487: DBMS_SQL.define_column(l_claim_csr_id, 3, l_claim_rec.object_version_number);
3488: DBMS_SQL.define_column_char(l_claim_csr_id, 4, l_claim_rec.claim_class, 30);
3489: DBMS_SQL.define_column(l_claim_csr_id, 5, l_claim_rec.amount_remaining);
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);
3485: DBMS_SQL.define_column(l_claim_csr_id, 1, l_claim_rec.claim_id);
3486: DBMS_SQL.define_column_char(l_claim_csr_id, 2, l_claim_rec.claim_number, 30);
3487: DBMS_SQL.define_column(l_claim_csr_id, 3, l_claim_rec.object_version_number);
3488: DBMS_SQL.define_column_char(l_claim_csr_id, 4, l_claim_rec.claim_class, 30);
3489: DBMS_SQL.define_column(l_claim_csr_id, 5, l_claim_rec.amount_remaining);
3490: DBMS_SQL.define_column(l_claim_csr_id, 6, l_claim_rec.amount_settled);
3483:
3484: DBMS_SQL.parse(l_claim_csr_id, l_claim_csr_stmt, DBMS_SQL.native);
3485: DBMS_SQL.define_column(l_claim_csr_id, 1, l_claim_rec.claim_id);
3486: DBMS_SQL.define_column_char(l_claim_csr_id, 2, l_claim_rec.claim_number, 30);
3487: DBMS_SQL.define_column(l_claim_csr_id, 3, l_claim_rec.object_version_number);
3488: DBMS_SQL.define_column_char(l_claim_csr_id, 4, l_claim_rec.claim_class, 30);
3489: DBMS_SQL.define_column(l_claim_csr_id, 5, l_claim_rec.amount_remaining);
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);
3484: DBMS_SQL.parse(l_claim_csr_id, l_claim_csr_stmt, DBMS_SQL.native);
3485: DBMS_SQL.define_column(l_claim_csr_id, 1, l_claim_rec.claim_id);
3486: DBMS_SQL.define_column_char(l_claim_csr_id, 2, l_claim_rec.claim_number, 30);
3487: DBMS_SQL.define_column(l_claim_csr_id, 3, l_claim_rec.object_version_number);
3488: DBMS_SQL.define_column_char(l_claim_csr_id, 4, l_claim_rec.claim_class, 30);
3489: DBMS_SQL.define_column(l_claim_csr_id, 5, l_claim_rec.amount_remaining);
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);
3485: DBMS_SQL.define_column(l_claim_csr_id, 1, l_claim_rec.claim_id);
3486: DBMS_SQL.define_column_char(l_claim_csr_id, 2, l_claim_rec.claim_number, 30);
3487: DBMS_SQL.define_column(l_claim_csr_id, 3, l_claim_rec.object_version_number);
3488: DBMS_SQL.define_column_char(l_claim_csr_id, 4, l_claim_rec.claim_class, 30);
3489: DBMS_SQL.define_column(l_claim_csr_id, 5, l_claim_rec.amount_remaining);
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:
3486: DBMS_SQL.define_column_char(l_claim_csr_id, 2, l_claim_rec.claim_number, 30);
3487: DBMS_SQL.define_column(l_claim_csr_id, 3, l_claim_rec.object_version_number);
3488: DBMS_SQL.define_column_char(l_claim_csr_id, 4, l_claim_rec.claim_class, 30);
3489: DBMS_SQL.define_column(l_claim_csr_id, 5, l_claim_rec.amount_remaining);
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;
3487: DBMS_SQL.define_column(l_claim_csr_id, 3, l_claim_rec.object_version_number);
3488: DBMS_SQL.define_column_char(l_claim_csr_id, 4, l_claim_rec.claim_class, 30);
3489: DBMS_SQL.define_column(l_claim_csr_id, 5, l_claim_rec.amount_remaining);
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);
3488: DBMS_SQL.define_column_char(l_claim_csr_id, 4, l_claim_rec.claim_class, 30);
3489: DBMS_SQL.define_column(l_claim_csr_id, 5, l_claim_rec.amount_remaining);
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:
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
3499: IF DBMS_SQL.fetch_rows(l_claim_csr_id) > 0 THEN
3495: l_claim_num_rows := DBMS_SQL.execute(l_claim_csr_id);
3496:
3497: l_counter := 1;
3498: LOOP
3499: IF DBMS_SQL.fetch_rows(l_claim_csr_id) > 0 THEN
3500:
3501: DBMS_SQL.column_value(l_claim_csr_id, 1, l_claim_rec.claim_id);
3502: DBMS_SQL.column_value_char(l_claim_csr_id, 2, l_claim_rec.claim_number);
3503: DBMS_SQL.column_value(l_claim_csr_id, 3, l_claim_rec.object_version_number);
3497: l_counter := 1;
3498: LOOP
3499: IF DBMS_SQL.fetch_rows(l_claim_csr_id) > 0 THEN
3500:
3501: DBMS_SQL.column_value(l_claim_csr_id, 1, l_claim_rec.claim_id);
3502: DBMS_SQL.column_value_char(l_claim_csr_id, 2, l_claim_rec.claim_number);
3503: DBMS_SQL.column_value(l_claim_csr_id, 3, l_claim_rec.object_version_number);
3504: DBMS_SQL.column_value_char(l_claim_csr_id, 4, l_claim_rec.claim_class);
3505: DBMS_SQL.column_value(l_claim_csr_id, 5, l_claim_rec.amount_remaining);
3498: LOOP
3499: IF DBMS_SQL.fetch_rows(l_claim_csr_id) > 0 THEN
3500:
3501: DBMS_SQL.column_value(l_claim_csr_id, 1, l_claim_rec.claim_id);
3502: DBMS_SQL.column_value_char(l_claim_csr_id, 2, l_claim_rec.claim_number);
3503: DBMS_SQL.column_value(l_claim_csr_id, 3, l_claim_rec.object_version_number);
3504: DBMS_SQL.column_value_char(l_claim_csr_id, 4, l_claim_rec.claim_class);
3505: DBMS_SQL.column_value(l_claim_csr_id, 5, l_claim_rec.amount_remaining);
3506: DBMS_SQL.column_value(l_claim_csr_id, 6, l_claim_rec.amount_settled);
3499: IF DBMS_SQL.fetch_rows(l_claim_csr_id) > 0 THEN
3500:
3501: DBMS_SQL.column_value(l_claim_csr_id, 1, l_claim_rec.claim_id);
3502: DBMS_SQL.column_value_char(l_claim_csr_id, 2, l_claim_rec.claim_number);
3503: DBMS_SQL.column_value(l_claim_csr_id, 3, l_claim_rec.object_version_number);
3504: DBMS_SQL.column_value_char(l_claim_csr_id, 4, l_claim_rec.claim_class);
3505: DBMS_SQL.column_value(l_claim_csr_id, 5, l_claim_rec.amount_remaining);
3506: DBMS_SQL.column_value(l_claim_csr_id, 6, l_claim_rec.amount_settled);
3507: DBMS_SQL.column_value(l_claim_csr_id, 7, l_claim_rec.source_object_id);
3500:
3501: DBMS_SQL.column_value(l_claim_csr_id, 1, l_claim_rec.claim_id);
3502: DBMS_SQL.column_value_char(l_claim_csr_id, 2, l_claim_rec.claim_number);
3503: DBMS_SQL.column_value(l_claim_csr_id, 3, l_claim_rec.object_version_number);
3504: DBMS_SQL.column_value_char(l_claim_csr_id, 4, l_claim_rec.claim_class);
3505: DBMS_SQL.column_value(l_claim_csr_id, 5, l_claim_rec.amount_remaining);
3506: DBMS_SQL.column_value(l_claim_csr_id, 6, l_claim_rec.amount_settled);
3507: DBMS_SQL.column_value(l_claim_csr_id, 7, l_claim_rec.source_object_id);
3508: DBMS_SQL.column_value_char(l_claim_csr_id, 8, l_claim_rec.payment_method);
3501: DBMS_SQL.column_value(l_claim_csr_id, 1, l_claim_rec.claim_id);
3502: DBMS_SQL.column_value_char(l_claim_csr_id, 2, l_claim_rec.claim_number);
3503: DBMS_SQL.column_value(l_claim_csr_id, 3, l_claim_rec.object_version_number);
3504: DBMS_SQL.column_value_char(l_claim_csr_id, 4, l_claim_rec.claim_class);
3505: DBMS_SQL.column_value(l_claim_csr_id, 5, l_claim_rec.amount_remaining);
3506: DBMS_SQL.column_value(l_claim_csr_id, 6, l_claim_rec.amount_settled);
3507: DBMS_SQL.column_value(l_claim_csr_id, 7, l_claim_rec.source_object_id);
3508: DBMS_SQL.column_value_char(l_claim_csr_id, 8, l_claim_rec.payment_method);
3509:
3502: DBMS_SQL.column_value_char(l_claim_csr_id, 2, l_claim_rec.claim_number);
3503: DBMS_SQL.column_value(l_claim_csr_id, 3, l_claim_rec.object_version_number);
3504: DBMS_SQL.column_value_char(l_claim_csr_id, 4, l_claim_rec.claim_class);
3505: DBMS_SQL.column_value(l_claim_csr_id, 5, l_claim_rec.amount_remaining);
3506: DBMS_SQL.column_value(l_claim_csr_id, 6, l_claim_rec.amount_settled);
3507: DBMS_SQL.column_value(l_claim_csr_id, 7, l_claim_rec.source_object_id);
3508: DBMS_SQL.column_value_char(l_claim_csr_id, 8, l_claim_rec.payment_method);
3509:
3510: l_claim_id_ver(l_counter).claim_id := l_claim_rec.claim_id;
3503: DBMS_SQL.column_value(l_claim_csr_id, 3, l_claim_rec.object_version_number);
3504: DBMS_SQL.column_value_char(l_claim_csr_id, 4, l_claim_rec.claim_class);
3505: DBMS_SQL.column_value(l_claim_csr_id, 5, l_claim_rec.amount_remaining);
3506: DBMS_SQL.column_value(l_claim_csr_id, 6, l_claim_rec.amount_settled);
3507: DBMS_SQL.column_value(l_claim_csr_id, 7, l_claim_rec.source_object_id);
3508: DBMS_SQL.column_value_char(l_claim_csr_id, 8, l_claim_rec.payment_method);
3509:
3510: l_claim_id_ver(l_counter).claim_id := l_claim_rec.claim_id;
3511: l_claim_id_ver(l_counter).claim_number := RTRIM(l_claim_rec.claim_number, ' ');
3504: DBMS_SQL.column_value_char(l_claim_csr_id, 4, l_claim_rec.claim_class);
3505: DBMS_SQL.column_value(l_claim_csr_id, 5, l_claim_rec.amount_remaining);
3506: DBMS_SQL.column_value(l_claim_csr_id, 6, l_claim_rec.amount_settled);
3507: DBMS_SQL.column_value(l_claim_csr_id, 7, l_claim_rec.source_object_id);
3508: DBMS_SQL.column_value_char(l_claim_csr_id, 8, l_claim_rec.payment_method);
3509:
3510: l_claim_id_ver(l_counter).claim_id := l_claim_rec.claim_id;
3511: l_claim_id_ver(l_counter).claim_number := RTRIM(l_claim_rec.claim_number, ' ');
3512: l_claim_id_ver(l_counter).object_version_number := l_claim_rec.object_version_number;
3520: EXIT;
3521: END IF;
3522: l_counter := l_counter + 1;
3523: END LOOP;
3524: DBMS_SQL.close_cursor(l_claim_csr_id);
3525:
3526:
3527: IF l_claim_id_ver.count > 0 THEN
3528: FOR i IN 1..l_claim_id_ver.count LOOP
4136: ,p_reason_code_id => p_reason_code_id
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);
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);
4149: DBMS_SQL.define_column(l_claim_csr_id, 1, l_claim_rec.claim_id);
4150: DBMS_SQL.define_column_char(l_claim_csr_id, 2, l_claim_rec.claim_number, 30);
4151: DBMS_SQL.define_column(l_claim_csr_id, 3, l_claim_rec.object_version_number);
4152: DBMS_SQL.define_column_char(l_claim_csr_id, 4, l_claim_rec.claim_class, 30);
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);
4149: DBMS_SQL.define_column(l_claim_csr_id, 1, l_claim_rec.claim_id);
4150: DBMS_SQL.define_column_char(l_claim_csr_id, 2, l_claim_rec.claim_number, 30);
4151: DBMS_SQL.define_column(l_claim_csr_id, 3, l_claim_rec.object_version_number);
4152: DBMS_SQL.define_column_char(l_claim_csr_id, 4, l_claim_rec.claim_class, 30);
4153: DBMS_SQL.define_column(l_claim_csr_id, 5, l_claim_rec.amount_remaining);
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);
4149: DBMS_SQL.define_column(l_claim_csr_id, 1, l_claim_rec.claim_id);
4150: DBMS_SQL.define_column_char(l_claim_csr_id, 2, l_claim_rec.claim_number, 30);
4151: DBMS_SQL.define_column(l_claim_csr_id, 3, l_claim_rec.object_version_number);
4152: DBMS_SQL.define_column_char(l_claim_csr_id, 4, l_claim_rec.claim_class, 30);
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);
4147:
4148: DBMS_SQL.parse(l_claim_csr_id, l_claim_csr_stmt, DBMS_SQL.native);
4149: DBMS_SQL.define_column(l_claim_csr_id, 1, l_claim_rec.claim_id);
4150: DBMS_SQL.define_column_char(l_claim_csr_id, 2, l_claim_rec.claim_number, 30);
4151: DBMS_SQL.define_column(l_claim_csr_id, 3, l_claim_rec.object_version_number);
4152: DBMS_SQL.define_column_char(l_claim_csr_id, 4, l_claim_rec.claim_class, 30);
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);
4148: DBMS_SQL.parse(l_claim_csr_id, l_claim_csr_stmt, DBMS_SQL.native);
4149: DBMS_SQL.define_column(l_claim_csr_id, 1, l_claim_rec.claim_id);
4150: DBMS_SQL.define_column_char(l_claim_csr_id, 2, l_claim_rec.claim_number, 30);
4151: DBMS_SQL.define_column(l_claim_csr_id, 3, l_claim_rec.object_version_number);
4152: DBMS_SQL.define_column_char(l_claim_csr_id, 4, l_claim_rec.claim_class, 30);
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);
4149: DBMS_SQL.define_column(l_claim_csr_id, 1, l_claim_rec.claim_id);
4150: DBMS_SQL.define_column_char(l_claim_csr_id, 2, l_claim_rec.claim_number, 30);
4151: DBMS_SQL.define_column(l_claim_csr_id, 3, l_claim_rec.object_version_number);
4152: DBMS_SQL.define_column_char(l_claim_csr_id, 4, l_claim_rec.claim_class, 30);
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;
4150: DBMS_SQL.define_column_char(l_claim_csr_id, 2, l_claim_rec.claim_number, 30);
4151: DBMS_SQL.define_column(l_claim_csr_id, 3, l_claim_rec.object_version_number);
4152: DBMS_SQL.define_column_char(l_claim_csr_id, 4, l_claim_rec.claim_class, 30);
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);
4151: DBMS_SQL.define_column(l_claim_csr_id, 3, l_claim_rec.object_version_number);
4152: DBMS_SQL.define_column_char(l_claim_csr_id, 4, l_claim_rec.claim_class, 30);
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:
4152: DBMS_SQL.define_column_char(l_claim_csr_id, 4, l_claim_rec.claim_class, 30);
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;
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
4162: IF DBMS_SQL.fetch_rows(l_claim_csr_id) > 0 THEN
4158: l_claim_num_rows := DBMS_SQL.execute(l_claim_csr_id);
4159:
4160: l_counter := 1;
4161: LOOP
4162: IF DBMS_SQL.fetch_rows(l_claim_csr_id) > 0 THEN
4163:
4164: DBMS_SQL.column_value(l_claim_csr_id, 1, l_claim_rec.claim_id);
4165: DBMS_SQL.column_value_char(l_claim_csr_id, 2, l_claim_rec.claim_number);
4166: DBMS_SQL.column_value(l_claim_csr_id, 3, l_claim_rec.object_version_number);
4160: l_counter := 1;
4161: LOOP
4162: IF DBMS_SQL.fetch_rows(l_claim_csr_id) > 0 THEN
4163:
4164: DBMS_SQL.column_value(l_claim_csr_id, 1, l_claim_rec.claim_id);
4165: DBMS_SQL.column_value_char(l_claim_csr_id, 2, l_claim_rec.claim_number);
4166: DBMS_SQL.column_value(l_claim_csr_id, 3, l_claim_rec.object_version_number);
4167: DBMS_SQL.column_value_char(l_claim_csr_id, 4, l_claim_rec.claim_class);
4168: DBMS_SQL.column_value(l_claim_csr_id, 5, l_claim_rec.amount_remaining);
4161: LOOP
4162: IF DBMS_SQL.fetch_rows(l_claim_csr_id) > 0 THEN
4163:
4164: DBMS_SQL.column_value(l_claim_csr_id, 1, l_claim_rec.claim_id);
4165: DBMS_SQL.column_value_char(l_claim_csr_id, 2, l_claim_rec.claim_number);
4166: DBMS_SQL.column_value(l_claim_csr_id, 3, l_claim_rec.object_version_number);
4167: DBMS_SQL.column_value_char(l_claim_csr_id, 4, l_claim_rec.claim_class);
4168: DBMS_SQL.column_value(l_claim_csr_id, 5, l_claim_rec.amount_remaining);
4169: DBMS_SQL.column_value(l_claim_csr_id, 6, l_claim_rec.amount_settled);
4162: IF DBMS_SQL.fetch_rows(l_claim_csr_id) > 0 THEN
4163:
4164: DBMS_SQL.column_value(l_claim_csr_id, 1, l_claim_rec.claim_id);
4165: DBMS_SQL.column_value_char(l_claim_csr_id, 2, l_claim_rec.claim_number);
4166: DBMS_SQL.column_value(l_claim_csr_id, 3, l_claim_rec.object_version_number);
4167: DBMS_SQL.column_value_char(l_claim_csr_id, 4, l_claim_rec.claim_class);
4168: DBMS_SQL.column_value(l_claim_csr_id, 5, l_claim_rec.amount_remaining);
4169: DBMS_SQL.column_value(l_claim_csr_id, 6, l_claim_rec.amount_settled);
4170: DBMS_SQL.column_value(l_claim_csr_id, 7, l_claim_rec.source_object_id);
4163:
4164: DBMS_SQL.column_value(l_claim_csr_id, 1, l_claim_rec.claim_id);
4165: DBMS_SQL.column_value_char(l_claim_csr_id, 2, l_claim_rec.claim_number);
4166: DBMS_SQL.column_value(l_claim_csr_id, 3, l_claim_rec.object_version_number);
4167: DBMS_SQL.column_value_char(l_claim_csr_id, 4, l_claim_rec.claim_class);
4168: DBMS_SQL.column_value(l_claim_csr_id, 5, l_claim_rec.amount_remaining);
4169: DBMS_SQL.column_value(l_claim_csr_id, 6, l_claim_rec.amount_settled);
4170: DBMS_SQL.column_value(l_claim_csr_id, 7, l_claim_rec.source_object_id);
4171: DBMS_SQL.column_value_char(l_claim_csr_id, 8, l_claim_rec.payment_method);
4164: DBMS_SQL.column_value(l_claim_csr_id, 1, l_claim_rec.claim_id);
4165: DBMS_SQL.column_value_char(l_claim_csr_id, 2, l_claim_rec.claim_number);
4166: DBMS_SQL.column_value(l_claim_csr_id, 3, l_claim_rec.object_version_number);
4167: DBMS_SQL.column_value_char(l_claim_csr_id, 4, l_claim_rec.claim_class);
4168: DBMS_SQL.column_value(l_claim_csr_id, 5, l_claim_rec.amount_remaining);
4169: DBMS_SQL.column_value(l_claim_csr_id, 6, l_claim_rec.amount_settled);
4170: DBMS_SQL.column_value(l_claim_csr_id, 7, l_claim_rec.source_object_id);
4171: DBMS_SQL.column_value_char(l_claim_csr_id, 8, l_claim_rec.payment_method);
4172:
4165: DBMS_SQL.column_value_char(l_claim_csr_id, 2, l_claim_rec.claim_number);
4166: DBMS_SQL.column_value(l_claim_csr_id, 3, l_claim_rec.object_version_number);
4167: DBMS_SQL.column_value_char(l_claim_csr_id, 4, l_claim_rec.claim_class);
4168: DBMS_SQL.column_value(l_claim_csr_id, 5, l_claim_rec.amount_remaining);
4169: DBMS_SQL.column_value(l_claim_csr_id, 6, l_claim_rec.amount_settled);
4170: DBMS_SQL.column_value(l_claim_csr_id, 7, l_claim_rec.source_object_id);
4171: DBMS_SQL.column_value_char(l_claim_csr_id, 8, l_claim_rec.payment_method);
4172:
4173: l_claim_id_ver(l_counter).claim_id := l_claim_rec.claim_id;
4166: DBMS_SQL.column_value(l_claim_csr_id, 3, l_claim_rec.object_version_number);
4167: DBMS_SQL.column_value_char(l_claim_csr_id, 4, l_claim_rec.claim_class);
4168: DBMS_SQL.column_value(l_claim_csr_id, 5, l_claim_rec.amount_remaining);
4169: DBMS_SQL.column_value(l_claim_csr_id, 6, l_claim_rec.amount_settled);
4170: DBMS_SQL.column_value(l_claim_csr_id, 7, l_claim_rec.source_object_id);
4171: DBMS_SQL.column_value_char(l_claim_csr_id, 8, l_claim_rec.payment_method);
4172:
4173: l_claim_id_ver(l_counter).claim_id := l_claim_rec.claim_id;
4174: l_claim_id_ver(l_counter).claim_number := RTRIM(l_claim_rec.claim_number, ' ');
4167: DBMS_SQL.column_value_char(l_claim_csr_id, 4, l_claim_rec.claim_class);
4168: DBMS_SQL.column_value(l_claim_csr_id, 5, l_claim_rec.amount_remaining);
4169: DBMS_SQL.column_value(l_claim_csr_id, 6, l_claim_rec.amount_settled);
4170: DBMS_SQL.column_value(l_claim_csr_id, 7, l_claim_rec.source_object_id);
4171: DBMS_SQL.column_value_char(l_claim_csr_id, 8, l_claim_rec.payment_method);
4172:
4173: l_claim_id_ver(l_counter).claim_id := l_claim_rec.claim_id;
4174: l_claim_id_ver(l_counter).claim_number := RTRIM(l_claim_rec.claim_number, ' ');
4175: l_claim_id_ver(l_counter).object_version_number := l_claim_rec.object_version_number;
4183: EXIT;
4184: END IF;
4185: l_counter := l_counter + 1;
4186: END LOOP;
4187: DBMS_SQL.close_cursor(l_claim_csr_id);
4188:
4189:
4190: -- Process individuals Claims
4191: FOR i IN 1..l_claim_id_ver.count LOOP