PROCEDURE LIST_ARQ(P_LIST IN OUT T_LIST) IS BEGIN
FOR i IN 1..10 LOOP P_LIST(i).NOME := ‘ARQUIVO’ || LPAD(i,2,’0′); END LOOP;
END;
END; [/code]
Obrigado!
Digite algo especial: