procedure use_concur1(errbuf out varchar2,
                      retcode out varchar2,
                      par1 varchar2, 
                      par2 number, 
                      par3 date)
as
  res_ varchar2(255);
begin
  res_ := 'parameter_1='''||par1||''', '||
          'parameter_2='''||to_char(par2)||''', '||
          'parameter_3='''||to_char(par3)||''';';
  insert into tuse_concurrent_oshynk(value_) values(res_);
  
  FND_FILE.PUT_LINE(FND_FILE.LOG, res_);
end use_concur1;