개발 참고자료

DECLARE
ls_Date VARCHAR2(500);
ln_cucode Number;
dw_Data SYS_REFCURSOR;

ls_his_custno VARCHAR2(500);
ls_cusdname VARCHAR2(500);
ls_cuname VARCHAR2(500);
ls_telno VARCHAR2(500);
ls_telno1 VARCHAR2(500);
ls_mcreate VARCHAR2(500);


BEGIN
ls_Date := '20170101';
ln_cucode := 0 ;
SPDW_FARM_LIST_NORMALCY ( ls_Date, ln_cucode, dw_Data);


DBMS_OUTPUT.ENABLE;
DBMS_OUTPUT.PUT_LINE(CHR(10));
DBMS_OUTPUT.PUT_LINE(CHR(10));
DBMS_OUTPUT.PUT_LINE('--------------------------------------------');
LOOP
FETCH dw_Data INTO ln_cucode, ls_his_custno, ls_cusdname, ls_cuname, ls_telno, ls_telno1, ls_mcreate;
EXIT WHEN dw_Data%NOTFOUND;
DBMS_OUTPUT.PUT_LINE( to_char(dw_Data%ROWCOUNT) ||' | '|| ln_cucode ||' | '|| ls_his_custno ||' | '|| nvl(ls_cusdname, ls_cuname));

EXIT WHEN to_char(dw_Data%ROWCOUNT) = 3;


END LOOP;

DBMS_OUTPUT.PUT_LINE('--------------------------------------------');
CLOSE dw_Data;


END;