SET SERVEROUTPUT ON;
DECLARE
v_current_custid hvc_hvvisitresult .so0_nrid%type;
v_prev_custid hvc_hvvisitresult.so0_nrid%type;
v_counter NUMBER;
v_totalcount NUMBER;
CURSOR sales_curs IS
SELECT *
FROM hvc_hvvisitresult
ORDER BY so0_nrid,visitdate;
BEGIN
FOR curs_rec IN sales_curs
LOOP
v_current_custid :=curs_rec.so0_nrid;
IF (v_current_custed=v_prev_custed) THEN v_counter:=v_counter+1;
ELSE v_counter:=1;
END IF;
IF v_counter=1 THEN
SELECT count(*) INTO v_totalcount FROM hvc_hvvisitresult WHERE so0_nrid=v_current_custid;
END IF;
IF v_counter=v_totalcount THEN DBMS_OUTPUT.PUT_LINE(curs_rec.so0_nrid||’ ’||cur_recs.amount||’ ’||curs_rec.visitdate);
END IF;
v_prev_custid:=v_current_custid;
END LOOP;
END;
/


雷达卡



京公网安备 11010802022788号







