pb如何调用存储过程

create or replace procedure testadd(id in number,name in varchar2) is
begin
  insert into leadTest(id,name) values(id,name);
end testadd;

 Long     lngid
 String    strName
 
 lngid = 7
 strName = "f"
 
// Declare testInsert procedure for
//  testadd(:lngId,:strName);
   DECLARE UPDATE_STOK PROCEDURE FOR
  testadd(:lngId,:strName) ;
 
 
 EXECUTE UPDATE_STOK ;
 CLOSE   UPDATE_STOK ;
 COMMIT ;
 
 select name into :strName from leadTest where id = 1;