SET SERVEROUTPUT ON --必须有，不然显示不出
declare LN_C number(10,0):=0;
begin
DECLARE
LS_STR1 VARCHAR2(200); --循环得到的生产物料编号
CURSOR workunit_cursor IS
SELECT ID_CODE FROM MODEL_PRODUCT_RELATION WHERE MODEL_ID='16001RA' GROUP BY ID_CODE; --根据模具编号获取关联的生产物料编号
BEGIN
OPEN workunit_cursor;
FETCH workunit_cursor INTO LS_STR1;
while workunit_cursor%found loop
LN_C:=LN_C+1;
IF LN_C>35
THEN
DBMS_OUTPUT.PUT_LINE('TS:'||LS_STR1);
COMMIT;
EXIT;
END IF;
end loop;
CLOSE workunit_cursor;
END;
dbms_output.put_line('tt');
end ;