ORA-06512 označuje neošetřenou výjimku ve vašem postupu. Ve vašem kódu nejsou žádné chyby, takže je to rozumné.
Samozřejmě, protože nemáte žádné ošetření chyb, je pro někoho docela těžké poznat, o jakou chybu jde. Nejpravděpodobnější jsou data:buď nemáte žádný záznam v A1 where ID=1 (tj. výjimka NO_DATA_FOUND) nebo máte více než jeden takový záznam (tj. výjimka TOO_MANY_ROWS).
ODP má třídu pro zpracování výjimek. Další informace .