728x90
반응형

FUNCTION            get_crss_anotherbond
/* SPC이외의 채무내역 String */
 (
  p_id in  varchar2
 )
RETURN varchar2
IS
 CURSOR cur_anotherbond(v_id CRSS_LN_MAIN.RESIDENT_NO%TYPE) IS
 SELECT rpad(batch_user.get_crss_gikwannm(fi_org_cd, fi_org_code),30,' ') || lpad(to_char(round(nvl(ln_tot_amt,0)/1000,0),'9,999,999,990'),23,' ') line
 FROM crss_ln_main
 WHERE fi_org_cd <> '9031030'
 and  resident_no = v_id;

 row_anotherbond cur_anotherbond%rowtype;
 v_result varchar2(2000);
BEGIN

 v_result := '';  -- 결과 초기화

 OPEN cur_anotherbond(p_id);
 LOOP
  FETCH cur_anotherbond INTO row_anotherbond;
  EXIT WHEN cur_anotherbond%NOTFOUND;
  
  v_result := v_result || row_anotherbond.line || chr(13) || chr(10);
    END LOOP;
    CLOSE cur_anotherbond;
     
 return v_result;
EXCEPTION         
 when others then
  return ' ';
END;

728x90
반응형
블로그 이미지

nineDeveloper

안녕하세요 현직 개발자 입니다 ~ 빠르게 변화하는 세상에 뒤쳐지지 않도록 우리모두 열심히 공부합시다 ~! 개발공부는 넘나 재미있는 것~!

,