15:
16: TYPE rpt_summary_tbl_type IS TABLE OF rpt_summary_rec_type INDEX BY VARCHAR2(15);
17:
18: g_rpt_summary_tbl rpt_summary_tbl_type;
19: g_rpt_summary_tbl_counter okc_k_headers_b.currency_code%TYPE;
20:
21: TYPE error_msg_tbl_type is TABLE OF VARCHAR2(2000) INDEX BY BINARY_INTEGER;
22:
23: TYPE rpt_error_rec_type IS RECORD (
20:
21: TYPE error_msg_tbl_type is TABLE OF VARCHAR2(2000) INDEX BY BINARY_INTEGER;
22:
23: TYPE rpt_error_rec_type IS RECORD (
24: contract_number okc_k_headers_b.contract_number%TYPE
25: ,product_name okl_products.name%TYPE
26: ,interest_calc_basis fnd_lookup_values.lookup_code%TYPE
27: ,receipt_date DATE
28: ,receipt_amt NUMBER
31: TYPE rpt_error_tbl_type IS TABLE OF rpt_error_rec_type INDEX BY BINARY_INTEGER;
32: TYPE rpt_error_curr_tbl_type IS TABLE OF rpt_error_tbl_type INDEX BY VARCHAR2(15);
33:
34: g_rpt_error_curr_tbl rpt_error_curr_tbl_type;
35: g_rpt_error_curr_tbl_ctr okc_k_headers_b.currency_code%TYPE;
36: g_rpt_error_tbl_counter NUMBER := 0;
37:
38: TYPE rpt_success_rec_type IS RECORD (
39: contract_number okc_k_headers_b.contract_number%TYPE
35: g_rpt_error_curr_tbl_ctr okc_k_headers_b.currency_code%TYPE;
36: g_rpt_error_tbl_counter NUMBER := 0;
37:
38: TYPE rpt_success_rec_type IS RECORD (
39: contract_number okc_k_headers_b.contract_number%TYPE
40: ,principal_balance NUMBER
41: ,receipt_amt NUMBER
42: ,receipt_date DATE
43: ,int_start_date DATE
52: TYPE rpt_success_tbl_type IS TABLE OF rpt_success_rec_type INDEX BY BINARY_INTEGER;
53: TYPE rpt_success_curr_tbl_type IS TABLE OF rpt_success_tbl_type INDEX BY VARCHAR2(15);
54:
55: g_rpt_success_curr_tbl rpt_success_curr_tbl_type;
56: g_rpt_success_curr_tbl_ctr okc_k_headers_b.currency_code%TYPE;
57: g_rpt_success_tbl_counter NUMBER := 0;
58: --Bug# 7277007
59:
60: ---------------------------------------------------------------------------
82: -- Called By:
83: ------------------------------------------------------------------------------
84: PROCEDURE print_output(p_contract_number IN VARCHAR2) IS
85:
86: l_contract_number OKC_K_HEADERS_B.contract_number%TYPE;
87: l_print_contract_number OKC_K_HEADERS_B.contract_number%TYPE;
88: l_print_contract_number1 OKC_K_HEADERS_B.contract_number%TYPE;
89: l_print_contract_number2 OKC_K_HEADERS_B.contract_number%TYPE;
90: l_org_id OKC_K_HEADERS_B.authoring_org_id%TYPE;
83: ------------------------------------------------------------------------------
84: PROCEDURE print_output(p_contract_number IN VARCHAR2) IS
85:
86: l_contract_number OKC_K_HEADERS_B.contract_number%TYPE;
87: l_print_contract_number OKC_K_HEADERS_B.contract_number%TYPE;
88: l_print_contract_number1 OKC_K_HEADERS_B.contract_number%TYPE;
89: l_print_contract_number2 OKC_K_HEADERS_B.contract_number%TYPE;
90: l_org_id OKC_K_HEADERS_B.authoring_org_id%TYPE;
91: l_counter NUMBER;
84: PROCEDURE print_output(p_contract_number IN VARCHAR2) IS
85:
86: l_contract_number OKC_K_HEADERS_B.contract_number%TYPE;
87: l_print_contract_number OKC_K_HEADERS_B.contract_number%TYPE;
88: l_print_contract_number1 OKC_K_HEADERS_B.contract_number%TYPE;
89: l_print_contract_number2 OKC_K_HEADERS_B.contract_number%TYPE;
90: l_org_id OKC_K_HEADERS_B.authoring_org_id%TYPE;
91: l_counter NUMBER;
92:
85:
86: l_contract_number OKC_K_HEADERS_B.contract_number%TYPE;
87: l_print_contract_number OKC_K_HEADERS_B.contract_number%TYPE;
88: l_print_contract_number1 OKC_K_HEADERS_B.contract_number%TYPE;
89: l_print_contract_number2 OKC_K_HEADERS_B.contract_number%TYPE;
90: l_org_id OKC_K_HEADERS_B.authoring_org_id%TYPE;
91: l_counter NUMBER;
92:
93: CURSOR l_org_name_csr(p_org_id IN NUMBER) IS
86: l_contract_number OKC_K_HEADERS_B.contract_number%TYPE;
87: l_print_contract_number OKC_K_HEADERS_B.contract_number%TYPE;
88: l_print_contract_number1 OKC_K_HEADERS_B.contract_number%TYPE;
89: l_print_contract_number2 OKC_K_HEADERS_B.contract_number%TYPE;
90: l_org_id OKC_K_HEADERS_B.authoring_org_id%TYPE;
91: l_counter NUMBER;
92:
93: CURSOR l_org_name_csr(p_org_id IN NUMBER) IS
94: SELECT name
98: l_org_name_rec l_org_name_csr%ROWTYPE;
99: l_total_receipt_amt_error NUMBER;
100: l_total_receipt_amt_success NUMBER;
101:
102: l_currency_code OKC_K_HEADERS_B.currency_code%TYPE;
103: BEGIN
104:
105: l_org_id := MO_GLOBAL.get_current_org_id;
106: IF (l_org_id IS NOT NULL) THEN
1519: lx_msg_data VARCHAR2(450);
1520: l_msg_index_out NUMBER;
1521: lx_return_status VARCHAR(1);
1522: l_khr_id NUMBER DEFAULT NULL;
1523: l_contract_number okc_k_headers_b.contract_number%type;
1524: --dkagrawa changed the cursor to use new view okl_prod_qlty_val_uv for product quality value instead of product_parameter_v
1525: CURSOR check_contract_csr(cp_contract_number IN VARCHAR2) IS
1526: SELECT khr.id khr_id
1527: ,khr.contract_number