APPS.OKL_TRANSFER_ASSUMPTION_PVT SQL Statements

The following lines contain the word 'select', 'insert', 'update' or 'delete':

Line: 30

 PROCEDURE update_tna_creditline(
    p_api_version                  IN NUMBER
   ,p_init_msg_list                IN VARCHAR2
   ,x_return_status                OUT NOCOPY VARCHAR2
   ,x_msg_count                    OUT NOCOPY NUMBER
   ,x_msg_data                     OUT NOCOPY VARCHAR2
   ,p_chr_id                       IN  okc_k_headers_b.id%type -- contract ID
   ,p_credit_line_id               IN  okc_k_headers_b.id%type -- credit line ID
   ,p_formula_name                 IN VARCHAR2
   ,p_credit_flag                  IN BOOLEAN default false
 )
is
  l_api_name         CONSTANT VARCHAR2(30) := 'update_tna_creditline';

Line: 58

  select NVL(khr.TOT_CL_NET_TRANSFER_AMT,0)
from okl_k_headers khr
where khr.id = p_chr_id
;

Line: 66

  SAVEPOINT update_tna_creditline;

Line: 120

    okl_contract_pvt.update_contract_header(
      p_api_version         => l_api_version,
      p_init_msg_list       => p_init_msg_list,
      x_return_status       => x_return_status,
      x_msg_count           => x_msg_count,
      x_msg_data            => x_msg_data,
      p_restricted_update   => 'F',
      p_chrv_rec            => l_chrv_rec,
      p_khrv_rec            => l_khrv_rec,
      x_chrv_rec            => x_chrv_rec,
      x_khrv_rec            => x_khrv_rec);

Line: 147

    ROLLBACK TO update_tna_creditline;

Line: 154

    ROLLBACK TO update_tna_creditline;

Line: 161

	ROLLBACK TO update_tna_creditline;

Line: 173

end update_tna_creditline;

Line: 187

 PROCEDURE update_full_tna_creditline(
    p_api_version                  IN NUMBER
   ,p_init_msg_list                IN VARCHAR2
   ,x_return_status                OUT NOCOPY VARCHAR2
   ,x_msg_count                    OUT NOCOPY NUMBER
   ,x_msg_data                     OUT NOCOPY VARCHAR2
   ,p_chr_id                       IN  okc_k_headers_b.id%type
 )
is
  l_api_name         CONSTANT VARCHAR2(30) := 'update_full_tna_creditline';

Line: 207

  select chr.ORIG_SYSTEM_ID1
from okc_k_headers_b chr
where chr.id = p_chr_id
;

Line: 214

  SAVEPOINT update_full_tna_creditline;

Line: 244

         Update (add this amount as positive to OKL_K_HEADERS.TOT_CL_NET_TRANSFER_AMT)
         T and A for source contract's credit line
       END IF;

Line: 251

         Update (add this amount as negative to OKL_K_HEADERS.TOT_CL_NET_TRANSFER_AMT)
         T and A for destination contract's credit line
       END IF;

Line: 281

    update_tna_creditline(
      p_api_version    => l_api_version,
      p_init_msg_list  => p_init_msg_list,
      x_return_status  => x_return_status,
      x_msg_count      => x_msg_count,
      x_msg_data       => x_msg_data,
      p_chr_id         => p_chr_id,--l_src_chr_id, based on destination contract financed amount
      p_credit_line_id => l_src_credit_id,
      p_formula_name   => G_CONTRACT_FINANCED_AMOUNT,
      p_credit_flag    => false);

Line: 306

    update_tna_creditline(
      p_api_version    => l_api_version,
      p_init_msg_list  => p_init_msg_list,
      x_return_status  => x_return_status,
      x_msg_count      => x_msg_count,
      x_msg_data       => x_msg_data,
      p_chr_id         => p_chr_id,
      p_credit_line_id => l_dst_credit_id,
      p_formula_name   => G_CONTRACT_FINANCED_AMOUNT,
      p_credit_flag    => true);

Line: 335

    ROLLBACK TO update_full_tna_creditline;

Line: 342

    ROLLBACK TO update_full_tna_creditline;

Line: 349

	ROLLBACK TO update_full_tna_creditline;

Line: 361

end update_full_tna_creditline;

Line: 376

 PROCEDURE update_partial_tna_creditline(
    p_api_version                  IN NUMBER
   ,p_init_msg_list                IN VARCHAR2 DEFAULT OKL_API.G_FALSE
   ,x_return_status                OUT NOCOPY VARCHAR2
   ,x_msg_count                    OUT NOCOPY NUMBER
   ,x_msg_data                     OUT NOCOPY VARCHAR2
   ,p_chr_id                       IN  okc_k_headers_b.id%type
 )
is
  l_api_name         CONSTANT VARCHAR2(30) := 'update_partial_tna_creditline';

Line: 406

  select NVL(khr.TOT_CL_NET_TRANSFER_AMT,0)
from okl_k_headers khr
where khr.id = p_chr_id
;

Line: 414

  select src_cle.dnz_chr_id,
         src_cle.id cle_id
from  okc_k_lines_b src_cle,
      okc_k_lines_b cle,
      okc_line_styles_b lse
where src_cle.id = cle.ORIG_SYSTEM_ID1
and lse.id = cle.lse_id
and lse.lty_code = 'FREE_FORM1'
and cle.dnz_chr_id = p_chr_id -- destination contract ID
;

Line: 427

  SAVEPOINT update_partial_tna_creditline;

Line: 463

                 5.2.1.3 Update (add this amount as positive to OKL_K_HEADERS.TOT_CL_NET_TRANSFER_AMT) T and A for source contract's credit line
            END IF;

Line: 470

        5.3.2 Update (add this amount as negative to OKL_K_HEADERS.TOT_CL_NET_TRANSFER_AMT) T and A for destination contract's credit line
      END IF;

Line: 494

      update_tna_creditline(
        p_api_version    => l_api_version,
        p_init_msg_list  => p_init_msg_list,
        x_return_status  => x_return_status,
        x_msg_count      => x_msg_count,
        x_msg_data       => x_msg_data,
        p_chr_id         => r_src_chr.dnz_chr_id,
        p_credit_line_id => l_src_credit_id,
        p_formula_name   => G_LINE_FINANCED_AMOUNT,
        p_credit_flag    => false);

Line: 522

    update_tna_creditline(
      p_api_version    => l_api_version,
      p_init_msg_list  => p_init_msg_list,
      x_return_status  => x_return_status,
      x_msg_count      => x_msg_count,
      x_msg_data       => x_msg_data,
      p_chr_id         => p_chr_id,
      p_credit_line_id => l_dst_credit_id,
      p_formula_name   => G_CONTRACT_FINANCED_AMOUNT,
      p_credit_flag    => true);

Line: 550

    ROLLBACK TO update_partial_tna_creditline;

Line: 557

    ROLLBACK TO update_partial_tna_creditline;

Line: 564

	ROLLBACK TO update_partial_tna_creditline;

Line: 576

end update_partial_tna_creditline;