A Procedure for the Computation of Semi-Invariants