常用存储过程3（获取编码的上级编码和短编码）

获取编码的上级编码和短编码，如传入“01.01.123”，返回“01.01”和“123”
Create Proc GetParentNum
   @num varchar(100),
   @parentnum varchar(100) output,
   @shortnum varchar(100) output
as
declare @c char(1),@i int
set @i=len(@num)
set @shortnum=''
while @i>0
begin
   if substring(@num,@i,1)='.'
   begin
       set @parentnum=substring(@num,1,@i-1)
       return
   end
   else
       set @shortnum=substring(@num,@i,1)+@shortnum
   set @i=@i-1
end

GO