> ib_Script.SQL.Clear;
>
> with ibConnection.SchemaCache do
> begin
> for ii := 0 to TableNames.Count - 1 do
> ib_Script.SQL.Add ( 'GRANT ALL ON ' + TableNames[ii] + ' TO
> <NEW_USERNAME>;' );
> for ii := 0 to ViewNames.Count - 1 do
> ib_Script.SQL.Add ( 'GRANT ALL ON ' + ViewNames[ii] + ' TO
> <NEW_USERNAME>;' );
> for ii := 0 to ProcedureNames.Count - 1 do
> ib_Script.SQL.Add ( 'GRANT EXECUTE ON ' + ProcedureNames[ii] + '
> TO <NEW_USERNAME>;' );
>
> ib_Script.Execute;
>
> end;
>
>

how to use this script in Stored Procedure?


TIA

Hidayat