Taken from NR share library nrpas13 as  SVBKSB.PAS
and renamed  svbksb.p