SYBAESASE12.0上一个横表转纵表的简单例子

SYBAESASE12.0上一个横表转纵表的简单例子 千千如梦2002年10月 /*createtable...*/createtable#dest_table( Flagchar(1), Aintnull, Bintnull, Cintnull, Dintnull, Eintnull )go/*Flag可以是一个或多个字段;但Flag须能建立uniqueindex*/createuniqueindexidx_PRKon#dest_table(Flag)gocreatetable#mid_table( Flagchar(1), Itemchar(1), Numint )go/*Flag可以是一个或多个字段;但Flag与Item能建立uniqueindex*/createuniqueindexidx_PRKon#mid_table(Flag,Item)go/*initdata...*/insert#mid_tablevalues('a','A',100)insert#mid_tablevalues('a','B',200)insert#mid_tablevalues('a','C',300)insert#mid_tablevalues('a','D',400)insert#mid_tablevalues('a','E',500)goinsert#mid_tablevalues('b','A',10)insert#mid_tablevalues('b','B',20)insert#mid_tablevalues('b','C',30)insert#mid_tablevalues('b','D',40)insert#mid_tablevalues('b','E',50)goinsert#mid_tablevalues('c','A',9)insert#mid_tablevalues('c','B',8)insert#mid_tablevalues('c','D',6)insert#mid_tablevalues('c','E',5)goinsert#mid_tablevalues('x','A',22)godeclarecur_namecursorforselectFlag,Item,Numfrom#mid_tableforreadonlygo/*cursorvar...*/declare@flagchar(1)declare@itemchar(1)declare@numint/*othervar...*/declare@sql_textchar(255)declare@col_charchar(1)opencur_namefetchcur_nameinto@flag,@item,@numwhile(@@sq1