80: procedure get_status( code out nocopy varchar2) is
81: l_sts_code varchar2(30);
82: cursor l_sts_csr is
83: select code 84: from okc_statuses_v 85: where ste_code = 'ENTERED'
86: and default_yn = 'Y'
87: and sysdate between start_date and nvl(end_date,sysdate);
88: begin