583: (p_chr_id IN VARCHAR2,
584: x_rle_code_tbl OUT NOCOPY rle_code_tbl_type) is
585: Cursor chr_scs_curs is
586: select scs_code
587: from OKC_K_HEADERS_V
588: where id = p_chr_id;
589: l_scs_code OKC_K_HEADERS_V.SCS_CODE%TYPE;
590: Begin
591: Open chr_scs_curs;
585: Cursor chr_scs_curs is
586: select scs_code
587: from OKC_K_HEADERS_V
588: where id = p_chr_id;
589: l_scs_code OKC_K_HEADERS_V.SCS_CODE%TYPE;
590: Begin
591: Open chr_scs_curs;
592: Fetch chr_scs_curs into l_scs_code;
593: If chr_scs_curs%NotFound Then